topic Re: alv report in Application Development and Automation Discussions

alv report

Former Member — Thu, 19 Jun 2008 09:24:19 GMT

hi experts,

i am doing one report for this i have get top-of-page.

i am using below code:

FORM dispaly_data .

*data: g_repid type sy-repid.

g_repid = sy-repid.

CLEAR wa_layout.

wa_layout-zebra = 'X'.

wa_layout-colwidth_optimize = 'X'.

CLEAR wa_events.

Call the grid function module

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_callback_program = sy-repid

is_layout = wa_layout

it_fieldcat = it_fieldcat

IT_EXCLUDING =
IT_SORT =

i_default = 'X'

i_save = 'A'

i_callback_html_top_of_page = 'SUB_TOP_OF_PAGE'

i_html_height_top = 8

is_variant = g_variant

IT_EVENTS =

TABLES

t_outtab = it_final[]

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. " IF sy-subrc <> 0

ENDFORM. " dispaly_data

&----

*& Form sub_top_of_page

&----

text

----

-->TOP text

----

FORM sub_top_of_page USING top TYPE REF TO cl_dd_document .

*& Align output text column

CALL METHOD top->add_gap

EXPORTING

width = 180.

Write text

CALL METHOD top->add_text

EXPORTING

text = text-028

sap_style = 'HEADING'.

Add new-line

CALL METHOD top->new_line.

but in the output i am not getting heding of report .

pl, correct if any mistake of coding.

reward points.

thanks.

Re: alv report

GauthamV — Thu, 19 Jun 2008 09:28:26 GMT

hi,

check this sample report to get top of page.

report ZMAT.

Data Types

type-pools: slis.

types: begin of tp_data,

matnr like mara-matnr,

mtart like mara-mtart,

mbrsh like mara-mbrsh,

matkl like mara-matkl,

meins like mara-meins,

spras like makt-spras,

maktx like makt-maktx,

end of tp_data,

tp_tbl_data type standard table of tp_data.

Constants

Data objects (variable declarations and definitions)

Report data to be shown.

data: it_data type standard table of tp_data.

Heading of the report.

data: t_heading type slis_t_listheader.

========================== Selection Screen ==========================

selection-screen: begin of block b1 with frame title text-t01.

DATA: w_aux_matnr like mara-matnr.

SELECT-OPTIONS s_matnr for w_aux_matnr .

DATA: w_aux_ersda like mara-ersda.

SELECT-OPTIONS s_ersda for w_aux_ersda .

DATA: w_aux_mtart like mara-mtart.

SELECT-OPTIONS s_mtart for w_aux_mtart .

*DATA: w_aux_matnr like makt-matnr.

*SELECT-OPTIONS s_matnr for w_aux_matnr .

DATA: w_aux_spras like makt-spras.

SELECT-OPTIONS s_spras for w_aux_spras .

selection-screen: end of block b1.

=========================== Event Blocks =============================

at selection-screen.

start-of-selection.

perform get_data using it_data.

end-of-selection.

perform build_alv using it_data t_heading.

=========================== Subroutines ==============================

&----

*& Form get_data

&----

Gets the information to be shown in the report.

----

form get_data using t_data type tp_tbl_data.

SELECT k~spras

m~matnr

m~mtart

m~mbrsh

m~matkl

m~meins

k~maktx

INTO CORRESPONDING FIELDS OF TABLE t_data

FROM mara as m

inner join makt as k on m_{matnr = k}matnr

WHERE m~matnr in s_matnr

AND m~ersda in s_ersda

AND m~mtart in s_mtart

AND k~matnr in s_matnr

AND k~spras in s_spras

endform. " get_data

&----

*& Form build_alv

&----

Builds and display the ALV Grid.

----

form build_alv using t_data type tp_tbl_data

t_heading type slis_t_listheader.

ALV required data objects.

data: w_title type lvc_title,

w_comm type slis_formname,

w_status type slis_formname,

x_layout type slis_layout_alv,

t_event type slis_t_event,

t_fieldcat type slis_t_fieldcat_alv,

t_sort type slis_t_sortinfo_alv.

refresh t_fieldcat.

refresh t_event.

refresh t_sort.

clear x_layout.

clear w_title.

Field Catalog

perform set_fieldcat2 using:

1 'SPRAS' 'SPRAS' 'MAKT' space space space space space space space space