Output of an Report to an WebBrowser

Hi Folks,
I got an important requirement .
The requirement is that for example when I ran an sales report I should get the report output in any webbrowser.
The webbrowser should ask for some username and password so when someone enter the correct username and password it should give my SAP report output.
And one more thing is if I use webbrowser how can i generate a link for this report output.
Help me out,,,, its a bit urgent.
Thanks & Regards,
Sudheer.

User id and Password And link
Then you have to Go For BSP, or WebDynpro or ITS.
If you dont want user id and password then
you can work with report submit with exporting list to memory. and you will get the list from memory and convert that listobject to HTML
For getting the list output from memory use the function
'LIST_FROM_MEMORY'
For converting to HTML use the function
'WWW_HTML_FROM_LISTOBJECT'
Now you have HTML objects, you have to use the class CL_GUI_HTML_VIEWER and class methods to display the html output , it generates URL, but that is not like normal urls,
But password userid options not possible.

Similar Messages

Excel Output For Standard Report In R12

Hi Experts,
My Client wants Excel Output for Standard Reports ( ex:-Open Purchase Order Report (by cost center)_xml)
I changed the default output to Excel in Template of xml publisher administrator Responsibility.
Now it is showing the Excel output, but The layout of report is not same as layout which in text output of standard report.
Please guide me is there any solution to develop the reports layout in ms-excel using xml file rather than rtf template.
Thanks
Durga.

Hi Alex,
Thanks for your replay.
Generating the new rtf template which is same as standard layout is difficult task for us. Actually we have 120 reports which have same requirement.
Is there any other solution for this . please guide me
Thanks
Durga
Edited by: 805567 on Jan 23, 2012 12:33 PM

Cancel_flag in PO Output for Communication report

I'm trying to build logic into an RTF template for the "PO Output for Communication" report to handle cancelled lines. The cancel_flag can be set to "Y" at any of 3 levels - PO Header, PO Line and PO shipment. The field is called the same thing (cancel_flag) at all 3 levels but it doesn't always exist at all 3 levels. What do I call the field in my "IF" statement, so that it is looking at the correct field? Right now, if I am at the line level and I want to check the cancel_flag, if it doesn't exist, it looks at the cancel_flag at the shipment level.

have to see your for-each statements.
and you can do it, by using .. to go up one level
example from current level to go up4 level up ../../../../CUSTOM_FLAG
../../../CUSTOM_FLAG three lvl up.
Need to know the cancel_flag element you said, i can see only one :) in the given xml.

How to download the output of a report along with column header

Hi,
Could someone please tell me on how to download the output of a report along with column header to .txt format. A download option needs to be given to the user using physical and logical file names .The report basically contains header details and item details and requirement is to download the same format into an .txt format.

Hello,
Try this FM:
Data: being of itab occurs 0,
matnr like mara-matnr,
maktx like makt-maktx,
end of itab.
data:begin of fld_tab occurs 0,
fld_name(20),
end of fld_tab.
fld_tab = 'Material'.
append fld_tab.
fld_tab = 'Material Desc'.
append fld_tab.
CALL FUNCTION 'WS_DOWNLOAD'
   EXPORTING
        BIN_FILESIZE            = ' '
        CODEPAGE                = ' '
         FILENAME                = 'C:\1.txt '
         FILETYPE                = 'DAT'
        MODE                    = ' '
        WK1_N_FORMAT            = ' '
        WK1_N_SIZE              = ' '
        WK1_T_FORMAT            = ' '
        WK1_T_SIZE              = ' '
        COL_SELECT              = ' '
        COL_SELECTMASK          = ' '
        NO_AUTH_CHECK           = ' '
   IMPORTING
        FILELENGTH              =
     TABLES
          DATA_TAB                = itab
          FIELDNAMES              = fld_tab
   EXCEPTIONS
        FILE_OPEN_ERROR         = 1
        FILE_WRITE_ERROR        = 2
        INVALID_FILESIZE        = 3
        INVALID_TYPE            = 4
        NO_BATCH                = 5
        UNKNOWN_ERROR           = 6
        INVALID_TABLE_WIDTH     = 7
        GUI_REFUSE_FILETRANSFER = 8
        CUSTOMER_ERROR          = 9
        OTHERS                  = 10
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Regards,
Naimesh

