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

Removed MFS write pre block if runtime exceeds three days. Business stated it is not needed.

Browse Source
This commit is contained in:
Infineon\StieberD
2025-10-22 10:40:51 -07:00
parent 52b3b20b4e
commit 374e5c2b51
1 changed files with 1 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

47
LSL2/STPROC/RDS_ACTIONS.txt
View File

@ -64,7 +64,7 @@ $Insert IFX_EQUATES
Equ COMMA$ to ',' Equ COMMA$ to ','
Declare function Error_Services, Database_Services, obj_RDS_Test, Logging_Services, Environment_Services Declare function Error_Services, Database_Services, obj_RDS_Test, Logging_Services, Environment_Services
Declare function Tool_Parms_Services, Signature_Services, obj_WO_Mat_QA, Datetime, Override_Services Declare function Tool_Parms_Services, Signature_Services, obj_WO_Mat_QA, Datetime
Declare function Rds_Services, SRP_DateTime, SRP_Math, obj_WO_Mat, Lot_Services, SRP_Array Declare function Rds_Services, SRP_DateTime, SRP_Math, obj_WO_Mat, Lot_Services, SRP_Array
Declare function Lot_Event_Services, GetTickCount, Work_Order_Services Declare function Lot_Event_Services, GetTickCount, Work_Order_Services
Declare subroutine Error_Services, Database_Services, Logging_Services, Service_Services, obj_WO_React Declare subroutine Error_Services, Database_Services, Logging_Services, Service_Services, obj_WO_React
@ -740,35 +740,6 @@ WRITE_RECORD_PRE:
end end
end end
Begin Case
Case LoadDTM NE '' and UnloadDTM EQ '' and UnloadEx1DTM EQ ''
// Cassette still running...
Runtime = 0
Case LoadEx2DTM NE '' and UnloadEx2DTM EQ ''
// Cassette still running...
Runtime = 0
Case LoadEx3DTM NE '' and UnloadDTM EQ ''
// Cassette still running...
Runtime = 0
Case UnloadDTM NE '' and LoadEx3DTM EQ ''
// No extra load/unload (typical path)
Runtime = UnloadDTM - LoadDTM
Case UnloadDTM NE '' and LoadEx3DTM NE ''
// Three extra load/unloads
RunTime = UnloadDTM - LoadEx3DTM
Case UnloadEx2DTM NE ''
// Two extra load/unloads
Runtime = UnloadEx2DTM - LoadEx2DTM
Case UnloadEx1DTM NE ''
// One extra load/unload
Runtime = UnloadEx1DTM - LoadDTM
Case Otherwise$
Runtime = 0
End Case
// Look for UNLOAD_DTM override
Override = Override_Services('GetOverride', 'RDS', RDSNo, 'UNLOAD_DTM')
Begin Case Begin Case
Case ( (OrigTimeOutSig NE '') and (OrigReactor NE NewReactor) ) Case ( (OrigTimeOutSig NE '') and (OrigReactor NE NewReactor) )
@ -824,21 +795,6 @@ WRITE_RECORD_PRE:
Record = '' Record = ''
ActionFlow = ACTION_STOP$ ActionFlow = ACTION_STOP$
Case ( (RunTime GT 3) and (Override EQ False$) )
RDSKeyID = Name
LogData = ''
LogData<1> = LoggingDTM
LogData<2> = @USER4
LogData<3> = RDSKeyID
LogData<4> = 'Cassette runtime exceeds three days!'
Logging_Services('AppendLog', ObjLog, LogData, @RM, @FM, False$)
ErrorMsg = 'Cassette runtime exceeds three days!'
OrigFileError = 104:': Cassette runtime exceeds three days!'
Status = 0
Record = ''
ActionFlow = ACTION_STOP$
Case Otherwise$ Case Otherwise$
SaveRecord = Record SaveRecord = Record
@ -1023,4 +979,3 @@ Restore_System_Variables:
return return