How to add fields to output list of BP search

Hi,
We have MDM 3.0. Currently we use the standard SAP-MDM Business Partner search functionality for searching a business partner. In the output list/result list of a search currently the fields street2/street4 are not shown. Can anybody tell me if it is possible to add those fields to the output list/result list? If yes how.
regards

Information on that has been provided in the Help Portal:
http://help.sap.com/saphelp_mdm300/helpdata/EN/af/2a679db94f11458e3ccabe47a14d47/frameset.htm
Navigate further:
-> Search
-> For Administrators
-> Enhancement of the Search with New Attributes
Hope this helps.
Best regards,
Markus

Similar Messages

Add field in output list in ZRFUMSV00

Hi:
I am facing a problem with Z version of RFUMSV00 program. I have created a variant with a new output list, bur I need to add some new fields in output list, but I only can add the some fields in a list, but I don´t know how to add different fields in change layout.
Please, any idea?
Thanks in advance.
Best regards.

Hi,
Its you mention it is Z program . Please request ABAp er to add fiield in program so that you can see in output list and add in your report .
many Thanks

How can we modify alv output list

Hi
this is fazil.
Please tell me any body How can we modify alv output list.
Thanks & Regards
Fazil
[email protected]

Fazil,
check the program,
You can find the code in this program 'BCALV_FIELDCAT_TEST'
*& Report BCALV_FIELDCAT_TEST                                         *
This report allows to modify the fieldcatalog of a corresponding
output table and to view the effects of your changes directly.
Note that for some changes you need to newly display the whole
ALV Grid Control, e.g., DDIC-Fields are read only the first time
you call SET_READY_FOR_FIRST_DISPLAY.
Note also that not all scenarios can be tested since the output
table does not comprise all fields to test available features
of the fieldcatalog. Copy this program and extend the output
table accordingly if you want to test such a special feature.
(The field CARRNAME in 'gt_sflight' was added to test field REF_FIELD
and TXT_FIELD of the fieldcatalog - see what happens if you
calculate subtotals by carrier-id).
report bcalvt_fieldcatalog           .
data: ok_code               type sy-ucomm,
      save_ok_code          type sy-ucomm,
fieldcatalog for output table
      gt_fieldcat           type lvc_t_fcat,
fieldcatalog for fieldcatalog itself:
      gt_fcatfcat           type lvc_t_fcat,
      gs_fcatlayo           type lvc_s_layo.
Output table
data: begin of gt_sflight occurs 0.
data: carrname type s_carrname.
        include structure sflight.
data: end of gt_sflight.
data: g_max type i value 100.
data: g_all type c value SPACE.
Controls to display gt_sflight and corresponding fieldcatalog
data: g_docking type ref to cl_gui_docking_container,
      g_alv     type ref to cl_gui_alv_grid.
data: g_custom_container type ref to cl_gui_custom_container,
      g_editable_alv     type ref to cl_gui_alv_grid.
LOCAL CLASS Definition
class lcl_event_receiver definition.
public section.
    methods handle_data_changed
      for event data_changed of cl_gui_alv_grid
      importing er_data_changed.
endclass.
class lcl_event_receiver implementation.
method handle_data_changed.
at the time being, no checks are made...
endmethod.
endclass.
data: event_receiver type ref to lcl_event_receiver.
end-of-selection.
set screen 100.
*&      Module STATUS_0100 OUTPUT
      text
module status_0100 output.
set pf-status 'BASIC'.
set titlebar 'BASICTITLE'.
create ALV Grid Control in the first run
if g_docking is initial.
    perform create_and_init_controls.
endif.
endmodule.                             " STATUS_0100 OUTPUT
*&      Module USER_COMMAND_0100 INPUT
      text
module user_command_0100 input.
save_ok_code = ok_code.
clear ok_code.
case save_ok_code.
    when 'SUBMIT'.
