Re: alv report

Former Member · ‎2007 May 08

can sombody help me in displaying alv report

i want to have a display in way eg

************************************************

pernr fatherNa

empna

desig

************************************

1 ram

mohan

softwareeng

***********************************

2 madhvi

rajiv

sap

*************************************

so by this i mean that in one column three or any required number of feilds should be printed.

ie in one row of the column three things to be printed

dev_parbutteea · ‎2007 May 08

use <b>write</b> statements directly or <b>write at</b>

dev_parbutteea · ‎2007 May 08

in a loop obviously

Former Member · ‎2007 May 08

how can you use write in alv report.

Former Member · ‎2007 May 08

wat i want to do is my internal table itab is pointing to eg itab-name now in this field i want to print empname, fathers name and his designation. so how to do it

dev_parbutteea · ‎2007 May 08

Hi,

Instead of using FM like REUSE_ALV_GRID_DISPLAY or REUSE_ALV_LIST_DISPLAY, you can use write statements directly also!

dev_parbutteea · ‎2007 May 08

HI,

is this wat u want

pernr fatherNa

ram madhvi
empna
mohan rajiv
desig
softwareeng sap

Former Member · ‎2007 May 08

hi Sooness, yes i want to display three information abt a person in the same field catalog. wat i mean is that i want to display all the three info of the person his name designation and fathers name in the same fieldcatalog.

what i mean is i want to print an alv report in that i want to print more thn three feilds of an itab in one column only by this i mean that i want to print a persons name, designation and fathers name in one feildcatalog of alv ie details.

eg in fieldcatalog : details

*****

1 madhvi

rajiv

sap cons

**************

2 raj

mohan

software engg

*******************

so i want all these three details in one feildcatalog. can this be done in alv report. please reply me as soon as possible.

Former Member · ‎2007 May 08

reply fast

dev_parbutteea · ‎2007 May 08

hi,

*****

1 madhvi

rajiv

sap cons

**************

2 raj

mohan

software engg

*******************

Is this the only thing that u have to display on ur screen

Former Member · ‎2007 May 10

hi madhvi

if you include those in field catalog like this below,

d_fieldcat_wa-fieldname ='xxx'.

d_fieldcat_wa-seltext_l = 'name'.

append d_fieldcat_wa.

clear d_fieldcat_wa.

if u give like this u wil get output as

ram mohan softwrae but not like wat u expect

so you can just use write stmt but in alv it is not possible...

REWARD PLEASE...!!!

Former Member · ‎2007 Dec 06

I tried to emulate your requirement. In the field catalog I changed the row_pos from 1 to 3 (which is the limitation in this case) and kept the col_pos constant so that it be displayed in one column. However I get a information message stating "Multiple lines are only supported for printing and print view".

The program which I tried is as below:

&----

*& Report ZRAJALV_TEST3 *

*& *

&----

*& Program to display information of three fields in one column but *

*& different rows *

&----

REPORT ZRAJALV_TEST4ROWDISP.

type-pools: slis.

tables: SFLIGHT.

*

*data: begin of it_mara occurs 0 ,

CARRID like SFLIGHT-CARRID,
CONNID LIKE SFLIGHT-CARRID,
end of it_mara.

**data:it_mara like mara occurs 0 with header line.

data: begin of it_mara occurs 0,

matnr like mara-matnr,

mtart like mara-mtart,

matkl like mara-matkl,

groes like mara-groes,

blanz like mara-blanz,

end of it_mara.

data: i_fldcat type slis_t_fieldcat_alv,

G_REPID LIKE SY-REPID,

wa_fldcat type slis_fieldcat_alv.

INITIALIZATION.

G_REPID = SY-REPID.

select matnr mtart matkl groes blanz from mara into corresponding fields of table it_mara.

END-OF-SELECTION.

clear wa_fldcat.

wa_fldcat-row_pos = 1.

wa_fldcat-col_pos = 1.

wa_fldcat-fieldname = 'MATNR'.

wa_fldcat-tabname = 'it_mara'.

wa_fldcat-outputlen = 18.

wa_fldcat-emphasize = 'C111'.

wa_fldcat-hotspot = 'X'.

wa_fldcat-seltext_l = 'Material Co.'.

