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

Alarm trigger with NICA_ORDERS table

Browse Source 
solution tested and ready for deployment

updated SRP_Git_Services to handle creating local copies of inherited entities

updated HgCV OCAP order trigger to also look for active prove-in orders

moved error services common into sysprog to avoid compilation issues
This commit is contained in:
Infineon\StieberD
2024-12-12 13:24:48 -07:00
parent 3cd56295dc
commit ab8f9d3c24
24 changed files with 3167 additions and 1571 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
LSL2/STPROC/REACTORLOGS_API.txt
View File

@ -44,8 +44,8 @@ $insert HTTP_INSERTS
$insert REACTOR_LOG_EQUATES
$insert OI_WIZARD_EQUATES
Declare function Reactor_Log_Services, OI_Wizard_Services, MemberOf
Declare subroutine Database_Services, Reactor_Log_Services, Override_Log_Services
Declare function Reactor_Log_Services, OI_Wizard_Services, MemberOf, Nica_Orders_Services
Declare subroutine Database_Services, Reactor_Log_Services, Override_Log_Services, Nica_Orders_Services
GoToAPI else
// The specific resource endpoint doesn't have a API handler yet.
@ -185,13 +185,13 @@ API ReactorLogs.ID.nicaOverride.POST
If OverrideComment NE '' then
Override_Log_Services('Create', 'REACTOR_LOG', RLKey, OverrideUser, OverrideComment, 'REACTOR_LOG_PM', '')
If Error_Services('NoError') then
// Cancel all ReactorLog PMs
ActivePMKeys = Xlate('REACTOR_LOG', RLKey, REACTOR_LOG_CHECKLIST_ORDER_ID$, 'X')
If ActivePMKeys NE '' then
For each ActivePMKey in ActivePMKeys using @VM setting vPos
Reactor_Log_Services('CancelReactorLogPMOrder', RLKey, ActivePMKey)
// Cancel all ReactorLog NICA Orders
ActiveRlNicaOrderIds = Nica_Orders_Services('GetActiveOrders', 'REACTOR_LOG', RLKey)
If ActiveRlNicaOrderIds NE '' then
For each ActiveRlNicaOrderId in ActiveRlNicaOrderIds using @VM setting vPos
Nica_Orders_Services('CancelOrder', ActiveRlNicaOrderId)
Until Error_Services('HasError')
Next ActivePMKey
Next ActiveRlNicaOrderId
end
If Error_Services('NoError') then
HTTP_Services('SetResponseStatus', 200, 'Nica orders canceled for REACTOR_LOG "':RLKey:'".')
@ -261,3 +261,4 @@ API reactorlogs.ID.nicaoverride.PUT
end api