T.code ME55

[Former Member]

Hi Experts ,

I want to know where exactly the ALV GRID DISPLAY Function Module has been called in the program of T.code ME55(RM06BF00) , Actually my requirement is to add one more field (available stock of the material ) in the ALV Output of the T.code ME55 . I tried to find the field catalogue in the prog. RM06BF00 , but could'nt find it anywhere in the prog. Then I copied the prog. into a Z Report and after executing the Z report in the Selection screen I entered Release Code = G3 and Scope of List = ALV .

But an exit message comes saying ' Scope of list ALV not defined (please correct)' . However for another scope of list it is coming . Plese help .

Thanks ,

Suvendu

[Former Member]

Hi,

The ALV is found in the BADI .. FORCE_ALV_ME55 , check the method IF_FORCE_ALV~FORCE_ALV .

Check for where used list of 'p_alv' in the program .

Regards,

Srini.

[Former Member]

Hello,

You were not able to find ALV Function Module in your program RM06BF00 because it is not present it that. In RM06BF00 , at line 642 PERFORM calls the form SUBMIT of program SAPFM06B , which again calls the report RM06BL00 using Submit.

Now again in PAI in RM06BL00 , for ALV Display Function Module call is being made to FORM UCOMM_LOG1 of include FM06BF02_UCOMM_MARK program SAPFM06B.

[Former Member]

Hi GBulani ,

Thanks for ur reply , But I have a doubt , that this ALV contains only 5 fields in the catalogue , But the actual output contains many fields in the catalogue . Can u help with that ?

Edited by: suvendu.chk on May 24, 2011 7:13 AM

Edited by: suvendu.chk on May 24, 2011 9:16 AM

[Former Member]

thats working

Edited by: suvendu.chk on Sep 16, 2011 3:22 PM

[Former Member]

&----

---

*& Report ZBREAKDOWN

*&

&----

---

*&

*&

&----

---

REPORT ZBREAKDOWN NO STANDARD PAGE HEADING..

tables: CRHD, QMEL, QMFE, QMIH, QMUR, TQ80_T, TQ15T, QPGT, QPGR, t001w.

type-pools slis.

data : it_list type slis_t_listheader with header line,

gt_evnt type slis_t_event with header line.

data : begin of outstand_wa occurs 0,

********Work Center Header

OBJTY LIKE CRHD-OBJTY , " Object types of the CIM resource

OBJID LIKE CRHD-OBJID , " Object ID of the resource

ARBPL LIKE CRHD-ARBPL , " Work center

WERKS like CRHD-WERKS , " Plant

VERWE LIKE CRHD-VERWE , " Work center cat.

VERAN LIKE CRHD-VERAN , " Person responsible for the work center

*********Quality Notification

CROBJTY LIKE QMEL-CROBJTY , " Object types of the CIM resource

ARBPLn LIKE QMEL-ARBPL , " Object ID of the Work Center

QMNUM LIKE QMEL-QMNUM , " Notification No

QMART LIKE QMEL-QMART , " Notification Type

QMTXT LIKE QMEL-QMTXT , " Short Text

QMDAT LIKE QMEL-QMDAT , " Date of Notification

AUFNR LIKE QMEL-AUFNR , " Order Number

**********Notification type texts

QMARTX LIKE TQ80_T-QMARTX , " Notification Type Texts

*********Quality notification - items

FEKAT LIKE QMFE-FEKAT , " Catalog Type - Problems/Defects

FEGRP LIKE QMFE-FEGRP , " Code Group - Problem

FECOD LIKE QMFE-FECOD , " Problem or Damage Code

OTKAT LIKE QMFE-OTKAT , " Catalog Type - Object Parts

OTGRP LIKE QMFE-OTGRP , " Code Group - Object Parts

KOSTL LIKE QMFE-KOSTL , " Cost Center

FETXT LIKE QMFE-FETXT , " Notification Item Short Text

ERNAM LIKE QMFE-ERNAM , " Name of Person who Created the Object

ERDAT LIKE QMFE-ERDAT , " Date on Which Record Was Created

AENAM LIKE QMFE-AENAM , " Name of Person Who Changed Object

AEDAT LIKE QMFE-AEDAT , " Changed On

*****Inspection catalog type index

SPRACHE LIKE TQ15T-SPRACHE , " Language Key

KATALOGART LIKE TQ15T-KATALOGART , " Catalog

KATALOGTXT LIKE TQ15T-KATALOGTXT , " Catalog Text

**********Code group texts

CODEGRUPPE LIKE QPGT-CODEGRUPPE , " Code Group

KURZTEXT LIKE QPGT-KURZTEXT , " Short Description of the Code Group

**********Inspection catalog code groups

*KURZTEX LIKE QPGR-KURZTEXT , "

*********Quality message - maintenance data excerpt

