How to find a report output - URGENT

Hi all,
We have an ABAP program and its basically a report, how can I see the output of the report ie the list.
Please let me know
thanks
Sabrina.

thanks Priyank for your reply.
Well we have an ABAP program in BW that outputs a flat file of data. It is basically a report, it runs every morning and I need to find out the output of the report. In SM37 when I select the job and click the button SPOOL, I get the following message that I don't have authorization to view the list.
No authorization to select from spool request 24,323 in system CBP
and then it says list contains no data.
What should I do? Please let me know.
thanks
Sabrina.

Similar Messages

How to Generate HTML Report Output in Excel

Dear Experts,
How to convert HTML report output in Excel.
I have reports which output is coming in HTML format & the same I want to use in Excel.
So tell me how I can covert the same in Excel.
Thanks
Sudhir

hello,
in your case, you might want to make the following :
a) use DESFORMAT=HTML
b) use MIMETYPE=application/vnd.msexcell (or whatever mimetype your excel application is bound to)
i am nor sure if excel will understeand our HTMLCSS (which is actually HTML4.0 using layers for best possible rendering of the paper page in the browser).
regards,
the oracle reports team

How to send a report output as a FAX ?

Hallo Experts,
How to send a report output as a FAX ?
Suppose if I have all the data in an internal table, I will show it as a normal list OR ALV list output.
In the application tool bar I should have a button, and by clicking it the output should go to the customer as FAX. How can I send it to a FAX ? Any Function modules ?
Please help me with an example program.
Regards,
Matt.

Hi,
Hope the code given below helps you.
FORM SEND_FAX
TABLES DOC2FAX STRUCTURE TEST_DOC
USING COUNTRY
NUMBER.
DATA: SID(5) TYPE N.
DATA BEGIN OF POPT.
INCLUDE STRUCTURE ITCPO.
DATA END OF POPT.
DATA BEGIN OF PRES.
INCLUDE STRUCTURE ITCPP.
DATA END OF PRES.
CLEAR POPT.
POPT-TDCOPIES = 1. " one copy
* POPT-TDDEST = " done internaly by script,
* POPT-TDPRINTER = " do not fill !!!
POPT-TDNEWID = 'X'. " do not reuse old spool request
POPT-TDDATASET = 'TEST'(022). " fill as you want
POPT-TDSUFFIX1 = 'FAX'(023). " fill as you want
POPT-TDSUFFIX2 = SY-UNAME. " fill as you want
POPT-TDIMMED = 'X'. " send now
POPT-TDLIFETIME = 8. " keep 8 days in spool
POPT-TDTELENUM = NUMBER. " number without country code
POPT-TDTELELAND = COUNTRY. " country of recipient
POPT-TDCOVER = 'test fax'(024).
POPT-TDCOVTITLE = 'test fax'(024).
* POPT-TDIEXIT = 'X'.
CALL FUNCTION 'PRINT_TEXT'
EXPORTING
APPLICATION = 'TX'
ARCHIVE_INDEX = ' '
ARCHIVE_PARAMS = ' '
DEVICE = 'TELEFAX' "<<< here we say: fax it !
DIALOG = 'X'
HEADER = HEADER
OPTIONS = POPT
IMPORTING
RESULT = PRES
TABLES
LINES = DOC2FAX
EXCEPTIONS
OTHERS = 01.
* do not bother with exception in sample code
* CANCELED = 01
* DEVICE = 02
* FORM = 03
* OPTIONS = 04
* UNCLOSED = 05
* UNKNOWN = 06
* FORMAT = 07
* TEXTFORMAT = 08
* EXTERNAL = 09.
IF SY-SUBRC = 0.
* arriving here means we could send:
SID = PRES-TDSPOOLID.
IF SID > '00000'.
MESSAGE S433 WITH SID.
ENDIF.
LEAVE .
ELSE.
* do not bother with exception in sample code
MESSAGE A400 WITH 'PRIN_TEXT'.
ENDIF.
ENDFORM. " SEND_FAX
Regards,
Siddarth

How to retrieve complete report output in HTML format

