Add new field as selection parameter in HUMO report

Dear Experts,
We have arequirement to add a new selection criteria in a standard report HUMO.
We need to add a new filtering field from VEPO table.
How can we do this without going for development.
Please suggest
Regards,
Shashidhar

Hi Sashidhar,
First go to the program RHU_HELP and you need to enhance the code using the enhancement technique using implicit enhancement. You can add your new selection criteria at line no 257( need to create an new implicit enhancement).
Hope this is helpful for you.
Regards,
Ramesh.

Similar Messages

How Do I add new fields to Repeating Frames in existing Report

Hi,
How do I add new fields to Repeating Frames in existing Report. The Report has 2 GRPFR, 1 HDR and 2 Repeating Frames. I would like to add a new field(column) to inner most repeating frame. I added the new golumn to QUERY and GROUPs in Data Model. After adding the new column to inner most Repeating Frame in Layout Model, the Layout model is losing all other frame and it is showing only the modified one.
How do I add new column to repeating frames without disturbeing other frames.
Any hellp will be appreciated!!!!!!!!!!!.
I am using Oracle Reports 6i.
Thanks,
Ravi.

you must work in your layour editor
expand your repeating frames do it more big
for add your new items or field. after you inserted or add, can you put more little your repeating.
too can you to do one copy of one field in your repeating frame and assign it in his source your new item in your data model.
normally i begin with the principal frame and go one by one internally.

Add new fields to selection screen for standard billing dule list in CRM

Hi ,
I have one issue with standard program ,tcode is /BEA/IPMI01.
SUB: Adding few new fields like IP to selection screen AND few fields to output list.
As this is a standard program (tcode: /bea/ipmi01) , i searched for BADI,EXITS but couldn't .
Can any one help me how to handle this with out cloning the standard one.
I got some information but succeed.
in SPRO.
/CRM/BILLING/SYSTEM ENHANCMENTS/access billing engine navigator. you will find selection design in the path
/CRMB/OBJECT/DL/REPORT/SELECTION GROPS/DLA/SELECTION FEIDLS.
we can find selecton at this place but i couldnot find how to add new fieds.
Note: i found whatever we do , it willl reflect once we regenerated the program.

Hi,
You may be able to create an append structure to the standard output structure/table. Go to SE11, open the structure and click on append structure.
Regards
Prasenjit

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

Add new field in selection-screen and output dynamically

hi gurus,
i need to add field in selectio-screen.
i need to validate the field with existing fields.
i need to add this in alv grid output list dynamically.
thanks & regards,
kgn9.

Hi
Try to use EXIT_SAPMM07M_001, it's to update the item (not header) text, but you can try to use it:
FIELD-SYMBOLS: <BKTXT> TYPE MKPF-BKTXT.
ASSIGN ('(SAPMM07M)MKPF-BKTXT') TO <BKTXT>.
IF SY-SUBRC = 0.
<BKTXT> = <.....>.
ENDIF.
Max

Add new fields in the header of RFITEMAR

hi,
i want to add new fields in the header of RFITEMAR report ,so first i copy i to zRFITEMAR ,then i want to add
" Total Quantity " in the header after City field .
can any one help me????????
please ,, i waiting your answers..
thank you......

hi ,
thanks for your response , but first i try to copy the function then it give an error as it is reserved for sap , so i change it's name and copy it and change function group to z also then it relese an error for function pool , any way.
where can i make change in that function .
and how can i copy it . please tell me every think in more detials.
waiting
thanks.

Add new field infotype "z" in logical database selection screen pnp

Can add new field infotype "z" in logical database selection screen pnp
I could explain how to realize
Thanks

