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

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

**Used in:** [[george:source:ADDJOB867|ADDJOB867]], [[george:source:ATTACHC867|ATTACHC867]], [[george:source:CHINERR867|CHINERR867]], [[george:source:CIMOP867|CIMOP867]], [[george:source:CLOSEALT864|CLOSEALT864]], [[george:source:CLOSEFUL867|CLOSEFUL867]], [[george:source:CLOSEMT867|CLOSEMT867]], [[george:source:CLOSEND867|CLOSEND867]], [[george:source:COMMFILE82|COMMFILE82]], [[george:source:COPYB867|COPYB867]], [[george:source:DETACH867|DETACH867]], [[george:source:ENGAGE867|ENGAGE867]], [[george:source:ENWELL867|ENWELL867]], [[george:source:FINDOC867|FINDOC867]], [[george:source:FORMLOOP865|FORMLOOP865]], [[george:source:GETBAX865|GETBAX865]], [[george:source:GETFREEB864|GETFREEB864]], [[george:source:HLSEVENT867|HLSEVENT867]], [[george:source:INCSET865|INCSET865]], [[george:source:INLOOP84|INLOOP84]], [[george:source:INPUTJDF82|INPUTJDF82]], [[george:source:INPUTMOP82|INPUTMOP82]], [[george:source:INRESTAR84|INRESTAR84]], [[george:source:IPBERROR867|IPBERROR867]], [[george:source:IPBINB867|IPBINB867]], [[george:source:IPBLISTA867|IPBLISTA867]], [[george:source:IPBLISTC867|IPBLISTC867]], [[george:source:IPBLISTD867|IPBLISTD867]], [[george:source:IPBMOP867|IPBMOP867]], [[george:source:IPBMOPB867|IPBMOPB867]], [[george:source:IPBSTARB867|IPBSTARB867]], [[george:source:IPCOND864|IPCOND864]], [[george:source:LIBINSEC864|LIBINSEC864]], [[george:source:LIBMANY867|LIBMANY867]], [[george:source:LIBQUERY|LIBQUERY]], [[george:source:LIBREQ866|LIBREQ866]], [[george:source:LIBREQC867|LIBREQC867]], [[george:source:LIBSEC867|LIBSEC867]], [[george:source:LISTFREE867|LISTFREE867]], [[george:source:LISTLOOP867|LISTLOOP867]], [[george:source:LISTNIP865|LISTNIP865]], [[george:source:MOPOUT85|MOPOUT85]], [[george:source:MOPSTART865|MOPSTART865]], [[george:source:MOVCART867|MOVCART867]], [[george:source:NEWDIR867|NEWDIR867]], [[george:source:OFFREL867|OFFREL867]], [[george:source:OLMTE85|OLMTE85]], [[george:source:ONLINEB867|ONLINEB867]], [[george:source:ONLINEC867|ONLINEC867]], [[george:source:OPENWAIT867|OPENWAIT867]], [[george:source:OPENWORK866|OPENWORK866]], [[george:source:ORELHALF82|ORELHALF82]], [[george:source:ORELMAIN867|ORELMAIN867]], [[george:source:PCTCON8|PCTCON8]], [[george:source:PERFCHAP866|PERFCHAP866]], [[george:source:PERFLOGS866|PERFLOGS866]], [[george:source:PERFPASS864|PERFPASS864]], [[george:source:QUESCOM867|QUESCOM867]], [[george:source:READBULK867|READBULK867]], [[george:source:RENAME864|RENAME864]], [[george:source:RENGAGE851|RENGAGE851]], [[george:source:REQCART866|REQCART866]], [[george:source:RETURNIT867|RETURNIT867]], [[george:source:SCHEDENX860|SCHEDENX860]], [[george:source:SCHEDMTX867|SCHEDMTX867]], [[george:source:SETDISC866|SETDISC866]], [[george:source:SETUPB867|SETUPB867]], [[george:source:TAPEWAIT65|TAPEWAIT65]], [[george:source:TIDYREAD850|TIDYREAD850]], [[george:source:TWINSET866|TWINSET866]], [[george:source:TWINSETB866|TWINSETB866]], [[george:source:USERONE867|USERONE867]], [[george:source:WAIT867|WAIT867]], [[george:source:WLC867|WLC867]], [[george:source:XENON|XENON]]

<code - LONGSET.mac.txt>
 H=D6 ...[??? LONGSET SECT CENT FGN 32 DOC   
 H=H6 ...#MAC  LONGSET   
 H=L6 ...#STR  %D
 H=P6 ...(   
 H=S6 ...#STR  %D,2  
 H=X6 ...      LDX  2  %D
 H?26 ...)   
 H?56 ...#STR  %D
 H?86 ...#SKI
 H??6 ...      LDX   2  FX2  
 H?B6 ...      LDEX  0  CLONG1(2)
 H?F6 ...      BNZ   0  %B   
 H?J6 ...      LDN   0  %A   
 H?M6 ...      DEX   0  CLONG1(2)
 H?Q6 ...#STR  %C
 H?T6 ...      ACCSTO   %C,CLONG2(2) 
 H?Y6 ...#STR  %C
 H#36 ...#SKI
 H#66 ...      STOZ     CLONG2(2)
 H#96 ...      LDX   1  FX1  
 H##6 ...#STR  %D
 H#C6 ...      LDX   2  FX2  
 H#G6 ...#NOR
</code>