Skip to Content
avatar image
Former Member

Service Call Validation

Hi,

  I had created a validation in service call for blocking updation of service call, if  the user is not 'manager'.It's working fine.But I cant see the status bar text.It's just flashing and disappear. Where is the correction needed.Please help.

Private Sub SBO_Application_FormDataEvent(ByRef BusinessObjectInfo As SAPbouiCOM.BusinessObjectInfo, ByRef BubbleEvent As Boolean) Handles SBO_Application.FormDataEvent

        Dim Oform As SAPbouiCOM.Form

        If SBO_Application.Company.UserName = "manager" Then

            Oform = SBO_Application.Forms.Item(BusinessObjectInfo.FormUID)

            If BusinessObjectInfo.FormTypeEx = "60110" And Oform.Mode = BoFormMode.fm_UPDATE_MODE Then

                If BusinessObjectInfo.BeforeAction = True Then

                    BubbleEvent = False '

                    SBO_Application.SetStatusBarMessage("Cant update the ServiceCall",BoMessageTime.bmt_Long,True)

                End If

            End If

        End If

    End Sub

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

4 Answers

  • Best Answer
    Dec 23, 2014 at 09:34 AM

    Hi Rahesh,

    No corrections.

    You can only see your message in the message list.

    Reason is, immediately after your message, SAP System sent out another message that hide your message.

    Regards
    Edy

    Add comment
    10|10000 characters needed characters exceeded

    • Former Member

      Hi Edy,

              But can't see any message in status bar.What is message list?.How can i display my status bar text at top of other message.Please explain.

  • avatar image
    Former Member
    Dec 24, 2014 at 09:46 AM

    Hi Edy,

           I had changed my validation from SBO_Application_FormDataEvent  to SBO_Application_ItemEvent.

    Now its working Fine.Thanks for your support.

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Dec 23, 2014 at 09:16 AM

    hi.

    Can u try this one

            oApplication.StatusBar.SetText("Connecting Contract Order with The Company.......", SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Success)

    or

                        oApplication.StatusBar.SetText("Cant update the ServiceCall",, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error)

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Dec 23, 2014 at 10:18 AM

    try this

      Dim Oform As SAPbouiCOM.Form

            If SBO_Application.Company.UserName = "manager" Then

                Oform = SBO_Application.Forms.Item(BusinessObjectInfo.FormUID)

                If BusinessObjectInfo.FormTypeEx = "60110" And Oform.Mode = BoFormMode.fm_UPDATE_MODE Then

                    If BusinessObjectInfo.BeforeAction = True Then

                        BubbleEvent = False '

                        SBO_Application.SetStatusBarMessage("Cant update the ServiceCall",BoMessageTime.bmt_Long,True)

    EXIT sub

                    End If

                End If

            End If

        End Sub

    Regards,

    prasad

    Add comment
    10|10000 characters needed characters exceeded