In case to somebody it interests to him: TO EXTEND SCREEN OF SELECTION WITH OPTIONAL DELIMITERS The case that can be given in a screen of selection of a logical data base it does not appear a certain field that we need in the filter, the steps that will be due to follow are the following:
u2022 To create a view of selection in agreement with the fields that we want to show To review the following Link http://help.sap.com/saphelp_46c/helpdata/es/6e/6ed638e70ef679e10000000a114084/content.htm u2022 To assign the view of selection to a class of report
u2022 In the code of report to create select option in the selection screen that allows to introduce imput to leak and after start-of-selection to put the following code,
"Allocation operative area to optional delimiter
IF NOT p_aroper IS INITIAL.
    DATA: lt_texpr TYPE rsds_expr OCCURS 0 WITH HEADER LINE,
          wa_texpr TYPE rsds_expr,
          lt_rsds_expr_tab LIKE rsdsexpr OCCURS 10 WITH HEADER LINE,
          wa_rsds_expr_tab LIKE rsdsexpr.
    REFRESH lt_rsds_expr_tab.
    wa_rsds_expr_tab-arity = '0'.
    wa_rsds_expr_tab-fieldname = 'OBJID'.
    wa_rsds_expr_tab-option = 'EQ'.
    wa_rsds_expr_tab-low = p_aroper.
    wa_rsds_expr_tab-high = '00000000'.
    MOVE-CORRESPONDING wa_rsds_expr_tab TO lt_rsds_expr_tab.
    APPEND lt_rsds_expr_tab.
    REFRESH lt_texpr.
    wa_texpr-tablename = 'PA9004'.
    wa_texpr-expr_tab[] = lt_rsds_expr_tab[].
    MOVE-CORRESPONDING wa_texpr TO lt_texpr.
    APPEND lt_texpr.
pnpdynse[] = lt_texpr[].
ENDIF.
English is the forum language.
Edited by: Rob Burbank on May 18, 2011 11:41 AM

Need to add new fields in transaction UDM_DISPUTE.

Hi Friends,
This is regarding UDM_DISPUTE transaction in FSCM.
I need to add new fields (drop down lists) in transaction UDM_DISPUTE.
Program Name: SAPLSRMCLFRM2
Screen Number: 100
Can any one please suggest me with the name of exit using which I can add these new fields.
Or another way through which I can add these new fields viz., BADI or classes.
Thank You in Advance!
Regards,
Tejaswini

Execute the below code to find the userexits the t-code is using
REPORT yuserexit_vin NO STANDARD PAGE HEADING.
TABLES : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.
TABLES : tstct. DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.
DATA : field1(30).
DATA : v_devclass LIKE tadir-devclass.
PARAMETERS : p_tcode LIKE tstc-tcode OBLIGATORY.
SELECT SINGLE * FROM tstc WHERE tcode EQ p_tcode.
IF sy-subrc EQ 0.
SELECT SINGLE * FROM tadir WHERE pgmid = 'R3TR' AND object = 'PROG' AND obj_name = tstc-pgmna.
MOVE : tadir-devclass TO v_devclass.
IF sy-subrc NE 0.
    SELECT SINGLE * FROM trdir WHERE name = tstc-pgmna.
    IF trdir-subc EQ 'F'.
      SELECT SINGLE * FROM tfdir WHERE pname = tstc-pgmna.
      SELECT SINGLE * FROM enlfdir WHERE funcname = tfdir-funcname.
      SELECT SINGLE * FROM tadir WHERE pgmid = 'R3TR' AND object = 'FUGR' AND obj_name EQ enlfdir-area.
      MOVE : tadir-devclass TO v_devclass.
    ENDIF.
ENDIF.
SELECT * FROM tadir INTO TABLE jtab WHERE pgmid = 'R3TR' AND object = 'SMOD' AND devclass = v_devclass.
SELECT SINGLE * FROM tstct WHERE sprsl EQ sy-langu AND tcode EQ p_tcode.
FORMAT COLOR COL_POSITIVE INTENSIFIED OFF.
WRITE:/(19) 'Transaction Code - ', 20(20) p_tcode, 45(50) tstct-ttext.
SKIP.
IF NOT jtab[] IS INITIAL.
    WRITE:/(95) sy-uline.
    FORMAT COLOR COL_HEADING INTENSIFIED ON.
    WRITE:/1 sy-vline, 2 'Exit Name', 21 sy-vline , 22 'Description', 95 sy-vline.
    WRITE:/(95) sy-uline.
    LOOP AT jtab.
      SELECT SINGLE * FROM modsapt WHERE sprsl = sy-langu AND name = jtab-obj_name.
      FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
      WRITE:/1 sy-vline, 2 jtab-obj_name HOTSPOT ON, 21 sy-vline , 22 modsapt-modtext, 95 sy-vline.
    ENDLOOP.
    WRITE:/(95) sy-uline.
    DESCRIBE TABLE jtab.
    SKIP.
    FORMAT COLOR COL_TOTAL INTENSIFIED ON.
    WRITE:/ 'No of Exits:' , sy-tfill.