Fetching a transaction's output in the report

Hi,
I have to calculate stock on a particular date my report.
Transaction MB5B calculates stock on a particular date.
How can i pass the mandatory parameters to MB5B and fetch its output in the report itself?
Message was edited by: Nishant Gupta

Hi !
There's a little more help.
These:
SELECTION-SCREEN BEGIN OF BLOCK Database-selection
          WITH FRAME TITLE TEXT-001.
Text-001: Datenbankabgrenzungen
SELECT-OPTIONS: MATNR FOR MARD-MATNR MEMORY ID MAT
                                     MATCHCODE OBJECT MAT1,
*{   INSERT         PA9K013121                                        1
                MFRPN FOR MARA-MFRPN MEMORY ID MPN
                              MATCHCODE OBJECT HTN,
*}   INSERT
                BUKRS FOR T001-BUKRS MEMORY ID BUK,
                WERKS FOR T001W-WERKS MEMORY ID WRK,
                LGORT FOR T001L-LGORT,
                CHARG FOR MCHB-CHARG,
                BWTAR FOR MBEW-BWTAR,
                BWART FOR MSEG-BWART.
PARAMETERS SOBKZ LIKE MSEG-SOBKZ.
SELECTION-SCREEN SKIP.
SELECT-OPTIONS: DATUM FOR MKPF-BUDAT NO-EXTENSION.
Datumsintervall für Selektion
SELECTION-SCREEN END OF BLOCK Database-selection.
is the selection screen of the RM07MLBD.
All these parameters (i.e .MATNR, CHARG, BWART) can be passed with the submit command.
For example (where the p_... Parameters are parametes of YOUR report !).
SUBMIT RM07MLBD
       with matnr in p_matnr
       with bwart in p_bwart
       with charg in p_cahrg
       and return
       exporting list to memory.
The import if the list is a bit more dificult.
It's basically like this:
DATA LISTTAB LIKE LISTOBJECT
     OCCURS 1.
CALL FUNCTION 'LIST_FROM_MEMORY' TABLES LISTOBJECT = LISTTAB.
Then the list will be in the table LISOBJECT.
For more info see the docu of 'LIST_FROM_MEMORY'
Regards
Rainer

EBS: Email XML publisher output, from After Report Trigger in Data Template

Here is what I'm trying to do:
-- In EBS (11.5.10 CU2), I'm using XML publisher (5.6.2) data template and layout template to generate Output files (PDF, EXCEL etc)
--In the Data Template's AfterReport Trigger, I'm using the Concurrent Request Id to locate the Output file name and trying to Email that output file.
Problem:
-- When the AfterReport trigger code is executed, the code is NOT seeing the output file and hence the file is NOT emailed.
Observations/Questions:
-- From what I observe, the Output Post Processor ( that generates the Excel / PDF files) is running AFTER the code in AfterReport trigger... and hence the AfterReport trigger is Not quite seeing / able to access the output file.
So, the sequence of execution seems to be:
-- Before Report Trigger
-- Data Query (SQL statement)
-- After Report Trigger
-- Output Post Processor
Because the AfterReport Trigger is running before the Output Post Processor, it is Not able to see the output file. Is that a True statement?
If Yes, how else can the DataTemplate access the Output file?
If No, what could cause the AfterReport trigger to not see the output file?

