Authorization For 'Delete Row' Option in Service Call Expense

[Former Member]

I need to assign permission for 'Delete Row' option in service call-Expense Details for some user's. How can I do the same with Transaction notification or other methods.

[Former Member]

HI,Rahesh
I Think It is possible..
I never Tried  This one  In any live projects
Try below code  do some changes  may be it will work..

You asked  Not entire form  for enable false  the option delete row

So, the form is having so many tabs  we should enable false for only particular tab (matrix only)
and al so particular  user only am i right 
i got the solution form below code..

what you have to do is

you have to do create customization form.like above.

put one matrix in the form load all the users in the matrix  first column
second column put  combo box  Granted , Not granted .

Ok  now see the second image  after press the delete the menu..

-> you have to check  at which tab  they had press the  delete row 

            If (panlstrin.ToString = 5) Then

the above line will tells you which form is enable ok
5 is  expenses  pane enable

if  5  is enable 

again you should check it which user is login in b1
    Dim sname As String = ocompany.UserName
The above line will tells u  which person has login
in code i mention only one person name ok 
in your live you have to check in customizaion form  whether the person is having the

autherizaiton or not  and they you can proceed

Private Sub SBO_Application_MenuEvent(ByRef pVal As SAPbouiCOM.MenuEvent, ByRef BubbleEvent As Boolean) Handles SBO_Application.MenuEvent

        If pVal.BeforeAction = True Then

            Select Case pVal.MenuUID

                Case "1293"

                    oForm = SBO_Application.Forms.GetFormByTypeAndCount("60110", 1)

                    Dim panlstrin = oForm.PaneLevel.ToString()

                    If (panlstrin.ToString = 5) Then

                        Dim sname As String = ocompany.UserName

                        If sname = "HR" Then

                            BubbleEvent = False

                        End If

                    End If

            End Select

        End If

    End Sub