wa_fldcat-do_sum = space.

append wa_fldcat to i_fldcat.

clear wa_fldcat.

wa_fldcat-row_pos = 2.

wa_fldcat-col_pos = 1.

wa_fldcat-fieldname = 'MTART'.

wa_fldcat-tabname = 'it_mara'.

wa_fldcat-outputlen = '13'.

wa_fldcat-emphasize = 'C210'.

wa_fldcat-just = 'L'.

wa_fldcat-seltext_l = 'Material Type'.

wa_fldcat-do_sum = space.

append wa_fldcat to i_fldcat.

clear wa_fldcat.

wa_fldcat-row_pos = 3.

wa_fldcat-col_pos = 1.

wa_fldcat-fieldname = 'MATKL'.

wa_fldcat-tabname = 'it_mara'.

wa_fldcat-outputlen = '15'.

wa_fldcat-emphasize = space.

wa_fldcat-just = 'L'.

wa_fldcat-seltext_l = 'Material Group'.

wa_fldcat-do_sum = space.

append wa_fldcat to i_fldcat.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER = 'X'
I_BUFFER_ACTIVE = 'X '

I_CALLBACK_PROGRAM = G_REPID

I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_CALLBACK_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '

I_GRID_TITLE = 'Practice ALV Grid Display'

I_GRID_SETTINGS =
IS_LAYOUT =

IT_FIELDCAT = i_fldcat

IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS =
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
IT_ALV_GRAPHICS =
IT_HYPERLINK =
IT_ADD_FIELDCAT =
IT_EXCEPT_QINFO =
I_HTML_HEIGHT_TOP =
I_HTML_HEIGHT_END =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =

TABLES

t_outtab = it_mara

EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2

.

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Former Member · ‎2007 Dec 07

Hi

Try with this

*&---------------------------------------------------------------------*
*& Report  ZCHAR11
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zchar11.




TABLES: mara,ausp,klah.


TYPE-POOLS: slis.
DATA : pos TYPE i VALUE 1.
DATA:gs_layout TYPE slis_layout_alv,
     g_repid LIKE sy-repid,
     g_grid_title TYPE lvc_title.

DATA:g_tabname TYPE slis_tabname VALUE 'it_charlist',
g_save .

DATA:gs_variant LIKE disvariant.
DATA:ls_fieldcat TYPE slis_fieldcat_alv.
DATA: it_sort TYPE slis_t_sortinfo_alv.  " Sort table
DATA:gt_fieldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE.
g_save = 'A'.

DATA : st_sctms LIKE sctms .
DATA : v_index LIKE sy-index .
DATA : it_clx2f LIKE clx2f OCCURS 0 WITH HEADER LINE .
DATA : it_clx2v LIKE clx2v OCCURS 0 WITH HEADER LINE .


DATA : BEGIN OF itab_chars_var OCCURS 0 ,
         atinn  LIKE  ausp-atinn,
         atnam  LIKE  cabn-atnam,
         atbez  LIKE  cabnt-atbez,
         atwrt  LIKE  ausp-atwrt,
       END   OF itab_chars_var .


DATA: itab LIKE STANDARD TABLE OF itab_chars_var.

DATA : xindex LIKE sy-index ,
     xindex_var LIKE sy-index .
DATA : it_kl  LIKE klvmera OCCURS 0 WITH HEADER LINE .
DATA : it_apval LIKE api_vali OCCURS 0 WITH HEADER LINE .

DATA : BEGIN OF it_apval_sel_var OCCURS 0 ,
         sel .
        INCLUDE STRUCTURE api_vali .
DATA : END OF it_apval_sel_var .



DATA: BEGIN OF wa_mara,
        matnr LIKE mara-matnr,
        cuobf LIKE ausp-objek,
      END OF wa_mara.

DATA: int_mara LIKE STANDARD TABLE OF wa_mara.

DATA: BEGIN OF wa_ausp,
       objek LIKE ausp-objek,
       atinn LIKE ausp-atinn,
       atwrt LIKE ausp-atwrt,
      END OF wa_ausp.

DATA: int_ausp LIKE STANDARD TABLE OF wa_ausp.

