How to create button in selection screen

hi
experts can u help me plzzzzzzzzzzz
for this

Hi,
You can create Push Buttons in the Slection Screen by assigning a User commnand to it.
Below is the stynax
SELECTION-SCREEN BEGIN OF SCREEN 1000.
SELECTION-SCREEN PUSHBUTTON 15(25) PUBU
                   USER-COMMAND CODE1.
SELECT-OPTIONS SEL2 FOR SPFLI_WA-CONNID.
PARAMETERS     PAR2 TYPE I.
SELECTION-SCREEN END OF SCREEN 1000.
then you need to write the code for the User command ( here CODE1) at the Selection screen event.
You can also check the Program demo_sel_screen_pushbutton in any Sap Server. this is a demo program.
Let me know incase you need any further info,
Thanks and Regards
Message was edited by:
        Pallavi S

Similar Messages

How to create a variant selection screen

Hi experts,
Can you tell me " How to create a variant selection screen ".
Please it's urgent.........
Thanks
Basu

Hi ,
Goto your selection screen
Make entries in the fileds od the selection screen
press save button, it will ask you for the mane of the Variant
Give the name of the Variant and save it
Variant is now created for the selection screen.
Reward if useful.
Regards,
Shilpi

How to create a new selection screen IN LOGICAL DATABASE PNPCE

how to create a new selection screen LDBS PNPCE

Hello Ankit,
Do you want to create a new selection screen in LDB PNPCE, or do you want to create a new selection screen in one of your reports using LDB PNPCE?
For later (which is more common), you can use HR Report Category.
Hope this helps.
Best Regards,
Biraju Rajyaguru

How to create a new selection screen LDBS PNPCE

how to create a new selection screen LDBS PNPCE

Hello Ankit,
Do you want to create a new selection screen in LDB PNPCE, or do you want to create a new selection screen in one of your reports using LDB PNPCE?
For later (which is more common), you can use HR Report Category.
Hope this helps.
Best Regards,
Biraju Rajyaguru

How to create variant for selection screen which is in subscreen

Hi,
How to create variant for selection screen which is in subscreen in a module pool program?
it is very urgent.
Thanks in advance.

Hi,
You can create the 'Parameter Transaction' so that whenever you run the particular transaction it will run with the initial value given when the Tcode was created and hence you can skip the initial screen of the module pool program.
To create Parameter transaction from SE93 you have to choose the last option i.e Parameter Transaction.
Regards
Sudheer

How to Add Push Button On Selection Screen

Hi Experts,
How to add Push button on Selection Screen.
Points will b rewarded for useful help.
Bohra.

Hi,
To create a pushbutton on the selection screen, you use:
SELECTION SCREEN PUSHBUTTON [/]<pos(len)> <push>
USER-COMMAND <ucom> [MODIF ID <key>].
The [/]<pos(len)> parameters and the MODIF IF addition have the same function as for the formatting options for underlines and comments.
<push> determines the pushbutton text. For <push>, you can specify a text symbol or a field name with a maximum length of eight characters. This character field must not be declared with the DATA statement, but is generated automatically with length <len>. The field must be filled before the selection screen is called.
For <ucom>, you must specify a code of up to four characters. When the user clicks the pushbutton on the selection screen, <ucom> is entered in the UCOMM of the SSCRFIELDS interface work area. You must use the TABLES statement to declare the SSCRFIELDS structure. The contents of the SSCRFIELDS-UCOMM field can be processed during the AT SELECTION-SCREENevent.
Ex.
REPORT DEMO.
TABLES SSCRFIELDS.
DATA FLAG.
SELECTION-SCREEN:
BEGIN OF SCREEN 500 AS WINDOW TITLE TIT,
BEGIN OF LINE,
PUSHBUTTON 2(10) BUT1 USER-COMMAND CLI1,
PUSHBUTTON 12(10) TEXT-020 USER-COMMAND CLI2,
END OF LINE,
BEGIN OF LINE,
PUSHBUTTON 2(10) BUT3 USER-COMMAND CLI3,
PUSHBUTTON 12(10) TEXT-040 USER-COMMAND CLI4,
END OF LINE,
END OF SCREEN 500.
AT SELECTION-SCREEN.
CASE SSCRFIELDS.
WHEN 'CLI1'.
FLAG = '1'.
WHEN 'CLI2'.
FLAG = '2'.
WHEN 'CLI3'.
FLAG = '3'.
WHEN 'CLI4'.
FLAG = '4'.
ENDCASE.
START-OF-SELECTION.
TIT = 'Four Buttons'.
BUT1 = 'Button 1'.
BUT3 = 'Button 3'.
CALL SELECTION-SCREEN 500 STARTING AT 10 10.
CASE FLAG.
WHEN '1'.
WRITE / 'Button 1 was clicked'.
WHEN '2'.
WRITE / 'Button 2 was clicked'.
WHEN '3'.
WRITE / 'Button 3 was clicked'.
WHEN '4'.
WRITE / 'Button 4 was clicked'.
WHEN OTHERS.
WRITE / 'No Button was clicked'.
ENDCASE.
This example defines four pushbuttons on a selection screen that is displayed as a
dialog box. The selection screen is defined in a statement chain for keyword
SELECTION-SCREEN.
If the text symbols TEXT-020 and TEXT-040 are defined as 'Button 2' and 'Button 4',
the four pushbuttons appear as follows on the selection screen displayed as a dialog box.
Regards,
Bhaskar

