Reg:Skipping Selection screen

Hi Experts,
                   My requirement is that i have a executable program with selection screen and the output will be of ALV display.
                   For some users i need to take them directly to the  ALV display without displaying selection parameters .
Regards,
Vikram sukumar

Hi,
try this logic it works.
declare a selection screen with number
SELECTION-SCREEN BEGIN OF SCREEN 100.
parameter p_matnr type matnr.
SELECTION-SCREEN END OF SCREEN 100.
if sy-uname ne 'CHACX074'.
call the selection screen only if the particular user needs screen.
call screen 100.
else.
p_matnr = '100'.
endif.
write : p_matnr.
When you are creating TCODE dont specify the Selection screen . as its determine by the program.
by this you can use single TCODE.
Regards,
Shanmugavel Chandrasekaran
Edited by: shanmugavel chandrasekaran on Mar 10, 2010 6:37 AM

Similar Messages

  • Can I skip selection screen when using PNP & HR Report Cat?

    I am using log. database PNP for my report that we are then accessing through ITS - ESS.  I do not want the ESS user to see the selection screen (It populates all values in initialization).  I have created an HR Report category with nothing selected, but I still get pernr as a selection.
    Is there a way to skip the selection screen?  (Sorry, this might be very simple and i'm missing something!)
    Thanks so much!!!!

    Well,  I'm thinking that you would have to have a short "driver" program.
    report zdriver.
    submit <zreport> and return.
    Regards,
    Rich Heilman

  • Reg: LDB& Selection screen

    Hello All,
    I have a question reg. selection screen associated with LDB. Iam developing a LDB for Hedge where there are nodes which have the same selection opt but
    they are disjunct. But in LDB static slection screen , we associate Sel Opt with
    a node  and it would appear only for that node. In my case , i have two nodes for the same Sel Opt. How can i resolve this issue ? Kindly help.

    Hai Srivijaya
    Go through the following Document
    1. A logical database is in fact
    a program only.
    2. This LDB provides two main things :
    a) a pre-defined selection screen
    which handles all user inputs and validations
    b) pre defined set of data
    based upon the user selection.
    3. So we dont have to worry about from
    which tables to fetch data.
    4. Moreover, this LDB Program,
    handles all user-authorisations
    and is efficient in all respects.
    5. tcode is SLDB
    good info about Logical Database. you can check the link.
    http://www.geekinterview.com/question_details/1506
    http://help.sap.com/saphelp_46c/helpdata/EN/35/2cd77bd7705394e10000009b387c12/frameset.htm
    Re: How to Create and Use ldb in reports?
    Re: Logical databases
    http://help.sap.com/saphelp_46c/helpdata/en/9f/db9bed35c111d1829f0000e829fbfe/frameset.htm
    Functions for displaying and changing logical databases:
    Call Transaction SE36 or
    Choose ABAP Workbench -> Development -> Programming environ. -> Logical databases
    Interaction between database program and report:
    During program processing, subroutines are performed in the database program and events are executed in the report.
    To read data from a database tables we use logical database.
    A logical database provides read-only access to a group of related tables to an ABAP/4 program.
    advantages:-
    The programmer need not worry about the primary key for each table.Because Logical database knows how the different tables relate to each other,and can issue the SELECT command with proper where clause to retrieve the data.
    i)An easy-to-use standard user interface.
    ii)check functions which check that user input is complete,correct,and plausible.
    iii)meaningful data selection.
    iv)central authorization checks for database accesses.
    v)good read access performance while retaining the hierarchical data view determined by the application logic.
    disadvantages:-
    i)If you donot specify a logical database in the program attributes,the GET events never occur.
    ii)There is no ENDGET command,so the code block associated with an event ends with the next event
    statement (such as another GET or an END-OF-SELECTION).
    1. transaction code SLDB.
    2.enter name z<ldb-name>
    3.create
    4.short text
    5.create
    6. name of root node (here Ekko)
    7. enter short text (f6)
    8.node type -> data base table.
    9.create
    10 change logical DB
    riht click on ekko and insert node
    here node name ekpo
    11.create
    12. click on selections
    13. press no Should the changed structure of Z<ldb name> be saved first.
    14.select tables which you want to join.
    15.transfer
    16 now you have to o to coding part.
    17. save
    activate.
    19.click to src code
    double click on first include and activate
    Regards
    Sreeni

  • How to skip selection screen? Please help!

    Hi Experts,
           I have a report program that has a default selection screen (1000) and ALV output. First selection screen is displayed and on execution ALV is shown.
    My requirement is, if the user is not authorized to run this report then selection screen should be skipped and instead display a error page. This error page is nothing but some write statements in ABAP displaying error icon and error info.
    Currently I have written the authorization check in the INITIALIZATION event. Here I am setting a flag if the user is not authorized followed by "write" statements showing error info.
    But when I run the report, error info is not displayed and instead selection screen loads even though the user is not authorized. I have written the selection screen code in the TOP include.
    So what shall I do? How to skip the selection screen?
    Are there any other better ways to handle my case?
    Thanks
    Gopal

    Got it.
    CODE:
    REPORT  zzsorttry                               .
    SELECTION-SCREEN BEGIN OF SCREEN 1001.
    PARAMETERS : p_vbeln TYPE vbak-vbeln.
    SELECTION-SCREEN END OF SCREEN 1001.
    DATA : flag.
    INITIALIZATION.
    *C-- Put your authorization check here.
      IF 1 = 1.
        flag = 1.
        LEAVE TO LIST-PROCESSING .
      ELSE.
        CALL selection-screen 1001.
      ENDIF.
    START-OF-SELECTION.
      IF flag IS NOT INITIAL.
        CLEAR flag.
        WRITE: 'User', sy-uname , 'not authorized to use this report'.
      ENDIF.

  • Skipping Selection Screen for a report program

    Hi guys,
    I have a report program that works in 2 modes - Create and modify ( There is a toggle button in the ALV report). Its an editable ALV grid. There are 2 tcodes - zcreate and zmodify to access the same report in 2 above modes. For zmodify, i have a selection screen. How do i skip the selection screen for zcreate ?
    Here is my report program
    REPORT ZSWR_RCKDVOLS .
    INCLUDE ZSWR_RCKDVOLS_TOP.
    INCLUDE ZSWR_RCKDVOLS_CLDEF.
    INCLUDE ZSWR_RCKDVOLS_CLIMP.
    INCLUDE ZSWR_RCKDVOLS_SELSCR. " Selection Options are written in this.
    INCLUDE ZSWR_RCKDVOLS_PBO.
    INCLUDE ZSWR_RCKDVOLS_PAI.
    INCLUDE ZSWR_RCKDVOLS_FORM.
      INITIALIZATION
    initialization.
      perform layout_build.
      AT SELECTION-SCREEN
    at selection-screen on s_locid.
      clear lv_plnt.
      select single werk from oijrra
                          into lv_plnt
                          where locid in s_locid and rpart = gc_rpart.
      perform memory_id_build.
      START-OF-SELECTION
    start-of-selection .
      perform fieldcatalog.
      perform fill_internal_table.
      perform build_outtab.
    END-OF-SELECTION.
      CHECK: NOT gi_zswt_rckdvols[] IS INITIAL.
      set SCREEN 100.        "Main Screen
    A sample code will be greatly helpful.
    Thanks,
    SHK

    So if we were to implement this in your program.....
    report zswr_rckdvols .
      include zswr_rckdvols_top.
      include zswr_rckdvols_cldef.
      include zswr_rckdvols_climp.
    <b>  include zswr_rckdvols_selscr. " Selection Options are written in this ".
    * Add this line into your selection screen include.
      parameters: p_switch type c no-display.</b>
      include zswr_rckdvols_pbo.
      include zswr_rckdvols_pai.
      include zswr_rckdvols_form.
    * INITIALIZATION
    initialization.
      perform layout_build.
    * AT SELECTION-SCREEN
    <b>at selection-screen output.
      if sy-tcode = 'ZCREATE'
        and p_switch = space.
        submit zswr_rckdvols
               with p_switch = 'X'
                     and return.
        leave program.
      endif.</b>
    at selection-screen on s_locid.
      clear lv_plnt.
      select single werk from oijrra
      into lv_plnt
      where locid in s_locid and rpart = gc_rpart.
      perform memory_id_build.
    * START-OF-SELECTION
    start-of-selection .
      perform fieldcatalog.
      perform fill_internal_table.
      perform build_outtab.
    end-of-selection.
      check: not gi_zswt_rckdvols[] is initial.
      set screen 100. "Main Screen
    Regards,
    Rich Heilman

  • How to skip selection screen ?

    hi,
    i have a problem:
    i an abap i have an selection screen with lets say 10 fields.
    how can i avoid that this selection screen is displayed ? i want to do the 'execute' (F8) autmaticly with prefilled values.
    But not for every user, only for a special variant of the report .
    how can i handle this ?
    reg, Martin

    Hi,
    You can do this thing in 2 steps
    1. Create a transaction for your report program
    2. Write a new program in which you will check for the user names
    if the user executing the program comes in the category where you need to directly go without selection screen then you can use the SUBMIT statement, if the user is not in that category then call the transaction which you have created and it will show you the selection screen.
    Regards,
    Pramod

  • Skip Selection screen

    Hi Friends,
    I need to run a report and before the report is generated i need to run a Extract program. So the screen sequence is goe like this.
    1. The initial selection screen is the selection criteria for the report.
    2. Once the criteria is given and executed it calls up another selection screen which forms the selection criteria for the extraction program.
    3. Then the report is displayed.
    My requirement is to suppress the selection screen for the extraction program ie the extraction program should run in the background with pre-defined selection criteria. How to go about it?
    If i use SUBMIT .. VIA SELECTION SCREEN.. it still comes up with the selection screen with the pre-defined values.
    Thanks in advance.

    Submit your program like this......
    SUBMIT program
            with p_field1 = a_parameter
            with p_field2 = b_parameter
            with s_field3 in c_select_Option
                   and return.
    Here you are passing values from varialble to the selection-screen fields, lets say they are P_FIELD1 and P_FIELD2.  Using the WITH statement allows you to pass parameters as well as select-options.  It will skip the selection screen and continue processing with the passed selection-screen values.
    Regards,
    Rich Heilman

  • Skipping Selection Screen

    Dear All,
                My report looks like this,(ex.,).
    kpi                       month
    headcount              34
    When i click on 34 it will calls standard transaction which is done by bdc program in zprogram.,
    In my main program i called that zprogram by 'submit zprogram and return'.
    When i click on 34 it straightly goes to that standard report in this report when i say back it must call my report but it is going to selection screen for standard report.,
    So, for skipping that selection screen what can i do can someone help me.,
    Thanks,
    ThiruKumaran. R.

    Hi,
    This is my zbdc program
    CALL FUNCTION 'OIL_LAST_DAY_OF_PREVIOUS_MONTH'
      EXPORTING
        i_date_old = sy-datum
      IMPORTING
        e_date_new = datep.
    datel = datep.
    datel+6(2) = '01'.
    data : LV_EIAP type D,
           LV_EIAP1 type D.
           CALL FUNCTION 'CONVERT_DATE_FORMAT'
            EXPORTING
              I_DATE            = dateL
            IMPORTING
              E_CALC_DATE       = LV_EIAP.
    CALL FUNCTION 'CONVERT_DATE_FORMAT'
    EXPORTING
       I_DATE            = dateP
    IMPORTING
       E_CALC_DATE       = LV_EIAP1.
    perform bdc_dynpro      using 'RPAPL002' '1000'.
    perform bdc_field       using 'BDC_CURSOR'
                                  'PAPMASSN-LOW'.
    perform bdc_field       using 'BDC_OKCODE'
                                  '=ONLI'.
    perform bdc_field       using 'PAPBEGDA'
                                 LV_EIAP.
    perform bdc_field       using 'PAPENDDA'
                                  LV_EIAP1.
    perform bdc_field       using 'PAPAPSTA-LOW'
    perform bdc_field       using 'PAPMASSN-LOW'
                                  '41'.
    perform bdc_field       using 'REFE1'
                                 'X'.
    perform bdc_field       using 'ALV'
                                  'X'.
    perform bdc_dynpro      using 'RPAPL002' '2000'.
                CALL TRANSACTION 'S_AHR_61015512' USING BDCDATA MODE 'E'.
    Thanks,
    ThiruKumaran. R

  • Reg the selection screen value request

    i am writing this code for getting corresponding material no for the plant which i giving in the selection-screen .
    parameter : WERKS type marc-werks,
                matnr type marc-matnr.
    data : begin of itab occurs 0,
           matnr like marc-matnr,
           werks like marc-werks,
           end of itab.
    at selection-screen on value-request for werks.
    select matnr werks from marc up to 10 rows into table itab.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
      DDIC_STRUCTURE         = ' '
        RETFIELD               = 'WERKS'
      PVALKEY                = ' '
       DYNPPROG               = sy-cprog
       DYNPNR                 = sy-dynnr
       DYNPROFIELD            = 'WERKS'
      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.
    pls help

    Hi Check this ...
    Its working.....
    PARAMETER : werks TYPE marc-werks,
    matnr TYPE marc-matnr.
    DATA : BEGIN OF itab OCCURS 0,
    matnr LIKE marc-matnr,
    werks LIKE marc-werks,
    END OF itab.
    DATA: dynfields TYPE TABLE OF dynpread WITH HEADER LINE.
    DATA: return TYPE TABLE OF ddshretval WITH HEADER LINE.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR werks.
      CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
        EXPORTING
          tabname           = 'T001W'
          fieldname         = 'WERKS'
          dynpprog          = sy-cprog
          dynpnr            = sy-dynnr
          dynprofield       = 'WERKS'
        TABLES
          return_tab        = return
        EXCEPTIONS
          field_not_found   = 1
          no_help_for_field = 2
          inconsistent_help = 3
          no_values_found   = 4
          OTHERS            = 5.
      REFRESH dynfields.
      READ TABLE return WITH KEY fieldname = 'WERKS'.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR matnr.
      SELECT matnr werks FROM marc
      INTO TABLE itab
      WHERE werks EQ return-fieldval.
      CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
    DDIC_STRUCTURE = ' '
      retfield = 'MATNR'
    PVALKEY = ' '
      dynpprog = sy-cprog
      dynpnr = sy-dynnr
      dynprofield = 'MATNR'
    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 NE 0.
    ENDIF.
    Regards,
    Sai Ramesh

  • Reg. Selection screen in Dashboard Reports

    Hi,
    This is regarding the Variable selection screen appearing for the Dashboard Reports.  Say, when the user clicks on the Dashboard report in Portal, it should directly go to the page showing the Charts & Graphs instead of showing the Variable selection screen.  There are some mandotory values in the selection screen like Fiscal year in our report, so whenever i click the report it is first showing up the variable selection screen and then its showing the report.
    Is it possible to execute the report directly without showing up the variable selection screen?
    Thanks for your time.
    Regards,
    Murali

    Hi Murali,
    The best way is to do with Filter web Item.
    But, since you want to do something in the web page itself. i dont think there is any such option available if your template has only charts.
    If you have Analysis Item or Navigation Pane in your dashboard template, then there is a way out.
    You simply need to right-click on either of them.
    You will see Filter. So, here you can set the variable value.
    This doesnt work, if you right-click on the charts.
    -Pradnya

  • ITS Mobile - how to prefill and skip selection screen

    Hi there,
    I am struggling with requirement for ITS mobile service:
    I need to fill the input fields on selection screen with values from url and automaticaly jump to the second screen.
    I know this is possible with ITS as described [here|http://wiki.sdn.sap.com/wiki/pages/viewpage.action?pageId=22375].
    Can I use similar approach for ITS mobile? How could I parse url parameters into input fields?
    If this is not possible, what are my other options?
    Thanks,
    Igor

    Hi Rajashiva,
    that is not an option - the ITS mobile service will be called from an external system providing some parameters in URL.
    Thanks anyway,
    Igor

  • REG hiding selection-screen comment

    Hi all,
    Cud any one tell me how to hide a selection-screen comment.

    hi chaitanya,
    see the example may be useful.
    SELECTION-SCREEN BEGIN OF BLOCK BLOCK.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(8) PWD.
    SELECTION-SCREEN POSITION 35.
    PARAMETERS: PASSWORD(8) MODIF ID AAA.
    SELECTION-SCREEN END OF LINE.
    PARAMETERS: PROGRAM(8).
    SELECTION-SCREEN END OF BLOCK BLOCK.
    AT SELECTION-SCREEN OUTPUT.
      LOOP AT SCREEN.
        IF SCREEN-GROUP1 = 'AAA'.
          SCREEN-invisible = '1'.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    reward if useful,
    thanks and regards

  • Reg: calling selection screen from the second list

    Hi all,
    How can we call the selection screen from the second screen.
    Can any one help me to solve this problem.

    HI RJ,
    Try .....
    case sy-ucomm.
    WHEN '&F03'.
    LEAVE TO SCREEN '0'.
    endcase.
    after the FM for grid-display
    i m using the same .....
    i hav selection-screen..then alv grid screen 1  then again another screen with alv grid display..
    bt in my code for first alv grid ...i m using REUSE_ALV_GRID_DISPLAY_LVC
    as
        CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
          EXPORTING
            i_callback_program       = sy-repid
            i_callback_pf_status_set = 'SET_PF_STATUS'(303)
            i_callback_user_command  = 'USER_COMMAND'(304)
            i_grid_title             = 'Reconcilation Report'(305)
            is_layout_lvc            = it_layout
            it_fieldcat_lvc          = gt_fieldcat3[]
          TABLES
            t_outtab                 = gt_msg[].
    here i musing set_pf_status to add one pushbutton to the screen. in ur case u can avoid that...
    after that
    *&      Form  set_pf_status
          text
         -->EXTAB      text
    FORM set_pf_status USING extab TYPE slis_t_extab.           "#EC NEEDED
      SET PF-STATUS 'STANDARD_FULLSCREEN'.
    *get back to Selection Screen
      case sy-ucomm.
        WHEN '&F03'(328).
          LEAVE TO SCREEN '0'.
      endcase.
    ENDFORM.                    "set_pf_status
    its working for me..
    Thnx
    Rohit...
    Edited by: Rohit Kumar on Oct 29, 2008 3:20 PM

  • Skip selection screen output device

    Hi Guys,
    Question. Is there anyway that i could skip the output device screen selection and straight go to 'print preview'? at the same i wish to set the printer to 'LOCL'. Thanks in advance
    Regards

    hi ,
    In your sap script you would be having open form,write form and close form you have to declare before open form...
    i have pasted a sample code here you can check it.....
    REPORT  ZV_DELIVERY_SLIP_PRINT                  .
    Tables:
    tables: likp,vbak,adrc,vbpa,kna1,sadr,ITCPO,LIPS.
    parameters: p_vbeln like likp-vbeln obligatory,
                p_proj(50) type C,
                p_node(50) type c,
                p_pal(50) type c default 'PALLET 1 of 2',
                p_ldest like nast-ldest default 'LOCL',
                p_imme type c default 'X'.
    Start-of-selection.
      perform 100_collect_db_recs.
      perform 200_collect_adrc_details.
    *&      Form  100_collect_db_recs
          text
    -->  p1        text
    <--  p2        text
    FORM 100_collect_db_recs .
      select single * from LIPS where vbeln = p_vbeln.
      if sy-subrc ne 0.
        write:/02 'Delivery does not exist!'.
        stop.
      else.
        select single * from vbak where vbeln = lips-vgbel.
        if sy-subrc ne 0.
          write:/02 'Sales Order does not exist!'.
        endif.
      endif.
    ENDFORM.                    " 100_collect_db_recs
    *&      Form  200_collect_adrc_details
          text
    -->  p1        text
    <--  p2        text
    FORM 200_collect_adrc_details .
      SELECT SINGLE *
      FROM VBAK
      WHERE VBELN EQ vbak-kunnr.
      SELECT SINGLE *
      FROM KNA1
      WHERE KUNNR EQ vbak-kunnr.
      SELECT SINGLE ADRNR
        INTO vbpa-adrnr
        FROM VBPA
       WHERE VBELN EQ vbak-vbeln
         AND PARVW EQ 'WE'.              " Sold to party.
      SELECT SINGLE NAME1
        INTO sadr-name1
        FROM SADR
       WHERE ADRNR EQ vbpa-ADRNR.
      SELECT NAME1 NAME2 NAME3 NAME4 STREET CITY1 CITY2 PO_BOX
                                 STR_SUPPL1 POST_CODE1 FROM
        ADRC INTO (ADRC-NAME1, ADRC-NAME2,ADRC-NAME3,ADRC-NAME4,
                    ADRC-STREET,ADRC-CITY1,ADRC-CITY2,ADRC-PO_BOX,
                    ADRC-STR_SUPPL1,ADRC-POST_CODE1)
                    WHERE ADDRNUMBER = vbpa-ADRNR.
        EXIT.
      ENDSELECT.
      if sy-subrc = 0.
        perform open_form.
        perform start_form.
        perform write_form.
        perform end_form.
        perform close_form.
        Write:/02 'Delivery Label Printed!'.
      else.
        write:/02 'Error Collecting Address Details!'.
      endif.
    ENDFORM.                    " 200_collect_adrc_details
    *&      Form  open_form
          text
    -->  p1        text
    <--  p2        text
    FORM open_form .
      itcpo-tdnewid = 'X'.
      itcpo-tdimmed = p_imme.
      itcpo-tddest  = 'LOCL'.
      itcpo-tddataset = 'DELB'.
      itcpo-tdsuffix1 = p_ldest.
      itcpo-tdsuffix2 = lips-vbeln.
      CALL FUNCTION 'OPEN_FORM'
        EXPORTING
          application                 = 'TX'
         archive_index               = space
         archive_params              = space
          device                      = 'PRINTER'
          dialog                      = ' '
          form                        = 'ZV_DEL_LABEL'
          language                    = sy-langu
          options                     = itcpo
        EXCEPTIONS
          canceled                    = 1
          device                      = 2
          form                        = 3
          options                     = 4
          unclosed                    = 5
          mail_options                = 6
          archive_error               = 7
          invalid_fax_number          = 8
          more_params_needed_in_batch = 9
          OTHERS                      = 10.
      IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDFORM.                    " open_form
    *&      Form  start_form
          text
    -->  p1        text
    <--  p2        text
    FORM start_form .
      CALL FUNCTION 'START_FORM'
        EXPORTING
          startpage = 'FIRST'
        EXCEPTIONS
          form      = 1
          format    = 2
          unended   = 3
          unopened  = 4
          unused    = 5
          OTHERS    = 6.
      IF sy-subrc <> 0.
      ENDIF.
    ENDFORM.                    " start_form
    *&      Form  write_form
          text
    -->  p1        text
    <--  p2        text
    FORM write_form .
      CALL FUNCTION 'WRITE_FORM'
            EXPORTING
                 element                  = 'TEXT'
                 function                 = 'SET'
                 type                     = 'BODY'
                 window                   = 'MAIN'
       IMPORTING
            PENDING_LINES            =
            EXCEPTIONS
                 element                  = 1
                 function                 = 2
                 type                     = 3
                 unopened                 = 4
                 unstarted                = 5
                 window                   = 6
                 bad_pageformat_for_print = 7
                 OTHERS                   = 8
      IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDFORM.                    " write_form
    *&      Form  end_form
          text
    -->  p1        text
    <--  p2        text
    FORM end_form .
      CALL FUNCTION 'END_FORM'
        EXCEPTIONS
          unopened                 = 1
          bad_pageformat_for_print = 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.
    ENDFORM.                    " end_form
    *&      Form  close_form
          text
    -->  p1        text
    <--  p2        text
    FORM close_form .
      CALL FUNCTION 'CLOSE_FORM'
        EXCEPTIONS
          unopened                 = 1
          bad_pageformat_for_print = 2
          send_error               = 3
          OTHERS                   = 4.
      IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDFORM.                    " close_form
    regards,
    karthik.

  • Push buttons are not triggering on the selection screen

    selection-screen begin of block a with frame title text-001.
    selection-screen skip.
    parameters:z like vbap-vbeln.
    selection-screen skip.
    selection-screen begin of block b with frame title text-002.
    selection-screen skip.
    parameters:sales radiobutton  group g default 'X',
               trans radiobutton  group g.
    selection-screen end of block b.
    selection-screen skip.
    selection-screen pushbutton 10(12) pu_text  user-command CANC.
    selection-screen pushbutton 30(12) qu_text  user-command STAT.
    selection-screen end of block a.
    Initialization.
    pu_text = 'Cancel Order'.
      qu_text = 'Status'.
    TABLES SSCRFIELDS.
    AT SELECTION-SCREEN.
    CASE SSCRFIELDS.
    WHEN 'CANC'.
    WRITE 'CANCEL'.
    WHEN 'STAT'.
    WRITE 'STATUS'.
    ENDCASE.

    hi,
    in your program declare SSCRFIELDS table before defining selection-screen with push-buttons.
    To create a pushbutton on the selection screen, you use:
    <b>SELECTION SCREEN PUSHBUTTON [/]<pos(len)> <push>
                                USER-COMMAND <ucom> [MODIF ID <key>].</b>
    The [/]<pos(len)> parameters and the MODIF IF addition have the same function as for the formatting options for underlines and comments.
    <b>follow this sample program.</b>
    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.
    regards,
    Ashok Reddy

Maybe you are looking for

  • Doubt abt the context that is defined

    hi, we do have an option of declaring the nodes in the context of the particular view and also we can define the same in the component controller. my doubt is if we call a node with the meta data usage then we get a declaration like DATA lo_nd_aenr T

  • My Powerbook G4 Is not being recognized as a potential Startup Disk by my M

    My old Powerbook G4 laptop (3 years old) Is not being recognized as a potential Startup Disk by my Mac pro, it is however being recognized as an external hard drive any help , ideas ???

  • Play movie by clicking a button/shape

    Hi How to play movie by clicking a button/shape? The only option I found in keynote is playing movie by clicking the movie rectangle. Thanks zlf

  • Sharing music between ipods

    My daughter asked me if she could put some of the songs from her itunes library - some purchased on itunes, some from cd - on her friend's ipod...we connected friend's ipod to our imac...it mounted and was visible, but we couldn't drag any songs onto

  • HT2090 my macbook air camera is not working

    My Macbook Air camera is not working when I try to use photobooth. I have no problem with google hangouts or skype. How can I resolve this problem?