How to add f4 help for a parameter in selection screen (Report)

hai friends
I am hving a pblm regarding the F4 help in selection screen for a parameter field ,currenly this parameter field is for personnel number , now in f4 help all the personnel numbers r listing ,i need to include the name of the corresponding personnel numbers along with it ,how do i do that .please give me a help.
thankyou

Hai
you first extract personal number and name into one internal table say itab.
THEN CALL THE FM.
AT SELECTION-SCREEN ON VALUE REQUEST FOR P_PARAMETER.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      RETFIELD     = P_PARAMETER
       DYNPPROG     = SY-REPID
      DYNPNR       = SY-DYNNR
      VALUE_ORG    = 'S'
      WINDOW_TITLE = 'Open Quantity'
    TABLES
      VALUE_TAB    = ITAB.

Similar Messages

CLM How to add search-help for extension field(New Company Field) in MA.

Hi all,
Based on demand,I need to extend a new field(Company) in Master Agreement.
But I do not know how to add search-help for this field,just like User Accont page.
Anyone can help me ?thank you very muck.
Regards,
JackyCheng

Hello Jacky,
To combine all the answers above and have a topic-based reply please go through the below steps:
#1. Inactivate the current extension field Company (I see it is actually a String value and this is not what you want to have)
#2. Go to Setup -> System Setup -> Extension Reference Types
Check if you already have a Company reference type
If not, create a new Extension Reference Type for Class Company. Fill in all required information.
#3. Create a new Extension Attribute
Select Data Type: Object Reference
Now you can add the Company type as reference
Regards,
Bogdan Toma

How to add F1 help for a field on ALV grid

Hi All,
When we execute a program, the output is displayed using ALV grid.
on the ALV grid, if we press F1 on a field, it should popup the help document.
How to add F1 help for a field on ALV grid.
Thank you all in advance.

fill field LVC_S_FCAT-ROLLNAME of your fieldcatalog in method SET_TABLE_FOR_FIRST_DISPLAY
A.

How to add search help for standard field LIKP-TRAID

Hi friends,
How to add search help for standard field LIKP-TRAID ,
refer screen
Program Name SAPMV50A
Screen Number 2108
TrnsIDCode ( LIKP-TRAID ) ..
I need to add a search help, so that i can retrieve data from Ztable.
Thanks.
Abhi

Hi Abhi,
Try using any one option:
Create a Search Help in SE11.
Now Goto SE11 -> Enter Ztable -> Select that field -> Click Search Help and try to assign the created Search help to that field in your Ztable explicitly
OR
Create a Zdata element in SE11.
In Data Element, under Further Characteristics tab, enter Name Parameters of Search Help.
Assign this data element to that field in ur Ztable.
OR
Create a Zdomain and maintain a Value Table or Fixed Values for it.
Assign this domain to that field in ur Ztable.

How can we place a F4 help in a parameter in selection screen

Hi,
How can we place a F4 help in a parameter in selection screen. Can we do add a Process 0n Value request similar to a module pool prg in stadard report program.
saji

Hello Saji,
Try below attached report.
Regards,
Naimesh.
Reward, if it is useful..!
REPORT ZTEST_NP_1.
DATA: HELPVAL1 LIKE HELP_VALUE OCCURS 0 WITH HEADER LINE .
DATA: VALUE_TAB     LIKE PDTASK-OTEXT OCCURS 2 WITH HEADER LINE.
DATA: VALUE         LIKE FEBMKA-BANKN,
      GIVEN_VALUE   LIKE HELP_INFO-FLDVALUE.
DATA: IT_T005T LIKE T005T OCCURS 0 WITH HEADER LINE,
      IT_T002T LIKE T002T OCCURS 0 WITH HEADER LINE.
SELECTION-SCREEN: BEGIN OF BLOCK BLK1 WITH FRAME TITLE ABC.
PARAMETERS:       P_SPRAS LIKE T002T-SPRAS,
                  P_LAND1 LIKE T005T-LAND1.