Creating push button on Selection screen application toolbar

Hi Friends,
this is a HR-ABAP report. I have to create a push button on Selection screen. when user clicks on that push button 'MODAL DIALOG BOX' has to be displayed containing some data.
plz kindly give some sample code to do this.
Regards,
Radhika Dasharatha.

Hi,
1)Use SELECTION-SCREEN PUSHBUTTON /10(20) PUSH USER-
COMMAND 'ABC'. in selection screen.
2) Give the static name to button in INITIALIZATION event like PUSH = 'PRESS'.
3) At selection screen.
if sy-ucomm eq 'ABC'.
call FM HR_BE_GE_MODAL_DIALOG
endif.
Thanks
Sandeep
Reward if useful

How to disable save button on selection screen (1000) run from other report

Hi Experts,
Can any one let me know how to disable save button on selection screen (1000) run from other report.
Say I am running from report R1 which submits report R2, but the save button should be disabled on
report R2(selection screen 100).
Thanks in advance.
Regards
RP.

Hi RPReddy16 ,
Try this:
DATA :BEGIN OF t_extab occurs 0,
fcode like rsmpe-func,
END OF t_extab.
REFRESH T_EXTAB.
MOVE 'SAVE' TO T_EXTAB-FCODE.
APPEND T_EXTAB.
CLEAR T_EXTAB.
SET PF-STATUS 'STATUS' EXCLUDING T_EXTAB.
Regards,
José

How to disable execute button in selection-screen

Hi,
I have already placed a execute button in selection screen but now I want to diable
     1. All std buttons including F8
     2.   but excluding F1
regards
paul

Hi
Check this FM : RS_SET_SELSCREEN_STATUS
sample code :
DATA: BEGIN OF i_exc OCCURS 0,
       code LIKE sy-ucomm,
   END OF i_exc.
DATA: ws_repid like sy-repid.
CLEAR i_exc.
i_exc-code = 'ONLI'.
APPEND i_exc.
MOVE: sy-repid TO ws_repid .
CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
    EXPORTING
      p_status = ' '
      p_program = ws_repid
    TABLES
      p_exclude = i_exc.
Laxman
Message was edited by: Laxmana Kumar

Error during creation of push button on selection screen

Hi,
I wanted to create push buttons on selection screen,
Code:
DATA DB1 TYPE VBAP-WERKS.
DATA DB2 TYPE MARA-MATNR.
SELECT-OPTIONS : SPLANT FOR DB1,
                                SCLASS FOR DB2.
SELECTION-SCREEN: FUNCTION KEY 1,
                                    FUNCTION KEY 2,
                                    FUNCTION KEY 3.
INITIALIZATION.
DATA FUNCTXT TYPE SMP_DYNTXT.
CLEAR FUNCTXT.
DATA: FUNCTXT_01 TYPE SSCRFIELDS-FUNCTXT_01.
FUNCTXT-TEXT = 'DEL'.
SSCRFIELDS-FUNCTXT_01 = FUNCTXT.
CLEAR FUNCTXT.
FUNCTXT-TEXT = 'EDIT'.
SSCRFIELDS-FUNCTXT_02 = FUNCTXT.
CLEAR FUNCTXT.
FUNCTXT-TEXT = 'CRE'.
SSCRFIELDS-FUNCTXT_03 = FUNCTXT.
But during activating, I'm getting the error as : Field "SSCRFIELDS-FUNCTXT_01" is unknown. It is neither in one of the specified tables nor defined by "DATA" statement.
Please suggest solutions to overcome this error.
Regards
Darshan MS

