Adding dbDataSources to Deliveries Form

Question

Hi!, i have one question: am trying to add a dbDataSource to the Deliveries Form (FormUID 140), this dbDS refers to a user table that i have created (@SERIES), the problem is that when i run the program and switch to find mode, the SBO crashes... is this a bug? the A/R Invoices form works ok with this, this is my code:
Private Sub applic_ItemEvent(ByVal FormUID As String, pVal As SAPbouiCOM.IItemEvent, BubbleEvent As Boolean)
    Dim oFrm As SAPbouiCOM.Form
    Dim oDBDataSource As SAPbouiCOM.DBDataSource
    If pVal.FormType = 140 And pVal.EventType = et_FORM_LOAD Then
        Set oFrm = applic.Forms.Item(FormUID)
        oFrm.DataSources.DBDataSources.Add ("@SERIES")
        Set oDBDataSource = oFrm.DataSources.DBDataSources.Item("@SERIES")
    End If
End Sub
Thanks

Answer 1

Hi,
I think, there's problem with getting the form object. Try this:
Set oFrm = applic.Forms.GetFormByTypeAndCount(140, 1)
Best regards,
Mark