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

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

**Used in:** 

<code - NEWFCST.mac.txt>
 22FL    #   
 22^=    #                       *************** 
 23DW    #                       *  MARK 8.50  * 
 23YG    #                       *************** 
 24D6    #   
 24XQ    #   
 25CB    #     THIS FILE CONTAINS THE "DEVELOPMENT TOOLS" MACROS 
 25X2 ...#        AND IS OWNED BY MARK DRUKKER   
 26BL    #   
 26W=    #   
 27*W ...[??? NEWFCST SECT DIAG FGN 573 DOC  
 27TG    #MAC  NEWFCST                      [M. DRUKKER  
 28*6    [   
 28SQ    [   
 29#B    [     ************* 
 29S2    [     *  NEWFCST  * 
 2=?L    [     ************* 
 2=R=    [   
 2?=W    [   
 2?*F ...#SKI  ADTPNF<1$1
 2?D4    (   
 2?GM    !     NOT ALLOWED IN THIS CONTEXT  [NEWFCST NOT ALLOWED EXTERNALLY  
 2?K=    #EXI
 2?MT    )   
 2?QG    #ALT  GFIXCORE=1
 2#=6    #ALT  AHDDATUM=0
 2#PQ    #ALT  AHDREPLACER=0 
 2*9B    #ALT  AHDPM=0   
 2*P2    #ALT  AHDBSTS=0                    [EACH OF THESE IDENTIFIERS   
 2B8L    #ALT  AHDBSQ=0  
 2BN=    #ALT  AHDCOOR=0 
 2C7W    #ALT  AHDGSCANTRA=0 
 2CMG    #ALT  AHDCHCH=0                    [IS SET TO 1 
 2D76    #ALT  AHDCOREALL=0  
 2DLQ    #SKI  G4
 2F6B    #ALT  AHDCOREALLB=0 
 2FL2    #ALT  AHDEVENTFN=0                 [WHEN THE CORRESPONDING SEGMENT  
 2G5L    #SKI  G4
 2GK=    #ALT  AHDPAGTABLE=0 
 2H4W    #ALT  AHDSTEP=0 
 2HJG    #ALT  AHDHUNTBLOK=0                [HAS BEEN COMPILED   
 2J46    #ALT  AHDMESOUT=0   
 2J?Y ...#ALT  AHDFBUFF=0
 2JBH ...#UNS  ISFC+ICT  
 2JF6 ...#ALT  AHDCASCODE =0 
 2JHQ    #ALT  AHDCEND=0 
 2K8J    #ALT  ANEWFIXED=2?                 [SAVE CURRENT VALUE OF 2?
 2K*Q    #DEF  2?=DDATUM                    [RESET 2? FOR COMPILATION OF FIXED   
 2KDP ...#SKI   JUMRCCS  
 2KHN ...(   
 2KLM ...#ALT   AENDCHAPS = KTAB + 990   
 2KPL ...#ALT   BPMLEV1 = AENDCHAPS  
 2KSK ...)   
 2KXJ ...#BAS   AVARFCORE,AENDCHAPS  
 2L2L    #STR  %A
 2LG=          MENDIT   %A,%B,%C,%D,%E,%F,%G 
 2L^W    #STR  %A
 2MFG    #SKI
 2MKC ...(   
 2MP# ...#SKI  ADTPFC<1$1
 2MT9 ...      MENDITP   DATUM   
 2MY6 ...#SKI  ADTPFC
 2N33 ...      MENDITF   DATUM   
 2N5Y ...)   
 2N8Y    #LIS  3 
 2NDQ    #NOR
</code>