set the frontend fieldcatalog
ATTENTION: DDIC-Fields are not updated using this method!
(see 'RESTART')
      call method g_alv->set_frontend_fieldcatalog
           exporting
             it_fieldcatalog = gt_fieldcat.
      call method g_alv->refresh_table_display.
      call method cl_gui_cfw=>flush.
    when 'RESTART'.
Destroy the control currently visible and display it again
using the changed fieldcatalog.
      perform restart_sflight.
    when '&ALL'.
      perform switch_visibility.
endcase.
endmodule.                             " USER_COMMAND_0100 INPUT
*&      Form CREATE_AND_INIT_CONTROLS
      text
--> p1        text
<-- p2        text
form create_and_init_controls.
create object g_docking
      exporting
           dynnr = '100'
           extension = 150
           side = cl_gui_docking_container=>dock_at_bottom.
create object g_alv
      exporting
           i_parent = g_docking.
create object g_custom_container
      exporting
           container_name = 'CC_0100_FIELDCAT'.
create object g_editable_alv
      exporting
           i_parent = g_custom_container.
register events
create object event_receiver.
set handler event_receiver->handle_data_changed for g_editable_alv.
call method g_editable_alv->register_edit_event
                exporting
                   i_event_id = cl_gui_alv_grid=>mc_evt_modified.
perform build_fieldcatalogs changing gt_fieldcat gt_fcatfcat.
perform modify_fieldcatalog changing gt_fcatfcat.
perform select_data.                 "CHANGING gt_sflight
call method g_alv->set_table_for_first_display
          changing
               it_outtab       = gt_sflight[]
               it_fieldcatalog = gt_fieldcat[].
optimize column width of grid displaying fieldcatalog
gs_fcatlayo-cwidth_opt = 'X'.
Get fieldcatalog of table sflight - alv might have
modified it after passing.
call method g_alv->get_frontend_fieldcatalog
            importing et_fieldcatalog = gt_fieldcat[].
call method cl_gui_cfw=>flush.
Display fieldcatalog of table sflight:
call method g_editable_alv->set_table_for_first_display
          exporting
               is_layout       = gs_fcatlayo
          changing
               it_outtab       = gt_fieldcat[]
               it_fieldcatalog = gt_fcatfcat[].
register events
create object event_receiver.
set handler event_receiver->handle_data_changed for g_editable_alv.
endform.                               " CREATE_AND_INIT_CONTROLS
*&      Form restart_sflight
      text
--> p1        text
<-- p2        text
form restart_sflight.
data: ls_fieldcat type lvc_s_fcat.
free g_docking and thus g_alv
call method g_docking->free.
clear g_docking.
clear g_alv.
create new instances
create object g_docking
      exporting
           dynnr = '100'
           extension = 150
           side = cl_gui_docking_container=>dock_at_bottom.
create object g_alv
      exporting
           i_parent = g_docking.
This is an internal method to invalidate all fields in the fieldcat
loop at gt_fieldcat into ls_fieldcat.
    clear ls_fieldcat-tech_comp.
    modify gt_fieldcat from ls_fieldcat.
endloop.
Newly display the list with current fieldcatalog.
call method g_alv->set_table_for_first_display
          changing
               it_outtab       = gt_sflight[]
               it_fieldcatalog = gt_fieldcat.
Get fieldcatalog - it might be changed by ALV in the last call
call method g_alv->get_frontend_fieldcatalog
          importing
               et_fieldcatalog = gt_fieldcat[].
call method g_editable_alv->refresh_table_display.
call method cl_gui_cfw=>flush.
endform.                               " restart_sflight
*&      Form select_data
      text
--> p1        text
<-- p2        text
form select_data.
data: lt_sflight type table of sflight with header line,
        ls_scarr type scarr.
select data of sflight
select * from sflight into table lt_sflight up to g_max rows.
copy data to gt_sflight and update CARRNAME
loop at lt_sflight.
    move-corresponding lt_sflight to gt_sflight.
    select single * from scarr into ls_scarr
       where carrid = gt_sflight-carrid.
    gt_sflight-carrname = ls_scarr-carrname.
    append gt_sflight.