DATA: BEGIN OF wa_final,
         matnr LIKE mara-matnr,
         des(15) TYPE c,
         atinn LIKE ausp-atinn,
         atnam  LIKE  cabn-atnam,
         atwrt LIKE ausp-atwrt,
        END OF wa_final.


DATA: BEGIN OF it_final OCCURS 0,
         matnr LIKE mara-matnr,
         atnam  LIKE  cabn-atnam,
         atwrt LIKE ausp-atwrt,
        END OF it_final.


DATA: int_final LIKE STANDARD TABLE OF wa_final WITH HEADER LINE.

DATA: BEGIN OF wa_charname,

*        matnr LIKE mara-matnr,
*        costpr LIKE konp-kbetr,
*        mrp LIKE konp-kbetr,
*        salespr LIKE konp-kbetr,
        atnam01 LIKE cabn-atnam,
        atnam02 LIKE cabn-atnam,
        atnam03 LIKE cabn-atnam,
        atnam04 LIKE cabn-atnam,
        atnam05 LIKE cabn-atnam,
        atnam06 LIKE cabn-atnam,
        atnam07 LIKE cabn-atnam,
        atnam08 LIKE cabn-atnam,
        atnam09 LIKE cabn-atnam,
        atnam10 LIKE cabn-atnam,
        atnam11 LIKE cabn-atnam,
        atnam12 LIKE cabn-atnam,
        atnam13 LIKE cabn-atnam,
        atnam14 LIKE cabn-atnam,
        atnam15 LIKE cabn-atnam,
        atnam16 LIKE cabn-atnam,

      END OF wa_charname.

*DATA: it_charname LIKE STANDARD TABLE OF wa_charname WITH HEADER LINE.



DATA: BEGIN OF wa_charlist,

  matnr LIKE mara-matnr,
  costpr LIKE konp-kbetr,
  mrp LIKE konp-kbetr,
  salespr LIKE konp-kbetr,
  char01 LIKE ausp-atwrt,
  char02 LIKE ausp-atwrt,
  char03 LIKE ausp-atwrt,
  char04 LIKE ausp-atwrt,
  char05 LIKE ausp-atwrt,
  char06 LIKE ausp-atwrt,
  char07 LIKE ausp-atwrt,
  char08 LIKE ausp-atwrt,
  char09 LIKE ausp-atwrt,
  char10 LIKE ausp-atwrt,
  char11 LIKE ausp-atwrt,
  char12 LIKE ausp-atwrt,
  char13 LIKE ausp-atwrt,
  char14 LIKE ausp-atwrt,
  char15 LIKE ausp-atwrt,
  char16 LIKE ausp-atwrt,

END OF wa_charlist.

DATA: it_charlist LIKE STANDARD TABLE OF wa_charlist WITH HEADER LINE.


DATA: BEGIN OF wa_output,

        matnr LIKE mara-matnr,
        atnam01 LIKE cabn-atnam,
        char01 LIKE ausp-atwrt,
        atnam02 LIKE cabn-atnam,
        char02 LIKE ausp-atwrt,
        atnam03 LIKE cabn-atnam,
        char03 LIKE ausp-atwrt,
        atnam04 LIKE cabn-atnam,
        char04 LIKE ausp-atwrt,
        atnam05 LIKE cabn-atnam,
        char05 LIKE ausp-atwrt,
        atnam06 LIKE cabn-atnam,
        char06 LIKE ausp-atwrt,

END OF wa_output.
DATA: it_output LIKE STANDARD TABLE OF wa_output WITH HEADER LINE.




SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.


SELECT-OPTIONS: s_matnr FOR mara-matnr OBLIGATORY.

PARAMETER: s_matkl LIKE mara-matkl OBLIGATORY.

SELECTION-SCREEN END OF BLOCK b1.

