Possible entries for selection screen field

Hi,
I have created a custom DDIC table Z_TAB which contains 3 fields of type char. The table contains about 100 rows of data. I want that at the selection screen, for each selection field a list of entries in the table should appear. E.g. Data rows:
Field1       Field2      Field3
aaaaa       bbbbb      ccccc
bbbbb       bbbbb      ccccc
ccccc       bbbbb      ccccc
(contd.)    (contd.)    (contd.)
Now at the selection screen:
Field1 _________
Field2 _________
Field3 _________
It is required that at selection screen:
Field1 should give the option of entries: aaaaa, bbbbb, ccccc, ...
Field2 should give the option of entries: bbbbb, ...
Field3 should give the option of entries: ccccc, ...
and so on, like for the standard DDIC tables.
How can this be achieved? Help is appreciated.
Regards

Hi,
AT selection-screen output even you read the records of the table into internal table and then At selection-screen on value request event you
use function module F4IF_FIELD_INT_TABLE_VALUE_REQUEST
(dont exacty remember the FM sorry but will be of similar kind)
and populate value for that functional module for each field in the even
ON VALUE REQUEST FOR PARTICULAR field by reading that record from first to the FIRST FIELD and from second record to second Field and from Third to the THIRD FIELD..
Hope this would solve your problem
Regards
Narin Nandivada.

Similar Messages

Default value for selection screen field

Hi all,
I am using LDB PNPCE. I want to give default value for field Personnel area on selection screen.
How can I do it?
Thanks
Rahul

Hi Rahul,
In the INITIALIZATION event we can set the default values for selection screen fields.
INITIALIZATION.
loop at screen.
if screen-name = 'S_MATNR-LOW'.
CLEAR S_MATNR.
s_matnr-low = '1234'.
s_matnr-option = 'EQ'.
s_matnr-sign = 'I'.
append s_matnr.
CLEAR S_MATNR.
s_matnr-high = '5678'.
s_matnr-option = 'EQ'.
s_matnr-sign = 'I'.
append s_matnr
clear s_matnr.
endif.
endloop.
Hope it helps.
Mark if useful
Regards,
Saumya

How to put Mandatory option for selection screen fields in ABAP Queries

Hi Experts
Can anyone tell me how to put mandatory option for the selection screen fields in ABAP Queries.
Manually I had written code in the At Selection Screen option in infoset to display error message if that field is blank.
But I need to display the selection fields with the tick mark (obligatory mark).
How to do this?
Appropriate answers will be awarded

Hi
For parameter option
parameters : p_kunnr type kna1-kunnr obligatory.
For select option
select-options: s_date for vbak-erdat obligatory.
Plz rewards points ,
Regards ,
Ganesh.

F4 hep for selection screen field

Hello ,
Im trying to create custom f4 help for Parameter ekbe-belnr by using below code. It displaying F4 values for EKBE-belnr. But when i select any value in F4 hlep , its not displaying in Selection Field. How can i reflect selected value in to selection field.
REPORT YMP.
Parameter: p_belnr type ekbe-belnr.
types: begin of tys_itab,
belnr type ekbe-belnr,
end of tys_itab.
data: itab type table of tys_itab.
at selection-screen on value-request for p_belnr.
select belnr from bkpf into table itab .
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
DDIC_STRUCTURE =
retfield = 'BELNR'
PVALKEY = ' '
DYNPPROG = Sy-repid
DYNPNR = SY-DYNNR
DYNPROFIELD = ' '
STEPL = 0
WINDOW_TITLE =
VALUE = ' '
VALUE_ORG = 'S'
MULTIPLE_CHOICE = ' '
DISPLAY = ' '
CALLBACK_PROGRAM = ' '
CALLBACK_FORM = ' '
MARK_TAB =
IMPORTING
USER_RESET =
tables
value_tab = itab
FIELD_TAB =
RETURN_TAB =
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.
Thanks for ur time and help
sanjana

hi,
F4IF_INT_TABLE_VALUE_REQUEST
 This FM is used to dsiplay values stored in an internal table as input
