FM DYNP_VALUES_READ giving dump

[Former Member]

Hi folks,

I am using Function module DYNP_VALUES_READ as follows, but it is giving dump as invalid screen field parameter.

data: l_dyname type standard table of dynpread,

w_dynam type dynpread.

clear w_dynpread.

w_dynpread-fieldname = <screen-fieldname>.

append w_dyname to l_dyname.

clear w_dyname.

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

dyname = sy--repid

dynumb = sy-dynnr

tables

dynpfields = l_dyname.

please let me know where am I wrong......it is giving sy-subrc = 2..which is invalid field parameter.....

thanks in advance

[Former Member]

Hi,

Please make sure the screen fieldname exists and give the screen fieldname in capital letters..

Thanks

Naren

[Former Member]

Why do you have two hyphens in:

dyname = sy--repid

Rob

[former_member188685]

CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = sy--repid  "<---error is from this
dynumb = sy-dynnr
tables
dynpfields = l_dyname.

sy-repid, not sy--repid

CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = sy-repid  "<---error is from this
dynumb = sy-dynnr
tables
dynpfields = l_dyname.

[Former Member]

Hi,

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

dyname = sy--repid

dynumb = sy-dynnr

tables

dynpfields = l_dyname.

Did you check your "sy--repid" variable you have 2 '--' symbols may be you are getting with this.

Thanks,

Sree.

[P561888]

Hi ,

data: dynpfields like dynpread occurs 5 with header line.

call function 'DYNP_VALUES_READ'

EXPORTING

dyname = <fieldname>

dynumb = '1000'

TABLES

dynpfields = dynpfields

EXCEPTIONS

invalid_abapworkarea = 01

invalid_dynprofield = 02

invalid_dynproname = 03

invalid_dynpronummer = 04

invalid_request = 05

no_fielddescription = 06

undefind_error = 07.

Regards,

Bharani

[Former Member]

types:begin of ts_aufk,

pspel type PS_PSP_ELE,

kdauf type KDAUF,

end of ts_aufk.

data: it_aufk type table of ts_aufk,

wa_aufk type ts_aufk,

dynpfields TYPE TABLE OF dynpread,

wa_dynpfields TYPE dynpread.

data :lv_stepl TYPE sy-stepl,

lv_dyname TYPE d020s-prog,

lv_dynumb TYPE d020s-dnum,

lv_pspnr(225) TYPE c,

lv_pspnr1 type PS_PSP_ELE.

• Gethe line

GET CURSOR LINE lv_stepl.

lv_dyname = sy-repid.

lv_dynumb = sy-dynnr.

wa_dynpfields-stepl = lv_stepl.

wa_dynpfields-fieldname = 'VIQMEL-ZPSPNR'.

append wa_dynpfields to dynpfields.

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

DYNAME = lv_dyname

DYNUMB = lv_dynumb

TRANSLATE_TO_UPPER = 'X'

• REQUEST = ' '

• PERFORM_CONVERSION_EXITS = ' '

• PERFORM_INPUT_CONVERSION = ' '

• DETERMINE_LOOP_INDEX = ' '

• START_SEARCH_IN_CURRENT_SCREEN = ' '

• START_SEARCH_IN_MAIN_SCREEN = ' '

• START_SEARCH_IN_STACKED_SCREEN = ' '

• START_SEARCH_ON_SCR_STACKPOS = ' '

• SEARCH_OWN_SUBSCREENS_FIRST = ' '

• SEARCHPATH_OF_SUBSCREEN_AREAS = ' '

TABLES

DYNPFIELDS = dynpfields

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

STEPL_NOT_FOUND = 10

OTHERS = 11

.

if sy-subrc eq 0.

read table dynpfields into wa_dynpfields with key fieldname = 'VIQMEL-ZPSPNR'.

lv_pspnr = wa_dynpfields-FIELDVALUE .

CALL FUNCTION 'CONVERSION_EXIT_ABPSP_INPUT'

EXPORTING

INPUT = lv_pspnr

IMPORTING

OUTPUT = lv_pspnr1

EXCEPTIONS

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.

Select PSPEL KDAUF

from AUFK

into table it_AUFK

where PSPEL = lv_pspnr1.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

DDIC_STRUCTURE = ' '

RETFIELD = 'KDAUF'

PVALKEY = ' '

DYNPPROG = sy-repid

DYNPNR = sy-dynnr

DYNPROFIELD = 'VIQMEL-ZVBELN'

• STEPL = 0

• WINDOW_TITLE =

• VALUE = ' '

VALUE_ORG = 'S'

• MULTIPLE_CHOICE = ' '

• DISPLAY = ' '

CALLBACK_PROGRAM = sy-repid

• CALLBACK_FORM = ' '

• MARK_TAB =

• IMPORTING

• USER_RESET =

TABLES

VALUE_TAB = it_aufk

• FIELD_TAB =

• RETURN_TAB =

• DYNPFLD_MAPPING =

EXCEPTIONS

PARAMETER_ERROR = 1

NO_VALUES_FOUND = 2

OTHERS = 3

.

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

endif.