ALASHUNT

(GIN Macro)

Defined in: MACRO COMPRO

Used in: EDITET7, EDITOR867, EDITORA865, SETPC867, SETPRAMA867

ALASHUNT.mac.txt

 BDMS ...[??? ALASHUNT SECT CENT FGN 21 DOC  
 BDXL    [     THE FOLLOWING MACRO IS TO SEARCH FOR THE CPB/CALAS BLOCK  
 BFC=    [     AT COMMAND PROCESSOR LEVEL ONE
 BFWW    #   
 BGBG    #MAC  ALASHUNT  
 BGW6          MHUNTW   %A,CPB,CALAS 
 BH*Q    MALAS1  
 BHTB          LDEX  %B CPBCPLEV(%A) 
 BJ*2          ERN   %B 1
 BJSL          BZE   %B MALAS2   
 BK#=          HUNT2    %A,CPB,CALAS 
 BKRW          BRN      MALAS1   
 BL?G    MALAS2  
 BLR6    #NOR