phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ordered asm and asm+ reactors

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
LSL2/STPROC/NDW_WAFER_COUNTS_EVENTS.txt
View File

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

10
LSL2/STPROC/TEST_DANIEL3.txt
View File

@ -95,9 +95,14 @@ $Insert PS_EQUATES
Main: Main:
* Messaging_Services('SendMessage', 'RunProcedure', 'Request', '', 'All', 'RTP27,REACTOR_SERVICES', '', '', '') * Messaging_Services('SendMessage', 'RunProcedure', 'Request', '', 'All', 'RTP27,REACTOR_SERVICES', '', '', '')
debug debug
ASMList = Reactor_Services('GetReactorNumbers', 'ASM')
ASMList := @FM : Reactor_Services('GetReactorNumbers', 'ASM+')
ASMList = SRP_Array('SortSimpleList', ASMList, 'AscendingNumbers', @FM)
* LoadInstAckReq = Xlate('RDS', 646209, 'LOAD_INST_ACK_REQ', 'X') * LoadInstAckReq = Xlate('RDS', 646209, 'LOAD_INST_ACK_REQ', 'X')
DefPrinter = Get_Printer( "CURRENTDEVICE") * DefPrinter = Get_Printer( "CURRENTDEVICE")
Printers = Get_Printer( "DEVICES" ) * Printers = Get_Printer( "DEVICES" )
* SelPrinter = Printer_Select() * SelPrinter = Printer_Select()
* Stage = Rds_Services('GetCurrentStage', 646209) * Stage = Rds_Services('GetCurrentStage', 646209)
@ -4300,3 +4305,4 @@ return
* return * return
* *