START-OF-SELECTION.

  SELECT matnr
         cuobf
         FROM mara
     INTO TABLE int_mara
     WHERE matnr IN s_matnr AND matkl = s_matkl.

  IF NOT int_mara[] IS INITIAL.
    SORT int_mara BY cuobf.
    SELECT objek
           atinn
           atwrt
           FROM ausp
      INTO TABLE int_ausp
      FOR ALL ENTRIES IN int_mara
      WHERE objek = int_mara-cuobf.
  ENDIF.


  SELECT SINGLE * FROM klah
         WHERE class EQ s_matkl .
  xindex = 1 .
  xindex_var = 1 .


  CALL FUNCTION 'CLEX_GET_CLASS_FEATURES_VALUES'
    EXPORTING
      activity                      = 'P'
      classnumber                   = klah-clint
      classtype                     = klah-klart
      display_scope_in              = st_sctms
      language                      = sy-langu
    TABLES
      features                      = it_clx2f
      values                        = it_clx2v
    EXCEPTIONS
      not_authorized_classification = 1
      not_authorized_maintenance    = 2
      not_authorized_selection      = 3
      no_features_defined           = 4
      OTHERS                        = 5.

  LOOP AT it_clx2f .
    itab_chars_var-atinn = it_clx2f-atinn .
    itab_chars_var-atnam = it_clx2f-atnam .
    itab_chars_var-atbez = it_clx2f-atbez .
    APPEND itab_chars_var .
  ENDLOOP .


  CALL FUNCTION 'CLME_FEATURE_ATTR_OF_CLASS_INH'
    EXPORTING
      class           = klah-class
      classtype       = klah-klart
      language        = sy-langu
      key_date        = sy-datum
      with_values     = 'X'
    TABLES
      tfeatures       = it_kl
      tvalues         = it_apval
    EXCEPTIONS
      class_not_found = 1
      no_authority    = 2
      OTHERS          = 3.

  LOOP AT it_kl .
    itab_chars_var-atinn = it_kl-atinn .
    itab_chars_var-atnam = it_kl-atnam .
    itab_chars_var-atbez = it_kl-atbez .
    APPEND itab_chars_var .
  ENDLOOP .

  SORT itab_chars_var.
  LOOP AT itab_chars_var.
    int_final-atinn = itab_chars_var-atinn.
    int_final-atnam  = itab_chars_var-atnam.
    APPEND int_final.
  ENDLOOP.


  SORT int_mara BY matnr.
  SORT int_mara BY matnr.
  SORT int_ausp BY objek atinn.
  SORT int_final BY atinn.

  LOOP AT int_mara INTO wa_mara.

    CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
      EXPORTING
        input  = wa_mara-matnr
      IMPORTING
        output = wa_mara-matnr.

    LOOP AT  int_final.
      READ TABLE int_ausp INTO wa_ausp WITH KEY objek = wa_mara-cuobf
                                                atinn = int_final-atinn.
      IF sy-subrc EQ 0.
        it_final-matnr = wa_mara-matnr.
        it_final-atnam = int_final-atnam.
        it_final-atwrt = wa_ausp-atwrt.
        APPEND it_final.
        CLEAR it_final.
      ELSE.
        it_final-matnr = wa_mara-matnr.
        it_final-atnam = int_final-atnam.

        APPEND it_final.
        CLEAR it_final.
      ENDIF.
    ENDLOOP.
  ENDLOOP.


********
  DATA: cnt(2) TYPE n.

  DATA : field(50).

  FIELD-SYMBOLS : <field>.



  LOOP AT itab_chars_var.

*  LOOP AT it_final.

    cnt = cnt + 01.

    CONCATENATE 'wa_charname-atnam' cnt INTO field .

    ASSIGN (field) TO <field> .
    IF sy-subrc EQ 0 .

      IF itab_chars_var-atnam IS NOT INITIAL.
        <field> = itab_chars_var-atnam.
      ENDIF.
    ENDIF .

*    APPEND it_charname.


  ENDLOOP.


  LOOP AT it_final.

    AT NEW matnr.

      CLEAR cnt.

      it_charlist-matnr = it_final-matnr.

*    it_charlist-costpr = it_final-matnr.
*
*    it_charlist-mrp = it_final-matnr.
*
*    it_charlist-salespr = it_final-matnr.

    ENDAT.


    cnt = cnt + 01.


    CONCATENATE 'it_charlist-char' cnt INTO field .

    ASSIGN (field) TO <field> .
    IF sy-subrc EQ 0 .
      <field> = it_final-atwrt.
    ENDIF .

    AT END OF matnr.

      APPEND it_charlist.

    ENDAT.

  ENDLOOP.



