USEFILE [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

**Defined in:** [[george:source:MACROS_DTP|MACROS DTP]]

**Used in:** 

<code - USEFILE.mac.txt>
 HMCQ ...[??? USEFILE SECT DIAG FGN 557 DOC  
 HMXB    #MAC  USEFILE                      [M.C.D. MANN 
 HNC2    [   
 HNWL    [   
 HPB=    [     ************* 
 HPTW    [     *  USEFILE  * 
 HQ*G    [     ************* 
 HQT6    [   
 HR#Q    [   
 HRSB    #STR  %A                           [IF A FILE NAME IS SPECIFIED:
 HS#2    (   
 HSRL    #SKI  ADTP  
 HT?=    #GEO  *,TG %A(OWNE),RE             [ISSUE "TG" (INTERNALLY ONLY)
 HTQW ...#SKI  ADTPFH                       [ASSIGN THE FILE ON *FH1 
 HW=G ...#GEO  AS *FH1,%A                   [IF ADTPFH=1 
 HWQ6 ...#SKI  ADTPFH<1$1                   [OR ON *CR1 OTHERWISE
 HX9Q ...#GEO  AS *CR1,%A                   [ESPECIALLY IN ISSUED VERSIONS   
 HXPB    )   
 HY92 ...#SKI  ADTPFH
 HYNL ...#USE  FH1                          [COMPILE THE FILE ON *FH1
 H^8= ...#SKI  ADTPFH<1$1
 H^MW ...#USE  CR1                          [OR ON *CR1 AS APPROPRIATE   
 J27G    #NOR
</code>