;
;************************************** DRA I G]NG K\ TILL TT10
;
	SET /NOBRO=TT10:
	QUE TT10:/CR/NM
	QUE NP:/CR/NM
	QUE TT10:/SPOOL/SHR/FLAG:0/FORM:0	!SOME PROGRAMS DONT WORK WITH...
.;	QUE TT10:/SPOOL/FLAG:0/FORM:0	!ENABLE TRANSPARENT SPOOLING
	QUE TT10:/ASSIGN:NP
	ASN TT10:=NP:/GBL	!ENABLE TRANSPARENT SPOOLING
;