Simple Selection-screen question

Right now my selection screen shows the variable names that I have assigned. The variable name is limited to 8 chars. I would like to be able to set the text. I know this is a very easy question and Im sorry to waste a forum post on it!
Here's what I got:
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-100.
SELECT-OPTIONS: network FOR AFPO-AUFNR.
SELECT-OPTIONS: s_dauat FOR AFPO-DAUAT.
SELECT-OPTIONS: fnsh_dat FOR AFKO-GSTRS.
SELECT-OPTIONS: strt_dat FOR AFKO-GLTRS.
SELECT-OPTIONS: status FOR TJ02T-TXT30.
SELECTION-SCREEN END OF BLOCK BL1.

2 ways,
1) Go to TextElements and selection text and give the description there.
2) Using SELECTION-SCREEN COMMENT
For example
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-100.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(20) TEXT-001 FOR FIELD network.
selection-screen position 45.
SELECT-OPTIONS: network FOR AFPO-AUFNR.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK BL1.
Here you may need to double click on TEXT-001 and give the description.
rgds,
TM.

Similar Messages

Selection screen question

Hello !
I have a report that generates system messages.
I have to copy the code from a system to another, with all objects beloging to report.
These objects are: dictonary structures, fields, soubroutines and a selection screen.
After the copy and activation of the report, I see all objects in the new system, except the selection screen.
I guess that is because I did not run the report yet in the new system, but I' m not sure.
Running will involve some extra messages, so I thought I better ask for certain first.
Thank you.
Edited by: AV on Sep 11, 2008 9:11 AM

No.
So...I had a report in system1.
Copied the code to system 2.
The reports runs the same manner for both systems.
The reports includes a PARAMETERS instruction and when I run it in the system2, I can see there:
System-> Status -> Screen number 1000.
I don't understand why in system1 , I have for the report ( in SE80) as an object beloging to report:
Programs-> zxxxx Report-> Screen -> Screen 1000
and in system2 (in SE80) , the same report has no Screen attached (in hierarchy).
As if I copied the code, run it, but Screen object does not appear anymore in report hierarchy.
Any clue?
Edited by: Anda Vicovan on Sep 11, 2008 10:21 AM

F4 selection screen layout - WAD 7

Hi guys,
We have a simple selection screen over a variable and we have a couple of questions regarding the layout of the selection screen.
1. Can we change the default to "Search" instead of "All"?
2. When we scroll down in the list the width of the columns changes according to the data, is there a way to determine the column width?
Regards
Shlomi

Hello Shlomi Weiss,
Unfortunatelly this is not possible to change. This is working by design.
Thanks for the compreention.
Diego Ferrary

Selection screen parameters invisible

Hi,
Do you know if it's possible to hide the value enter in a parameter into a selection screen.
For example, if I want a password and I want the output display only '*****' .. like the SU01. But ! I don't speak about dynpro, just a simple selection-screen.
Thanks
Fred

Hello Frederic,
PARAMETERS
pa_test.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    CASE screen-name.
      WHEN 'PA_TEST'.
        screen-invisible = '1'.
        MODIFY SCREEN.
    ENDCASE.
ENDLOOP.
Regards,
John.

Dynamic Selection Screen based on database seletion

Hi, Gurus:
I just have simple selection screen with a few radio buttons
However, I would like the radio button show up based on database table criterias:
e.g. if there is no data in table1, the radio button 1 will not showing up.
I have used "SELECT * from table..." and check the return value sy-subrc, if it is not equals 4 (4 means no data in the table), then I put the radio button clause there.
however, it does not work this way.
Thanks in advance
Liang

Hi,
This is a duplicate thread, similar kind of thread is already available .....
with the subject : Dynamic calling of radiobuttons
anyways,
possibly you can think of two ways,
say at the maximum the entry in the database table goes to 20 records and you know that it will not go more than that,
then you can create 20 radiobuttons and using at selection-screen output events hide radiobuttons based on the records present.
say only 4 records are present.
so hide 16 radiobuttons and display only 4 of them.
the other way.
say if there can be n number of records and you dont know the maximum number it can reach then
in the initialization event.
create a report at runtime with the parameter statement as radiobutton .
and then call that report in initialization event itself. this will display the dynamically created radiobutton.
Regards,
Siddarth

Question on Logic of seperation in OOAbap-Selection screen

