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

Refactored verify barcode logic to work for WM_IN lots. Fixed a bug in CLEAN_INSP_ACTIONS causing all WM_OUT tencor scans to have a failed ROTR result.

Browse Source
This commit is contained in:
Infineon\StieberD
2025-11-13 17:21:35 -07:00
parent 6067d14419
commit 2d58c47c93
3 changed files with 33 additions and 139 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
LSL2/STPROC/NDW_VERIFY_BARCODE_EVENTS.txt
View File

@ -85,12 +85,7 @@ Event EDL_CASS_SCAN_1.LOSTFOCUS(Flag, FocusID)
ExpectedLot = Get_Property(@Window:'.EDL_LOT_ID', 'TEXT')
OperatorID = @User4
If ScanData NE '' then
If Parent EQ 'WM_IN' then
ScanData = NCR_Services('ProcessScanData', ScanData, 'WM_IN_1', ExpectedLot, OperatorID)
end else
ScanData = NCR_Services('ProcessScanData', ScanData, 'CASSETTE_1', ExpectedLot, OperatorID)
End
ScanData = NCR_Services('ProcessScanData', ScanData, 'CASSETTE_1', ExpectedLot, OperatorID)
If Error_Services('NoError') then
Set_Property(CtrlEntID, 'TEXT', ScanData)
Set_Property(@Window:'.EDL_CASS_SCAN_2', 'ENABLED', True$)
@ -118,12 +113,7 @@ Event EDL_CASS_SCAN_2.LOSTFOCUS(Flag, FocusID)
If ScanData NE '' then
FirstCassID = Get_Property(@Window:'.EDL_CASS_SCAN_1', 'TEXT')
OperatorID = @User4
If Parent EQ 'WM_IN' then
ScanData = NCR_Services('ProcessScanData', ScanData, 'WM_IN_2', FirstCassID, OperatorID)
end else
ScanData = NCR_Services('ProcessScanData', ScanData, 'CASSETTE_2', FirstCassID, OperatorID)
End
ScanData = NCR_Services('ProcessScanData', ScanData, 'CASSETTE_2', FirstCassID, OperatorID)
If Error_Services('NoError') then
Set_Property(CtrlEntID, 'TEXT', ScanData)
SuccessMessage = 'NCR verification complete!'
@ -198,4 +188,3 @@ GetLotID:
return