Hi,
I'm looking for how to retrieve complete report output in HTML format.
I have tried the following and it only give me first page of the report output where in the actual report output should be 5 pages. Is there something I'm missing.
CallbackOption[] boCallOpt = new CallbackOption[1];
ImageManagement boImgMan = new ImageManagement();
boImgMan.setCallbackScript("getImage.jsp");
boImgMan.setImageManagementHolder("imageName");
boImgMan.setDocumentReferenceHolder("docRef");
boCallOpt[0] = boImgMan;
RetrieveData oRetrieveData = new RetrieveData();
RetrieveView oRetrieveView = new RetrieveView();
oRetrieveView.setCallbackOption(boCallOpt);
oRetrieveData.setRetrieveView(oRetrieveView);
Action[] oActions;
oActions = new Action[1];
oActions[0] = fillPrompts;
oReportEngine.getDocumentInformation(boDocInfo.getDocumentReference(), null, oActions, null,oRetrieveData);
Testing this on BOE XI 3.0
Thanks,

For Web Intelligence, HTML is an interactive viewing format and not an export format such as PDF.
Note that the HTML will be embedded with postback URLs to the application for images and drill downs.
Closest you'd get is to be able to specify HTML output of an entire REPORT rather than REPORT_PAGE in the ViewSupport.setViewMode method. But this brings back just one report in the document, and will have postback URLs mentioned above.
Sincerely,
Ted Ueda

How to convert Oracle Report Output to Excel Spread Sheet..

Hello Sir,
How to convert Oracle Report Output to Excel Spread Sheet..
Thanks..

Hello,
Please give us more information what kind of report(s). Sample example etc.,
Sri

How to send the report output to the application server in a excel file

Hello,
how to send the report output to the application server in a excel file.
and the report runs in background.
Thanks in advance.
Sundeep

Dear Sundeep.
I'm providing you with the following piece of code ... Its working fine for me ... hopefully it suits your requirement ...
D A T A D E C L A R A T I O N *
TYPES: BEGIN OF TY_EXCEL,
CELL_01(80) TYPE C,
CELL_02(80) TYPE C,
CELL_03(80) TYPE C,
CELL_04(80) TYPE C,
CELL_05(80) TYPE C,
CELL_06(80) TYPE C,
CELL_07(80) TYPE C,
CELL_08(80) TYPE C,
CELL_09(80) TYPE C,
CELL_10(80) TYPE C,
END OF TY_EXCEL.
DATA: IT_EXCEL TYPE STANDARD TABLE OF TY_EXCEL,
WA_EXCEL TYPE TY_EXCEL..
E V E N T : S T A R T - O F - S E L E C T I O N *
START-OF-SELECTION.
Here you populate the Internal Table.
Display - Top of the Page.
PERFORM DISPLAY_TOP_OF_PAGE.
E V E N T : E N D - O F - S E L E C T I O N *
END-OF-SELECTION.
SET PF-STATUS 'GUI_STATUS'.
E V E N T : A T U S E R - C O M M AN D *
AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'EXPORT'.
Exporting the report data to Excel.
PERFORM EXPORT_TO_EXCEL.
ENDCASE.
*& Form DISPLAY_TOP_OF_PAGE
text
--> p1 text
<-- p2 text
FORM DISPLAY_TOP_OF_PAGE .
SKIP.
WRITE: /05(128) SY-ULINE,
/05 SY-VLINE,
06(127) 'O R I C A'
CENTERED COLOR 1,
132 SY-VLINE.
WRITE: /05(128) SY-ULINE,
/05 SY-VLINE,
06(127) 'Shift Asset Depreciation - Period/Year-wise Report.'
CENTERED COLOR 4 INTENSIFIED OFF,
132 SY-VLINE.
WRITE: /05(128) SY-ULINE.
E X C E L O P E R A T I O N
CLEAR: IT_EXCEL[],
WA_EXCEL.
PERFORM APPEND_BLANK_LINE USING 1.
WA_EXCEL-cell_02 = ' XYZ Ltd. '.
APPEND WA_EXCEL TO IT_EXCEL.
CLEAR: WA_EXCEL.
WA_EXCEL-cell_02 = 'Shift Asset Depreciation - Period/Year-wise Report.'.
APPEND WA_EXCEL TO IT_EXCEL.
PERFORM APPEND_BLANK_LINE USING 1.
ENDFORM. " DISPLAY_TOP_OF_PAGE
*& Form APPEND_BLANK_LINE
text
-->P_1 text
FORM APPEND_BLANK_LINE USING P_LINE TYPE I.
DO P_LINE TIMES.
CLEAR: WA_EXCEL.
APPEND WA_EXCEL TO IT_EXCEL.
enddo.
ENDFORM.
*& Form EXPORT_TO_EXCEL
text
--> p1 text
<-- p2 text
FORM EXPORT_TO_EXCEL .
DATA: L_FILE_NAME(60) TYPE C.
Create a file name
CONCATENATE 'C:\' 'Shift_Depn_' SY-DATUM6(2) '.' SY-DATUM4(2)
'.' SY-DATUM+0(4) INTO L_FILE_NAME.
Pass the internal table (it_excel which is already populated )
to the function module for excel download.
CALL FUNCTION 'WS_EXCEL'
exporting
filename = L_FILE_NAME
tables
data = IT_EXCEL
exceptions
unknown_error = 1
others = 2.
if sy-subrc <> 0.
message e001(ymm) with 'Error in exporting to Excel.'.
endif.
ENDFORM. " EXPORT_TO_EXCEL
*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
When you click the button - Export to Excel ( GUI-Status) you'll be able to export the content of the Internal Table to an Excel file .......
Regards,
Abir
Don't forget to award Points *

