FPCAJO

(GIN Macro)

Defined in: MACROS GLJ

Used in: ACTPRI867, ATTACHC867, BCAST867, CHARGESC867, COMPRO867, COOR865, COREALLF867, CORESHED861, DOMONOP867, EVENTS864, FREEBUFF860, JAMSWAP865, OPENWAIT867, PERFAIL866, PLUGIN867, PROCONTX867, REALTIME867, RELPER867, RUNPROG840, SCHEDOUT865, SWAP865, UNPLUG867, WSJOBSA867, WSPERIS867

FPCAJO.mac.txt
 7LX4 ...[??? FPCAJO SECT CENT FGN 18 DOC
 7M6W    #   
 7MLG    #   
 7N66    #MAC  FPCAJO                       [FIND PCA FROM JOB BLOCK 
 7NKQ    [   
 7P5B    #STR  %B
 7PK2          MOD LDX %A AJBRING+FPTR,%B
 7Q4L    #STR  %B
 7QJ=    #SKI
 7R3W          LDX   %A AJBRING+FPTR(%A) 
 7RHG          SBN   %A JOBRING  
 7S36    [   
 7SGQ    #STR  N,%C  
 7T2B    (   
 7TG2    #SKI  K6ALLGEO                     [CHECK THAT BLOCK FOUND  
 7T^L    (                                  [ IS OF THE RIGHT TYPE   
 7WF=          LDCH  0  ATYPE(%A)
 7WYW          SBN   0  APET/64  
 7XDG          BZE   0  MFPCAJO1 
 7XY6          GEOERR   1,PCA?   
 7YCQ    MFPCAJO1
 7YXB    )   
 7^C2    )   
 7^WL    [   
 82B=    #NOR