Vamos a continuar con el tratamiento de fechas por jcl. Para ello vamos a partir de la fecha del sistema y a suponer que la fecha del día es 15 de Enero de 2018 (15-01-2018).
//* %%SET %%FECHA = %%$CALCDTE %%$ODATE -M3
//*------------------------------------------------------------------------
//* %%SET %%AAAA = %%SUBSTR %%FECHA 1 4
//* %%SET %%MM = %%SUBSTR %%FECHA 5 2
//* %%SET %%DD = %%SUBSTR %%FECHA 7 2
//* %%SET %%GUION = -
//*------------------------------------------------------------------------
//* %%SET %%FECCAL = %%AAAA.%%GUION.%%MM.%%GUION.%%DD
ODATE - contiene la fecha del día que según el ejemplo dado sería 20180115 (OJO!!!! fíjate en el formato, va primero el año y a continuación el mes y el día, todo junto, sin ningún tipo de separación).
FECHA - contiene la fecha resultante de restar 3 meses a la fecha del día (20171015).
AAAA - contiene el año de la fecha calculada (2017).
MM - contiene el mes de la fecha calculada (10).
DD - contiene el día de la fecha calculada (15).
GUION - se le asigna el valor "-".
No hay comentarios:
Publicar un comentario