********

  PERFORM fieldcat_init USING gt_fieldcat[].

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
*     I_INTERFACE_CHECK                 = ' '
*     I_BYPASSING_BUFFER                = ' '
*     I_BUFFER_ACTIVE                   = ' '
     i_callback_program                = 'SY-REPID'
*     I_CALLBACK_PF_STATUS_SET          = ' '
*     I_CALLBACK_USER_COMMAND           = ' '
*     I_CALLBACK_TOP_OF_PAGE            = ' '
*     I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
*     I_CALLBACK_HTML_END_OF_LIST       = ' '
*     I_STRUCTURE_NAME                  =
*     I_BACKGROUND_ID                   = ' '
      i_grid_title                      = 'Characterstics of Article No'
*     I_GRID_SETTINGS                   =
     is_layout                         = gs_layout

     it_fieldcat                       = gt_fieldcat[]
*     IT_EXCLUDING                      =
*     IT_SPECIAL_GROUPS                 =
      it_sort                           = it_sort
*     IT_FILTER                         =
*     IS_SEL_HIDE                       =
     i_default                         = 'X'
     i_save                            = g_save
     is_variant                        = gs_variant
   TABLES
      t_outtab                          = it_charlist
*   EXCEPTIONS
*     PROGRAM_ERROR                     = 1
*     OTHERS                            = 2
            .
  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  FIELDCAT_INIT
**&---------------------------------------------------------------------
*
**       text
**----------------------------------------------------------------------
*
**      -->RT_FIELDCAT  text
**----------------------------------------------------------------------
*
*
*
*
FORM fieldcat_init
       USING rt_fieldcat TYPE slis_t_fieldcat_alv.

*  DATA : wa_sort TYPE slis_sortinfo_alv.
*  wa_sort-fieldname = 'MATNR'.
*  wa_sort-spos = 1.
*  wa_sort-up = 'X'.
*  APPEND wa_sort TO it_sort.
*
*
*  wa_sort-fieldname = 'ATNAM'.
*  wa_sort-spos = 2.
*  wa_sort-up = 'X'.
*  APPEND wa_sort TO it_sort.
*
*
*
*  wa_sort-fieldname = 'ATWRT'.
*  wa_sort-spos = 3.
*  wa_sort-up = 'X'.
*  APPEND wa_sort TO it_sort.
*
*
*  DATA : pos TYPE i VALUE 1.


  pos = pos + 1.
  CLEAR ls_fieldcat.
  ls_fieldcat-tabname       = g_tabname.
  ls_fieldcat-col_pos = pos.
  ls_fieldcat-seltext_l   = 'Article No'.
  ls_fieldcat-outputlen = 12.
  ls_fieldcat-fieldname     = 'MATNR'.
  ls_fieldcat-ref_fieldname = 'MATNR'.
  ls_fieldcat-ref_tabname   = 'IT_CHARLIST'.
  APPEND ls_fieldcat TO  rt_fieldcat.


  DATA :  field1(50), field2(50).
  FIELD-SYMBOLS :   <field1>, <field2>.

  DATA: cnt2(2) TYPE n.
  CLEAR: field1,field2.
  DO 20 TIMES.

    cnt2 = cnt2 + 01.

    CONCATENATE 'wa_charname-atnam' cnt2 INTO field1 .

    ASSIGN (field1) TO <field1> .

    IF <field1> IS NOT INITIAL.

      IF sy-subrc EQ 0 .
        CONCATENATE 'CHAR' cnt2 INTO field2 .
        ASSIGN (field2) TO <field2> .

        pos = pos + 1.
        CLEAR ls_fieldcat.
*      ls_fieldcat-tabname       = g_tabname.
        ls_fieldcat-col_pos = pos.
        ls_fieldcat-seltext_l = <field1>.
*  ls_fieldcat-seltext_l   = 'Internal characteristic'.
        ls_fieldcat-outputlen = 18.
        ls_fieldcat-fieldname = field2.
        ls_fieldcat-ref_fieldname = field2.
*    ls_fieldcat-fieldname     = <field1>.
*    ls_fieldcat-ref_fieldname = <field1>.
        ls_fieldcat-ref_tabname   = 'IT_CHARLIST'.
        APPEND ls_fieldcat TO  rt_fieldcat.


      ENDIF .
    ENDIF.






