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

**Defined in:** [[george:source:MACROS_BJE|MACROS BJE]]

**Used in:** [[george:source:ANTIC867|ANTIC867]], [[george:source:BEXTRA83|BEXTRA83]], [[george:source:CAFSPERI867|CAFSPERI867]], [[george:source:CONIPB8|CONIPB8]], [[george:source:CONMXA85|CONMXA85]], [[george:source:CONMXB8|CONMXB8]], [[george:source:CONMXC8|CONMXC8]], [[george:source:DRSTART6|DRSTART6]], [[george:source:DRUM852|DRUM852]], [[george:source:EDSTART860|EDSTART860]], [[george:source:EXINONE867|EXINONE867]], [[george:source:EXTEND866|EXTEND866]], [[george:source:READSPEC867|READSPEC867]], [[george:source:RENAMEX867|RENAMEX867]], [[george:source:SCHDJOBA867|SCHDJOBA867]], [[george:source:SCHEDJOB867|SCHEDJOB867]], [[george:source:SPERION867|SPERION867]]

<code - OLPFIN1.mac.txt>
 2P88 ...[??? OLPFIN1 SECT CENT FGN 3 DOC
 2PD2    #   
 2PXL    #   
 2QC=    #MAC  OLPFIN1   
 2QWW          LDX   2  FX2  
 2RBG    #STR  %A
 2RW6          LINKSET 2,%A  
 2S*Q          LDX   2  APETADDR(2)  
 2STB          CLEAR    2,0  
 2T*2          MONEND
 2TSL    #STR  %A
 2W#=          COOR1X
 2WRW    #STR  %A
 2X?G    #SKI
 2XR6          COOR1Y
 2Y=Q    #NOR
</code>