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

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

**Used in:** 

<code - MODSENT.mac.txt>
 =5=W    [??? MODSENT SECT DIAG FGN 570 DOC  
 =5QG    #MAC  MODSENT                      [M. DRUKKER  
 =6=6    [   
 =6PQ    [   
 =79B    [     ************* 
 =7P2    [     *  MODSENT  * 
 =88L    [     ************* 
 =8N=    [   
 =97W    [   
 =9MG    [     THIS MACRO ISSUES A "#FILE" DIRECTIVE TO CAUSE GIN TO SET UP  
 ==76    [     A RECORD IN ONE OF THE "MODS" SEGMENTS FOR THE SEGMENT JUST   
 ==LQ    [     MENDITED  
 =?6B    [   
 =?7M ...#SKI   867>G3ISSUE$G3ISSUE  
 =?8Y ...(   
 =?=9 ...#SKI   ANEWMODS<1$1 
 =??G ...(   
 =?#R ...#GEO   AL 8508,LDN   5  #47 
 =?B4 ...#GEO   AL 8517,LDN   5   #47
 =?C* ...#GEO   AL 8526,LDN   5   #47
 =?DL ...#GEO   AL 3013,991  
 =?FX ...#ALT   ANEWMODS = 1 
 =?H8 ...)   
 =?JF ...)   
 =?L2    #STR  PM,%B 
 =#5L    #SKI
 =#K=    (   
 =*4W    #FIL  %A,PM                        [PM SEGMENT  
 =*JG    #EXI
 =B46    )   
 =BHQ    #STR  LO,%B 
 =C3B    #SKI
 =CH2    (   
 =D2L    #FIL  %A,LO                        [LOADER SEGMENT  
 =DG=    #EXI
 =D^W    )   
 =FFG    #SKI  GFIXCORE                     [SKIP IF NOT COMPILING FIXED CORE
 =F^6    (   
 =GDQ    #FIL  %A,FC                        [FIXED CORE SEGMENT  
 =GYB    #EXI
 =HD2    )   
 =HXL    #STR  FC,%B 
 =JC=    #SKI
 =JWW    (   
 =KBG    #FIL  %A,FC                        [FIXED CORE SEGMENT  
 =KW6    #EXI
 =L*Q    )   
 =LTB    #SKI  GPATCH                       [INCLUDE IF IN PATCH ENVIRONMENT 
 =M*2    (   
 =MSL    #STR  NOPATCH,%B
 =N#=    #SKI
 =NRW    (   
 =PR6    #EXI
 =Q=Q    )   
 =QQB    #FIL  %A,PA                        [PATCHED CHAPTER 
 =R=2    #EXI
 =RPL    )   
 =S9=    #SKI  GPATCH                       [INCLUDE IF NOT PATCH ENVIRONMENT
 =SNW    #SKI
 =T8G    (   
 =TN6    #STR  PATCH,%B  
 =W7Q    #SKI
 =WMB    (   
 =X72    #FIL  %A,PA                        [PATCHED CHAPTER 
 =XLL    #EXI
 =Y6=    )   
 =YKW    )   
 =^5G ...#FIL  %A
 =^K6    #NOR
</code>