Tag: SWW_WI_OBJECTHANDLES_READ
UWL Get Rejection Comments
by Mustafa on Mar.18, 2013, under SAP
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 |
DATA:lt_object_ids TYPE STANDARD TABLE OF sibflporb, ls_object_ids TYPE sibflporb, lt_content TYPE sowiarc, ls_objcont TYPE soli, lv_comment TYPE string. CALL FUNCTION 'SWW_WI_OBJECTHANDLES_READ' EXPORTING wi_id = i_wi_id TABLES object_ids_ibf = lt_object_ids EXCEPTIONS read_failed = 1 OTHERS = 2. IF sy-subrc <> 0. ELSE. IF NOT lt_object_ids IS INITIAL. LOOP AT lt_object_ids INTO ls_object_ids. CALL FUNCTION 'SO_SOFM_FOR_ARC_READ' EXPORTING object = ls_object_ids-instid IMPORTING content = lt_content EXCEPTIONS object_allready_read = 1 object_does_not_exist = 2 OTHERS = 3. IF sy-subrc <> 0. ELSE. LOOP AT lt_content-objcont INTO ls_objcont. CONCATENATE lv_comment ls_objcont-line+5 cl_abap_char_utilities=>newline INTO lv_comment SEPARATED BY cl_abap_char_utilities=>horizontal_tab. ENDLOOP. ENDIF. ENDLOOP. i_comments = lv_comment. ENDIF. ENDIF. |