ELSE.
    FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
    WRITE:/(95) 'No User Exit exists'.
ENDIF.
ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(95) 'Transaction Code Does Not Exist'.
ENDIF.
AT LINE-SELECTION.
GET CURSOR FIELD field1.
CHECK field1(4) EQ 'JTAB'.
SET PARAMETER ID 'MON' FIELD sy-lisel+1(10).
CALL TRANSACTION 'SMOD' AND SKIP FIRST SCREEN.
* *---End of Program

Screen Exit - add new field (VBAK-VBELN) in VC01N

hi friends,
how to add new field (VBAK-VBELN) in VC01N tcode
Tcode: VC01N Sales Activity
Table: VBKA
Field: VBELN
Requirement: New field in screen ( VC01N )
Description:
Prospective projects are to be linked to the sales activities whenever they are created.
Prospective Project VA12
Table: VBAK
Field: VBELN
Doc Type: ZPRO
Doc Category: A
Place the new field VBAK-VBELN under the u2018Commentu2019n in the VC01N.
urgent plz reply
thanks and regards
Poorna
Edited by: poornambika sivaramakrishnan on Nov 21, 2008 11:28 AM

Hi...
You can definitely do it...provided if screen exit is there ...
Below is the program to find the exit whether present or not in your transaction,
Just give your tcode in the program , it will show all the exits in your transaction.
Regards
RachelArun
TABLES : tstc, "SAP Transaction Codes
tadir, "Directory of Repository Objects
modsapt, "SAP Enhancements - Short Texts
modact, "Modifications
trdir, "System table TRDIR
tfdir, "Function Module
enlfdir, "Additional Attributes for Function Modules
tstct. "Transaction Code Texts
*& Variables
DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.
DATA : field1(30).
DATA : v_devclass LIKE tadir-devclass.
*& Selection Screen Parameters
SELECTION-SCREEN BEGIN OF BLOCK a01 WITH FRAME TITLE text-001.
SELECTION-SCREEN SKIP.
PARAMETERS : p_tcode LIKE tstc-tcode OBLIGATORY.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN END OF BLOCK a01.
*& Start of main program
START-OF-SELECTION.
u2022     Validate Transaction Code
SELECT SINGLE * FROM tstc
WHERE tcode EQ p_tcode.
u2022     Find Repository Objects for transaction code
IF sy-subrc EQ 0.
SELECT SINGLE * FROM tadir
WHERE pgmid = 'R3TR'
AND object = 'PROG'
AND obj_name = tstc-pgmna.
MOVE : tadir-devclass TO v_devclass.
IF sy-subrc NE 0.
SELECT SINGLE * FROM trdir
WHERE name = tstc-pgmna.
IF trdir-subc EQ 'F'.
SELECT SINGLE * FROM tfdir
WHERE pname = tstc-pgmna.
SELECT SINGLE * FROM enlfdir
WHERE funcname = tfdir-funcname.
SELECT SINGLE * FROM tadir
WHERE pgmid = 'R3TR'
AND object = 'FUGR'
AND obj_name = enlfdir-area.
MOVE : tadir-devclass TO v_devclass.
ENDIF.
ENDIF.
u2022     Find SAP Modifactions
SELECT * FROM tadir
INTO TABLE jtab
WHERE pgmid = 'R3TR'
AND object = 'SMOD'
AND devclass = v_devclass.
SELECT SINGLE * FROM tstct
WHERE sprsl EQ sy-langu
AND tcode EQ p_tcode.
FORMAT COLOR COL_POSITIVE INTENSIFIED OFF.
WRITE:/(19) 'Transaction Code - ',
20(20) p_tcode,
45(50) tstct-ttext.
SKIP.
IF NOT jtab[] IS INITIAL.
WRITE:/(95) sy-uline.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
WRITE:/1 sy-vline,
2 'Exit Name',
21 sy-vline ,
22 'Description',
95 sy-vline.
WRITE:/(95) sy-uline.
LOOP AT jtab.
SELECT SINGLE * FROM modsapt
WHERE sprsl = sy-langu AND
name = jtab-obj_name.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
WRITE:/1 sy-vline,
2 jtab-obj_name HOTSPOT ON,
21 sy-vline ,
22 modsapt-modtext,
95 sy-vline.
ENDLOOP.
WRITE:/(95) sy-uline.
DESCRIBE TABLE jtab.
SKIP.
FORMAT COLOR COL_TOTAL INTENSIFIED ON.
WRITE:/ 'No of Exits:' , sy-tfill.
ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(95) 'No User Exit exists'.
ENDIF.
ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(95) 'Transaction Code Does Not Exist'.
ENDIF.
u2022     Take the user to SMOD for the Exit that was selected.
AT LINE-SELECTION.
GET CURSOR FIELD field1.
CHECK field1(4) EQ 'JTAB'.
SET PARAMETER ID 'MON' FIELD sy-lisel+1(10).
CALL TRANSACTION 'SMOD' AND SKIP FIRST SCREEN.