SELECTION-SCREEN: END   OF BLOCK BLK1.
INITIALIZATION.
ABC = 'Selection Criteria:'.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_LAND1.
PERFORM VALUE_REQUEST_LAND1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_SPRAS.
PERFORM VALUE_REQUEST_SPRAS.
*&      Form VALUE_REQUEST_land1
FORM VALUE_REQUEST_LAND1.
*---- Reading the Screen values.
DATA: LT_DYNPFIELDS LIKE DYNPREAD OCCURS 0 WITH HEADER LINE,
        LV_DYNAME     LIKE D020S-PROG,
        LV_DYNUMB     LIKE D020S-DNUM.
*-------Append field which you want to read from the screen
LV_DYNAME = SY-REPID.
LV_DYNUMB = SY-DYNNR.
LT_DYNPFIELDS-FIELDNAME = 'P_SPRAS'.
APPEND LT_DYNPFIELDS.
CALL FUNCTION 'DYNP_VALUES_READ'
       EXPORTING
            DYNAME     = LV_DYNAME
            DYNUMB     = LV_DYNUMB
       TABLES
            DYNPFIELDS = LT_DYNPFIELDS.
SELECT * FROM T005T
         INTO TABLE IT_T005T
         WHERE SPRAS = P_SPRAS.
    REFRESH: HELPVAL1, VALUE_TAB.
    CLEAR:   HELPVAL1, VALUE_TAB, GIVEN_VALUE, VALUE.
*---- Append field name for the columns in the help popup
    HELPVAL1-TABNAME    = 'T005T' .
    HELPVAL1-FIELDNAME = 'LAND1' .
    HELPVAL1-SELECTFLAG = 'X' . " will return the value on the screen
    APPEND HELPVAL1 .
    CLEAR HELPVAL1 .
    HELPVAL1-TABNAME    = 'T005T' .
    HELPVAL1-FIELDNAME = 'LANDX' .
    HELPVAL1-SELECTFLAG = ' ' .
    APPEND HELPVAL1 .
    CLEAR HELPVAL1 .
    LOOP AT IT_T005T.
      VALUE_TAB = IT_T005T-LAND1.
      APPEND VALUE_TAB.
      VALUE_TAB = IT_T005T-LANDX.
      APPEND VALUE_TAB.
    ENDLOOP.
    GIVEN_VALUE    = P_LAND1.
    CALL FUNCTION 'HELP_VALUES_GET_WITH_VALUE'
       EXPORTING
            DISPLAY      = SPACE
            GIVEN_VALUE = GIVEN_VALUE
       IMPORTING
            SELECT_VALUE = VALUE
       TABLES
            FIELDS       = HELPVAL1
            VALUETAB     = VALUE_TAB.
    IF NOT VALUE IS INITIAL.
      P_LAND1 = VALUE. " Assing value to the parameter
    ENDIF.
ENDFORM.                    " VALUE_REQUEST_land1
*&      Form VALUE_REQUEST_SPRAS
FORM VALUE_REQUEST_SPRAS.
REFRESH: HELPVAL1, VALUE_TAB.
CLEAR:   HELPVAL1, VALUE_TAB, GIVEN_VALUE, VALUE.
HELPVAL1-TABNAME    = 'T002T' .
HELPVAL1-FIELDNAME = 'SPRSL' .
HELPVAL1-SELECTFLAG = 'X' .
APPEND HELPVAL1 .
CLEAR HELPVAL1 .
HELPVAL1-TABNAME    = 'T002T' .
HELPVAL1-FIELDNAME = 'SPTXT' .
HELPVAL1-SELECTFLAG = ' ' .
APPEND HELPVAL1 .
CLEAR HELPVAL1 .
SELECT * FROM T002T
         INTO   TABLE IT_T002T
         WHERE SPRAS = SY-LANGU.
