{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: NEWMAC)}} ====== NEWMAC ====== (GIN Macro) **Defined in:** [[george:source:MACROS_DTP|MACROS DTP]] **Used in:** ?HM= [??? NEWMAC SECT DIAG FGN 555 DOC ?J6W #MAC NEWMAC [M.C.D. MANN ?JLG [ ?K66 [ ?KKQ [ ************ ?L5B [ * NEWMAC * ?LK2 [ ************ ?M4L [ ?MJ= [ ?MN7 #UNS AMACDEVSYS [PRE- MACRO HANDLING ENHANCEMENT ?MS4 #SKI ?MX^ ( ?N3W #DEF 31?=1? [REMEMBER THE LISTING LEVEL ?NHG #DEF 83?=1 [SUPPRESS "G" FLAGS ON #MACS ?P36 #LIS 0 ?PGQ NWMC %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N ?Q2B #LIS 31? [RESTORE THE LISTING LEVEL ?QG2 USEFILE %A [ASSIGN AND COMPILE THE FILE ?QSC #SKI ADTPFH<1$1 ?R6S #GEO RL *CR1 ?RF= #DEF 83?=0 [CANCEL SUPPRESSION OF "G" FLAGS ?RYW #LIS 31? ?SDG #PAG ?SFX ) ?SH# #UNS AMACDEVSYS [MACRO HANDLING ENHANCEMENT ?SJP ( ?SKG #STR :,%A [IF USER-NAME NOT SPECIFIED: ?SMD USEFILE %A(%B) [COMPILE THE NEW MACRO DEFINITION ?SPC #STR :,%A [IF USER-NAME IS SPECIFIED: ?SQ* #SKI ?SRQ USEFILE %A.%B(%C) [COMPILE THE NEW MACRO DEFINITION ?ST7 #PAG ?SWJ ) ?SY6 #NOR