How to find out Reports version in Apps?

How to find out Reports version in Apps from within Apps?
Help-->About Oracle Application => gives only Database, Application and Forms version
If not through Apps are there ways to find it through Unix commands in the server
or
through any SQL query in SQLPlus or TOAD?

schavali wrote:
One way to do this would be to source your APPS environment file, then cd to $806_ORACLE_HOME/orainst and execute inspdver.
HTH
SriniThanks.
There is something weird. The RDBMS version that inspdver gives is 8.0.6.3.0, whereas from Apps, Help-->About Oracle Applications it gives 9.2.0.6.0.
Hence I am not sure what version number inspdver returns.
hsawwan wrote:
Have a look at the following thread:
how to find the developer version
Re: how to find the developer version
Thanks.
Unfortunately it does not give the Reports version.

How to find out report program for a particular smartform?

Hi,
How to find out report program from which the smart form function module is calling?
Thanks.

Hi
There's no tools to do that, u can only find out the program where a string with the name of your smartform is: probably it'll be your program.
U can try to use the program RPR_ABAP_SOURCE_SCAN in order to looking for a string a abap program.
But if the name of smartform is transfer to program dinamycally, u've few chances.
Max

How to find the reports/Txs that are affected by changes made in NA30

Hi All,
Does anyone know how to find the reports and transactions that are affected by ISH Billing (Interim Billing /Final billing) in hte Tx NA30. I need to modify the some functiionality of Interim billing at NA30 and still maintain the consitenecy of NA30.
Many thanks & Regards,
Vijaya

No idea about any such report but from SAP help got following list of billing reports. It might be helpful
RNAABGR0 IS-H: Revenue Accrual
RNAABRKZ IS-H: Change Billing Indicator of a Case
RNABD000 IS-H: Patient Billing
RNABILB0   IS-H: Change Billing Block via Conditions
RNABILB1   IS-H: Change Billing Block via Conditions (Outpatient Cases)
RNADIN03   IS-H: Billing Document Mass Print Program
RNAFSPER IS-H: Change Billing Block
RNANFAL0 IS-H: Set Cases Without Billable Services to "Final Billed"
RNANFAL1 IS-H: Set Outpatient Cases Without Services to "Final Billed"
RNANFAL2 IS-H: Set Fully Billed Cases to "Final Billed"
RNASED00 IS-H: Delete Case Selections
RNASEK00 IS-H: Copy Case Selection
RNASELM0 IS-H: Billing - Process Messages
RNASEL00 IS-H: Case Selection
RNASEL01 IS-H: Case Selection via Outpatient Visits
RNASTO01 IS-H: Cancel Billing Documents for Case [Live Mode]
RNASTO02 IS-H: Cancel Billing Documents for Case: Mass Partial Cancellation [Live Mode]
RNASTO03 IS-H: Cancel Invoice Items per Case (Partial Cancellation) [Live Mode]
RNASTO04 IS-H: Cancel Provisional Invoice
RNAPRV04 IS-H: Cost Reimbursement u2013 Direct Patient Billing
RNAENT00 IS-H: Billing Status of Inpatient Cases
RNA_CASCADE_BILLING IS-H: Cascade Bill Processing

