Formattime Command

The FORMATTIME command EXEC CICS ...

The FORMATTIME command

EXEC CICS

FORMATTIME ABSTIME(data-area)

[DDMMYY(data-area)]

[DDMMYYYY(data-area)]

[MMDDYY(data-area)]

[MMDDYYYY(data-area)]

[YYDDD(data-area)]

[YYDDMM(data-area)]

[YYMMDD(data-area)]

[YYYYDDD(data-area)]

[YYYYDDMM(data-area)]

[YYYYMMDD(data-area)]

[DATE(data-area) [DATEFORM(data-area)]]

[FULLDATE(data-area)]

[DATESEP [(data-value)]]

[DAYCOUNT(data-area)]

[DAYOFWEEK(data-area)]

[DAYOFMONTH(data-area)]

[MONTHOFYEAR(data-area)]

[YEAR(data-area)]

[TIME(data-area) [TIMESEP [(data-value)]]]

END-EXEC

Options

ABSTIME The data area corresponding to this is the return value from ASKTIME and is a PIC S9(15) COMP-3 field. It is the elapsed time in milliseconds from midnight of 1^st January 1900.

YY..DD..MM These represent different formats in which the formatted date is returned. Make sure that the data-area which is a receiving field is big enough to hold the returned character string. A ‘/’ is used as the separator if DATESEP is specified but the optional data value is omitted. Make sure that the data area includes space for the separators too.

DAYCOUNT,DAYOFWEEK,DAYOFMONTH,MONTHOFYEAR,YEAR,TIME are set into fullword fields of type PIC S9(8) COMP.

TIMESEP If you specify TIMESEP but don’t give a value the ‘:’ is used to separate the hours, minutes and seconds.

Condition: INVREQ