TGU [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: TGU)}}
====== TGU ======
(GIN Macro)

**Defined in:** [[george:source:MACROS_RM57|MACROS RM57]]

**Used in:** 

<code - TGU.mac.txt>
 22FB ...[   
 22FL ...[??? TGU SECT FILE FGN 6 DOC
 29#T ...#MAC  TGU   
 29*# ...[ RESTORE TIME MACRO TO GIVE TRAPS TO A SPECIFIED USER WHENEVER 
 29*R ...[ A FILE IS CREATED AT RUN TIME.
 29B= ...#SKI  AUSERTRAP-ATRAPEND
 29BP ...#SKI
 29C8 ...(   
 29CM ...#CON  TGU USED TOO OFTEN
 29D6 ...#EXI
 29DK ...)   
 29F4 ...#ALT  CERASET=CERASE
 29FH ...#ALT  CERASE=#20
 29G2 ...#MEN  MAKEFILE  
 29GF ...#TRA  AUSERTRAP 
 29GY ...               12H%A
 29G^ ...#DEF  21?=0 
 29H2 ...#DEF  22?=0 
 29H3 ...#STR  %B
 29H4 ...      TGUPARAM %B   
 29H5 ...#STR  %C
 29H6 ...      TGUPARAM %C   
 29H7 ...#STR  %D
 29H8 ...      TGUPARAM %D   
 29H9 ...#STR  %E
 29H= ...      TGUPARAM %E   
 29H? ...#STR  %F
 29H# ...      TGUPARAM %F   
 29H* ...#STR  %G
 29HB ...      TGUPARAM %G   
 29HC ...#STR  %H
 29HD ...      TGUPARAM %H   
 29HF ...      +22?  
 29HG ...#SKI  21?   
 29HH ...!     ERROR(S) IN TRAP MODES
 29HW ...               +0   
 29HY ...#TRA  AUSERTRAP 
 29J2 ...#DEF  20?=34?+0?+0]@L-23$1  
 29J4 ...#SKI  20?   
 29J6 ...!     %A IS NOT IN THE REQUIRED FORMAT  
 29J8 ...#SKI  20?^21?   
 29J= ...      +0
 29J* ...#TRA  K93MAKEFILE   
 29JS ...      LDN   6  ANOTRAPS 
 29K? ...#END
 29KG ...#SKI  20?^21?$1 
 29KQ ...#ALT  AUSERTRAP=AUSERTRAP+4 
 29L9 ...#ALT  CERASE=CERASET
 29LN ...#ALT  CERASET=#20   
 29M7 ...#NOR
</code>