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

**Defined in:** [[george:source:OPEN-MACROS|OPEN-MACROS]]

**Used in:** [[george:source:ABANDON867|ABANDON867]], [[george:source:CANCRVX864|CANCRVX864]], [[george:source:CHTAB|CHTAB]], [[george:source:COMHOOK867|COMHOOK867]], [[george:source:CONCEPT85|CONCEPT85]], [[george:source:COPYA867|COPYA867]], [[george:source:COPYB867|COPYB867]], [[george:source:CREATE867|CREATE867]], [[george:source:DIRENT867|DIRENT867]], [[george:source:EDIT867|EDIT867]], [[george:source:EDITMFO867|EDITMFO867]], [[george:source:ERASE867|ERASE867]], [[george:source:INKS|INKS]], [[george:source:INRESTAR84|INRESTAR84]], [[george:source:JOBLIST867|JOBLIST867]], [[george:source:JWELLONE867|JWELLONE867]], [[george:source:LDSTART850|LDSTART850]], [[george:source:LIBREQC867|LIBREQC867]], [[george:source:LISTDIR867|LISTDIR867]], [[george:source:LISTFREE867|LISTFREE867]], [[george:source:LISTPARS867|LISTPARS867]], [[george:source:MACRALAS864|MACRALAS864]], [[george:source:MAKEVCC867|MAKEVCC867]], [[george:source:NEWOWN865|NEWOWN865]], [[george:source:PNTLAST860|PNTLAST860]], [[george:source:PREPREAD867|PREPREAD867]], [[george:source:PRINT70|PRINT70]], [[george:source:REGEN865|REGEN865]], [[george:source:RENAME864|RENAME864]], [[george:source:REPORT865|REPORT865]], [[george:source:RETRIEVE864|RETRIEVE864]], [[george:source:SCEDIT84|SCEDIT84]], [[george:source:SCHEDULE867|SCHEDULE867]], [[george:source:SECUREX85|SECUREX85]], [[george:source:SETPR867|SETPR867]], [[george:source:TRAPLIST864|TRAPLIST864]], [[george:source:WA864|WA864]], [[george:source:WHATRVSA867|WHATRVSA867]], [[george:source:WHTSTAT867|WHTSTAT867]], [[george:source:WLC867|WLC867]]

<code - USEROPEN.mac.txt>
 36TN ...[??? USEROPEN SECT FILE FGN 20 DOC  
 375G    #MAC  USEROPEN  
 37K6          BRN      M2USEROPEN   
 384Q    #DEF M2USE=E%B^E%C^E%D^E%E^E%F^E%G^E%H^E%I  
 38JB    M1USEROPEN +A%B^A%C^A%D^A%E^A%F^A%G^A%H^A%I 
 3942    #SKI M2USE>#7777$#7777  
 39HL    M0USEROPEN     +M2USE   
 3=3=    M2USEROPEN  
 3=GW          LDX   1  FX1  
 3?2G          LDX   0  M1USEROPEN(1)
 3?G6    #SKI  M2USE 
 3?^Q    (   
 3#FB    #SKI M2USE>#7777$#7777  
 3#^2          LDX   1  M0USEROPEN(1)
 3*DL    #SKI  M2USE<#10000$#10000   
 3*Y=          LDN   1  M2USE
 3BCW          USEROPEX %A,0,1   
 3BXG    )   
 3CC6    #SKI  M2USE<1-1 
 3CWQ          USEROPEX %A,0 
 3DBB    #FREE M2USE 
 3DW2    #NOR
</code>