* Inhalte und Positionen aller Dynprofelder
DATA: it_dynpro_list TYPE STANDARD TABLE OF dynp_list WITH DEFAULT KEY.
* Tabelle mit verwendeten Include-Dynpros
DATA: it_include_dynpro_info TYPE STANDARD TABLE OF incl_dynps WITH DEFAULT KEY.
* Erzeugt Liste mit Positionen und Inhalten aller Einträge eines Dynpros
CALL FUNCTION 'GET_DYNPRO_LIST'
EXPORTING
dyname = 'SAPLSD_ENTRY' " Name des ABAP/4-Programms (SE11)"
dynumb = '1000' " Nummer des auszugebenden Dynpros"
* INCL_COLUMN = 0
* INCL_LINE = 0
* INCL_WIDTH = 0
* INCL_HEIGHT = 0
* PROCESS_ACTUAL_DYNPRO = 'X'
TABLES
dynpro_list = it_dynpro_list
include_dynpro_info = it_include_dynpro_info
EXCEPTIONS
no_such_dynpro = 1
no_include_dynpro_infos = 2
wrong_include_dynpro_infos = 3
OTHERS = 4.
IF sy-subrc = 0.
cl_demo_output=>write_data( it_dynpro_list ).
cl_demo_output=>write_data( it_include_dynpro_info ).
* HTML-Code vom Demo-Output holen
DATA(lv_html) = cl_demo_output=>get( ).
* Daten im Inline-Browser im SAP-Fenster anzeigen
cl_abap_browser=>show_html( EXPORTING
title = 'Dynpro'
html_string = lv_html
container = cl_gui_container=>default_screen ).
* cl_gui_container=>default_screen erzwingen
WRITE: space.
ENDIF.