TSININC

(GIN Macro)

Used in: DEAD867, RENAMAG864, RETURN867

TSININC.mac.txt

 D^Y9 ...[??? TSININC SECT FILE FGN 73 DOC   
 D^Y= ...[   
 D^^2 ...[   
 D^^R ...[      THIS MACRO CHECKS TO SEE IF A SPECIFIED  
 F22J ...[      TSN IS IN INCINDEX   
 F23* ...#MAC  TSININC   
 F246 ...      LDX   2  FX2  
 F24X ...#STR  %C
 F25N ...(   
 F26F ...      LDN   0  %C   
 F27= ...      STO   0  ACOMMUNE1(2) 
 F283 ...)   
 F28S ...#STR  %C
 F29K ...#SKI
 F2=B ...      STOZ     ACOMMUNE1(2) 
 F2?7 ...      STO   %B ACOMMUNE2(2) 
 F2?Y ...      DOWN     DTSUBSA,3
 F2#P ...      BRN      %A   
 F2*G ...#NOR