List BOx at selection-screen.

Former Member — Mon, 02 Mar 2009 11:32:14 GMT

Hi,

parameters : REASON(30) TYPE C AS LISTBOX VISIBLE LENGTH 30 .

i want to add 10 options to this list box on selection-screen.

how to do this.

Thanks.

Re: List BOx at selection-screen.

Former Member — Mon, 02 Mar 2009 11:33:59 GMT

A little search in SCN can solve your problem quickly.

Cheers,

Amit.

Re: List BOx at selection-screen.

I355602 — Mon, 02 Mar 2009 11:34:10 GMT

Hi,

Refer code:-



TABLES : Y_MOVIE.

TYPE-POOLS: VRM.

TYPES : BEGIN OF MOVIE,
        YR LIKE Y_MOVIE-YR,
        CATEGORY LIKE Y_MOVIE-CATEGORY,
        WINNER LIKE Y_MOVIE-WINNER,
        NOTES LIKE Y_MOVIE-NOTES,
        END OF MOVIE.

DATA: NAME TYPE VRM_ID,
      LIST TYPE VRM_VALUES,
      VALUE LIKE LINE OF LIST,
      MOVIETAB TYPE STANDARD TABLE OF MOVIE INITIAL SIZE 10 WITH HEADER LINE.

PARAMETERS: CATEGORY(10) AS LISTBOX VISIBLE LENGTH 10.

AT SELECTION-SCREEN.
  IF CATEGORY EQ ''.
    MESSAGE E006.
  ENDIF.

AT SELECTION-SCREEN OUTPUT.

  NAME = 'CATEGORY'.

  VALUE-KEY = 'PIC'.
  VALUE-TEXT = 'PIC'.
  APPEND VALUE TO LIST.

  VALUE-KEY = 'MAL'.
  VALUE-TEXT = 'MAL'.
  APPEND VALUE TO LIST.

  VALUE-KEY = 'FEM'.
  VALUE-TEXT = 'FEM'.
  APPEND VALUE TO LIST.

  CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
      ID     = NAME
      VALUES = LIST.

START-OF-SELECTION.

  WRITE : / 'Category Selected :', CATEGORY.

  ULINE.

  SELECT *
  FROM Y_MOVIE INTO CORRESPONDING FIELDS OF TABLE MOVIETAB
  WHERE CATEGORY = CATEGORY.

END-OF-SELECTION.

  WRITE : /1 'Year', 6 'Category', 16 'Winner', 50 'Notes'.
  ULINE.

  LOOP AT MOVIETAB.

    WRITE : /1 MOVIETAB-YR, 8 MOVIETAB-CATEGORY, 16 MOVIETAB-WINNER, 50 MOVIETAB-NOTES.
    ULINE.

  ENDLOOP.

  IF SY-SUBRC <> 0.
    MESSAGE I005.
  ENDIF.

Hope this helps you.

Regards,

Tarun

Re: List BOx at selection-screen.

Former Member — Mon, 02 Mar 2009 11:37:59 GMT

thanks

topic Re: List BOx at selection-screen. in Application Development and Automation Discussions

List BOx at selection-screen.

Re: List BOx at selection-screen.

Re: List BOx at selection-screen.

Re: List BOx at selection-screen.