Model program of at selection screen output

hi frends
pls giv me the model code of at selection-screen output event in Reports

Hi Vishnu,
Follow this code.
SELECT-OPTIONS: DATE FOR SY-DATUM NO INTERVALS MODIF ID A.
PARAMETERS: P_DATE1 LIKE SY-DATUM DEFAULT SY-DATUM.
PARAMETERS: P_DATE2 LIKE SY-DATUM DEFAULT SY-DATUM.
PARAMETERS CH1 AS CHECKBOX USER-COMMAND UR1.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF CH1 = 'X' .
      IF SCREEN-group1 = 'A'.
      SCREEN-ACTIVE = '0'.
      endif.
      IF SCREEN-NAME = 'P_DATE2'.
        SCREEN-INPUT = '0'.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
if ch1 = 'X'.
p_date1 = p_date1 - 3.
endif.
Rewards if useful.
Vijay.

Similar Messages

At selection screen output dialog

how i can make
i have customer i want when i click enter to get the description.
the program is dialog , i get always err,and when i put in PBO or PAI.

Hi Little ,
What i understand is that you are working on a report and not a module pool.
If it is a report then you will first have to modify the selection screen , go to SE51 , put in the program name and the screen number ( which is generally 1000) , on the screen add a new I/O box which is for Output only let it be KNA1-NAME1 .
Now you need to write the code in the event AT SELECTION-SCREEN OUTPUT .
Here is the sample code for the same
tables : kna1.
parameter : kunnr type kna1-kunnr.
at selection-screen output.
if not kunnr is initial.
select single name1 into kna1-name1
from kna1
where kunnr = kunnr.
endif.
Hope this helps.
Regards
Arun

At selection screen output problem

Hi all,
I am trying to make a few fields disabled based on the selection of a radio button. I have done it in dialog programming, but in report its not working. Please tell me where i have gone wrong. My code:
* Selection Screen
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-t01.
PARAMETER : rb_dwld RADIOBUTTON GROUP radi DEFAULT 'X',
            rb_upld RADIOBUTTON GROUP radi.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-t02.
SELECT-OPTIONS : so_cctrl FOR /dceur/z_crconar-crdt_ctrldsa MODIF ID
                                         sc1 NO INTERVALS OBLIGATORY,
                 so_cusno FOR /dceur/z_crdtlmt-dealer MODIF ID sc1.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-t03.
SELECT-OPTIONS : so_ctrl1 FOR /dceur/z_crconar-crdt_ctrldsa MODIF ID
                                         sc2 NO INTERVALS OBLIGATORY.
PARAMETER pa_fname TYPE rlgrap-filename MODIF ID sc2.
SELECTION-SCREEN END OF BLOCK b3.

Hi,
Please check the below code.
This is one of my requirement.
* Creation of two blocks with parameter fields for create and update
SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME.
PARAMETER p_create LIKE rlgrap-filename MODIF ID crt.
SELECTION-SCREEN: END OF BLOCK b1.
SELECTION-SCREEN: BEGIN OF BLOCK b2 WITH FRAME.
PARAMETER p_update LIKE rlgrap-filename MODIF ID upt.
SELECTION-SCREEN: END OF BLOCK b2.
* Making one parameter field active at a time
AT SELECTION-SCREEN OUTPUT.
IF rb_crt = 'X'.                              "CREATE BUTTON IS SELECTED
    PERFORM hide_rb_options.
    CLEAR p_create.
ELSE.                                         "UPDATE BUTTON IS SELECTED
    PERFORM hide_rb_options.
    CLEAR p_update.
ENDIF.
*&      Form hide_rb_options
FORM hide_rb_options .
IF rb_crt = 'X'    .
    LOOP AT SCREEN.
      CASE screen-group1.
        WHEN 'CRT'.
          screen-active = 1.
          MODIFY SCREEN.
        WHEN 'UPT'.
          screen-active = 0.
          MODIFY SCREEN.
      ENDCASE.
    ENDLOOP.
