After upgrade to ER2005 program RFBIKR00 stops processing when it calls this function module DDIF_NAMETAB_GET with include name SI_AND_CI_BLFB1. Then this function module returns 3 lines in table lt_x031l and program stops on error.
In old version of SAP 46C, the result was 1 entry in lt_x031l and program was executed correctly.
Did anyone experienced the same problem?
Code in RFBIKR00:
form addon_check_include using value(i_xale) type c
value(i_koart) type koart
value(i_strukturname) type strukname.
data: l_includename type strukname,
lt_x031l type x031l occurs 10,
l_count type i,
sysubrc type sysubrc.
concatenate 'SI_AND_CI_' i_strukturname into l_includename.
call function 'DDIF_NAMETAB_GET'
exporting
tabname = l_includename
all_types = 'X'
lfieldname = 'SENDE'
tables
x031l_tab = lt_x031l
exceptions
not_found = 1
others = 2.
sysubrc = sy-subrc.
if sysubrc = 0.
describe table lt_x031l lines l_count.
if l_count = 1.
exit.
endif.
endif.
Fehler ist aufgetreten (im Falle sysubrc = 0 ist l_count > 1, d.h.
es gibt mindestens ein ADD_ON-Feld, wodurch alte BI-Daten nicht mehr
verarbeitet werden können) ==> Meldung und Abbruch
if i_xale = space.
case sysubrc.
when 0. perform log_msg using c_msgid 'I' '643'
i_strukturname '' '' ''.
when 1. perform log_msg using c_msgid 'I' '642'
l_includename '' '' ''.
when 2. perform log_msg using c_msgid 'I' '641' '' '' '' ''.
endcase.
case i_koart.
when 'D'. perform dump_bkn00(rfbide00).
when 'K'. perform dump_blf00(rfbikr00).
endcase.
perform log_abort using c_msgid '013'.
else. " i.e. i_xale = 'X'
case sysubrc.
when 0. message i643 with i_strukturname raising internal_error.
when 1. message i642 with l_includename raising internal_error.
when 2. message i641 raising internal_error.
endcase.
endif. " i_xale = space
endform. " addon_check_include
Bluesky
