Losing data in fields after a validation

Hi !!

When i update a qty field in my udo i do a validation with a balance field so it dosent go below 0.000 .

CalRslt = (CalQty - (CalCdn + CalUs + CalAdj + CalFin))
            

            If CalRslt < 0 Then
                SBO_Application.StatusBar.SetText("Adjustment Quantity is Higher then Balance", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error)
                f.Items.Item("34").Specific.String = 0
                CalRslt = 0
                f.ActiveItem = "34"
                
            End If

The problem is that after the message in the status bar i lose my values in my fields and even if i retype my data it dosent stay, if i leave the fields it returns blank ????

What should i do ??

Thanks