COOR1 [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: COOR1)}}
====== COOR1 ======
(GIN Macro)

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

**Used in:** [[george:source:BMCNTRL866|BMCNTRL866]], [[george:source:BSQ867|BSQ867]], [[george:source:BSTS867|BSTS867]], [[george:source:CAFSCTRL866|CAFSCTRL866]], [[george:source:CIOUT8|CIOUT8]], [[george:source:CLOSEND867|CLOSEND867]], [[george:source:CLOSEONE867|CLOSEONE867]], [[george:source:CONSET864|CONSET864]], [[george:source:CONSOLE867|CONSOLE867]], [[george:source:COREALLF867|COREALLF867]], [[george:source:DRUM852|DRUM852]], [[george:source:DTSTART867|DTSTART867]], [[george:source:EMSENG864|EMSENG864]], [[george:source:FHLIST867|FHLIST867]], [[george:source:HLSREAD867|HLSREAD867]], [[george:source:INCMON865|INCMON865]], [[george:source:INLOOP84|INLOOP84]], [[george:source:INRESTAR84|INRESTAR84]], [[george:source:IPBCCB867|IPBCCB867]], [[george:source:IPBCONS867|IPBCONS867]], [[george:source:IPBERROR867|IPBERROR867]], [[george:source:IPBIN867|IPBIN867]], [[george:source:IPBINB867|IPBINB867]], [[george:source:IPBJOURN867|IPBJOURN867]], [[george:source:IPBLISTB867|IPBLISTB867]], [[george:source:IPBLISTC867|IPBLISTC867]], [[george:source:IPBLISTD867|IPBLISTD867]], [[george:source:IPBLISTE867|IPBLISTE867]], [[george:source:IPBLOG866|IPBLOG866]], [[george:source:IPBMOP867|IPBMOP867]], [[george:source:IPBMOPB867|IPBMOPB867]], [[george:source:IPBOUT867|IPBOUT867]], [[george:source:IPBSCAN867|IPBSCAN867]], [[george:source:IPBSTARB867|IPBSTARB867]], [[george:source:IPBSTART867|IPBSTART867]], [[george:source:IPCEN8|IPCEN8]], [[george:source:IPCOND864|IPCOND864]], [[george:source:IPCONE865|IPCONE865]], [[george:source:IPCOPENB83|IPCOPENB83]], [[george:source:IPCPASS8|IPCPASS8]], [[george:source:IPCPERI83|IPCPERI83]], [[george:source:IPCSTART864|IPCSTART864]], [[george:source:LABEL866|LABEL866]], [[george:source:LIBLOAD867|LIBLOAD867]], [[george:source:LIBLOADB867|LIBLOADB867]], [[george:source:LISTDEV866|LISTDEV866]], [[george:source:LISTINIT867|LISTINIT867]], [[george:source:LISTINTC865|LISTINTC865]], [[george:source:LISTLOOP867|LISTLOOP867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTOPEN867|LISTOPEN867]], [[george:source:LISTPREP865|LISTPREP865]], [[george:source:LISTPROC867|LISTPROC867]], [[george:source:LISTTPCP867|LISTTPCP867]], [[george:source:LOAD60|LOAD60]], [[george:source:LOADPROG865|LOADPROG865]], [[george:source:MOPCOM867|MOPCOM867]], [[george:source:MOVCART867|MOVCART867]], [[george:source:MTDUMP860|MTDUMP860]], [[george:source:MULTIPLX864|MULTIPLX864]], [[george:source:NETOFLNE867|NETOFLNE867]], [[george:source:OLMTB867|OLMTB867]], [[george:source:OLMTD65|OLMTD65]], [[george:source:OLMTE85|OLMTE85]], [[george:source:OPER864|OPER864]], [[george:source:OPERA864|OPERA864]], [[george:source:OPERIN867|OPERIN867]], [[george:source:PCTBEGIN863|PCTBEGIN863]], [[george:source:PCTCIN8|PCTCIN8]], [[george:source:PCTCON8|PCTCON8]], [[george:source:PCTCOUT8|PCTCOUT8]], [[george:source:PCTCRTR8|PCTCRTR8]], [[george:source:PCTDIS8|PCTDIS8]], [[george:source:PCTLPTP851|PCTLPTP851]], [[george:source:PERFAIL866|PERFAIL866]], [[george:source:PROFLAG83|PROFLAG83]], [[george:source:READBULK867|READBULK867]], [[george:source:READLINE8|READLINE8]], [[george:source:REDONMT867|REDONMT867]], [[george:source:RENAMEMT867|RENAMEMT867]], [[george:source:RENGAGE851|RENGAGE851]], [[george:source:RESTLIMB864|RESTLIMB864]], [[george:source:RESTMERG864|RESTMERG864]], [[george:source:RESTOREA866|RESTOREA866]], [[george:source:RESTOREG864|RESTOREG864]], [[george:source:RUNPROG840|RUNPROG840]], [[george:source:SCAN865|SCAN865]], [[george:source:SENTINEL8|SENTINEL8]], [[george:source:SETLIST864|SETLIST864]], [[george:source:SJOPEN863|SJOPEN863]], [[george:source:SWAP865|SWAP865]], [[george:source:TAPEWAIT65|TAPEWAIT65]], [[george:source:TRANFAIL866|TRANFAIL866]], [[george:source:UNLOADMT867|UNLOADMT867]], [[george:source:VIPBPERI864|VIPBPERI864]]

<code - COOR1.mac.txt>
 6CT4 ...[??? COOR1 SECT CENT FGN 32 DOC 
 6D4W    #   
 6DJG    #MAC  COOR1                        [ COORDINATOR  ENTRY  AT  END  OF
 6F46    #SKI  %A
 6FHQ          FON      %A                  [ACTIVITY
 6G3B ...      ENVOKE   (COOR1),%B   
 6GH2    #NOR
</code>