data:l_date like sy-datum.
l_date = '99991230'.
CLEAR:ltb,ltb[],kndcat,kndcat[].
CALL FUNCTION 'CS_WHERE_USED_MAT'
EXPORTING
datub = l_date "valid date to
datuv = sy-datum "valid date from
matnr = p_matnr
* postp = ' '
* retcode_only = ' '
stlan = '1'
werks = p_werks
* stltp = 'M'
IMPORTING
topmat = topmat
TABLES
wultb = ltb "material bom
equicat = equicat
kndcat = kndcat "order bom
matcat = matcat
stdcat = stdcat
tplcat = tplcat
prjcat = prjcat
EXCEPTIONS
call_invalid = 1
material_not_found = 2
no_where_used_rec_found = 3
no_where_used_rec_selected = 4
no_where_used_rec_valid = 5
OTHERS = 6.
l_date = '99991230'.
CLEAR:ltb,ltb[],kndcat,kndcat[].
CALL FUNCTION 'CS_WHERE_USED_MAT'
EXPORTING
datub = l_date "valid date to
datuv = sy-datum "valid date from
matnr = p_matnr
* postp = ' '
* retcode_only = ' '
stlan = '1'
werks = p_werks
* stltp = 'M'
IMPORTING
topmat = topmat
TABLES
wultb = ltb "material bom
equicat = equicat
kndcat = kndcat "order bom
matcat = matcat
stdcat = stdcat
tplcat = tplcat
prjcat = prjcat
EXCEPTIONS
call_invalid = 1
material_not_found = 2
no_where_used_rec_found = 3
no_where_used_rec_selected = 4
no_where_used_rec_valid = 5
OTHERS = 6.