LOOP AT IT_T002T.
    VALUE_TAB = IT_T002T-SPRSL.
    APPEND VALUE_TAB.
    VALUE_TAB = IT_T002T-SPTXT.
    APPEND VALUE_TAB.
ENDLOOP.
GIVEN_VALUE    = P_SPRAS.
CALL FUNCTION 'HELP_VALUES_GET_WITH_VALUE'
       EXPORTING
          DISPLAY      = SPACE
          GIVEN_VALUE = GIVEN_VALUE
       IMPORTING
          SELECT_VALUE = VALUE
       TABLES
          FIELDS       = HELPVAL1
          VALUETAB     = VALUE_TAB.
IF NOT VALUE IS INITIAL.
    P_SPRAS = VALUE.
ENDIF.
ENDFORM.                    " VALUE_REQUEST_SPRAS

How to add F4 help for the custom field of a custom table

Hi All,
How to add F4 help to the custom table field? in the table maintainance when user clicks on F4 i want to provide possible values for this field I am trying to write the code in the screen of table maintainace like the following
PROCESS ON VALUE-REQUEST.
FIELD ZTEST_MAH_F4-KUNNR MODULE zVALUE_kunnr .
But when i am double clicking on module it's giving options to create include program but after that it's giving user is currently editing the table i am not getting this can some body clarify my doubt it's gr8 if some body give some examp code
Thanks&Regards
mahesh

Hi,
Create a subroutine under the event and call the following FM
1. Select all the related data into an itab, for ex i_kunnr
2.    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
    DDIC_STRUCTURE         = ' '
       retfield               = 'KUNNR'
    PVALKEY                = ' '
       dynpprog               = sy-repid
       dynpnr                 = '1000'
       dynprofield            = <selection screen field>
    STEPL                  = 0
    WINDOW_TITLE           =
    VALUE                  = ' '
       value_org              = 'S'
    MULTIPLE_CHOICE        = ' '
    DISPLAY                = ' '
    CALLBACK_PROGRAM       = ' '
    CALLBACK_FORM          = ' '
    MARK_TAB               =
IMPORTING
    USER_RESET             =
      TABLES
       value_tab              = <b>i_kunnr</b>
    FIELD_TAB              =
       return_tab             = < return table >
    DYNPFLD_MAPPING        =
     EXCEPTIONS
       parameter_error        = 1
       no_values_found        = 2
       OTHERS                 = 3

How to add F1 help for a field

hello.
could you plese send me a small program , add F1 help for a field ,
it's very urgent !
best regards
srinivas

data: it_ret like ddshretval occurs 0 with header line,
         IT_MSEG_TEMP LIKE IT_MSEG OCCURS 0 WITH HEADER LINE.
At selection-screen on value-request for s_mat-low.
Select MBLNR from mkpf into table it_mblnr.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
DDIC_STRUCTURE         = ' '
      RETFIELD               = 'MBLNR'
PVALKEY                = ' '
DYNPPROG               = ' '
DYNPNR                 = ' '
DYNPROFIELD            = ' '
STEPL                  = 0
WINDOW_TITLE           =
VALUE                  = ' '
     VALUE_ORG              = 'S'
MULTIPLE_CHOICE        = ' '
DISPLAY                = ' '
CALLBACK_PROGRAM       = ' '
CALLBACK_FORM          = ' '
MARK_TAB               =
IMPORTING
USER_RESET             =
    TABLES
      VALUE_TAB              = IT_MBLNR
FIELD_TAB              =
     RETURN_TAB             = IT_RET
DYNPFLD_MAPPING        =
EXCEPTIONS
PARAMETER_ERROR        = 1
NO_VALUES_FOUND        = 2
OTHERS                 = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
IF SY-SUBRC = 0.
    read table it_ret index 1.
    move it_ret-fieldval to S_mat-low.