help.This FM is used to program our own custom help if no such input help
exists in ABAP dictionary for a particular field. The parameter VALUE_TAB is used to pass the internal table containing input values.The parameter RETFIELD
is used to specify the internal table field whose value will be returned to the screen field or RETURN_TAB.
 If DYNPNR,DYNPPROG and DYNPROFIELD are specified than the user selection is passed to the screen field specified in the DYNPROFIELD. If RETURN_TAB is specified the selectionis returned in a table.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
 EXPORTING
 RETFIELD = field from int table whose value will be returned
 DYNPPROG = SY-CPROG
 DYNPNR = SY-DYNNR
 DYNPROFIELD = 'screen field'
 VALUE_ORG = 'S'
 TABLES
 VALUE_TAB = internal table whose values will be shown.
 RETURN_TAB = internal table of type DDSHRETVAL
 EXCEPTIONS
 parameter_error = 1
 no_values_found = 2
 others = 3.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
 retfield = 'BELNR' " or belnr
 DYNPPROG = Sy-repid " or SY-CPROG
 DYNPNR = SY-DYNNR
 DYNPROFIELD = 'p_belnr'
 VALUE_ORG = 'S'
tables
 value_tab = itab
regards,
Ashok Reddy

Search help for selection screen field

Hi ,
steps for creating search help for a key field in selection screen..
tables is a userdefined from which the field is taken..
thxs,
vind

hi,
c this.
REPORT ZXYZ_0002 .
data: dynfields type table of dynpread with header line.
data: return type table of ddshretval with header line.
selection-screen begin of block b1 with frame title text-001 .
selection-screen begin of line.
PARAMETERS: P_BUKRS type T001-BUKRS.
selection-screen comment 30(20) BUTXT for field p_bukrs.
selection-screen end of line.
selection-screen end of block b1.
at selection-screen output.
if butxt is initial.
   select single butxt into butxt
         from t001
        where bukrs = p_bukrs.
endif.
at selection-screen on value-request for p_bukrs.
call function 'F4IF_FIELD_VALUE_REQUEST'
       exporting
            tabname           = 'T001'
            fieldname         = 'BUKRS'
            dynpprog          = sy-cprog
            dynpnr            = sy-dynnr
            dynprofield       = 'P_BUKRS'
       tables
            return_tab        = return
       exceptions
            field_not_found   = 1
            no_help_for_field = 2
            inconsistent_help = 3
            no_values_found   = 4
            others            = 5.
read table return with key fieldname = 'P_BUKRS'.
Add it back to the dynpro.
dynfields-fieldname = return-retfield.
dynfields-fieldvalue = return-fieldval.
append dynfields.
Get the company code from db and add to dynpro
data: xt001 type t001.
clear xt001.
select single * into xt001
         from t001
        where bukrs = return-fieldval.
dynfields-fieldname = 'BUTXT'.
dynfields-fieldvalue = xt001-butxt.
append dynfields.
Update the dynpro values.
call function 'DYNP_VALUES_UPDATE'
       exporting
            dyname     = sy-cprog
            dynumb     = sy-dynnr
       tables
            dynpfields = dynfields
       exceptions
            others     = 8.
start-of-selection.
rgsds
anver
if hlped mark points

Multiple Selection For Selections screen field

Hi Friends ,
Can any body tell me how to create multiple selection for a field in selection screen and how to capture all those values of that fields in program for database selction. Suppose i am having document number EBELN from EKKO exists in selectio screen . how to create multiple selection for that and how to use all those values given to EBELN to get data from EKKO.
Kumar.

hi,
select-options is one type of parameters where u can give multiple values in ranges or single as a input. when u use select-options then system will create a selection screen for u and u give multiple values as
ex:
select-options: s_ebeln for ekko-ebeln.
internally system creates a internal for s_ebeln which has for attributes
1. low --- starting value if range is used
2. high -
ending value
3. sign -
operator used for validating field
4. option -
to exclude given range of values or single value or to include.
for this u can assign default values in INITIALIZATION event as
INITIALIZATION.
s_ebeln -low = '1'.
s_ebeln- high = '100-100'.
s_ebeln-sign = 'BT'.
s_ebeln-option = 'I' // include
'E' // exclude.
if helpful reward some points.
with regards,
Suresh Aluri.

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

Can we create serach help for a selection screen field

Can we create serach help for a selection screen field with out creating searchhelp object.
I mean is it possible to create serchelp in the program itself with some specific values i want to give.
E.g say we can define any internal table and fill it with values and using that into selection screen fields
Regards
Mave

AT SELECTION-SCREEN ON VALUE-REQUEST FOR paymeth.
PERFORM PAYMENT_HELP.
FORM PAYMENT_HELP.
DATA: begin of DESCR_TAB occurs 0,
        DESCR LIKE BKPF-BKTXT,
        END OF DESCR_TAB.