endloop.
endform.                               " select_data
*&      Form BUILD_FIELDCATALOGS
      text
     <--P_GT_FIELDCAT text
     <--P_GT_FCATFCAT text
form build_fieldcatalogs changing p_fieldcat type lvc_t_fcat
                                  p_fcatfcat type lvc_t_fcat.
data: ls_fcat     type lvc_s_fcat.
Fieldcatalog for table SFLIGHT: p_fieldcat
generate fieldcatalog automatically
call function 'LVC_FIELDCATALOG_MERGE'
      exporting
           i_structure_name       = 'SFLIGHT'
        I_CLIENT_NEVER_DISPLAY = 'X'
       changing
            ct_fieldcat            = p_fieldcat[]
   EXCEPTIONS
        INCONSISTENT_INTERFACE = 1
        PROGRAM_ERROR          = 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.
shift all column positions to the right except for MANDT
loop at p_fieldcat into ls_fcat.
    if ls_fcat-fieldname ne 'MANDT'.
      add 1 to ls_fcat-col_pos.
      if ls_fcat-fieldname = 'CARRID'.
        ls_fcat-txt_field = 'CARRNAME'."link CARRNAME to CARRID
      endif.
      modify p_fieldcat from ls_fcat.
    endif.
endloop.
create a new line for CARRNAME in p_fieldcat
clear ls_fcat.
ls_fcat-fieldname = 'CARRNAME'.
ls_fcat-ref_table = 'SCARR'.
ls_fcat-col_pos = 1.
insert new line before CARRID (do not forget MANDT!).
insert ls_fcat into p_fieldcat index 1.
Fieldcatalog for table LVC_T_FCAT:p_fcatfcat
Generate fieldcatalog of fieldcatalog structure.
This fieldcatalog is used to display fieldcatalog 'p_fieldcat'
on the top of the screen.
call function 'LVC_FIELDCATALOG_MERGE'
      exporting
           i_structure_name       = 'LVC_S_FCAT'
        I_CLIENT_NEVER_DISPLAY = 'X'
       changing
            ct_fieldcat            = p_fcatfcat[]
   EXCEPTIONS
        INCONSISTENT_INTERFACE = 1
        PROGRAM_ERROR          = 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.
Hide all fields that are not documented (valid for release 4.6A)
perform hide_fields changing p_fcatfcat.
endform.                               " BUILD_FIELDCATALOGS
*&      Module EXIT_PROGRAM INPUT
      text
module exit_program input.
leave program.
endmodule.                             " EXIT_PROGRAM INPUT
*&      Form MODIFY_FIELDCATALOG
      text
     <--P_GT_FCATFCAT text
form modify_fieldcatalog changing p_fcatfcat type lvc_t_fcat.
data ls_fcat type lvc_s_fcat.
loop at p_fcatfcat into ls_fcat.
    ls_fcat-coltext = ls_fcat-fieldname.
    ls_fcat-edit = 'X'.
    if ls_fcat-fieldname = 'COL_POS' or ls_fcat-fieldname = 'FIELDNAME'.
      ls_fcat-key = 'X'.
    endif.
    modify p_fcatfcat from ls_fcat.
