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

**Defined in:** [[george:source:MACROS_WELL|MACROS WELL]]

**Used in:** [[george:source:CHEKPRIV867|CHEKPRIV867]], [[george:source:NAMEPRIV|NAMEPRIV]], [[george:source:PRIVLEG84|PRIVLEG84]]

<code - WKPFIND.mac.txt>
 5F4N ...[??? WKPFIND SECT CENT FGN 72 DOC   
 5F#G ...[   
 5FS6 ...#MAC  WKPFIND   
 5G?Q ...      LDN   2  -3+%B
 5GRB ...      LDX 0 %A  
 5H?2 ...      LDX 1 1+%A
 5HQL ...MWKPF1 ADN  2  3
 5J== ...      LDX   %C 2(2) 
 5JPW ...      TXU   0  0(2) 
 5K9G ...      TXU   1  1(2) 
 5KP6 ...      BCC      MWKPF2   
 5L8Q ...      LDX   %C 3(2) 
 5LNB ...      BNZ   %C MWKPF1   
 5M82 ...MWKPF2 LDX  1  FX1  
 5MML ...      LDX   2  FX2  
 5N7= ...      BZE   %C %D   
 5NLW ...#NOR
</code>