We are on Vantage 8.03.408a Progress.
I have a customization on the Order Entry form that creates an EpiDataView for the ShipTo Record on the header of the form. Here is the code I am using:
edvShipTo = New EpiDataView
edvShipTo.dataView = New DataView(ShipToAdapter.ShipToData.ShipTo)
edvShipTo.AddEnabled = True
edvShipTo.AddText = "New ShipTo"
edvShipTo.AddEnabled = False
IF (oTrans.EpiDataViews.Contains("ShipTo")=False) Then oTrans.Add("ShipTo", edvShipTo)
' Set the parent view / keys for child view
Dim parentKeyFields(2) As String
Dim childKeyFields(2) As String
Dim Moreages As Boolean
Dim opts As New SearchOptions(SearchMode.AutoSearch)
opts.DataSetMode = DataSetMode.RowsDataSet
parentKeyFields(0) = "Company"
childKeyFields(0) = "Company"
parentKeyFields(1) = "CustNum"
childKeyFields(1) = "CustNum"
parentKeyFields(2) = "ShipToNum"
childKeyFields(2) = "ShipToNum"
edvShipTo.SetParentView(edvOrderHed, parentKeyFields, childKeyFields) oTrans.PrimaryAdapter.GetCurrentDataSet(Epicor.Mfg.UI.Searches.DataSetMode.RowsDataSet).Tables.Add(edvShipTo.dataView.Table.Clone())
I use this line of code to update the ShipTo Data:
ShipToAdapter.GetByID(view.dataView(Args.Row)("CustNum"), view.dataView(Args.Row)("ShipToNum"))
All this works great. When I call up a Sales Order, all the custom fields I have linked to the datasource ShipTo are updated. The problem is if I want to change the value in any of these fields, it doesn't update the ShipTo table when the Order is saved. In fact, the ShipTo Table in the oTrans CurrentDataSet has no rows in it at all.
What is the best way for me to update the ShipTo table when data is changed in edvShipTo EpiDataView?
Steven G.