DATA: gd_repid like sy-repid.
gd_repid = sy-repid.
DESCR_TAB-DESCR = 'aaaaa'.
append DESCR_TAB.
DESCR_TAB-DESCR = 'bbbbb'.
append DESCR_TAB.
DESCR_TAB-DESCR = 'ccccc'.
append DESCR_TAB.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
       EXPORTING
            retfield    = 'DESCR'
            DYNPPROG    = gd_repid
            DYNPNR      = '1000'
            DYNPROFIELD = 'paymeth'
            VALUE_ORG   = 'S'
            DISPLAY     = ' '
       TABLES
            value_tab   = DESCR_TAB.
endform.
Svetlin

Selection-screen fields validation for dialog

Hello ABAP Gurus
Requirements: this is a report wherein , depending upon the correct select-options , user will pick some field values from table and some will be entered by the user in the next se51 custom screen for creation of a record in a ztable .
the problem is :without validating select-options values , it calls the se51 screen 100.
How to keep the cursor at the selection-screen field until & unless user enters the correct i/p s .if i/p are correct then only it should call screen 100 otherwise remain in the selection screen only .
*& Report ZSD_REP_QUOT_BANK_CREATE *
REPORT ZSD_REP_QUOT_BANK_CREATE NO STANDARD PAGE HEADING LINE-SIZE 255.
TABLES: VBAK,VBAP,VBRK,ZSD_TABL_QOTBANK,MARA,KONV.
DATA: OK_CODE LIKE SY-UCOMM,
SAVE_OK_CODE LIKE SY-UCOMM,
WA_ITAB LIKE ZSD_TABL_QOTBANK,
ANSWER TYPE C,
COPIED ,
STS TYPE N,
EMGRP LIKE MARA-EXTWG,
QTY LIKE ZSD_TABL_QOTBANK-QTY,
UPRICE LIKE ZSD_TABL_QOTBANK-UPRICE,
TOT LIKE ZSD_TABL_QOTBANK-TOT,
INO LIKE VBAP-POSNR.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-000.
SELECT-OPTIONS: S_QTNO FOR ZSD_TABL_QOTBANK-QTNO
NO INTERVALS NO-EXTENSION OBLIGATORY,
S_ITNO FOR ZSD_TABL_QOTBANK-ITNO
NO INTERVALS NO-EXTENSION OBLIGATORY.
S_MATNO FOR ZSD_TABL_QOTBANK-MATNO
NO INTERVALS NO-EXTENSION. "
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN.
SELECT SINGLE VBTYP
INTO VBAK-VBTYP
FROM VBAK
WHERE VBELN IN S_QTNO.
IF SY-SUBRC EQ 0 AND VBAK-VBTYP NE 'B'.
MESSAGE I005(ZQOTBANK).
SET CURSOR FIELD S_QTNO-LOW.
SUBMIT (SY-REPID) VIA SELECTION-SCREEN.
ENDIF.
CLEAR WA_ITAB.
SELECT SINGLE QTNO ITNO
INTO WA_ITAB
FROM ZSD_TABL_QOTBANK
WHERE QTNO IN S_QTNO
AND ITNO IN S_ITNO.
IF SY-SUBRC EQ 0.
MESSAGE I001(ZQOTBANK).
SET CURSOR FIELD S_QTNO-LOW.
SET CURSOR FIELD S_ITNO-LOW.
SUBMIT (SY-REPID) VIA SELECTION-SCREEN.
ENDIF.
*START-OF-SELECTION.
END-OF-SELECTION.
CALL SCREEN 0100.
*& Module STATUS_0100 OUTPUT
text
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS '0100'.
SET TITLEBAR '0100'.
ZSD_TABL_QOTBANK-QTNO = S_QTNO-LOW.
SELECT SINGLE BUKRS_VF VKORG VTWEG SPART KUNNR ERDAT BNDDT
KNUMV
INTO (ZSD_TABL_QOTBANK-CCODE,
ZSD_TABL_QOTBANK-SORG,
ZSD_TABL_QOTBANK-DISTCHAN,
ZSD_TABL_QOTBANK-DIV,
ZSD_TABL_QOTBANK-CUSTNO,
ZSD_TABL_QOTBANK-QTDAT,
ZSD_TABL_QOTBANK-QTVALDAT,
VBAK-KNUMV)
FROM VBAK
WHERE VBELN IN S_QTNO
AND VBTYP = 'B'.
IF SY-SUBRC EQ 0.
SELECT SINGLE KWMENG POSNR MATNR
INTO (QTY , INO , ZSD_TABL_QOTBANK-MATNO)
FROM VBAP
WHERE VBELN IN S_QTNO.
SELECT SINGLE EXTWG
INTO EMGRP
FROM MARA
WHERE MATNR EQ ZSD_TABL_QOTBANK-MATNO.
ZSD_TABL_QOTBANK-ITNO = INO.
ZSD_TABL_QOTBANK-EMATGRP = EMGRP.
ZSD_TABL_QOTBANK-QTY = QTY.
SELECT SINGLE KBETR
INTO UPRICE
FROM KONV
WHERE KNUMV = VBAK-KNUMV
AND KPOSN = INO
AND KSCHL = 'PR00'.
ENDIF.
ZSD_TABL_QOTBANK-UPRICE = UPRICE.
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-CGL_QTY.
UPRICE = ZSD_TABL_QOTBANK-CGL_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-CGL_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-BHEL_QTY.
UPRICE = ZSD_TABL_QOTBANK-BHEL_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-BHEL_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-BHEL_QTY.
UPRICE = ZSD_TABL_QOTBANK-BHEL_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-BHEL_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-ALSTOM_QTY.
UPRICE = ZSD_TABL_QOTBANK-ALSTOM_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-ALSTOM_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-SIEMENS_QTY.
UPRICE = ZSD_TABL_QOTBANK-SIEMENS_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-SIEMENS_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-TELK_QTY.
UPRICE = ZSD_TABL_QOTBANK-TELK_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-TELK_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
QTY = ZSD_TABL_QOTBANK-OTH_QTY.
UPRICE = ZSD_TABL_QOTBANK-OTH_UPRICE .
TOT = QTY * UPRICE .
ZSD_TABL_QOTBANK-OTH_TOT = TOT .
CLEAR: QTY, UPRICE, TOT.
ENDMODULE. " STATUS_0100 OUTPUT
*& Module USER_COMMAND_0100 INPUT
text
MODULE USER_COMMAND_0100 INPUT.
CASE OK_CODE.
WHEN 'SAVE'.
INSERT ZSD_TABL_QOTBANK.
IF SY-SUBRC EQ 0.
MESSAGE I000(ZQOTBANK).
COMMIT WORK.
CALL SELECTION-SCREEN 1000.
ELSE.
MESSAGE E001(ZQOTBANK).
CALL SELECTION-SCREEN 1000.
ENDIF.
ENDCASE.
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Module EXIT_COMMAND INPUT
text
MODULE EXIT_COMAND INPUT.
SAVE_OK_CODE = OK_CODE.
CLEAR OK_CODE.
CASE SAVE_OK_CODE.
WHEN 'CANCEL'.
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = 'Quotation Bank Entry'
TEXT_QUESTION = 'Do you want to Cancel ?'
TEXT_BUTTON_1 = 'Yes'
TEXT_BUTTON_2 = 'No'
DEFAULT_BUTTON = '2'
IMPORTING
ANSWER = ANSWER.
IF ANSWER = '1'.
LEAVE PROGRAM.
ELSE.
CALL SELECTION-SCREEN 1000.
ENDIF.
WHEN 'EXIT'.
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = 'Quotation Bank Entry'
TEXT_QUESTION = 'Do you want to Exit ?'
TEXT_BUTTON_1 = 'Yes'
TEXT_BUTTON_2 = 'No'
DEFAULT_BUTTON = '2'
IMPORTING
ANSWER = ANSWER.
IF ANSWER = '1'.
LEAVE PROGRAM.
ELSE.
CALL SELECTION-SCREEN 1000.
ENDIF.
ENDCASE.
ENDMODULE. " EXIT_COMMAND INPUT
Thnx in Advance

