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

**Defined in:** [[george:source:MACS_PCT|MACS PCT]]

**Used in:** [[george:source:IDFPER867|IDFPER867]], [[george:source:PCTCON8|PCTCON8]]

<code - PCTFIND.mac.txt>
 62X2    #MAC  PCTFIND   
 63BL    MPCTFIND
 63W=          LDX   %A  FPCT(%A)
 64*W          BXU   %B APCTID-FPTPCT(%A),MPCTFIND   
 64TG    #NOR
</code>