fixed epp full box reject trigger

This commit is contained in:
Infineon\StieberD 2024-09-19 17:28:00 -07:00
parent 1bd10cffad
commit b0b127cd87

View File

@ -322,17 +322,19 @@ WRITE_RECORD:
* Verify the need to "Auto-Sign" the box after returning from the NCR form * * Verify the need to "Auto-Sign" the box after returning from the NCR form *
**************************************************************************** ****************************************************************************
CassetteQty = XLATE('WO_MAT', WOMatKey, 'WAFER_QTY', 'X') CassetteQty = XLATE('WO_MAT', WOMatKey, 'WAFER_QTY', 'X')
WMOKey = WONo:'*':WOStep:'*':CassNo CurrWfrCount = Xlate('WM_OUT', WMOKey, 'WAFER_CNT', 'X')
NCRNos = Xlate('WM_OUT', WMOKey, 'SLOT_NCR', 'X') If CurrWfrCount EQ '' then CurrWfrCount = 0
RejectedQty = 0 WMOKey = WONo:'*':WOStep:'*':CassNo
NCRNos = Xlate('WM_OUT', WMOKey, 'SLOT_NCR', 'X')
RejectedQty = 0
If NCRNos NE '' then If NCRNos NE '' then
For each NCRNo in NCRNos using @VM For each NCRNo in NCRNos using @VM
RejectedQty += (NCRNo NE '') RejectedQty += (NCRNo NE '')
Next NCRNo Next NCRNo
end end
IF (RejectedQty GE CassetteQty) THEN If ( (CurrWfrCount EQ 0) and (RejectedQty GE CassetteQty) ) then
// Full box reject // Full box reject
***************************** *****************************
@ -756,3 +758,4 @@ LogRecord:
return return