Application Development and Automation 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
Showing results for 
Search instead for 
Did you mean: 
Read only

F4 help or List Box

Former Member
0 Likes
1,820

how to make our own F4 help.

and.

how to make a dropdown list.

1 ACCEPTED SOLUTION
Read only

gopi_narendra
Active Contributor
0 Likes
1,196

Drop Down List

PARAMETER : p_int AS LISTBOX VISIBLE LENGTH 10.

DATA : name  TYPE vrm_id,
       list  TYPE vrm_values,
       value LIKE LINE OF list.


AT SELECTION-SCREEN OUTPUT.
  name = 'P_INT'.

  value-key = '1'.
  value-text = 'One'.
  APPEND value TO list.
  value-key = '2'.
  value-text = 'Two'.
  APPEND value TO list.

  CALL FUNCTION 'VRM_SET_VALUES'
       EXPORTING
            id     = name
            values = list.
  CLEAR list.

For F4 Help at selection Screen

at selection-screen on value-request for SO_PLTFM-LOW.

  select * from ZES_GROUP_REF
           into corresponding fields of table IT_GRPREF
           where BUKRS = P_BUKRS.
  if SY-SUBRC = 0.
    sort IT_GRPREF by BUKRS PLATFORM.
  endif.

  if not IT_GRPREF is initial.
    call function 'F4IF_INT_TABLE_VALUE_REQUEST'
      exporting
        RETFIELD        = 'SO_PLTFM-LOW'
        WINDOW_TITLE    = 'Platform Types'
        VALUE_ORG       = 'S'
      tables
        VALUE_TAB       = IT_GRPREF
        RETURN_TAB      = IT_RETURN
      exceptions
        PARAMETER_ERROR = 1
        NO_VALUES_FOUND = 2
        others          = 3. 

Regards

Gopi

Drop Down List

PARAMETER : p_int AS LISTBOX VISIBLE LENGTH 10.

DATA : name  TYPE vrm_id,
       list  TYPE vrm_values,
       value LIKE LINE OF list.


AT SELECTION-SCREEN OUTPUT.
  name = 'P_INT'.

  value-key = '1'.
  value-text = 'One'.
  APPEND value TO list.
  value-key = '2'.
  value-text = 'Two'.
  APPEND value TO list.

  CALL FUNCTION 'VRM_SET_VALUES'
       EXPORTING
            id     = name
            values = list.
  CLEAR list.

For F4 Help at selection Screen

at selection-screen on value-request for SO_PLTFM-LOW.

  select * from ZES_GROUP_REF
           into corresponding fields of table IT_GRPREF
           where BUKRS = P_BUKRS.
  if SY-SUBRC = 0.
    sort IT_GRPREF by BUKRS PLATFORM.
  endif.

  if not IT_GRPREF is initial.
    call function 'F4IF_INT_TABLE_VALUE_REQUEST'
      exporting
        RETFIELD        = 'SO_PLTFM-LOW'
        WINDOW_TITLE    = 'Platform Types'
        VALUE_ORG       = 'S'
      tables
        VALUE_TAB       = IT_GRPREF
        RETURN_TAB      = IT_RETURN
      exceptions
        PARAMETER_ERROR = 1
        NO_VALUES_FOUND = 2
        others          = 3. 

Regards

Gopi

5 REPLIES 5
Read only

kiran_k8
Active Contributor
0 Likes
1,196

Nidhi,

Check the following code:-

REPORT ZSCARTCHPAD .

type-pools:vrm.

PARAMETER : p_int AS LISTBOX VISIBLE LENGTH 30.

DATA : name TYPE vrm_id,

list TYPE vrm_values,

value LIKE LINE OF list.

AT SELECTION-SCREEN OUTPUT.

name = 'P_INT'.

value-key = '1'.

value-text = 'Kiran'.

APPEND value TO list.

value-key = '2'.

value-text = 'Nidhi'.

APPEND value TO list.

CALL FUNCTION 'VRM_SET_VALUES'

EXPORTING

id = name

values = list.

CLEAR list.

K.Kiran.

Read only

gopi_narendra
Active Contributor
0 Likes
1,197

Drop Down List

PARAMETER : p_int AS LISTBOX VISIBLE LENGTH 10.

DATA : name  TYPE vrm_id,
       list  TYPE vrm_values,
       value LIKE LINE OF list.


AT SELECTION-SCREEN OUTPUT.
  name = 'P_INT'.

  value-key = '1'.
  value-text = 'One'.
  APPEND value TO list.
  value-key = '2'.
  value-text = 'Two'.
  APPEND value TO list.

  CALL FUNCTION 'VRM_SET_VALUES'
       EXPORTING
            id     = name
            values = list.
  CLEAR list.

For F4 Help at selection Screen

at selection-screen on value-request for SO_PLTFM-LOW.

  select * from ZES_GROUP_REF
           into corresponding fields of table IT_GRPREF
           where BUKRS = P_BUKRS.
  if SY-SUBRC = 0.
    sort IT_GRPREF by BUKRS PLATFORM.
  endif.

  if not IT_GRPREF is initial.
    call function 'F4IF_INT_TABLE_VALUE_REQUEST'
      exporting
        RETFIELD        = 'SO_PLTFM-LOW'
        WINDOW_TITLE    = 'Platform Types'
        VALUE_ORG       = 'S'
      tables
        VALUE_TAB       = IT_GRPREF
        RETURN_TAB      = IT_RETURN
      exceptions
        PARAMETER_ERROR = 1
        NO_VALUES_FOUND = 2
        others          = 3. 

Regards

Gopi

Read only

0 Likes
1,196

thanks Gopi,,

but what is the significance of IT_RETURN. n what is its type.

Read only

0 Likes
1,196

It returns the selected value which is selected on the selection screen. Its of type DDSHRETVAL

Regards

Gopi

Read only

Former Member
0 Likes
1,196

Hi,

Here is the Example for Listbox Creation

REPORT ZLIST.

TYPE-POOLS: VRM.

DATA: NAME  TYPE VRM_ID,
      LIST  TYPE VRM_VALUES,
      VALUE LIKE LINE OF LIST.

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

AT SELECTION-SCREEN OUTPUT.

NAME = 'PS_PARM'.
VALUE-KEY = '1'.

VALUE-TEXT = 'LINE 1'.
APPEND VALUE TO LIST. VALUE-KEY = '2'.

VALUE-TEXT = 'LINE 2'.
APPEND VALUE TO LIST.

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

START-OF-SELECTION.
WRITE: / 'PARAMETER:', PS_PARM.

Here is the Example for F4 help

http://help.sap.com/saphelp_nw2004s/helpdata/en/79/34a246d9b511d1950e0000e8353423/content.htm

Regards

Sudheer