Put the statement
CALL SCREEN 100
in the event AT SELECTION-SCREEN and NOT in END-OF-SELECTION.
Regards,
Subramanian V.

F4 Help for the selection screen field

Hi Gurus,
I have to display F4 help for a selection screen field. i am using following code:
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
         EXPORTING
              retfield        = 'CODE'
              dynpprog        = lw_repid
              dynpnr          = sy-dynnr
              VALUE_ORG       = 'S'
         TABLES
              value_tab       = gi_text
             field_tab       = li_fields_tab
              return_tab      = pi_return_tab
         EXCEPTIONS
              parameter_error = 1
              no_values_found = 2
              OTHERS          = 3.
My internal table gi_emp has two fields CODE & TEXT. When i select 1 particular value, it returns the CODE value in the pi_return_tab table.
But my requirement is i have to capture the corresponding TEXT value for the Returned CODE. Ex: following is the F4 help being displayed: -
001    test
001    test1
but is i select code 001(First Value), i also need to capture it's corresponding Text value. In return table pi_return_tab i have only Code value.
Please help me out.
Note: Based on return code i can't search into the internal table gi_code, because as shown in the example, code has multiple text.

Sachin,
I think this is what you need. The following code will return the key and the text (OR any other columns), if both columns are in the selection screen the selected values (both columns) will also be passed to the corresponding parameters. If you only need the text to be in the return table and not passed to the selection screen then set the parameter for text with NO-DISPLAY option.
REPORT zktest01 .
DATA :
BEGIN OF value_tab OCCURS 0,
    field LIKE e070-trkorr,
    text   LIKE e07t-as4text,
