*8LJ ...[??? JOBLOCK SECT CENT FGN 21 DOC   
 *8WB    #   
 *9B2    #   
 *9TL    #   
 *=*=    #   
 *=SW    #MAC           JOBLOCK  
 *?#G    #STR  %A,2  
 *?S6          LDX   2  %A   
 *#?Q          LDN   1  BJOBQ
 *#RB    MJOBLOCK2   
 **?2          LDX   1  FPTR(1)  
 **QL          BXE   1  CXJO,MJOBLOCK1   
 *B==          BXU   2  JOBNUM(1),MJOBLOCK2  
 *BPW          BRN      MJOBLOCK3
 *C9G    MJOBLOCK1   
 *CP6          NGN   1  1
 *D8Q    MJOBLOCK3   
 *DNB    #STR  %B,1  
 *F82    (   
 *FML          STO   1  %B   
 *G7=          LDX   1  FX1  
 *GLW    )   
 *H6G    #STR  %B,2  
 *HL6          LDX   2  FX2  
 *J5Q    #NOR