topic Re: List Box Problem in Application Development and Automation Discussions

List Box Problem

former_member628175 — Tue, 25 Jul 2006 14:12:27 GMT

Hi All ,

I'm facing a problem while dealing with List Box . I have created a I/O field with the LISTBOX property set to 1 . (That means I have a list box on the screen ) .

I'm uploading values through VRM_SET_VALUES . But the problem is whenever I select any value , the field is not storing the value .

My further selection is dependent on select value in the list box . How can I get the value which is selected in the list box ?

Thanks ,

Shounak M.

Re: List Box Problem

Former Member — Tue, 25 Jul 2006 14:18:41 GMT

HI Shounak,

check this program

Dropdown box with a value list from input help (recommended)

&----

*& Report DEMO_DROPDOWN_LIST_BOX *

&----

REPORT demo_dropdown_list_box.

&----

*& Global Declarations *

&----

Screen Interfaces

TABLES sdyn_conn.

DATA ok_code TYPE sy-ucomm.

Global data

TYPES: BEGIN OF type_carrid,

carrid type spfli-carrid,

carrname type scarr-carrname,

END OF type_carrid.

DATA itab_carrid TYPE STANDARD TABLE

OF type_carrid WITH HEADER LINE.

&----

*& Processing Blocks called by the Runtime Environment *

&----

Event Block START-OF-SELECTION

START-OF-SELECTION.

CALL SCREEN 100.

Dialog Module PBO

MODULE status_0100 OUTPUT.

SET PF-STATUS 'SCREEN_100'.

ENDMODULE.

Dialog Modules PAI

MODULE cancel INPUT.

LEAVE PROGRAM.

ENDMODULE.

MODULE user_command_0100 INPUT.

CASE ok_code.

WHEN 'SELECTED'.

MESSAGE i888(sabapdocu) WITH sdyn_conn-carrid.

ENDCASE.

ENDMODULE.

Dialog Module POV

MODULE create_dropdown_box INPUT.

SELECT carrid carrname

FROM scarr

INTO CORRESPONDING FIELDS OF TABLE itab_carrid.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

retfield = 'CARRID'

value_org = 'S'

TABLES

value_tab = itab_carrid

EXCEPTIONS

parameter_error = 1

no_values_found = 2

OTHERS = 3.

IF sy-subrc <> 0.

...

ENDIF.

ENDMODULE.

The next screen (statically defined) for screen 100 is 100. The only input field on the screen is the component SDYN_CONN-CARRID. Its Dropdown attribute is set to L, and it has the output length 20. The Value list attribute is empty, and it has the function code SELECTED. The function codes of the buttons EXECUTE and CANCEL. CANCEL are defined in the GUI status as having the function type E.

The screen flow logic is as follows:

PROCESS BEFORE OUTPUT.

MODULE status_0100.

PROCESS AFTER INPUT.

MODULE cancel AT EXIT-COMMAND.

MODULE user_command_0100.

PROCESS ON VALUE-REQUEST.

FIELD sdyn_conn-carrid MODULE create_dropdown_box.

Users cannot enter any values into the screen fields. When they choose the input field on screen 100, the system displays a list box. The Value list attribute is empty, so the system launches the input mechanism. In this case, the event block PROCESS ON VALUE-REQUEST is created in the screen flow logic. This event block controls all other mechanisms. A two-column internal table is filled in the appropriate dialog module and passed to the input help using the F4IF_INT_TABLE_VALUE_REQUEST function module. The system inserts the two columns of the table into the list box.

When the user chooses a line in the list box, the PAI event is triggered using the function code SELECTED and the value in the first column of the internal table is copied to the input field.

Dropdown box with a value list from the PBO module for screen 200 (not recommended)

REPORT demo_dynpro_dropdown_listbox.

TYPE-POOLS vrm.

DATA: name TYPE vrm_id,

list TYPE vrm_values,

value LIKE LINE OF list.

DATA: wa_spfli TYPE spfli,

ok_code TYPE sy-ucomm,

save_ok TYPE sy-ucomm.

TABLES demof4help.

name = 'DEMOF4HELP-CONNID'.

CALL SCREEN 100.

MODULE cancel INPUT.

LEAVE PROGRAM.

ENDMODULE.

