Interpreting date format and time format

DFSMSrmm dates are in packed decimal format: yyyydddC, where yyyyddd is a Julian date and C is a standard packed-decimal sign character. The date formats used are returned in internal format and can be interpreted as follows:

• Interpret 9999366 as PERMANENT retention date format.
• Interpret 9999365 as PERMANENT retention date format.
• Interpret 9800000 as WHILECATLG retention date format.
• Interpret 98ccccc as CYCL/ccccc retention date format.
• Interpret 0000098 as CATRETPD retention date format.
• Interpret 0000099 as KeptByCatlg retention date format. (If the data set is cataloged and WHILECATALOG(ON) is set, SEARCHDATASET SFI X'8C6000' contains the special KeptByCatlg qualifier X'0000099F', while LISTDATASET SFI X'8C6000' always contains the expiration date.)
• Interpret yyyyddd as yyyy/mm/dd, yyyy/dd/mm, mm/dd/yyyy, dd/mm/yyyy, dd/yyyy/mm, mm/yyyy/dd.