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:
Ouellette Jonathan (CSC FI SPS MESLEO) 2025-04-01 18:14:24 +02:00
parent 6cfd1324c7
commit 999e11b1b8

View File

@ -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