Add new field to HR PCR forms

Hi All,
We are trying to enhance adobe form for scenario SRQ1.
We want to add some new fields to tha form.
For that we have copied the existing standard form to zform.
We have implemented the zinterface too.
To add new field on form we created as an import parameter in form interface.
We added to context of adobe form and on layout.
But we are not getting that field in 'special_data' table in BADI implementation of SRQ1.
Please let me know how and where we should write a code to add new field in 'special_data' table.
Thanks & Regards,
Nilesh.

Thanks Suresh,
We have added it to characteristics of SRQ1 scenario and it's working.
But now we are facing problem in adding data to additional_data table.
Can you tell us something about it.
Actually in set_additional_values method of BADI we are adding data to additional_data table but on form it is not reflecting.
Please advice.

I want to add new field to this list

hi all,
i want to add new field to this list.
kostenstelle from table zfmkstel
*& Report ZFM_MOBLIST                                                 *
REPORT ZFM_MOBLIST.
TABLES: zfm_handy , pa0002.
TYPE-POOLS : slis.
DATA: g_repid LIKE sy-repid,
      gs_print            TYPE slis_print_alv,
      gt_list_top_of_page TYPE slis_t_listheader,
      gt_list_end_of_page TYPE slis_t_listheader,
      gt_events           TYPE slis_t_event,
      gt_sort             TYPE slis_t_sortinfo_alv,
      gs_layout           TYPE slis_layout_alv,
      gt_fieldcat         TYPE slis_t_fieldcat_alv,
      fieldcat_ln LIKE LINE OF gt_fieldcat,
      col_pos TYPE i.
*DATA : BEGIN OF it_moblist OCCURS 0.
       INCLUDE STRUCTURE zfm_handy.
*DATA : nachn TYPE pa0002-nachn,
       vorna TYPE pa0002-vorna,
     END OF it_moblist.