Hi,
trans. for examples of selection screen : BIBS
regards
Fred

Error in search help button at selection-screen

hi all,
i have a small issue.
i have created a seach help button in selection screen .
my code is as bellow.
TYPES: BEGIN OF ty_ZSD_SNID,
       KUNNR TYPE KUNNR,
       BAREA TYPE WERKS_D,
      END OF ty_ZSD_SNID.
DATA : it_z TYPE STANDARD TABLE OF ty_ZSD_SNID.
selection-screen : begin of block b with frame title text-000.
select-options : skunnr for zsd_snid-kunnr.
parameters :     pbarea like zsd_snid-barea obligatory.
selection-screen : end of block b.
INITIALIZATION.
SELECT KUNNR BAREA FROM ZSD_SNID INTO TABLE it_z.
SORT it_z BY BAREA KUNNR.
DELETE ADJACENT DUPLICATES FROM it_z COMPARING BAREA KUNNR.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR SKUNNR-low.
IF it_z[] IS NOT INITIAL.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
             EXPORTING
          DDIC_STRUCTURE         = ' '
               retfield               = 'KUNNR' " data base table field name
          PVALKEY                = ' '
              dynpprog               = sy-repid " program name
              dynpnr                 = sy-dynnr          "screen name
              dynprofield            = 'SKUNNR-LOW' " layot field name
          STEPL                  = 0
          WINDOW_TITLE           =
          VALUE                  = ' '
              value_org              = 'S'
          MULTIPLE_CHOICE        = ' '
          DISPLAY                = ' '
          CALLBACK_PROGRAM       = ' '
          CALLBACK_FORM          = ' '
          MARK_TAB               =
        IMPORTING
          USER_RESET             =
             TABLES
               value_tab              = it_z[]   " internal talble name
          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.
ELSE.
    MESSAGE E000(zsdsn).
ENDIF.
my issue is , its working properly if records are there in my z table.
if no records are there in the table then if i do comment the last message statement then its working.
if i do uncomment like the above code, then its dumming.
what i should i do ??
kind regards

closed because of no answer.

How to go from one selection screen to another selection screen?

Hi,
I am developing a report in that i want to display date and customer number in first selection screen.
After executing that program selection query is executed its select invoice number from data dictionary table and display invoice number as a radio button on selection screen 2.

Hello Kamlesh,
As per my understanding of your requirement, we can acheive your requirement by creating 2 program.
1st program selection screen with Customer number and Date and excecute the program and fetch the invoice number.
Then Use SUBMIT statement in your 1st program and call the 2nd program using the selection screen.
syntax:
SUBMIT ZREPORT2 VIA SELECTION-SCREEN AND RETURN.

Push button on selection screen

Hi,
I have provided push button on selection screen after input fields I mean just below to input fields by using the syntax selection screen pushbutton.. And it is appearing on the selection screen. As per the requirement I need to enter material number on the selection screen and if I press corresponding push button I need to call one transaction using bdc program. I wrote case sy-comm and corresponding user command ( whatever is there in the selection screen syntax) in when condition under start of selection event.
But the control is not going to that place after I press push button. If I put that code inside of at selection screen it is going. But I can not write all the bdc program and select queries inside of at selection screen event if so please suggest me how I can proceed.
I will give the points.
Thanks a lot in advance.

Hi,
SELECTION-SCREEN BEGIN OF BLOCK b_2 WITH FRAME TITLE text-018.
SELECT-OPTIONS s_fields FOR qpmk-mkmnr NO-DISPLAY.
SELECTION-SCREEN PUSHBUTTON /1(24) name USER-COMMAND flds.
SELECTION-SCREEN END OF BLOCK b_2.
AT SELECTION-SCREEN.
IF sscrfields-ucomm = 'FLDS'.
PERFORM display_fields.
ENDIF.

Radio Buttons on Selection Screen

