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

**Defined in:** [[george:source:MACROS_RJDG|MACROS RJDG]]

**Used in:** [[george:source:ACCESS867|ACCESS867]], [[george:source:ASSIGN860|ASSIGN860]], [[george:source:CHTAB|CHTAB]], [[george:source:DISPCOM867|DISPCOM867]], [[george:source:GETON867|GETON867]], [[george:source:INKS|INKS]], [[george:source:LISTDEV866|LISTDEV866]], [[george:source:LISTFILE867|LISTFILE867]], [[george:source:MODEA65|MODEA65]], [[george:source:NETOFLNE867|NETOFLNE867]], [[george:source:ONLINEA867|ONLINEA867]], [[george:source:QUESCOM867|QUESCOM867]], [[george:source:RELCOM|RELCOM]]

<code - PERCON.mac.txt>
 2P88 ...[??? PERCON SECT CENT FGN 7 DOC 
 2PD2    #   
 2PXL    #     UTILITY  ROUTINES 
 2QC=    #   
 2QWW    [   
 2RBG    [MACRO FOR ENTERING THE CONVERT PERIPHERAL PARAMETER ROUTINE
 2RW6    [   
 2S*Q    #MAC  PERCON
 2STB    #STR  %A
 2T*2          LDN   0  %A                  [LOAD PARAMETER NUMBER   
 2TSL    #STR  %A
 2W#=    #SKI
 2WRW          LDN   0  0                   [OR SET ZERO 
 2X?G          SMO      FX2                 [AND STORE FOR ROUTINE   
 2XR6          STO   0  EXEC1
 2Y=Q          DOWN     PERCON,1 
 2YQB    #NOR
</code>