endloop.
endform.                               " MODIFY_FIELDCATALOG
form hide_fields changing p_fieldcat type lvc_t_fcat.
data: ls_fcat type lvc_s_fcat.
Only show documented fields of fieldcatalog.
For a documentation choose "Help->Application Help" in the menu.
loop at p_fieldcat into ls_fcat.
    if not (
         ls_fcat-fieldname eq 'CFIELDNAME'
    or   ls_fcat-fieldname eq 'COL_POS'
    or   ls_fcat-fieldname eq 'COLDDICTXT'
    or   ls_fcat-fieldname eq 'COLTEXT'
    or   ls_fcat-fieldname eq 'CURRENCY'
    or   ls_fcat-fieldname eq 'DD_OUTLEN'
    or   ls_fcat-fieldname eq 'DECIMALS_O'
    or   ls_fcat-fieldname eq 'DECMLFIELD'
    or   ls_fcat-fieldname eq 'DO_SUM'
    or   ls_fcat-fieldname eq 'DRAGDROPID'
    or   ls_fcat-fieldname eq 'EDIT_MASK'
    or   ls_fcat-fieldname eq 'EMPHASIZE'
    or   ls_fcat-fieldname eq 'EXPONENT'
    or   ls_fcat-fieldname eq 'FIELDNAME'
    or   ls_fcat-fieldname eq 'HOTSPOT'
    or   ls_fcat-fieldname eq 'ICON'
    or   ls_fcat-fieldname eq 'INTLEN'
    or   ls_fcat-fieldname eq 'INTTYPE'
    or   ls_fcat-fieldname eq 'JUST'
    or   ls_fcat-fieldname eq 'KEY'
    or   ls_fcat-fieldname eq 'LOWERCASE'
    or   ls_fcat-fieldname eq 'LZERO'
    or   ls_fcat-fieldname eq 'NO_OUT'
    or   ls_fcat-fieldname eq 'NO_SIGN'
    or   ls_fcat-fieldname eq 'NO_SUM'
    or   ls_fcat-fieldname eq 'NO_ZERO'
    or   ls_fcat-fieldname eq 'OUTPUTLEN'
    or   ls_fcat-fieldname eq 'QFIELDNAME'
    or   ls_fcat-fieldname eq 'QUANTITY'
    or   ls_fcat-fieldname eq 'REF_FIELD'
    or   ls_fcat-fieldname eq 'REF_TABLE'
    or   ls_fcat-fieldname eq 'REPREP'
    or   ls_fcat-fieldname eq 'REPTEXT'
    or   ls_fcat-fieldname eq 'ROLLNAME'
    or   ls_fcat-fieldname eq 'ROUND'
    or   ls_fcat-fieldname eq 'ROUNDFIELD'
    or   ls_fcat-fieldname eq 'SCRTEXT_L'
    or   ls_fcat-fieldname eq 'SCRTEXT_M'
    or   ls_fcat-fieldname eq 'SCRTEXT_S'
    or   ls_fcat-fieldname eq 'SELDDICTXT'
    or   ls_fcat-fieldname eq 'SELTEXT'
    or   ls_fcat-fieldname eq 'SP_GROUP'
    or   ls_fcat-fieldname eq 'SYMBOL'
    or   ls_fcat-fieldname eq 'TECH'
    or   ls_fcat-fieldname eq 'TIPDDICTXT'
    or   ls_fcat-fieldname eq 'TOOLTIP'
    or   ls_fcat-fieldname eq 'TXT_FIELD' ).
      ls_fcat-tech = 'X'.
    endif.
    modify p_fieldcat from ls_fcat.
endloop.
endform.
form switch_visibility.
data: lt_fcatfcat type lvc_t_fcat,
        ls_fcat type lvc_s_fcat.
call method g_editable_alv->get_frontend_fieldcatalog
             importing ET_FIELDCATALOG = lt_fcatfcat.
if not g_all is initial.
     perform hide_fields changing lt_fcatfcat.
     g_all = SPACE.
else.
    loop at lt_fcatfcat into ls_fcat.
       if ls_fcat-tech eq 'X'.
           ls_fcat-tech = SPACE.
           ls_fcat-no_out = 'X'.
           modify lt_fcatfcat from ls_fcat.
       endif.
    endloop.
    g_all = 'X'.
endif.
call method g_editable_alv->set_frontend_fieldcatalog
            exporting it_fieldcatalog = lt_fcatfcat.
call method g_editable_alv->refresh_table_display.
endform.
Don't forget to rewaard if useful..

How to ADD field in iview ?

hi,
in portal-iview i want to add a field.
when i go to 'portal-content -> open the iview with right click -> preview' and then
do ctrl-alt-right-mouse click i got to the customizing of the fields.
i know how to HIDE fields there, but i don't know how to add fields ? in the list
of the fields the necessary fields are available, BUT i only have to options:
hide -> YES or NOT PERSONALIZED
any ideas ?
reg, Martin