Hello guys
I like to ask you one question i found and get your ideas.
If you look at the codes for creating an ALV
it always recommends you to seperate logic and business layer etc..
this is the new way of creating an ALV
So you have a model view and a controller
I implemented that following useful resources.
So that there s class called view
and the selection screen gets called from there inside the method
like
    call SELECTION-SCREEN 100.
     IF sy-subrc EQ 0.
     ENDIF.
But one issue when you execute the report and press GO BACK standard button it doesnot come back to your selection screen but way to your code.
Is there a get around to that?
here is the code below:
Header 1
*& Report ZZ_SOLEN_FIRST
REPORT ZZ_SOLEN_FIRST.
DATA: gv_vbeln type vbap-Vbeln.
***Screen
SELECTION-SCREEN: BEGIN OF SCREEN 100 TITLE t-004.
SELECTION-SCREEN: BEGIN OF block aa WITH FRAME TITLE t-001.
SELECT-OPTIONS: s_vbeln FOR gv_vbeln.
SELECTion-SCREEN: END OF block aa.
SELECTion-SCREEN: END OF SCREEN 100.
*****DATA Layer
class lcl_data DEFINITION.
   PUBLIC SECTION.
     TYPES: BEGIN OF ty_out,
       vbeln type vbap-vbeln,
       posnr type vbap-posnr,
       matnr type vbap-matnr,
       vkorg type vbak-vkorg,
       END OF ty_out
     TYPES: tt_out TYPE STANDARD TABLE OF ty_out.
     TYPES: gr_vbeln TYPE RANGE OF vbap-vbeln.
     DATA: gt_output TYPE tt_out.
     methods: constructor,
              select_data IMPORTING VALUE(rs_vbeln) TYPE gr_vbeln.
ENDclass.
class lcl_data IMPLEMENTATION.
   method constructor.
     clear GT_OUTPUT.
   ENDMETHOD.
   method select_data.
     DATA: lt_vbak type SORTED TABLE OF vbak WITH UNIQUE KEY vbeln.
     FIELD-SYMBOLS: <lfs_output> like LINE OF gt_output,
                    <lfs_vbak> like LINE OF lt_vbak
     select vbeln posnr matnr from vbap
       INto TABLE
        GT_OUTPUT
       where vbeln in S_VBELN
     IF sy-SUBRC EQ 0.
       select * from vbak
         INTO TABLE lt_vbak
         FOR ALL ENTRIES IN GT_OUTPUT
         where vbeln = GT_OUTPUT-vbeln
       LOOP AT gt_output ASSIGNING <lfs_output>.
         READ TABLE lt_vbak ASSIGNING <lfs_vbak>
         with TABLE KEY vbeln = <lfs_output>-vbeln.
         IF sy-Subrc eq 0.
           <lfs_output>-vkorg = <lfs_vbak>-VKORG.
         ENDIF.
       ENDLOOP.
     ENDIF.
   ENDMETHOD.
ENDCLASS.
****Display
class lcl_view DEFINITION.
   PUBLIC SECTION.
     methods: start RETURNING VALUE(rv_true) type abap_bool.
     METHODS: display CHANGING it_data TYPE STANDARD TABLE.
