22FL ...[??? FINDJOBQ SECT CENT FGN 18 DOC  
 2G5L    #   
 2GK=    #     MACROS FOR GEORGE 3   
 2H4W    #   
 2HJG    #   
 2J46    #     HERE IS A QUICK JOBLOCK MACRO 
 2JHQ    #           %A = ADDRESS ON EXIT
 2K3B    #           %B = JOB NUMBER 
 2KH2    #           %C = LABEL IF NOT FOUND 
 2L2L    #MAC  FINDJOBQ  
 2LG=    #STR  %B,0  
 2L^W          LDX   0  %B   
 2MFG          LDN   %A BJOBQ
 2M^6    M1FJQ LDX   %A FPTR(%A) 
 2NDQ          BXE   %A CXJO,%C  
 2NYB          BXU   0  JOBNUM(%A),M1FJQ 
 2PD2    #NOR