COBOL for MVS Date Engine
Date type:
The following are character formats:
00 MM/DD/YYYY (default date type) 01/01/1997
01 MM/DD/YY 01/01/97
02 MMDDYYYY 01011997
03 MMDDYY 010197
10 YYYY-MM-DD 1997-01-01
11 YY-MM-DD 97-01-01
12 YYYYMMDD 19970101
13 YYMMDD 970101
20 YYYY/DDD 1997/001
21 YY.DDD 97.001
22 YYYYDDD 1997001
23 YYDDD 97001
30 MMM ZD, YYYY JAN 1, 1997
31 MMM ZD, YY JAN 1, 97
32 MMMMMMMMZ ZD, YYYY JANUARY 1, 1997
33 MMMMMMMMZ ZD, YY JANUARY 1, 97
40 WWW, MM/DD/YYYY WED, 01/01/1997
41 WWW, MMM ZD, YYYY WED, JAN 1, 1997
42 WWW, MMMMMMMMZ ZD, YYYY WED, JANUARY 1, 1997
43 WWWWWWWWZ, MM/DD/YYYY WEDNESDAY, 01/01/1997
44 WWWWWWWWZ, MMM ZD, YYYY WEDNESDAY, JAN 1, 1997
45 WWWWWWWWZ, MMMMMMMMZ ZD, YYYY WEDNESDAY, JANUARY 1, 1997
The following are numeric formats:
50 0YYYYMMDD 019970101
51 000YYMMDD 000970101
52 0MMDDYYYY 001011997
53 000MMDDYY 000010197
54 00YYYYDDD 001997001
55 0000YYDDD 000097001
60 0DDDDDDDD Days (Function 3,4 & 5 i/o default)
61 0DDDDDDDD HH:MI:SS (Function 6 output default)
62 00YYYYDDD HH:MI:SS (Function 6 only)
The following is a numeric format:
70 0dddddddd Lilian format 000151290
The following are timestamp formats: (valid in Functions 2 & 6)
80 MM/DD/YYYY HH:MI:SS 01/01/1997 12:30:00
81 MM/DD/YYYY HH:MI AP 01/01/1997 12:30 PM
82 YYYY-MM-DD-HH.MI.SS 1997-01-01-12.30.00
83 YYYY-MM-DD-HH.MI AP 1997-01-01-12.30 PM