{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: IDFTPSCN)}}
====== IDFTPSCN ======
(GIN Macro)

**Defined in:** [[george:source:MACS_JIB|MACS JIB]]

**Used in:** [[george:source:IPBCONS867|IPBCONS867]], [[george:source:IPBSCANB867|IPBSCANB867]], [[george:source:IPBSTARB867|IPBSTARB867]], [[george:source:IPBSTART867|IPBSTART867]]

<code - IDFTPSCN.mac.txt>
 7D?H ...[??? IDFTPSCN SECT COMM FGN 25 DOC  
 7RHG    #MAC  IDFTPSCN  
 7S36    #STR  %C
 7SGQ    #SKI
 7T2B          LDX   0  CPPTR(2) 
 7TG2    #STR  %C
 7T^L          LDX   0  %C   
 7WF=          LDX   2  FX2  
 7WYW          STO   0  ACOMMUNE2(2) 
 7XDG    #SKI  %D
 7XY6          STO   %D ACOMMUNE3(2) 
 7YCQ    #SKI  %D
 7YXB    #SKI
 7^C2          STOZ     ACOMMUNE3(2) 
 7^WL          DOWN     IDFSCON,20   
 82B=          BRN      %A   
 82TW          BRN      %B   
 83*G    #NOR
</code>