MODULE init_listbox OUTPUT.

CLEAR demof4help-connid.

SELECT connid cityfrom cityto deptime

FROM spfli

INTO CORRESPONDING FIELDS OF wa_spfli

WHERE carrid = demof4help-carrier2.

value-key = wa_spfli-connid.

WRITE wa_spfli-deptime TO value-text USING EDIT MASK '__:__:__'.

CONCATENATE value-text

wa_spfli-cityfrom

wa_spfli-cityto

INTO value-text SEPARATED BY space.

APPEND value TO list.

ENDSELECT.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

id = name

values = list.

ENDMODULE.

MODULE user_command_100.

save_ok = ok_code.

CLEAR ok_code.

IF save_ok = 'CARRIER' AND NOT demof4help-carrier2 IS INITIAL.

LEAVE TO SCREEN 200.

ELSE.

SET SCREEN 100.

ENDIF.

ENDMODULE.

MODULE user_command_200.

save_ok = ok_code.

CLEAR ok_code.

IF save_ok = 'SELECTED'.

MESSAGE i888(sabapdocu) WITH text-001 demof4help-carrier2

demof4help-connid.

ENDIF.

ENDMODULE.

Regards,

Laxmi.

Re: List Box Problem

Former Member — Tue, 25 Jul 2006 14:23:07 GMT

hi,

check the sample code:

report z.

type-pools: vrm.

data: it_val type vrm_values,

w_line like line of it_val.

parameters p_bukrs like t001-bukrs as listbox

visible length 25 obligatory.

initialization.

select bukrs butxt from t001 into (w_line-key, w_line-text).

append w_line to it_val.

check p_bukrs is initial.

p_bukrs = w_line-key.

endselect.

at selection-screen output.

call function 'VRM_SET_VALUES'

exporting

id = 'P_BUKRS'

values = it_val.

end-of-selection.

write: / 'Company Code:', p_bukrs.

regards,

keerthi.

Re: List Box Problem

Former Member — Tue, 25 Jul 2006 14:30:26 GMT

hi shounak,

check this thread..

http://www.sap-img.com/ab012.htm

http://www.sap-img.com/abap/fm-vrm-set-value-to-list-box.htm

http://help.sap.com/saphelp_nw2004s/helpdata/en/9f/dbabe435c111d1829f0000e829fbfe/content.htm

Re: List Box Problem

former_member628175 — Wed, 26 Jul 2006 05:09:13 GMT

Hello All ,

Thanks for your input , but the problem is whenever I'm saving the data , the list box is returning me blank value instead of selected value . How to rectify this ?

Thanks ,

Shounak M.

Re: List Box Problem

Former Member — Wed, 26 Jul 2006 05:14:27 GMT

Hi Shounak,

can you paste the code so that we can check what is the problem with your code....

Regards,

Amit.

Re: List Box Problem

former_member628175 — Wed, 26 Jul 2006 05:19:37 GMT

Basically the code has been written for table maintenance screen . The module fill_list upload the data in the list through VRM_SET_VALUES .

Here is the code :

PROCESS BEFORE OUTPUT.

MODULE detail_init.

MODULE FILL_LIST

PROCESS AFTER INPUT.

MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND.

MODULE DETAIL_SET_PFSTATUS.

CHAIN.

FIELD ZRTPM_STLMT_TOL-SALES_ORG .

FIELD ZRTPM_STLMT_TOL-DIS_CHANNEL .

FIELD ZRTPM_STLMT_TOL-DIVISION .

FIELD ZRTPM_STLMT_TOL-SPEND_IND .

FIELD ZRTPM_STLMT_TOL-PERCENT_VALUE .

FIELD ZRTPM_STLMT_TOL-AMOUNT_VALUE .

FIELD ZRTPM_STLMT_TOL-CURRENCY .

FIELD ZRTPM_STLMT_TOL-CRM_SALES_ORG .

MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST.

endchain.

chain.

FIELD ZRTPM_STLMT_TOL-SALES_ORG .

FIELD ZRTPM_STLMT_TOL-DIS_CHANNEL .

FIELD ZRTPM_STLMT_TOL-DIVISION .

FIELD ZRTPM_STLMT_TOL-SPEND_IND .

module detail_pai.

endchain.