ordered asm and asm+ reactors

This commit is contained in:
Infineon\StieberD
2024-09-09 17:06:26 -07:00
parent f41a7500ba
commit 7c8238eaf3
2 changed files with 17 additions and 8 deletions

View File

@ -1,9 +1,11 @@
Compile function NDW_WAFER_COUNTS_EVENTS(CtrlEntId, Event, @PARAMS)
#pragma precomp SRP_PreCompiler
#window NDW_WAFER_COUNTS
Declare function Reactor_Services, Database_Services, Get_Property, Error_Services, Environment_Services, Logging_Services
Declare function Reactor_Services, Database_Services, Get_Property, Error_Services, Environment_Services
Declare function SRP_Array, Logging_Services
Declare subroutine Set_Property, Logging_Services
$Insert EVENT_SETUP
$Insert APP_INSERTS
$Insert REACTOR_EQUATES
@ -89,8 +91,9 @@ GetReactorMetrics:
EPPData = ''
//Get ASM Reactors
ASMList = Reactor_Services('GetReactorNumbers', 'ASM')
ASMList := @FM : Reactor_Services('GetReactorNumbers', 'ASM+')
ASMList = Reactor_Services('GetReactorNumbers', 'ASM')
ASMList := @FM : Reactor_Services('GetReactorNumbers', 'ASM+')
ASMList = SRP_Array('SortSimpleList', ASMList, 'AscendingNumbers', @FM)
//Get HTR Reactors
HTRList = Reactor_Services('GetReactorNumbers', 'HTR')
@ -110,7 +113,7 @@ GetReactorMetrics:
ASMData<rPos, DATA_ASM_ARM_CNT$> = MetricData<1, DATA_ASM_ARM_CNT$>
end else
ErrorMessage = Error_Services('GetMessage')
LogData = Logging DTM : @FM : ErrorMessage
LogData = LoggingDTM : @FM : ErrorMessage
Logging_Services('AppendLog', objLog, LogData, @RM, @FM, False$)
end
Next reactor
@ -128,7 +131,7 @@ GetReactorMetrics:
HTRData<rPos, DATA_HTR_ARM_CNT$> = MetricData<1, DATA_HTR_ARM_CNT$>
end else
ErrorMessage = Error_Services('GetMessage')
LogData = Logging DTM : @FM : ErrorMessage
LogData = LoggingDTM : @FM : ErrorMessage
Logging_Services('AppendLog', objLog, LogData, @RM, @FM, False$)
end
@ -148,7 +151,7 @@ GetReactorMetrics:
EPPData<rPos, DATA_EPP_LOWER_QUARTZ_THK$> = MetricData<1, DATA_EPP_LOWER_QUARTZ_THK$>
end else
ErrorMessage = Error_Services('GetMessage')
LogData = Logging DTM : @FM : ErrorMessage
LogData = LoggingDTM : @FM : ErrorMessage
Logging_Services('AppendLog', objLog, LogData, @RM, @FM, False$)
end
Next reactor