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,7 +243,8 @@ Event PUB_SUBMIT.CLICK()
Quantity = TWRow<1,3>
ProdName = TWRow<1,2>
TWLot = TWRow<1,1>
If Quantity NE '' AND TWLot NE '' then
If TWLot NE '' then
If Quantity NE '' then
if Num(Quantity) then
Begin Case
Case Quantity GT 0 AND Quantity LE 25
@ -262,6 +263,7 @@ Event PUB_SUBMIT.CLICK()
end else
NotReadyReason := 'A quantity of test wafers used is required for test wafer lot ' : TWLot : CRLF$
end
end
Next TWRow
If NotReadyReason EQ '' then
TRWaferKey = Test_Run_Services('CreateTestRunRecord', SelRunTypeID, SelEquipType, EquipmentID, RelatedPSN, RelatedRDS, @User4, TWLots, TWLotQtys)
@ -336,3 +338,4 @@ return