/* Example COBOL Date Structures (Not Y2K-Compliant) */

01  DATE-HOLDER-MMDDYY. 
   03  WS-MM         PIC X(2).
   03  WS-DD         PIC X(2).
   03  WS-YY         PIC X(2).

01  DATE-HOLDER-YYMMDD. 
   03  WS-YY         PIC X(2).
   03  WS-MM         PIC X(2).
   03  WS-DD         PIC X(2).

01  START-MMDDYY. 
   03  START-MM      PIC 9(2).
   03  START-DD      PIC 9(2).
   03  START-YY      PIC 9(2).

01  START-YYMMDD. 
   03  START-YY      PIC 9(2).
   03  START-MM      PIC 9(2).
   03  START-DD      PIC 9(2).