****************************************************************************************************
** LNG product:		ELISA source
****************************************************************************************************
** Type:               			Sequence 
**  
** FOP Name & Version: 			None 
**
** Description:                    	The following sequence performs the following steps :-
**								- Switch on SWA HIS
**					
**
** Input Arguments:				None
**								
**
** Output Values:					None
**
** CSW Version:					V2.1.3 or higher
** 
** FOPs used:						None 
**
** HK TM packets used:				AB.TM.YIA58452  AB.TM.YIA58211  AB.TM.YIA58440  AB.TM.YIA58446  AB.TM.YIA58902  
**								AB.TM.YIA58435  AB.TM.YIA58200  AB.TM.YIA58061  AB.TM.YIA58445  AB.TM.YIA58216
**
** Test Procedure & Reference:		SO-SWA-MSSL-TOP-059 Issue 1 Section 5.2
**
** Restrictions and Limitations: 	SSMM hardware required to be on before switch ON.
**								SWA DPU to be On in OPS mode.     
**
****************************************************************************************************
**	History
**--------------------------------------------------------------------------------------------------
**	Version	Date			Author			Comment
**--------------------------------------------------------------------------------------------------
**	1.1		26/04/2018	J Silverthorn		Initial version
**	1.4		30/04/2018	E Boulet			Implement A and B side option
**	1.5		30/04/2018	E Boulet			Remove halt to set heartbeat after HIS power up
**	1.6		30/04/2018	E Boulet			extend timeout for catching packet YIA58213
**  1.7									Remove capture of first packet YIA58213
**  1.8 - 1.11							Debugging of TM limits for EM SWA
**  1.12									Debugging of TM limits for EM SWA
**  1.13		01/05/2018	E Boulet			Debugging of TM limits for EM SWA + remove halt before TC HIS on
**	1.14		31/07/2018	j Silverthorn		Check added for HV DISABLE plug
**										Halt prior to LCL On command for in-rush current measurements
**										TM rate change removed for NCR 1025 investigation
**	1.15									Timeout for acquisition of SID2 parameters increased to 100 seconds
**	1.16									Timeout for NIA03010 increased to 240 seconds.
**										Timeout for acquisition of SID2 parameters increased to 120 seconds
**	1.17		02/08/2018					Error traps added in case HV DISABLE plug detection fails
**	1.18		04/08/2018					Changes to mask for HV plug checks, TM acquisition moved
**	1.19									AB.TM.NIAG1206 timeout increased to 120 seconds
**	1.20		06/08/2018					Halt removed prior to sending LCL
***************************************************************************************************

** SEQUENCE TISS_HIS_ON

SEQUENCE TISS_HIS_ON
** Definition of Input parameters
	proto
		string		$sUnit := "A" ["A", "B"]
	end proto

** Definition of Constants
	const
		string   		$sTitle  		:= "TITLE"  
		string		$sTrace 		:= "TRACE"

