Code: Alles auswählen.
FUNCTION Z_FB_XYZ .
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" TABLES
*" SHLP_TAB TYPE SHLP_DESCR_TAB_T
*" RECORD_TAB STRUCTURE SEAHLPRES
*" CHANGING
*" VALUE(SHLP) TYPE SHLP_DESCR_T
*" VALUE(CALLCONTROL) LIKE DDSHF4CTRL STRUCTURE DDSHF4CTRL
*"----------------------------------------------------------------------
* Select steps
CASE callcontrol-step.
WHEN 'PRESEL1'.
data: itab type table of dynpread with header line.
itab-fieldname = 'MEPO1319-MATKL'.
append itab.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
DYNAME = 'SAPLMEGUI' "funktioniert aber auch nicht !!!
* SY-repid <- funktioniert nicht
* sy-cprog <- funktioniert nicht
DYNUMB = '1319'
*sy-dynnr <- funktioniert nicht
TRANSLATE_TO_UPPER = 'X'
TABLES
DYNPFIELDS = itab .
IF SY-SUBRC <> 0.
* ...
ENDIF.
*...
ENDCASE.
ENDFUNCTION.
Code: Alles auswählen.
DATA: repid TYPE syrepid,
dynnr TYPE sydynnr,
t_df TYPE STANDARD TABLE OF dynpread
WITH NON-UNIQUE DEFAULT KEY,
wa_df LIKE LINE OF t_df.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = repid
dynumb = dynnr
* TRANSLATE_TO_UPPER = ' '
request = 'A'
* PERFORM_CONVERSION_EXITS = ' '
* PERFORM_INPUT_CONVERSION = ' '
TABLES
dynpfields = t_df
EXCEPTIONS
invalid_abapworkarea = 1
invalid_dynprofield = 2
invalid_dynproname = 3
invalid_dynpronummer = 4
invalid_request = 5
no_fielddescription = 6
invalid_parameter = 7
undefind_error = 8
double_conversion = 9
OTHERS = 10.