ELSE.
    LOOP AT SCREEN.
      CASE screen-group1.
        WHEN 'UPT'.
          screen-active = 1.
          MODIFY SCREEN.
        WHEN 'CRT'.
          screen-active = 0.
          MODIFY SCREEN.
      ENDCASE.
    ENDLOOP.
ENDIF.
ENDFORM.                    " hide_rb_options
May it helps you.
Regards.
DS.

At-selection screen output and radio button together

Hi all,
I want to make a screen with radio buttons and a drop down menu on selection screen as soon as I check any button and click on Open from drop down menu the output should come according to the button cheked but the problem is that desired output is not coming.
Please see if something could be done.
Thanks,
Shweta

Hi,
Here is the code see y it didnt responds,
I made ZMENU2 in SE41 with Menu bar as OPEN , also activated buttons BACK and EXIT.
tables : sscrfields.
CONSTANTS : buttonselected TYPE c LENGTH 1 VALUE 'X'.
DATA: ok_code LIKE sy-ucomm.
SELECTION-SCREEN BEGIN OF BLOCK frame1 WITH FRAME TITLE text-001.
SELECTION-SCREEN ULINE /1(60).
PARAMETERS: first RADIOBUTTON GROUP rad DEFAULT 'X',
second RADIOBUTTON GROUP rad,
third RADIOBUTTON GROUP rad,
fourth RADIOBUTTON GROUP rad,
fifth RADIOBUTTON GROUP rad.
SELECTION-SCREEN END OF BLOCK frame1.
AT SELECTION-SCREEN OUTPUT.
SET PF-STATUS 'ZMENU2'.
If first = buttonselected and ok_code = 'OPEN'..
         WRITE 'You selected first button'.
    ELSEIF second = buttonselected and ok_code = 'OPEN'..
        WRITE 'You selected second button'.
    ELSEIF third = buttonselected and ok_code = 'OPEN'.
        WRITE 'You selected third button'.
    ELSEIF fourth = buttonselected and ok_code = 'OPEN'.
        WRITE 'You selected fourth button'.
    ELSEIF fifth = buttonselected and ok_code = 'OPEN'.
        WRITE 'You selected fifth button'.
    ELSEIF ok_code ='BACK'.
       LEAVE PROGRAM.
    ELSEIF ok_code ='EXIT'.
      LEAVE PROGRAM.
ENDIF.

At Selection-screen output event

Hi
can any one give me some examples for at selection-screen output event
with regards
nagaraj
Moderator message: please search for available information/documentation.
Edited by: Thomas Zloch on Nov 8, 2011 12:13 PM

Thanks Benedict
Creating Module %_S_KOSTL and write our own logic to bring the parameter id value of Cost center from User profiles is NOT possible in program RM06BF00, screen 1000.
We can do that in Copied program of RM06BF00 ..which is the very last option.
I wanted to do that with User-exits or BADI or Enhancement spot etc...which i Couldn't do it so far...
The alternate might be Zprog and Ztcode or an SNOTE..
if you ALL think its NOT possible with User-exits or BADI or Enhancement spot or SNOTE etc..Then i will close this Thread...
Please let me know ASAP...
Thanks
Govi

AT SELECTION-SCREEN OUTPUT not working!

Hi,
I am useing the statement AT SELECTION-SCREEN OUTPUT to disable some input fields based on a check box(PR_FILE).however when I execute the program the changes on the screen are not reflected!I have written the AT SELECTION-SCREEN OUTPUT stmt immediately after SELECTION-SCREEN stmt .
Defination for the screen elements is as follows:
SELECT-OPTIONS s_plants FOR ls_selected_plant-plant
                                                     NO INTERVALS.
SELECTION-SCREEN BEGIN OF BLOCK filesel WITH FRAME TITLE text-012.
PARAMETERS pr_file TYPE xfeld .
PARAMETER : pr_path LIKE rlgrap-filename .
SELECTION-SCREEN END OF BLOCK filesel.
AT SELECTION-SCREEN OUTPUT.
IF pr_file = 'X'.
    LOOP AT SCREEN.
      IF screen-name = 's_plants'.
        screen-input    = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ELSE.
    LOOP AT SCREEN.
      IF screen-name = 'pr_path'.
        screen-input    = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
