TLMDATE Macro - Common Date Processing Routines › Coding the TLMDATE Macros › TLMDATE SET_FORMAT Macro—Set Date Format

TLMDATE SET_FORMAT Macro—Set Date Format

Use the SET_FORMAT form of the TLMDATE macro to establish the preferred date format.

This macro has the following format:

label TLMDATE SET_FORMAT

,FMT=format
,ANCHOR=anchor
,PARM=plist
[,NORMAL=branch]
[,ERROR=branch]
[,FAIL=branch]

FMT=format

Specifies a 10-byte field containing a date pattern.

Type: RX-type label, (Rn), or constant (quotes)

ANCHOR=anchor

Points to the label specified by the ANCHOR form of the TLMDATE macro.

Type: RX-type label or (Rn)

PARM=plist

Points to the label specified by the PARM form of the TLMDATE macro.

Type: RX-type label or (Rn)

NORMAL=branch

(Optional). Specifies the instruction to receive control on return from the CTSDATE module when no errors occurred. If not defined, the next instruction after the macro is executed.

Type: RX-type label

ERROR=branch

(Optional) Specifies the instruction to receive control on return from the CTSDATE module when a date or range error occurred. If not defined, the next instruction after the macro is executed.

Type: RX-type label

FAIL=branch

(Optional) Specifies the instruction to receive control on return from the CTSDATE module when a critical error has occurred. If not defined, the next instruction after the macro is executed.

Type: RX-type label

Example: TLMDATE SET_FORMAT Macro

                                                                  Pos. 72
                                                                  |
TLMDATE  SET_FORMAT,FMT=DATEFMT,ANCHOR=R1ANCR,                    X
      PARM=R1PARMS,NORMAL=PARMDAT5