ENDIF.
At selection-screen on value-request for s_mat-high.
Select MBLNR from mkpf into table it_mblnr.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
DDIC_STRUCTURE         = ' '
      RETFIELD               = 'MBLNR'
PVALKEY                = ' '
DYNPPROG               = ' '
DYNPNR                 = ' '
DYNPROFIELD            = ' '
STEPL                  = 0
WINDOW_TITLE           =
VALUE                  = ' '
     VALUE_ORG              = 'S'
MULTIPLE_CHOICE        = ' '
DISPLAY                = ' '
CALLBACK_PROGRAM       = ' '
CALLBACK_FORM          = ' '
MARK_TAB               =
IMPORTING
USER_RESET             =
    TABLES
      VALUE_TAB              = IT_MBLNR
FIELD_TAB              =
     RETURN_TAB             = IT_RET
DYNPFLD_MAPPING        =
EXCEPTIONS
PARAMETER_ERROR        = 1
NO_VALUES_FOUND        = 2
OTHERS                 = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
IF SY-SUBRC = 0.
    read table it_ret index 1.
    move it_ret-fieldval to S_mat-high.
ENDIF.

IW31- How to add Search help for User specific fields in IW31 transaction.

Hi Experts,
I have to add Search help for standard fields USR00 to USR10 fields in IW31 transaction.
Is there any user exit for this requirement.
Please reply, it will be very helpful for me.
Regards,
B. V. Rao

Bala,
See the following user-exits:
IWO10015: F4 Help for user fields on operation
IWO10016: Customer enhancement to check operation user fields
PeteA
[www.pjas.com]

How to add a new Field in the Dynamic Selection screen section.

HI,
There is a requirement in which I need to add a field in existing program of dynamic selections.
I need to add a field KNKK-DBRTG (Customer Rating) in dynamic selections screen of some existing report
which has a dynamic selection screen with other fields like customer account, company code etc. Along with this i need to add Customer rating field also in the selection screen.
I have used GET KNKK statement to select this in the Dynamic selection screen. But I need to make it appear
on the screen.
LDB used is the Customer Database.
I have added GET KNKK statement after GET KNA1 statement.
Can any one help me how we can make this rating field appear in the selection screen.
With the GET statement Credit control area Fields can be selected in the selection screen but I have to permanantly add the field in the selection screen.
Regards
Prashant Prabhu

Hi,
So you need that this new field have data in old records?
1.- If you are in BI 7.0 and the logic or data for that New field are in the same Dimension, you can use a Remodeling to fill it. I mean if you want if you want to load from a Master Data from other InfoObject in the same Dim.
2.- If condition "1" is not yours.
First add the new field, then create a Backup Cube (both cubes with the new field) and make a full update with all information in the original Cube. The new field willl be empty in both cubes.
Create an UR from BackUp_Cube to Original_Cube with all direct mapping and create a logic in the Start Routine of the UR (modiying the data_package) you can look for the data in the DSO that you often use to load.
To do that both cubes have to be Datasources ( right click on Cube-> aditional function-> and I think is "Extract Datasource")
Hope it helps. Regards, Federico

How to add search help for field in ALV object

Hello,
In a program, we use ALV object ( container) to create a liste like : field1, field2 .. but when display we do not have search help for this . Could you please help me how to add match code in this case for field 1 and field2, We use set_table_for_first_display
Thanks,

Hi,
when you define your field catalogue you can create data elements with search help in se11 and use them for field 1 and field 2.
But maybe it is enough to use data elements belonging to a domain with a value help and to set field F$AVAILABL in the field catalogue or to fill the name of the field CHECKTABLE.
Regards,
Klaus

How to get search help for 2nd parameter based on the 1st parameter value

Hi all!
   I have 2 parameters (material no, revision level). I have created a search help for revision level. It has an importing parameter :material no. and one exporting parameter : revision level.When I checked it, it's giving the revision values only for the specified.