** Definition of Variables
	var
		string		$sBufArg := ""
		string		$sNumPha
		string		$sPlatform	
		date			$dCurDate
	
		int 			$Count
		int			$i_reportflowID
		int			$i_reportflowID_1
		int			$i_reportflowID_2
		int			$i_reportflowID_3
		int      		$i_RptRefNb
		int      		$i_RptRefNb_1
		int      		$i_RptRefNb_2
		int      		$i_RptRefNb_3

		string 		$s_lcl_a_cur := "AB.TM.NPWD3267"											--IFA_LCL4_LCL16 SWA-A_LCL TM
		string		$s_lcl_b_cur := "AB.TM.NPWD2768"											--IFA_LCL2_LCL17 SWA-B PWR_LCL TM
		string 		$s_lcl_a_sts := "AB.TM.NPWD0077"											--IFA_LCL4_LCL16 SWA-A_LCL ST
		string		$s_lcl_b_sts := "AB.TM.NPWD0038"											--IFA_LCL2_LCL17 SWA-B PWR_LCL ST
		string 		$s_rsa_a_sts := "AB.TM.NRUD2007"											--Acq. RSA_1_1_9 SWA A
		string		$s_rsa_b_sts := "AB.TM.NRUD2067"											--Acq. RSA_2_1_9 SWA B

		string 		$sTTRM
		string 		$sPM
		string 		$sRIU
		string		$sPCDU
		string		$sMilBus	

		string		$sRSA_A
		string		$sRSA_B


	main
		window

		@SU_SEQSTART("Switching SWA HIS side - "+$sUnit+" ON", *$dCurDate, $sTrace, "")
		$sPlatform := AB.USR.PLATFORM

		@TPZC_PSFT_CONFIG(*$sTTRM,*$sPM,*$sRIU,*$sPCDU,*$sMilBus)

		if ($sPCDU = "B")
			$s_lcl_a_cur := "AB.TM.NPWT3267"
			$s_lcl_b_cur := "AB.TM.NPWT2768"
			$s_lcl_a_sts := "AB.TM.NPWT0077"
			$s_lcl_b_sts := "AB.TM.NPWT0038"
		endif
		if ($sRIU = "B")
			$s_rsa_a_sts := "AB.TM.NRUT2007"
			$s_rsa_b_sts := "AB.TM.NRUT2067"
		endif

		********************************************************************
		@SU_SEQPHASE2(1, "Initial checks", *$sNumPha, "",  $sTitle)
		********************************************************************

		@su_digacs($s_lcl_a_sts,"NO","NO", $sTrace, 5) 
		@su_digacs($s_lcl_b_sts,"NO","NO", $sTrace, 5) 
		@su_digacrs($s_rsa_a_sts,"NO","NO", *$sRSA_A, $sTrace, 5) 
		@su_digacrs($s_rsa_b_sts,"NO","NO", *$sRSA_B, $sTrace, 5) 
		@su_anaacs($s_lcl_a_cur,"NO","NO",$sTrace, 60) 
		@su_anaacs($s_lcl_b_cur,"NO","NO",$sTrace, 60) 
		
		if (($sRSA_A = "Off") and ($sRSA_B = "Off"))
			ta_print "Error SWA DPU is OFF - please check"
			Return "INIT_NOK"
		end if

		@su_digacs("AB.TM.NIAD0703","=","OPS", $sTrace, 5) 

		@SU_SEQPHASE2(1, "Switch HIS on  ", *$sNumPha, "",  $sTitle)	
		$i_reportflowID := startreportflow("AB.TM.YIA58601")
		$i_reportflowID_1 := startreportflow("AB.TM.YIA58602")
		
		IF ($sUnit = "A")			
			@SU_SEQPHASE2(2, "Configure Relay box relays to position 1", *$sNumPha, "",  $sTitle)	
			
			@SU_SEND({ AB.TC.ZCSD3008 , \
			PCSB0020_ := "RB1_HIS_Rt1_P1" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@su_digacs("AB.TM.NBCD0033","NO","Pos 1", $sTrace, 5) -- Note NCR on TM inversion
			
			@SU_SEND({ AB.TC.ZCSD3008 , \
			PCSB0020_ := "RB2_HIS_Rt2_P1" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@su_digacs("AB.TM.NBCD0043","NO","Pos 1", $sTrace, 5)  -- Note NCR on TM inversion
			
			@SU_SEQPHASE2(2, "Checking LCL HTR1 is OFF", *$sNumPha, "",  $sTitle)	
			@su_digacs("AB.TM.NPWD0050","=","OFF", $sTrace, 5)
			
			@SU_SEQPHASE2(2, "Switching Relay box output to ON", *$sNumPha, "",  $sTitle)	
			@SU_SEND({ AB.TC.ZCSD3008 , \
			PCSB0020_ := "RB1_HIS_Nom_ON" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@su_digacs("AB.TM.NBCD0034","NO","On", $sTrace, 5)  -- Note NCR on TM inversion			
		ELSE 			
			@SU_SEQPHASE2(2, "Configure Relay box relays to position 2", *$sNumPha, "",  $sTitle)	
			
			@SU_SEND({ AB.TC.ZCSD3008 , \
			PCSB0020_ := "RB1_HIS_Rt1_P2" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@su_digacs("AB.TM.NBCD0033","NO","Pos 2", $sTrace, 5) -- Note NCR on TM inversion
			
			@SU_SEND({ AB.TC.ZCSD3008 , \
			PCSB0020_ := "RB2_HIS_Rt2_P2" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@su_digacs("AB.TM.NBCD0043","NO","Pos 2", $sTrace, 5)  -- Note NCR on TM inversion
			
			@SU_SEQPHASE2(2, "Checking LCL HTR2 is OFF", *$sNumPha, "",  $sTitle)	
			@su_digacs("AB.TM.NPWD0010","=","OFF", $sTrace, 5)
			
			@SU_SEQPHASE2(2, "Switching Relay box output to ON", *$sNumPha, "",  $sTitle)	
			@SU_SEND({ AB.TC.ZCSD3008 , \
			PCSB0020_ := "RB2_HIS_Red_ON" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@su_digacs("AB.TM.NBCD0046","NO","On", $sTrace, 5)  -- Note NCR on TM inversion			
		ENDIF

		@SU_SEQPHASE2(2, "Sending commands to switch ON HIS", *$sNumPha, "",  $sTitle)	


		@SU_SEND({ AB.TC.ZIA58729 , \
						SHF:OBV := 0 , \
						SID:OBV := 120}, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 10)
		@su_wait(1)

		@SU_SEND({ AB.TC.ZIA58729 , \
						SHF:OBV := 0 , \
						SID:OBV := 120}, $sTrace, VER := "NACK", TIMEOUT_VER := 10)
		@su_wait(1)

		IF ($sUnit = "A")			
			@SU_SEND({ AB.TC.ZCSD7001 , \
			PCSB001A_ := 2 , \
			PCSB0018_1 := "DECON_HTR1_LCL" , \
			PCSB0019_1 := "PCDU_SWTCH_ON" , \
			PCSB0018_2 := "DECON_HTR1_SSS" , \
			PCSB0019_2 := "PCDU_SWTCH_ON" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@SU_SEQPHASE2(2, "Checking LCL HTR1 is ON", *$sNumPha, "",  $sTitle)	
			@su_digacs("AB.TM.NPWD0050","=","ON", $sTrace, 5)
			@su_anaacs("AB.TM.NPWD3010","NO","NO", $sTrace, 5)  -- Need to establish expected limits
			
		ELSE
			@SU_SEND({ AB.TC.ZCSD7001 , \
			PCSB001A_ := 2 , \
			PCSB0018_1 := "DECON_HTR2_LCL" , \
			PCSB0019_1 := "PCDU_SWTCH_ON" , \
			PCSB0018_2 := "DECON_HTR2_SSS" , \
			PCSB0019_2 := "PCDU_SWTCH_ON" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
			
			@SU_SEQPHASE2(2, "Checking LCL HTR1 is ON", *$sNumPha, "",  $sTitle)	
			@su_digacs("AB.TM.NPWD0010","=","ON", $sTrace, 5)
			@su_anaacs("AB.TM.NPWD2510","NO","NO", $sTrace, 5)  -- Need to establish expected limits
		ENDIF
		
		@RPZA_CATCHTMPCKT($i_reportFlowID, "AB.TM.YIA58601", *$i_RptRefNb) -- 3 minute timeout. Expected wait is 90 seconds.
		stopreportflow $i_reportflowID

		@SU_SEND({ AB.TC.ZIA58063 , \
			PIA60452_ := 1 , \
			PIA60449_1 := "HISHEARTB_MI" }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)

		
		if ($sPlatform = "FM")

			@SU_SEQPHASE2(2, "Checking remaining HK TM", *$sNumPha, "",  $sTitle)	
			@su_rawacs("AB.TM.NIA03501","=",0xC0DEC0DE, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03505","=",0x40080000, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03506","=",0xC0DEC0DE, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03510","=",0x40080000, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03513","=",0x007AB1E5, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03515","=",0x00017F86, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03517","=",0x007AB1E5, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03519","=",0x00017F86, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03520","NO",0x01170506, 0xFFFFFFFF, $sTrace, 5) 
			
			@SU_RAWacs("AB.TM.NIA03546","=",0x83, 0xFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03545","=",0xFFFF, 0xFFFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03541","=",0x360802FF, 0xFFFFFFFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03543","=",0xC8000300, 0xFFFFFFFF, $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA04700","=19","=19", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA04400",">=1","NO", $sTrace, 5)
			
			@SU_IPVacs("AB.TM.NIA03525","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03526","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03527","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03528","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03529","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03530","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03531","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03532","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03533","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03534","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03535","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03536","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03537","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03538","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03539","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03540","=0","=0", $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03523","=",0x4A55, 0xFFFFFFFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03524","=",0x4A55, 0xFFFFFFFF, $sTrace, 5)
			
			@su_wait(90)
			
			@SU_SEQPHASE2(2, "Checking DISABLE plug is fitted", *$sNumPha, "",  $sTitle)	
			on error @RSTAT_RET()
			@su_rawacs("AB.TM.NIAG1206","=",0x20, 0x20, $sTrace, 120) -- Checking for "DISABLE" plug fitted
			@su_rawacs("AB.TM.NIAG3803","=",0x0, 0x10, $sTrace, 95) -- Checking for "DISABLE" plug fitted
			on error default
			
			@SU_IPVacs("AB.TM.NIA03010",">=91","<=100", $sTrace, 240) --
			@SU_IPVacs("AB.TM.NIA04400",">=0","NO", $sTrace, 120) --
			@SU_IPVacs("AB.TM.NIA04560","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04561","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04562","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04563","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04564","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04567","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04590","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04591","=6","=6", $sTrace, 120)
			@SU_rawacs("AB.TM.NIA04592","=",0x14,0xFF, $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04594","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04595","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04599","=0","=0", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01392",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01393",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01394",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01395",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01396",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01397",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01398",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01399",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01400",">=-0.01","<=0.1683", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01401",">=0","<=24.3716", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01402",">=-13.2","<=-12.3481", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01403",">=1.72078","<=1.82825", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01404",">=1.4453","<=1.53676", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01405",">=12.04837","<=12.80496", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01406",">=0.239","<=0.448", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01407",">=-0.618","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01408",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01409",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01340",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01343",">=0","<=0.618", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01346",">=-22.1","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01349",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01352",">=-2.64","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01702",">=4.93317","<=5.08674", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01705",">=3.28086","<=3.346853", $sTrace, 120)
			@su_ipvacs("AB.TM.NIA01708",">=9","<=25", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01711",">=0.0198","<=0.07", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01714",">=-0.07","<=-0.018", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01723",">=-0.0121","<=-0.009", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01726",">=-0.066","<=-0.0225", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01729",">=3.20682","<=3.41548", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01732",">=0.02937","<=0.0429", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01735",">=4.90432","<=5.21077", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01738",">=-5.22954","<=-4.97319", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01741",">=0.02","<=0.066", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01320",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01321",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01322",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01323",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01324",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01325",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01326",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01327",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01328",">=-0.01","<=0.1683", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01329",">=0","<=24.3716", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01330",">=-13.2","<=-12.3481", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01331",">=1.72078","<=1.82825", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01332",">=1.4453","<=1.53676", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01333",">=12.04837","<=12.80496", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01334",">=0.239","<=0.448", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01335",">=-0.618","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01336",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01337",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01338",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01341",">=0","<=0.618", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01344",">=-22.1","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01347",">=-22.1","<=22.1", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01350",">=-2.64","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01700",">=4.93317","<=5.08674", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01703",">=3.28086","<=3.346853", $sTrace, 120)
			@su_ipvacs("AB.TM.NIA01706",">=9","<=25", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01709",">=0.0198","<=0.07", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01712",">=-0.07","<=-0.018", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01721",">=-0.0121","<=-0.009", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01724",">=-0.066","<=-0.0225", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01727",">=3.20682","<=3.41548", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01730",">=0.02937","<=0.0429", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01733",">=4.90432","<=5.21077", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01736",">=-5.22954","<=-4.97319", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01739",">=0.02","<=0.066", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01356",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01357",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01358",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01359",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01364",">=-0.01","<=0.1683", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01365",">=0","<=24.3716", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01366",">=-13.2","<=-12.3481", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01367",">=1.72078","<=1.82825", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01368",">=1.4453","<=1.53676", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01369",">=12.04837","<=12.80596", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01370",">=0.239","<=0.448", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01371",">=-0.618","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01372",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01373",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01339",">=-49","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01342",">=0","<=0.618", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01345",">=-22.1","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01348",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01351",">=-2.64","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01701",">=4.93317","<=5.08674", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01704",">=3.28086","<=3.346853", $sTrace, 120)
			@su_ipvacs("AB.TM.NIA01707",">=9","<=25", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01710",">=0.0198","<=0.07", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01713",">=-0.07","<=-0.018", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01722",">=-0.0121","<=-0.009", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01725",">=-0.066","<=-0.0225", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01728",">=3.20682","<=3.41548", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01731",">=0.02937","<=0.0429", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01734",">=4.90432","<=5.21077", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01737",">=-5.22954","<=-4.97319", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01740",">=0.02","<=0.066", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA04653",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04654",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04655",">=0","<=110", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04656",">=0","<=0.145", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04657",">=0","<=11.604", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04658",">=0","<=15.211", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04659",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04660",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04661",">=4.9098","<=5.0601", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04662",">=3.26242","<=3.345646", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04663",">=4.91176","<=5.06212", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04664",">=0","<=4095", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04665",">=3.19809","<=3.39591", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04666",">=1.42595","<=1.57815", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04667",">=0","<=4", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04619",">=4.91176","<=5.06212", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04620",">=0","<=4095", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA04621",">=3.19809","<=3.39591", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04622",">=1.42595","<=1.57815", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04623",">=0","<=4", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04624",">=0","<=5", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04625",">=0.0061","<=0.0156", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04626",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04627",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04628",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04629",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04630",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04631",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04632",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04633",">=0","<=110", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04634",">=0","<=0.145", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04635",">=0","<=11.604", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04636",">=0","<=15.211", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04637",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04638",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04639",">=4.9098","<=5.0601", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04640",">=3.26242","<=3.345645", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04641",">=4.91176","<=5.06212", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04642",">=0","<=4095", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA04643",">=3.19809","<=3.39591", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04644",">=1.42595","<=1.57815", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04645",">=0","<=4", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04646",">=0","<=5", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04647",">=0.0061","<=0.0156", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04648",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04649",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04650",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04651",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04652",">=-40","<=80", $sTrace, 120)
			
		else -- EM

			@su_rawacs("AB.TM.NIA03501","=",0xC0DEC0DE, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03505","=",0x40080000, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03506","=",0xC0DEC0DE, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03510","=",0x40080000, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03513","=",0x007AB1E5, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03515","=",0x00017F86, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03517","=",0x007AB1E5, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03519","=",0x00017F86, 0xFFFFFFFF, $sTrace, 5) 
			@su_rawacs("AB.TM.NIA03520","NO",0x01170506, 0xFFFFFFFF, $sTrace, 5) --
			
			@SU_RAWacs("AB.TM.NIA03546","=",0x83, 0xFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03545","=",0xFFFF, 0xFFFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03541","=",0x360802FF, 0xFFFFFFFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03543","=",0xC8000300, 0xFFFFFFFF, $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA04700","=19","=19", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA04400","NO","NO", $sTrace, 5) --
			
			@SU_IPVacs("AB.TM.NIA03525","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03526","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03527","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03528","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03529","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03530","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03531","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03532","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03533","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03534","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03535","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03536","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03537","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03538","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03539","=0","=0", $sTrace, 5)
			@SU_IPVacs("AB.TM.NIA03540","=0","=0", $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03523","=",0x4A55, 0xFFFFFFFF, $sTrace, 5)
			@SU_RAWacs("AB.TM.NIA03524","=",0x4A55, 0xFFFFFFFF, $sTrace, 5)
			
			@su_wait(90)
			
			@SU_SEQPHASE2(2, "Checking DISABLE plug is fitted", *$sNumPha, "",  $sTitle)	
			on error @RSTAT_RET()
			@su_rawacs("AB.TM.NIAG1206","=",0x20, 0x20, $sTrace, 120) -- Checking for "DISABLE" plug fitted
			@su_rawacs("AB.TM.NIAG3803","=",0x0, 0x10, $sTrace, 95) -- Checking for "DISABLE" plug fitted
			on error default
			
			@SU_IPVacs("AB.TM.NIA03010",">=91","<=100", $sTrace, 240) --
			@SU_IPVacs("AB.TM.NIA04400",">=0","NO", $sTrace, 120) --
			@SU_IPVacs("AB.TM.NIA04560","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04561","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04562","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04563","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04564","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04567","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04590","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04591","=0","=0", $sTrace, 120) --
			@SU_rawacs("AB.TM.NIA04592","NO",0x14,0xFF, $sTrace, 120) --
			@SU_IPVacs("AB.TM.NIA04594","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04595","=0","=0", $sTrace, 120)
			@SU_IPVacs("AB.TM.NIA04599","=0","=0", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01392",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01393",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01394",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01395",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01396",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01397",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01398",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01399",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01400",">=-0.01","<=0.1683", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01401",">=0","<=26", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01402",">=-13.2","<=-12.3481", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01403",">=1.72078","<=1.82825", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01404",">=1.4453","<=1.53676", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01405",">=12.04837","<=13.0", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01406",">=0.239","<=0.448", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01407",">=-0.618","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01408",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01409",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01340",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01343",">=0","<=0.618", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01346",">=-22.1","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01349",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01352",">=-2.64","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01702",">=4.93317","<=5.08674", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01705",">=3.28086","<=3.346853", $sTrace, 120)
			@su_ipvacs("AB.TM.NIA01708",">=9","<=25", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01711",">=0.0198","<=0.07", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01714",">=-0.07","<=-0.018", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01723",">=-0.0121","<=-0.0009", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01726",">=-0.066","<=-0.00225", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01729",">=3.20682","<=3.41548", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01732",">=0.002937","<=0.0429", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01735",">=4.90432","<=5.21077", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01738",">=-5.22954","<=-4.97319", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01741",">=0.002","<=0.066", $sTrace, 120) --
			
			@su_anaacs("AB.TM.NIA01320",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01321",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01322",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01323",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01324",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01325",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01326",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01327",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01328",">=-0.01","<=0.1683", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01329",">=0","<=26.0", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01330",">=-13.2","<=-12.3481", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01331",">=1.72078","<=1.82825", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01332",">=1.4453","<=1.53676", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01333",">=12.04837","<=13", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01334",">=0.239","<=0.448", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01335",">=-0.618","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01336",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01337",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01338",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01341",">=0","<=0.618", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01344",">=-22.1","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01347",">=-22.1","<=22.1", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01350",">=-2.64","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01700",">=4.93317","<=5.08674", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01703",">=3.28086","<=3.346853", $sTrace, 120)
			@su_ipvacs("AB.TM.NIA01706",">=9","<=25", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01709",">=0.0198","<=0.07", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01712",">=-0.07","<=-0.018", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01721",">=-0.0121","<=-0.0009", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01724",">=-0.066","<=-0.00225", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01727",">=3.20682","<=3.41548", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01730",">=0.002937","<=0.0429", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01733",">=4.90432","<=5.21077", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01736",">=-5.22954","<=-4.97319", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01739",">=0.002","<=0.066", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01356",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01357",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01358",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01359",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01364",">=-0.01","<=0.1683", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01365",">=0","<=26.0", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01366",">=-13.2","<=-12.3481", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01367",">=1.72078","<=1.82825", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01368",">=1.4453","<=1.53676", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01369",">=12.04837","<=13.0", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01370",">=0.239","<=0.448", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01371",">=-0.618","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01372",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01373",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01339",">=-49","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01342",">=0","<=0.618", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01345",">=-22.1","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01348",">=-22.1","<=22.1", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01351",">=-2.64","<=0", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01701",">=4.93317","<=5.08674", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01704",">=3.28086","<=3.346853", $sTrace, 120)
			@su_ipvacs("AB.TM.NIA01707",">=9","<=25", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01710",">=0.0198","<=0.07", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01713",">=-0.07","<=-0.018", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01722",">=-0.0121","<=-0.0009", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01725",">=-0.066","<=-0.00225", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01728",">=3.20682","<=3.41548", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA01731",">=0.002937","<=0.0429", $sTrace, 120) --
			@su_anaacs("AB.TM.NIA01734",">=4.90432","<=5.21077", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01737",">=-5.22954","<=-4.97319", $sTrace, 120)
			@su_anaacs("AB.TM.NIA01740",">=0.002","<=0.066", $sTrace, 120) --
			
			@su_anaacs("AB.TM.NIA04653",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04654",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04655",">=0","<=110", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04656",">=0","<=0.145", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04657",">=0","<=11.604", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04658",">=0","<=15.211", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04659",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04660",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04661",">=4.9098","<=5.0601", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04662",">=3.26242","<=3.345646", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04663",">=4.91176","<=5.06212", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04664",">=0","<=4095", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04665",">=3.19809","<=3.39591", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04666",">=1.42595","<=1.57815", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04667",">=0","<=4", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04619",">=4.91176","<=5.06212", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04620",">=0","<=4095", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA04621",">=3.19809","<=3.39591", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04622",">=1.42595","<=1.57815", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04623",">=0","<=4", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04624",">=0","<=5", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04625",">=0.0061","<=0.0156", $sTrace, 120) -- error here
			@su_anaacs("AB.TM.NIA04626",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04627",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04628",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04629",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04630",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04631",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04632",">=0","<=0.33", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04633",">=0","<=110", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04634",">=0","<=0.145", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04635",">=0","<=11.604", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04636",">=0","<=15.211", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04637",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04638",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04639",">=4.9098","<=5.0601", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04640",">=3.26242","<=3.345645", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04641",">=4.91176","<=5.06212", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04642",">=0","<=4095", $sTrace, 120)
			
			@su_anaacs("AB.TM.NIA04643",">=3.19809","<=3.39591", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04644",">=1.42595","<=1.57815", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04645",">=0","<=4", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04646",">=0","<=5", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04647",">=0.0061","<=0.0156", $sTrace, 120) -- this is wrong
			@su_anaacs("AB.TM.NIA04648",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04649",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04650",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04651",">=-40","<=80", $sTrace, 120)
			@su_anaacs("AB.TM.NIA04652",">=-40","<=80", $sTrace, 120)
			
		endif

		@SU_SEQPHASE2(2, "Put HIS into standby mode", *$sNumPha, "",  $sTitle)	
		$i_reportflowID := startreportflow("AB.TM.YIA58602")
		@SU_SEND({ AB.TC.ZIA58917 , \
			PIA59011_ := "HVSTDBY"}, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
	
		@RPZA_CATCHTMPCKT($i_reportFlowID, "AB.TM.YIA58602", *$i_RptRefNb)
		stopreportflow $i_reportflowID
		@su_wait(1)

		@SU_SEQPHASE2(2, "Configure HIS no HV sweeping (static output only)", *$sNumPha, "",  $sTitle)	
		@SU_SEND({ AB.TC.ZIA58919 , \
			PIA60356_ := "SW_EN_ANALYZER"  , \
			PIA60352_ := 0 }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
		@su_wait(1)

		@SU_SEQPHASE2(2, "Configure HIS no HV sweeping (static output only)", *$sNumPha, "",  $sTitle)	
		@SU_SEND({ AB.TC.ZIA58919 , \
			PIA60356_ := "SW_EN_TOP_DFL"  , \
			PIA60352_ := 0 }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
		@su_wait(1)

		@SU_SEQPHASE2(2, "Configure HIS no HV sweeping (static output only)", *$sNumPha, "",  $sTitle)	
		@SU_SEND({ AB.TC.ZIA58919 , \
			PIA60356_ := "SW_EN_BOT_DFL"  , \
			PIA60352_ := 0 }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)
		@su_wait(1)

		@SU_SEQPHASE2(2, "Configure HIS no HV sweeping (static output only)", *$sNumPha, "",  $sTitle)	
		@SU_SEND({ AB.TC.ZIA58919 , \
			PIA60356_ := "SW_EN_TOP_PLATE"  , \
			PIA60352_ := 0 }, $sTrace, VER := "ACK_EXEC", TIMEOUT_VER := 60)

end sequence

ROUTINE RSTAT_RET
	main

		ta_print "HIS HV diasable plug not fitted - switch OFF HIS and investigate"
		abort

		return
ENDROUTINE
**