*&---------------------------------------------------------------------*
*& Report ZPRITEM_WFS
*&
*&---------------------------------------------------------------------*
report zpritem_wfs.
data: gr_table type ref to cl_salv_table.
data: lt_worklist type table of swr_wihdr,
ls_object type sibflporb,
ls_key type swotobjid-objkey.
selection-screen begin of block b1 with frame title text-001.
parameters: p_banfn type banfn obligatory,
p_bnfpo type bnfpo obligatory.
selection-screen end of block b1.
start-of-selection.
"Getting stuff ready...
concatenate p_banfn p_bnfpo into
ls_object-instid.
concatenate p_banfn p_bnfpo into
ls_key.
ls_object-typeid = 'BUS2009'."PR Bor...
ls_object-catid = 'BO'."For Bor...
call function 'SAP_WAPI_WORKITEMS_TO_OBJECT'
exporting
object_por = ls_object
objtype = 'BUS2009'"Here you could swith BORs...
objkey = ls_key
tables
worklist = lt_worklist.
if lt_worklist[] is initial.
message 'No luck...' type 'S' display like 'E'.
else.
"Show ALV...
cl_salv_table=>factory( importing r_salv_table = gr_table changing t_table = lt_worklist ).
gr_table->display( ).
endif.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
6 | |
4 | |
4 | |
4 | |
4 | |
3 | |
3 | |
3 | |
3 | |
3 |