Skip to Content
avatar image
Former Member

System Form 0

Hi,

I have a UDO Form of document type. When I close the form using the close menu , I get a System Form 0 dialog Box with options Yes, No and Cancel to save the record. I have written code for validation, but this code is not executed when I press Yes and the blank record gets saved. Please let me know how to handle the System Form 0 ?

Regards,

Noor Hussain

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

3 Answers

  • avatar image
    Former Member
    Jun 28, 2010 at 01:36 PM

    I did this once before along time ago and I don't remember where the code is, but I believe it works just like any other form. Are you setting the filters for the form & events?

    Also, this form is used all over the place, so you will need to be sure you are only processing that button when it applies to your form and not when it's being displayed on some other system forms.

    Add comment
    10|10000 characters needed characters exceeded

    • Former Member Former Member

      Private Sub SetFilters()

      Try

      '// Create a new EventFilters object

      oFilters = New SAPbouiCOM.EventFilters()

      oFilter = oFilters.Add(SAPbouiCOM.BoEventTypes.et_FORM_LOAD)

      oFilter.AddEx("0")

      .

      .

      .

      SBO_Application.SetFilter(oFilters)

      End Sub

      Protected Sub FormLoadEvents(ByVal FUID As String, ByVal pVal As SAPbouiCOM.ItemEvent)

      Select Case pVal.FormType

      Case "0" ' MESSAGE BOX

      MessageBoxLoadEvents(FUID, pVal)

      End Select

      End Sub

      Protected Sub MessageBoxLoadEvents(ByVal FUID As String, ByVal pVal As SAPbouiCOM.ItemEvent)

      .

      .

      .

      End Sub

      Edited by: Gianluca D'Alessandro on Jun 29, 2010 12:43 PM

      Edited by: Gianluca D'Alessandro on Jun 29, 2010 12:45 PM

  • avatar image
    Former Member
    Jul 02, 2010 at 08:32 AM

    Hi noor_023,

    Dim j As Integer = oApplication.MessageBox("Do you want to Add?", 1, "YES", "NO")
     If j = 1 Then
    ...
    ...
    ...
    End If

    Regards,

    Mahesh

    Edited by: Mahesh on Jul 2, 2010 2:02 PM

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Aug 17, 2010 at 05:58 AM

    Closed

    Add comment
    10|10000 characters needed characters exceeded