Because the AfterReport Trigger is running before the Output Post Processor, it is Not able to see the output file. Is that a True statement?
I believe so, as the OPP works on the output of the Report after the Report has completed execution.
You could use the same approach as we do for bursting the report to different users. Write a Java Concurrent program based on "oracle.apps.xdo.oa.cp. XMLPReportBurst" with delivery channel Email to send the email output. You would need to add code to launch the Concurrent child request in your AfterReport Trigger:
function AfterReport return boolean is
jreq_id number;
begin
srw.message (100, 'DEBUG: AfterReport_Trigger +');
jreq_id:= FND_REQUEST.SUBMIT_REQUEST ('XDO','XDOBURST','','',FALSE,:P_CONC_REQUEST_ID,'Y',chr(0),
If (jreq_id=0)
then
srw.message (100,'Request id is zero');
end if;

How to hide the specified rows in the output of the report?

Hello all,
    I have a requirement where i have to hide some of the lines (<b>initial 6 lines</b> that is <b>6 rows</b>) in the output of the report.
How would I go about doing this?
Thanks for you time.

Hello Sai,
I believe this is query output ( e.g., )
Country   Sales
India        $100
USA        $200
Germany $300
You want to hide the line Germany $300
Case 1:
    If you can change the query, Filter on Country and exclude Germany
Case 2:
    If you can not change the query, use url appending and filter out Germany
Check webapi reference for the exact commands
Case 3:
    Only if you are using the NW2004s front-end, Report designer will be available for you. In this, you can delete the rows that you do not want and publish in web.
Case 1 and 2 solutions are available in older versions of front-end as well.
Regards,
Sheik Bilal

Can we use the output of a report as in input for the other report?

Dear All,
I would like to know if we have any option in OBIEE where in we can save the output of a report and use it as a filter for another report?
My scenario is like:
1) I have a report on ORDERS which gave me 250 orders.
2) I want to have a report on SHIPMENT table for these 250 Orders.
Can we save the result of report 1 as a filter and use it in 2nd report?
please advise.
Thanks,
Suma

Hi,
By using advanced tab in filters like filter based on another request we can achieve this
Regards
Naresh

Output of ALV report as attachment in email

Dear all ,
I would like to send output of ALV report as attachment in email.
i already written code for this using FM SO_NEW_DOCUMENT_ATT_SEND_API1.
I can able to send list output as HTM format. But I want to send ALV report output
As a attachment. How can I do this.please explain
Thanks in advance
Regards
Manohar

Hello,
U can sent like this.
Check this report
REPORT ZV_SEND_MAIL .
TABLES: EKKO.
PARAMETERS: P_EMAIL   TYPE SOMLRECI1-RECEIVER
                                  DEFAULT '[email protected]'.
TYPES: BEGIN OF T_EKPO,
EBELN TYPE EKPO-EBELN,
EBELP TYPE EKPO-EBELP,
AEDAT TYPE EKPO-AEDAT,
MATNR TYPE EKPO-MATNR,
END OF T_EKPO.
DATA: IT_EKPO TYPE STANDARD TABLE OF T_EKPO INITIAL SIZE 0,
      WA_EKPO TYPE T_EKPO.
TYPES: BEGIN OF T_CHAREKPO,
EBELN(10) TYPE C,
EBELP(5) TYPE C,
AEDAT(8) TYPE C,
MATNR(18) TYPE C,
END OF T_CHAREKPO.
DATA: WA_CHAREKPO TYPE T_CHAREKPO.
DATA:   IT_MESSAGE TYPE STANDARD TABLE OF SOLISTI1 INITIAL SIZE 0
                WITH HEADER LINE.
DATA:   IT_ATTACH TYPE STANDARD TABLE OF SOLISTI1 INITIAL SIZE 0
                WITH HEADER LINE.
DATA:   T_PACKING_LIST LIKE SOPCKLSTI1 OCCURS 0 WITH HEADER LINE,
        T_CONTENTS LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE,
        T_RECEIVERS LIKE SOMLRECI1 OCCURS 0 WITH HEADER LINE,
        T_ATTACHMENT LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE,
        T_OBJECT_HEADER LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE,
        W_CNT TYPE I,
        W_SENT_ALL(1) TYPE C,
        W_DOC_DATA LIKE SODOCCHGI1,
        GD_ERROR    TYPE SY-SUBRC,
        GD_RECIEVER TYPE SY-SUBRC.
*START_OF_SELECTION
START-OF-SELECTION.
*   Retrieve sample data from table ekpo
PERFORM DATA_RETRIEVAL.
*   Populate table with detaisl to be entered into .xls file
PERFORM BUILD_XLS_DATA_TABLE.
*END-OF-SELECTION
END-OF-SELECTION.
* Populate message body text
PERFORM POPULATE_EMAIL_MESSAGE_BODY.
* Send file by email as .xls speadsheet
PERFORM SEND_FILE_AS_EMAIL_ATTACHMENT
                               TABLES IT_MESSAGE
                                      IT_ATTACH
                                USING P_EMAIL
                                      'Example .xls documnet attachment'
                                      'XLS'
                                      'filename'
                             CHANGING GD_ERROR
                                      GD_RECIEVER.
