Repeating values on top of every page

Hi,
I have two selected values, A en B. Want them to be displayed in two columns, grouped by the value of A. The header row is repeated on every page, but I want something more.
Following is what I want, below that is what I get.
A1 B1 (page1)
B2
B3
B4
A1 B5 (page2)
B6
B7
A1 B1 (page1)
B2
B3
B4
B5 (page2)
B6
B7
Any ideas ?

I have a similar requirement.
I need to print
A1 B1
........ B2
........ B3
........ B4
------------------------------- new page
A1 B5
........ B6
now A and B are two different gorups and both A1 and B1 should appear in the same row of the table.
Any ideas? Did you figure it out?
Edited by: user10234619 on Aug 11, 2009 8:47 AM
Edited by: user10234619 on Aug 11, 2009 8:48 AM

Similar Messages

Repeate header Template at top of every page

Hi experts,
How can i repeate a template at top of every page.
it contents hardcoded type column headings.
is there any way pl. help me.

Why not, add a secondary window at the top of the window and create the template inside that.
Don't post a question more than once in the forum.
Regards
Karthik D

What's with the banner ads on the top of every page Firefox opens up?

What's with the banner ads at the top of almost every page that my FF 8 opens? The previous versions didn't have them. [http://i4.photobucket.com/albums/y135/22639/Screenshot1.jpg Screenshot 1]
[http://i4.photobucket.com/albums/y135/22639/Screenshot2.jpg Screenshot 2]

Do a malware check with some malware scanning programs on the Windows computer. 
You need to scan with all programs because each program detects different malware. 
Make sure that you update each program to get the latest version of their databases before doing a scan. 
*http://www.malwarebytes.org/mbam.php - Malwarebytes' Anti-Malware
*http://www.superantispyware.com/ - SuperAntispyware
*http://www.microsoft.com/windows/products/winfamily/defender/default.mspx - Windows Defender: Home Page
*http://www.safer-networking.org/en/index.html - Spybot Search & Destroy
*http://www.lavasoft.com/products/ad_aware_free.php - Ad-Aware Free
See also:
*"Spyware on Windows": http://kb.mozillazine.org/Popups_not_blocked

How to print header lines at the top of every page with Alv list display?

Dear all,
I need a requirement with printing issue. A program list should be printed with the function reuse_alv_list_display.
The list has several pages and then can be printed but the header lines appear only first page when they printed. The other pages don't have header lines, they continue with the next record of the list remaining from previous page. I use the alv parameters as below:
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program       = l_repid
      i_callback_pf_status_set = 'ALV_PF_STATUS'
      is_layout                = ls_layo
      it_fieldcat              = lt_fcat
      i_default                = 'X'
      i_save                   = 'A'
      is_variant               = ls_variant
      it_events                = lt_events
    TABLES
      t_outtab                 = lt_data
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.
and lt_events as below:
ls_event-name = 'END_OF_LIST'.
ls_event-form = 'ALV_END_OF_LIST'.
APPEND ls_event TO lt_events.
ls_event-name = 'END_OF_PAGE'.
ls_event-form = 'ALV_END_OF_PAGE'.
APPEND ls_event TO lt_events.
ls_event-name = 'TOP_OF_LIST'.
ls_event-form = 'ALV_TOP_OF_LIST'.
APPEND ls_event TO lt_events.
ls_event-name = 'TOP_OF_PAGE'.
ls_event-form = 'ALV_TOP_OF_PAGE'.
APPEND ls_event TO lt_events.
So, how can I print header lines for every page?
Best Regards,

Hello Saba,
Your point might be very close to solution.
Because in the selection screen of the program there are two radio buttons, one of them visits 'REUSE_ALV_COMMENTARY_WRITE' function and the other doesn't. The one which visits has a problem with header liens in every page when printing. But I couldn't find out the solution yet.
reuse_alv_list_display uses 4 event and of course I call subroutine. There are end_of_list, end_of_page, top_of_list and top_of_page. I use in the subroutine for top_of_page:
CALL FUNCTION 'LVC_TRANSFER_TO_SLIS'
    EXPORTING
      it_fieldcat_lvc         = gt_fcat
    IMPORTING
      et_fieldcat_alv         = lt_fcat
    EXCEPTIONS
      it_data_missing         = 1
      it_fieldcat_lvc_missing = 2
      OTHERS                  = 3.
CALL FUNCTION 'REUSE_ALV_LIST_WIDTH_GET'
    EXPORTING
      it_fieldcat = lt_fcat
    IMPORTING
      e_width     = l_width.
WRITE l_reptx TO l_reptx CENTERED.
NEW-LINE.
WRITE: AT (l_width) l_reptx CENTERED.
SUBTRACT 10 FROM l_width.
WRITE: AT l_width sy-pagno RIGHT-JUSTIFIED.
    CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
      EXPORTING
        it_list_commentary       = lt_header
I_LOGO                   =
I_END_OF_LIST_GRID       =
Do you have other suggestions ?

How do I create a text box or form field on the top of every page of a pdf in XI Pro for titles?

I generate pdf content from another program and then in Acrobat XI Pro I want to add titles to each page.
I'm thinking I can use form fileds and duplicate across all pages but how do I make each form filed unique?
Or could i add a form field to a background and then apply the background to every page in the pdf?
thanks.

This type of thing is probably best done with a script, either by adding a uniquely named field to each page or by spawing a template page that contains just the form field (like your last idea). There's not a built-in method for doing this. If you add a blank page to the beginning of the document, create the field in the location you want, and make the page a template, you can run the following script in the interactive JavaScript console (Ctrl+J):
// Get a reference to the template
var t = getTemplate("Field");
// Spawn the template on each page, automatically renaming the fields
for (var i = 1; i < numPages; i += 1) {
t.spawn({nPage: i, bRename: true, bOverlay: true});
To run the code, select it all in the console and press Ctrl+Enter, or Enter on the numeric keypad.
To make a page a template in Acrobat 11, make sure you're on the page you want to make a template and select: Tools > Document Processing > Page Templates
and enter a name. I used a name of "Field" in the example above, but you can use anything.
To create a blank page, you can use the following script:
newPage({nPage: 0, nWidth: 8.5 * 72, nHeight: 11 * 72});
for an 8.5"x11" page. Adjust the numbers to match whatever your page size is. It will be added to the beginning of the document and you can then add the field and make it a template. Once the fields have been added, you can remove the template page.

How to repeat rows in numbers on every page

how to repeat rows in numbers on every page

Hi mitesh hirani,
Welcome to Apple Support Communities.
Do you mean repeat Header Rows for tables?
Menu > Print... > Print Setup (the panel on the right) > Repeat Table Headers
Regards,
Ian.

My cursor is not working on the top of every page i opens with firefox .reply soon

I am not able to click on top portion of every web page.I have been facing this problem since yesterday. first thought came to me was that it might be hardware problem but it is not since other browsers are working quite well.

The Yahoo! Toolbar extension has been reported to cause this issue.
*https://support.mozilla.com/kb/Troubleshooting+extensions+and+themes
You can keep an eye on this thread:
*[[/forums/contributors/707748]]

I just updated to the newest Firefox and now my Facebook is messed up: big white space at the top of every page and all left hand column content is in the middle of the page. :-(

I've turned off my non-essential add-ons and nothing seems to fix it. Any ideas?

If you have increased the minimum font size then try the default setting "none" as a high value can cause issues like you described.
*Tools > Options > Content : Fonts & Colors > Advanced > Minimum Font Size (none)
*Tools > Options > Content : Fonts & Colors > Advanced > [X] "Allow pages to choose their own fonts, instead of my selections above"
Reset the page zoom on pages that cause problems: View > Zoom > Reset (Ctrl+0 (zero); Cmd+0 on Mac)
*http://kb.mozillazine.org/Zoom_text_of_web_pages
You can use an extension to set a default font size and page zoom on web pages:
*Default FullZoom Level: https://addons.mozilla.org/firefox/addon/default-fullzoom-level/
*NoSquint: https://addons.mozilla.org/firefox/addon/nosquint/

How to add a image at the top of every pages of a pdf document

Hi all,
My problem is as follows. I have a .pdf document and I'm copying it to another and then I'm appending some new things to it. Now while adding new pdf contents I want an image to be added for every new pages added to the document. I tried using "document.getPageNumber()" here document is a Document object which is a part of "itext-1.3.1.jar". But "document.getPageNumber()" is returning 0 every time.
If anyone has the solution please help me out.
Regards,
turja

there is no cursor to be set, as you go adding
something in the pdf document those get added to that
document and if one page gets filled it adds new page
to it.If it says "current" page, then this implies that something is current with regards to something else. I'd like to know what "something else" is.

Group by Item Display on Every Page

Hello,
I have created a standard Table using the Table Wizard. Is it possible for the Group by Item to appear on every page? I am able to Repeat the Header Row on every page but not able to display the Group by Item if the data continues to multiple pages. I know this sounds simple but I have been looking at documents and online but have not had any success with this. Any help is appreciated, thanks.

Hey BIPuser,
This is exactly what I need, thanks alot. Can you tell me exactly what was done? I see that the I can select the Table Properties by the goup ROW by dept now and not the Item Name. I have to implement this to a few more templates and will definitely use in the future also. Looks great really.

Displaying dynamic data on every page of standard text

Hi All,
I m using standard text (created in SO10) in smartform . I want to display dynamic data on the top of every page of standard text.
Displaying the dynamic data is not the problem, but how would i know where is page finished(or started) as Preview in SO10 may not look the same as smartform output.
I dont want to do this manually by adjusting the size of window. Is there any other way to do the same??
Vanita.

Try to create a text in your SF and write the dynamic data.
To know in which page use &SFSY-PAGE&
this system fields may also be helpful for dynamic text on each page
&SFSY-COPYCOUNT0&   "COPY COUNTER( 0 = ORIGINAL, 1 = 1st COPY)
&SFSY-COPYCOUNT&   "COPY COUNTER( 1 = ORIGINAL, 2 = 1st COPY)
Still you can called DYNAMIC text through your standard text.. but place your conditions.
Regards,
SaiRam
Message was edited by:
        Sai Ram Reddy Neelapu
Message was edited by:
        Sai Ram Reddy Neelapu

I need page no's and top of page header to every page

Hi Experts,
i need page no's and top of page header to every page
to this report.
i took print outs it came only page number 1 to all the pages, after took prints it seems header to all the pages
but not displaying in output screen.
TYPE-POOLS: SLIS.
TABLES: MKPF,LFA1,MSEG,EKET,T001L,MAKT,S031,S032,MARA,LIPS,LIKP,T001W.
DATA FLAG TYPE I.
DATA : MENGE_RE LIKE MSEG-MENGE,
 MENGE_IS LIKE MSEG-MENGE,
 MENGE_O LIKE MSEG-MENGE,
 MENGE_BAL LIKE MSEG-MENGE.
DATA MAGBB LIKE S031-MAGBB.
DATA MZUBB LIKE S031-MZUBB.
DATA V_MONTH LIKE S031-SPMON.
DATA XBLNR LIKE MKPF-XBLNR.
DATA : BEGIN OF ITAB1 OCCURS 100,
 MATNR LIKE MAKT-MATNR,
 END OF ITAB1.
DATA : BEGIN OF ITAB2 OCCURS 100,
MATNR LIKE MAKT-MATNR,
WERKS LIKE MARD-WERKS,
LGORT LIKE MARD-LGORT,
BUSTW LIKE MSEG-BUSTW,
BWART LIKE MSEG-BWART,
SHKZG LIKE MSEG-SHKZG,
MENGE LIKE MSEG-MENGE,
END OF ITAB2.
DATA: PAGNO(5) TYPE C.
DATA : PAGENO LIKE SY-PAGNO.
DATA: STR1 TYPE DATS,
 STR2(14) TYPE C,
 STR3(10) TYPE C.
DATA : V_MONUM LIKE T015M-MONUM,
 V_MONAM LIKE T015M-MONAM.
TYPES: FARBE TYPE SLIS_T_SPECIALCOL_ALV.
DATA V_STOCK LIKE MSEG-MENGE.
DATA V_STOCK1 LIKE MSEG-MENGE.
DATA: V_MONTH1 LIKE S031-SPMON.
DATA: OSTOCK LIKE MSEG-MENGE.
CONSTANTS:
GC_FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
DATA: GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
 GT_LAYOUT TYPE SLIS_LAYOUT_ALV,
 GS_KEYINFO TYPE SLIS_KEYINFO_ALV,
 GT_SORT TYPE SLIS_T_SORTINFO_ALV,
 GT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV,
 GT_EVENTS TYPE SLIS_T_EVENT,
 G_PRINT TYPE SLIS_PRINT_ALV.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV OCCURS 0 WITH HEADER LINE.
DATA: FC_HIER TYPE SLIS_FIELDCAT_ALV OCCURS 0 WITH HEADER LINE.
DATA: GT_LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: GT_REPID LIKE SY-REPID.
DATA: GT_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
DATA: GT_TOP_OF_LIST TYPE SLIS_FORMNAME VALUE 'TOP_OF_LIST'.
DATA: FLD(15).
DATA: TXT(50).
I N I T I A L I Z A T I O N
GT_REPID = SY-REPID.
PAGNO = SY-PAGNO.
PERFORM EVENTTAB_BUILD USING GT_EVENTS[].
A T S E L E C T I O N S C R E E N
*AT SELECTION-SCREEN ON BUDAT.
PERFORM VALIDATION.
S T A R T O F S E L E C T I O N
START-OF-SELECTION.
PERFORM FIELDCAT_INIT USING GT_FIELDCAT[].
PERFORM FETCH_DATA.
E N D O F S E L E C T I O N
END-OF-SELECTION.
IF NOT ITAB2[] IS INITIAL.
 PERFORM COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
 CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = GT_REPID
 IT_FIELDCAT = GT_FIELDCAT[]
 IT_EVENTS = GT_EVENTS[]
 IT_SORT = GT_SORT[]
 IS_LAYOUT = GT_LAYOUT
 TABLES
 T_OUTTAB = ITAB2.
ELSE.
 MESSAGE S006(Z1).
ENDIF.
CLEAR : GT_LAYOUT.
Report Selections
DATA: BEGIN OF IT_HEADER OCCURS 10,
WERKS LIKE MSEG-WERKS,
NAME1 LIKE T001W-NAME1,
MAKTX LIKE MAKT-MAKTX,
MATNR LIKE MSEG-MATNR,
MENGE_O LIKE MSEG-MENGE,
END OF IT_HEADER.
DATA: BEGIN OF ITAB OCCURS 50,
 WERKS LIKE MSEG-WERKS,
 MATNR LIKE MSEG-MATNR,
 BWART LIKE MSEG-BWART,
 LGORT LIKE MSEG-LGORT,
 EBELN LIKE MSEG-EBELN,
 XBLNR LIKE MKPF-XBLNR,
 BUDAT LIKE MKPF-BUDAT,
 MBLNR LIKE MSEG-MBLNR,
 MENGE LIKE MSEG-MENGE,
 MAKTX LIKE MAKT-MAKTX,
 XAUTO LIKE MSEG-XAUTO,
 NAME1 LIKE T001W-NAME1,
 MENGE_O LIKE MSEG-MENGE,
 SHKZG LIKE MSEG-SHKZG,
 MENGE_IS LIKE MSEG-MENGE,
 MENGE_RE LIKE MSEG-MENGE,
END OF ITAB.
DATA: BEGIN OF INT_DATA OCCURS 50,
 WERKS LIKE MSEG-WERKS,
 MATNR LIKE MSEG-MATNR,
 BWART LIKE MSEG-BWART,
 XBLNR LIKE MKPF-XBLNR,
 MBLNR LIKE MSEG-MBLNR,
 BUDAT LIKE MKPF-BUDAT,
 MAKTX LIKE MAKT-MAKTX,
 MENGE_O LIKE MSEG-MENGE,
 MENGE_R LIKE MSEG-MENGE,
 MENGE_TO LIKE MSEG-MENGE,
 MENGE_TI LIKE MSEG-MENGE,
 MENGE_S LIKE MSEG-MENGE,
 MENGE_ST LIKE MSEG-MENGE,
 MENGE_AD LIKE MSEG-MENGE,
 MENGE_RT LIKE MSEG-MENGE,
 MENGE_C LIKE MSEG-MENGE,
 MENGE_CL LIKE MSEG-MENGE,
 MENGE_BAL LIKE MSEG-MENGE,
 MENGE_CR LIKE MSEG-MENGE,
 NAME1 LIKE T001W-NAME1,
 MENGE_RE LIKE MSEG-MENGE,
 MENGE_IS LIKE MSEG-MENGE,
 MENGE_BAL1 LIKE MSEG-MENGE,
 SHKZG LIKE MSEG-SHKZG,
 MENGE LIKE MSEG-MENGE,
 END OF INT_DATA.
DATA: BEGIN OF INT_DATA1 OCCURS 50,
 WERKS LIKE MSEG-WERKS,
 MATNR LIKE MSEG-MATNR,
 BWART LIKE MSEG-BWART,
 MENGE_ST LIKE MSEG-MENGE,
 MENGE_O LIKE MSEG-MENGE,
 WAMNG LIKE EKET-WAMNG,
 WEMNG LIKE EKET-WEMNG,
 MENGE LIKE MSEG-MENGE,
 RETPO LIKE EKPO-RETPO,
 UMREN LIKE EKPO-UMREN,
 UMREZ LIKE EKPO-UMREZ,
 BSTMG LIKE EKPO-MENGE,
 XBLNR LIKE MKPF-XBLNR,
 END OF INT_DATA1.
DATA: BEGIN OF INT_DATA2 OCCURS 50,
 WERKS LIKE MSEG-WERKS,
 LGORT LIKE S031-LGORT,
 MATNR LIKE MSEG-MATNR,
 BWART LIKE MSEG-BWART,
 MENGE_IS LIKE MSEG-MENGE,
 MBWBEST LIKE S032-MBWBEST,
 MAKTX LIKE MAKT-MAKTX,
 END OF INT_DATA2.
DATA:V_GJAHR LIKE MKPF-BUDAT.
DATA : FLAG6 TYPE C,
 PAGENO1 LIKE SY-PAGNO,
 PAGENO2 LIKE SY-PAGNO.
SELECTION-SCREEN BEGIN OF BLOCK 0 WITH FRAME TITLE TEXT-064.
SELECT-OPTIONS:
MATNR FOR MSEG-MATNR,
MATKL FOR MARA-MATKL OBLIGATORY,
WERKS FOR MSEG-WERKS OBLIGATORY,
LGORT FOR MSEG-LGORT,
*CHARG FOR MSEG-CHARG,
BWART FOR MSEG-BWART,
*LIFNR FOR LFA1-LIFNR,
*WADAT FOR LIKP-WADAT_IST,
BUDAT FOR MKPF-BUDAT.
SELECTION-SCREEN END OF BLOCK 0.
*SELECTION-SCREEN SKIP 1.
Parameters
*SELECTION-SCREEN SKIP 1.
Variante
*SELECTION-SCREEN BEGIN OF BLOCK 0 WITH FRAME TITLE TEXT-064.
DATA: P_VARI LIKE DISVARIANT-VARIANT.
*SELECTION-SCREEN END OF BLOCK 0.
Layout
SELECTION-SCREEN BEGIN OF BLOCK A WITH FRAME TITLE TEXT-060.
DATA: P_ZEBRA VALUE 'X'.
SELECTION-SCREEN END OF BLOCK A.
SELECTION-SCREEN BEGIN OF BLOCK D WITH FRAME TITLE TEXT-063.
PARAMETERS:
 P_EXPAND AS CHECKBOX DEFAULT ' '.
DATA: P_DETPOP VALUE 'X' .
SELECTION-SCREEN END OF BLOCK D.
DATA: G_BOXNAM TYPE SLIS_FIELDNAME VALUE 'BOX',
 G_EXPANDNAME TYPE SLIS_FIELDNAME VALUE 'EXPAND',
 P_F2CODE LIKE SY-UCOMM VALUE '&ETA',
 P_LIGNAM TYPE SLIS_FIELDNAME VALUE 'LIGHTS',
 G_SAVE(1) TYPE C,
 G_TABNAME_HEADER TYPE SLIS_TABNAME,
 G_TABNAME_ITEM TYPE SLIS_TABNAME,
 G_EXIT(1) TYPE C,
 GX_VARIANT LIKE DISVARIANT,
 G_VARIANT LIKE DISVARIANT.
INITIALIZATION.
GT_REPID = SY-REPID.
G_TABNAME_HEADER = 'IT_HEADER'.
G_TABNAME_ITEM = 'INT_DATA'.
define keyinfo
CLEAR GS_KEYINFO.
GS_KEYINFO-HEADER01 = 'MATNR'.
GS_KEYINFO-ITEM01 = 'MATNR'.
*GS_KEYINFO-HEADER01.
PERFORM E01_FIELDCAT_INIT USING GT_FIELDCAT[].
PERFORM E03_EVENTTAB_BUILD USING GT_EVENTS[].
PERFORM E04_COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
PERFORM E06_T_SORT_BUILD USING GT_SORT[].
PERFORM E07_SP_GROUP_BUILD USING GT_SP_GROUP[].
Schalter Varianten benutzerspezifisch/allgemein speicherbar setzen
Set Options: save variants userspecific or general
G_SAVE = 'A'.
PERFORM VARIANT_INIT.
Get default variant
GX_VARIANT = G_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
 EXPORTING
 I_SAVE = G_SAVE
 CHANGING
 CS_VARIANT = GX_VARIANT
 EXCEPTIONS
 NOT_FOUND = 2.
IF SY-SUBRC = 0.
 P_VARI = GX_VARIANT-VARIANT.
ENDIF.
Process on value request
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM F4_FOR_VARIANT.
AT SELECTION-SCREEN.
PERFORM PAI_OF_SELECTION_SCREEN.
START-OF-SELECTION.
END-OF-SELECTION.
PERFORM LAYOUT_BUILD USING GT_LAYOUT. "wg. Parameters
Call ABAP/4 List Viewer
CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = GT_REPID
 IS_LAYOUT = GT_LAYOUT
 IT_FIELDCAT = GT_FIELDCAT[]
 IT_SPECIAL_GROUPS = GT_SP_GROUP[]
 IT_SORT = GT_SORT[]
 I_SAVE = G_SAVE
 IS_VARIANT = G_VARIANT
 IT_EVENTS = GT_EVENTS[]
 I_TABNAME_HEADER = G_TABNAME_HEADER
 I_TABNAME_ITEM = G_TABNAME_ITEM
 IS_KEYINFO = GS_KEYINFO
 IS_PRINT = G_PRINT
 TABLES
 T_OUTTAB_HEADER = IT_HEADER
 T_OUTTAB_ITEM = INT_DATA.
 FORM E01_FIELDCAT_INIT *
--> E01_LT_FIELDCAT *
FORM FIELDCAT_INIT
 USING RT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
DATA: POS TYPE I VALUE 1.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'WERKS'.
LS_FIELDCAT-TABNAME = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_L = 'Plant'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'NAME1'.
LS_FIELDCAT-TABNAME = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_L = 'Description'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MATNR'.
LS_FIELDCAT-TABNAME = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_M = 'Material'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MAKTX'.
LS_FIELDCAT-TABNAME = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_M = 'Material Description'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'XBLNR'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Doc No.'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'BUDAT'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Doc Date.'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'BWART'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Mvt.'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MBLNR'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Mat.Doc No'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_R'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' STO-In '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_RT'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Sales Returns '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_CL'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Canc of Invoice'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_AD'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Adjustments '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_S'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Sales. '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_TO'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' STO-Out '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_CR'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Canc of Sal Returns'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_AD'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = 'Adjustments '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_O'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Opening Balance '.
LS_FIELDCAT-NO_ZERO = 'X'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME = 'MENGE_BAL'.
LS_FIELDCAT-TABNAME = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M = ' Balance '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
ENDFORM. "E01_FIELDCAT_INIT
 FORM E02_DATA_ADD *
--> E02_LT_SFLIGHT *
 FORM E03_EVENTTAB_BUILD *
--> E03_LT_EVENTS *
*FORM E03_EVENTTAB_BUILD USING E03_LT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 I_LIST_TYPE = 1
 IMPORTING
 ET_EVENTS = E03_LT_EVENTS.
READ TABLE E03_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 E03_LT_EVENTS.
ENDIF.
*ENDFORM. "E03_EVENTTAB_BUILD
 FORM E04_COMMENT_BUILD *
--> E04_LT_TOP_OF_PAGE *
FORM E04_COMMENT_BUILD USING E04_LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: LS_LINE TYPE SLIS_LISTHEADER.
Listenüberschrift: Typ H
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TEXT-001.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = TEXT-050.
LS_LINE-INFO = TEXT-010.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
LS_LINE-KEY = TEXT-051.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
Aktionsinfo: Typ A
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
LS_LINE-INFO = TEXT-002.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
ENDFORM. "E04_COMMENT_BUILD
 FORM E05_LAYOUT_BUILD *
<-> E05_LS_LAYOUT *
FORM LAYOUT_BUILD USING LS_LAYOUT TYPE SLIS_LAYOUT_ALV.
LS_LAYOUT-F2CODE = P_F2CODE.
LS_LAYOUT-ZEBRA = P_ZEBRA.
LS_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
IF P_EXPAND = 'X'.
 LS_LAYOUT-EXPAND_FIELDNAME = G_EXPANDNAME.
ELSE.
 CLEAR LS_LAYOUT-EXPAND_FIELDNAME.
ENDIF.
LS_LAYOUT-DETAIL_POPUP = P_DETPOP.
ENDFORM. "E05_LAYOUT_BUILD
 FORM E06_T_SORT_BUILD *
--> E06_LT_SORT *
*FORM E06_T_SORT_BUILD USING E06_LT_SORT TYPE SLIS_T_SORTINFO_ALV.
DATA: LS_SORT TYPE SLIS_SORTINFO_ALV.
CLEAR LS_SORT.
LS_SORT-FIELDNAME = 'WERKS'.
LS_SORT-TABNAME = G_TABNAME_HEADER.
LS_SORT-SPOS = 1.
LS_SORT-UP = 'X'.
APPEND LS_SORT TO E06_LT_SORT.
CLEAR LS_SORT.
LS_SORT-FIELDNAME = 'MATNR'.
LS_SORT-TABNAME = G_TABNAME_ITEM.
LS_SORT-SPOS = 2.
LS_SORT-UP = 'X'.
APPEND LS_SORT TO E06_LT_SORT.
*ENDFORM. "E06_T_SORT_BUILD
 FORM E07_SP_GROUP_BUILD *
--> E07_LT_SP_GROUP *
FORM E07_SP_GROUP_BUILD USING E07_LT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV.
DATA: LS_SP_GROUP TYPE SLIS_SP_GROUP_ALV.
CLEAR LS_SP_GROUP.
LS_SP_GROUP-SP_GROUP = 'A'.
LS_SP_GROUP-TEXT = TEXT-005.
APPEND LS_SP_GROUP TO E07_LT_SP_GROUP.
ENDFORM. "E07_SP_GROUP_BUILD
 FORM SELECTION *
FORM FETCH_DATA .
STR3 = BUDAT-LOW+0(4).
SELECT * FROM MARA INTO CORRESPONDING FIELDS OF TABLE ITAB1
 WHERE MATNR IN MATNR AND
 MATKL IN MATKL.
SELECT MATNR WERKS LGORT
 INTO TABLE ITAB2
 FROM MARD FOR ALL ENTRIES IN ITAB1
 WHERE WERKS IN WERKS AND
 LGORT IN LGORT AND
 MATNR = ITAB1-MATNR.
SELECT SINGLE NAME1 FROM T001W INTO INT_DATA-NAME1
 WHERE WERKS = INT_DATA-WERKS.
LOOP AT ITAB2.
 SELECT M~MATNR M~WERKS M~LGORT M~MENGE M~MBLNR M~MJAHR M~XAUTO M~SHKZG
 M~BWART M~EBELN N~BUDAT N~XBLNR S~NAME1
 INTO CORRESPONDING FIELDS OF ITAB
 FROM MSEG AS M INNER JOIN MKPF AS N ON
 M~MBLNR = N~MBLNR
 AND M~MJAHR = N~MJAHR
 INNER JOIN T001W AS S ON
 M~WERKS = S~WERKS
 WHERE N~BUDAT IN BUDAT AND
 M~WERKS = ITAB2-WERKS AND
 M~LGORT = ITAB2-LGORT AND
 M~MATNR = ITAB2-MATNR AND
 M~BWART IN BWART.
 APPEND ITAB.
 CLEAR ITAB.
 ENDSELECT.
 IF SY-SUBRC NE 0.
 ITAB-MATNR = ITAB2-MATNR.
 ITAB-WERKS = ITAB2-WERKS.
 ITAB-LGORT = ITAB2-LGORT.
 ITAB-BWART = ITAB2-BWART.
 APPEND ITAB.
 ENDIF.
 CLEAR: ITAB2,ITAB.
ENDLOOP.
DELETE ADJACENT DUPLICATES FROM ITAB2 COMPARING MATNR WERKS .
V_MONTH = BUDAT-LOW+0(6).
SELECT * INTO CORRESPONDING FIELDS OF TABLE INT_DATA2
 FROM S032 FOR ALL ENTRIES IN ITAB2
 WHERE MATNR = ITAB2-MATNR
 AND WERKS = ITAB2-WERKS
 AND LGORT = SPACE
 AND MBWBEST <> SPACE.
LOOP AT INT_DATA2 .
 SELECT SINGLE * FROM S031
 WHERE MATNR = INT_DATA2-MATNR AND
 WERKS = INT_DATA2-WERKS AND
 LGORT = SPACE AND
 SPMON GT V_MONTH.
 MODIFY INT_DATA2.
 CLEAR: INT_DATA2, S031.
ENDLOOP.
DELETE INT_DATA WHERE MENGE_O IS INITIAL .
DELETE ADJACENT DUPLICATES FROM INT_DATA COMPARING XBLNR MATNR MAKTX.
V_MONTH1 = BUDAT-LOW+0(6).
SORT ITAB BY MATNR WERKS XBLNR .
LOOP AT ITAB.
 XBLNR = ITAB-XBLNR.
 INT_DATA-MENGE = ITAB-MENGE.
 INT_DATA-BWART = ITAB-BWART.
 INT_DATA-XBLNR = ITAB-XBLNR.
 INT_DATA-BUDAT = ITAB-BUDAT.
 INT_DATA-MATNR = ITAB-MATNR.
 INT_DATA-MBLNR = ITAB-MBLNR.
 INT_DATA-MENGE = ITAB-MENGE.
 INT_DATA-SHKZG = ITAB-SHKZG.
 INT_DATA-MENGE_IS = ITAB-MENGE_IS.
 INT_DATA-MENGE_RE = ITAB-MENGE_RE.
 INT_DATA-MENGE_O = ITAB-MENGE_O.
 INT_DATA-NAME1 = ITAB-NAME1.
 AT NEW MATNR.
 FLAG = 1.
 IT_HEADER-MATNR = INT_DATA-MATNR.
 SELECT SINGLE MAKTX FROM MAKT INTO IT_HEADER-MAKTX WHERE
 MATNR = INT_DATA-MATNR.
 APPEND IT_HEADER.
 CLEAR IT_HEADER.
 ENDAT.
 IF FLAG = 1.
 PERFORM GET_OPENING_STOCK.
 ENDIF.
 INT_DATA-MENGE_O = OSTOCK.
 CASE ITAB-BWART.
 WHEN '101'.
 IF INT_DATA-SHKZG = 'S'.
 INT_DATA-MENGE_R = INT_DATA-MENGE_R + ITAB-MENGE.
 ENDIF.
 WHEN '453'.
 IF INT_DATA-SHKZG = 'S'.
 IF ITAB-XAUTO = 'X'.
 INT_DATA-MENGE_RT = INT_DATA-MENGE_RT + ITAB-MENGE.
 ENDIF.
 ENDIF.
 WHEN '351' OR '641'.
 IF ITAB-LGORT = 0.
 INT_DATA-MENGE_R = INT_DATA-MENGE_R + ITAB-MENGE.
 ELSE.
 INT_DATA-MENGE_TO = INT_DATA-MENGE_TO + ITAB-MENGE.
 ENDIF.
 WHEN '602' OR '642'.
 IF INT_DATA-SHKZG = 'S'.
 IF ITAB-LGORT = 0.
 INT_DATA-MENGE_CL = INT_DATA-MENGE_CL + ITAB-MENGE.
 ENDIF.
 ENDIF.
 WHEN '552' OR '310'.
 IF INT_DATA-SHKZG = 'S'.
 INT_DATA-MENGE_AD = INT_DATA-MENGE_AD - ITAB-MENGE.
 ENDIF.
 WHEN '601'.
 IF INT_DATA-SHKZG = 'H'.
 INT_DATA-MENGE_S = INT_DATA-MENGE_S + ITAB-MENGE.
 ENDIF.
 WHEN '641' .
 IF INT_DATA-SHKZG = 'H'.
 IF ITAB-LGORT = 0.
 INT_DATA-MENGE_TO = INT_DATA-MENGE_TO + ITAB-MENGE.
 ENDIF.
 ENDIF.
 WHEN '454' OR '102'.
 IF INT_DATA-SHKZG = 'H'.
 IF ITAB-XAUTO = 'X'.
 INT_DATA-MENGE_CR = INT_DATA-MENGE_CR - ITAB-MENGE.
 ENDIF.
 ENDIF.
 WHEN '551' OR '309'.
 IF INT_DATA-SHKZG = 'H'.
 INT_DATA-MENGE_AD = INT_DATA-MENGE_AD + ITAB-MENGE.
 ENDIF.
 IF INT_DATA-SHKZG = 'S'.
 MENGE_O = INT_DATA-MENGE_O + ITAB-MENGE.
 ENDIF.
 ENDCASE.
 IF INT_DATA-SHKZG = 'S'.
 MENGE_RE = INT_DATA-MENGE_R + INT_DATA-MENGE_RT + INT_DATA-MENGE_CL
 + INT_DATA-MENGE_AD.
 ENDIF.
 IF INT_DATA-SHKZG = 'H'.
 MENGE_IS = INT_DATA-MENGE_S + INT_DATA-MENGE_TO +
 INT_DATA-MENGE_CR + INT_DATA-MENGE_AD.
 ENDIF.
 PERFORM BALANCE.
 COLLECT INT_DATA.
 CLEAR: INT_DATA,ITAB ,XBLNR, FLAG, OSTOCK.
ENDLOOP.
SORT INT_DATA BY XBLNR BUDAT WERKS MATNR.
LOOP AT INT_DATA.
 READ TABLE INT_DATA2 WITH KEY MATNR = INT_DATA-MATNR
 WERKS = INT_DATA-WERKS.
 SELECT SINGLE * FROM MAKT WHERE MATNR = INT_DATA-MATNR.
 INT_DATA-MAKTX = MAKT-MAKTX.
 MODIFY INT_DATA.
 CLEAR: INT_DATA, INT_DATA2.
ENDLOOP.
LOOP AT INT_DATA WHERE MENGE_O = 0 AND MENGE_RT = 0 AND
 MENGE_CL = 0 AND MENGE_AD = 0 AND
 MENGE_S = 0 AND MENGE_TO = 0 AND
 MENGE_CR = 0 AND MENGE_R = 0 AND MENGE_BAL = 0.
 DELETE IT_HEADER WHERE MATNR = INT_DATA-MATNR.
ENDLOOP.
DELETE INT_DATA WHERE MENGE_O = 0 AND MENGE_RT = 0 AND
 MENGE_CL = 0 AND MENGE_AD = 0 AND
 MENGE_S = 0 AND MENGE_TO = 0 AND
 MENGE_CR = 0 AND MENGE_R = 0 AND MENGE_BAL = 0.
ENDFORM. "SELECTION
*& Form EVENTTAB_BUILD
 text
 -->P_GT_EVENTS[] text
FORM EVENTTAB_BUILD USING RT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 I_LIST_TYPE = 1
 IMPORTING
 ET_EVENTS = RT_EVENTS.
READ TABLE RT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
 INTO LS_EVENT.
IF SY-SUBRC = 0.
 MOVE GT_TOP_OF_PAGE TO LS_EVENT-FORM.
 APPEND LS_EVENT TO RT_EVENTS.
ENDIF.
ENDFORM. " EVENTTAB_BUILD
 FORM TOP_OF_PAGE *
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 I_LOGO = 'ENJOYSAP_LOGO'
 IT_LIST_COMMENTARY = LT_TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 I_LOGO = 'ENJOYSAP_LOGO'
 IT_LIST_COMMENTARY = GT_LIST_TOP_OF_PAGE.
ENDFORM. "TOP_OF_PAGE
 FORM F4_FOR_VARIANT *
FORM F4_FOR_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
 EXPORTING
 IS_VARIANT = G_VARIANT
 I_SAVE = G_SAVE
 I_TABNAME_HEADER = G_TABNAME_HEADER
 I_TABNAME_ITEM = G_TABNAME_ITEM
 IMPORTING
 E_EXIT = G_EXIT
 ES_VARIANT = GX_VARIANT
 EXCEPTIONS
 NOT_FOUND = 2.
IF SY-SUBRC = 2.
 MESSAGE ID SY-MSGID TYPE 'S' NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
 IF G_EXIT = SPACE.
 P_VARI = GX_VARIANT-VARIANT.
 ENDIF.
ENDIF.
ENDFORM. "F4_FOR_VARIANT
*& Form PAI_OF_SELECTION_SCREEN
 text
FORM PAI_OF_SELECTION_SCREEN.
IF NOT P_VARI IS INITIAL.
 MOVE G_VARIANT TO GX_VARIANT.
 MOVE P_VARI TO GX_VARIANT-VARIANT.
 CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
 EXPORTING
 I_SAVE = G_SAVE
 CHANGING
 CS_VARIANT = GX_VARIANT.
 G_VARIANT = GX_VARIANT.
ELSE.
 PERFORM VARIANT_INIT.
ENDIF.
ENDFORM. " PAI_OF_SELECTION_SCREEN
*& Form VARIANT_INIT
 text
--> p1 text
<-- p2 text
FORM VARIANT_INIT.
CLEAR G_VARIANT.
G_VARIANT-REPORT = GT_REPID.
ENDFORM. " VARIANT_INIT
*& Form GET_OPENING_STOCK
 text
FORM GET_OPENING_STOCK.
SELECT SUM( MZUBB ) SUM( MAGBB ) INTO (V_STOCK, V_STOCK1)
 FROM S031 WHERE MATNR = ITAB-MATNR AND
 WERKS = ITAB-WERKS AND
 SPMON LT V_MONTH1 AND LGORT = ITAB-LGORT.
OSTOCK = V_STOCK1 - V_STOCK.
IF OSTOCK < 0.
 OSTOCK = OSTOCK * -1.
ENDIF.
ENDFORM. " GET_OPENING_STOCK
*& Form check
 text
FORM CHECK.
AUTHORITY-CHECK OBJECT 'M_IS_MATNR'
 ID 'ACTVT' DUMMY
 ID 'MATNR' FIELD MATNR-LOW.
IF SY-SUBRC <> 0.
 MESSAGE E016(Z1) WITH MATNR-LOW.
ENDIF.
ENDFORM. "CHECK_AUTHORIZATION
*& Form EVENTTAB_BUILD
 text
 -->P_GT_EVENTS[] text
*FORM EVENTTAB_BUILD USING RT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 I_LIST_TYPE = 1
 IMPORTING
 ET_EVENTS = RT_EVENTS.
READ TABLE RT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
 INTO LS_EVENT.
IF SY-SUBRC = 0.
 MOVE GT_TOP_OF_PAGE TO LS_EVENT-FORM.
 APPEND LS_EVENT TO RT_EVENTS.
ENDIF.
*ENDFORM. " EVENTTAB_BUILD
 FORM TOP_OF_PAGE
*FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 I_LOGO = 'ENJOYSAP_LOGO'
 IT_LIST_COMMENTARY = GT_LIST_TOP_OF_PAGE.
*ENDFORM. "TOP_OF_PAGE
*& Form COMMENT_BUILD
 text
 -->P_GT_LIST_TOP_OF_PAGE[] text
FORM COMMENT_BUILD USING LT_TOP_OF_PAGE TYPE
 SLIS_T_LISTHEADER.
DATA: LS_LINE TYPE SLIS_LISTHEADER.
DATA: LV_PAGE_STRING(11),
 LV_PAGE_NO(3).
PAGNO = SY-PAGNO.
DATA: PAGNO(5) TYPE C.
CLEAR
 LS_LINE.
REFRESH LT_TOP_OF_PAGE.
CLEAR
 LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = 'Page Number'.
PAGNO = SY-PAGNO.
IF
 PAGNO = 0.
 PAGNO = 1.
ENDIF.
SHIFT PAGNO LEFT DELETING LEADING SPACE.
LS_LINE-INFO = PAGNO.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TEXT-001.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
SELECT SINGLE * FROM T001W WHERE
 WERKS IN WERKS.
CONCATENATE 'Name Of The Plant ' '-' T001W-NAME1 INTO
 TXT SEPARATED BY SPACE.
LS_LINE-INFO = TXT.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR:TXT, LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TEXT-002.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR LS_LINE.
IF WERKS-HIGH EQ SPACE.
 CONCATENATE 'Plant : ' WERKS-LOW INTO TXT.
ELSE.
 CONCATENATE 'FROM PLANT : ' WERKS-LOW 'TO PLANT : ' WERKS-HIGH INTO TXT SEPARATED BY SPACE.
ENDIF.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TXT.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
IF BUDAT-HIGH EQ SPACE.
 BUDAT-HIGH = BUDAT-LOW.
ENDIF.
CONCATENATE 'Date : From ' BUDAT-LOW6(2) '-' BUDAT-LOW4(2) '-'
 BUDAT-LOW0(4) 'to' BUDAT-HIGH6(2) '-'
 BUDAT-HIGH4(2) '-' BUDAT-HIGH0(4) INTO
 TXT SEPARATED BY SPACE.
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
LS_LINE-INFO = TXT.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
ENDFORM. "COMMENT_BUILD
*& Form LAYOUT_INIT
 text
 -->P_GT_LAYOUT text
FORM LAYOUT_INIT USING RS_LAYOUT TYPE SLIS_LAYOUT_ALV.
RS_LAYOUT-DETAIL_POPUP = 'X'.
RS_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
ENDFORM. " LAYOUT_INIT
*& Form BALANCE
 text
--> p1 text
<-- p2 text
FORM BALANCE.
IF INT_DATA-SHKZG = 'S'.
 MENGE_RE = INT_DATA-MENGE_O + INT_DATA-MENGE.
 INT_DATA-MENGE_BAL = MENGE_RE.
 INT_DATA-MENGE_RE = INT_DATA-MENGE.
ELSEIF INT_DATA-SHKZG = 'H'.
 MENGE_RE = MENGE_RE - INT_DATA-MENGE.
 INT_DATA-MENGE_BAL = MENGE_RE.
 INT_DATA-MENGE_IS = INT_DATA-MENGE.
ENDIF.
ENDFORM. " BALANCE
Thanks & Regards,
Sreedhar.

Hi,
try like this.........
get v_linct from system varaible sy-linct
describe table t_output lines lv_lines - Where
t_output is ur final internal table which is displayed
v_pagct = ( lv_lines div v_linct ) + 3.
write: 'PAGE NO:' , sy-pagno ,'/', v_pagct.
Madhavi

Repeat group header on every page before group footer as group spans across

I have a group which spans across multiple pages.In group there are two subreports in Group footer.I have set all the required parameters to repeat group header on every page in group expert,but not getting desired results,please help....

I have following structure in my report.
I have two group headers at the top,first one contains name of the site & site number,second header contains Site-Admin as heading,below which i have kept details section of report which displays name of administrator which repeats details section in case there are more than one adminstrators.
Below this i have two group footers which individually contain each of the two sub-reports.
As per data,these individual subreport may or may not begin at the beginning of the new page every
time,therefore fake group header put at the beginning of these sub-reports may come in middle of the page sometime,so thet cant be done.
Thank you,please reply if you have another solution....

SSRS Table/Row Header does not repeat on every page when exported to PDF

Hi, I have a SSRS Report in which the rows are grouped and the Tablix has a Table/Row header. I wanted the header to repeat on every page for a group because sometimes the data from the group would be more than one page.
                               To achieve this
                              - I went to Advance mode by clicking the arrow next to column group
                              - Selected the Header Static column from Row Group
                              - Changed the following properties
                              - KeepWithGroup: After
                              - RepeatOnNewPage:
True
                              - The header columns
are set to not grow.
The problem only occurs when the nested grouped data in one of the columns goes over a page. The following pages don't have any header.
So half of the time the header row repeats but when the nested grouped data extends over one page the header does not show. Problem only occurs when rendered to pdf.
I found this line "Headings are repeated on each page only if there is sufficient room" in SQL 2008 version. But I could not find it in later versions of sql server. So does that mean it is fixed

Hi Mumblesnz1,
According to your description, you specify value of RepeatOnNewPage as True in the report. When exporting the report to PDF, one grouped data extend over one page, and tablix header display on first page, not repeat on following pages.
As we tested in our environment(SQL Server 2008(SP3)-10.0.5520.0(X64)), it works as you required. We set KeepWithGroup as After and RepeatOnNewPage as True. After exporting to PDF, the grouped data display on two pages, and tablix header repeats on each
page. Since we haven’t found any document mentioned this issue is fixed on which version, I suggest you try to install the service pack 3 for sql server 2008.
If you have any question, please feel free to ask.
Best regards,
Qiuyun Yu

Adobe Form Repeat a Subform Every Page

Hello Adobe Forum,
I'm an SAP user and am creating an Adobe form (my first). I posted this in an SAP forum, but have yet to receive any feedback whatsoever so I thought it may be better to go to the Adobe experts themselves. I've run into an Adobe issue and am just spinning and spinning trying different techniques to make it work. Any hints would be greatly appreciated.
In my content area I have three subforms. The first subform is positioned, the fields have to be placed correctly. The second subform is fundamentally a table header for the third subform, which is the rows of the data. All three subforms are wrapped in another subform that is flowed.
Why would I do it like this? Well, the table in the third subform has control levels so it merges like rows nicely in this way when the first column rows are the same...
So the first page of my document would look like this...which is what I want.
H is repeated for every page. So it is on the Master page. That's easy.
1 is the 'sub-header' and should only be on the first page. This works.
2 looks like a header for the table, but is really it's own table because of formatting requirements and the values are dynamic. It looks nice, but shows up only on page one.
3 is the data table. It works great too.
Page one looks great. Page two looks like this... I can't get part 2 from above to repeat for every new page.
I have tried numerous approaches, but nothing seems to work. I really need to stick with the control levels, and that keeps me from having one nice table with a header that repeats. Perhaps I've approached this fundamentally wrong?
Here is my layout in case that helps at all explain my issue. I truly appreciate any help, this is the last hurdle on my form and then it's done. I'm sure a seasoned Adobe person may quickly see the err of my ways.
Thanks,
Greg

Not a solution I'm very fond of, but it works. I created a second page and put the table header on the master page there and moved the content area down a bit. I'd still like to force the subform to simply repeat, but I've got to move on.

Repeating values on top of every page

Similar Messages

Maybe you are looking for