TLMDATE Macro - Common Date Processing Routines › Coding the TLMDATE Macros › TLMDATE RETURN_DATE Macro—Return Date and Time

TLMDATE RETURN_DATE Macro—Return Date and Time

Use the RETURN_DATE form of the TLMDATE macro to return the current date and time.

This macro has the following format:

label TLMDATE RETURN_DATE

,DATE=internal
,TIME=internal
,ANCHOR=anchor
,PARM=plist
[,NORMAL=branch]
[,ERROR=branch]
[,FAIL=branch] 

DATE=internal

Specifies the field to receive the current date.

Type: RX-type label or (Rn), internal packed (4 bytes)

TIME=internal

Specifies the field to receive the current time.

Type: RX-type label or (Rn), internal packed (4 bytes)

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 RETURN_DATE Macro

                                                                  Pos. 72
                                                                  |
TLMDATE  RETURN_DATE,DATE=CURRDATE,TIME=CURRTIME,                 X
      ANCHOR=ANCHOR,PARM=DPARM