>LPARAMETERS nColIndex > >WITH THISFORM > WITH .grdStocks > > DO CASE > CASE nColIndex = 4 > .COLUMNS(4).txtNewQty.VALUE = .COLUMNS(4).txtNewQty.VALUE > .COLUMNS(5).txtAdj.VALUE = .COLUMNS(4).txtNewQty.VALUE - .COLUMNS(3).txtQty.VALUE > CASE nColIndex = 5 > messagebox(str(.COLUMNS(3).txtQty.VALUE)) && VFP Show me the wrong value > .COLUMNS(5).txtAdj.VALUE = .COLUMNS(5).txtAdj.VALUE > .COLUMNS(4).txtNewQty.VALUE = .COLUMNS(3).txtQty.VALUE + .COLUMNS(5).txtAdj.VALUE > ENDCASE > > ENDWITH >ENDWITH > >>