User Tools

Site Tools


ibm:vm370-lib:macro:switch.macro_src

SWITCH Source

References

Source Listing

SWITCH.MACRO.txt
  1. MACRO 00001000
  2. &NAME SWITCH 00002000
  3. GBLB &AP @V407511 00003000
  4. GBLC &NL @V407511 00004000
  5. &NL SETC '&SYSNDX'(2,3) @V407511 00005000
  6. AIF (T'&NAME EQ 'O').SWITCH2 00006000
  7. AIF ('&AP' EQ '0').SWITCH1 @V407511 00007000
  8. &NAME TM APSTAT1,PROCIO RUNNING ON THE I/O PROCESSOR @V407511 00008000
  9. BO SWI&NL YES, NO NEED TO SWITCH @V407511 00009000
  10. SVC 24 SWITCH TO THE I/O PROCESSOR @V407511 00010000
  11. SWI&NL DS 0H @V407511 00011000
  12. AGO .SWITEXT 00012000
  13. .SWITCH1 ANOP @V407511 00013000
  14. &NAME DS 0H @V407511 00014000
  15. AGO .SWITEXT @V407511 00015000
  16. .SWITCH2 AIF ('&AP' EQ '0').SWITCH3 @V407511 00016000
  17. TM APSTAT1,PROCIO RUNNING ON THE I/O PROCESSOR @V407511 00017000
  18. BO SWI&NL YES, NO NEED TO SWITCH @V407511 00018000
  19. SVC 24 SWITCH TO THE I/O PROCESSOR @V407511 00019000
  20. .SWITCH3 ANOP @V407511 00020000
  21. SWI&NL EQU * @V407511 00021000
  22. .SWITEXT ANOP @V407511 00022000
  23. MEND @V407511 00023000
ibm/vm370-lib/macro/switch.macro_src.txt ยท Last modified: 2023/08/06 13:38 by Site Administrator