PROC N_FL_SW_OFF

;Version 4

GOTO BEGIN
;
;#**************************************************************************
;#	****PROCEDURE HEADER****
;#
;# 	1.0 	Introduction
;#
;#		1.1 FOT Name:	N_FL_SW_OFF	
;#		    MMS-F Name: SWN_OF (SWAN experiment ops Man, Issue 1.5, sect.6)	
;#		    SUM Issue:	N/A
;#		    Simulator Validation Status: TBS
;#
;#		1.2	Date Created:	NOV 04, 1994	
;#			    Revision:	1. 01-5-95
;#						2. 01-21-95
;#						3. 24-JAN-95  HB
;#						4. 24-OCT-95  CQ
;#
;#		1.3	Change Description:	
;#
;#			1. Suggestions from W.Schmidt 15.12.94
;#			2. Added P@ to NIPWA and NIPWB
;#			3. Added S K_EXPMON_DIS.
;#			4. Changed proc's name from TS to FL, there is no TSTOL changes
;#			   and no further input from PI since GSCT#3.
;#
;#		1.4	Point of Contact:	
;#			FOT Author:	CQ		ATSC/SOHO	805-3750
;#
;#**************************************************************************
;#	2.0	Description
;#
;#		2.1	Narrative Description
;#
;#			This procedure will switches the power off the instrument, but
;#			does not change any pulse-command driven relay settings.  It
;#			moves the mechanisms back into launch position.
;#
;#			If any test was performed with the launch lock removed, the 
;#			mechanisms have to be aligned manually into launch position, then
;#			the launch lock mechanism put into place, also manually (not 
;#			relevant for flight operations).
;#
;#		2.2	Intended Use:
;#
;#			SWAN Switch off procedures
;#
;#		2.3	Duration:	 < 3 mins
;#
;#		2.4  References: SWAN Experiment Operations Manual, Issue 1.5, Sec.6
;#					  MMS-UK Database printout files SWN_ON and SWN_OFF,
;#					  last edited 06.05.1994
;#
;#**************************************************************************
;#	3.0	Instructions for Use:
;#
;#		3.1	Parameters Required
;#
;#			None
;#
;#		3.2	Critical Activities
;#
;#			N/A
;#
;#		3.3	Special Constraints or Activities
;#
;#			
;#			N/A
;#
;#**************************************************************************
;#	4.0	STEPS:
;#		
;
BEGIN:

; Execute telecommands before disabling system monitoring!
; Telecommand Sequence:

IF (P@CMD_STATE#TELECOMMAND = "AVAILABLE") THEN
ELSE
	/CLEAR		; Clearing the Command Buffer.
ENDIF

/NBSESR			; Interrupt observations and start survival mode
WAIT				; Verify command buffer contents
/SEND

WAIT 150			; Until 10*MFP (150 Secs) to ensure that mechanism is in
				; launch-lock position

; Disable first S/C monitor parameters:


SV P@NIPWA		; SWAN A CURRENT

SV P@NIPWB		; SWAN B CURRENT	

SV P@NSPWA	; SWAN A STATUS

SV P@NSPWB	; SWAN B STATUS

WAIT			; UNTIL VERIFICATION

S K_EXP_MON_DIS

/KNNPWAFN		; Switch off nominal power to SWAN
/KNNPWBFN		; Switch off redundant power to SWAN
/KNNPWAFR		; Switch off nominal power via redundant command
/KNNPWBFR		; Switch off nominal power via redundant command
WAIT			; Verify contents of the command buffer
/SEND


; Monitoring:

; Wait until following S/C monitor parameters reach expected value MAX. wait 
; time is 60 sec.

WAIT UNTIL (P@NSPWA = "OFF") TIMEOUT 60		; SWAN A STATUS
WAIT UNTIL (P@NSPWB = "OFF") TIMEOUT 60		; SWAN B STATUS


;#************************************************************************** 
;#	5.0	Final Constraints
;#
;#		TBD
;#
;#**************************************************************************

ENDPROC