Hi..,
check this program !! i am calling the function module <b>ZBAPI_COMPANY_CODE </b> which is in <b>R3S system</b> from my <b>R3X system</b> ... for this i need to have a destination defined in R3X system to R3S system !! all the destinations are stored in <b><u>RFCDES</u></b> table...
you can define your own destination in <b>SM59</b> transaction..
*"Selection screen elements............................................
Parameters : p_matnr type mara-matnr value check.
" Material number
data :
begin of fs_material,
matnr type mara-matnr, " Material Number
mfrnr type mara-mfrnr, " Manufacturar number
end of fs_material.
data
t_material like standard table
of fs_material
initial size 0.
data:
w_dest(30) type c value <b>'R3S800'</b>, " Destination for R3S system
w_function(30) type c
value 'ZBAPI_COMPANY_CODE'.
*BAPI function module name
data:
fs_return type bapireturn.
CONDENSE W_DEST NO-GAPS.
translate p_matnr to upper case.
call function w_function
destination w_dest
exporting matnr = p_matnr
importing return = fs_return
tables t_material = t_material.
.
check sy-subrc eq 0.
if fs_return is not initial.
write : / fs_return-type , fs_return-message.
endif. " If fs_return is not initial.
if t_material is not initial.
loop at t_material into fs_material.
write : / fs_material-matnr, fs_material-mfrnr.
endloop. " Loop at t_material...
endif. " If t_material is not initial.
reward all helpful answers,
sai ramesh
Bluesky