DATA : BEGIN OF IT_MOBLIST OCCURS 0,
       TELNUM TYPE ZFM_HANDY-TELNUM,
       KARTNR TYPE ZFM_HANDY-KARTNR,
       ZUTART TYPE ZFM_HANDY-ZUTART,
       PERNR TYPE ZFM_HANDY-PERNR,
       nachn TYPE pa0002-nachn,
       VORNA TYPE pa0002-vorna,
       ZDATE TYPE ZFM_HANDY-ZDATE,
       PINNR TYPE ZFM_HANDY-PINNR,
       PUKNR TYPE ZFM_HANDY-PUKNR,
       TARIF1 TYPE ZFM_HANDY-TARIF1,
       TARIF2 TYPE ZFM_HANDY-TARIF2,
       TARIF3 TYPE ZFM_HANDY-TARIF3,
       GTYPE TYPE ZFM_HANDY-GTYPE,
       IMEI TYPE ZFM_HANDY-TARIF1,
        twincard type zfm_handy-twincard,
        twinbill type zfm_handy-twinbill,
        einbau type zfm_handy-einbau,
        beschr type zfm_handy-beschr,
        text1 type zfm_handy-text1,
         text2 type zfm_handy-text2,
          text3 type zfm_handy-text3,
          end of it_moblist.
DATA : BEGIN OF IT_zfm_handy OCCURS 0,
     TELNUM TYPE ZFM_HANDY-TELNUM,
     KARTNR TYPE ZFM_HANDY-KARTNR,
     ZUTART TYPE ZFM_HANDY-ZUTART,
     PERNR TYPE ZFM_HANDY-PERNR,
     ZDATE TYPE ZFM_HANDY-ZDATE,
     PINNR TYPE ZFM_HANDY-PINNR,
     PUKNR TYPE ZFM_HANDY-PUKNR,
     TARIF1 TYPE ZFM_HANDY-TARIF1,
     TARIF2 TYPE ZFM_HANDY-TARIF2,
     TARIF3 TYPE ZFM_HANDY-TARIF3,
     GTYPE TYPE ZFM_HANDY-GTYPE,
     IMEI TYPE ZFM_HANDY-TARIF1,
      twincard type zfm_handy-twincard,
      twinbill type zfm_handy-twinbill,
      einbau type zfm_handy-einbau,
      beschr type zfm_handy-beschr,
      text1 type zfm_handy-text1,
       text2 type zfm_handy-text2,
        text3 type zfm_handy-text3,
        end of it_zfm_handy.
*DATA : BEGIN OF it_zfm_handy OCCURS 0.
       INCLUDE STRUCTURE zfm_handy.
*DATA END OF it_zfm_handy.
DATA : BEGIN OF it_pa0002 OCCURS 0,
        pernr TYPE pa0002-pernr,
        nachn   TYPE pa0002-nachn,
       vorna     TYPE pa0002-vorna,
       pernr TYPE pa0002-pernr,
       END OF it_pa0002.
INITIALIZATION.
g_repid = sy-repid.
PERFORM print_build USING gs_print.      "Print PARAMETERS
START-OF-SELECTION.
PERFORM data_selection.
PERFORM build_fieldcat.
PERFORM eventtab_build CHANGING gt_events.
PERFORM comment_build CHANGING gt_list_top_of_page.
PERFORM call_alv.
*&      Form TOP_OF_PAGE
FORM top_of_page.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = gt_list_top_of_page.
WRITE: sy-datum, 'Page No', sy-pagno RIGHT-JUSTIFIED.
ENDFORM.                    "TOP_OF_PAGE
*&      Form END_OF_PAGE
FORM end_of_page.
WRITE: /.
WRITE AT (sy-linsz) sy-pagno CENTERED.
ENDFORM.                    "END_OF_PAGE
### PRINT SETTINGS
FORM print_build USING ls_print TYPE slis_print_alv.
ls_print-print              = ' '. "PRINT IMMEDIATE
ls_print-no_print_selinfos = 'X'. "NO SELECTION INFO
ls_print-no_coverpage       = ' '. "NO COVER PAGE
ls_print-no_new_page        = ' '. "NO NEW PAGE
ls_print-no_print_listinfos = 'X'. "NO PRINT LIST INFO
ls_print-reserve_lines      = 2.   " FOOTERLINE
ENDFORM.                    "PRINT_BUILD
*&      Form data_selection
      text
--> p1        text
<-- p2        text
FORM data_selection .
data : n(8) type n.
SELECT * FROM
             zfm_handy
       INTO CORRESPONDING FIELDS OF TABLE it_zfm_handy where pernr ne space.