Hi,
I have four radio buttons on selection screen in a frame, all belonging to the same group.
When the program is called using transaction 1, first two radio buttons are displayed. When the program is called using transaction 2, bottom two radio must be displayed.
I am doing this using the following code.
The problem is : When last two are displayed, there is empty space left on the top and first two are displayed there is empty space left in the bottom of the frame. How can this be taken care of such there are no empty spaces in the box frame?
Code:
Radio Buttons for Table Name
SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE text-005.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_ot   RADIOBUTTON GROUP grp1 MODIF ID one.
SELECTION-SCREEN COMMENT 5(31) text-001 FOR FIELD p_ot.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_exp   RADIOBUTTON GROUP grp1 MODIF ID one.
SELECTION-SCREEN COMMENT 5(31) text-002 FOR FIELD p_exp.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_cost   RADIOBUTTON GROUP grp1 MODIF ID two.
SELECTION-SCREEN COMMENT 5(31) text-003 FOR FIELD p_cost.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : p_att   RADIOBUTTON GROUP grp1 MODIF ID two.
SELECTION-SCREEN COMMENT 5(31) text-004 FOR FIELD p_att.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN END OF BLOCK bl1.
Initialization
INITIALIZATION.
Display Table Names depending on transaction calling the program
PERFORM display_table_names.
FORM display_table_names.
DATA : l_mod_id(3) TYPE c.
IF sy-tcode EQ 'ZVTEST1'.
    l_mod_id = 'ONE'.
ELSEIF sy-tcode EQ 'ZVTEST2'.
    l_mod_id = 'TWO'.
ENDIF.
LOOP AT SCREEN.
    IF screen-group1 EQ l_mod_id.
      screen-invisible   = '1'.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
ENDFORM.                    " display_table_names

Hi,
REPORT Z_SALES MESSAGE-ID ZZ                          .
*                             Variables                                *
DATA: IT_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE,
      IT_MSGS LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
DATA: V_FILE TYPE STRING.
*                         Internal Tables                              *
DATA: BEGIN OF IT_SALES OCCURS 0,
        AUART,
        VKORG,
        VTWEG,
        BSTKD,
        KUNNR_KUNAG,
        KUNNR_KUNWE,
        KETDAT,
        KPRGBZ,
        PRSDT,
        BSTKD_1,
        KUNNR_KUNAG1,
        KUNNR_KUNWE1,
        KETDAT_1,
        KPRGBZ_1,
        PRSDT_1,
        ZTERM_1,
        INCO1,
        INCO2,
        MABNR,
        KWMENG,
        BSTKD_2,
        KUNNR_KUNAG2,
        KUNNR_KUNWE2,
        KETDAT_2,
        KPRGBZ_2,
        PRSDT_2,
        ZTERM_2,
        INCO1_1,
        INCO2_2,
        KSCHL,
        KBETR,
      END OF IT_SALES.
*                       Selection-Screen                               *
*Selection Screen 1
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS : P_FILE(25) TYPE C,
             O_FILE(25) TYPE C.
SELECTION-SCREEN END OF BLOCK B1.
*Selection Screen 2
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
PARAMETERS: CAL_TRA RADIOBUTTON GROUP G1 USER-COMMAND FLAG,
            SESSION RADIOBUTTON GROUP G1 DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK B2.
*Selection Screen 3
SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-003.
PARAMETERS: MODE DEFAULT 'X' MODIF ID BL1,
            UPDATE DEFAULT 'X' MODIF ID BL1.
SELECTION-SCREEN END OF BLOCK B3.
*Selection Screen 4
SELECTION-SCREEN BEGIN OF BLOCK B4 WITH FRAME TITLE TEXT-003.
PARAMETERS: SES_NAM(25) MODIF ID BL2,
            KEP_TRAS TYPE C DEFAULT 'X' MODIF ID BL2,
            LOC_DATE TYPE SY-DATUM MODIF ID BL2,
            USER TYPE SY-UNAME DEFAULT SY-UNAME MODIF ID BL2.
SELECTION-SCREEN END OF BLOCK B4.
*                     At Selection-Screen Output                      *
AT SELECTION-SCREEN OUTPUT.
IF CAL_TRA = 'X'.
    LOOP AT SCREEN.
      IF SCREEN-GROUP1 = 'BL1'.
        SCREEN-ACTIVE = '1'.
      ENDIF.
      IF SCREEN-GROUP1 = 'BL2'.
        SCREEN-ACTIVE = '0'.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
IF SESSION = 'X'.
    LOOP AT SCREEN.
      IF SCREEN-GROUP1 = 'BL1'.
        SCREEN-ACTIVE = '0'.
      ENDIF.
      IF SCREEN-GROUP1 = 'BL2'.
        SCREEN-ACTIVE = '1'.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