MSAUS LIKE QMIH-MSAUS , " Breakdown Indicator

AUSVN LIKE QMIH-AUSVN , " Start of Malfunction (Date)

AUSBS LIKE QMIH-AUSBS , " End of Malfunction (Date)

AUZTV LIKE QMIH-AUZTV , " Start of Malfunction (Time)

AUZTB LIKE QMIH-AUZTB , " End of Malfunction (Time)

AUSZT LIKE QMIH-AUSZT , " Breakdown Duration

INGRP LIKE QMIH-INGRP , " Planner Group for Customer Service and Plant Maintenance

*********Quality notification - causes

URTXT LIKE QMUR-URTXT , " Cause Text

URKAT LIKE QMUR-URKAT , " Catalog Type - Causes

URGRP LIKE QMUR-URGRP , " Code Group - Causes

URCOD LIKE QMUR-URCOD , " Cause Code

*********Person responsible for the work center

KTEXT LIKE TC24-KTEXT , " NAME OF THE PERSON RESP.

*****Plants/Branches

stras like t001w-stras ,

pstlz like t001w-pstlz ,

adrnr like t001w-adrnr ,

ort01 LIKE t001w-ort01 ,

BIND(3),

KATALOG(40),

ddiff TYPE p,

tdiff TYPE p DECIMALS 2,

d3 type p,

t3 type minutes,

m_break type sy-uzeit,

t4(16) type p,

t6 type sy-tabix,

t7 type swl_pm_cvh-duration,

t5 type swl_pm_cvh-duration,

end of outstand_wa.

*data : outstand_hd type standard table of outstand_wa initial size 0 with header line.

data : tab_etab type standard table of etab,

wa_etab type etab.

DATA: is_layout TYPE slis_layout_alv.

DATA: M_TIME TYPE SY-UZEIT VALUE 24.

data: l_start type t,

l_end type t,

l_startdate type d,

l_enddate type d,

l_hours type p decimals 2.

*DATA : DATE1 TYPE SY-DATUM,

• TIME1 TYPE SY-UZEIT,

• DATE2 TYPE SY-DATUM,

• TIME2 TYPE SY-UZEIT.

selection-screen begin of block plant with frame title text-001.

select-options : m_plant for CRHD-WERKS obligatory . " Plant

select-options : m_work for CRHD-ARBPL . " Work center

select-options : m_catg for CRHD-VERWE . " Work center cat.

select-options : m_pern for CRHD-VERAN . " Person responsible for the work center

select-options : m_type for QMEL-QMART . " Notification Type

select-options : m_date for QMEL-QMDAT obligatory. " Date of Notification

select-options : m_ordr for QMEL-AUFNR . " Order Number

select-options : m_cost for QMFE-KOSTL . " Cost Center

selection-screen end of block plant.

selection-screen begin of block radi with frame title text-004.

*parameters list radiobutton group rad1.

parameters grid radiobutton group rad1.

parameters alv radiobutton group rad1.

selection-screen end of block radi.

data: fieldcat type slis_t_fieldcat_alv .

select CRHD_{OBJTY CRHD}OBJID CRHD_{ARBPL CRHD}WERKS CRHD_{VERWE CRHD}VERAN

QMEL_{CROBJTY QMEL}ARBPL QMEL_{QMNUM QMEL}QMART QMEL_{QMTXT QMEL}QMDAT QMEL~AUFNR

TQ80_T~QMARTX

QMFE_{FEKAT QMFE}FEGRP QMFE_{FECOD QMFE}OTKAT QMFE_{OTGRP QMFE}KOSTL QMFE_{FETXT QMFE}ERNAM QMFE_{ERDAT QMFE}AENAM QMFE~AEDAT

TQ15T_{SPRACHE TQ15T}KATALOGART TQ15T~KATALOGTXT

QPGT_{CODEGRUPPE QPGT}KURZTEXT

QMIH_{MSAUS QMIH}AUSVN QMIH_{AUSBS QMIH}AUZTV QMIH_{AUZTB QMIH}AUSZT QMIH~INGRP

QMUR_{URTXT QMUR}URKAT QMUR_{URGRP QMUR}URCOD

TC24~KTEXT

T001W_{STRAS T001W}PSTLZ T001W_{ADRNR T001W}ORT01

into table outstand_wa

from CRHD

INNER JOIN QMEL ON CRHD_{OBJID = QMEL}ARBPL

INNER JOIN QMFE ON QMEL_{QMNUM = QMFE}QMNUM

INNER JOIN QMIH ON QMFE_{QMNUM = QMIH}QMNUM

INNER JOIN QMUR ON QMIH_{QMNUM = QMUR}QMNUM

INNER JOIN TC24 ON CRHD_{VERAN = TC24}VERAN

INNER JOIN T001W ON CRHD_{WERKS = T001W}WERKS

