CLUDGEQUERY [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: CLUDGEQUERY)}}
====== CLUDGEQUERY ======
(GIN Macro)

**Defined in:** [[george:source:MACROS_RMD10|MACROS RMD10]]

**Used in:** 

<code - CLUDGEQUERY.mac.txt>
 9N#S ...[??? CLUDGEQU SECT FILE FGN 16 DOC  
 9P4=    [     %A    MODIFIER POINTING TO FCB
 9PHW    [     %B    LABEL TO JUMP TO IF CLUDGE  
 9Q3G    [     %C & %D  WORK ACCUMULATORS  (X3->X7)  
 9QH6    #MAC  CLUDGEQUERY   
 9R2Q          LDX   1  FPTR(%A) 
 9RGB          LDX   0  ATYPE(1) 
 9S22          SRL   0  12   
 9SFL          SBN   0  FILE+FSTACK  
 9S^=          BNZ   0  M3CLUDGEQUE  
 9TDW          SMO      FX2  
 9TYG          LDX   %C JOBNO
 9WD6          LDEX  %D ARINGNO(1)   
 9WMY ...      BZE   %D M3CLUDGEQUE  
 9WXQ    M1CLUDGEQUE 
 9XCB          LDN   2  A1(1)
 9XX2    M2CLUDGEQUE 
 9YBL          LDX   2  BPTRF(2) 
 9YW=          SMO      FBACKPOINT(2)
 9^*W          LDX   0  ATYPE(2) 
 9^TG          BXL   0  CACT,M2CLUDGEQUE 
 =2*6          BXE   %C JOBNO-FILERING(2),%B 
 =2SQ          ADN   1  FELLEN   
 =3#B          BCT   %D M1CLUDGEQUE  
 =3S2    M3CLUDGEQUE 
 =4?L    #NOR
</code>