IF NOT it_zfm_handy[] IS INITIAL.
    loop at it_zfm_handy.
      n = it_zfm_handy-pernr.
      it_zfm_handy-pernr = n.
      modify it_zfm_handy.
    endloop.
    SELECT pernr nachn
           vorna
     FROM pa0002
     INTO TABLE it_pa0002
     FOR ALL ENTRIES IN it_zfm_handy
     WHERE pernr = it_zfm_handy-pernr and endda = '99991231'.
   SELECT pernr nachn
          vorna
    FROM pa0002
    INTO TABLE it_pa0002
    FOR ALL ENTRIES IN it_zfm_handy
    WHERE pernr = it_zfm_handy-pernr and begda le sy-datum and endda ge sy-datum.
ENDIF.                              " not it_zfm_handy
LOOP AT it_zfm_handy.
    MOVE-CORRESPONDING it_zfm_handy TO it_moblist.
    clear it_pa0002.
    READ TABLE it_pa0002 WITH KEY pernr = it_zfm_handy-pernr.
    if sy-subrc = 0.
      move it_pa0002-nachn to it_moblist-nachn.
      move it_pa0002-vorna to it_moblist-vorna.
      move it_pa0002-pernr to it_moblist-pernr.
    ENDIF.
    APPEND it_moblist.
    CLEAR   it_moblist.
*endif.
ENDLOOP.
ENDFORM.                    " data_selection
*&      Form BUILD
      text
--> p1        text
<-- p2        text
FORM build_fieldcat .
Explain Field Description to ALV
DATA: fieldcat_in TYPE slis_fieldcat_alv.
CLEAR fieldcat_in.
fieldcat_ln-fieldname = 'TELNUM'.
fieldcat_ln-tabname   = 'IT_MOBLIST'.
fieldcat_ln-no_out    = ' '.
fieldcat_ln-seltext_l = 'TELNUM'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname = 'KARTNR'.
fieldcat_ln-tabname   = 'IT_MOBLIST'.
fieldcat_ln-no_out    = ' '.
fieldcat_ln-seltext_l = 'KARTNR'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname = 'ZUTART'.
fieldcat_ln-tabname   = 'IT_MOBLIST'.
fieldcat_ln-no_out    = ' '.
fieldcat_ln-seltext_l = 'ZUTART'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'PERNR'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'PERNR'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'NACHN'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'NACHN'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'VORNA'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'VORNA'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'ZDATE'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'ZDATE'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'PINNR'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'PINNR'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'PUKNR'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'PUKNR'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TARIF1'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TARIF1'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TARIF2'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TARIF2'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TARIF3'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TARIF3'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'GTYPE'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'GTYPE'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'IMEI'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'IMEI'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TWINCARD'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TWINCARD'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TWINBILL'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TWINBILL'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'EINBAU'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'EINBAU'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'BESCHR'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'BESCHR'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TEXT1'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TEXT1'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TEXT2'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TEXT2'.
APPEND fieldcat_ln TO gt_fieldcat.
CLEAR fieldcat_in.
fieldcat_ln-fieldname     = 'TEXT3'.
fieldcat_ln-tabname       = 'IT_MOBLIST'.
fieldcat_ln-no_out        = ' '.
fieldcat_ln-seltext_l = 'TEXT3'.
APPEND fieldcat_ln TO gt_fieldcat.
DATA SORTING
DATA: gs_sort TYPE slis_sortinfo_alv.
CLEAR gs_sort.
gs_sort-fieldname = 'TELNUM'.
gs_sort-spos      = 1.
gs_sort-up        = 'X'.
GS_SORT-SUBTOT    = 'X'.
APPEND gs_sort TO gt_sort.
CLEAR GS_SORT.
GS_SORT-FIELDNAME = 'KARTNR'.
GS_SORT-SPOS      = 2.
GS_SORT-UP        = 'X'.
*GS_SORT-SUBTOT    = 'X'.
APPEND gs_sort TO gt_sort.
ENDFORM.                    " BUILD
*&      Form EVENTTAB_BUILD
      text
     <--P_GT_EVENTS text