END OF value_tab.
DATA: t_fldtab LIKE dfies OCCURS 0 WITH HEADER LINE,
      t_rettab LIKE ddshretval OCCURS 0 WITH HEADER LINE,
      t_dynmap LIKE dselc OCCURS 0 WITH HEADER LINE.
PARAMETERS : p_field LIKE value_tab-field,
             p_text   LIKE value_tab-text. "NO-DISPLAY.
INITIALIZATION.
t_fldtab-tabname   = 'VALUE_TAB'.
t_fldtab-fieldname = 'FIELD'.
t_fldtab-langu     = 'E'.
t_fldtab-position = 1.
t_fldtab-offset    = 0.
t_fldtab-fieldtext = 'Key'.
t_fldtab-reptext   = 'Key'.
t_fldtab-leng      = 20.
t_fldtab-intlen    = 20.
t_fldtab-outputlen = 20.
t_fldtab-datatype = 'CHAR'.
t_fldtab-inttype   = 'C'.
t_fldtab-headlen   = 20.
t_fldtab-keyflag   = 'X'.
t_fldtab-lowercase = ' '.
APPEND t_fldtab.
t_fldtab-tabname   = 'VALUE_TAB'.
t_fldtab-fieldname = 'TEXT'.
t_fldtab-position = 2.
t_fldtab-offset    = 20.
t_fldtab-fieldtext = 'Text'.
t_fldtab-reptext   = 'Text'.
t_fldtab-leng      = 60.
t_fldtab-intlen    = 60.
t_fldtab-outputlen = 60.
t_fldtab-headlen   = 60.
t_fldtab-keyflag   = ' '.
t_fldtab-lowercase = ' '.
APPEND t_fldtab.
value_tab-field = '101'.
value_tab-text = 'dddd'.
APPEND value_tab.
value_tab-field = '202'.
value_tab-text = 'aaaa'.
APPEND value_tab.
t_dynmap-fldname = 'FIELD'.
t_dynmap-dyfldname = 'P_FIELD'.
APPEND t_dynmap.
t_dynmap-fldname = 'TEXT'.
t_dynmap-dyfldname = 'P_TEXT'.
APPEND t_dynmap.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_field.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
       EXPORTING
            retfield        = 'FIELD'
            dynpprog        = 'ZKTEST01'
            dynpnr          = '1000'
            dynprofield     = 'P_FIELD'
            value_org       = 'S'
       TABLES
            field_tab       = t_fldtab
            value_tab       = value_tab
            return_tab      = t_rettab
            dynpfld_mapping = t_dynmap
       EXCEPTIONS
            parameter_error = 1
            no_values_found = 2
            OTHERS          = 3.
IF sy-subrc EQ 0.
ENDIF.
START-OF-SELECTION.
Jeffrey Satriadi

How to display the selection screen fields for selected checkboxes

Hi all,
         I have 7 checkboxes, for each check box we have some seletion screen fields.if i select first check box,i want to display first slection screen fields only.
and if we select more than one check box how to display the selection screen fields for selected check boxes,please help me this
Thanks
sriman.

hi,
Try this code
report z_13317_sdn2.
tables : mara, marc, dd03l.
parameters : p_chk1 as checkbox user-command ABC,
             p_chk2 as checkbox user-command PQR,
             p_chk3 as checkbox user-command XYZ.
select-options : s_matnr for mara-matnr modif id A,
                 s_ersda for mara-ersda modif id A,
                 s_werks for marc-werks modif id B,
                 s_lvorm for marc-lvorm modif id B,
                 s_tab for dd03l-tabname modif id C.
data: v_chk1,
      v_chk2,
      v_chk3.
at selection-screen output.
loop at screen.
    if screen-group1 = 'A' or
       screen-group1 = 'B' or
       screen-group1 = 'C'.
        screen-input = 0.
       modify screen.
    endif.
