User Tools

Site Tools


ibm:vm370-lib:macro:dmsexs.macro_src

DMSEXS Source

References

Source Listing

DMSEXS.MACRO.txt
  1. MACRO 00001000
  2. &N DMSEXS &O,&A1,&A2,&A3 00002000
  3. LCLC &S 00003000
  4. &S SETC '&SYSNDX' 00004000
  5. &N BAL 1,DMSS&S LOAD PARAMETER REG 1 00005000
  6. AIF ('&A3' NE '').A3 00006000
  7. AIF ('&A2' NE '').A2 00007000
  8. &O &A1 EXECUTE THIS WITH SYSTEM KEY 00008000
  9. AGO .S 00009000
  10. .A2 &O &A1,&A2 EXECUTE THIS WITH SYSTEM KEY 00010000
  11. AGO .S 00011000
  12. .A3 &O &A1,&A2,&A3 EXECUTE THIS WITH SYSTEM KEY 00012000
  13. .S BR 1 RETURN TO SVC-HANDLER 00013000
  14. DMSS&S SVC 203 00014000
  15. DC H'-9' DMSEXS CODE 00015000
  16. MEND 00016000
ibm/vm370-lib/macro/dmsexs.macro_src.txt ยท Last modified: 2023/08/06 13:38 by Site Administrator