I work with a COBOL database, and interestingly all of the dates are declared as four PIC 99 fields, like this: 02 ITM-LAST-CHG-DATE. 03 ITM-LC-DAT

I work with a COBOL database, and interestingly all of the dates are declared as four PIC 99 fields, like this: 02 ITM-LAST-CHG-DATE. 03 ITM-LC-DATE-CC PIC 99. 03 ITM-LC-DATE-YY PIC 99. 03 ITM-LC-DATE-MM PIC 99. 03 ITM-LC-DATE-DD PIC 99. I assume this split between 'CC' and 'YY' is a relic of the Y2K updates, so they could add in a whole new field with a default of '19'.