*   Instructs mail send program for SAPCONNECT to send email(rsconn01)
PERFORM INITIATE_MAIL_EXECUTE_PROGRAM.
*&      Form DATA_RETRIEVAL
*       Retrieve data form EKPO table and populate itab it_ekko
FORM DATA_RETRIEVAL.
SELECT EBELN EBELP AEDAT MATNR
   UP TO 10 ROWS
    FROM EKPO
    INTO TABLE IT_EKPO.
ENDFORM.                    " DATA_RETRIEVAL
*&      Form BUILD_XLS_DATA_TABLE
*       Build data table for .xls document
FORM BUILD_XLS_DATA_TABLE.
CONSTANTS: CON_CRET TYPE X VALUE '0D', "OK for non Unicode
             CON_TAB TYPE X VALUE '09'.   "OK for non Unicode
*If you have Unicode check active in program attributes thnen you will
*need to declare constants as follows
*class cl_abap_char_utilities definition load.
*constants:
*    con_tab type c value cl_abap_char_utilities=>HORIZONTAL_TAB,
*    con_cret type c value cl_abap_char_utilities=>CR_LF.
CONCATENATE 'EBELN' 'EBELP' 'AEDAT' 'MATNR'
         INTO IT_ATTACH SEPARATED BY CON_TAB.
CONCATENATE CON_CRET IT_ATTACH INTO IT_ATTACH.
APPEND IT_ATTACH.
LOOP AT IT_EKPO INTO WA_CHAREKPO.
    CONCATENATE WA_CHAREKPO-EBELN WA_CHAREKPO-EBELP
                WA_CHAREKPO-AEDAT WA_CHAREKPO-MATNR
           INTO IT_ATTACH SEPARATED BY CON_TAB.
    CONCATENATE CON_CRET IT_ATTACH INTO IT_ATTACH.
    APPEND IT_ATTACH.
ENDLOOP.
ENDFORM.                    " BUILD_XLS_DATA_TABLE
*&      Form SEND_FILE_AS_EMAIL_ATTACHMENT
*       Send email
FORM SEND_FILE_AS_EMAIL_ATTACHMENT TABLES PIT_MESSAGE
                                          PIT_ATTACH
                                    USING P_EMAIL
                                          P_MTITLE
                                          P_FORMAT
                                          P_FILENAME
                                          P_ATTDESCRIPTION
                                          P_SENDER_ADDRESS
                                          P_SENDER_ADDRES_TYPE
                                 CHANGING P_ERROR
                                          P_RECIEVER.
DATA: LD_ERROR    TYPE SY-SUBRC,
        LD_RECIEVER TYPE SY-SUBRC,
        LD_MTITLE LIKE SODOCCHGI1-OBJ_DESCR,
        LD_EMAIL LIKE SOMLRECI1-RECEIVER,
        LD_FORMAT TYPE SO_OBJ_TP ,
        LD_ATTDESCRIPTION TYPE SO_OBJ_NAM ,
        LD_ATTFILENAME TYPE SO_OBJ_DES ,
        LD_SENDER_ADDRESS LIKE SOEXTRECI1-RECEIVER,
        LD_SENDER_ADDRESS_TYPE LIKE SOEXTRECI1-ADR_TYP,
        LD_RECEIVER LIKE SY-SUBRC.
LD_EMAIL   = P_EMAIL.
LD_MTITLE = P_MTITLE.
LD_FORMAT              = P_FORMAT.
LD_ATTDESCRIPTION      = P_ATTDESCRIPTION.
LD_ATTFILENAME         = P_FILENAME.
LD_SENDER_ADDRESS      = P_SENDER_ADDRESS.
LD_SENDER_ADDRESS_TYPE = P_SENDER_ADDRES_TYPE.
* Fill the document data.
W_DOC_DATA-DOC_SIZE = 1.
* Populate the subject/generic message attributes
W_DOC_DATA-OBJ_LANGU = SY-LANGU.
W_DOC_DATA-OBJ_NAME = 'SAPRPT'.
W_DOC_DATA-OBJ_DESCR = LD_MTITLE .
W_DOC_DATA-SENSITIVTY = 'F'.
* Fill the document data and get size of attachment
CLEAR W_DOC_DATA.
READ TABLE IT_ATTACH INDEX W_CNT.
W_DOC_DATA-DOC_SIZE =
     ( W_CNT - 1 ) * 255 + STRLEN( IT_ATTACH ).
