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

added logic to RDS_ACTIONS to restore load signatures if erased unexpectedly

Browse Source 
refactored solution to leverage the LOT and LOT_EVENT tables

minor fix
This commit is contained in:
Infineon\StieberD
2024-11-05 13:35:42 -07:00
parent b84cfb970f
commit 24a246a99b
7 changed files with 287 additions and 40 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
LSL2/STPROC/OBJ_RDS.txt
View File

@ -21,7 +21,7 @@ DECLARE FUNCTION obj_RDS2, obj_RDS_Test, obj_WO_Mat, obj_Clean_Insp, obj_PRS_Pro
DECLARE FUNCTION Logging_Services, Environment_Services, Error_Services, Signature_Services
DECLARE SUBROUTINE Set_Status, Msg, obj_Tables, Send_Dyn, obj_WO_Step, obj_RDS_Layer, obj_RDS_Test, obj_WM_In
DECLARE SUBROUTINE Btree.Extract, RDS_React_Run, Environment_Services, Logging_Services, Error_Services, Send_Info
DECLARE SUBROUTINE SRP_Stopwatch, Database_Services
DECLARE SUBROUTINE SRP_Stopwatch, Database_Services, Lot_Services
$INSERT MSG_EQUATES
$INSERT WO_VERIFY_EQU
@ -264,6 +264,7 @@ Create:
WaferQty = Parms[COL2()+1,@RM]
SubPartNo = Parms[COL2()+1,@RM]
QXJFlag = Parms[COL2()+1,@RM]
SubVendCd = Parms[COL2()+1,@RM]
ErrorMsg = ''
IF WONo = '' THEN ErrorMsg := 'Null Parameter "WONo" passed to routine. (':Method:')'
@ -499,7 +500,8 @@ Create:
Logging_Services('AppendLog', objLog, LoggingDTM : ',' : @USER4 : ',' : RDSNo : ',' : 'Error writing new RDS record. Error code: ':errCode)
Result = ''
END ELSE
Result = RDSNo
Lot_Services('CreateNewLot', 'RDS', '', WaferQty, SubPartNo, LotNo, SubVendCd, @User4, '', RDSNo)
Result = RDSNo
END
* * * * * * *
@ -1471,3 +1473,4 @@ CalcThickTarget:
RETURN