Can anybody suggest what wrong i have done??

You need to use the User Command for the checkbox and the Modificaiton ID (Group) for the fields.
Try like this:
TABLES: VBRP.
SELECT-OPTIONS S_PLANTS FOR VBRP-WERKS NO INTERVALS MODIF ID GP1.
SELECTION-SCREEN BEGIN OF BLOCK FILESEL WITH FRAME TITLE TEXT-012.
PARAMETERS PR_FILE TYPE XFELD USER-COMMAND USR1.
PARAMETER : PR_PATH LIKE RLGRAP-FILENAME MODIF ID GP2 .
SELECTION-SCREEN END OF BLOCK FILESEL.
AT SELECTION-SCREEN OUTPUT.
    IF PR_FILE = 'X'.
      LOOP AT SCREEN.
        if screen-group1 = 'GP1'.
          SCREEN-active = '0'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    ELSE.
      LOOP AT SCREEN.
        IF SCREEN-group1 = 'GP2'.
          SCREEN-active = '0'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    ENDIF.
Regards,
Naimesh Patel

At selection-screen output and at selection-screen on

Hi Experts,
I had coded in both at selection-screen output for disabling input of certain fields and at selection-screen for validation like this:
AT SELECTION-SCREEN output.
IF p_amt = 'X'.
    LOOP AT SCREEN.
      CASE screen-name.
        WHEN 'P_AMT'.
          screen-input = '1'.
        WHEN 'P_TST'.
          screen-input = '1'.
        WHEN 'P_B4C'.
          screen-input = '1'.
        WHEN 'P_AFC'.
          screen-input = '1'.
        WHEN 'P_COM'.
          screen-input = '1'.
        WHEN 'P_COM1'.
          screen-input = '1'.
        WHEN 'P_COM2'.
          screen-input = '1'.
        WHEN OTHERS.
          screen-input = '0'.
      ENDCASE.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
IF p_amt = 'X'.
    LOOP AT SCREEN.
      CASE screen-name.
        WHEN 'P_AMT'.
          screen-input = '1'.
        WHEN 'P_TST'.
          screen-input = '1'.
        WHEN 'P_B4C'.
          screen-input = '1'.
        WHEN 'P_AFC'.
          screen-input = '1'.
        WHEN 'P_COM'.
          screen-input = '1'.
        WHEN 'P_COM1'.
          screen-input = '1'.
        WHEN 'P_COM2'.
          screen-input = '1'.
        WHEN OTHERS.
          screen-input = '0'.
      ENDCASE.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
IF p_pdf = 'X'.
    LOOP AT SCREEN.
      CASE screen-name.
        WHEN 'P_PDF'.
          screen-input = '1'.
        WHEN 'P_TST'.
          screen-input = '1'.
        WHEN 'P_PATH'.
          screen-input = '1'.
        WHEN OTHERS.
          screen-input = '0'.
      ENDCASE.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
IF p_afc = 'X'.
    LOOP AT SCREEN.
      CASE screen-name.
        WHEN 'P_TST'.
          screen-input = '1'.
        WHEN 'S_FID-LOW' OR 'S_FID-HIGH'.
          screen-input = '0'.
        WHEN 'S_ORG-LOW' OR 'S_ORG-HIGH'.
          screen-input = '0'.
        WHEN 'S_OFF-LOW' OR 'S_OFF-HIGH'.
          screen-input = '0'.
        WHEN 'S_DAT-LOW' OR 'S_DAT-HIGH'.
          screen-input = '0'.
      ENDCASE.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
AT selection-screen on block b5.
if p_tst is initial.
message text-016 type 'E'.
endif.
AT selection-screen on block b2.
if p_amt ne 'X' and p_pdf ne 'X'.
if s_fid is initial and s_org is initial.
message text-000 type 'E'.
endif.
if s_dat is initial.
message text-000 type 'E'.
endif.
endif.
when i comment out at selection-screen validations the input is disabled for the screen fields as set, else the validations are executed first.
Any solution for this???
Thanks in advance.