FORM eventtab_build CHANGING lt_events TYPE slis_t_event.
CONSTANTS:
gc_formname_top_of_page TYPE slis_formname VALUE 'TOP_OF_PAGE',
gc_formname_end_of_page TYPE slis_formname VALUE 'END_OF_PAGE'.
DATA: ls_event TYPE slis_alv_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = lt_events.
READ TABLE lt_events WITH KEY name = slis_ev_top_of_page
                           INTO ls_event.
IF sy-subrc = 0.
    MOVE gc_formname_top_of_page TO ls_event-form.
    APPEND ls_event TO lt_events.
ENDIF.
define END_OF_PAGE event
READ TABLE lt_events WITH KEY name = slis_ev_end_of_page
                           INTO ls_event.
IF sy-subrc = 0.
    MOVE gc_formname_end_of_page TO ls_event-form.
    APPEND ls_event TO lt_events.
ENDIF.
ENDFORM.                    " EVENTTAB_BUILD
*&      Form COMMENT_BUILD
      text
     <--P_GT_LIST_TOP_OF_PAGE text
FORM comment_build CHANGING gt_top_of_page TYPE slis_t_listheader.
DATA: gs_line TYPE slis_listheader.
DATA: today_date(10) TYPE c.
CONCATENATE
sy-datum+6(2) '.'
sy-datum+4(2) '.'
sy-datum(4) INTO today_date.
CLEAR gs_line.
gs_line-typ = 'H'.
gs_line-info = 'MOBLIST DETAILS'.
APPEND gs_line TO gt_top_of_page.
CLEAR gs_line.
gs_line-typ = 'S'.
gs_line-key = 'Date:'.
gs_line-info = today_date.
APPEND gs_line TO gt_top_of_page.
GS_LINE-KEY = 'User:'.
GS_LINE-INFO = sy-uname.
APPEND gs_line TO gt_top_of_page.
CLEAR gs_line.
gs_line-typ = 'A'.
gs_line-info = 'ACTION'.
APPEND gs_line TO gt_top_of_page.
ENDFORM.                    " COMMENT_BUILD
*&      Form CALL_ALV
      text
--> p1        text
<-- p2        text
FORM call_alv .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
   i_callback_program = g_repid
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
   is_layout = gs_layout
   it_fieldcat = gt_fieldcat
     it_sort = gt_sort
     it_events = gt_events
     is_print = gs_print
   TABLES
     t_outtab = IT_MOBLIST
   EXCEPTIONS
     program_error = 1
   OTHERS = 2.
ENDFORM.                    "CALL_ALV.

Hi,
add:
1) to IT_MOBLIST
text3 type zfm_handy-text3,
kostl type csks-kostl,
end of it_moblist.
2)...
CLEAR fieldcat_in.
fieldcat_ln-fieldname = 'KOSTL'.
fieldcat_ln-tabname = 'IT_MOBLIST'.
fieldcat_ln-no_out = ' '.
fieldcat_ln-seltext_l = 'KOSTL'.
APPEND fieldcat_ln TO gt_fieldcat.

Query: How to add new fields in ABAP query?

Hi All,
Can any one tell me how to add new fields in the ABAP query output?
We have to add the new fields using query design or we have
to add those in the background program(automatically generated behind query) by selecting new fields in the code?

What kind of report? Usually, you have to add the field in the table declaration and then also in the SQL query. After that, include the field in what kind of report you are using.

How to add new fields in SAP-Query

Hi,
Can any body tell how to add new fields to the existing query.
Thanks a lot,
Bhaskar.

hi,
when we create internal tables like. in final table you can include the extra fields.
data : begin of itab_mara,
         matnr like mara-matnr,
         erdat like mara-erdat,
         end of itab_mara.
data : begin of itab_marc,
         matnr like marc-matnr,
         werks like marc-werks,
         end of itab_marc.
data : begin of itab_final,
         matnr like mara-matnr,
         erdat like mara-erdat,
         werks like marc-werks,
         date like sy-datum,
         status(10) type c, * new fields
         end of itab_final.
