Identified possible OI10 related bug where tabbing out of edit table creates an extra blank row. Also identified existing bugs that would allow user to enter non numeric values in a numeric only field. Put checking for that value in the commuter module.

This commit is contained in:
Infineon\Ouellette 2024-09-11 14:53:38 -07:00
parent 5fdcfdafb4
commit d4c3b2aeab

View File

@ -176,12 +176,26 @@ Event PUB_SUBMIT.CLICK()
ProdID = '' ProdID = ''
Quantity = TWRow<1,2> Quantity = TWRow<1,2>
ProdName = TWRow<1,1> ProdName = TWRow<1,1>
If Quantity NE '' AND ProdName NE '' then
if Num(Quantity) AND Quantity GT 0 then
Locate ProdName in TWProdOpts<2> setting tPos then Locate ProdName in TWProdOpts<2> setting tPos then
ProdID = TWProdOpts<1, tPos> ProdID = TWProdOpts<1, tPos>
ProdUsages<-1> = ProdID : @VM : Quantity ProdUsages<-1> = ProdID : @VM : Quantity
end else end else
NotReadyReason := 'Invalid Product ID ' : ProdName : ' selected.' : CRLF$ NotReadyReason := 'Invalid Product ID ' : ProdName : ' selected.' : CRLF$
end end
end else
NotReadyReason := 'Quantity for Product ID ' : ProdName : ' was not a number or was a negative number.' : CRLF$
end
end else
Begin Case
Case Quantity NE ''
NotReadyReason := 'Prod. not selected..' : CRLF$
Case ProdName NE ''
NotReadyReason := 'Qty for ' : ProdName : ' is blank' : CRLF$
End Case
end
Next TWRow Next TWRow
If NotReadyReason EQ '' then If NotReadyReason EQ '' then