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

Finished development on requiring TW Entry on metrology frequency for scan app logging

Browse Source
This commit is contained in:
Infineon\Ouellette 2025-01-10 14:36:00 -07:00
parent 63bded8bb1
commit 75f6d207c6
2 changed files with 111 additions and 94 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
LSL2/STPROC/RDS_SERVICES.txt
View File

@ -756,6 +756,10 @@ Service IsTWLoggingReqd(RDSNo)
end else end else
Response = True$ Response = True$
end end
TWTrackingSystemActive = Database_Services('ReadDataColumn', 'APP_INFO', 'NEW_TW_SYSTEM_ACTIVE_SWITCH', 1, True$, 0, False$)
If TWTrackingSystemActive EQ False$ then
Response = False$
end
end service end service
//---------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------

15
LSL2/STPROC/SCAN_SERVICES.txt
View File

@ -666,6 +666,7 @@ Service ProcessScanData(ScanID, ScanJSON)
CassNo = RDSRec<RDS_CASS_NO$> CassNo = RDSRec<RDS_CASS_NO$>
CurrStatus = obj_WO_Mat('CurrStatus', WONo:'*':CassNo) CurrStatus = obj_WO_Mat('CurrStatus', WONo:'*':CassNo)
// RDS Format // RDS Format
IsEpiPro = RDS_Services('IsEpiPro', CassetteID) IsEpiPro = RDS_Services('IsEpiPro', CassetteID)
If IsEpiPro EQ False$ then If IsEpiPro EQ False$ then
@ -891,6 +892,10 @@ Service ProcessScanData(ScanID, ScanJSON)
LSParmsComp = Xlate('RDS', RDSNo, 'LS_PARMS_COMP', 'X') LSParmsComp = Xlate('RDS', RDSNo, 'LS_PARMS_COMP', 'X')
FirstParmsComp = LSParmsComp<1,1> FirstParmsComp = LSParmsComp<1,1>
If (FirstParmsComp EQ False$) then RDS_Services('CopyRDSLayerParameters', RDSNo) If (FirstParmsComp EQ False$) then RDS_Services('CopyRDSLayerParameters', RDSNo)
//Test Wafer logging verification
IsTWLoggingReqd = RDS_Services('IsTWLoggingReqd', RDSNo)
If IsTWLoggingReqd EQ True$ AND TestWaferLotData NE '' then
// Supplier lot verification // Supplier lot verification
ScannedSuppLot = ScansRow<SCANS.SUPPLIER_LOT$> ScannedSuppLot = ScansRow<SCANS.SUPPLIER_LOT$>
RDSSuppLot = RDSRec<RDS_LOT_NUM$> RDSSuppLot = RDSRec<RDS_LOT_NUM$>
@ -948,7 +953,9 @@ Service ProcessScanData(ScanID, ScanJSON)
end else end else
Scan_Services('AddNotAcceptableReason', 'Supplier lot scan required in order to complete a tool scan.') Scan_Services('AddNotAcceptableReason', 'Supplier lot scan required in order to complete a tool scan.')
end end
end else
Scan_Services('AddNotAcceptableReason', 'Test wafers are required to be logged with this run.')
end
end else end else
Error_Services('Add', '(':CassetteID:') The first run must be completed using the OpenInsight user interface.') Error_Services('Add', '(':CassetteID:') The first run must be completed using the OpenInsight user interface.')
end end
@ -957,6 +964,8 @@ Service ProcessScanData(ScanID, ScanJSON)
end end
Case CurrStage _EQC 'LOAD' Case CurrStage _EQC 'LOAD'
Action = 'LOAD' Action = 'LOAD'
IsTWLoggingReqd = RDS_Services('IsTWLoggingReqd', RDSNo)
If IsTWLoggingReqd EQ True$ AND TestWaferLotData NE '' then
ScannedSuppLot = ScansRow<SCANS.SUPPLIER_LOT$> ScannedSuppLot = ScansRow<SCANS.SUPPLIER_LOT$>
RDSSuppLot = RDSRec<RDS_LOT_NUM$> RDSSuppLot = RDSRec<RDS_LOT_NUM$>
If (ScannedSuppLot NE '') then If (ScannedSuppLot NE '') then
@ -1020,6 +1029,9 @@ Service ProcessScanData(ScanID, ScanJSON)
end else end else
Scan_Services('AddNotAcceptableReason', 'Supplier lot scan required in order to complete a tool scan.') Scan_Services('AddNotAcceptableReason', 'Supplier lot scan required in order to complete a tool scan.')
end end
end else
Scan_Services('AddNotAcceptableReason', 'Test wafers are required to be logged with this run.')
end
Case CurrStage _EQC 'UNLOAD' Case CurrStage _EQC 'UNLOAD'
Action = 'UNLOAD' Action = 'UNLOAD'
@ -2242,3 +2254,4 @@ ClearCursors:
return return