AT SELECTION-SCREEN
Syntax
AT SELECTION-SCREEN selscreen_event.
Effect
This statement defines event blocks for different events selscreen_event that are triggered by the ABAP runtime environment during selection screen processing.
Selection screen events occur immediately before sending a selection screen and after certain user actions on a displayed selection screen. They assist in selection screen processing in the ABAP program.
AT SELECTION-SCREEN is triggered at least twice during actions on selection screens that are linked into another selection screen as a subscreen - first for the linked selection screen itself, and then for the linking selection screens.
Note
The event blocks after AT SELECTION-SCREEN are implemented internally as procedures. Declarative statments in these event blocks create local data.

At selection screen output not responding

Hi ppl,
I've 4 selection options in my screen. however I just need user to insert only 1 of the 4 for searching. Therefore i included 4 radio buttons. when user select rbf, sfileno will activer and other 3 will be grayed out, when user select rbi, sidnum will active and other will not be active and so forth. You can see the codes below.
However, during the program running, I found out when i select rbf, the other select options fields - sfileno, sidnum n scompsno are not inactive/grayed. It is the same when I seledt the other radio button. I just seem that i receive no response from the program. What have i done wrong here. please help. TQ
SELECTION-SCREEN BEGIN OF BLOCK frm1 WITH FRAME TITLE text-t01 .
SELECT-OPTIONS : sfileno FOR zlic_masterdb-nofailpermohonan modif id f01
 sidnum FOR zcustomer-idnumber modif id i01,
 sconame FOR zcustomer-contactname modif id n01,
 scompsno FOR zcom_compdhdr-compsno modif id c01.
PARAMETERS: rbf RADIOBUTTON GROUP g1 ,
rbi RADIOBUTTON GROUP g1,
rbn RADIOBUTTON GROUP g1,
rbc RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF BLOCK frm1.
INITIALIZATION.
sfileno = '00001'.
 AT SELECTION-SCREEN OUTPUT
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CHECK SCREEN-GROUP1 = 'f01' OR
SCREEN-GROUP1 = 'i01' OR
SCREEN-GROUP1 = 'n01' OR
SCREEN-GROUP1 = 'c01'.
IF rbf = 'X'.
IF SCREEN-GROUP1 EQ 'f01'.
 SCREEN-ACTIVE = 1.
ELSEIF SCREEN-GROUP1 EQ 'i01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'n01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'c01'.
 SCREEN-ACTIVE = 0.
ENDIF.
ELSEIF rbi = 'X'.
IF SCREEN-GROUP1 EQ 'i01'.
 SCREEN-ACTIVE = 1.
ELSEIF SCREEN-GROUP1 EQ 'f01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'n01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'c01'.
 SCREEN-ACTIVE = 0.
ENDIF.
ELSEIF rbn = 'X'.
IF SCREEN-GROUP1 EQ 'n01'.
 SCREEN-ACTIVE = 1.
ELSEIF SCREEN-GROUP1 EQ 'f01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'i01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'c01'.
 SCREEN-ACTIVE = 0.
ENDIF.
ELSEIF rbc = 'X'.
IF SCREEN-GROUP1 EQ 'c01'.
 SCREEN-ACTIVE = 1.
ELSEIF SCREEN-GROUP1 EQ 'f01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'n01'.
 SCREEN-ACTIVE = 0.
ELSEIF SCREEN-GROUP1 EQ 'i01'.
 SCREEN-ACTIVE = 0.
ENDIF.
ENDIF.
MODIFY SCREEN.
continue.
ENDLOOP.

hi Enzo
Check my sample code
TABLES: eban,
 SSCRFIELDS.
SELECTION-SCREEN BEGIN OF SCREEN 100 TITLE title.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-t01.
PARAMETER:rad1 RADIOBUTTON GROUP rad USER-COMMAND frad1 DEFAULT 'X',
 rad2 RADIOBUTTON GROUP rad .
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-t02.
PARAMETER: mtr AS CHECKBOX MODIF ID g3 USER-COMMAND chk1,
 p_matnr TYPE eban-matnr MODIF ID g1,
 sloc AS CHECKBOX MODIF ID g3 USER-COMMAND chk2,
 str_loc TYPE eban-lgort MODIF ID g4.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-t03.