W_DOC_DATA-OBJ_LANGU = SY-LANGU.
W_DOC_DATA-OBJ_NAME   = 'SAPRPT'.
W_DOC_DATA-OBJ_DESCR = LD_MTITLE.
W_DOC_DATA-SENSITIVTY = 'F'.
CLEAR T_ATTACHMENT.
REFRESH T_ATTACHMENT.
T_ATTACHMENT[] = PIT_ATTACH[].
* Describe the body of the message
CLEAR T_PACKING_LIST.
REFRESH T_PACKING_LIST.
T_PACKING_LIST-TRANSF_BIN = SPACE.
T_PACKING_LIST-HEAD_START = 1.
T_PACKING_LIST-HEAD_NUM = 0.
T_PACKING_LIST-BODY_START = 1.
DESCRIBE TABLE IT_MESSAGE LINES T_PACKING_LIST-BODY_NUM.
T_PACKING_LIST-DOC_TYPE = 'RAW'.
APPEND T_PACKING_LIST.
* Create attachment notification
T_PACKING_LIST-TRANSF_BIN = 'X'.
T_PACKING_LIST-HEAD_START = 1.
T_PACKING_LIST-HEAD_NUM   = 1.
T_PACKING_LIST-BODY_START = 1.
DESCRIBE TABLE T_ATTACHMENT LINES T_PACKING_LIST-BODY_NUM.
T_PACKING_LIST-DOC_TYPE   = LD_FORMAT.
T_PACKING_LIST-OBJ_DESCR = LD_ATTDESCRIPTION.
T_PACKING_LIST-OBJ_NAME   = LD_ATTFILENAME.
T_PACKING_LIST-DOC_SIZE   = T_PACKING_LIST-BODY_NUM * 255.
APPEND T_PACKING_LIST.
* Add the recipients email address
CLEAR T_RECEIVERS.
REFRESH T_RECEIVERS.
T_RECEIVERS-RECEIVER = LD_EMAIL.
T_RECEIVERS-REC_TYPE = 'U'.
T_RECEIVERS-COM_TYPE = 'INT'.
T_RECEIVERS-NOTIF_DEL = 'X'.
T_RECEIVERS-NOTIF_NDEL = 'X'.
APPEND T_RECEIVERS.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
       EXPORTING
            DOCUMENT_DATA              = W_DOC_DATA
            PUT_IN_OUTBOX              = 'X'
            SENDER_ADDRESS             = LD_SENDER_ADDRESS
            SENDER_ADDRESS_TYPE        = LD_SENDER_ADDRESS_TYPE
            COMMIT_WORK                = 'X'
       IMPORTING
            SENT_TO_ALL                = W_SENT_ALL
       TABLES
            PACKING_LIST               = T_PACKING_LIST
            CONTENTS_BIN               = T_ATTACHMENT
            CONTENTS_TXT               = IT_MESSAGE
            RECEIVERS                  = T_RECEIVERS
       EXCEPTIONS
            TOO_MANY_RECEIVERS         = 1
            DOCUMENT_NOT_SENT          = 2
            DOCUMENT_TYPE_NOT_EXIST    = 3
            OPERATION_NO_AUTHORIZATION = 4
            PARAMETER_ERROR            = 5
            X_ERROR                    = 6
            ENQUEUE_ERROR              = 7
            OTHERS                     = 8.
* Populate zerror return code
LD_ERROR = SY-SUBRC.
* Populate zreceiver return code
LOOP AT T_RECEIVERS.
    LD_RECEIVER = T_RECEIVERS-RETRN_CODE.
ENDLOOP.
ENDFORM.
*&      Form INITIATE_MAIL_EXECUTE_PROGRAM
*       Instructs mail send program for SAPCONNECT to send email.
FORM INITIATE_MAIL_EXECUTE_PROGRAM.
WAIT UP TO 2 SECONDS.
SUBMIT RSCONN01 WITH MODE = 'INT'
                WITH OUTPUT = 'X'
                AND RETURN.