In my report , I have kept these 2 materials in my selection screen.For revision level , I have added the matchcode object which I have created. When I pressed F4 for revision level, it's giving all the values irrespective of the material no. in the first parameter. How to solve it? Please suggest.

Hi,
Try this code filling internal table fields,
DATA: BEGIN OF values,
        OID TYPE ZCL_OBJECT-OBJECTID,
        ODEC TYPE ZCL_OBJECT-OBJECT_DESC,
       END OF values,
       W_FIELD(10).
DATA: ZCL_PROJECT-PROJECTID type zcl_project-projectid,
      ZCL_OBJECT-OBJECTID(5).
DATA: progname TYPE sy-repid,
      dynnum   TYPE sy-dynnr,
      dynpro_values TYPE TABLE OF dynpread,
      field_value LIKE LINE OF dynpro_values,
      values_tab LIKE TABLE OF values.
CALL SCREEN 100.
*&      Module VALUE_PROJECTID INPUT
      text
*MODULE VALUE_PROJECTID INPUT.
CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
      EXPORTING
           tabname     = 'ZCL_PROJECT'
           fieldname   = 'PROJECTID'
           dynpprog    = progname
           dynpnr      = dynnum
           dynprofield = 'ZCL_PROJECT-PROJECTID'.
*ENDMODULE.                 " VALUE_PROJECTID INPUT
*&      Module VALUE_OBJECTID INPUT
      text
MODULE VALUE_OBJECTID INPUT.
   CALL FUNCTION 'DYNP_VALUES_READ'
       EXPORTING
            dyname             = progname
            dynumb             = dynnum
            translate_to_upper = 'X'
       TABLES
            dynpfields         = dynpro_values.
READ TABLE dynpro_values INDEX 1 INTO field_value.
W_FIELD = FIELD_VALUE-FIELDVALUE.
SELECT OBJECTID
          OBJECT_DESC
    FROM ZCL_OBJECT
    INTO (VALUES-OID,
           VALUES-ODEC)
WHERE PROJECTID = FIELD_VALUE-FIELDVALUE.
   APPEND VALUES TO VALUES_TAB.
ENDSELECT.
   CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
       EXPORTING
            retfield    = 'OID'
            dynpprog    = progname
            dynpnr      = dynnum
            dynprofield = 'ZCL_OBJECT-OBJECTID'
            value_org   = 'S'
       TABLES
            value_tab   = values_tab.
ENDMODULE.                 " VALUE_OBJECTID INPUT
*&      Module INIT OUTPUT
      text
MODULE INIT OUTPUT.
progname = sy-repid.
dynnum   = sy-dynnr.
CLEAR: field_value, dynpro_values.
field_value-fieldname = 'ZCL_PROJECT-PROJECTID'.
APPEND field_value TO dynpro_values.
IF SY-UCOMM = 'BACK'.
    LEAVE program.
ENDIF.
IF SY-UCOMM = 'ANS'.
   LEAVE TO SCREEN '0'.
ENDIF.
ENDMODULE.                 " INIT OUTPUT
START-OF-SELECTION.
WRITE: / field_value-fieldvalue,
         W_FIELD.
LOOP AT VALUES_TAB INTO VALUES.
    WRITE / VALUES.
ENDLOOP.
if sy-subrc <> 0.
    WRITE / field_value-fieldvalue.
endif.
Plzz reward points if it helps

How to add one column for entry in the TLB screen?

Hi all,
Does anybody know how to add a customised column for free text in the TLB header screen? The reason is user needs to add ship or container no. This info will be later on interfaced via CIF exit to R/3.
I think many of you have the same requirement.
Thanks heaps!

Thanks Digambar,
Can you help to work out more detail on how to customize the code in the TLB screen?
Are you thinking of adding one field in the table and making the ALV grid control editable? If you have any reference doc/link to do it, it would great!
Cheers,

F4 help for file path in selection screen.

