sorry I f this is a simple question. I have little skills in VB and am stuck.
I am working in Quoting and want to set the resale based on a target GP. The calculation sets the price, but I can't get it to update the database or screen.
I know the question was asked today for a non bound value. Is this similar to that?
I also tried all of the code in the on leave, but get the same results. The code is below.
Thanks
Greg Payne
Private Sub SetResale()
Dim NewResale as Decimal
Dim CalcUnitCost As Decimal = edvQuoteQty.dataView(edvQuoteQty.Row)("CalcUnitCost")
NewResale = CalcUnitCost / (1 - (numTargetGP.Value / 100))
edvQuoteQty.dataView(edvQuoteQty.Row)("UnitPrice") = math.round(NewResale,3)
oTrans.NotifyAll()
oTrans.RefreshQuoteData()
oTrans.Update()
epiMessageBox.Show("In Set Resale - Resale set to " + Format(NewResale,"C"))
End Sub
Private Sub numTargetGP_Leave(ByVal sender As Object, ByVal args As System.EventArgs)
' ** Place Event Handling Code Here **
SetResale()
epiMessageBox.Show("Return Resale set to " + Format(edvQuoteQty.dataView(edvQuoteQty.Row)("UnitPrice"),"C"))
End Sub
________________________________
CONFIDENTIALITY NOTICE
The information contained in this communication, including attachments, is privileged and confidential. It is intended only for the exclusive use of the addressee. If the reader of this message is not the intended recipient, or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us at 727-578-6280 and immediately delete the communication.
"This (document/presentation) may contain technical data as defined in the International Traffic In Arms Regulations (ITAR) 22 CFR 120.10. Export of this material is restricted by the Arms Export Control Act (22 U.S.C. 2751 et seq.) and may not be exported to foreign persons without prior approval form the U.S. Department of State."
[Non-text portions of this message have been removed]
I am working in Quoting and want to set the resale based on a target GP. The calculation sets the price, but I can't get it to update the database or screen.
I know the question was asked today for a non bound value. Is this similar to that?
I also tried all of the code in the on leave, but get the same results. The code is below.
Thanks
Greg Payne
Private Sub SetResale()
Dim NewResale as Decimal
Dim CalcUnitCost As Decimal = edvQuoteQty.dataView(edvQuoteQty.Row)("CalcUnitCost")
NewResale = CalcUnitCost / (1 - (numTargetGP.Value / 100))
edvQuoteQty.dataView(edvQuoteQty.Row)("UnitPrice") = math.round(NewResale,3)
oTrans.NotifyAll()
oTrans.RefreshQuoteData()
oTrans.Update()
epiMessageBox.Show("In Set Resale - Resale set to " + Format(NewResale,"C"))
End Sub
Private Sub numTargetGP_Leave(ByVal sender As Object, ByVal args As System.EventArgs)
' ** Place Event Handling Code Here **
SetResale()
epiMessageBox.Show("Return Resale set to " + Format(edvQuoteQty.dataView(edvQuoteQty.Row)("UnitPrice"),"C"))
End Sub
________________________________
CONFIDENTIALITY NOTICE
The information contained in this communication, including attachments, is privileged and confidential. It is intended only for the exclusive use of the addressee. If the reader of this message is not the intended recipient, or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us at 727-578-6280 and immediately delete the communication.
"This (document/presentation) may contain technical data as defined in the International Traffic In Arms Regulations (ITAR) 22 CFR 120.10. Export of this material is restricted by the Arms Export Control Act (22 U.S.C. 2751 et seq.) and may not be exported to foreign persons without prior approval form the U.S. Department of State."
[Non-text portions of this message have been removed]