How to download the report output into PDF format

Hi friedns
from the report output when user clicks download button
it has to download to PDF format
how to do this
thanks in advance
venu

hi venu,
check this sample code
Save Report Output to a PDF File
This report takes another report as input, and captures the output of that report. The output is then converted to
PDF and saved to a local file. This shows how to use some of the PDF function modules, as well as an easy way to
create PDF files.
Source Code Listing
report zabap_2_pdf.
*-- Enhancements: only allow to be run with variant. Then called
*-- program will be transparent to users
*-- TABLES
tables:
tsp01.
*-- STRUCTURES
data:
mstr_print_parms like pri_params,
mc_valid(1) type c,
mi_bytecount type i,
mi_length type i,
mi_rqident like tsp01-rqident.
*-- INTERNAL TABLES
data:
mtab_pdf like tline occurs 0 with header line,
mc_filename like rlgrap-filename.
*-- SELECTION SCREEN
parameters:
p_repid like sy-repid, " Report to execute
p_linsz like sy-linsz default 132, " Line size
p_paart like sy-paart default 'X_65_132'. " Paper Format
start-of-selection.
concatenate 'c:\'
p_repid
'.pdf'
into mc_filename.
*-- Setup the Print Parmaters
call function 'GET_PRINT_PARAMETERS'
exporting
authority= space
copies = '1'
cover_page = space
data_set = space
department = space
destination = space
expiration = '1'
immediately = space
in_archive_parameters = space
in_parameters = space
layout = space
mode = space
new_list_id = 'X'
no_dialog= 'X'
user = sy-uname
importing
out_parameters = mstr_print_parms
valid = mc_valid
exceptions
archive_info_not_found = 1
invalid_print_params = 2
invalid_archive_params = 3
others = 4.
*-- Make sure that a printer destination has been set up
*-- If this is not done the PDF function module ABENDS
if mstr_print_parms-pdest = space.
mstr_print_parms-pdest = 'LOCL'.
endif.
*-- Explicitly set line width, and output format so that
*-- the PDF conversion comes out OK
mstr_print_parms-linsz = p_linsz.
mstr_print_parms-paart = p_paart.
submit (p_repid) to sap-spool without spool dynpro
spool parameters mstr_print_parms
via selection-screen
and return.
*-- Find out what the spool number is that was just created
perform get_spool_number using sy-repid
sy-uname
changing mi_rqident.
*-- Convert Spool to PDF
call function 'CONVERT_ABAPSPOOLJOB_2_PDF'
exporting
src_spoolid= mi_rqident
no_dialog = space
dst_device = mstr_print_parms-pdest
importing
pdf_bytecount = mi_bytecount
tables
pdf = mtab_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
others = 12.
call function 'DOWNLOAD'
exporting
bin_filesize = mi_bytecount
filename = mc_filename
filetype = 'BIN'
importing
act_filename = mc_filename
tables
data_tab = mtab_pdf.
FORM get_spool_number *
Get the most recent spool created by user/report *
--> F_REPID *
--> F_UNAME *
--> F_RQIDENT *
form get_spool_number using f_repid
f_uname
changing f_rqident.
data:
lc_rq2name like tsp01-rq2name.
concatenate f_repid+0(8)
f_uname+0(3)
into lc_rq2name separated by '_'.
select * from tsp01 where rq2name = lc_rq2name
order by rqcretime descending.
f_rqident = tsp01-rqident.
exit.
endselect.
if sy-subrc ne 0.
clear f_rqident.
endif.
endform." get_spool_number
Regards,
Naveen

How to send the Report output thru email

Dear All,
Is there a way to send the output of a abap report thru mail. I am sure it is there.
My report output is as following.
Emp Code : A01234
Name: XYZ
Email-ID: [email protected]
Dear XYZ,
You have Rs....... as outstanding. Please clear all dues by ..(date).
Thankyou,
asdf.
Please advice how to accomplish this. Send a sample source code if possible.
Regards,
Alok.