*    pos = pos + 1.
*    CLEAR ls_fieldcat.
*    ls_fieldcat-tabname       = g_tabname.
*    ls_fieldcat-col_pos = pos.
**  ls_fieldcat-seltext_l   = 'Internal characteristic'.
*    ls_fieldcat-outputlen = 18.
**    ls_fieldcat-fieldname     = <field1>.
**    ls_fieldcat-ref_fieldname = <field1>.
*    ls_fieldcat-ref_tabname   = 'IT_CHARLIST'.
*    APPEND ls_fieldcat TO  rt_fieldcat.

*  pos = pos + 1.
*  CLEAR ls_fieldcat.
*  ls_fieldcat-tabname       = g_tabname.
*  ls_fieldcat-col_pos = pos.
*  ls_fieldcat-seltext_l   = 'Characteristic Value'.
*  ls_fieldcat-outputlen = 18.
*  ls_fieldcat-fieldname     = 'ATWRT'.
*  ls_fieldcat-ref_fieldname = 'ATWRT'.
*  ls_fieldcat-ref_tabname   = 'INT_FINAL'.
*  APPEND ls_fieldcat TO  rt_fieldcat.

  ENDDO.

ENDFORM.                    "FIELDCAT_INIT

Regards

Pavan

Former Member · ‎2007 Dec 07

It can be done using alv list, but couldn't do using alv grids.

&----

*& Report ZRAJALV_TEST7 *

*& *

&----

*& *

&----

REPORT ZRAJALV_TEST7.

type-pools: slis.

tables: SFLIGHT.

*

*data: begin of it_mara occurs 0 ,

CARRID like SFLIGHT-CARRID,
CONNID LIKE SFLIGHT-CARRID,
end of it_mara.

**data:it_mara like mara occurs 0 with header line.

data: begin of it_mara occurs 0,

matnr like mara-matnr,

mtart like mara-mtart,

matkl like mara-matkl,

groes like mara-groes,

blanz like mara-blanz,

end of it_mara.

data: i_fldcat type slis_t_fieldcat_alv,

G_REPID LIKE SY-REPID,

wa_fldcat type slis_fieldcat_alv.

INITIALIZATION.

G_REPID = SY-REPID.

select matnr mtart matkl groes blanz from mara into corresponding fields of table it_mara.

END-OF-SELECTION.

clear wa_fldcat.

wa_fldcat-row_pos = 1.

wa_fldcat-col_pos = 1.

wa_fldcat-fieldname = 'MATNR'.

wa_fldcat-tabname = 'it_mara'.

wa_fldcat-outputlen = 18.

wa_fldcat-emphasize = 'C111'.

wa_fldcat-hotspot = 'X'.

wa_fldcat-seltext_l = 'Material Co.'.

wa_fldcat-do_sum = space.

append wa_fldcat to i_fldcat.

clear wa_fldcat.

wa_fldcat-row_pos = 2.

wa_fldcat-col_pos = 1.

wa_fldcat-fieldname = 'MTART'.

wa_fldcat-tabname = 'it_mara'.

wa_fldcat-outputlen = '13'.

wa_fldcat-emphasize = 'C210'.

wa_fldcat-just = 'L'.

wa_fldcat-seltext_l = 'Material Type'.

wa_fldcat-do_sum = space.

append wa_fldcat to i_fldcat.

clear wa_fldcat.

wa_fldcat-row_pos = 3.

wa_fldcat-col_pos = 1.

wa_fldcat-fieldname = 'MATKL'.

wa_fldcat-tabname = 'it_mara'.

wa_fldcat-outputlen = '15'.

wa_fldcat-emphasize = space.

wa_fldcat-just = 'L'.

wa_fldcat-seltext_l = 'Material Group'.

wa_fldcat-do_sum = space.

append wa_fldcat to i_fldcat.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = G_REPID

IT_FIELDCAT = i_fldcat

TABLES

t_outtab = it_mara

.

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

By Category

Related Content

Activity Groups

Industry Groups

Influence and Feedback Groups

Interest Groups

Location Groups

Customer Only Groups

Forums

Related Resources

Products

Learning and Support

About

My SAP Profile

My SAP Profile

alv report