COBOL - DATA DIVISION - DDE - DATE FORMAT clause



Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

COBOL - DATA DIVISION - data description entry - DATE FORMAT clause
Enterprise COBOL for z/OS, V4.2, Language Reference

A cláusula DATE FORMAT especifica que um item de dados é um campo de data expandida ou windowed (em janela):

Windowed date fields (Campos de data com janelas)
Contêm um ano em janela (dois dígitos), especificado por uma cláusula DATE FORMAT que contém YY.

Expanded date fields (Campos de data expandida)
Contêm um ano expandido (quatro dígitos), especificado por uma cláusula DATE FORMAT que contém AAAA.

Se a opção do compilador NODATEPROC estiver em vigor, a cláusula DATE FORMAT será verificada em sintaxe, mas não terá efeito na execução do programa.
NODATEPROC desativa o processamento da data.
As regras e restrições descritas nesta referência para os campos de cláusula e data DATA FORMAT se aplicam apenas se a opção do compilador DATEPROC estiver em vigor.

A cláusula DATE FORMAT não deve ser especificada para um item de dados descrito em USAGE NATIONAL.

date-pattern é uma cadeia de caracteres, como YYXXXX, que representa um ano em janela ou expandido opcionalmente seguido ou precedido por um a quatro caracteres que representam outras partes de uma data, como o mês e o dia:

Date-pattern (Data padrão) Especifica que o item de dados contém
YY Um ano com janelas (dois dígitos)
YYYY Um ano expandido (quatro dígitos)
X Um único caracter; por exemplo, um dígito representando um semestre ou trimestre (1-4)
XX Dois caracteres; por exemplo, dígitos representando um mês (01-12)
XXX Três caracteres; por exemplo, dígitos que representam um dia do ano (001-366)
XXXX Quatro caracteres; por exemplo, dois dígitos representando um mês (01-12) e dois dígitos representando um dia do mês (01-31)


© Copyright IBM Corp.