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

fixed bug preventing rec rel jobs from posting if vendor code doesn't match expected vendor code

Browse Source
This commit is contained in:
Infineon\StieberD
2025-07-23 09:44:12 -07:00
parent de2e6af5f7
commit b159e1aa27
1 changed files with 16 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
LSL2/STPROC/COMM_DIALOG_WO_SCAN.txt
View File

@ -363,7 +363,8 @@ LQP:
IF VendCode NE ExpectedCode AND ExpectedCode NE '' THEN IF VendCode NE ExpectedCode AND ExpectedCode NE '' THEN
void = Msg(@WINDOW,'','EXPECTED_VENDOR_CODE','',ExpectedCode:@FM:VendCode) void = Msg(@WINDOW,'','EXPECTED_VENDOR_CODE','',ExpectedCode:@FM:VendCode)
Set_Property(CtrlEntID, 'FOCUS', True$) Set_Property(CtrlEntID, 'FOCUS', True$)
END else end
ProcIds = Get_Property(@Window, '@PROC_IDS') ProcIds = Get_Property(@Window, '@PROC_IDS')
ListData = Get_Property(CtrlEntId, 'LIST') ListData = Get_Property(CtrlEntId, 'LIST')
WONo = CheckArray<CA$WO_NO - 1> WONo = CheckArray<CA$WO_NO - 1>
@ -379,7 +380,6 @@ LQP:
ErrorMsg = Error_Services('GetMessage') ErrorMsg = Error_Services('GetMessage')
Msg(@Window, '', 'OK', '', 'Process Error':@FM:'Error submitting scan data to server for processing') Msg(@Window, '', 'OK', '', 'Process Error':@FM:'Error submitting scan data to server for processing')
end end
end
ListArray = Get_Property(CtrlEntId,'ARRAY') ListArray = Get_Property(CtrlEntId,'ARRAY')
CheckArray = Get_Property(@WINDOW,'@CHECK_ARRAY') CheckArray = Get_Property(@WINDOW,'@CHECK_ARRAY')