Skip to Content
0
Jun 13, 2009 at 01:55 PM

Opening error

31 Views

Dear Experts,

I can't open the sales invoice if using an add on created by VB6 in SBO 2007. It is okay in the previous version (2004 or 2005).

Here is the part of the source code I suspect is the cause but I am confusing how to resolve it:

...
'Form AR Invoice process
Public Sub Process_133(ByVal FormUID As String, pVal As SAPbouiCOM.ItemEvent, BubbleEvent As Boolean)
 'Form A/R Invoice process
  'hide Sales Quotation and Sales Order
    If pVal.EventType = et_FORM_ACTIVATE Then
       Set oForm = SboApplication.Forms(pVal.FormUID)
       'hide sales order 
       Set oItem = oForm.Items.Item("36")
       oItem.Visible = False
       'hide sales quotation 
       Set oItem = oForm.Items.Item("37")
       oItem.Visible = False
    End If
    If pVal.EventType = et_FORM_LOAD Then
         If pVal.Before_Action = True Then
                Set oForm = SboApplication.Forms(pVal.FormUID)
                'hide sales order 
                Set oItem = oForm.Items.Item("36")
                oItem.Visible = False
                'hide sales quotation 
                Set oItem = oForm.Items.Item("37")
                oItem.Visible = False
                BubbleEvent = False
         End If

...

Pls give help. I appreciate your answer so much.

Rgd,

Steve