{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: COMERRX)}}
====== COMERRX ======
(GIN Macro)

**Defined in:** [[george:source:MACRO_COMPRO|MACRO COMPRO]]

**Used in:** [[george:source:ABANDON867|ABANDON867]], [[george:source:ABANDONA867|ABANDONA867]], [[george:source:ACCESS867|ACCESS867]], [[george:source:ALASB867|ALASB867]], [[george:source:ALLOCATE867|ALLOCATE867]], [[george:source:ALLOW84|ALLOW84]], [[george:source:ASSIGN860|ASSIGN860]], [[george:source:ATTACHC867|ATTACHC867]], [[george:source:ATTJOUNL861|ATTJOUNL861]], [[george:source:ATTRIBUT867|ATTRIBUT867]], [[george:source:BQUERY84|BQUERY84]], [[george:source:BUDGET84|BUDGET84]], [[george:source:CANCOM863|CANCOM863]], [[george:source:CHINERR867|CHINERR867]], [[george:source:CMEMILL866|CMEMILL866]], [[george:source:CONCEPT85|CONCEPT85]], [[george:source:CONTINUE867|CONTINUE867]], [[george:source:CORE867|CORE867]], [[george:source:DATECON37|DATECON37]], [[george:source:DELCON867|DELCON867]], [[george:source:DRUM852|DRUM852]], [[george:source:DUMMYB867|DUMMYB867]], [[george:source:DUMP860|DUMP860]], [[george:source:ENGAGE867|ENGAGE867]], [[george:source:EXPRESS864|EXPRESS864]], [[george:source:FILESECU83|FILESECU83]], [[george:source:FINISH867|FINISH867]], [[george:source:FINISHB867|FINISHB867]], [[george:source:GOTO867|GOTO867]], [[george:source:HARDIDF867|HARDIDF867]], [[george:source:IDFSEG867|IDFSEG867]], [[george:source:INCOM864|INCOM864]], [[george:source:INPUTJDF82|INPUTJDF82]], [[george:source:INSTPARA867|INSTPARA867]], [[george:source:IPBJOURN867|IPBJOURN867]], [[george:source:IPCOPENB83|IPCOPENB83]], [[george:source:JDWRITE867|JDWRITE867]], [[george:source:JOBDATA867|JOBDATA867]], [[george:source:JOBDATAB867|JOBDATAB867]], [[george:source:JWELLONE867|JWELLONE867]], [[george:source:LIST867|LIST867]], [[george:source:LISTDIR867|LISTDIR867]], [[george:source:LISTFREE867|LISTFREE867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTPARS867|LISTPARS867]], [[george:source:MACRALAS864|MACRALAS864]], [[george:source:MAKEDIR84|MAKEDIR84]], [[george:source:MODE866|MODE866]], [[george:source:MONITOR36|MONITOR36]], [[george:source:MONRESUM850|MONRESUM850]], [[george:source:MOPCOM867|MOPCOM867]], [[george:source:MOPCOMB865|MOPCOMB865]], [[george:source:MOVCART867|MOVCART867]], [[george:source:NAMEPRIV|NAMEPRIV]], [[george:source:ONLINEA867|ONLINEA867]], [[george:source:ONLINEC867|ONLINEC867]], [[george:source:OPERATOR867|OPERATOR867]], [[george:source:PAGES867|PAGES867]], [[george:source:PATCH|PATCH]], [[george:source:PNTLAST860|PNTLAST860]], [[george:source:PREPREAD867|PREPREAD867]], [[george:source:PROPERTY867|PROPERTY867]], [[george:source:RENAMDIR|RENAMDIR]], [[george:source:RENAME864|RENAME864]], [[george:source:REPERT867|REPERT867]], [[george:source:SAVE864|SAVE864]], [[george:source:SCEDIT84|SCEDIT84]], [[george:source:SCHEDULE867|SCHEDULE867]], [[george:source:SCRATCH866|SCRATCH866]], [[george:source:SETDISC866|SETDISC866]], [[george:source:SETPARAM867|SETPARAM867]], [[george:source:SETPB867|SETPB867]], [[george:source:SETPC867|SETPC867]], [[george:source:SETPE867|SETPE867]], [[george:source:SETPF867|SETPF867]], [[george:source:SETPN867|SETPN867]], [[george:source:SETPR867|SETPR867]], [[george:source:SETPRAMA867|SETPRAMA867]], [[george:source:SETPRAMB867|SETPRAMB867]], [[george:source:SHARE866|SHARE866]], [[george:source:SJMESS867|SJMESS867]], [[george:source:SOUP867|SOUP867]], [[george:source:SPEAK8|SPEAK8]], [[george:source:SPOOL83|SPOOL83]], [[george:source:SWITCH867|SWITCH867]], [[george:source:TRAPPARA3|TRAPPARA3]], [[george:source:TWINSET866|TWINSET866]], [[george:source:VCLASTWO867|VCLASTWO867]], [[george:source:VERBCLAS867|VERBCLAS867]], [[george:source:VIPBFREE865|VIPBFREE865]], [[george:source:WHATPER867|WHATPER867]], [[george:source:WHATPERB867|WHATPERB867]], [[george:source:WHENEVER867|WHENEVER867]]

<code - COMERRX.mac.txt>
 7N*Y ...[??? COMERRX SECT CENT FGN 21 DOC   
 7NKQ    #MAC  COMERRX   
 7P5B    #STR  %A
 7PK2          LDX   0  %A   
 7Q4L    #STR  %A
 7QJ=    #SKI
 7R3W          NGN   0  1
 7RHG          SMO      FX2  
 7S36          STO   0  EXT  
 7SGQ    #STR  %A
 7T2B    (   
 7TG2    #STR  %B
 7T^L          LDX   0  %B   
 7WF=    #STR  %B
 7WYW    #SKI
 7XDG          NGN   0  1
 7XY6          SMO      FX2  
 7YCQ          STO   0  EXT+1
 7YXB    )   
 7^C2          ACROSS   ERROR,2  
 7^WL    #NOR
</code>