INDRCT.MAC;4/AU/-BF=INDRCT.MAC;3
\
-2,2
	.IDENT	/03.04/
%
-61,,/;PW002/
;	PW002	USE CURRENT UIC AS FILE OWNER AND
;		DEFAULT UFD FOR THE .OPEN COMMAND.
;
-,,/;PW003/
;	PW003	USE WSIG$S DIRECTIVE FOR WAITS.
;		LOWER PRIORITY TO VALUE PROVIDED AT
;		TASK-BUILD TIME.
;		REMOVE INAPPROPRIATE CHECK FOR MCR PROMPT
;		TO HAVE BEEN SENT OUT.
;
-,,/;PW004/
;	PW004	DO NOT CLOSE DATA FILE WHEN INDIRECTION
;		DEPTH CHANGES
;
-76,,/;PW003/
	.MCALL	WSIG$S
-119,,/;PW002/
.GLOBL	INDTI
-461,465,/;PW004/
-685,685,/;PW003/
	WSIG$S		; ELSE NO IN EXECUTION - WAIT A WHILE
-694,694,/;PW003/
	WSIG$S		; STILL IN EXECUTION - WAIT A WHILE
-738,739,/;PW003/
	WSIG$S		; NO -WAIT A WHILE
-743,746,/;PW003/
	ALTP$S	,#WPRI	; NO -LOWER PRIORITY
-755,755,/;PW003/
	WSIG$S		;YES - WAIT A WHILE
-760,760,/;PW003/
	WSIG$S		; NO - WAIT A WHILE
/