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

**Defined in:** [[george:source:BMAP_MACROS|BMAP MACROS]]

**Used in:** [[george:source:BMAPDIR865|BMAPDIR865]]

<code - NOPARTRES.mac.txt>
 83T6 ...[??? NOPARTRE SECT FILE FGN 36 DOC  
 84#Q ...[   
 84SB ...[     THIS MACRO PROHIBITS RESTORES OF ALL  
 85#2 ...[     OR SPECIFIED DIRECTORIES. 
 85RL ...[   
 86?= ...#MAC NOPARTRES  
 86QW ...#STR %A 
 87=G ...#SKI
 87Q6 ...(   
 889Q ...#MEN BMCNTRL
 88PB ...#TRA K80BMCNTRL 
 8992 ...      NULL  
 89NL ...#END
 89RQ ...#MEN BMPRCHEK   
 89SR ...#TRA AFORBIDN   
 89TS ...               -1   
 89WW ...#TRA K50BMPRCHEK
 8=22 ...      BRN      K51BMPRCHEK  
 8=56 ...#END
 8=8= ...#EXI
 8=MW ...)   
 8?7G ...#STR %A,*OFF
 8?M6 ...(   
 8#6Q ...#SKI AFORBIDEND-AFORBPTR>4-4
 8#LB ...#SKI
 8*62 ...(   
 8*KL ...#CON NOPARTRES USED TOO OFTEN   
 8B5= ...#EXI
 8BJW ...)   
 8C4G ...#MEN BMPRCHEK   
 8CJ6 ...#TRA AFORBPTR   
 8CL* ...#STR %B,*PSEU   
 8CNJ ...#SKI
 8CQR ...(   
 8CT2 ...               #40000004
 8CX9 ...                12H%A   
 8C^D ...)   
 8D3M ...#STR  %B,*PSEU  
 8D5W ...(   
 8D85 ...               #4   
 8D=# ...                12H%A   
 8D#H ...)   
 8DBQ ...#END
 8DD^ ...#MEN  BMCNTRL   
 8DHB ...#TRA K80BMCNTRL 
 8F32 ...      NULL  
 8FGL ...#END
 8G2= ...#ALT AFORBPTR=AFORBPTR+4
 8GFW ...)   
 8G^G ...#STR %A,*OFF
 8HF6 ...#SKI
 8HYQ ...(   
 8JDB ...#ALT AFORBPTR=AFORBIDN  
 8JY2 ...#MEN BMCNTRL
 8LWG ...#TRA K80BMCNTRL 
 8MB6 ...      BRN      K82BMCNTRL   
 8MTQ ...#END
 8MX^ ...#MEN BMPRCHEK   
 8N28 ...#TRA AFORBIDN   
 8N4C ...#GAP AFORBIDEND-AFORBIDN
 8N6L ...#TRA K50BMPRCHEK
 8N8T ...      NULL  
 8N?4 ...#END
 8N*B ...)   
 8NT2 ...#NOR
</code>