SELECT-OPTIONS: matnr1 FOR eban-matnr MODIF ID g2.
SELECTION-SCREEN END OF BLOCK b3.
SELECTION-SCREEN PUSHBUTTON /20(10) name USER-COMMAND UCOM.
SELECTION-SCREEN END OF SCREEN 100.
name = 'FETCH'.
title = 'Test Report'.
CALL SELECTION-SCREEN '100'.
TYPE-POOLS slis.
* declaration of internal tables and work areas to be used
DATA: BEGIN OF it_pr OCCURS 0,
 banfn TYPE eban-banfn,
 bnfpo TYPE eban-bnfpo,
 loekz TYPE eban-loekz,
 statu TYPE eban-statu,
 ekgrp TYPE eban-ekgrp,
 matnr TYPE eban-matnr,
 werks TYPE eban-werks,
 lgort TYPE eban-lgort,
 preis TYPE eban-preis,
 peinh TYPE eban-peinh,
 END OF it_pr.
DATA: BEGIN OF it_mat OCCURS 0,
 matnr TYPE eban-matnr,
 END OF it_mat.
*DATA:BEGIN OF ITAB1 OCCURS 0,
DATA: l_answer.
DATA: it_fieldcat TYPE slis_t_fieldcat_alv,
 wa_fieldcat LIKE LINE OF it_fieldcat,
 it_event TYPE slis_t_event,
 wa_event TYPE slis_alv_event.
* declaration of variables to be used
DATA: r_ucomm TYPE sy-ucomm,
 mat_no TYPE eban-matnr,
 len TYPE i VALUE 1,
 count TYPE i VALUE IS INITIAL,
 iflag TYPE i VALUE IS INITIAL,
 iflag1 TYPE i VALUE 0.
DATA :pr_id TYPE sy-repid,
rt_extab TYPE slis_t_extab.
INITIALIZATION.
pr_id = sy-repid.
probably it would sol;ve ur problem
regards
ravish
plz dont forget to reward points if helpful

At selection screen output problem when a field is obligatory

Hi All,
I have two radiobuttons on the selection screen and when I select first radiobutton one screen should display and the other should not be displayed and vice-versa. It is working fine if I do not have a mandatory field.I am pasting my code here.Can anyone please help me how to handle this situation when we have some mandatory fields on one of these screens.
TABLES : mara,marc.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : p_meth1 RADIOBUTTON GROUP g1 USER-COMMAND g1,
p_meth2 RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK matnr WITH FRAME TITLE text-002.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS : so_matnr FOR marc-matnr MODIF ID m1 obligatory.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS : so_werks FOR marc-werks MODIF ID m1 .
SELECTION-SCREEN END OF BLOCK matnr.
SELECTION-SCREEN BEGIN OF BLOCK file WITH FRAME TITLE text-003.
SELECTION-SCREEN SKIP 1.
PARAMETERS: p_fpath TYPE ibipparms-path MODIF ID m2 LOWER CASE.
SELECTION-SCREEN END OF BLOCK file.
SELECTION-SCREEN BEGIN OF BLOCK date WITH FRAME TITLE text-004.
SELECTION-SCREEN SKIP 1.
PARAMETERS : p_date TYPE datuv.
SELECTION-SCREEN END OF BLOCK date.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CASE screen-group1.
WHEN 'M1'.
IF p_meth1 = 'X'.
screen-active = 1.
ENDIF.
IF p_meth2 = 'X'.
screen-active = 0.
ENDIF.
WHEN 'M2'.
IF p_meth2 = 'X'.
screen-active = 1.
ELSE.
screen-active = 0.
ENDIF.
IF p_meth1 = 'X'.
screen-active = 0.
ENDIF.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.
Thanks in advance
Sandeep