ENDFORM.                    " INITIATE_MAIL_EXECUTE_PROGRAM
*&      Form POPULATE_EMAIL_MESSAGE_BODY
*        Populate message body text
FORM POPULATE_EMAIL_MESSAGE_BODY.
REFRESH IT_MESSAGE.
IT_MESSAGE = 'Please find attached a list test ekpo records'.
APPEND IT_MESSAGE.
ENDFORM.                    " POPULATE_EMAIL_MESSAGE_BODY
If useful reward.
Vasanth

How to get the output of the report in pdf format

how to get the output of the report in pdf format?
Thanks in advance,
madan.

Refer these links
http://www.sap-img.com/bc037.htm
http://www.members.tripod.com/abap4/Save_Report_Output_to_a_PDF_File.html
CONVERT_ABAPSPOOLJOB_2_PDF FM convert abap spool output to PDF

Output of a report to outlook via excel format..

How can we send output of a report as .xls format through mail (outlook) as an attachement.
Iam able to send via .txt, pls someone suggest how to send the same in .xls format.

Hi
There are very good threads in SCN for this.
See Neptune thread,it will definately help you.
send mail in excel format
Let me know in case of any issues.
Sachin Sharma

Output of a Report program to excelsheet

Hello,
I am having a problem while saving the output of the report progam which is an ALV list, in the output, the SAVE option of the path SYSTEM--> LIST --> Save ..is not working. It is not active in the output. can you help me to activate that option or this any other process of saving the output.
I want to know, is there any possibility of saving outputs of same program (which LIST and ALV grid) in a single excel file as different workbook.
Please solvee my query regarding the issue.
Thanx.

hi,
refer to this thread.
Re: Excel sheet download problem from ALV
http://www.jt77.com/development1/programming-24845.html
regards,
sreelakshmi

Output of one report is input to another report?

Hi Expert's,
Is it possible to use output of one report as an input to another report.I mean to say fields which are avialble in the first report is used as a input for another report.
Thanks,
vasu.

Hi,
Yes, you can do that.
You can run a first report having characteristics as output. You can then use the returned cahracteristic values as input variable for a second query.
You can achieve this by creating a replacement path (based upon your first query) variable in the second report.
Another option would be to use the report to report interface (RRI).
hope this helps,
Olivier.

Embedding output of a report in an Sub screen(Control)

Hii All,
I have a requirement where we need to display one transaction output on a custom subscreen.That's means i need to display the output of one report on subscreen of another transaction.
Regards,
Subhash

Hi,
To use a subscreen we must call it in the flow logic (both PBO and PAI) of the main screen. The CALL SUBSCREEN statement tells the system to execute the PBO and PAI events for the subscreen as part of the PBO or PAI events of the main screen. The flow logic of your main program should look as follows:
PROCESS BEFORE OUTPUT.
CALL SUBSCREEN <area> INCLUDING u2018<program>u2019 u2019<screen>u2019.
PROCESS AFTER INPUT.
CALL SUBSCREEN <area>.
Regards,
Divya.

Output of a report in PDF Format

Hi all,
I need to get the Output of a report in PDF format.
Please suggest me hwo to do this requirement.
If having please give me the sample code
Thanks and Regards
Ajay

sample code for PDF conversion...
tables : vbrk. "Billing Document: Header Data
     Type pool declaration
type-pools slis.
     Selection screen
selection-screen begin of block b1 with frame.
select-options : p_date for vbrk-aedat.
selection-screen end of block b1.
     Types declaration
types : begin of t_vbrk,
        vbeln type vbrk-vbeln, "Billing Document
        aedat type vbrk-aedat, "Changed on(date)
        fksto type vbrk-fksto, "Billing document is cancelled
        end of t_vbrk.
     Internal table declaration
data : i_vbrk type table of t_vbrk,
       w_vbrk type t_vbrk.
     Field catalog declaration
data : i_cat type slis_t_fieldcat_alv,
       w_cat like line of i_cat,
       t_print type slis_print_alv.
data :top type table of slis_listheader with header line.
data : event type table of slis_alv_event with header line.
     start of selection
top-of-page.
start-of-selection.
perform get_dat.
if sy-subrc = 0.
    perform build_cat.
    perform alv_print_info.
    perform sub_create_spool_id.
    perform display_data.
    perform sub_send_mail.
endif.
     Subroutine GET_DAT
form get_dat .
*---To fetch canelled billing documents.
select vbeln
         aedat
         fksto
