22FL    #   
 22PD ...[??? SHLSQ SECT CENT FGN 71 DOC 
 22^=    #     THIS SUBFILE BELONGS TO RICHARD GRIMWADE  
 23DW    #   
 23YG    #  THESE MACROS ARE USED BY THE SAVEJOB ROUTINE 
 24D6    #   
 24XQ    #     THIS MACRO SEARCHES THE HLS QUEUE FOR A HLS QUEUE BLOCK WITH A
 25CB    #     SPECIFIED JOB NUMBER  
 25X2    #MAC  SHLSQ 
 26BL          LDN   %B BHLSQ
 26W=    SHLSQ1  LDX %B FPTR(%B) 
 27*W          TXU   %B CXHL 
 27TG          BCC      %C   
 28*6          LDX   0  HLSJONO(%B)  
 28SQ          SBX   0  %A   
 29#B          BNG   0  SHLSQ1   
 29S2          BNZ   0  %C   
 2=?L    #NOR