Fill data in 2 fields on selection screen from a search help

Hi,
I have defined a custom search help as given below.
Selection Method : ZTSTCT
Search Help Parameters : 
TCODE Importing & Exporting
TTEXT Exporting Only
I have two parameters in my report as declared below:
PARAMETERS : tcode TYPE tstct-tcode  MATCHCODE OBJECT zm_tstc,
             ttext TYPE tstct-ttext.
Now whenever a user selects any TCODE in the help ZM_TSTC, I need both the fields on the selection screen to be filled with appropriate data. When I tested the search help in SE11, both fields are getting filled with appropriate data but in the report only the field TCODE gets filled. Is there any way to get the other field also filled with the appropriate data ?
Points will be awarded for helpful answers.
Thanks & Regards,
Mukul

Hi,
  Use the Event.
  AT SELECTION-SCREEN AT tcode.
Use the select query from the method ZTSTCT.
select single  TTEXT into ttext from ZTSTCT where TCODE = TCODE.
you will get the value of TTEXT .
Regards,
Balakumar.G.

Similar Messages

  • Populating data into a field on selection screen

    hi alll..........
    my query is how to populate data into a field in a selection screen which has help on value request....
      suppose ..  there is a field in the standard selection screen with name kunnr which has help on value request option and is done as a list box. now i want to populate data from kna1-kunnr to this field....
    how can i do it....
                                                           urs friendly...
                                                       prashanth

    You have to call the FM F4IF_INT_TABLE_VALUE_REQUEST to show the F4
    F4IF_INT_TABLE_VALUE_REQUEST
    https://forums.sdn.sap.com/click.jspa?searchID=6971766&messageID=3699312
    F4IF_INT_TABLE_VALUE_REQUEST

  • "MAXIMUM NO OF HITS" field in selection screen for Product Search

    Hi all,
       We are  running on SRM 4.0.I have a query regarding the Selection screen which appears for the Product Search when we click on the "inetrnal Goods/Servcies" link...
        I have developed a Z-serch help for the Product search wherein i have control of  all the other fields lik "Product ID"," Product description " etc..But not "Maximum no of hits" (since it is  a part of the std functionality)...In the selection sceen field " Maximum  no of hits" ,whatever value i enter  that value is not considered...So is there any way that this field is not diplayed on screen/can be disabled(made an O/p field)...
      All suggestions are  welcome....Please  help...
    Thanks & Regards,
    Disha.

    Well,
    You're talking about COLLECTIVE search help. You won't definie Max No of hit at this level.
    Define an elementary search help and assign to this one a dialog mode (retriction or set of values).
    Regards,
    Bertrand
    PS : Don't forget reward points

  • Need selection screen values in Search help user exit in same report

    Hi Experts,
    I am using Logical Data Base PNP.
    Created a custom search help to validate the records for IT000 based on the selection screen dates.
    Enter the DATEs for Data Selection Period and Person selection period in the selection screen.
    When I for search help for PERNR field in the same report, I need the selectin screen DATE values to be in user-exit of search help.
    This will help me in validating the records for specific employees within the date range of given DATE in selectin period.
    As of now it's picking the employees based on the DATE selection of selection screen,
    Regards,
    Prasad

    Hi,
    Go Ahead as mentioned by Satyesh T - (Option two).
    Reading Select Options from DYNP_VALUES_READ
    reffer the above link for getting more clarity for using  'DYNP_VALUES_READ'
    Regards.
    Arun

  • SELECTION-SCREEN with defined search help

    Dear all,
    I'd like to specify in my selection screen a variable that will contain the value to display when search help triggered.
    DATA: w_lgort LIKE mard-lgort.
    DATA: storage(4) TYPE c.
    SELECT lgort INTO w_lgort FROM mard WHERE werks = 'p_plant'.
    ENDSELECT.
    storage = 'w_lgort'.
    SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE text-204.
    PARAMETERS :        p_plant LIKE zmm13jpn-mag_emetteur DEFAULT 'C300',
                 p_store LIKE (storage).
    SELECTION-SCREEN END OF BLOCK bl1.
    My idea would be that storage contains only result of above select while using LGORT data element.
    Any idea?
    Regards.

    Hi cany,
    report zabc.
    parameters: p_bukrs type t001-bukrs,
    p_butxt type t001-butxt,
    p_ort01 type t001-ort01,
    p_land1 type t001-land1.
    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 p_bukrs.
    call function 'F4IF_FIELD_VALUE_REQUEST'
    exporting
    tabname = 'T001'
    fieldname = 'BUKRS'
    dynpprog = sy-cprog
    dynpnr = sy-dynnr
    dynprofield = 'P_BUKRS'
    tables
    return_tab = return
    exceptions
    field_not_found = 1
    no_help_for_field = 2
    inconsistent_help = 3
    no_values_found = 4
    others = 5.
    break-point.
    refresh dynfields.
    read table return with key fieldname = 'P_BUKRS'.
    Add it back to the dynpro.
    dynfields-fieldname = return-retfield.
    dynfields-fieldvalue = return-fieldval.
    append dynfields.
    Get the company code from db and add to dynpro
    data: xt001 type t001.
    clear xt001.
    select single * into xt001
    from t001
    where bukrs = return-fieldval.
    dynfields-fieldname = 'P_BUTXT'.
    dynfields-fieldvalue = xt001-butxt.
    append dynfields.
    dynfields-fieldname = 'P_ORT01'.
    dynfields-fieldvalue = xt001-ort01.
    append dynfields.
    dynfields-fieldname = 'P_LAND1'.
    dynfields-fieldvalue = xt001-land1.
    append dynfields.
    Update the dynpro values.
    call function 'DYNP_VALUES_UPDATE'
    exporting
    dyname = sy-cprog
    dynumb = sy-dynnr
    tables
    dynpfields = dynfields
    exceptions
    others = 8.
    start-of-selection.

  • Setting only the TO field on the Created on Field in Selection screen to Current date

    Hello,
    We have a requirement to Set only the To date in the Created on Field in Selection screen to the Current date, I have tried through Dynamic variable option to set the Date calculation but I am able to see Options to set the Current date to From or From and To Created on Date fields instead of setting the Current date only to To created on Field.
    We are in 4.7 and are not supported with user defined variables, Appreciate your inputs on this.
    Thanks and Regards
    Mohammed Roshan

    >
    sunitha j wrote:
    > Hi ,
    >
    > It would br gr8..if u could give some more info about the usage of this class..i mean if i hav to implement it in my program....wat is the necessary data that needs to b copied...
    >
    > Thanx,
    > Sunitha
    what Text field you want to change.
    Since you are working with Dynpros , you have to split the screen in two parts, and one for the Showing differenet fonts and other your normal Dynpro information.
    you need to use the Method ADD_TEXT Did you check the program DD_STYLE_TABLE.

  • How can I add a new field in selection screen for this report

    *& Report  ZGS_BARKODLA_HIZLI_GIRIS
    report  zgs_barkodla_hizli_giris.
    tables: mara,
            mseg,
            mch1,
            *mch1,
            mkpf,
            mchb ,
            makt.
    type-pools: esp1.
    data: i_message_tab  type esp1_message_tab_type,
          wa_message_tab type esp1_message_wa_type ,
          sc_count type i.
    ALV
    type-pools: slis, kkblo.
    data: gs_layout   type slis_layout_alv                     ,
          gt_fldcat   type slis_t_fieldcat_alv with header line,
          gt_header   type slis_t_listheader   with header line,
          gt_sortin   type slis_t_sortinfo_alv with header line,
          g_repid     like sy-repid                            .
    define add-fieldcat.
      gt_fldcat-fieldname     = &1.
      gt_fldcat-ref_tabname   = &2.
      gt_fldcat-seltext_s     = &3.
      gt_fldcat-seltext_m     = &3.
      gt_fldcat-seltext_l     = &3.
      gt_fldcat-reptext_ddic  = &3.
      gt_fldcat-ddictxt       = 'M'.
      append gt_fldcat.
      clear  gt_fldcat.
    end-of-definition.
    types: begin of titab,
            sel   type xfeld,
            matnr type matnr,
            maktx type maktx,
            charg type charg_d,
            menge type menge_d,
            erfmg type erfmg,
           end of titab.
    data : witab type titab.
    data : itab type table of titab.
    data : ok_code type sy-ucomm.
    controls: tc_itab type tableview using screen 0100.
    data: gv_header like bapi2017_gm_head_01,
          gv_code   like bapi2017_gm_code.
    BAPI export parameters
    data: gv_headret type bapi2017_gm_head_ret,
          gv_matdoc  type bapi2017_gm_head_ret-mat_doc,
          gv_matyear type bapi2017_gm_head_ret-doc_year.
    data : lv_objek like inob-objek .
    data : ls_inob  like inob .
    data : imseg type ty_t_mseg.
    data : wmseg type mseg.
    data : answer.
    data : count type i.
    data : v_atinn type atinn.
    BAPI movement details
    data: i_goodsmvt_items type bapi2017_gm_item_create occurs 0
          with header line.
    data: i_return type bapiret2 occurs 0 with header line.
    start-of-selection.
    call function 'CONVERSION_EXIT_ATINN_INPUT'
       exporting
         input  = 'Z_ORAN'
       importing
         output = v_atinn.
      call screen 100.
    *&      Module  status_0100  OUTPUT
    module status_0100 output.
      set pf-status '100'.
      set titlebar '100'.
      mseg-werks = 1000.
      mseg-umwrk = 1000.
    **added
      sc_count = sc_count + 1.
      if sc_count eq 1.
        mseg-bwart = 313.
      endif.
      mkpf-budat = sy-datum.
    **added
      describe table itab lines tc_itab-lines.
    endmodule.                 " status_0100  OUTPUT
    *&      Module  user_command_0100  INPUT
    module user_command_0100 input.
      data field(20).
      data: line_t like sy-index.
      data: lines  like sy-index.
      data line_count like sy-loopc.
      data: begin of cols,
             screen      like screen,
             index       type i,
             selected(1) type c,
             vislength   like icon-oleng,
             invisible(1) type c,
           end   of cols.
      case ok_code.
        when 'DELE'.
          delete itab where sel eq 'X'.
        when 'ENTE'.
          check *mch1-charg is not initial.
          read table itab into witab with key charg = *mch1-charg.
          if not sy-subrc is initial.
            witab-charg = *mch1-charg.
            select single matnr from mch1 into witab-matnr
                               where charg eq witab-charg.
            if not syst-subrc is initial.
              set cursor field '*MCH1-CHARG'.
              message e115(12) with *mch1-charg.
            endif.
            select single maktx from makt into witab-maktx
                               where matnr eq witab-matnr
                                 and spras eq syst-langu.
            witab-erfmg = 1.
            concatenate witab-matnr witab-charg into lv_objek .
            clear ls_inob .
            select single * into ls_inob
                            from inob
                            where objek = lv_objek and
                                  klart = '023'    and
                                  obtab = 'MCH1' .
            select single atflv from ausp into witab-menge
                     where objek = ls_inob-cuobj and
                           klart = '023' .
            append witab to itab.
    **added
            clear *mch1-charg.
    **added
          endif.
        when 'SAVE'.
          if mkpf-budat is initial.
            set cursor field 'MKPF-BUDAT'.
            message e055(00).
          endif.
          if mseg-lgort is initial.
            set cursor field 'MSEG-LGORT'.
            message e055(00).
          endif.
          if mseg-umlgo is initial.
            set cursor field 'MSEG-UMLGO'.
            message e055(00).
          endif.
          if mseg-bwart is initial.
            set cursor field 'MSEG-BWART'.
            message e055(00).
          endif.
          refresh imseg.
          loop at itab into witab.
            move-corresponding witab to wmseg.
            append wmseg to imseg.
          endloop.
          call function 'ZMM_POPUP_WITH_DATA'
            exporting
              imseg  = imseg
            importing
              answer = answer.
          if answer eq 'Y'.
            perform create_goods_movement.
          endif.
        when 'P--'.
          clear ok_code.
          perform paging using 'P--'.
          set cursor field 'MARA-MATNR' line 1.
        when 'P-'.
          clear ok_code.
          perform paging using 'P-'.
          set cursor field 'MARA-MATNR' line 1.
        when 'P+'.
          clear ok_code.
          clear lines.
          perform paging using 'P+'.
          set cursor field 'MARA-MATNR' line 1.
        when 'P++'.
          clear ok_code.
          perform paging using 'P++'.
          set cursor field 'MARA-MATNR' line 1.
        when 'SORA'.
          read table tc_itab-cols into cols with key selected = 'X'.
          if sy-subrc is initial.
            field = cols-screen.
            field = field+5(10).
            sort itab ascending by (field).
          endif.
        when 'SORZ'.
          read table tc_itab-cols into cols with key selected = 'X'.
          if sy-subrc is initial.
            field = cols-screen.
            field = field+5(10).
            sort itab descending by (field).
          endif.
        when 'PRNT'.
          perform write_alv.
      endcase.
    endmodule.                 " user_command_0100  INPUT
    *&      Module  read_table  OUTPUT
    module read_table output.
      mara-matnr = witab-matnr.
      makt-maktx = witab-maktx.
      mch1-charg = witab-charg.
      mseg-menge = witab-menge.
      mseg-erfmg = witab-erfmg.
      line_count = sy-loopc.
    endmodule.                 " read_table  OUTPUT
    *&      Module  write_table  INPUT
    module write_table input.
      witab-matnr = mara-matnr.
      witab-maktx = makt-maktx.
      witab-charg = mch1-charg.
      witab-menge = mseg-menge.
      witab-erfmg = mseg-erfmg.
      modify itab from witab index tc_itab-current_line.
    endmodule.                 " write_table  INPUT
    *&      Module  exit  INPUT
    module exit input.
      leave to screen 0 .
    endmodule.                 " exit  INPUT
    *&      Form  create_goods_movement
    form create_goods_movement .
      clear : gv_header, i_return[], i_goodsmvt_items[].
      gv_header-doc_date = gv_header-pstng_date = mkpf-budat.
      gv_header-pr_uname = sy-uname.
    GM with reference to reservation
      loop at itab into witab.
        i_goodsmvt_items-material   = witab-matnr.
        i_goodsmvt_items-entry_qnt  = witab-erfmg.
        i_goodsmvt_items-entry_uom  = 'ST'.
        i_goodsmvt_items-move_type  = mseg-bwart.
        i_goodsmvt_items-plant      = mseg-werks.
        i_goodsmvt_items-stge_loc   = mseg-lgort.
        i_goodsmvt_items-move_plant = mseg-umwrk.
        i_goodsmvt_items-move_stloc = mseg-umlgo.
        i_goodsmvt_items-batch      = witab-charg.
        append i_goodsmvt_items.
      endloop.
    find BAPI processing transaction
      if gv_code is initial.
        perform determine_bapi_code using mseg-bwart
                                 changing gv_code.
      endif.
      call function 'BAPI_GOODSMVT_CREATE'
        exporting
          goodsmvt_header  = gv_header
          goodsmvt_code    = gv_code
        importing
          goodsmvt_headret = gv_headret
          materialdocument = gv_matdoc
          matdocumentyear  = gv_matyear
        tables
          goodsmvt_item    = i_goodsmvt_items
          return           = i_return[].
    cancel blocking process
      loop at i_return where type eq 'E' or type eq 'A' or type eq 'X'.
        exit.
      endloop.
      if sy-subrc ne 0.
        refresh i_message_tab.
        call function 'BAPI_TRANSACTION_COMMIT'
          exporting
            wait = 'X'.
        wa_message_tab-msgid = 'M7'..
        wa_message_tab-msgty = 'S'.
        wa_message_tab-msgno = '060'.
        wa_message_tab-msgv1 = gv_matdoc.
        wa_message_tab-msgv2 = ''.
        wa_message_tab-msgv3 = ''.
        wa_message_tab-msgv4 = ''.
        append wa_message_tab to i_message_tab.
      else.
        refresh i_message_tab.
        call function 'BAPI_TRANSACTION_ROLLBACK'.
    write a message as there is an unexpected error.
        loop at i_return.
          wa_message_tab-msgid = i_return-id.
          wa_message_tab-msgty = i_return-type.
          wa_message_tab-msgno = i_return-number.
          wa_message_tab-msgv1 = i_return-message_v1.
          wa_message_tab-msgv2 = i_return-message_v2.
          wa_message_tab-msgv3 = i_return-message_v3.
          wa_message_tab-msgv4 = i_return-message_v4.
          append wa_message_tab to i_message_tab.
        endloop.
      endif.
      call function 'C14Z_MESSAGES_SHOW_AS_POPUP'
        tables
          i_message_tab = i_message_tab.
    endform.                    " create_goods_movement
    *&      Form  determine_bapi_code
    form determine_bapi_code using p_bwart type bwart
    changing p_code type bapi2017_gm_code.
      data: lt_t158b type table of t158b with header line.
      clear p_code.
      select tcode from t158b into corresponding fields of table lt_t158b
      where bwart eq p_bwart.
      loop at lt_t158b.
        select single gmcode from t158g into p_code
        where tcode eq lt_t158b-tcode.
        if sy-subrc is initial.
          exit.
        endif.
      endloop.
    endform. " determine_bapi_code
    *&      Form  paging
    form paging using code.
      data: i type i,
            j type i.
      case code.
        when 'P--'. tc_itab-top_line = 1.
        when 'P-'.
          tc_itab-top_line = tc_itab-top_line - line_count.
          if tc_itab-top_line le 0.
            tc_itab-top_line = 1.
          endif.
        when 'P+'.
          i = tc_itab-top_line +  line_count.
          j = tc_itab-lines -  line_count + 1.
          if j le 0.
            j = 1.
          endif.
          if i le j.
            tc_itab-top_line = i.
          else.
            tc_itab-top_line = j.
          endif.
        when 'P++'.
          tc_itab-top_line = tc_itab-lines - line_count + 1.
          if tc_itab-top_line le 0.
            tc_itab-top_line = 1.
          endif.
      endcase.
    endform.                    " paging
    *&      Form  write_alv
    form write_alv .
      perform find_list_header.
      perform fill_field_cat.
      perform fill_sortinfo.
      g_repid = sy-repid.
      gs_layout-colwidth_optimize = 'X'.
      gs_layout-zebra             = 'X'.
      answer = 'Y'.
      call function 'REUSE_ALV_GRID_DISPLAY'
        exporting
          i_buffer_active        = ''
          i_callback_program     = g_repid
          i_save                 = 'A'
        i_callback_top_of_page = 'TOP_OF_PAGE'
          is_layout              = gs_layout
          it_fieldcat            = gt_fldcat[]
         it_sort                = gt_sortin[]
        tables
          t_outtab               = itab[].
    endform.                    " write_alv
         Form  find_list_header
    form find_list_header.
      data : v_datum(10),
             v_datlo(10),
             v_dathi(10),
             v_uzeit(8).
      clear: gt_header, gt_header[].
      gt_header-typ  = 'H'.
      gt_header-info = sy-title.
      append gt_header.
      clear gt_header.
      gt_header-typ  = 'S'.
      gt_header-key  = 'Çalıştırma Zamanı : '.
      write syst-datum to v_datum.
      write syst-uzeit to v_uzeit.
      concatenate v_datum '/' v_uzeit into gt_header-info.
      append gt_header.
    endform.                    " find_list_header
         Form  fill_field_cat
    form fill_field_cat.
      refresh gt_fldcat.
      clear   gt_fldcat.
      gt_fldcat-key = 'X'.
      add-fieldcat 'MATNR'  'MARA' ''.
      add-fieldcat 'MAKTX'  'MAKT' ''.
      add-fieldcat 'CHARG'  'MSEG' ''.
      gt_fldcat-do_sum = 'X'.
      add-fieldcat 'MEINS'  'MARA' 'Olcu Birimi '.
      gt_fldcat-do_sum = 'X'.
      add-fieldcat 'ERFMG'  'MSEG' 'Adet'.
    endform.                    " fill_field_cat
         Form  fill_sortinfo
    form fill_sortinfo.
      gt_sortin-up            = 'X'.
      gt_sortin-fieldname     = 'MATNR'.  append gt_sortin.
    endform.                    " fill_sortinfo
         Form  top_of_page                                              *
    form top_of_page.
      call function 'REUSE_ALV_COMMENTARY_WRITE'
        exporting
          i_logo             = 'ZKUTAS'
          it_list_commentary = gt_header[].
    endform.                    " top_of_page

    HI,
    if it is a normal report program then you can directly create a Selection screen field.
    After the Type-pool you can use Parameters or Select-options to create the selection screen field..
    If it is a Modulpool program then you can create a selection scren field like
    SELECTION-SCREEN BEGIN OF SCREEN 1100 AS SUBSCREEN.
    PARAMETERS: p1(10) TYPE c.
    SELECTION-SCREEN END OF SCREEN 1100.
    defines a selection screens – 1100 – as subscreens.
    The next screen number of screen 100 is 100 (statically-defined).
    PROCESS BEFORE OUTPUT.
      MODULE status_0100.
      CALL SUBSCREEN area INCLUDING sy-repid number.
    PROCESS AFTER INPUT.
      MODULE cancel AT EXIT-COMMAND.
      CALL SUBSCREEN area.
      MODULE user_command_0100.
    look at the below link
    http://help.sap.com/saphelp_nw2004s/helpdata/en/e7/deb237b9a9a968e10000009b38f8cf/content.htm
    Regards
    Sudheer

  • I need below fields at my selection screen.From which table we can find the

    Sales Org > only one selection field
    Division > only one selection field
    Channel > from u2013 to fields
    Sales Office Channel > from u2013 to fields
    Sales Rep Channel > from u2013 to fields
    User ID of the CSR Channel > from u2013 to fields
    Customer Channel > from u2013 to fields
    Material Channel > from u2013 to fields
    Date: Channel > from u2013 to fields
    I need these fields at my selection screen.From which tables I find these things.I need this logic also.

    I need help

  • Adding customer field to selection screen of RFKORD11 - Customer  Statement Printing Program:

    Hello,
    We are required to add an important customer field to selection screen of customer
    statement printing program: RFKORD11 for our South African branch.
    Please advise us regarding this matter,
    is there a proper user-exit or a repair is needed?
    Kind Regards.

    Enhancement
    text
    F050S001
    FIDCMT, FIDCC1,
      FIDCC2: Edit user-defined IDoc segment
    F050S002
    FIDCC1: Change
      IDoc/do not send
    F050S003
    FIDCC2: Change
      IDoc/do not send
    F050S004
    FIDCMT, FIDCC1,
      FIDCC2: Change outbound IDoc/do not send
    F050S005
    FIDCMT, FIDCC1,
      FIDCC2 Inbound IDoc: Change FI document
    F050S006
    FI Outgoing IDoc:
      Reset Clearing in FI Document
    F050S007
    FIDCCH Outbound:
      Influence on IDoc for Document Change
    F180A001
    Balance Sheet
      Adjustment
    FARC0001
    Enhancements within
      archiving (FI)
    FARC0002
    Additional Checks for
      Archiving MM Vendor Master Data
    FEDI0001
    Function exits for
      EDI in FI
    FICT0001
    Exits for
      inter-company transactions
    RFAVIS01
    Customer Exit for
      Changing Payment Advice Segment Text
    RFBVX001
    Enhancement for bank
      directory transfer (Austria)
    RFEPOS00
    Line item display:
      Checking of selection conditions
    SAPLBANK
    User exit: Bank data
    SAPLF040
    WF: Preliminary
      posting (authorized for release)
    SAPLF051
    Workflow for FI
      (pre-capture, release for payment)
    SAPLFCPD
    One-time account data
      or different payee in booking
    SAPLSSRV
    User exit: Bank
      account numbers
    RFKORIEX
    Automatic
      correspondence
    please check which one  is better .

  • Default Current year in select option field on selection Screen

    Dear Experts,
    I want to set current year as default value in fiscal year select-options field on selection screen.
    for this, i hv written following code
    DATA:VAR_DATE TYPE SY-DATUM.
    DATA VAR(4) TYPE C.
    VAR_DATE = SY-DATUM.
    VAR = VAR_DATE+0(4).
    this retrieves current year .
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-000.
    SELECT-OPTIONS I11 FOR ANLC-GJAHR DEFAULT VAR TO VAR..                            "Fiscal Year
    SELECTION-SCREEN END OF BLOCK B1.
    Now when i am executing program pop-up is raised describing "Specify the range Limits". Please help.
    Regards,
    Apoorv Sharma

    >
    Ganga Bhavani R wrote:
    > Use below lines.
    >
    > SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-000.
    > SELECT-OPTIONS I11 FOR ANLC-GJAHR DEFAULT SY-DATUM+0(4). "Fiscal Year
    > SELECTION-SCREEN END OF BLOCK B1.
    Hi, Ganga,
    I think it will not working properly that way, Please test the bellow Sample Code.
    TABLES: anlc.
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-000.
    SELECT-OPTIONS i11 FOR anlc-gjahr .
    SELECTION-SCREEN END OF BLOCK b1.
    INITIALIZATION.
      IF i11[] IS INITIAL.
        i11-low = sy-datum+0(4).
        APPEND i11.
      ENDIF.
    Thanks and Regards,
    Faisal

  • ABAP Query : Obligatory fields on selection screen!

    Hi Experts,
    I would like to know the differrent ways through which we can define mandatory fields on selection screen.Options availabel in Infosets (SQ02) as well as Query(SQ01).
    Selection Screen:
    Document Date in Document:  (Mandatory      Select-Option)
    Plant :  (Mandatory      Select-Option)
    Thanks,
    Yogesh

    Hi, Everyone .
    We can do that .
    At selection-screen output (code section 13), set "1" to the field REQUIED by using MODIFY SCREEN code .
    (You can get Dynpro number by F1 key or T-cd SE51 )
    Masao .
    Edited by: MASAO NONAKA on Oct 20, 2008 9:11 AM

  • How to add Material type(MTART) field on Selection screen of MB5B transaction code.

    Hi All,
        Please let me know how to add material type field on selection screen of MB5B transaction
    For that i made copy ZMB5B_COPY of original report RM07MLBD.
    Thanks in adv .
    Samadhan

    Hi,
    Once you copied the standard report to Z report, you can MTART in selection screen like below.
    and in order to inlcude the same in programming logic, we have three option.
    1) Check all related select queries, and include MTART in SELECT query using inner join with MARA.
    2) In START-OF-SELECTION event fill MATNR as shown below.
    3) If user entered any value in MTART, then before displaying the report just check material type of each material in the final internal table(which is used to display report) delete enteries from internal table accordingly.
    START-OF-SELECTION.
    IF MTART[] IS NOT INITIAL AND MATNR[] IS INITIAL.
        SELECT MATNR FROM MARA INTO MATNR-LOW WHERE MTART IN MTART.
          MATNR-OPTION = 'EQ'.
          MATNR-SIGN = 'I'.
          APPEND MATNR.
          CLEAR MATNR.
        ENDSELECT.
    ENDIF.
    The above option has one limitation: The selection screen variables has some restriction, please read the below thread.
    Facing problem in select statement dump DBIF_RSQL_INVALID_RSQL CX_SY_OPEN_S
    Getting Dump in the select query has more than 2000 entries
    Hope this will work for you .
    regards,
    Rajesh Sadula.

  • Query regarding F4 help on a field in Selection Screen.

    Hi all,
    I am trying to attach a F4 help on a field in Selection Screen.
    The code fragment I wrote for this purpose is:
      AT SELECTION-SCREEN ON VALUE-REQUEST FOR m_cbu.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
      DDIC_STRUCTURE         = ' '
        retfield               = 'CBU_MANAGER'
      PVALKEY                = ' '
       DYNPPROG               = sy-cprog
       DYNPNR                 = sy-dynnr
       DYNPROFIELD            = 'M_CBU'
      STEPL                  = 0
      WINDOW_TITLE           =
      VALUE                  = ' '
       VALUE_ORG              = 'S'
      MULTIPLE_CHOICE        = ' '
       DISPLAY                = 'F'
      CALLBACK_PROGRAM       = ' '
      CALLBACK_FORM          = ' '
      MARK_TAB               =
    IMPORTING
      USER_RESET             =
      tables
        value_tab              = tb_cbu_m
      FIELD_TAB              =
        RETURN_TAB             = t_return
      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.
    Still, I am unable to get any F4 help?
    Please point out the mistake..
    Thanks in advance.

    Hi Thien,
    My entire code is as follows-
    TYPES:
          BEGIN OF cbu_m,
          cbu_manager TYPE uname,
          END OF cbu_m.
    DATA:
    tb_cbu_m            TYPE TABLE OF cbu_m,
    wa_cbu_m             TYPE cbu_m.
    wa_cbu_m-cbu_manager = '123'.
      APPEND wa_cbu_m TO tb_cbu_m.
      wa_cbu_m-cbu_manager = '234'.
      APPEND wa_cbu_m TO tb_cbu_m.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR m_cbu.
      CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
        EXPORTING
      DDIC_STRUCTURE         = ' '
          retfield               = 'CBU_MANAGER'
      PVALKEY                = ' '
         dynpprog               = sy-repid
         dynpnr                 = sy-dynnr
         dynprofield            = 'M_CBU'
      STEPL                  = 0
       WINDOW_TITLE           = 'ABC'
      VALUE                  = ' '
         value_org              = 'S'
      MULTIPLE_CHOICE        = ' '
        display                = 'F'
      CALLBACK_PROGRAM       = ' '
      CALLBACK_FORM          = ' '
      MARK_TAB               =
    IMPORTING
      USER_RESET             =
        TABLES
          value_tab              = tb_cbu_m
      FIELD_TAB              =
         return_tab             = t_return
      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.
    Here I am getting the same message "No Values Found"..
    Please point out the mistake in my code.

  • Restrict values for F4 on field in Selection-screen

    Hi,
    For f4 on particular field I am getting list of values. These values are fixed in Value Range of DOMAIN of that field. There are 26  values fixed for that DOMAIN. Now what I need is I need to restrict 26th value from displaying on F4 for that field in selection screen.
    I tried doing it in AT SELECTION SCREEN OUTPUT event  using F4_ON_VALUE REQUEST  FM, fetching data and deleting 26th entry , but before i delete it, It shows all values in selection-screen.
    Please any one guide me.
      Thanks,
    Vanitha P

    You have to use AT SELECTION-SCREEN ON VALUE-REQUEST event.
    Tables:mara.
    TYPES :BEGIN OF gty_mtart,
           mtart TYPE mara-mtart,
           END OF gty_mtart.
    DATA: gt_mtart  TYPE STANDARD TABLE OF gty_mtart,
          gtt_mtart TYPE gty_mtart.
    DATA: gt_return_tab  TYPE TABLE OF ddshretval,
          gwa_return_tab TYPE ddshretval.
    SELECT-OPTIONS:so_mtart FOR mara-mtart.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR so_mtart-low.
      REFRESH gt_mtart.
      gtt_mtart-mtart = 'Z01'.
      APPEND gtt_mtart TO gt_mtart.
      gtt_mtart-mtart = 'Z02'.
      APPEND gtt_mtart TO gt_mtart.
      gtt_mtart-mtart = 'Z03'.
      APPEND gtt_mtart TO gt_mtart.
      gtt_mtart-mtart = 'Z04'.
      APPEND gtt_mtart TO gt_mtart.
      gtt_mtart-mtart = 'Z05'.
      APPEND gtt_mtart TO gt_mtart.
      gtt_mtart-mtart = 'Z06'.
      APPEND gtt_mtart TO gt_mtart.
      gtt_mtart-mtart = 'Z90'.
      APPEND gtt_mtart TO gt_mtart.
      CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
    *   DDIC_STRUCTURE         = ' '
              retfield               = 'SO_MTART-LOW'
    *   PVALKEY                = ' '
    *   DYNPPROG               = ' '
    *   DYNPNR                 = ' '
    *   DYNPROFIELD            = ' '
           value_org              = 'S'
    *   MULTIPLE_CHOICE        = ' '
    * IMPORTING
    *   USER_RESET             =
            TABLES
              value_tab              = gt_mtart
    *   FIELD_TAB              =
           return_tab             = gt_return_tab
    *   DYNPFLD_MAPPING        =
         EXCEPTIONS
           parameter_error        = 1
           no_values_found        = 2
           OTHERS                 = 3
      IF sy-subrc = 0 AND gt_return_tab IS NOT INITIAL.
        CLEAR gwa_return_tab.
        READ TABLE gt_return_tab INTO gwa_return_tab INDEX 1.
        IF sy-subrc = 0 AND gwa_return_tab-fieldval IS NOT INITIAL.
          so_mtart-low = gwa_return_tab-fieldval.
        ENDIF.
      ELSEIF sy-subrc <> 0.
        REFRESH gt_return_tab.  CLEAR: gwa_return_tab.
      ENDIF.

  • Mandatory parameter field in selection screen

    Hi Experts,
    As there are 2 options to get the input from the user. When I use select options because I need to make the field mandatory, it displays the output(blank) whenever there is no input/irrelevant input. When I use parameters, I cannot make it mandatory.
    I need to display text boxes in the selection screen which should be mandatory and should only proceed when the user enters relevant data.
    Please note that I have put the validation in the select options for a field like month as:
    if s_month-low > '12' or s_month < '1'.
         MESSAGE 'Please enter a valid month' type 'E'.
    endif.
    but for a id, there is a search help. If the user do not enter the value from a search help, it displays the blank output. How to put validation on this?
    Regards
    Mani

    Hi Mani,
    You can do a validation at AT Selection Screen.Basically it will do a select single and try to fetch any line item.
    A sample example as follows..
    At Selection-Screen on S_DATE.
    if S_date is not initial.
    Perform validatedate.
    Endif.
    Form Validatedate.
    Select single date
              from DB table
             where date in S_date.
    endform.
    if Sysubrc ne 0.
    MESSAGE 'Please enter a valid month' type 'E'.
    endif.
    Regards,
    Kannan

Maybe you are looking for