Obligatory fields with your requirement will not work, reason : The GUI checks obligatory fields before passing the control back to the program (i.e Before triggering the PAI )
If you check for empty fields and give appropriate error message in the PAI, the program will not allow you to switch to the other radio button until you fill something in the fields because the moment you select a radiobutton, it will validate the field and issue the error message.
So it is like a catch 22 situation.
All you can really do is to check see which radio button is clicked and then do your processing. Also make sure to assign a user command to the radiobutton and query it in the AT SELECTION SCREEN and based on the radiobutton selected, decide which fields should be validated.
" Additon...
INITIALIZATION " Default values
p_meth1 = 'X'.
AT SELECTION-SCREEN. " General PAI
if p_meth1 EQ 'X'.
"validate fields for meth1.
elseif p_meth2 EQ 'X'.
" validate fields for meth2.
endif.
regards,
Advait

AT SELECTION-SCREEN OUTPUT event of standard tcode

Hi
I need User-exit or BADI or Enhancment spot in AT SELECTION-SCREEN OUTPUT event of ME55.
I need to populate the default cost center into the cost center field from user parameters with pid 'KOS' when i execute the ME55.
I maintained the PID in user parameters but the value is not getting populated in ME55.
Please let me know
Govi

Thanks Benedict
Creating Module %_S_KOSTL and write our own logic to bring the parameter id value of Cost center from User profiles is NOT possible in program RM06BF00, screen 1000.
We can do that in Copied program of RM06BF00 ..which is the very last option.
I wanted to do that with User-exits or BADI or Enhancement spot etc...which i Couldn't do it so far...
The alternate might be Zprog and Ztcode or an SNOTE..
if you ALL think its NOT possible with User-exits or BADI or Enhancement spot or SNOTE etc..Then i will close this Thread...
Please let me know ASAP...
Thanks
Govi

Enforcing event AT-SELECTION-SCREEN OUTPUT

Hi Gurus
Does anybody know how to force event AT-SELECTION-SCREEN OUTPUT ?
What I'm aiming for is changing screen somewere outside of this event. For example.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_param.
IF p_param = 'change'.
    changes_in_screen = 'X'.
    *???*   "forcing AT-SELECTION-SCREEN OUTPUT event
ENDIF.
AT-SELECTION-SCREEN OUTPUT.
IF changes_in_screen = 'X'.
    LOOP AT SCREEN.
      "do something
    ENDLOOP.
ENDIF.
I would be grateful for any hints.