Below you can find the sample code for sending the report as email.
Do use this as cross reference..
DATA: reclist      LIKE somlreci1 OCCURS 0 WITH HEADER LINE,
        objpack      LIKE sopcklsti1 OCCURS 1 WITH HEADER LINE,
        objhead      LIKE solisti1   OCCURS 1 WITH HEADER LINE,
        objtxt       LIKE solisti1   OCCURS 10 WITH HEADER LINE,
        objhex       LIKE solix      OCCURS 10 WITH HEADER LINE,
        listobject   LIKE abaplist   OCCURS 0 WITH HEADER LINE,
        so_ali       LIKE soli       OCCURS 0 WITH HEADER LINE,
        list_index   LIKE sy-lsind VALUE 0,
        packing_list LIKE sopcklsti1,
        docdata      LIKE sodocchgi1,
        tab_lines    TYPE i,
        l_rqident    LIKE tsp01-rqident,
        att_type     LIKE soodk-objtp.
objtxt[] = mail_text[].
IF p_skip_attach IS INITIAL.      " INS SIR 3971 TODD
    SYSTEM-CALL LOAD LISTLEVEL-STACK INTO wrkstack.
    IF wrkstack[] IS INITIAL.
      SKIP 2.
      WRITE: /30 text-001 COLOR 5.
    ENDIF.
ENDIF.                                " INS SIR 3971 TODD
Prepare Receipient List
REFRESH: reclist.
LOOP AT rcpnt_userids.
    IF rcpnt_userids-l_adr_name NA '@'.
      reclist-receiver    = rcpnt_userids-usrnam.
      reclist-rec_type    = 'B'.
      reclist-express     = 'X'.
    ELSE.
      reclist-receiver    = rcpnt_userids-l_adr_name.
      reclist-rec_type    = 'U'.
      reclist-express     = 'X'.
    ENDIF.
    APPEND reclist.
    CLEAR reclist.
ENDLOOP.
Prepare Doc Data
DESCRIBE TABLE objtxt LINES tab_lines.
READ     TABLE objtxt INDEX tab_lines.
docdata-doc_size = ( tab_lines - 1 ) * 255 + STRLEN( objtxt ).
docdata-obj_langu = sy-langu.
docdata-obj_name   = 'ABAP Listing'.
docdata-obj_descr = subject.
docdata-sensitivty = 'O'.
Prepare OBJPACK
CLEAR objpack-transf_bin.
objpack-head_start = 1.
objpack-head_num   = 0.
objpack-body_start = 1.
objpack-body_num   = tab_lines.
objpack-doc_type   = 'RAW'.
APPEND objpack.
att_type = 'ALI'.
DESCRIBE TABLE so_ali LINES tab_lines.
READ     TABLE so_ali INDEX tab_lines.
objpack-doc_size = ( tab_lines - 1 ) * 255 + STRLEN( so_ali ).
objpack-transf_bin = 'X'.
objpack-head_start = 1.
objpack-head_num   = 0.
objpack-body_start = 1.
objpack-body_num   = tab_lines.
objpack-doc_type   = att_type.
objpack-obj_name   = 'ATTACHMENT'.
objpack-obj_descr = subject.
APPEND objpack.
SAP supplied API function module to send Message
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
    EXPORTING
      document_data              = docdata
      put_in_outbox              = 'X'
      commit_work                = 'X'     "used from rel. 6.10
    TABLES
      packing_list               = objpack
      object_header              = objhead
      contents_bin               = so_ali
      contents_txt               = objtxt
      receivers                  = reclist
    EXCEPTIONS
      too_many_reclist           = 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.
IF sy-subrc <> 0.
    MESSAGE i398(00) WITH 'SAP Office API Error'
                          sy-subrc
ENDIF.

How do find standard report for

Please help me my client asked me to look for standard report but am lost am new cleint's easy access dont not have these so how do i find these reports
AR Deposit Report
Costs charged to Warranty orders
Costs Of Goods Sold Report (by Market Business)
Units shipped not Delivered
Units shipped not Invoiced

The kind of report in my mind.
- What is my last month or last year activity ?
- What was past tennis schedules ?
Did I go to tennis regularly ?
etc
You could use a text editor and manipulate a copy of the > ics file, or you could use Apple script to extract and
process the historical events.
The ics files looks too complicated.
I don't know, Apple script.
Looking for, if there any report option in the iCal.

How to find the report for the SAP query (Query exists in table AQLQCAT)

