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 *
****************************************************************************
CassetteQty = XLATE('WO_MAT', WOMatKey, 'WAFER_QTY', 'X')
WMOKey = WONo:'*':WOStep:'*':CassNo
NCRNos = Xlate('WM_OUT', WMOKey, 'SLOT_NCR', 'X')
RejectedQty = 0
CassetteQty = XLATE('WO_MAT', WOMatKey, 'WAFER_QTY', 'X')
CurrWfrCount = Xlate('WM_OUT', WMOKey, 'WAFER_CNT', 'X')
If CurrWfrCount EQ '' then CurrWfrCount = 0
WMOKey = WONo:'*':WOStep:'*':CassNo
NCRNos = Xlate('WM_OUT', WMOKey, 'SLOT_NCR', 'X')
RejectedQty = 0
If NCRNos NE '' then
For each NCRNo in NCRNos using @VM
RejectedQty += (NCRNo NE '')
Next NCRNo
end
IF (RejectedQty GE CassetteQty) THEN
If ( (CurrWfrCount EQ 0) and (RejectedQty GE CassetteQty) ) then
// Full box reject
*****************************
@ -756,3 +758,4 @@ LogRecord:
return