Data source - Invalid table name [66000-7]

Question

Hi,
I created UDO with master table and child table and when I tried to execute on it a dbdatasource query I got this error Data source - Invalid table name [66000-7]. When I tried this query on system table it works perfectly, so I don't know where is the problem (it looks like DBDataSources.Query doesn't work on user tables).
My code:
                oDBDataSources = oForm.DataSources.DBDataSources.Add("@MyTable");
                oConditions = (SAPbouiCOM.Conditions)(SBO_Application.CreateObject(BoCreatableObjectType.cot_Conditions));
                oMatrix = (SAPbouiCOM.Matrix)(oForm.Items.Item("mtx_dzial").Specific);
                oCondition = oConditions.Add();
                oCondition.BracketOpenNum = 1;
                oCondition.Alias = "U_MyDate";
                oCondition.Operation = BoConditionOperation.co_BETWEEN;
                oCondition.CondVal = "2008/10/01";
                oCondition.CondVal = "2008/10/06";
                oCondition.BracketCloseNum = 1;
                oDBDataSources.Query(oConditions);
Regards
Ela

Answer 1

Hi
Look here the working example...
Hope it can help you.
Public Sub SBO_CreateForm()
  Dim oForm As SAPbouiCOM.Form
  Try
    Dim sUniqueID As String = "O99_" & Microsoft.VisualBasic.Format(Now.Millisecond, "0000")
    Dim sFormXmlFile As String = "MY_FORM_FILE.xml"
    ' Search for this function on this forum...
    Call ReplaceUIDandLoadToB1(sFormXmlFile, sUniqueID)
    oForm = SBO_Application.Forms.Item(sUniqueID)
    Call Matrix_SetConditions(oForm)
    oForm.Visible = True
  Catch ex As Exception
    If Not oForm Is Nothing Then
      oForm.Close()
      oForm = Nothing
    End If
  Finally
    System.GC.Collect() 'Release the handle to the table
  End Try
End Sub
Private Sub Matrix_SetConditions(ByRef oForm As SAPbouiCOM.Form)
  Dim oMatrix As SAPbouiCOM.Matrix
  Dim oConditions As SAPbouiCOM.Conditions
  Dim oCondition As SAPbouiCOM.Condition
  Try
    oMatrix = oForm.Items.Item("mtx00").Specific
    If oMatrix Is Nothing Then Throw New Exception("ERROR!...")
    oConditions = SBO_Application.CreateObject(BoCreatableObjectType.cot_Conditions)
    ' ++++++++++++++++++++++++++++++++++++++++++++
    If Not sItem1.Equals("") And Not sItem2.Equals("") Then
     '// AND (P.U_CodItem BETWEEN '" & s1.Trim & "' AND '" & s2.Trim & "')"
     oCondition = oConditions.Add
     oCondition.BracketOpenNum = 1
     oCondition.Alias = "U_CodItem"
     oCondition.Operation = co_BETWEEN
     oCondition.CondVal = sItem1
     oCondition.CondEndVal = sItem2
     oCondition.BracketCloseNum = 1
    Else
     If Not sItem1.Equals("") Then
         '// AND P.U_CodItem = '" & s1.Trim & "'"
         oCondition = oConditions.Add
         oCondition.Alias = "U_CodItem"
         oCondition.Operation = co_EQUAL
         oCondition.CondVal = sItem1.Trim
     End If
     If Not sItem2.Equals("") Then
         '// AND P.U_CodItem = '" & s1.Trim & "'"
         oCondition = oConditions.Add
         oCondition.Alias = "U_CodItem"
         oCondition.Operation = co_EQUAL
         oCondition.CondVal = sItem2.Trim
     End If
    End If
    ' other conditions ....
    '// Execute the query with the conditions collection
    oForm.DataSources.DBDataSources.Item("@O99_MY_TABLE_NAME_HERE").Query(oConditions)
    oMatrix.LoadFromDataSource()
    oMatrix.SelectionMode = BoMatrixSelect.ms_Single
  Catch ex As Exception
    ' log exception here
  Finally
    If Not oConditions Is Nothing Then If oConditions.Count > 0 Then glo_Conditions = oConditions
    System.GC.Collect()
  End Try
End Sub
In the xml file of my form I have added dbdatasource:
        <datasources>
          <dbdatasources>
            <action type="add">
             <datasource tablename="@O99_MY_TABLE_NAME_HERE"/>
            </action>
          </dbdatasources>