DATA: lt_mara TYPE TABLE OF mara,
ls_mara TYPE mara,
ls_text LIKE tline,
lt_text TYPE TABLE OF tline.
* fetch 10 rows for display
SELECT * FROM mara INTO TABLE lt_mara
UP TO 10 ROWS WHERE matnr NE space.
IF sy-subrc EQ 0.
ls_text-tdformat = 'AS'.
LOOP AT lt_mara INTO ls_mara.
ls_text-tdline = ls_mara-matnr.
CONDENSE ls_text-tdline.
APPEND ls_text TO lt_text.
ls_text-tdformat = '/'.
ENDLOOP.
CALL FUNCTION 'RKE_POPUP_TEXT_DECIDE_VARTEXT'
EXPORTING
* OPTIONS = '' "You can add push-buttons also
object_id = 'NA'
object = 'ZTEST000'
na_shorttext = 'X'
titel = 'Example to show table'
* IMPORTING
* ANSWER = "User decision can be captured here
TABLES
* T_PARAMS =
t_texttab = lt_text
EXCEPTIONS
docu_not_found = 1
OTHERS = 2 .
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ELSE.
MESSAGE i001(00) WITH 'Nothing to dispaly'. EXIT.
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 | |
2 | |
2 | |
2 | |
2 | |
2 | |
1 | |
1 | |
1 |