Como separo TIME de um DATETIME?

Discussão em 'Progress 4GL' iniciado por Rodrigo Rossetto, Novembro 29, 2010.

  1. Rodrigo Rossetto

    Rodrigo Rossetto Membro Participativo

    É isso ai Ferreira, funcionou!

    Esse tipo de formato não aceita converter direto, o valor de entrada tem que ser em segundos.

    Código:
    MESSAGE NOW SKIP
            STRING(int(MTIME(NOW) / 1000), "hh:mm:ss")
            STRING(MTIME(NOW), "hh:mm:ss")
        VIEW-AS ALERT-BOX INFO BUTTONS OK.
    OBRIGADO PESSOAL!
  2. kaneda84

    kaneda84 Sem Pontuação

    Otra alternativa seria a seguinte:

    Código:
    DEF VAR data AS DATETIME NO-UNDO.
    DEF VAR aux AS CHARACTER NO-UNDO FORMAT "X(25)".
    
    ASSIGN data = NOW.
    
    ASSIGN aux = STRING(ENTRY(1, STRING(ENTRY(2, STRING(data), " ")), ",")).
    
    DISPLAY aux.
    

Compartilhe esta Página