INNER JOIN TQ80_T ON QMEL_{QMART = TQ80_T}QMART

INNER JOIN TQ15T ON QMFE_{FEKAT = TQ15T}KATALOGART

INNER JOIN QPGT ON QMFE_{FEGRP = QPGT}CODEGRUPPE

WHERE CRHD_{WERKS IN m_plant AND CRHD}ARBPL IN m_work AND CRHD_{VERWE IN m_catg AND CRHD}VERAN IN m_pern

AND QMEL_{QMART IN m_type AND QMEL}AUFNR IN m_ordr AND QMFE_{KOSTL IN m_cost AND TQ15T}SPRACHE = 'E' AND QMEL~QMDAT IN m_date.

*AND QMEL~QMDAT IN m_date

**AND CRHD_{ARBPL IN m_work AND CRHD}VERWE IN m_catg AND CRHD~VERAN IN m_pern

**AND QMEL_{QMART IN m_type AND QMEL}QMDAT IN m_date AND QMEL_{AUFNR IN m_ordr AND QMFE}KOSTL IN m_cost AND TQ15T~SPRACHE = 'E'.

*AND QPGT_{CODEGRUPPE = QMFE}OTGRP.

if sy-subrc = 0.

LOOP AT outstand_wa.

if outstand_wa-MSAUS = 'X'.

outstand_wa-BIND = 'YES'.

modify outstand_wa transporting BIND.

endif.

if outstand_wa-MSAUS = ' '.

outstand_wa-BIND = 'NO'.

modify outstand_wa transporting BIND.

endif.

if outstand_wa-URKAT = '1'.

outstand_wa-KATALOG = 'Characteristic Attributes'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '2'.

outstand_wa-KATALOG = 'Tasks'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '3'.

outstand_wa-KATALOG = 'Usage Decisions'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '4'.

outstand_wa-KATALOG = 'Events'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '5'.

outstand_wa-KATALOG = 'Causes'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '6'.

outstand_wa-KATALOG = 'Results of Defects'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '8'.

outstand_wa-KATALOG = 'Activities(QM)'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = '9'.

outstand_wa-KATALOG = 'Defect Types'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'A'.

outstand_wa-KATALOG = 'Activities(PM)'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'B'.

outstand_wa-KATALOG = 'Object Parts'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'C'.

outstand_wa-KATALOG = 'Overview of Damage'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'D'.

outstand_wa-KATALOG = 'Coding'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'E'.

outstand_wa-KATALOG = 'Defect Locations'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'F'.

outstand_wa-KATALOG = 'Decision(SPM Returns)'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'G'.

outstand_wa-KATALOG = 'Defect(SPM Returns)'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'H'.

outstand_wa-KATALOG = 'Effort(SPM Returns)'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

if outstand_wa-URKAT = 'I'.

outstand_wa-KATALOG = 'Follow-Up Activity(SPM Returns)'.

MODIFY outstand_wa TRANSPORTING KATALOG.

ENDIF.

ENDLOOP.

ENDIF.

• IF outstand_wa-MSAUS = 'X'.

• BIND = 'YES'.

• ELSEIF outstand_wa-MSAUS = ' '.

• BIND ='NO'.

• ENDIF.

*ENDLOOP.

*ENDIF.

case 'X'.

• WHEN LIST.

• PERFORM SIMPLE_LIST.

when grid.

perform writ_list.

perform calculation.

when alv.

perform writ_alv.

perform calculation.

• DATA: layout TYPE slis_layout_alv.

• PERFORM build_field_catalog.

• CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

• EXPORTING

• is_layout = layout

• it_fieldcat = fieldcat

• i_callback_top_of_page = 'TOP_OF_PAGE'

• it_events = gt_evnt[]

• TABLES

• t_outtab = outstand_wa.

endcase.

&----

---

*& Form BUILD_LAYOUT

&----

---

• Build layout for ALV grid report

----

---

*form build_layout.

• gd_layout-no_input = 'X'.

• gd_layout-colwidth_optimize = 'X'.

• gd_layout-totals_text = 'Totals'(201).

*gd_layout-totals_text = 'Totals'.

• Set layout field for row attributes(i.e. color)

• gd_layout-info_fieldname = 'LINE_COLOR'.

• gd_layout-totals_only = 'X'.

• gd_layout-f2code = 'DISP'. "Sets fcode for when double

• "click(press f2)

• gd_layout-zebra = 'X'.

• gd_layout-group_change_edit = 'X'.

• gd_layout-header_text = 'helllllo'.

[Former Member]

*endform. " BUILD_LAYOUT

&----

---

*& Form DATA_RETRIEVAL

&----

---

• Retrieve data form EKPO table and populate itab it_ekko

----

---

*form data_retrieval.

*data: ld_color(1) type c.

*

*select MENGE ERFMG BPMNG BSTMG