from   vbrk
into table i_vbrk
where aedat in p_date and fksto = 'X'.
endform.                    " GET_DAT
   Subroutine DISPLAY_DATA
form display_data .
call function 'REUSE_ALV_EVENTS_GET'
importing
   et_events             = event[]
top-typ = 'H'.
top-info = sy-title.
append top.
call function 'REUSE_ALV_GRID_DISPLAY'
exporting
   i_callback_program                = sy-repid
   i_callback_top_of_page            = 'NAN'
   i_grid_title                      = 'Alok Arun (Mr.A)'
   it_fieldcat                       = i_cat
   it_events                         = event[]
   is_print                          = t_print
tables
    t_outtab                          = i_vbrk
endform.                    " DISPLAY_DATA
*&      Subroutine BUILD_CAT
form build_cat .
w_cat-seltext_l = 'Billing Document'.
w_cat-col_pos = '1'.
w_cat-tabname = 'I_VBRK'.
w_cat-fieldname = 'VBELN'.
w_cat-ref_fieldname = 'VBELN'.
w_cat-hotspot = 'X'.
append w_cat to i_cat.
clear w_cat.
w_cat-seltext_l = 'Cancelled on'.
w_cat-col_pos = '2'.
w_cat-tabname = 'I_VBRK'.
w_cat-fieldname = 'AEDAT'.
w_cat-ref_fieldname = 'AEDAT'.
w_cat-hotspot = 'X'.
append w_cat to i_cat.
clear w_cat.
endform.                    " BUILD_CAT
*&      Form alv_print_info
form alv_print_info .
t_print-no_print_selinfos = 'X'.
t_print-no_coverpage       = 'X'.
t_print-no_print_listinfos = 'X'.
endform.                    " alv_print_info
*&      Form sub_create_spool_id
form sub_create_spool_id .
data: lv_text(50) type c.
lv_text = sy-title.
new-page line-size sy-linsz
print on destination 'LP01'
cover text lv_text
list name 'LIST NAME SOL MANAGER'(002)
list dataset 'LIST DATASET'(003)
immediately ' '
keep in spool 'X'
new list identification 'X'
no dialog.
endform.                    " sub_create_spool_id
*&      Form sub_send_mail
form sub_send_mail .
data:     v_spono like tsp01-rqident.
v_spono = sy-spono.
data:
          v_type         like soodk-objtp,
          i_pdflist      like tline occurs 0,
         t_print        TYPE slis_print_alv,
          jobname        like tbtcjob-jobname,
          jobcount       like tbtcjob-jobcount,
          numbytes       type i,
          pdfspoolid     like tsp01-rqident,
          jobname2       like tbtcjob-jobname,
          jobcount2      like tbtcjob-jobcount,
          i_compresslist like soli   occurs 0.
data: pdf like tline occurs 100 with header line,
      objbin like solisti1 occurs 10 with header line.
*--convert into PDF
call function 'CONVERT_ABAPSPOOLJOB_2_PDF'
    exporting
      src_spoolid              = v_spono
      no_dialog                = ' '
    importing
      pdf_bytecount            = numbytes
      pdf_spoolid              = pdfspoolid
      btc_jobname              = jobname2
      btc_jobcount             = jobcount2
    tables
      pdf                      = pdf
    exceptions
      err_no_abap_spooljob     = 1
      err_no_spooljob          = 2
      err_no_permission        = 3
      err_conv_not_possible    = 4
      err_bad_destdevice       = 5
      user_cancelled           = 6
      err_spoolerror           = 7
      err_temseerror           = 8
      err_btcjob_open_failed   = 9
      err_btcjob_submit_failed = 10
      err_btcjob_close_failed = 11.
if sy-subrc <> 0.
endif.
*-- change the width of the pdf table --
call function 'SX_TABLE_LINE_WIDTH_CHANGE'
    exporting
      line_width_src              = 134
      line_width_dst              = 255
    tables
      content_in                  = pdf
      content_out                 = objbin
    exceptions
      err_line_width_src_too_long = 1
      err_line_width_dst_too_long = 2
      err_conv_failed             = 3
      others                      = 4.
if sy-subrc <> 0.
endif.
endform.

Output of an Report to an WebBrowser

Similar Messages

Maybe you are looking for