Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

report

Former Member
0 Likes
629

what do u mean by footer of a page,suppose i have to leave 3 lines separtely in a list,then what is the process

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
600

Hi

If you wants to give 3 lines space in the footer in the Report attributes declare Line-count as below

REPORT ZREP NO STANDARD PAGE HEADING

LINE-SIZE 255 <b>LINE-COUNT 65(3)</b>

this 3 was taken as default footer space and accordingly so much space at the end of page was left

<b>Reward points for useful Answers</b>

Regards

Anji

6 REPLIES 6
Read only

Former Member
0 Likes
601

Hi

If you wants to give 3 lines space in the footer in the Report attributes declare Line-count as below

REPORT ZREP NO STANDARD PAGE HEADING

LINE-SIZE 255 <b>LINE-COUNT 65(3)</b>

this 3 was taken as default footer space and accordingly so much space at the end of page was left

<b>Reward points for useful Answers</b>

Regards

Anji

Read only

Former Member
0 Likes
600

Hello,

In the following code please check the <b>END-OF-PAGE</b> event.

Regards,

Rakesh

<b>Reward all usefull answers</b>


*Report program for delivery details*

*Tables used: lips,
*             likp,
*             kna1.

REPORT  zsr_delivery_dtls NO STANDARD PAGE HEADING
                          MESSAGE-ID zivltcsr
                          LINE-SIZE 200 LINE-COUNT 35(3).


*Data declaration*

TABLES:likp,
       lips.

TYPES: BEGIN OF st_del,
         name1 TYPE kna1-name1,                             "Customer name1
         docno TYPE lips-vgbel,                             "Document number
         itmno TYPE lips-vgpos,                             "Item number
         matxt TYPE lips-mtart,                             "Material text
         name2 TYPE kna1-name2,                             "Customer name2
         salor TYPE likp-vkorg,                             "Sales organization
         qnty  TYPE lips-ntgew,                             "Quantity
         unit  TYPE lips-gewei,                             "Unit
         plant TYPE lips-werks,                             "Plant
         inct1 TYPE likp-inco1,                             "Incoterms1
         inct2 TYPE likp-inco2,                             "incoterms2
       END OF st_del.

DATA:wa_del TYPE st_del,
     wa_log TYPE zsr_del_login,
     it_del TYPE TABLE OF st_del,
     sysubrc TYPE sy-subrc.




*Selection screen for interactive input*

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS:so_date  FOR likp-lfdat,                          "Delivery date
               so_shppt FOR likp-vstel,                          "Shipping point
               so_matnr FOR lips-matnr.                          "Material number
SELECTION-SCREEN END OF BLOCK b1.




TOP-OF-PAGE.                    "Header

  WRITE:/,(15) text-002,(15) text-003,(15) text-004,
          (25) text-005,(20) text-006,(15) text-007,
          (15) text-008,(15) text-009, (15) text-010,
          (15) text-011,(15) text-012.
  ULINE.

END-OF-PAGE.                     "Footer
  SKIP.
  WRITE:'End of page ',sy-pagno LEFT-JUSTIFIED.
  ULINE.


START-OF-SELECTION.



*Retreiving data from database*

*Join details: lips = a
*              likp = b
*              kna1 = c

  SELECT c~name1 a~vgbel a~vgpos a~mtart c~name2
         b~vkorg a~ntgew a~gewei a~werks
         b~inco1 b~inco2

         INTO TABLE it_del
         FROM ( ( lips AS a

         INNER JOIN likp AS b ON a~vbeln = b~vbeln )
         INNER JOIN kna1 AS c ON c~kunnr = b~kunnr )

         WHERE b~lfdat IN so_date
         AND   b~vstel IN so_shppt
         AND   a~matnr IN so_matnr.

  IF sy-subrc NE 0.
    sysubrc = 1.
  ELSE.
    sysubrc = 0.

* uploading login data to login table

    wa_log-usernam    = sy-uname.
    wa_log-lgdate     = sy-datum.
    wa_log-lgtime     = sy-uzeit.
    wa_log-reccnt     = sy-dbcnt.
    wa_log-deldatelo  = so_date-low.
    wa_log-deldatehg  = so_date-high.
    wa_log-shppntlo   = so_shppt-low.
    wa_log-shppnthg   = so_shppt-high.
    wa_log-materiallo = so_matnr-low.
    wa_log-materialhg = so_matnr-high.

    INSERT INTO zsr_del_login VALUES wa_log.

  ENDIF.

END-OF-SELECTION.


*List output logic follows*
*_________________________________________________________________________________________*

  IF sysubrc NE 0.                              "Error message display if no match found
    MESSAGE i000.

  ELSE.                                          "Display logic if match occured with input

*Sorting internal table by name*

    SORT it_del BY name1.


*Displayig data from internal table*

    LOOP AT it_del INTO wa_del.

      WRITE:/  wa_del-docno UNDER text-002,                                       "Document number
               wa_del-itmno UNDER text-003,                                       "Item number
               wa_del-matxt UNDER text-004,                                       "Material text
               wa_del-name1 UNDER text-005,                                       "Customer name1
               wa_del-name2 UNDER text-006,                                       "Customer name2
               wa_del-salor UNDER text-007,                                       "Sales organization
               wa_del-qnty  UNDER text-008 LEFT-JUSTIFIED UNIT wa_del-unit  ,     "Quantity
               wa_del-unit  UNDER text-009,                                       "Unit
               wa_del-plant UNDER text-010,                                       "Plant
               wa_del-inct1 UNDER text-011,                 "Incoterms1
               wa_del-inct2 UNDER text-012.                 "incoterms2

      AT END OF name1.                                       "Calculating total quantity for each customer
        SUM.
        SKIP.
        WRITE: 'Total quantity = ',wa_del-qnty LEFT-JUSTIFIED  UNIT wa_del-unit.
        WRITE: wa_del-unit.
        SKIP.
      ENDAT.

    ENDLOOP.
    ULINE.




  ENDIF.        "End of if sy-subrc ne 0.

Read only

Former Member
0 Likes
600

footer:

generally we use this for displaying page numbers,date and time.

for leaving lines use skip 3.

Read only

Former Member
0 Likes
600

Hi Sandeep,

To define a page footer, use the END-OF-PAGE event. This event occurs if, while processing a list page, the system reaches the lines reserved for the page footer, or if the RESERVE statement triggers a page break. Fill the lines of the page footer in the processing block following the event keyword END-OF-PAGE:

Syntax

END-OF-PAGE.

WRITE: ....

The system only processes the processing block following END-OF-PAGE if you reserve lines for the footer in the LINE-COUNT option of the REPORTstatement .

Read only

Former Member
0 Likes
600

hi

REPORT zxx line-count 25(3) line-size 200 .

this report will have 25 lines in a page..

22 lines - report

3 lines - reserved for footer message

reward if useful

Read only

Former Member
0 Likes
600

HI

REPORT ZREPORT NO STANDARD PAGE HEADING <b>LINE-COUNT 45(3) LINE- SIZE 100</b>) MESSAGE-ID ZNNR.

BY USEING LINE-COUNT U CAN DESIDE HOW MANY LINES FOR FOOTER

IN THIS OUT OF 45 LINES 3 LINES ARE ALLOCATED OFR FOOTER

REWARD IF USEFUL