Gopal,
the root element of this fields does NOT have the option 'decorate'.
it is the quoata overview of ESS : sap.com/ess~quotas
the top of the tree has option 'decorate', but this is above the necessary table where
i select the data.
my adrl is
martin.svik(at)denzel.at
maybe we can 'change' some screenshots where you can send me yours and i can
send you mine to explain it in a better way
reg, Martin

HOW TO ADD FIELDS OF BSEG-ZFBDT & BSEG-ZBD1T

hi frnds.
currently iam working on SD MODULE I NEED the NET DUE DATE SO HOW TO DO THAT
1 problem plz:
HOW TO ADD FIELDS OF BSEG-ZFBDT & BSEG-ZBD1T
TOGETHER
one is date & other is numeric value so how?
one is date & other is numeric value so how to add this 2 fields
& finally i want to display the o/p in date format dd/mm/year
THANKS IN ADVANCE.

Hi Mahesh,
one of the nice features of ABAP is that it takes care about month/year changes when adding days/month on a date.
ADD lv_zbd1t TO lv_zfbdt.
This should work fine. If not, try to convert zbd1t into an integer first.
To get you preferred date output format try this:
DATA: lv_datestring TYPE string.
CONCATENATE lv_zfbdt+6(2) '/' lv_zfbdt+4(2) '/' lv_zfbdt(4)
INTO lv_datestring.
This isn't tested, but should give you a clue.
Regards,
ok

Hi,How to add field to sap Liquidity calculation module tables?

Hi Experts,
How to add field to sap Liquidity calculation module tables?
and how to add a field to a particular transaction code using a customer exits.
please tell me in detail.
thanks inadvance,
Regards,
Rekha

Hi Pranab,
Please follow the below steps to create an extra field and write code for that field through Infoset.
1-->Change in Infoset
u2022Go to SQ02 , enter Infoset name and click on Change Button
u2022Go to Extras (F5) button displayed on application bar.
u2022In Extras tab, click on 'Create' icon to create additional field E_NAME1, give as type C (character) and give desired length and. Enter header description as 'ShipToName'
u2022Select this field i.e E_NAME1 in one of the field group of Infoset.
u2022Go to Code section (Shift+F8) of infoset, Select Record Processing Event and write your logic code (condition) in this code section:
if vbpa-adrnr = space.
E_NAME1 = kna1-name1.
else.
E_NAME1 = adrc-name1.
endif.
2-->Generate the Infoset.
3-->Change in Query
u2022Go to SQ01(in a new session), give your query name (by selecting your user group) and click on change button.
u2022Check the field group in which you have added E_NAME1 field, then check E_NAME1 from Fields screen
u2022Click on 'Basic List' button; give line (row no.) and sequence (column no.) for extra fields.
u2022Execute/Test the Query, you will get desired result.
Please let me know, if you need more information.
Regards,
Dinesh
Edited by: Dinesh Tiwari on Oct 29, 2009 7:13 AM

How to add fields to already loaded cube or dso and how to fill records in

how to add fields to already loaded cube or dso and how to fill it.can any one tell me the critical issues in data loading process..?

This is sensitive task with regards to large volumes of data in infoproviders.
The issue is to reload of data in case of adjusted structures of infoproviders.
Indeed there are some tricks. See following:
http://weblogs.sdn.sap.com/cs/blank/view/wlg/19300
https://service.sap.com/sap/support/notes/1287382

How to add a video play list on palm pre

Does anybody knows how to add a video play list in palm pre?
I did try to add video in different folders but in the palm device are loaded in the same playlist. Is there a way to organize video files?
tks
Post relates to: Pre p100ueu (O2)

QuickTime requires player and plugins that most people don't have. You'll reach a much wider audience if you use HTML5 <video> with mp4, webm and ogg files.
<!doctype html>
<html>
<head>
<meta charset="utf-8">
<title>HTML5 with Video</title>


