IBM Mainframe Forum

Hi all

I need to rewrite a PL/1 programme into a new COBOL program.

If you use in PL/1 the function 'DATE', what is the returned result?
Same question in cobol for the function current-date.

I need to rewrite substr(date,1,6) and substr(time,1,10) into cobol.

Thx

DATE returns CHAR(6) in the format "YYMMDD". TIME returns CHAR(9) in the format "HHMMSS999". The COBOL CURRENT-DATE function returns "YYYYMMDDHHMISS99±HHMI (the last five characters being the offset of WULT from UTC).