endloop.
loop at screen.
    if v_chk1 = 'X'.
      if screen-group1 = 'A'.
        screen-input = 1.
        modify screen.
      endif.
    endif.
    if v_chk2 = 'X'.
      if screen-group1 = 'B'.
        screen-input = 1.
        modify screen.
      endif.
    endif.
    if v_chk3 = 'X'.
      if screen-group1 = 'C'.
        screen-input = 1.
        modify screen.
      endif.
    endif.
endloop.
at selection-screen.
if sy-ucomm = 'ABC'.
    if v_chk1 = ' '.
      v_chk1 = 'X'.
    else.
      v_chk1 = ' '.
    endif.
endif.
if sy-ucomm = 'PQR'.
    if v_chk2 = ' '.
      v_chk2 = 'X'.
    else.
      v_chk2 = ' '.
    endif.
endif.
if sy-ucomm = 'XYZ'.
    if v_chk3 = ' '.
      v_chk3 = 'X'.
    else.
      v_chk3 = ' '.
    endif.
endif.
Regards,
Sailaja.

Benefitng from possible entries for fields added by EEW

Dear experts
I have added new tables and fileds into BP master data via EEWB. There are possible entries for these fileds that can be benefited from during BP data maintenance..
I'd like to ask you that is it possible to make visible these possible entries(you know by the function key F4) for the fields I have added from EEW. If so, could anyone explain?
thanks in advance
Mehmet

Hi,
I have added new tables into BP master data via EEWB also, and it's working perfect in CRM GUI including input help (F4 possible entries), but the input help doesn't work in Web Client UI.
Anyone has experience to enable the input help in Web Client UI for the added table in BP master?
Please share with me.
Thanks in advance.
Ed.

Problem with Save functionality for a Screen - Field

Hi Experts,
I have included a custom field with list box option to an infotype. The new filed displays the values based on the values selected in the standard field which has a list box option.
Now if we enter the transaction in change mode and change the standard field value without pressing ENTER and click SAVE button, it gets saved with an improper value in the custom field. The reason being the custom field values with drop down list is retreived only after we press enter (POV is triggered) after selecting a standard field.
Options tried:
I have included an error message (in PAI) to stop the values being saved, but the screen beomes disabled.
I have done my validation only on the custom field as there is no other possibility to validate any other fields on the screen (all are standard). Here the error message pops up and the field is in the enable mode, but it does not retrieve the possible values for the custom field based on my earlier selection for the standard field.( Because as POV does not get triggered in this case)
Ex. Std field value = USA
Custom field = United States of America
I changed the value in Standard field to = UK and click SAVE - It get saved
Now how to stop it from SAVING and let it know that there is an error in the custom field and it needs to select the right value from the list ie - United Kingdom.
Lakshmi

Perhaps a solution is to save the code value, not the text for the code, and only display the text. In this way, the database would have UK and when you re-entered the screen, a PBO module could obtain the text for UK for display.
Or, if you must store the text value instead of the code (seems redundant...you can look up the text anytime), an enhancement to the save to database logic to obtain the correct value from the current value of the code and save that to the database....

How to assign maintenance view to a selection screen field in a program.

Hi Experts,
I have created a custom table. Now, I have a program where there is a selection screen field for example "Load". After entering a value in the selection screen, and press enter, the user must be redirected to the maintenance view of the custom table to modify the specifed record.
Can anyone help me on how to do that?
Thanks a lot for ur precious help.
Regards,
Aksh

Hi,
What is the need to search for a program.
Use transaction SM30 or SE16 to create or maintain entries in the table.
e.g. if the Maintenance view is created on table A, then Goto transaction SM30 or SE16 and give the table name as A and proceed. This will automatically take u to the maintenance view on tha table A.
Regards,
Himanshu

Disable a selection screen field

Hi All,
I have 2 selection screen fields if enter any value in field 1 another field should be disabled with out pressing enter on the selection screen. am able to do disable by pressing enter onc i give the value in field 1.
Please do needful.
Thanks in advance.
Thanks,
Ramu.

Hi Ramu,
As far as i know its not possible without pressing enter/Execute or any action on selection screen.
This is because report programming is event driven. So without any event i don't think we can achieve this.
Probably u can search in SDN/Google as well. If u r lucky enough some one has found some thing for you. But at the same time don't forget to update this thread if u find some thing:-)
Thanks,
Vinod.

Possible entries for selection screen field

Similar Messages

Maybe you are looking for