ibm:vm370-lib:macro:abend.macro_src
Table of Contents
ABEND Source
References
- Fixes Applied : 0
- This Source Date : Friday, December 8, 1978
- Last Fix ID : [Unmodified]
Source Listing
- ABEND.MACRO.txt
- MACRO 00001000
- &NAME ABEND &CODE 00002000
- GBLB &LOCK @V407510 00002100
- LCLC &MODNAM 00003000
- AIF ('&LOCK' EQ '0').NORM @V407510 00003100
- &MODNAM SETC 'LOK' @V407510 00003200
- &MODNAM&SYSNDX EQU * @V407510 00003300
- AGO .GEN @V407510 00003400
- .NORM ANOP @V407510 00003500
- &MODNAM SETC '&SYSECT'(4,3) 00004000
- &MODNAM&CODE EQU * 00005000
- .GEN ANOP @V407510 00005100
- &NAME SVC 0 - TERMINATE VM/370 00006000
- DC CL3'&MODNAM',AL1(&CODE) 00007000
- MEND 00008000
ibm/vm370-lib/macro/abend.macro_src.txt · Last modified: 2023/08/06 13:37 by Site Administrator