*                     At Selection-Screen                             *
AT SELECTION-SCREEN.
PERFORM VALIDATE_MANDATORY_FIELDS.
*****************            INITIALIZATION         ********************
INITIALIZATION.
LOC_DATE = SY-DATUM - 1.
*                       Start of Selection                             *
START-OF-SELECTION.
V_FILE = P_FILE.
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      FILENAME                = V_FILE
      FILETYPE                = 'ASC'
      HAS_FIELD_SEPARATOR     = ' '
    TABLES
      DATA_TAB                = IT_SALES
    EXCEPTIONS
      FILE_OPEN_ERROR         = 1
      FILE_READ_ERROR         = 2
      NO_BATCH                = 3
      GUI_REFUSE_FILETRANSFER = 4
      INVALID_TYPE            = 5
      NO_AUTHORITY            = 6
      UNKNOWN_ERROR           = 7
      BAD_DATA_FORMAT         = 8
      HEADER_NOT_ALLOWED      = 9
      SEPARATOR_NOT_ALLOWED   = 10
      HEADER_TOO_LONG         = 11
      UNKNOWN_DP_ERROR        = 12
      ACCESS_DENIED           = 13
      DP_OUT_OF_MEMORY        = 14
      DISK_FULL               = 15
      DP_TIMEOUT              = 16
      OTHERS                  = 17.
IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*&      Form VALIDATE_MANDATORY_FIELDS
*       text
FORM VALIDATE_MANDATORY_FIELDS.
IF P_FILE IS INITIAL OR O_FILE IS INITIAL.
    MESSAGE E000 WITH 'ENTER BOTH THE FILE NAMES'.
ENDIF.
IF CAL_TRA = 'X'.
    IF MODE IS INITIAL OR UPDATE IS INITIAL.
      MESSAGE E000 WITH 'ENTER BOTH THE OPTIONS'.
    ENDIF.
    IF SY-SUBRC <> 0.
      IF MODE <> 'A' OR MODE <> 'E' OR MODE <> 'N'
      OR MODE <> 'a' OR MODE <> 'e' OR MODE <> 'n'.
        MESSAGE E000 WITH 'Mode should be either A, E or N'.
      ENDIF.
      IF UPDATE <> 'S' OR UPDATE <> 'A'
      OR UPDATE <> 's' OR UPDATE <> 'a'.
        MESSAGE E000 WITH 'Mode should be either S or A'.
      ENDIF.
    ENDIF.
ENDIF.
IF SESSION = 'x'.
    IF SES_NAM   IS INITIAL
    OR KEP_TRAS IS INITIAL
    OR LOC_DATE IS INITIAL
    OR USER      IS INITIAL.
      MESSAGE E000 WITH 'ENTER ALL THE FIELDS'.
    ENDIF.
ENDIF.
ENDFORM.                    "VALIDATE_MANDATORY_FIELDS
Regards
vijay

How to can we do selection-screen modification for LDB?

Hi All,
I have custom field in my selection-screen of LDB PNP.
Can you people please let me know how can I put the selection-screen modificaiton For ex:
i have created
parameters a as checbox.
select-options: p_btrtl for p0001-btrtl no-intervals.
now If the check box is selected then p_btrtl we can enter values or esle If check box is not selected then p_btrtl will be grayed out, ( I.e. SCREEN-INPUT = 0)
This is simple from ABAP without LDB. But with LDB can we achieve?????????????
Satish
Edited by: Satish Vasireddy on Jun 23, 2010 4:05 PM

you can use the following logic for the additional selection validation. I have done by using PNP LDB. Ex : I have done for one of the field in IT0377.
SELECT-OPTIONS: s_bplan FOR p0377-bplan.
*&      Form check_selection_0377
This subroutine is used to check the selection screen
FORM check_selection_0377.
LOOP AT p0377 WHERE pltyp IN s_bplan
                 AND levl1 IN s_lti
                 AND   begda LE pn-endda
                 AND   endda GE pn-begda.
    CALL FUNCTION 'HR_CHECK_AUTHORITY_INFTY'
      EXPORTING
        tclas            = 'A'
        pernr            = pernr-pernr
        infty            = p0377-infty
        subty            = p0377-subty
        begda            = pn-begda
        endda            = pn-endda
        level            = 'R'
      EXCEPTIONS
        no_authorization = 1
        internal_error   = 2
        OTHERS           = 3.
    IF NOT sy-subrc IS INITIAL.
      DELETE p0377.
    ENDIF.
ENDLOOP.
selection not found and no value selected
IF sy-subrc NE 0.
    READ TABLE s_bplan.
    IF sy-subrc EQ 0.
      REJECT.
    ENDIF.
    READ TABLE s_lti.
    IF sy-subrc EQ 0.
      REJECT.
    ENDIF.
ENDIF.
ENDFORM.                    " check_selection_0377
Regards,
Preetham

How to create button in selection screen

Similar Messages

Maybe you are looking for