NAMETOP [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: NAMETOP)}}
====== NAMETOP ======
(GIN Macro)

**Defined in:** [[george:source:COREMACROS|COREMACROS]]

**Used in:** [[george:source:ALLOCATE867|ALLOCATE867]], [[george:source:ARCHIVE867|ARCHIVE867]], [[george:source:ARCHIVNW83|ARCHIVNW83]], [[george:source:ASSIGN860|ASSIGN860]], [[george:source:ASTONIF867|ASTONIF867]], [[george:source:BACKROOM865|BACKROOM865]], [[george:source:BMFIXIT864|BMFIXIT864]], [[george:source:BUDGTWO84|BUDGTWO84]], [[george:source:CANCRVX864|CANCRVX864]], [[george:source:CONCEPT85|CONCEPT85]], [[george:source:COPYA867|COPYA867]], [[george:source:COPYB867|COPYB867]], [[george:source:CREATE867|CREATE867]], [[george:source:CROBJ6|CROBJ6]], [[george:source:DEAD867|DEAD867]], [[george:source:DIRENT867|DIRENT867]], [[george:source:DUMP860|DUMP860]], [[george:source:EDIT867|EDIT867]], [[george:source:EDITMFO867|EDITMFO867]], [[george:source:ENWELL867|ENWELL867]], [[george:source:ERASE867|ERASE867]], [[george:source:FILESECU83|FILESECU83]], [[george:source:FREEZE864|FREEZE864]], [[george:source:GETON867|GETON867]], [[george:source:HOWBIG867|HOWBIG867]], [[george:source:IFEXPAN867|IFEXPAN867]], [[george:source:INCOM864|INCOM864]], [[george:source:INITJOB867|INITJOB867]], [[george:source:INLOOP84|INLOOP84]], [[george:source:INPUTMOP82|INPUTMOP82]], [[george:source:INRESTAR84|INRESTAR84]], [[george:source:IPCOPENB83|IPCOPENB83]], [[george:source:JDTWO864|JDTWO864]], [[george:source:LABEL866|LABEL866]], [[george:source:LDSTART850|LDSTART850]], [[george:source:LIBCOM867|LIBCOM867]], [[george:source:LIBLOAD867|LIBLOAD867]], [[george:source:LISTDIR867|LISTDIR867]], [[george:source:LISTDIRF867|LISTDIRF867]], [[george:source:LISTEND867|LISTEND867]], [[george:source:LISTFILE867|LISTFILE867]], [[george:source:LISTFREE867|LISTFREE867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTOPEN867|LISTOPEN867]], [[george:source:LISTPARS867|LISTPARS867]], [[george:source:LISTPROC867|LISTPROC867]], [[george:source:LOGANAL864|LOGANAL864]], [[george:source:LOGCOM864|LOGCOM864]], [[george:source:MACRALAS864|MACRALAS864]], [[george:source:MAKEDIR84|MAKEDIR84]], [[george:source:MAKEVCC867|MAKEVCC867]], [[george:source:MODE866|MODE866]], [[george:source:NETOFLNE867|NETOFLNE867]], [[george:source:NEWDIR867|NEWDIR867]], [[george:source:NEWOWN865|NEWOWN865]], [[george:source:NEWPW867|NEWPW867]], [[george:source:NORMERR860|NORMERR860]], [[george:source:OLMTA85|OLMTA85]], [[george:source:PERFPASS864|PERFPASS864]], [[george:source:PREPREAD867|PREPREAD867]], [[george:source:PRINT70|PRINT70]], [[george:source:READFAIL866|READFAIL866]], [[george:source:READFALE866|READFALE866]], [[george:source:REDONMT867|REDONMT867]], [[george:source:RENAMAG864|RENAMAG864]], [[george:source:RENAMDIR|RENAMDIR]], [[george:source:RENAME864|RENAME864]], [[george:source:RENAMEMT867|RENAMEMT867]], [[george:source:REPORT865|REPORT865]], [[george:source:RETRIEVE864|RETRIEVE864]], [[george:source:RETURNIT867|RETURNIT867]], [[george:source:SAVE864|SAVE864]], [[george:source:SCEDIT84|SCEDIT84]], [[george:source:SECUREX85|SECUREX85]], [[george:source:SETPF867|SETPF867]], [[george:source:SETPN867|SETPN867]], [[george:source:SETPR867|SETPR867]], [[george:source:SOUP867|SOUP867]], [[george:source:TPOBJ867|TPOBJ867]], [[george:source:TRAPCHEC867|TRAPCHEC867]], [[george:source:TRAPGO864|TRAPGO864]], [[george:source:TRAPLIST864|TRAPLIST864]], [[george:source:TRAPPARA3|TRAPPARA3]], [[george:source:TROBJ867|TROBJ867]], [[george:source:UNLOAD7|UNLOAD7]], [[george:source:USERONE867|USERONE867]], [[george:source:WFMOVE867|WFMOVE867]], [[george:source:WHATGENS867|WHATGENS867]], [[george:source:WLAA867|WLAA867]], [[george:source:WLB867|WLB867]], [[george:source:WLD864|WLD864]], [[george:source:WLE862|WLE862]]

<code - NAMETOP.mac.txt>
 78PY ...[??? NAMETOP SECT CENT FGN 32 DOC   
 78^Q    [   
 79FB    [     ALTERS TYPE WORD OF BLOCK (MS 12BITS ONLY). PARAMETERS SAME AS FOR
 79^2    [   
 7=DL    #MAC  NAMETOP   
 7=Y=          LDN   0  #7777
 7?CW          MOD      ANDS 0 ATYPE,%A  
 7?XG          LDN   0  %C+%B               [LOAD BLOCK TYPE 
 7#C6          SLL   0  12   
 7#WQ          MOD      ORS 0 ATYPE,%A   
 7*BB    #NOR
</code>