</head>
<style>
video {
    max-width:100%;
    display:block;
    margin:0 auto;
</style>
<body>
<h2>Use 3 File Types to support all browsers & mobile devices: MP4, WEBM and OGV.</h2>
<h3>Online Video Converter
http://video.online-convert.com/</h3>

<video controls poster="Your_poster_image.jpg">

<source src="http://techslides.com/demos/sample-videos/small.webm" type="video/webm">
<source src="http://techslides.com/demos/sample-videos/small.ogv" type="video/ogg">
<source src="http://techslides.com/demos/sample-videos/small.mp4" type="video/mp4">
If you're seeing this, you're using an
outdated browser that doesn't support
the video tag. </video>

</body>
</html>
Nancy O.

How to add Gap between dropdown List Items - ComboBox in MFC VC++

How to add Gap between dropdown List Items - ComboBox in MFC VC++

Did you tried SetItemHeight() inside your App .
Thanks
Rupesh Shukla

How to add field value to the standard table

Hi,
How to add field value to the standard table?
for example:
when we go to TCODE SE16-> VBAK table -> on the selection screen if we press F4 against VBTYP we get all the available values for that field. How to add a new document Category value to this field so that it shows up in F4 help for that field.

Hi Asif,
I don't think it is possible and feasible for adding new field value to the field VBTYP because it is not possible through SPRO.
If u see the domain of this field VBTYP we have fixed values provided by SAP. There is no value table for this. If u have value table then it will be updated through SPRO. But still if u really want to add some value u can do that by getting access key and add the value in the fixed values of the domain. But of no use other than simply displaying in F4. Because for what ever value u created here there will be no documents in VBAK or any table using this domain.
Hope this is clear for u.
Thanks,
Vinod.

Reg:How to add fields to the scripts in detail

How to add fields to the scripts in detail.
Plz give me one example help me out.

Hi
add fields to the scripts by sending that field between two &s.
for example if u want to add lifnr of lfa1 table then pass field like this.
&wa_lfa1-lifnr&.here wa_lfa1 is work area for internal table it_lfa1.
if name1 then &wa_lfa1-name1&
in this way you can add fields to the script under any window.
i am sending one example program for scripts.
&--structure declaration--
TYPES:BEGIN OF ST_LFA1,
      LIFNR TYPE LFA1-LIFNR,
      NAME1 TYPE LFA1-NAME1,
      LAND1 TYPE LFA1-LAND1,
      ORT01 TYPE ORT01,
      REGIO TYPE REGIO,
      END OF ST_LFA1.
TYPES:BEGIN OF ST_EKKO,
      EBELN TYPE EKKO-EBELN,
      BUKRS TYPE EKKO-BUKRS,
      AEDAT TYPE EKKO-AEDAT,
      ERNAM TYPE EKKO-ERNAM,
      BSTYP TYPE EKKO-BSTYP,
      LIFNR TYPE EKKO-LIFNR,
      END OF ST_EKKO.
TYPES:BEGIN OF ST_EKPO,
      EBELN TYPE EKPO-EBELN,
      EBELP TYPE EKPO-EBELP,
      LOEKZ TYPE EKPO-LOEKZ,
      AEDAT TYPE EKPO-AEDAT,
      MATNR TYPE EKPO-MATNR,
      NETWR TYPE EKPO-NETWR,
      END OF ST_EKPO.
&--internal table,work area declaration--
DATA:WA_LFA1 TYPE ST_LFA1,
     IT_LFA1 TYPE STANDARD TABLE OF ST_LFA1,
     WA_EKKO TYPE ST_EKKO,
     IT_EKKO TYPE STANDARD TABLE OF ST_EKKO,
     WA_EKPO TYPE ST_EKPO,
     IT_EKPO TYPE STANDARD TABLE OF ST_EKPO.
&--data declaration--
DATA:TOTAL TYPE EKPO-NETWR,
      V_EBELN TYPE EKKO-EBELN.
data: v_item(20) type c.
&--parameter for purchase document number--
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS P_PURDOC LIKE V_EBELN.
SELECTION-SCREEN END OF BLOCK B1.
START-OF-SELECTION.
PERFORM GET_DATA_FROM_EKKO.
PERFORM GET_DATA_FROM_LFA1.
PERFORM GET_DATA_FROM_EKPO.
&--grand total--
LOOP AT IT_EKPO INTO WA_EKPO.
    TOTAL = TOTAL + WA_EKPO-NETWR.
    CLEAR WA_EKPO.
ENDLOOP.
&--open form--
CALL FUNCTION 'OPEN_FORM'
   EXPORTING
    DEVICE                            = 'PRINTER'
    FORM                              = 'Z_50886_VENDOR'
    LANGUAGE                          = SY-LANGU
   EXCEPTIONS
     CANCELED                          = 1
     DEVICE                            = 2
     FORM                              = 3
     OPTIONS                           = 4
     UNCLOSED                          = 5
     MAIL_OPTIONS                      = 6
     ARCHIVE_ERROR                     = 7
     INVALID_FAX_NUMBER                = 8
     MORE_PARAMS_NEEDED_IN_BATCH       = 9
     SPOOL_ERROR                       = 10
     CODEPAGE                          = 11
     OTHERS                            = 12
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
&--write form for header details--
READ TABLE IT_EKKO INTO WA_EKKO INDEX 1.
CALL FUNCTION 'WRITE_FORM'
   EXPORTING
     ELEMENT                        = 'HEAD'
     WINDOW                         = 'HEADER'
   EXCEPTIONS
     ELEMENT                        = 1
     FUNCTION                       = 2
     TYPE                           = 3
     UNOPENED                       = 4
     UNSTARTED                      = 5
     WINDOW                         = 6
     BAD_PAGEFORMAT_FOR_PRINT       = 7
     SPOOL_ERROR                    = 8
     CODEPAGE                       = 9
     OTHERS                         = 10
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
&--write form for item details--
LOOP AT IT_EKPO INTO WA_EKPO.
concatenate wa_ekko-ebeln wa_ekpo-ebelp into v_item.
    CALL FUNCTION 'WRITE_FORM'
     EXPORTING
       ELEMENT                        = 'ITEM'
       WINDOW                         = 'MAIN'
EXCEPTIONS
   ELEMENT                        = 1
   FUNCTION                       = 2
   TYPE                           = 3
   UNOPENED                       = 4
   UNSTARTED                      = 5
   WINDOW                         = 6
   BAD_PAGEFORMAT_FOR_PRINT       = 7
   SPOOL_ERROR                    = 8
   CODEPAGE                       = 9
   OTHERS                         = 10
    IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
ENDLOOP.
&--write form for vendor details--
READ TABLE IT_LFA1 INTO WA_LFA1 INDEX 1.
CALL FUNCTION 'WRITE_FORM'
   EXPORTING
     ELEMENT                        = 'VENDOR'
     WINDOW                         = 'ADDRESS'
   EXCEPTIONS
     ELEMENT                        = 1
     FUNCTION                       = 2
     TYPE                           = 3
     UNOPENED                       = 4
     UNSTARTED                      = 5
     WINDOW                         = 6
     BAD_PAGEFORMAT_FOR_PRINT       = 7
     SPOOL_ERROR                    = 8
     CODEPAGE                       = 9
     OTHERS                         = 10.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
&--write form for grand total--
CALL FUNCTION 'WRITE_FORM'
EXPORTING
    WINDOW                         = 'TOTAL'
EXCEPTIONS
   ELEMENT                        = 1
   FUNCTION                       = 2
   TYPE                           = 3
   UNOPENED                       = 4
   UNSTARTED                      = 5
   WINDOW                         = 6
   BAD_PAGEFORMAT_FOR_PRINT       = 7
   SPOOL_ERROR                    = 8
   CODEPAGE                       = 9
   OTHERS                         = 10
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
&--close form--
CALL FUNCTION 'CLOSE_FORM'
   EXCEPTIONS
     UNOPENED                       = 1
     BAD_PAGEFORMAT_FOR_PRINT       = 2
     SEND_ERROR                     = 3
     SPOOL_ERROR                    = 4
     CODEPAGE                       = 5
     OTHERS                         = 6
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*&      Form get_data_from_ekko
FORM GET_DATA_FROM_EKKO .
SELECT EBELN
         BUKRS
         AEDAT
         ERNAM
         BSTYP
         LIFNR
      FROM EKKO INTO TABLE IT_EKKO WHERE EBELN = P_PURDOC.
ENDFORM.                    " get_data_from_ekko
*&      Form get_data_from_lfa1
FORM GET_DATA_FROM_LFA1 .
IF NOT IT_EKKO[] IS INITIAL.
    SELECT LIFNR
           NAME1
           LAND1
           ORT01
           REGIO
           FROM LFA1 INTO TABLE IT_LFA1 FOR ALL ENTRIES IN IT_EKKO WHERE
                LIFNR = IT_EKKO-LIFNR.
ENDIF.
ENDFORM.                    " get_data_from_lfa1
*&      Form get_data_from_ekpo
FORM GET_DATA_FROM_EKPO .
IF NOT IT_EKKO[] IS INITIAL.
    SELECT EBELN
           EBELP
           LOEKZ
           AEDAT
           MATNR
           NETWR
           FROM EKPO INTO TABLE IT_EKPO
           WHERE EBELN = P_PURDOC.
ENDIF.
ENDFORM.                    " get_data_from_ekpo

How to add new fields on output list of ME5A(Purchase Requisitions)

Hi Friends,
I have to do a task to add a new field ABC Indicator (MARC-MAABC) on the output list of ME5A. IS there any standard way to to this or do I have to copy ME5A to ZME5A and do? Please advice.
Apprecaite your suggestions ont his thread.
Thanks,
Harry

Hi,
Already there are some ENHANCEMENT spots are available in the program RM06BA00.. check if you can use them to add your logic to get the new field...

Regarding rental object-I want to add some fields in output list?

Hi,
I am creating Ze program of transaction REISROOC.I want to add some fields in the output list .
here logical database is used & for adding some fields i need to write Select query.
how n where should i add this query?
can anyone help me????
Thanks,
vaishali

Solved
Edited by: vaishali patil on Mar 2, 2009 1:32 PM

MB51 - Add a field in output list

We changed the layout of MB51 to add, in the output screen (ALV list), the fields: MSEG-ANLN1 (main asset number), MSEG-ANLN2 (asset subnumber).
The customer also wants to have the field ANLA-MCOA1 (asset description).
How do we add? Maybe there are a BADI or UserExit for customize the program RM07DOCS. Perhaps it is better to write a custom program Z_RM07DOCS (changing the standard program), or change the view V_MMIM_REP_CUST, adding the missing field.
Please help: which path to take and how?
Serena

Hi
See SAP Note 357187 - MB51: Fields in field catalog / selection screen
Regards
Eduardo

Add field TIDNR to list edit PM reports

Hi,
We have a requirement to add field TIDNR (Technical Identification number) from ITOB table into several list edit PM reports (IW28/29/38/39/64 to 69)
I have read sap note [586523|https://websmp230.sap-ag.de/sap(bD1lbiZjPTAwMQ==)/bc/bsp/spn/sapnotes/index2.htm?numm=586523] but this relates to adding customer defined fields and amending output structures and as the above field is a Sap standard field is it possible someone could give me some advice on how this could be done.
Regards
Gary

Hi,
For IW28:
Create a custom append at the end of structure RIHQMEL_LIST.
Create an implicit enhancement in the SAP programmes that need the new field (that you will have to find out yourself)
Roy

How to add fields to output list of BP search

Similar Messages

Maybe you are looking for