Intrinsic functions - Enterprise COBOL for z/OS 6.3.0
A função DATA PARA AAAAMMDD converte o argument-1 de uma data com um ano de dois dígitos (YYnnnn) em uma data com um ano com quatro dígitos (AAAAnnnn).
O argument-2 , quando adicionado ao ano no momento da execução, define o ano final de um intervalo de 100 anos, ou janela deslizante do século, na qual o ano do
argumento 1 cai.
O tipo de função é inteiro.
Se a opção do compilador DATEPROC estiver em vigor, o valor retornado será um campo de data expandida com DATE FORMAT YYYYXXXX implícito.
- argument-1
- Deve ser zero ou um número inteiro positivo menor que 991232.
Nota: O tempo de execução de COBOL não verifica se o valor é uma data válida.
- argument-2
- Deve ser um número inteiro.
Se o argument-2 for omitido, a função será avaliada assumindo que o valor 50 foi especificado.
A soma do ano no momento da execução e o valor do argument-2 devem ser menores que 10.000 e maiores que 1.699.
A seguir, exemplos de valores retornados da função DATE-TO-AAAAMMDD:
| Ano atual |
Valor do argument-1 |
Valor do argument-2 |
Valor retornado |
| 2002 |
851003 |
120 |
20851003 |
| 2002 |
851003 |
-20 |
18851003 |
| 2002 |
851003 |
10 |
19851003 |
| 1994 |
981002 |
-10 |
18981002 |
© Copyright IBM Corp.
