gtpg2m3t | General Macros |
This general macro causes a storage dump and sends a message to the system operator via a CRAS terminal. It may be used whenever an operational program or the control program detects an abnormal condition that requires a dump of main storage as an aid to error analysis.
Format
|
Entry Requirements
If an ECB is associated with the error, the address of the ECB must be in R9. This address must be valid for the address space in which the macro is invoked.
Return Conditions
Programming Considerations
Notes:
The list entry is ignored if the value provided is other than those defined.
Notes:
Examples
XYZ SERRC E,(CE93C0),PREFIX=A OPR-A0003C0 with exit SERRC R,(CE91E4),PREFIX=Q, OPR-Q0001E4 with return, use SLIST=EBW008 area at EBW008 defined as follows: EBW008: X'01' EBCDIC dump, 3rd word contains address EBW012: X'000D3180' Start of area to be dumped EBW016: X'000D35A0' End of area to be dumped EBW020: X'02' HEX dump, 3rd word contains length - 1 EBW024: X'000E4400' Start of area to be dumped EBW028: X'000000FF' Length -1 of area to be dumped EBW032: X'F0' Ignore this entry EBW036: ----------- Irrelevant EBW040: ----------- Irrelevant EBW044: X'FF' End of list
SERRC E,(CE91F0),PREFIX=H, OPR-H0001F0 with exit and LIST=ABC LISTC calls coded as follows: ABC DS 0F LISTC TAG=EBW034, dump EBW034-EBW037 LEN=4, NAME=ITEM1 LISTC TAG=EBW038, dump 24 bytes at the location LEN=24, pointed to by EBW038 NAME=ITEM2, INDIR=YES LISTC END terminate the list
SERRC C,(CECRS235), CTL-I000235 catastrophic ECB=NO, no associated ECB PREFIX=I IBM system error
LA R7,CA9SO2 CTL-I0000E1 .. DMPRTN SERRC R,R7,PREFIX=I .. with return
LA R0,DPMSG3 message defined below SERRC E,(CE929C), CTL-I00029C with exit MSG=YES, message address in R0 PREFIX=W IBM system error DPMSG3 DC AL1(L'SDP3) SDP3 DC C'SIPC WRITE ERROR - INDETERMINATE'
SERRC DSECT=YES