Skip to Content
avatar image
Former Member

TABLES : SSCRFIELDS in OOPS

Hi Experts,

Could come one suggest me how do I get push buttons on selection screen application bar making use of sccrfields , but not defining statement TABLES : SSCRFIELDS , as this statement is no longer encouraged in OOPS.

I would like to have the same functionality of getting the push button on selection screen but not using tables statement & PF-STATUS.

Please suggest . Rewards for helpful answer.

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

2 Answers

  • Best Answer
    avatar image
    Former Member
    Oct 15, 2007 at 02:47 AM

    Check RSDEMO* and BCALV* in SE38

    Add comment
    10|10000 characters needed characters exceeded

  • Oct 15, 2007 at 03:35 AM

    Hi Amber..

    This is the Solution.

    **SELECTION SCREEN - CUSTOMIZING GUI STATUS

    REPORT ZSEL_GUI .

    parameters : p_dsn(30) DEFAULT 'EMP.TXT'.

    DATA : V_STATUS TYPE SY-PFKEY VALUE 'SEL1',

    "create this in SE41 WITH TYPE Selection Screen

    V_rEPID TYPE SY-REPID.

    AT SELECTION-SCREEN OUTPUT.

    V_REPID = SY-REPID.

    DATA itab TYPE TABLE OF sy-ucomm.

    APPEND: 'PRIN' TO itab.

    APPEND: 'SPOS' TO itab.

    CASE sy-dynnr.

    WHEN '1000'.

    CALL FUNCTION <b>'RS_SET_SELSCREEN_STATUS'</b>

    EXPORTING

    p_status = V_STATUS

    P_PROGRAM = V_REPID "program where the GUI Status is created

    TABLES

    p_exclude = itab. "Fields to be excluded from Standard GUI

    ENDCASE.

    AT SELECTION-SCREEN.

    <b> CASE SY-UCOMM.</b>

    WHEN 'PRIN'.

    ENDCASE.

    Note : In SE41 GUI Status select the menu path:

    EXTRAS -> Adjust Template -> Status type

    Select the Radio button "SELECTION SCREEN" and Copy.

    This will copy all the Standard buttons of a selection screen.

    Then add the new buttons in the App Tool Bar.

    <b>REWARD IF HELPFUL.</b>

    Add comment
    10|10000 characters needed characters exceeded