Hi there,
I defined one parameter p_path for file path using RLGRAP-FILENAME. I have not got F4 for this. How to solve this problem, can anybody pls help.
Regards,
Naseer.

Hi,
refer to the following code:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_pc.
DATA: it_tab TYPE filetable,
          wf_subrc TYPE i.
DATA: wf_pcfile LIKE rlgrap-filename.
DATA: wf_filter TYPE string,
        wf_dir TYPE string,
        wf_title TYPE string,
        wf_ext TYPE string.
* if p_ml = 'X'.                  "Manula Load - PC File
wf_title = text-012.          "Window title
wf_ext = '.TXT'.           "Extension of the file
wf_filter = 'Text Files (*.TXT)|*.TXT'.         "File Type
wf_dir = wf_pcfile.           "Directory
*Adds a GUI-Supported Feature
CALL METHOD cl_gui_frontend_services=>file_open_dialog
    EXPORTING
      window_title      = wf_title
      default_extension = wf_ext
      file_filter       = wf_filter
      initial_directory = wf_dir
    CHANGING
      file_table        = it_tab
      rc                = wf_subrc.
Hope this helps.
<REMOVED BY MODERATOR>
Regards,
Sipra
Edited by: Alvaro Tejada Galindo on Jan 31, 2008 9:48 AM

Search help for custom entries in selection screen

Hi Gurus,
I have a requirement of adding four entries as a search help to a selection screen field P_TABLE.I tried using the function module F4IF_INT_ TABLE_VALUE_REQUEST as below.I want to add four entries Revenue,Cost,RIH and Summarised WBS Actual Data for the selection screen field P_TABLE but the problem is the function module is not getting triggered.
See the code below.
REPORT Z_DEL_OHTABLE.
DATA: V_RESPONSES(6),
      V_TEXTS LIKE ALDBOUT,
      V_PROG TYPE SY-REPID,
      V_DYNNR TYPE SY-DYNNR.
DATA: begin of it_openhubs occurs 0,
      v_tabname type c length 30,
      end of it_openhubs.
DATA:
       it_return type STANDARD TABLE OF DDSHRETVAL,
       wa_return like line of it_return,
      l_i_field_tab TYPE STANDARD TABLE OF dfies INITIAL SIZE 0,
      l_i_dynpfld_mapping TYPE STANDARD TABLE OF dselc INITIAL SIZE 0.
SELECTION-SCREEN BEGIN OF BLOCK B0 WITH FRAME TITLE title.
parameters:P_TABLE(30) type c. " USER-COMMAND UPD,
SELECTION-SCREEN END OF BLOCK B0.
V_PROG = SY-REPID.
V_DYNNR = SY-DYNNR.
it_openhubs-v_tabname = 'Cost and Expense'.
      append it_openhubs.
it_openhubs-v_tabname = 'Revenue'.
append it_openhubs.
   it_openhubs-v_tabname = 'Revenue in Hand'.
   append it_openhubs.
    it_openhubs-v_tabname = 'Summarised WBS Actual Data'.
    append it_openhubs.
    CLEAR IT_OPENHUBS.
INITIALIZATION.
title = 'OH TABLE DELETION- DELETE CAREFULLY'.
START-OF-SELECTION.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_TABLE.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    DDIC_STRUCTURE         = ' '
      RETFIELD               = 'v_tabname'
    PVALKEY                = ' '
     DYNPPROG               = V_PROG
     DYNPNR                 = V_DYNNR
     DYNPROFIELD            = 'P_TABLE'
    STEPL                  = 0
    WINDOW_TITLE           =
    VALUE                  = ' '
     VALUE_ORG              = 'S'
    MULTIPLE_CHOICE        = ' '
    DISPLAY                = ' '
    CALLBACK_PROGRAM       = ' '
    CALLBACK_FORM          = ' '
    MARK_TAB               =
IMPORTING
    USER_RESET             =
    TABLES
      VALUE_TAB              = it_openhubs
    FIELD_TAB              = l_i_field_tab
    RETURN_TAB             = it_return
    DYNPFLD_MAPPING        = l_i_dynpfld_mapping
