FINDOLPA [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

**Defined in:** [[george:source:MACS_SPC|MACS SPC]]

**Used in:** [[george:source:ATTACHC867|ATTACHC867]], [[george:source:SETJOBQ867|SETJOBQ867]]

<code - FINDOLPA.mac.txt>
 7J96    #MAC  FINDOLPA  
 7JNQ          HUNT2    %B,APERI,APERIRES,%C 
 7K8B    MFINDOLPRTN 
 7KN2          LDN   %E 0
 7L7L    MFINDOLPBCK 
 7LM=          LDXC  0  A1+1(%B) 
 7M6W          ADN   %E 0
 7MLG          LDXC  0  A1(%B)   
 7N66          BCS      %F   
 7NKQ          SRL   0  15   
 7P5B          BXE   0  %A,MFINDOLPFND   
 7PK2          BDX   %B MFINDOLPBCK  
 7Q4L    %D    BDX   %B MFINDOLPRTN  
 7QJ=    MFINDOLPFND 
 7R3W          FINDACTF %C,,AOLPT,,,FPTR 
 7RHG          BCT   %E MFINDOLPFND  
 7S36    #NOR
</code>