Hello Experts,
I need to find the tables used in the SAP Query but i don't have access to transaction SQ01,SQ02 and SQ03 to check the same.
Therefore i checked table AQLQCAT and got the SAP Queries in the system. Then searched for the reports that would have been generated for the same passing AQusergroupquery name* in transaction SE38.
But unfortunately the program does not exists for the given paramenter.
Could you please let me know how to get the report name for the SAP Query.
Secondly please suggest any other way of checking the tables used in the SAP Query.
Also the table name from where i can download the SAP Queries.
Thanks in advance.
Regards,
Rahul Sinha

I suggest you a simple method.
Execute the query. When the selection screen is showed, go to menu and click to SYSTEM->STATUS.
Check the program name and double click it to access the program code.
Search for tables or functions into the source code in order to understand where data are taken.
If you do not find anything , go to the program atttribute and check for logic database, sometimes they are used....
Best regards.

How to find out reports count

HI,.
I've doubt that how do we know the no .of reports in webcat.. Let's say i hae copied the web at from prod today, if the businees add new reports . how to find the count of the reports .

Hi,
go to answers, there is search option..
type * and search..
along with the report names, it'll give count also.. like: Search resulted in 3393 items.
Search count can be restricted to particular folder also, Select folder from left then type * and search..
But, this count will be only on reports.. it omits prompts..
Edited by: Kishore Guggilla on Nov 4, 2010 11:47 AM

How to send ALV report Output through mail in background !

Hi ,
I had an ALV Report. I want to send this report output to patricular email id every day ! Presenty i do this manually. I run the report and send the output to the particular email address. Now i want to schecule the report daily in background and the out put of the report should be mailed to particular email ids in background itself. How can i do this ?
Is there and method or setting through which we can do this ?
Regards

Hi Nau,
For this requirement you will have to write another program.
This program will convert the spool requests into PDF document and sends an email to the recipients that you specify.
These are the threads which are already posted in The SDN.
*http://wiki.sdn.sap.com/wiki/display/Snippets/Converts+spool+request+into+PDF+document+and+emails*
*<a class="jive_macro jive_macro_thread" href="" __jive_macro_name="thread" modifiedtitle="true" __default_attr="353650"></a>*
*<a class="jive_macro jive_macro_thread" href="" __jive_macro_name="thread" modifiedtitle="true" __default_attr="902985"></a>*
You need to use the Function module :
-- Sending the document
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
I will provide you with the code to get this functionality.
*&      Form SEND_EMAIL
form SEND_EMAIL .
DATA:   t_mailpack   TYPE sopcklsti1 OCCURS 0 WITH HEADER LINE,
          t_mailhead   TYPE solisti1   OCCURS 0 WITH HEADER LINE,
          t_mailbin    TYPE solisti1   OCCURS 0 WITH HEADER LINE,
          t_mailtxt    TYPE solisti1   OCCURS 0 WITH HEADER LINE,
          t_mailrec    TYPE somlreci1 OCCURS 0 WITH HEADER LINE.
DATA: wa_maildata    TYPE sodocchgi1,
        l_filename(50) TYPE c,
        l_fldname(30) TYPE c,
        l_fldval(100) TYPE c,
        l_lines        TYPE i,
        l_text         TYPE text128 .
DATA: w_email_subrc TYPE i.
DATA: w_ship like vbfa-vbeln.
CLEAR: wa_maildata,
         t_mailtxt,
         t_mailbin,
         t_mailpack,
         t_mailhead,
         t_mailrec.
REFRESH: t_mailtxt,
           t_mailbin,
           t_mailpack,
           t_mailhead,
           t_mailrec.
*-- Fill output file
*- Fill header
CLEAR: t_mailbin.
* t_mailbin[] = pdf_tab[].
t_mailbin[] = it_att[].     "Uthaman
*This line is added to get the shipment no in Subject Line
SELECT SINGLE * FROM vbfa WHERE vbelv EQ nast-objky
                            AND vbtyp_v EQ c_vbtyp_v_j
                            AND vbtyp_n EQ c_vbtyp_n_8.
w_ship = vbfa-vbeln.
shift w_ship left deleting leading '0'.
*-- File name
if nast-kschl EQ 'ZFPL'.
CLEAR l_filename.
CONCATENATE 'Packing List -'
              sy-datum+4(2) sy-datum+6(2) sy-datum(4) '.PDF' INTO l_filename.
