Menu principal                 [Fechar]
Introdução
Divisões
Identification Division
Environment Division
Data Division
Procedure Division
Comandos CICS
VSAM - File Status
Quadros importantes
SQL - Structured Query Language
Outros programas
Rotinas prontas
Palavras reservadas
Introdução ao Oracle
Sites de busca
Sites interessantes
Meu e-mail

SQL - Obter a data, hora ou timestamp corrente


Anterior Menu principal

Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF.

Os comandos abaixo retornam a data, hora ou timestamp corrente 


           05  WS-CURRENT-DATE  PIC X(010) VALUE SPACES.
           05  WS-CURRENT-TIME  PIC X(008) VALUE SPACES.
           05  WS-CURRENT-TS    PIC X(026) VALUE SPACES.

            Data corrente

           EXEC SQL
                SELECT CURRENT DATE
                INTO  :WS-CURRENT-DATE 
                FROM   SYSIBM.SYSDUMMY1
           END-EXEC
    OU
           EXEC SQL
                SET :WS-CURRENT-DATE = CURRENT DATE
           END-EXEC

            Hora corrente

           EXEC SQL
                SELECT CURRENT TIME
                INTO  :WS-CURRENT-TIME 
                FROM   SYSIBM.SYSDUMMY1
           END-EXEC
    OU
           EXEC SQL
                SET :WS-CURRENT-TIME = CURRENT TIME
           END-EXEC

            Timestamp corrente

           EXEC SQL
                SELECT CURRENT TIMESTAMP
                INTO  :WS-CURRENT-TS 
                FROM   SYSIBM.SYSDUMMY1
           END-EXEC
    OU
           EXEC SQL
                SET :WS-CURRENT-TS = CURRENT TIMESTAMP
           END-EXEC

Resultado da pesquisa acima: 


  DATA      
  ----------
  30.10.2007


  HORA    
  --------
  13:28:08


  TIMESTAMP                 
  --------------------------
  2007-10-30-13.28.39.289410