problems with a combo box in dynpro

[Former Member]

Hi guys, im creating a combo box in a dynpro, but is not showing anything.

the code is the following:

AT the screen painter..

MODULE USER_COMMAND_0100.

PROCESS ON VALUE-REQUEST.

FIELD TI_COMBO MODULE create_dropdown_box.

*then the module in the main program.....

module create_dropdown_box input.

TYPES: BEGIN OF type_carrid,

op1(20),

ID TYPE N,

END OF type_carrid.

DATA ti_combo TYPE STANDARD TABLE OF type_carrid WITH HEADER LINE.

ti_combo-op1 = 'Not processed'.

TI_COMBO-ID = 1.

append ti_combo.

ti_combo-op1 = 'Duplicated.

append ti_combo.

ti_combo-op1 = 'For Payroll'.

append ti_combo.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = 'ID'

DYNPPROG = SY-REPID

DYNPNR = '100'

DYNPROFIELD = 'TI_COMBO'

VALUE_ORG = 'S'

TABLES

value_tab = ti_combo

EXCEPTIONS

parameter_error = 1

no_values_found = 2

OTHERS = 3.

IF sy-subrc <> 0.

...

ENDIF.

endmodule.

Edited by: javier santana on May 7, 2008 5:47 PM

[Former Member]

Hi,

Check the below code.

TYPE-POOLS: VRM.

DATA:V_NUM TYPE I.

DATA:NAME TYPE VRM_ID,

LIST TYPE VRM_VALUES,

VALUE LIKE LINE OF LIST.

DATA:I_WORKPATTERN LIKE ZWORKPAT OCCURS 0 WITH HEADER LINE.

DATA:ZPATTXT(60).

MODULE WORKPATTERN_LISTBOX OUTPUT.

NAME = 'P9434-ZWORKPATTERN'.

IF V_NUM IS INITIAL.

CLEAR I_WORKPATTERN.

REFRESH I_WORKPATTERN.

SELECT *

FROM ZWORKPAT

INTO TABLE I_WORKPATTERN.

IF NOT I_WORKPATTERN[] IS INITIAL.

LOOP AT I_WORKPATTERN.

VALUE-KEY = I_WORKPATTERN-ZWORKPATTERN.

VALUE-TEXT = I_WORKPATTERN-ZWORKPATTERN.

APPEND VALUE TO LIST.

ENDLOOP.

ENDIF.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

ID = NAME

VALUES = LIST

EXCEPTIONS

ID_ILLEGAL_NAME = 1

OTHERS = 2.

IF SY-SUBRC <> 0.

CLEAR SY-SUBRC.

ENDIF.

V_NUM = V_NUM + 1.

ENDIF.

[Former Member]

AH?

wich one is the field in dynpro?

[Former Member]

Hi,

'P9434-ZWORKPATTERN' is the dynpro field.