Previous Topic: TLMDATE CLOSE Macro—Close Date ProcessingNext Topic: TLMDATE FROM_EXTERNAL Macro—Convert to Internal Date


TLMDATE EXPLODED_DATA Macro—Generate Data Area

Use the EXPLODED_DATA form of the TLMDATE macro to generate the data area in which all date related information is stored after a call to TLMDATE TO_EXPLODED.

This macro has the following format:

label TLMDATE EXPLODED_DATA [,PREFIX=xx]
PREFIX=xx

(Optional) Specifies the prefix used for the work area.

Default: DE (Date Exploded)

The following is the data area generated for TLMDATE EXPLODED_DATA:

         DS    0F
name     DS    0CL64              EXPLODED DATE CONTROL BLOCK
DETYPDAT DC    F'0'               TYPE OF DATE IN BINARY
DETYPNAM DC    CL10' '            NAME ASSOCIATED WITH DATE TYPE
DETYPALT DC    CL06' '            ALTERNATE SHORT KEYWORD NAME
DEDAYNAM DC    CL10' '            CHARACTER DAY-OF-WEEK
DEDAYABV DC    CL03' '            CHARACTER DAY-OF-WEEK (ABBREV.)
DEDOW    DC    CL01'0'            NUMERIC DAY-OF-WEEK (1=SUN-7=SAT)
DEDAYTYP DC    CL01' '            DAY TYPE (H)OLIDAY,(W)ORK,WEEK(E)ND
DELYR    DC    CL01'0'            LEAP YEAR INDICATOR (1=LEAP)
DEPAKDDD DC    PL04'0'            PACKED JULIAN DAY   (000-366)
DEMONNAM DC    CL10' '            CHARACTER MONTH NAME
DEMONABV DC    CL03' '            CHARACTER MONTH NAME (ABBREV.)
DEALLDAT DC    0CL11' '           ALL DATE (GREGORIAN AND JULIAN)
DEMM     DC    CL02' '            NUMERIC MONTH       (01-12)
DEDD     DC    CL02' '            NUMERIC DAY         (00-32)
DEYYYY   DC    CL04' '            NUMERIC YEAR        (1960-2155)
DEDDD    DC    CL03' '            NUMERIC JULIAN DAY  (000-366)