ENDCLASS.
class lcl_view IMPLEMENTATION.
   METHOD start.
     call SELECTION-SCREEN 100.
     IF sy-subrc EQ 0.
       rv_true = abap_true.
     ENDIF.
   endmethod.
   method display.
     DATA: lo_salv_table type REF TO CL_SALV_TABLE,
           lt_columns TYPE SALV_T_COLUMN_REF.
     FIELD-SYMBOLS: <lfs_columns> like LINE OF lt_columns.
     CL_SALV_TABLE=>FACTORY(
*    exporting
*      LIST_DISPLAY   = IF_SALV_C_BOOL_SAP=>FALSE    " ALV Displayed in List Mode
*      R_CONTAINER    =     " Abstract Container for GUI Controls
*      CONTAINER_NAME =
       importing
         R_SALV_TABLE   = lo_salv_table    " Basis Class Simple ALV Tables
       changing
         T_TABLE        = it_data
*    catch CX_SALV_MSG.    " ALV: General Error Class with Message
     lt_columns = lo_salv_table->GET_COLUMNS( )->GET( ).
*    LOOP AT lt_columns ASSIGNING <lfs_columns>.
*    break developer.
*    ENDLOOP.
     lo_salv_table->DISPLAY( ).
   ENDMETHOD.
ENDCLASS.
class lcl_controller DEFINITION.
   PUBLIC SECTION.
     methods: main.
ENDCLASS.
class lcl_controller IMPLEMENTATION.
   method main.
     DATA: lo_view type REF TO lcl_view,
           lo_data TYPE REF TO LCL_DATA .
     CREATE OBJECT: lo_data, lo_view.
     break developer.
     IF lo_view->START( ) Eq abap_true.
**get the data
       lo_data->SELECT_DATA( s_vbeln[] ).
       lo_view->DISPLAY(
         changing
           IT_DATA = lo_data->GT_OUTPUT
     ENDIF.
   ENDMETHOD.
ENDCLASS.
INITIALIZATION.
START-OF-SELECTION.
   break developer.
   DATA: lo_controller type REF TO lcl_controller.
   CREATE OBJECT lo_controller.
   lo_controller->MAIN( ).

Here is the complete code that works fine!!!
Thanks to your ideas:
OO ALV
*& Report ZZ_SOLEN_FIRST
REPORT ZZ_SOLEN_FIRST.
DATA: gv_vbeln type vbap-Vbeln.
***Screen
SELECTION-SCREEN: BEGIN OF SCREEN 100 TITLE t-004.
SELECTION-SCREEN: BEGIN OF block aa WITH FRAME TITLE t-001.
SELECT-OPTIONS: s_vbeln FOR gv_vbeln.
SELECTion-SCREEN: END OF block aa.
SELECTion-SCREEN: END OF SCREEN 100.
*****DATA Layer
class lcl_data DEFINITION.
   PUBLIC SECTION.
     TYPES: BEGIN OF ty_out,
       vbeln type vbap-vbeln,
       posnr type vbap-posnr,
       matnr type vbap-matnr,
       vkorg type vbak-vkorg,
       END OF ty_out
     TYPES: tt_out TYPE STANDARD TABLE OF ty_out.
     TYPES: gr_vbeln TYPE RANGE OF vbap-vbeln.
     DATA: gt_output TYPE tt_out.
     methods: constructor,
              select_data IMPORTING VALUE(rs_vbeln) TYPE gr_vbeln.
ENDclass.
class lcl_data IMPLEMENTATION.
   method constructor.
     clear GT_OUTPUT.
   ENDMETHOD.
   method select_data.
     DATA: lt_vbak type SORTED TABLE OF vbak WITH UNIQUE KEY vbeln.
     FIELD-SYMBOLS: <lfs_output> like LINE OF gt_output,
                    <lfs_vbak> like LINE OF lt_vbak
     select vbeln posnr matnr from vbap
       INto TABLE
        GT_OUTPUT
       where vbeln in S_VBELN
     IF sy-SUBRC EQ 0.
       select * from vbak
         INTO TABLE lt_vbak
         FOR ALL ENTRIES IN GT_OUTPUT
         where vbeln = GT_OUTPUT-vbeln
       LOOP AT gt_output ASSIGNING <lfs_output>.
         READ TABLE lt_vbak ASSIGNING <lfs_vbak>
         with TABLE KEY vbeln = <lfs_output>-vbeln.
         IF sy-Subrc eq 0.
           <lfs_output>-vkorg = <lfs_vbak>-VKORG.
         ENDIF.
       ENDLOOP.
     ENDIF.
   ENDMETHOD.
ENDCLASS.
****Display
class lcl_view DEFINITION.
   PUBLIC SECTION.
     methods: start RETURNING VALUE(rv_return_flag) type abap_bool.
     METHODS: display CHANGING it_data TYPE STANDARD TABLE.
ENDCLASS.
class lcl_view IMPLEMENTATION.
   METHOD start.
     call SELECTION-SCREEN 100.
     IF sy-subrc EQ 0.
       rv_return_flag = abap_true.
     ENDIF.
   endmethod.
   method display.
     DATA: lo_salv_table type REF TO CL_SALV_TABLE,
           lt_columns TYPE SALV_T_COLUMN_REF.
     FIELD-SYMBOLS: <lfs_columns> like LINE OF lt_columns.
     CL_SALV_TABLE=>FACTORY(
*    exporting
*      LIST_DISPLAY   = IF_SALV_C_BOOL_SAP=>FALSE    " ALV Displayed in List Mode
*      R_CONTAINER    =     " Abstract Container for GUI Controls
*      CONTAINER_NAME =
       importing
         R_SALV_TABLE   = lo_salv_table    " Basis Class Simple ALV Tables
       changing
         T_TABLE        = it_data
*    catch CX_SALV_MSG.    " ALV: General Error Class with Message
     lt_columns = lo_salv_table->GET_COLUMNS( )->GET( ).
*    LOOP AT lt_columns ASSIGNING <lfs_columns>.
*    break developer.
*    ENDLOOP.
     lo_salv_table->DISPLAY( ).
   ENDMETHOD.
ENDCLASS.
class lcl_controller DEFINITION.
   PUBLIC SECTION.
     methods: main.
ENDCLASS.
class lcl_controller IMPLEMENTATION.
   method main.
     DATA: lo_view type REF TO lcl_view,
           lo_data TYPE REF TO LCL_DATA .
     CREATE OBJECT: lo_data, lo_view.
     break developer.
*    while lo_view->START( ) eq abap_true.
***get the data
*      lo_data->SELECT_DATA( s_vbeln[] ).
*      lo_view->DISPLAY(
*        changing
*          IT_DATA = lo_data->GT_OUTPUT
*    ENDWHILE.
     do.
       if lo_view->START( ) eq abap_true.
***get the data
         lo_data->SELECT_DATA( s_vbeln[] ).
         lo_view->DISPLAY(
           changing
             IT_DATA = lo_data->GT_OUTPUT
       else.
         return.
       ENDIF.
     ENDDO.
   ENDMETHOD.
ENDCLASS.
class lcl_test_submit DEFINITION.
   PUBLIC SECTION.
     TYPES: tr_vbeln TYPE RANGE OF vbap-vbeln.
     data: lt_list type table_abaplist.
     methods: test_submit IMPORTING VALUE(ir_vbeln) type tr_vbeln
                          EXCEPTIONS submit_failed
                                     no_data_found
ENDCLASS.
class lcl_test_submit IMPLEMENTATION.
   method test_submit.
submit ZZ_SOLEN_FIRST
   with s_vbeln in ir_vbeln
   exporting list to memory and return
***Get the list from the memory
    call function 'LIST_FROM_MEMORY'
       tables
         listobject = lt_list
       exceptions
         not_found = 1
         others     = 2.
     if sy-subrc <> 0.
       raise submit_failed.
     endif.
     if lt_list is initial.
       raise no_data_found.
     endif.
   ENDMETHOD.
ENDCLASS.
INITIALIZATION.
START-OF-SELECTION.
   break developer.
   DATA: lo_controller type REF TO lcl_controller.
****Testing the Main
   CREATE OBJECT lo_controller.
   lo_controller->MAIN( ).

A question about keeping screen field unchangable in selection screen

Hello Expert,
I have a program as below.
REPORT Z_TEST.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-i01.
SELECT-OPTIONS: s_kappl FOR a017-kappl DEFAULT 'M' NO INTERVALS.
SELECTION-SCREEN: END OF BLOCK b1.
INITIALIZATION.
LOOP AT SCREEN.
    IF screen-name CS 'KAPPL'.
      screen-input = 0.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
When I executed the report, the field for S_KAPPL is unchangable. This is as expected. But if I select one variant, the filed will change back to changable.
My question is how can I keep the field unchangable after I select variant?
Thanks in advance,
Regards, Johnny

Hello Johnny,
When you're creating the variant you've to mark the check-box "Protect field" as true.
This will make the field as output only.
BR,
Suhas

Question on selection-screen

Hi,
1) How we can provide two fields on selection-screen side by side
2) How we can provide Text on selection-screen (ie some comments regarding selection-screen fields)

Moderator message - Welcome to SCN
However, this is not a training forum for ABAP. Please read the appropriate documentation.
Thread locked..
Please read [Rules of Engagement|https://wiki.sdn.sap.com/wiki/display/HOME/RulesofEngagement], How to post code in SCN, and some things NOT to do... and [Asking Good Questions in the Forums to get Good Answers|/people/rob.burbank/blog/2010/05/12/asking-good-questions-in-the-forums-to-get-good-answers] before posting again.

Selection screen : matchcode on RYEAR and also question on FILE_SAVE_DIALOG

Hiii
Question 1 -->
i have on the selection screen a parameter of type RYEAR i check in database and theere is no matchcode attach to it.
can you please advise whether there is a standard matchcode i can used or am i missing something?
Question 2 -->
And also on my selection screen i have 2 parameter
P_path type string
P_name type string
on the P_path we need to put the directory name and also implement a F4 where user can browse the directory.   On the p_name we will put the file name
have done somwthing like that. sorry i don't remember the exact name?
at selection screen on value request p_path
call method cl_xxxxx-file_save_dialogue
the problem is that the FILE_SAVE_DIALOGUE i must enter the a file name on the pop-up before clicking on save,
I don't want an F4 of P_PATH i want to only the browse directory path not save. can you please advise if there are another method for that?

Check this code;
PARAMETER: p_path TYPE char50,
                               p_name TYPE char50.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_path.
DATA: lv_path TYPE string.
lv_path = p_path.
CALL METHOD cl_gui_frontend_services=>directory_browse
    EXPORTING
*      window_title         = 'Jay'
      initial_folder       = lv_path
    CHANGING
      selected_folder      = lv_path
    EXCEPTIONS
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      OTHERS               = 4.
p_path = lv_path.

One question about Selection screen

Hi experts,
I am writing a report, on the selection screen, I need to input the file path and then do the file upload.
My question is about how to check the file path I put is correct or not? If it is incorrect, I want to get a message and the cursor still in the field and don't jump to the next page.
How can I do like that?
Any one has any suggestion, please help me.
Thanks in advance.
Regards,
Chris Gu

Hi Chris,
    do it this way: check my code after calling gui_upload what condition i am using.
parameters:
p_file type rlgrap-filename.          " File name
*           AT SELECTION-SCREEN ON VALUE-REQUEST EVENT
at selection-screen on value-request for p_file.
perform get_file_name.
*                       AT SELECTION-SCREEN EVENT
at selection-screen on p_file.
perform validate_upload_file.
* Form GET_FILE_NAME
form get_file_name.
call function 'F4_FILENAME'
   exporting
     program_name        = syst-cprog
     dynpro_number       = syst-dynnr
     field_name          = ' '
   importing
     file_name           = p_file.
endform.                               " GET_FILE_NAME
* Form VALIDATE_UPLOAD_FILE
form validate_upload_file.
data:
    lw_file type string.              " File Path
lw_file = p_file.
call function 'GUI_UPLOAD'
    exporting
      filename                    = lw_file
      filetype                    = 'ASC'
      has_field_separator         = 'X'
      dat_mode                    = 'X'
    tables
      data_tab                    = t_final_data.
IF sy-subrc ne 0 and t_final_data is initial. " here message if file path is wrong
    Message 'File not found' type 'E'.
ELSEIF sy-subrc eq 0 and t_final_data is initial.
    Message 'File empty' type 'E'.
ENDIF.
endform.                               " VALIDATE_UPLOAD_FILE
With luck,
Pritam.
Edited by: Pritam Ghosh on May 8, 2009 8:57 AM

Hi Experts, a question about messages in selection screen? thank you!

Hi Experts,
I have a selection screen and two parameters on it, I need to check if the entries exist if the fields is filled in, if it doesn't exist I need to issue a warning message, but if the two parameters are both filled in and the related entries both don't exist, how can I handle this situation? what I mean is that I want to display the two warnings at the same time(like below), now I only can display one warning, can anyone help me on this? thank you much!
You are not authorised for this purchasing organisation
Plant: invalid entry
Purchasing organisation: invalid entry
No valid record selected
Kind regards
Dawson

Hi Dawson
As far as i get from your disciption of the problem, i get that: -
(a) You want to check that both the fields are filled or not
(b) If they are filled, then you want to check if in database there exists any record pertaining to them.
Correct me if i am wrong.
If this is correct, then you will have to make use of nested if condtions to diaplay the warnings.
Like as follows: -
If pa1 IS INITIAL and pa2 IS INITIAL.
<your warning message>.
ELSEIF pa1 IS INITIAL and pa2 IS NOT INITIAL.
<your warning message>.
ELSEIF pa1 IS NOT INITIAL and pa2 IS INITIAL.
<your warning message>.
ELSEIF pa1 IS NOT INITIAL and pa2 IS NOT INITIAL.
<try matching it with the database records>.
<your warning message>.
ENDIF.
As far as i know, the 2 warning messages cannot be issued as they appear in the status bar of the current screen. SO you will have to put them in if condition only and display the approriate warning .
Hope this solves your problem.
Regards
Gaurav.

Hi,a question about transportation of translation of selection screen?

Hi Experts,
I am working on an ALV and there is a selection screen for it, and I have translate the texts in the selection screen and can they be transported while the program is transported to another system? if not how can I transport the translations, thank you much.
Kind regards
Dawson

Hello ,
Please follow the below steps for transalation ..
- Complete your development and release the same .
- Always have the Translations which u can do wtih SE63 tocde and have them within a specific transport request (Recomended Transport of Copies) .
Now u release the TR of translation then everything wil work fine .
Ensure always Translations TR is younger than Development TR withrespect to their creation and Releases ....
Regards,

Question on selection screen in a subscreen in dialog prorgamming

hi,
i have a module pool in which the main program has the definition of the selection screen as follows:
SELECTION-SCREEN BEGIN OF SCREEN 0101 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK B1.
SELECT-OPTIONS: S_VSTEL FOR TVST-VSTEL,
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN END OF SCREEN 0101.
In the PBo of screen 100 this is called
CALL SUBSCREEN SUBSCREEN1 INCLUDING SY-REPID L_DYNNR.
The subscreen is displayed as
Shipping point _______ To _________ =>
When I click that arrow (( extension )) nothing happens !! I am supposed to get the standard extension screen in whcih i can select single values, ranges, exclude values, ranges !!
why is this not displayed..any idea ?
i have the same code in a normal report program and it works fine ..
thks

in module pool you need to add code for the => this is not been handled by SAP in module pool whereas it is been handled in report program.
There is one FM which needs to be used so that when => is clicked it works...

Hi, experts, a question about fields in selection screen?

Hi Experts,
In my selection screen there are two fields, one is customer nr(kunnr), another is a checkbox, and I want to know is that when the customer is filled in and the checkbox is marked and then I press "enter", there should be a email address of the customer displayed at the right of the checkbox, thank you in advance.
by the way, I have known how to get the email address but I don't know how to make the email address display at the right of the checkbox.
Kind regards
Dawson
Edited by: dawson wang on Mar 28, 2009 4:49 AM

Hi,
Test Sample Code Bellow it will solve out your problem. First enter the pernr and than click the Check Box.
TABLES: pa0001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(30) tpernr.
PARAMETERS: ppernr LIKE pa0001-pernr.
SELECTION-SCREEN COMMENT 42(1) t.
PARAMETERS: check AS CHECKBOX USER-COMMAND a.
SELECTION-SCREEN COMMENT 46(50) cpernr FOR FIELD ppernr MODIF ID dpt.
SELECTION-SCREEN END OF LINE.
INITIALIZATION.
tpernr = 'Please Enter Pernr'.
AT SELECTION-SCREEN OUTPUT.
IF check = 'X'.
    PERFORM get_lables.
    LOOP AT SCREEN.
      IF screen-group1 = 'DPT'.
        screen-intensified = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ELSE.
    CLEAR: cpernr.
ENDIF.
**&      Form get_lables
**       text
FORM get_lables.
IF ppernr IS INITIAL.
    cpernr = ''.
ELSE.
    SELECT SINGLE * FROM pa0001
      WHERE pernr = ppernr
        AND endda = '99991231'.
    IF sy-subrc = 0 .
      cpernr = pa0001-ename.
    ENDIF.
ENDIF.
ENDFORM.                    "get_lables
Please Reply if any Issue,
Best Regards,
Faisal

Question reg. selection screen

I am writing a report. On selection screen, I have a field for Sales order (vbeln) from a custom table zsales. Now when the user selects this field on selection screen and press F4, he/she should be able to select the salesorders from the table zsales.
I wrote:
SELECT-OPTIONS: s_vbeln FOR zsales-vbeln.
But on the output, when I press F4, I am still not getting any input help. What change can you suggest?
Appreciate your input.
Thanks,
Krishen

Try something like this.
report zrich_0001 .
tables: zsales
data: begin of izsales occurs 0,
       vbeln type vbak-vbeln,
      end of izsales.
select-options s_vbeln for zsales-vbeln.
initialization.
select vbeln into table izsales from zsales.
sort izsales ascending by vbeln.
delete adjacent duplicates from izsales comparing vbeln.
at selection-screen on value-request for s_vbeln-low.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
       exporting
            retfield    = 'VBELN'
            dynprofield = 'S_VBELN'
            dynpprog    = sy-cprog
            dynpnr      = sy-dynnr
            value_org   = 'S'
       tables
            value_tab   = izsales.
start-of-selection.
Regards,
Rich Heilman

Simple Selection-screen question

Similar Messages

Maybe you are looking for