Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 

Drop down values are not displaying in popup dialog box...

Former Member

‎06-01-2011 7:28 AM

0 Kudos

Hi Experts,

i am displaying Popup dialog box for displaying Calendar prototype using classes. in that i was able to add the drop down values,

but the problem is when i select the drop down value , it is not displaying on field.

can anyone suggest me how to display the values.

Regards,

Sudha.

1 REPLY 1

Former Member

‎06-01-2011 8:09 AM

0 Kudos

Hi,

I done the same scenario without using classes.

*************************************************************************
PROCESS BEFORE OUTPUT.
  MODULE status_1100.
  LOOP AT git_itms INTO gwa_itms
                         WITH CONTROL ctl_itms
                         CURSOR ctl_itms-current_line.
  ENDLOOP.

PROCESS AFTER INPUT.
  CHAIN.
    FIELD gwa_itms-event_id.
    module set.
  ENDCHAIN.
MODULE user_command_1100.

PROCESS ON VALUE-REQUEST.
  FIELD gwa_itms-event_id   MODULE value_event.

*************************************************************************
MODULE value_event INPUT.

DATA : lfd_prog TYPE sy-repid,
       lfd_dynn TYPE sy-dynnr.

*Local Internal tables.
  DATA : lit_event TYPE STANDARD TABLE OF /Ztest/prqh_event_id.
*Local Work Area.
  DATA : lwa_event TYPE /Ztest/prqh_event_id.

*Call this function for event id search help.
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
       EXPORTING
            ddic_structure = '/Ztest/prqh_event_id'
            retfield           = 'EVENT_ID'
            dynpprog       = lfd_prog
            dynpnr           = lfd_dynn
            dynprofield    = 'GWA_ITMS-EVENT_ID' "Screen field name
            stepl              = 0
            value_org      = 'C'
       TABLES
            value_tab      = lit_event.

  IF sy-subrc <> 0.

  ENDIF.
ENDMODULE.                 " value_event  INPUT
*************************************************************************
MODULE set INPUT.
             MODIFY git_itms
                FROM gwa_itms
TRANSPORTING event_id
              WHERE pr_no = gwa_itms-pr_no.
ENDMODULE. 
*************************************************************************

Regards

chessleo.