One alternative to define two selection screens. First selection screen (default selection screen of report #1000) having Client_type. After user hits execute (F8) then show the second selection screen with corresponding parameters.
PARAMETERS: p_client(1).
SELECTION-SCREEN BEGIN OF SCREEN 9000 AS WINDOW.
PARAMETERS: p_name(20),
            p_lname(20),
            p_cname(20),
            p_oname(20).
SELECTION-SCREEN END OF SCREEN 9000.
AT SELECTION-SCREEN OUTPUT.
CHECK sy-dynnr = '9000'.
* Hide corresponding fields on second selection screen
* based on values of P_CLIENT.
* Also should make key parameters obligatory!
START-OF-SELECTION.
CALL SELECTION-SCREEN 9000 STARTING AT 5 5.
Another alternative is to use a dialog/module pool program to handle this. Such screen field controlling can easily be done in dialog programs because you have full PAI/PBO control, unlike report program selection screen 1000. Unfortunately in a dialog program it is not easy to reproduce the functionality of a select-option.

Problem on "at selection-screen output." command

Hi ,
in my programe a part of code is :-
selection-screen : begin of block b0 with frame title text-000.
   selection-screen: skip 1.
parameters: s_box1 radiobutton group g1 user-command u1 default            'X',
              s_box2 radiobutton group g1.
selection-screen : end of block b0 .
selection-screen : begin of block b2 with frame title text-002.
select-options : s_vend for bseg-lifnr modif id m1 .
selection-screen : end of block b2 .
selection-screen : begin of block b3 with frame title text-003.
select-options : s_budat for bkpf-budat modif id m2 .
selection-screen : end of block b3 .
at selection-screen output.
if s_box1 = 'X'.
loop at screen.
if screen-group1 = 'M2'.
screen-active = '0'.
modify screen.
elseif screen-group1 = 'M1' .
screen-active = '1'.
modify screen.
endif.
endloop.
elseif s_box2 = 'X'.
loop at screen.
if screen-group1 = 'M2' .
screen-active = '1'.
modify screen.
elseif screen-group1 = 'M1'.
screen-active = '0'.
modify screen.
endif.
endloop.
endif.
while executing this one...
while clicking S_BOX2 from S_BOX1 , S_VEND is changing to S_BUDAT but if I click again S_BOX1 this program goes to infinite loop.
Please help me to correct this problem.
Thankx in adv.
Biswajit
N.B:- This is a test code. no coding convention is followed.

I just copied your code and Tested it is working fine with out any problem.
REPORT zscreen_test_.
TABLES:bseg,bkpf.
SELECTION-SCREEN : BEGIN OF BLOCK b0 WITH FRAME TITLE text-000.
SELECTION-SCREEN: SKIP 1.
PARAMETERS: s_box1 RADIOBUTTON GROUP g1 USER-COMMAND u1 DEFAULT 'X',
s_box2 RADIOBUTTON GROUP g1.
SELECTION-SCREEN : END OF BLOCK b0 .
SELECTION-SCREEN : BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
SELECT-OPTIONS : s_vend FOR bseg-lifnr MODIF ID m1 .
SELECTION-SCREEN : END OF BLOCK b2 .
SELECTION-SCREEN : BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
SELECT-OPTIONS : s_budat FOR bkpf-budat MODIF ID m2 .
SELECTION-SCREEN : END OF BLOCK b3 .
AT SELECTION-SCREEN OUTPUT.
IF s_box1 = 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'M2'.
        screen-active = '0'.
        MODIFY SCREEN.
      ELSEIF screen-group1 = 'M1' .
        screen-active = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ELSEIF s_box2 = 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'M2' .
        screen-active = '1'.
        MODIFY SCREEN.
      ELSEIF screen-group1 = 'M1'.
        screen-active = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
"If you have any code next to this place that under appropriate
"events.

Query related to at selection screen event & at selection-screen output

Hi all,
thanks in advance
i have two radio buttons say rd1 & rd2
on my selection screen i have date,period,year and these fields r mandatory fields
when i try to select the radio button rd2 then it is not disabling the fields period and year rather it is checking the fields for mandatory and vicevesr
here is the code plz help me out
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF rd1 = 'X'.
      IF screen-group1 = 'GR1'.
        screen-input = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
    IF rd2 = 'X'.
      IF screen-group1 = 'GR2'.
        screen-input = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
ENDLOOP.
AT SELECTION-SCREEN.
blank period is not allowed
    IF monat[] IS INITIAL.
      MESSAGE e008.
    ENDIF.
blank fiscal year is not allowed
    IF gjahr[] IS INITIAL.
      MESSAGE e009.
    ENDIF.
blank document date is not allowed
    IF bldat[] IS INITIAL.
      MESSAGE e020.
    ENDIF.
awiting for all u r replies

I UNDERSTOOD Y U HAVE GIVE ERROR MESSAGE,
WHEN U R DECLARING THE VALUES AS OBLIGATORY BEFORE, THEN NO NEED TO GIVE MESSAGES IN AT SELECTION SCREEN.
BUT BASED ON SOME CONDITIONS, IF U WANT TO MAKE THEM OBLIGATORY DYNAMICALLY THEN GIVE THE CONDITION ALSO
EXAMPLE
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF a = 'X'.
      IF screen-group1 = 'GR2'.
        screen-input = 0.
             ELSE.
       SCREEN-INPUT = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
    IF c = 'X'.
      IF screen-group1 = 'GR1'.
        screen-input = 0.
     ELSE.
       SCREEN-INPUT = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
AT SELECTION-SCREEN.
IF d is initial.
MESSAGE e009.
ENDIF.
start-of-selection.
write b.
2ND EXAMPLE:
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF a = 'X'.
      IF screen-group1 = 'GR2'.
        screen-input = 0.
             ELSE.
       SCREEN-INPUT = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
    IF c = 'X'.
      IF screen-group1 = 'GR1'.
        screen-input = 0.
     ELSE.
       SCREEN-INPUT = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
AT SELECTION-SCREEN.
IF B = 5 AND d is initial.
MESSAGE e009.
ENDIF.
start-of-selection.
write b.
I HAVE SENT U TWO EXAMPLES, IN THE SEOND EXMAPLE, IT WORKS FINE AS U HAVE GIVEN SOME OTHER CONDITION.
IN THE FIRST EXAMPLE, AS IT WILL NOT WORK AS IAM CHECKING ONLY INITIAL CONDITION.
FOR CHECKING ONLY INITIAL CONDITION, NO NEED TO WRITE IT AT SELECTION SCREEN , U CAN DIRECTLY DECLARE AS OBLIGATORY IN THE BEGINING IT SELF.
JUST COPY AND PASTE MY TWO PROGRAMS AND FIND OUT THE DIFFERENCE IAM EXPLAINING
Message was edited by: Hymavathi Oruganti

Event at selection-screen output

Hi all,
we have common include for all the reports. Now i need to add few selects to all screens based upon some conditions.so i added the seletions to the common include. Based upon some conditions ,i need to activate or deactivate these selections. this can be done at the event at seleciton-screen output. so i did that but few programs are giging dump as these programs already have the above mentioned event(ie at selection-screen output) now how to solve this issue.
Please suggest me .
Thanks
Jaffer Vali shaik

Hi Jaffer,
The conditions to display the additional selection, are they based on user input data? If not, you could try to put the logic in the initialization event. Check the 'where-used list' to see whether all programs accessing this common include already has initialization event or not.
If the display for selection are based on other selection criteria, then you need to evaluate the common include. Based on your project standard, does the include should have events processing in it? If yes, maybe the few programs that cause shortdump should move their logic to this common include (using the SY-REPID condition).
Regards,
Dewi

Selection-screen output , initialaization confusion

we have selectionscreen output, initialization events
first initializatuion,
than at selection-screen output
execute it, than we pressed f3 came bact to selection-screen
than which event ll trigger
thank you
kals.

The different events in a report Program are:
Load-of-program
Triggers the associated event in an internal session after loading a program of type 1, M, F, or S. Also runs the associated processing block once and once only for each program and internal session. The processing block LOAD-OF-PROGRAM has roughly the same function for an ABAP program of type 1, M, F or S as a constructor has for classes in ABAP Objects
Initialization.
This event is executed before the selection screen is displayed .
Initialization of all the values.
You can assign different values other than the values defaulted on the selection screen .
You can fill your selection screen with some values at runtime.
At Selection-Screen.
The event is processed when the selection screen has been processed (at the end of PAI ).
Validation & Checks of inputted values happen here
Extras :
ON VALUE-REQUEST FOR psel_low_high .
The pushbutton for F4 (Possible entries) appears beside the appropriate field.
... ON HELP-REQUEST FOR psel_low_high
. ... OUTPUT
This event is executed at PBO of the selection screen every time the user presses ENTER
Start-of-Selection.
Here the program starts selecting values from tables.
End-of-selection.
After all the data has been selected this event writes the data to the screen.
Interactive Events
Used for interactive reporting. It is used to create a detailed list from a basic list.
Events in an ABAP/4 Report Program
Start-Of-Selection
Processing block is executed after processing the selection screen
All the data is selected in this block.
All the main processing on the data except for interactive reporting is handled in this block.
End-Of-Selection
Data which is selected and has been processed is printed to the screen in this block.
List Processing happens in this block
Top-of-Page.
New-Page.
End-of-Page.
Events during List Processing
Top-of-Page.
Triggered by the first write statement in the program
It is used to have a standard header in the program for all the pages.
TOP-OF-PAGE is only executed before outputting the first line on a new page
New-Page.
Can be used when one wants to display different data on different pages
Terminates the current page and continues output on a new page.
Will not trigger the Top-of-Page or End-of-Page.
End-of-Page.
It is used to have a standard footer for all the pages.
Triggered by the program if the number of records exceed the line-count of the program.
Hope u understood....

Model program of at selection screen output

Similar Messages

Maybe you are looking for