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 .

Similar Messages

  • Add custom fields on selection screen  and ouput in Transaction QM11

    Hi All,
       i have the requirement to enhance the transaction qm11( Report : RQMELL10) to add the custom fields on the report selection screen and in the report output.
      i tried to add the fields on selection screen by copy the standard program RQMELL10 to custom one. and tried to add the fields above to the coding tab but i am not able to display the text for those fields of select-options. can any one help me is it the right way to copy the standard program to custom program and adding the custom fields and how to get the text element for the custom fields which we are going to add it. i tried to add the text element in program text elements but it is not appering on the report.
    please requeting the help asap if it is possible.

    Have a glance in below thread.
    Enhancing transaction QM10
    Also, there are some more threads available in enhancing the QM10 / QM11. Please search those as well.

  • Adding the field in selection screen

    Hi Guru's,
    how can i add the field in selection screen of t code qa33.
    can any one help me pls.
    Thanks & Best Regards,
    Rakhi.

    You can enhance the standard program RQEEAL10 using implicit enhancement points.
    Click the spiral (Enhance) button (Shift + F4)
    Go to Edit -> Enhancement operations -> Show Implicit Enhancement Poitns
    Create an Enhancement Implementation and include your code there.
    See the following link -> Source Code Enhancements - Part 5 of the Series on the New Enhancement Framework
    Hope it helps
    Neeraj

  • IW 28, customer fields in selection screen

    Hello,
    we have some costumer fields in table qmel. I would like to use these fields in transaction IW 28 as selection fields.
    Is this possible?
    regards
    stefan

    Hi,
    You can add the filed in selection screen.
    find the enhancement points for selection screen in program.
    and same way find enhancement point for select query in program.
    For example:
    The field revnr is added in selection screen like we can add custom filed also.
    ENHANCEMENT 4  DIMP_GENERAL_RIQMEL20.    "active version
      SELECT-OPTIONS: revnr FOR viqmelst-revnr.
    ENDENHANCEMENT.
    second: select query is also given in enhancement point, since we can modify the enhancement point.
    ENHANCEMENT 2  DIMP_GENERAL_RIQMEL20.    "active version
        SELECT (g_selfields_tab) FROM (g_viewname)
                INTO CORRESPONDING FIELDS OF TABLE lt_viqmel_iflos
                              WHERE qmnum IN qmnum
                              AND   iwerk IN iwerk
                              AND   tplnr IN strno
                              AND   swerk IN swerk
                              AND   kostl IN kostl
                              AND   abckz IN abckz
                              AND   gsber IN gsber
                              AND   anlnr IN anlnr
                              AND   stort IN stort
                              AND   msgrp IN msgrp
                              AND   eqfnr IN eqfnr
                              AND   beber IN beber
                              AND   ingrp IN ingrp
                              AND   equnr IN equnr
                              AND   matnr IN matnr
                              AND   serialnr IN serialnr
                              AND   deviceid IN deviceid
                              AND   bautl IN bautl
                              AND   msaus IN msaus
                              AND   ausvn IN ausvn
                              AND   ausbs IN ausbs
                              AND   auztv IN auztv
                              AND   auztb IN auztb
                              AND   btpln IN btpln
                              AND   bequi IN bequi
                              AND   auswk IN auswk
                              AND   verfv IN verfv
                              AND   verfn IN verfn
                              AND   verfm IN verfm
                              AND   anlzv IN anlzv
                              AND   anlzn IN anlzn
                              AND   anlze IN anlze
                              AND   inspk IN inspk
                              AND   datan IN datan
                              AND   qmart IN qmart
                              AND   bukrs IN bukrs
                              AND   priok IN priok
                              AND   ernam IN ernam
                              AND   erdat IN erdat
                              AND   aenam IN aenam
                              AND   aedat IN aedat
                              AND   mzeit IN mzeit
                              AND   qmnam IN qmnam
                              AND   strmn IN strmn
                              AND   ltrmn IN ltrmn
                              AND   aufnr IN aufnr
                              AND   kunum IN kunum
                              AND   vbeln IN vbeln
                              AND   kdauf IN kdauf
                              AND   kdpos IN kdpos
                              AND   bstnk IN bstnk
                              AND   bstdk IN bstdk
                              AND   qmdab IN qmdab
                              AND   bezdt IN bezdt
                              AND   rbnr  IN rbnr
                              AND   qmdat IN gr_date
                              AND ( kzloesch = space OR
                                    kzloesch IS NULL )
                              AND   qmart IN i_qmart
                              AND   vkorg IN vkorg
                              AND   vtweg IN vtweg
                              AND   spart IN spart
                              AND   auszt IN i_auszt
                              AND   arbpl IN i_arbpl
                              AND   qmgrp IN qmgrp
                              AND   qmcod IN qmcod
                              AND   warpl IN warpl
                              AND   wapos IN wapos
                              AND   revnr IN revnr
                              AND   owner IN i_owner
                              AND   phase IN gr_phase.
    ENDENHANCEMENT.

  • User exit or Badi to add custom fields in selection screen of tcode CATS_AP

    Hi Guys,
    I want to add a custom field to the selection screen of report RCATS_APPROVE_ACTIVITIES (tcode CATS_APPR_LITE).
    I also want to display filtered by this custom fields.  Please let me know the user-exit (prefebly) or BADI.
    I will appreciate if somebody can share the steps.
    Thanks,

    Hi,
    Yes there is, the BADI name is CATS_REPORTING.
    It can be views in transaction SE17.
    thanks.
    JB

  • Adding one field in selection-screen in rfitemar

    hi experts
    1)  I am converting the rfitemar to z or y program after that i have to add one field   wbs element(projk) in selection screen.
    2) The WBS Element values should be displayed in the output report ie one column which contain wbs element values .
    Plz help me as soon as possible

    Hi,
       In this report,
    1. find out the final table for display.
    2. add ur custom fields in that table using appending structure.
    3. find out correct enchance spot or BADI,...etc...before diaply(befor calling FM REUSE_GRID_DISPLAY or method  SET_TABLE_for_display or..etc).
    4. in that enchance spot or badi u can write ur logic.
    Regards,
    Ramesh.

  • REPORT PAINTER - Add a field to a selection screen to a CUSTOM REPORT

    Hi,
    I'm trying to add a field to a selection screen to a CUSTOM REPORT that has been made in REPORT PAINTER (Y_DVL_xxxxxxx). How should I proceed to do so?
    Thanks a lot,
    Julien

    Hi Julien Girard ,
        Could you please check the below link :
    http://help.sap.com/saphelp_erp2005/helpdata/en/56/32e339b62b3011e10000000a11402f/frameset.htm
    Regards,
    S.Manu.

  • Adding f4-help to selection screen parameter field

    Hi all.
    I need to add search help to a parameter field on selection screen:
    PARAMETERS:
                 p_reciv LIKE soos7-recnam.
    What is the easiest way?
    tia, regards

    You can give F4 help by two ways:
    1. Using internal table
    2. Refering db table field.
    Following are e.gs:
    F4 help – using internal table example:
    DATA: BEGIN OF LI_FABGRP OCCURS 0,
    FABGRP LIKE ZAPO_FABGRP-FABGRP,
    BEGDA LIKE ZAPO_FABGRP-BEGDA,
    END OF LI_FABGRP.
    DATA : T_RETURN TYPE STANDARD TABLE OF DDSHRETVAL WITH HEADER LINE,
    L_RETFIELD TYPE DFIES-FIELDNAME.
    parameters : S_FABGR like ZAPO_FABGRP-FABGRP.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_FABGR.
    SELECT FABGRP BEGDA FROM ZAPO_FABGRP INTO table LI_FABGRP.
    SORT LI_FABGRP BY FABGRP ASCENDING BEGDA DESCENDING.
    Henter de mulige fabriksgrupper med nyeste BEGDA *indenfor hver
    DELETE ADJACENT DUPLICATES FROM LI_FABGRP COMPARING FABGRP.
    L_RETFIELD = 'FABGRP'.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    RETFIELD = L_RETFIELD
    DYNPPROG = SY-REPID
    DYNPNR = '1000'
    DYNPROFIELD = 'S_FABGR'
    VALUE_ORG = 'S'
    MULTIPLE_CHOICE = ' '
    TABLES
    VALUE_TAB = LI_FABGRP
    RETURN_TAB = T_RETURN
    EXCEPTIONS
    PARAMETER_ERROR = 1
    NO_VALUES_FOUND = 2
    OTHERS = 3.
    F4 help – using field example:
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_FABGR.
    CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
      EXPORTING
        tabname                   = mara
        fieldname                 = matnr
      SEARCHHELP                = ' '
      SHLPPARAM                 = ' '
      DYNPPROG                  = ' '
      DYNPNR                    = ' '
      DYNPROFIELD               = ' '
      STEPL                     = 0
      VALUE                     = ' '
      MULTIPLE_CHOICE           = ' '
      DISPLAY                   = ' '
      SUPPRESS_RECORDLIST       = ' '
      CALLBACK_PROGRAM          = ' '
      CALLBACK_FORM             = ' '
      SELECTION_SCREEN          = ' '
    IMPORTING
      USER_RESET                =
    TABLES
      RETURN_TAB                =
    EXCEPTIONS
      FIELD_NOT_FOUND           = 1
      NO_HELP_FOR_FIELD         = 2
      INCONSISTENT_HELP         = 3
      NO_VALUES_FOUND           = 4
      OTHERS                    = 5
    Select-options: s_rcode FOR g_grund . "Reason code
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_rcode-low.
    Validation for Reasoncode
    PERFORM sub_get_F4_rcodehelp .
    FORM sub_get_f4_rcodehelp .
    STRUCTURES Declarations
    TYPES: BEGIN OF ty_rcode ,
    grund TYPE mb_grbew,
    grtxt TYPE grtxt,
    END OF ty_rcode.
    *Internal Table declaration
    DATA : li_rcode TYPE STANDARD TABLE OF ty_rcode WITH HEADER LINE.
    SELECT grund grtxt
    INTO TABLE li_rcode
    FROM t157e
    WHERE spras = sy-langu .
    *Help functions for external use
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
    retfield = 'fieldname'
    dynpprog = 'programname
    dynpnr = '1000'
    dynprofield = 'S_PCODE'
    value_org = 'S'
    TABLES
    value_tab = li_rcode
    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.
    ENDFORM. " sub_get_F4_rcodehelp

  • Adding fields on selection screen dynamically

    Hi all,
    Can we add some fields to selection screen dynamically on pushbutton click?
    Regards,
    Dnyanesh

    just have look below code
    REPORT zrsdvsr1
           LINE-SIZE 220
           LINE-COUNT 65(5).
    TYPE-POOLS : slis.
    TABLES
    TABLES: vbak.
    DATA DECLARATIONS
    Ranges
    RANGES: r_posnr FOR vbap-posnr.
    DATA: BEGIN OF t_veramt OCCURS 0,
            vbeln TYPE vbap-vbeln,
            posnr TYPE vbap-posnr,
            matnr TYPE vbap-matnr,
            netwr TYPE vbap-netwr,
            mwsbp TYPE vbap-mwsbp,
          END OF t_veramt.
    DATA: BEGIN OF t_disamt OCCURS 0,
            vbeln TYPE vbap-vbeln,
            posnr TYPE vbap-posnr,
            matnr TYPE vbap-matnr,
            netwr TYPE vbap-netwr,
            mwsbp TYPE vbap-mwsbp,
            netwr_v TYPE vbap-netwr,
            mwsbp_v TYPE vbap-mwsbp,
            disc_val TYPE vbap-mwsbp,
          END OF t_disamt.
    *&   ALV FIELDS
    DATA : alv_fcat TYPE slis_t_fieldcat_alv WITH HEADER LINE,
           alv_layout TYPE slis_layout_alv.
    SELECTION SCREEN
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
    PARAMETERS:  p_ver RADIOBUTTON GROUP g1 USER-COMMAND rad DEFAULT 'X',
                 p_sab RADIOBUTTON GROUP g1 .
    SELECTION-SCREEN END OF BLOCK b1.
    SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
    SELECT-OPTIONS: s_vbeln FOR vbak-vbeln NO INTERVALS MODIF ID gr1.
    PARAMETERS:    p_dwfile TYPE  rlgrap-filename
                   DEFAULT 'C:\test1.txt' MODIF ID gr2,         "#EC NOTEXT
                   p_upfile TYPE  rlgrap-filename
                   DEFAULT 'C:\test.txt' MODIF ID gr3.          "#EC NOTEXT
    SELECTION-SCREEN END OF BLOCK b2.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_upfile.
    **************F4 Help For Input File Name****************************
      CALL FUNCTION 'F4_FILENAME'
           EXPORTING
                program_name  = syst-cprog
                dynpro_number = syst-dynnr
                field_name    = 'C:\'
           IMPORTING
                file_name     = p_upfile.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_dwfile.
    **************F4 Help For Input File Name****************************
      CALL FUNCTION 'F4_FILENAME'
           EXPORTING
                program_name  = syst-cprog
                dynpro_number = syst-dynnr
                field_name    = 'C:\'
           IMPORTING
                file_name     = p_dwfile.
    AT SELECTION-SCREEN OUTPUT.
      LOOP AT SCREEN.
        IF  p_sab = 'X'.
          IF screen-group1 = 'GR1' OR screen-group1 = 'GR2'.
            screen-active = '0'.
            screen-invisible = '1'.
          ELSE.
            screen-active = '1'.
            screen-invisible = '0'.
          ENDIF.
          MODIFY SCREEN.
        ELSE.
          IF screen-group1 = 'GR3'.
            screen-active = '0'.
            screen-invisible = '1'.
          ELSE.
            screen-active = '1'.
            screen-invisible = '0'.
          ENDIF.
          MODIFY SCREEN.
        ENDIF.
      ENDLOOP.
    START-OF-SELECTION
    START-OF-SELECTION.
    Check Radio Button
      IF p_ver = 'X'.
        PERFORM get_details_open_so_vertex.
      ELSE.
        PERFORM get_details_open_so.
      ENDIF.
    Display the output.
      PERFORM diplay_report .
    regards
    vinod

  • How to Add field to Selection screen of Tx. FBL5N

    Hi All,
    In Tx. FBL5N, there is a field Customer number (on Customer selection screen).
    In addition to the above we need to add field Customer name in Selection screen.
    How do we go about it ?
    PS :- We have found steps to add fields to FBL5N output. But, we dont want it on output, we want to add it on Selection screen.
    Regards,
    Ashish

    Hi,
    Only certain table fields are allowed in dynamic selection, please see this sap note for detail :
    Sap Note 310886 - Line items: Dynamic selections ignored
    Permitted tables:
    SKA1: all fields
    SKB1: all fields
    BSIS: all fields
    So BKPF-CPUDT field is not allowed for dynamic selection.
    check this thread Add new Fields to Dynamic Selection FBL5n
    Or
    Enhancing Selection Views in the dynamic selection of some SAP transactions like FB03, FBL3N, FBL5N
    This enhancing related to SAP OSS Note: 188663 and 832997
    Requirement: The business requires the Doc. Header Text be added in the dynamic selection in SAP transactions FB03
    ■Execute Transaction code SE36. Click F4. Enter the SAP table name wherein you think the field could be found. In this case the SAP table is BKPF and the logical database is BRF
    ■From the initial screen of SE36, Choose from the path EXTRAS >> Selection Views
    ■Copy Selection View u201CSAPu201D to u201CCUSu201D
    ■Change the selection views u201CCUSu201D
    ■In the right corner, double click your table BKPF.
    ■In the right corner, check whether what functional groups does your field belong. If it is 01 then input it beside your field name.
    ■Then Save it afterwards.
    Prabhudas

  • Adding new field to MB51 screen output

    Hi All,
    I need to add a new field TCODE2 from MKPF table on the screen output of MB51. I have added my new field thro SPRO following the below steps:-
    Go to SPRO -- MM -- Inventory Management and Physical Inventory -- Reporting -- Define Field Selection for Material Document List
    Here I have give
    RM07DOCS MKPF TCODE2 Transaction code -- output box checked
    and saved.
    Now I  tried to re-execute the transaction MB51 but not able to see the Tcode2 on the output screen .
    Can any one help me out, if I am missing out something or is there any thing else i need to check on the ALV output to see the field TCODE2 on the screen og MB51?
    Regards
    Shilpa.

    Hi,
    Check these notes:
    Note 357187 - MB51: Fields in field catalog / selection screen
    Note 828104 - Enhancing MB51 for AFS
    I hope this helps you
    Regards
    Eduardo

  • 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&#305;&#351;t&#305;rma Zaman&#305; : '.
      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

  • Transaction DP97: Need to add 2 fields on selection screen...

    Hi,
    I am using ECC6.0. I need to add 2 extra fields on selection screen of transaction DP97. Program name is RVPKMASS97. i did not find any screen-exit for this. Please can anybody suggest any other way to add fields on selection screen... I think i can use enhancement points. please help if anybody has previously worked on this. I need to know following things:
    1) how to add 2 fields on selection screen ( 2 fields are : MATNR-Service product and FFPRF-DIP profile)
    2) where to add programming logic for this
    Thanks in advance,
    Minal

    Hi,
    Go to program RVPKMASS97.
    Go inside INCLUDE rvpkmasspar.
    (When you double click on the include a pop up screen will come up and in that select the RVPKMASS97)
    Click on spiral icon there on the tool bar.
    right click on the '
    ENHANCEMENT-POINT RVPKMASSPAR_01 SPOTS ES_RVPKMASSPAR STATIC INCLUDE BOUND .' line and select enhancement-> create. and give some implementation name and text.
    now you can declare ur fields in this implementation.
    After declaring save it and activate it.
    Now go back to ur txn and run. you are able to see the custom fields on the screen.
    Reward me points if it is helpful.
    I think it will help you out.
    Thanks,
    Prasanna

  • Re:addition of fields in selection screen

    hi good morning to all,
    i want to add two fields in selection screen.these two are
           Service Representative ZQ
           Customs  Representative ZG.
    i want logic how to add these fields to output.
    from these two i want to fetch the correponding pernr(field in vbpa i.e personal number)
    please give me the solution as early as possible
    thanks

    Hai,
        If it is a report you can add the two field either as select option or parameter.
    Regards,
    Umasankar

  • RESCIS - Unable to select custom report from Selection Screen

    Hi all,
    we have developed a custom report for transaction "RESCIS-Evaluation of service charge settlement" but we have found that althought the report appears in selection screen field called "REPORT" it throws message RESCIS003 but the report is not shown.
    If we doesn't fulfill report field in selection screen, the program shows a second screen where a couple of ALVGrids are shown allowing the user to select the report that will be displayed. Here we are able to select our custom report and the data in it is displayed.
    We have analyzed the standard program that is executed via transaction RESCIS and we've found that the selection screen executes standard function RESC_GUI_ANYREPORTS_APPL that doesn't executes reports dinamically but statically. That means that SAP doesn't allows to execute custom reports directly from selection screen.
    I think this is a SAP error but afert opening an OSS message SAP sais that is not an error but a bad configuration or lack of knowledge for customizing it.
    Has anyone developed a custom report for RESCIS transaction?

    Hm what exactly did you want to change? Normally it is in REFX cases you should not copy standard REPORTS. In your case with transaction RESCIS, I myself do not see any need to add any functionality in this report because it is only a sum of all lists from your service charge settlement. What else do you want to see there?
    For displaying new fields in the separate lists maybe there is some BADI for it.
    Regards
    Michael

Maybe you are looking for