userexit

Former Member — Tue, 01 Apr 2008 08:27:26 GMT

hi guyz,

i wanna debug the user exit...i put a break point break <username>..but its not stopping at the breakpoint...am i missing smthing there...plz advise..

my userexit : saplzccci

transaction : /nbp

plz help me

Re: userexit

Former Member — Tue, 01 Apr 2008 08:29:58 GMT

Hi,

First of all u have to activate the user exit in tcode

cmod

smod

Regards,

V.Balaji

Reward if Usefull...

Re: userexit

Former Member — Tue, 01 Apr 2008 08:33:43 GMT

ho balu,

thanks for ur reply..cud u plz tell me how to do that...

regards

Re: userexit

Former Member — Fri, 04 Apr 2008 08:29:38 GMT

*&---------------------------------------------------------------------*
*& Report  ZVBUSEREXIT                                                 *
*&                                                                     *
*&---------------------------------------------------------------------*
*&                                                                     *
*&                                                                     *
*&---------------------------------------------------------------------*

report  zvbuserexit .

tables : tstc, "SAP Transaction Codes
         tadir, "Directory of Repository Objects
         modsapt, "SAP Enhancements - Short Texts
         modact, "Modifications
         trdir, "System table TRDIR
         tfdir, "Function Module
         enlfdir, "Additional Attributes for Function Modules
         tstct. "Transaction Code Texts
*&---------------------------------------------------------------------*
*& Variables
*&---------------------------------------------------------------------*
data : jtab like tadir occurs 0 with header line.
data : field1(30).
data : v_devclass like tadir-devclass.
*&---------------------------------------------------------------------*
*& Selection Screen Parameters
*&---------------------------------------------------------------------*
selection-screen begin of block a01 with frame title text-001.
selection-screen skip.
parameters : p_tcode like tstc-tcode obligatory.
selection-screen skip.
selection-screen end of block a01.
*&---------------------------------------------------------------------*
*& Start of main program
*&---------------------------------------------------------------------*
start-of-selection.

* Validate Transaction Code
  select single * from tstc where tcode eq p_tcode.
* Find Repository Objects for transaction code

  if sy-subrc eq 0.
    select single * from tadir where pgmid = 'R3TR'
                                 and object = 'PROG'
                                 and obj_name = tstc-pgmna.

    move : tadir-devclass to v_devclass.

    if sy-subrc ne 0.

      select single * from trdir where name = tstc-pgmna.

      if trdir-subc eq 'F'.
        select single * from tfdir where pname = tstc-pgmna.

        select single * from enlfdir where funcname = tfdir-funcname.

        select single * from tadir where pgmid = 'R3TR'
                                     and object = 'FUGR'
                                     and obj_name = enlfdir-area.
        move : tadir-devclass to v_devclass.
      endif.
    endif.

* Find SAP Modifactions
    select * from tadir into table jtab where pgmid = 'R3TR'
                                          and object = 'SMOD'
                                          and devclass = v_devclass.
    select single * from tstct where sprsl eq sy-langu
                                 and tcode eq p_tcode.
    format color col_positive intensified off.
    write:/(19) 'Transaction Code - ',
    20(20) p_tcode,
    45(50) tstct-ttext.
    skip.
    if not jtab[] is initial.
      write:/(95) sy-uline.
      format color col_heading intensified on.
      write:/1 sy-vline,
      2 'Exit Name',
      21 sy-vline ,
      22 'Description',
      95 sy-vline.
      write:/(95) sy-uline.

      loop at jtab.
        select single * from modsapt where sprsl = sy-langu and
                                           name = jtab-obj_name.

        format color col_normal intensified off.
        write:/1 sy-vline,
        2 jtab-obj_name hotspot on,
        21 sy-vline ,
        22 modsapt-modtext,
        95 sy-vline.
      endloop.
      write:/(95) sy-uline.
      describe table jtab.
      skip.
      format color col_total intensified on.
      write:/ 'No of Exits:' , sy-tfill.
    else.
      format color col_negative intensified on.
      write:/(95) 'No User Exit exists'.
    endif.
  else.
    format color col_negative intensified on.
    write:/(95) 'Transaction Code Does Not Exist'.
  endif.
* Take the user to SMOD for the Exit that was selected.
at line-selection.

  get cursor field field1.
  check field1(4) eq 'JTAB'.
  set parameter id 'MON' field sy-lisel+1(10).
  call transaction 'SMOD' and skip first screen.

ctrl+paste the code in se38 activate and execute

enter the tcode and execute to get the exits available

then use the tcode smod,cmod

reward if usefull

topic Re: userexit in Application Development and Automation Discussions

userexit

Re: userexit

Re: userexit

Re: userexit