How to save matrix do user table?

Question

Hi,
I have created on system form matrix as:
                    oNewItem = oOrderForm.Items.Add("a", SAPbouiCOM.BoFormItemTypes.it_MATRIX)
                    oNewItem.Top = 150
                    omatrix1 = oNewItem.Specific
                    oColumns = omatrix1.Columns
                    oColumn = oColumns.Add("#", SAPbouiCOM.BoFormItemTypes.it_EDIT)
                    oColumn.TitleObject.Caption = "#"
                    oColumn.Width = 20
                    oColumn.Editable = False
                    oColumn = oColumns.Add("code", SAPbouiCOM.BoFormItemTypes.it_EDIT)
                    oColumn = oColumns.Add("name", SAPbouiCOM.BoFormItemTypes.it_EDIT)
                    oColumn = oColumns.Add("cesta", SAPbouiCOM.BoFormItemTypes.it_EDIT)
This matrix i have bounded to datasource as:
            oDBDataSource = oOrderForm.DataSources.DBDataSources.Add("@SKIL_ATTACH")
            oConditions = New SAPbouiCOM.Conditions
            oCondition = oConditions.Add
            oCondition.BracketOpenNum = 2
            oCondition.Alias = "U_PATH"
            oCondition.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL
            oCondition.CondVal = "xxx"
            oCondition.BracketCloseNum = 1
            oDBDataSource.Query(oConditions)
            oItem = oOrderForm.Items.Item("a")
            omatrix1 = oItem.Specific
            oColumns = omatrix1.Columns
            oColumn = oColumns.Item("cesta")
            oColumn.DataBind.SetBound(True, "@SKIL_ATTACH", "U_XCESTA1")
            oColumn = oColumns.Item("code")
            oColumn.DataBind.SetBound(True, "@SKIL_ATTACH", "CODE")
            oColumn = oColumns.Item("name")
            oColumn.DataBind.SetBound(True, "@SKIL_ATTACH", "NAME")
            omatrix1.LoadFromDataSource()
The user table has 3 my fields (U_Path, U_xcesta and U_xcesta1) abd 2 fileds (code and name) - this two fields i didnt create, i think that are some system fields?
On the system form everything seems to be ok, I can add rows, modify data, set new data, ... After changing any data in this matrix, the system button will change from OK to Update or Add and after click on this button in status bar is OK, the data was added or updated...
The problem is, that in user table aren`t data modified and there are still old data.
I tried to make update manually as:
                oItem = oOrderForm.Items.Item("a")
                omatrix1 = oItem.Specific
                omatrix1.AddRow(1, 0)
                Dim cell As SAPbouiCOM.Cell
                Dim col As SAPbouiCOM.Column
                Dim ed As SAPbouiCOM.EditText
                col = omatrix1.Columns.Item("code")
                cell = col.Cells.Item(1)
                ed = cell.Specific
                ed.String = CStr("some data")
                omatrix1.Columns.Item("cesta").Editable = True
                omatrix1.Columns.Item("cesta").Cells.Item(1).Click(SAPbouiCOM.BoCellClickType.ct_Double)
                omatrix1.FlushToDataSource()
                omatrix1.AddRow(1, 1)
but nothing happens and data in table are still old. What I`m doing bad? Could anyone help me please?
Please be patient, because Im working with SBO for short time. Thanks!

Answer 1

I solved is through manual updating and inserting to database as"
                    oUserTable = oCompany.UserTables.Item("SKIL_ATTACH")
                    oOrderForm.DataSources.DataTables.Item(0).ExecuteQuery("SELECT coalesce(max(convert(integer, code)),0) as max from dbo.[@SKIL_ATTACH] with(nolock)")
                    oUserTable.UserFields.Fields.Item("U_Popis").Value = "xxxxx"
                    oUserTable.UserFields.Fields.Item("U_PATH").Value = "xxxxx"
                    oUserTable.UserFields.Fields.Item("U_OP").Value = "xxxxx"
                    lRetCode = oUserTable.Add
It works, but I think that it is not the easiest way.