Smoke Control Programs
5-34 Infinity Smoke Control Guide
TOC
‘Latch Self-Test Failures
If FL2SADmp.Fail then FL2SADmp.ST.Fail = On
If FL2RADmp.Fail then FL2RADmp.ST.Fail = On
If FL3SADmp.Fail then FL3SADmp.ST.Fail = On
If FL3RADmp.Fail then FL3RADmp.ST.Fail = On
If FL4SADmp.Fail then FL4SADmp.ST.Fail = On
If FL4RADmp.Fail then FL4RADmp.ST.Fail = On
Ctlr3Check:
‘ Test AHU3 Plant.
Print chr(7), “ **** SELF TESTING DEDICATED SMOKE
CONTROL SYSTEM - AHU3. **** “ to COMM3 StatusBar
StartFans3:
AHU3 DefaultFanPosn = On
WaitForFans3St:
‘ Wait for max fan plant time + 5 Secs to detect fault.
If TS < (MaxFanTime + 5) then Goto WaitForFans3St
‘Latch Self-Test Failures
If AH3Sfan.Fail then AH3Sfan.ST.Fail = On
StopFans3:
AHU3 DefaultFanPosn = Off
WaitForFans3Sp:
‘ Wait for max fan plant time + 5 Secs to detect fault.
If TS < (MaxFanTime + 5) then Goto WaitForFans3Sp
‘Latch Self-Test Failures
If AH3Sfan.Fail then AH3Sfan.ST.Fail = On
Set_Status4:
Status4 = Off
If AH3Sfan.ST.Fail then Status4 = On
If FL2SADmp.ST.Fail then Status4 = On
If FL2RADmp.ST.Fail then Status4 = On
If FL3SADmp.ST.Fail then Status4 = On
If FL3RADmp.ST.Fail then Status4 = On
If FL4SADmp.ST.Fail then Status4 = On
If FL4RADmp.ST.Fail then Status4 = On
TestComplete:
Print “ Weekly Self Test Complete “, Time
Technical Manuals Online! - http://www.tech-man.com