COBOL - Coding your program - Using date callable services

COBOL - Codificando seu programa - Usando serviços de chamada de data

Enterprise COBOL for z/OS, Version 4.2

Ambas as funções intrínsecas de data COBOL e os serviços de chamada de data do Language Environment são baseados no calendário gregoriano.
No entanto, as datas de início podem ser diferentes dependendo da configuração da opção do compilador INTDATE.

Quando INTDATE (LILIAN) está em vigor, COBOL usa 15 de outubro de 1582 como dia 1.
Language Environment sempre usa 15 de outubro de 1582 como dia 1.
Se você usar INTDATE (LILIAN), obterá resultados equivalentes de funções intrínsecas COBOL e Language Environment serviços chamáveis de data.
A tabela a seguir compara os resultados quando INTDATE (LILIAN) está em vigor.

Tabela 1. INTDATE (LILIAN) e compatibilidade de funções intrínsecas de data e serviços solicitáveis

Função intrínseca COBOL	Serviço callable Language Environment	Resultados
DATE-OF-INTEGER	CEEDATE com picture YYYYMMDD	Compatível
DAY-OF-INTEGER	CEEDATE com picture YYYYDDD	Compatível
INTEGER-OF-DATE	CEEDAYS	Compatível
INTEGER-OF-DATE	CEECBLDY	Incompatível

Quando a configuração padrão de INTDATE (ANSI) está em vigor, o COBOL usa 1º de janeiro de 1601 como dia 1.
A tabela a seguir compara os resultados quando INTDATE (ANSI) está em vigor.

Tabela 2. INTDATE (ANSI) e compatibilidade de funções intrínsecas de data e serviços solicitáveis

Função intrínseca COBOL	Serviço callable Language Environment	Resultados
INTEGER-OF-DATE	CEECBLDY	Compatível
DATE-OF-INTEGER	CEEDATE com picture YYYYMMDD	Incompatível
DAY-OF-INTEGER	CEEDATE com picture YYYYDDD	Incompatível
INTEGER-OF-DATE	CEEDAYS	Incompatível

Tarefas relacionadas

Using Language Environment callable services - Usando serviços de chamada do Language Environment

Referências Relacionadas

INTDATE