Exit ME41
 

Hola, saben estoy en un apuro, no puedo encontrar una User Exit para la transacción Me41 petición de oferta versión 4.6 de Sap, para modificar el campo texto breve de material de la posición, plase si alguien puede ayudar cualquier ayuda es valida y se los agradeceria arto :eek:

Hola Carlanga,

Bienvenida a nuestra comunidad sap ;) . Te adjunto un programa muy útil que busca las exits de una determinada transacción que introduces en los parámetros de selección


report z_find_user_exit no standard page heading.

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

data : jtab like tadir occurs 0 with header line.
data : hotspot(30).

parameters : p_tcode like tstc-tcode obligatory.

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

start-of-selection.

perform get_data.
perform write_list.


*---------------------------------------------------------------------*
* FORM get_data *
*---------------------------------------------------------------------*
form get_data.

select single * from tstc
where tcode eq p_tcode.
check sy-subrc eq 0.

select single * from tadir
where pgmid = 'R3TR'
and object = 'PROG'
and obj_name = tstc-pgmna.


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.
endif.

endif.

select * from tadir into table jtab
where pgmid = 'R3TR'
and object = 'SMOD'
and devclass = tadir-devclass.

select single * from tstct
where sprsl eq sy-langu
and tcode eq p_tcode.

endform.

*---------------------------------------------------------------------*
* FORM write_list *
*---------------------------------------------------------------------*
form write_list.

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.

endform.

Espero te sea útil.
Un saludo :) .

Exit Me41
 

Si, el programa report z_find_user_exit, lo conozco y ya e buscado en el, ese es el gran problema :( pero de todos modos te agradezco la intención.
Help my !!! :eek: :(

Hola Carlanga,

Ok :D ,

Creo que para peticiones de oferta se puede usar la BADI ME_PROCESS_PO_CUST y el método PROCESS_ITEM.

Un saludo.