*description: this is used for displaying all the
*exceptions of a given function module
*------------------------------------------------------*
report zfunction.
*----tables used
tables:FUPARAREF.
*---types declaration
types: begin of ty_FUPARAREF,
FUNCNAME type FUNCNAME,
PARAMETER type PARAMETER,
PPOSITION type SYTABIX,
end of ty_FUPARAREF.
*---internal table declaration
data: itab type table of ty_FUPARAREF with header line.
*---selection screen display
select-options:s_fname for FUPARAREF-FUNCNAME no intervals.
*---start of selection
start-of-selection.
perform get_data.
perform display_data.
*&---------------------------------------------------------------------*
*& Form get_data
*----------------------------------------------------------------------*
form get_data .
select FUNCNAME
PARAMETER
PPOSITION
from FUPARAREF
into table itab
where FUNCNAME in s_fname
and R3STATE = 'A'
and PARAMTYPE = 'X'.
sort itab by FUNCNAME PPOSITION.
endform. " get_data
*&---------------------------------------------------------------------*
*& Form display_data
*----------------------------------------------------------------------*
form display_data .
loop at itab .
AT NEW FUNCNAME.
write:/.
write:/ itab-FUNCNAME.
write:/ .
endat.
write:/ itab-PPOSITION,
itab-PARAMETER.
endloop.
endform. " display_data
selection screen is like this :
output is like this :
No comments:
Post a Comment