[TP-]MSG-SW trancode|programname|dataname [errorpara] ... [screenname|recordname] ... [keyword[+keyword]...]
SYM1 % &recordname-TRANCODE = "trancode"
dataname |
Name of data element |
|
errorpara |
User-defined error routine to perform when an abnormal condition occurs. Errorpara is positional; if omitted, code an asterisk (*) in its place. |
|
keyword |
Valid keywords are: |
|
NOALTRESP |
Default. Use an IO PCB, not an alternate response IO PCB to send a response to the terminal. |
|
ALTRESP |
Use an alternate response IO PCB to send a response to the terminal. |
|
NOCONT |
Default. Control returns to top of the Procedure Division of the sending program. |
|
CONT |
Control returns to the instruction following call execution, that is, the next statement after the MSG-SW. |
|
CONTCOND |
TP-CONTCOND determines if control passes to the next instruction or returns to the top of the program. |
|
NOEXPRESS |
Default. Do not send a message for abnormal program termination. |
|
EXPRESS |
Send a message at program termination. |
|
NOENDCONV |
Default. Do not blank out the TRANCODE in the SPA. |
|
ENDCONV |
Blank out the TRANCODE in the SPA. |
|
SCREEN |
Default. Input is a AMB-painted screen. Multisegment screens are not supported. |
|
RECORD |
Input is recordname. See also Considerations below. |
|
NOPURG |
Send all messages to the same destination as one multi-segmented message. Default with NOEXPRESS argument. |
|
PURG |
After inserting the message, send it as one single-segmented message. Default with EXPRESS keyword. |
|
record-name |
User-defined I/O area in Working-Storage. See also Considerations below. |
|
screen-name |
Screen name; must be literal (maximum 8 characters). |
|
trancode| program-name |
Literal name of destination program or transaction code identifying receiving program; can be a literal (maximum 8 characters) or a COBOL data name (minimum 9 characters). |
MSG-SW trancode PROCESS-ERRORS
MSG-SW trancode * SCRA
MSG-SW trancode * WS-CUSTOMER RECORD