*-- Creation of the document to be sent File Name
wa_maildata-obj_name = 'Packing List'.
*-- Mail Subject
CONCATENATE l_filename '-' 'Shipment No -' w_ship INTO wa_maildata-obj_descr SEPARATED BY space.
*-- Mail Contents
t_mailtxt-line = 'Packing List'.
APPEND t_mailtxt.
ENDIF.
if nast-kschl EQ 'ZFBA'.
CLEAR l_filename.
CONCATENATE 'Booking Advice -'
              sy-datum+4(2) sy-datum+6(2) sy-datum(4) '.PDF'
              INTO l_filename.
*-- Creation of the document to be sent File Name
wa_maildata-obj_name = 'Booking Advice'.
*-- Mail Subject
CONCATENATE l_filename '-' 'Shipment No -' w_ship INTO wa_maildata-obj_descr SEPARATED BY space.
*-- Mail Contents
t_mailtxt-line = 'Packing List'.
APPEND t_mailtxt.
ENDIF.
*-- Prepare Packing List
*-- Write Packing List (Main Subject)
CLEAR: l_lines, t_mailpack.
DESCRIBE TABLE t_mailtxt LINES l_lines.
* READ TABLE t_mailtxt INDEX l_lines.
t_mailpack-doc_size = ( l_lines - 1 ) * 255 + STRLEN( t_mailtxt ).
* CLEAR t_mailpack-transf_bin.
t_mailpack-transf_bin = ' '.
t_mailpack-head_start = 1.
t_mailpack-head_num = 0.
t_mailpack-body_start = 1.
t_mailpack-body_num = l_lines.
t_mailpack-doc_type = 'RAW'.
APPEND t_mailpack.
t_mailhead = l_filename.
APPEND t_mailhead.
*-- Write Packing List (Attachment)
CLEAR: l_lines, t_mailpack.
DESCRIBE TABLE pdf_tab[] LINES l_lines.
* READ TABLE pdf_tab INDEX l_lines.
t_mailpack-doc_size = ( l_lines - 1 ) * 255 + STRLEN( t_mailbin ).
t_mailpack-transf_bin = 'X'.
t_mailpack-head_start = 1.
t_mailpack-head_num = 1.
t_mailpack-body_start = 1.
t_mailpack-body_num = l_lines.
t_mailpack-doc_type = 'PDF'.
t_mailpack-obj_name = l_filename.
t_mailpack-obj_descr = l_filename.
t_mailpack-obj_langu = 'E'.
APPEND t_mailpack.
*-- Set recipients
tables : ztotcemail.
SELECT SINGLE * FROM vbfa WHERE vbelv EQ nast-objky
                            AND vbtyp_v EQ c_vbtyp_v_j
                            AND vbtyp_n EQ c_vbtyp_n_8.
CLEAR vttk.
SELECT SINGLE * FROM vttk WHERE tknum EQ vbfa-vbeln.
SELECT SINGLE * FROM ztotcemail WHERE tplst = vttk-tplst
                                  AND lifnr = vttk-tdlnr.
IF SY-SUBRC EQ 0.
t_mailrec-receiver = ztotcemail-smtp_addr. "'Here you will give the email address'.
t_mailrec-rec_type = 'U'.
APPEND t_mailrec.
ENDIF.
**-- Sending the document
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
    EXPORTING
      document_data              = wa_maildata
      put_in_outbox              = 'X'
*      commit_work                = 'X' " N-16
    TABLES
      packing_list               = t_mailpack
      object_header              = t_mailhead
      contents_bin               = t_mailbin[]
      contents_txt               = t_mailtxt[]
      receivers                  = t_mailrec
    EXCEPTIONS
      too_many_receivers         = 1
      document_not_sent          = 2
      operation_no_authorization = 4
      OTHERS                     = 99.
w_email_subrc = sy-subrc.
IF sy-subrc EQ 0.
    MESSAGE s000(zotc) WITH 'Email output sent successfully'.
ELSE.
    MESSAGE s000(zotc) WITH 'Can not send email output'.
ENDIF.
endform.                    " SEND_EMAIL
Hope the above information will be helpful.
Regards,
Kittu

How to find a report output - URGENT

Similar Messages

Maybe you are looking for