Skip to Content
author's profile photo
Former Member

user exit for 'vf11' and 'vf01'

I want to find an user exit which provide me to update some customer table whcih we have been created when create invoice using tcode 'VF01'

or invoice cancellation using tcode 'VF11' .

now i find one user exit 'SDVFX008',this user exit can realize in using 'VF01' to make datas of table 'VBRP' to our customer table, but can't realize in tcode 'vf11'

so i use business transaction events in TCODE FIBF

event 00501010 Invoice - SAVE Invoice

like:

1. Run FIBF

2. Check that FI is activated (menu: Settings-identification-SAP application

3. Menu: Settings-Products-..of a customer create ZSMPL.

4. Run SE37

5. Enter functional module SAMPLE_INTERFACE_00501010 and copy it under your name zSAMPLE_INTERFACE_00501010 .

6. Get familiar with it's components.

7. Write my own code to this function zSAMPLE_INTERFACE_00501010 .

8. Run FIBF again

9. Settings-P/S functional modules - of a customer. New entries: event 00001025, product ZSMPL, appl. FI-FI, funct. module - which i created.

10. Menu: Settings-Products-..of a customer activate ZSMPL.

but i find the codes in the new function can't run ?

can anyone help me ?

thanks!

Add comment
10|10000 characters needed characters exceeded

  • Follow
  • Get RSS Feed

3 Answers

  • author's profile photo
    Former Member
    Aug 05, 2004 at 02:36 AM

    anyone help me ?thanks !

    Add comment
    10|10000 characters needed characters exceeded

  • author's profile photo
    Former Member
    Aug 05, 2004 at 10:25 AM

    What you mean the codes cannot run?

    To check the config of the FIBF call function module

    BF_FUNCTIONS_FIND and enter the event id with zeros in the I_EVENT parameter. If you get a table with your Z function module back then everything works.

    If not debug the BF_FUNCTIONS_FIND and you can see the TBE* tables it looks up, e.g. the config tables of FIBF. With that I have found normally my errors with FIBF.

    If you get your FM back then the event is not called in the right place.

    Stefan

    Add comment
    10|10000 characters needed characters exceeded

  • author's profile photo
    Former Member
    Aug 05, 2004 at 01:36 PM

    Try this program

    REPORT ZUSEREXIT no standard page heading.

    tables : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.

    tables : tstct.

    data : jtab like tadir occurs 0 with header line.

    data : field1(30).

    data : v_devclass like tadir-devclass.

    parameters : p_tcode like tstc-tcode obligatory.

    select single * from tstc where tcode eq p_tcode.

    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 eq enlfdir-area.

    move : tadir-devclass to v_devclass.

    endif.

    endif.

    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.

    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.

    *---End of Program

    Add comment
    10|10000 characters needed characters exceeded

    • Former Member

      i mean:

      after i config the tcode 'FIBF' as i have said ,

      also the function zSAMPLE_INTERFACE_00501010

      can't be called by tcode 'VF11',i think the event is not called .

      and when i debug the BF_FUNCTIONS_FIND ,

      i get my FM "zSAMPLE_INTERFACE_00501010 " back ,

      i don't konw why? can you help me ?

      thanks and regards!