>>-+--------+--$STMTLOG--+-----------------------+-------------->
   '-symbol-'            '-DIAG--=--+-addrx----+-'   
                                    +-(--R1--)-+     
                                    '-label----'     

>--+-------------------------+--+----------------------+-------->
   '-,--TYPE--=--+-COMMENT-+-'  |              .-NO--. |   
                 +-ERROR---+    '-,--MSGID--=--+-YES-+-'   
                 '-WARNING-'                               

>--+-------------------------+---------------------------------><
   '-,--LEN--=--+-field----+-'   
                '-(--R0--)-'     

DIAG=

Specifies the address of the diagnostic information associated with the last analyzed initialization statement or specifies the actual text of the diagnostic information when “label” is the keyword value. The message can be formatted to contain a message ID and/or message length as well as the actual text. The following table provides the required format information:

TYPE=

Specifies the type of diagnostic message that is to be logged for the last analyzed initialization statement.

COMMENT

Log the diagnostic information to hardcopy only.

WARNING

Log the diagnostic information to hardcopy if the source of the last analyzed initialization statement is not the console. If the source is a console also log the diagnostic information to the console.

ERROR

Log the current parameter statement to the console and hardcopy along with the diagnostic information.

MSGID=

Specifies whether (YES) or not (NO) a message ID ($HASPnnn) is included in the diagnostic text that is passed to the STMTLOG routine.

YES

Indicates that the message ID is supplied as part of the diagnostic text.

NO

Indicates that the message ID is not supplied as part of the diagnostic text.

LEN=

Specifies the address of the length (1-80 characters) of the diagnostic message. If this keyword is not specified, JES2 assumes that the length of the message is imbedded in the message.

• Only Exit 19 during JES2 initialization.
• $WAIT cannot occur.