GETACTOP

(GIN Macro)

Defined in: COREMACROS

Used in: CHARGESC867, CONSOLE867, ENGAGE867, PERFLOGS866

GETACTOP.mac.txt

 ?#54 ...[??? GETACTOP SECT CENT FGN 32 DOC  
 ?##W    #   
 ?#SG    #MAC  GETACTOP  
 ?*#6    #STR  %C
 ?*RQ          GETCORAL %CLEN+%BLEN,N,HACTY+0%D:0
 ?B?B    #STR  %C
 ?BR2    #SKI
 ?C=L          GETCORAL %BLEN,N,HACTY+0%D:0  
 ?CQ=          BRN      MGET 
 ?D9W          BRN      %A   
 ?DPG    MGET  FINDCORE 1
 ?F96          NAME     1,%B,%C  
 ?FNQ          ADN   1  ACTRING  
 ?G8B          ENRING   1,ACTRING+BPTR(2)
 ?GN2          CHAIN    FPTR(2),BPTR(2)  
 ?GT8 ...#UNS  ICT   
 ?H2B ...      APGA  %B,%C   
 ?H7L    #NOR