Table of Contents

RELOC Source

References

Source Listing

RELOC.MACRO.txt
  1. MACRO 00001000
  2. &NAME RELOC 00002000
  3. ENTRY &NAME 00003000
  4. &NAME DS 0H 00004000
  5. USING *,R12 00005000
  6. ENTER 00006000
  7. SL R12,=A(&NAME-&SYSECT) 00007000
  8. USING &SYSECT,R12 00008000
  9. MEND 00009000