topic Re: drop down from data dictionary. in Application Development and Automation Discussions

drop down from data dictionary.

Former Member — Tue, 23 Oct 2012 05:49:14 GMT

hello

i have made a form in which i want the value of dropdown2 filtered based on value selected in dropdown1.although it is working if i am giving the values manually but when i am retrieving it from data dictionary values are not filtered.kindly suggest me how to proceed.

Re: drop down from data dictionary.

former_member193464 — Tue, 23 Oct 2012 06:00:13 GMT

Although i could not get what you meant but debug and check when selecting from dictionary the values are updated in dropdown1. Paste that part of code if the problem is still persisting.

Re: drop down from data dictionary.

former_member194152 — Tue, 23 Oct 2012 06:21:11 GMT

share your code for visibility.

Re: drop down from data dictionary.

Former Member — Tue, 23 Oct 2012 06:52:55 GMT

i am attaching the modules in which i have defined values for dropdown and den the module in which coding is done.

MODULE get OUTPUT.

zbs1_brand-zone = 'ZBS1_BRAND-ZONE1'.

zbs_state-state1 = 'ZBS_STATE-STATE'.

IF etab IS INITIAL.

* wa-text = 'NORTH'.

wa-key = 'NORTH'.

APPEND wa TO etab.

* wa-text = 'EAST'.

wa-key = 'EAST'.

APPEND wa TO etab.

* wa-text = 'SOUTH'.

wa-key = 'SOUTH'.

APPEND wa TO etab.

* wa-text = 'WEST'.

wa-key = 'WEST'.

APPEND wa TO etab.

ENDIF.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

id = zbs1_brand-zone

values = etab

* EXCEPTIONS

* ID_ILLEGAL_NAME = 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.

IF etab1 IS INITIAL.

SELECT state

FROM zbs_state

INTO CORRESPONDING FIELDS OF itab1.

wa1-key = itab1-state.

APPEND wa1 TO etab1.

* CLEAR wa1.

ENDSELECT.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

id = zbs_state-state1

values = etab1

* EXCEPTIONS

* ID_ILLEGAL_NAME = 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.

MODULE user_command_0001 INPUT.

save_code = ok_code.

CASE save_code.

WHEN 'SELECT'.

CASE zbs1_BRAND-zone1.

WHEN 'NORTH'.

SELECT state FROM zbs_state INTO

corresponding fields of itab1 WHERE ZONE1 = 'NORTH'.

endselect.

ENDCASE.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

id = zbs_state-state1

values = etab1

where select is the function code given in dropdown1.

Re: drop down from data dictionary.

former_member193464 — Tue, 23 Oct 2012 07:10:00 GMT

put a breakpoint at PAI and check the condition WHEN 'NORTH' is it going inside and fetching the data to etab1 ?

Re: drop down from data dictionary.

Former Member — Tue, 23 Oct 2012 07:16:06 GMT

i have checked.it is taking only the last value of dropdown2 and not acc to the condition given.

Re: drop down from data dictionary.

former_member193464 — Tue, 23 Oct 2012 07:22:01 GMT

are you able to read your dropdown1 value inside PAI correctly ?

Re: drop down from data dictionary.

Former Member — Tue, 23 Oct 2012 07:22:40 GMT

while debugging,in itab1 it is taking last value from dropdown2 and in etab1 it is displaying all the values of dropdown2 irrespective of condition given.

Re: drop down from data dictionary.

former_member193464 — Tue, 23 Oct 2012 07:35:46 GMT

clear your etab1 , and then fill values from itab1 to etab1 based on the criteria you had given... and then call the function VRM_SET_VALUES

Re: drop down from data dictionary.

Former Member — Tue, 23 Oct 2012 08:19:05 GMT

Hello

I think you have passed wrong internal table in VRM_SET_VALUES as a value parameter.

As you are fetching records in internal table itab1 using select statement

See the following lines of code published by you

SELECT state FROM zbs_state INTO

corresponding fields of itab1 WHERE ZONE1 = 'NORTH'.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

id = zbs_state-state1

values = etab1

Check the bold part in above code . You will clearly find the error

Collect the records in etab1 internal table not in itab1 as you are passing etab1 in FM VRM_SET_VALUES

After fetching from SELECT Statement check sy-subrc whether records have been fecthed or not Accordingly take a call .

Enjoy Coding

Regards

Sandeep

Re: drop down from data dictionary.

Former Member — Tue, 23 Oct 2012 09:03:59 GMT

thank you my form is complete.since i am a fresher i am learning a lot from you.thank you.