JWELLADD

(GIN Macro)

Defined in: MACROS WELL

Used in: BMJLSLAV864, DSCNCT867, ENWELL867, JWELLONE867, SCHDJOBA867

JWELLADD.mac.txt

 229S ...[??? JWELLADD SECT CENT FGN 72 DOC  
 22FL    #MAC  JWELLADD  
 22LS ...#STR  NCAND,%A  
 22S2 ...(   
 22^=    #STR  LIVE,%A   
 23DW    (   
 23YG    #STR  WELL,%A   
 24D6    (   
 24XQ    ! PARAMS TO JWELLADD NOT VALID  
 25CB    #EXI
 25X2    )   
 26BL          LDN   0  JWELLONE 
 26W=    )   
 27*W    #STR  WELL,%A   
 27TG          LDN   0  1
 28*6          SMO      FX2  
 28SQ          STO   0  ACOMMUNE2
 28^Y ...      SMO      FX2  
 2976 ...      STOZ     ACOMMUNE3
 29#B    #STR  SUB,%B
 29S2    (   
 2=?L          DOWN     JWUPDATE,1   
 2=R=    #EXI
 2?=W    )   
 2?QG          DOWN     JWUPDATE,2   
 2?SD ...#EXI
 2?WB ...)   
 2?Y# ...      LDX   2  FX2  
 2#2= ...      STOZ     ACOMMUNE2(2) 
 2#48 ...      NGN   0  1
 2#66 ...      STO   0  ACOMMUNE3(2) 
 2#84 ...      DOWN     JWUPDATE,1   
 2#=6    #NOR