<select statement>.
Append all the fields to itab.
loop at itab_final.
write :/ itab_final.
endloop.
Reward with points if helpful.
Message was edited by:
        Vinutha YV

Cannot Add new fields to standard QM datasource

Hi
I got this erro when I try to add new fields from LBWE.
Field ZZRFKIMG cannot be selected because of unit field VRKME -> see long text
Message no. MCEX032
Diagnosis
Field ZZRFKIMG cannot be transferred, since its unit field VRKME is either not in the communication structure, or was purposefully excluded from the selection.
Procedure
If you have chosen your own field, you must also create a user-defined unit field in the append and use it accordingly.
How can I resolve it.
thanks

Hi,
My Understanding is that if the field is available in the Pool in LBWE then no need to enhance the datasource.
In my case the field is available in LBWE though it is ZFIELD (ZZRFKLMG and ZZNETPRC).
In RSA6 I added the this unit
ZZMEINS     MEINS     UNIT                                                                           Base Unit of Measure
ZZWAERK     WAERK     CUKY                                                                           SD Document Currency
I went back to LBWE and try to add the following Zfieds (ZZRFKLMG and ZZNETPRC) and the error is same.
Now I try to add the the field directly in the append structure * ZZMC05Q02ITM* but its asking to maintain the ref table and ref field.
I added ZZMC05Q02ITM as ref table and ZZRFKLMG as ref unit and I still get errors.
I am are that if I maintain it in RSA6 then I need to write user exit in CMOD but since it is available in LBWE I want to get it from the pool.
I have tried this and there was no errors during activation
ZZRFKLMG     ZZRQE_RFKLMG     QUAN     QMFE     ZZMEINS     Notification quantity in base units
I gave the table name and Unit.
Despite adding it, I still get data even though I did not used LBWE pool.
thanks alot SUV123
Edited by: Bhat Vaidya on Oct 14, 2009 10:44 AM
Edited by: Bhat Vaidya on Oct 14, 2009 11:06 AM

CRM - Add New Field in Competitor Product Screen

We are looking for the right way to enhance the competitor product screen (object prod_cp) in CRM 7.0. We have explored several options and we would like to have a confirmation that we selected the right option for the CRM level we are on now. We checked enhancement options via eewb and aet. However, in transaction axtreg there are 129 objects that can be enhanced but object prod_cp is not part of that list so I assume both tools mentioned cannot be used to enhance the competitor product screen (we want to add new fields and put business logic behind it). Is this a correct conclusion? I based the conclusion on post below:
AET enhancement capabilities
Found a OSS note 1088910 which looks like something we could use instead in CRM 7.0:
appl enhancement          component view for customer
Competitor products (PRDCP)     PRDCPOV/CustomHeader
Is this correct?
If this is not correct, how can we enhance the competitor product screen without changing the sap standard code (like append a Z structure to table comm_product_idx and then....are there any enhancement sports for this screen where we can add our custom code?). Do we have to use the framework enhancement concept?
Also found OSS note 1448299 that provides information about business functions for the Application Enhancement Tool (AET) in SAP Enhancement Package 1 for SAP CRM 7.0 and I saw that we will be able to enhance the competitor product screen as soon as we have upgraded to Ehp 1 just by switching on business function crm_inf_1. Is that correct?
Rgds,
Josephine

Hi Josephine,
You can enhance any standard CRM 7.0 component. follow this wiki on how to enhance standar CRM7.0 components
http://wiki.sdn.sap.com/wiki/display/CRM/HowtoGuide-EnhancingtheUIinCRM+7.0
You have two options to add new field to the competitor product screen
1. Using AET. Application Enhancement Tool, require very limited technical knowledge and i believe even function person can add a new field on the webui screen using AET. Search sdn with AET and you will find lot of information.
2. Create a z table with the new field value and product id (unique key).
    Create a value node in the standar component.
    On load of the webui screen fetch the details of the new field from the ztable and display it
    On the save of the webui screen if the value of the new field has changed update the z table.
Regards

Add new field as selection parameter in HUMO report

Similar Messages

Maybe you are looking for