*up to 1 rows

• from MSEG

• into table tab_etab.

*

**Populate field with color attributes

*loop at tab_etab into wa_etab.

• Populate color variable with colour properties

• Char 1 = C (This is a color property)

• Char 2 = 3 (Color codes: 1 - 7)

• Char 3 = Intensified on/off ( 1 or 0 )

• Char 4 = Inverse display on/off ( 1 or 0 )

• i.e. wa_ekko-line_color = 'C410'

• ld_color = ld_color + 1.

*

• Only 7 colours so need to reset color value

• if ld_color = 8.

• ld_color = 1.

• endif.

• concatenate 'C' ld_color '10' into OUTSTAND_WA-line_color.

• wa_ekko-line_color = 'C410'.

• modify tab_etab from wa_etab.

*endloop.

*endform. " DATA_RETRIEVAL

&----

---

*& Form writ_list

&----

---

• text

----

---

form writ_list .

data: layout type slis_layout_alv.

perform build_field_catalog.

perform calculation.

call function 'REUSE_ALV_GRID_DISPLAY'

exporting

i_callback_program = sy-repid

i_background_id = 'ALV_BACKGROUND'

is_layout = layout

it_fieldcat = fieldcat

• i_callback_top_of_page = 'TOP_OF_PAGE'

it_events = gt_evnt[]

tables

t_outtab = outstand_wa.

endform. " WRIT_LIST

form writ_alv .

data: layout type slis_layout_alv.

perform build_field_catalog.

perform calculation.

call function 'REUSE_ALV_LIST_DISPLAY'

exporting

i_callback_program = sy-repid

• i_background_id = 'ALV_BACKGROUND'

is_layout = layout

it_fieldcat = fieldcat

• i_callback_top_of_page = 'TOP_OF_PAGE'

it_events = gt_evnt[]

tables

t_outtab = outstand_wa.

endform. " WRIT_LIST

FORM TOP_OF_PAGE.

CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'

EXPORTING

I_LOGO = 'ENJOYSAP_LOGO'

IT_LIST_COMMENTARY = SLIS_EV_TOP_OF_PAGE.

ENDFORM.

form build_field_catalog .

data: COL_NO type slis_fieldcat_alv-col_pos.

data: fc_tmp type slis_t_fieldcat_alv with header line.

clear: fieldcat, COL_NO. refresh: fieldcat.

*data: row_no type slis_fieldcat_alv-col_pos.

• data: fc_tmp type slis_t_fieldcat_alv with header line.

• clear: fieldcat,row_no.

• refresh: fieldcat.

COL_NO = COL_NO + 1.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Plant'.

• fc_tmp-col_pos = 0.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'WERKS'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '5'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Object Types(CIM Resource)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'OBJTY'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '23'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Object ID(Resource)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'OBJID'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '19'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Work Center'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'ARBPL'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '12'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Work Center Cat.'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'VERWE'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '17'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Person Resp.(Work Center)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'VERAN'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '22'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Person Resp.Name.(Work Center)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'KTEXT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '40'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Object Created By'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'ERNAM'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '12'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Date'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'ERDAT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '8'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Object Changed By'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'AENAM'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '12'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Chng. Date'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'AEDAT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

• fc_tmp-key = 'X'.

fc_tmp-outputlen = '8'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Notification No'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'QMNUM'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '16'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Notification Type'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'QMART'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '18'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Notification Short Text'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'QMTXT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '40'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Notification type texts'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'QMARTX'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '20'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Date of Notification'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'QMDAT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '21'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Order Number'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'AUFNR'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '13'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Catalog Type(Problems/Defects)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'FEKAT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '31'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Catalog Text'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'KATALOGTXT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '31'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Code Group(Problem)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'FEGRP'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '20'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Code Group(Text)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'KURZTEXT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '40'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Problem/Damage Code'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'FECOD'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '20'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Notification Item Short Text'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'FETXT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '40'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Catalog Type(Object Parts)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'OTKAT'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '27'.

append fc_tmp to fieldcat.

clear: fc_tmp.

fc_tmp-reptext_ddic = 'Code Group(Object Parts)'.

fc_tmp-col_pos = COL_NO.

fc_tmp-fieldname = 'OTGRP'.

fc_tmp-tabname = 'OUTSTAND_WA'.

fc_tmp-outputlen = '25'.

append fc_tmp to fieldcat.

• clear: fc_tmp.

• fc_tmp-reptext_ddic = 'Code Group(Object Parts Txt)'.

[Former Member]

...Thanks all

Edited by: suvendu.chk on Sep 16, 2011 4:14 PM

[Former Member]

Hi,

I have the same problem, I have to add some extra field in the layout of ME55 alv.

So i just created a copy of standard program.

and when i am trying to run.

It is showing define the scope of alv.

Please help me out.