EXCEPTIONS
    PARAMETER_ERROR        = 1
    NO_VALUES_FOUND        = 2
    OTHERS                 = 3
IF SY-SUBRC <> 0.
    READ TABLE it_return INTO wa_return INDEX 1.
     IF sy-subrc EQ 0.
p_table = wa_return-fieldval.
     endif.
Please help me out.
Thanks,
Srini.
Edited by: Srinivasan Ganapathy on Jan 28, 2010 6:05 AM

Hi ,
Change your code as below:
1. Fill the internal table it_openhubs inside the event "at selection screen on value request".
2. Always follow the below sequence:
    Initialisation
   At selection screen
   Start of selection.
3. The declaration of variable v_tabname is changed from type c length 30 to type char30.
I tried the below code , its working fine.
DATA: V_RESPONSES(6),
      V_TEXTS LIKE ALDBOUT,
      V_PROG TYPE SY-REPID,
      V_DYNNR TYPE SY-DYNNR.
DATA: begin of it_openhubs occurs 0,
      v_tabname type char30, " length 30,
      end of it_openhubs.
DATA:
       it_return type STANDARD TABLE OF DDSHRETVAL,
       wa_return like line of it_return,
      l_i_field_tab TYPE STANDARD TABLE OF dfies INITIAL SIZE 0,
      l_i_dynpfld_mapping TYPE STANDARD TABLE OF dselc INITIAL SIZE 0.
SELECTION-SCREEN BEGIN OF BLOCK B0 WITH FRAME TITLE title.
parameters:P_TABLE(30) type c. " USER-COMMAND UPD,
SELECTION-SCREEN END OF BLOCK B0.
INITIALIZATION.
title = 'OH TABLE DELETION- DELETE CAREFULLY'.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_TABLE.
V_PROG = SY-REPID.
V_DYNNR = SY-DYNNR.
clear IT_OPENHUBS.
it_openhubs-v_tabname = 'Cost and Expense'.
      append it_openhubs.
it_openhubs-v_tabname = 'Revenue'.
append it_openhubs.
   it_openhubs-v_tabname = 'Revenue in Hand'.
   append it_openhubs.
    it_openhubs-v_tabname = 'Summarised WBS Actual Data'.
    append it_openhubs.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'v_tabname'
      dynpprog        = v_prog
      dynpnr          = v_dynnr
      dynprofield     = 'P_TABLE'
      value_org       = 'S'
    TABLES
      value_tab       = it_openhubs
      return_tab      = it_return
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc <> 0.
    READ TABLE it_return INTO wa_return INDEX 1.
    IF sy-subrc EQ 0.
      p_table = wa_return-fieldval.
    ENDIF.
ENDIF

How to populate values in a Listbox parameter in selection screens

I have a parameter(as list box) field in selection screens. And now I want to populate a list from a ztable field values. How to do that.
Thanks in Advance

Hi,
You have to use the FM VRM_SET_VALUES.
Check this example..
TYPE-POOLS: vrm.
PARAMETERS: p_test TYPE char4 AS LISTBOX VISIBLE LENGTH 10.
DATA: t_data TYPE vrm_values.
INITIALIZATION.
DATA: s_data TYPE vrm_value.
<b>***Here you to have to do the select and populate the internal table
***t_data.</b>
s_data-key = 'ABCD'.
s_data-text = 'First four'.
APPEND s_data TO t_data.
s_data-key = 'EFGHI'.
s_data-text = 'Second four'.
APPEND s_data TO t_data.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
id = 'P_TEST'
values = t_data
EXCEPTIONS
id_illegal_name = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
START-OF-SELECTION.
WRITE: / p_test.
Thanks,
Naren

How to add f4 help for a parameter in selection screen (Report)

Similar Messages

Maybe you are looking for