Merged PR 14213: Added condition to ignore line if the tw lot id is null
Added condition to ignore line if the tw lot id is null
This commit is contained in:
parent
6cfd1324c7
commit
999e11b1b8
@ -243,24 +243,26 @@ Event PUB_SUBMIT.CLICK()
|
|||||||
Quantity = TWRow<1,3>
|
Quantity = TWRow<1,3>
|
||||||
ProdName = TWRow<1,2>
|
ProdName = TWRow<1,2>
|
||||||
TWLot = TWRow<1,1>
|
TWLot = TWRow<1,1>
|
||||||
If Quantity NE '' AND TWLot NE '' then
|
If TWLot NE '' then
|
||||||
if Num(Quantity) then
|
If Quantity NE '' then
|
||||||
Begin Case
|
if Num(Quantity) then
|
||||||
Case Quantity GT 0 AND Quantity LE 25
|
Begin Case
|
||||||
TWLots<1, -1> = TWRow<1,1>
|
Case Quantity GT 0 AND Quantity LE 25
|
||||||
TWLotQtys<1, -1> = TWRow<1,3>
|
TWLots<1, -1> = TWRow<1,1>
|
||||||
Case Quantity GT 25
|
TWLotQtys<1, -1> = TWRow<1,3>
|
||||||
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' must be less than 25.' : CRLF$
|
Case Quantity GT 25
|
||||||
Case Quantity LE 0
|
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' must be less than 25.' : CRLF$
|
||||||
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' must be greater than 0.' : CRLF$
|
Case Quantity LE 0
|
||||||
Case Otherwise$
|
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' must be greater than 0.' : CRLF$
|
||||||
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' is invalid.' : CRLF$
|
Case Otherwise$
|
||||||
End Case
|
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' is invalid.' : CRLF$
|
||||||
end else
|
End Case
|
||||||
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' must be a number' : CRLF$
|
end else
|
||||||
end
|
NotReadyReason := 'Quantity value for test wafer lot ' : TWLot : ' must be a number' : CRLF$
|
||||||
end else
|
end
|
||||||
NotReadyReason := 'A quantity of test wafers used is required for test wafer lot ' : TWLot : CRLF$
|
end else
|
||||||
|
NotReadyReason := 'A quantity of test wafers used is required for test wafer lot ' : TWLot : CRLF$
|
||||||
|
end
|
||||||
end
|
end
|
||||||
Next TWRow
|
Next TWRow
|
||||||
If NotReadyReason EQ '' then
|
If NotReadyReason EQ '' then
|
||||||
@ -336,3 +338,4 @@ return
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user