Send page by email attaching to Lotus as a link instead of a pdf attachment

Acrobat reader in internet explorer - Send page by email attaching to Lotus as a link instead of a pdf attachment any ideas? was working fine yesterday. Ive reset the Internet explorer settings , cleared cashe, was gonna try to reinstall next

I don't think that Adobe Reader is involved in any of this; it looks like a purely IE functionality.

Similar Messages

Send Page by Email

Hi there~ I have a large cf application with about 100 people
who use it regularly. Sometimes when they output a coldfusion
report, they decide to use the browser feature "Send page by
Email"; this inevitably results in an email to me as to why the
dynamic output of the report they see in their browser is not the
same as the html file they emailed to so and so.
It seems that the attached html file is the page minus any
variables that were sent to it; so it is never correct or just
missing. How do I correct this via programming; or if that is not
possible, how do I explain to my users why this ie feature will not
work with my dynamic pages.
Thanks very much in advance for any assistance with this,
Wolf mom

I was merely suggesting a way for you to combat the problem.
You aren't going to be able to change how the browser
functions, so if you want the capability to email reports, you will
have to take a look at what you can control, IE your application.

Preview 6.0, no send file as email attachment?

Does anyone know where they put the send file command? I need to email pdfs from Preview all the time.
There used to be a "send file as email attachment" command under the edit menu. It's gone. Anyone have any suggestions?

Handsomfreddy wrote:
Sorry, I dont understand what you are referring to. Can you calify please "undo the changes."
Thanks,
Andy
Didn't you just post this (below)
Handsomfreddy wrote:
Very bizarrely Parallels had changed this Mail Preference to some weird Windows program [Disk Clean up or something equally random] thus preventing me from emailing anything from any program.
That's the change I am referring to.

How to convert sap script to pdf and send it as email attachment

hi,
my requirement is to convert a standard sales order form to pdf and send it as email attachment. get me some sample code for the same
thanks in advance

Hi
See this sample code and after that use the fun module to send the mail
SO_NEW_DOCUMENT_ATT_SEND_API1
REPORT zzz_jaytest .
Types Declaration
TYPES : BEGIN OF ty_pa0001,
pernr TYPE pa0001-pernr,
bukrs TYPE pa0001-bukrs,
werks TYPE pa0001-werks,
END OF ty_pa0001.
Internal Table Declaration
DATA : i_pa0001 TYPE STANDARD TABLE OF ty_pa0001, "For pa0001 Details
i_otf TYPE STANDARD TABLE OF itcoo, "For OTF data
i_content_txt TYPE soli_tab, "Content
i_content_bin TYPE solix_tab, "Content
i_objhead TYPE soli_tab,
Work Area Declaration
w_pa0001 TYPE ty_pa0001, "For pa0001 Details
w_res TYPE itcpp, "SAPscript output
"parameters
w_otf TYPE itcoo, "For OTF
w_pdf TYPE solisti1, "For PDF
w_transfer_bin TYPE sx_boolean, "Content
w_options TYPE itcpo, "SAPscript output
"interface
Variable Declaration
v_len_in TYPE so_obj_len,
v_size TYPE i.
Constants Declaration
CONSTANTS : c_x TYPE c VALUE 'X', "X
c_locl(4) TYPE c VALUE 'LOCL', "Local Printer
c_otf TYPE sx_format VALUE 'OTF', "OTF
c_pdf TYPE sx_format VALUE 'PDF', "PDF
c_printer TYPE sx_devtype VALUE 'PRINTER', "PRINTER
c_bin TYPE char10 VALUE 'BIN', "BIN
c_name TYPE string VALUE 'C:\ZZZ_JAYTEST.PDF',"Downloading
"File Name
c_form(11) TYPE c VALUE 'ZZZ_JAYTEST'. "Form Name
START-OF-SELECTION.
Selecting the records from pa0001
SELECT pernr bukrs werks FROM pa0001
INTO TABLE i_pa0001 UP TO 10 ROWS.
Setting the options
w_options-tdcopies = 1 ."Number of copies
w_options-tdnoprev = c_x."No print preview
w_options-tdgetotf = c_x."Return of OTF table
w_options-tddest = c_locl."Spool: Output device
Opening the form
CALL FUNCTION 'OPEN_FORM'
EXPORTING
form = c_form
device = c_printer
language = sy-langu
OPTIONS = w_options
IMPORTING
RESULT = w_res.
LOOP AT i_pa0001 INTO w_pa0001.
Writting into the form
CALL FUNCTION 'WRITE_FORM'
EXPORTING
element = 'MAIN'
window = 'MAIN'.
ENDLOOP.
Closing the form
CALL FUNCTION 'CLOSE_FORM'
IMPORTING
RESULT = w_res
TABLES
otfdata = i_otf
EXCEPTIONS
unopened = 1
bad_pageformat_for_print = 2
send_error = 3
spool_error = 4
codepage = 5
OTHERS = 6.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
Converting OTF data to single line
LOOP AT i_otf INTO w_otf.
CONCATENATE w_otf-tdprintcom w_otf-tdprintpar
INTO w_pdf.
APPEND w_pdf TO i_content_txt.
ENDLOOP.
Converting to PDF Format
CALL FUNCTION 'SX_OBJECT_CONVERT_OTF_PDF'
EXPORTING
format_src = c_otf
format_dst = c_pdf
devtype = c_printer
CHANGING
transfer_bin = w_transfer_bin
content_txt = i_content_txt
content_bin = i_content_bin
objhead = i_objhead
len = v_len_in
EXCEPTIONS
err_conv_failed = 1
OTHERS = 2.
v_size = v_len_in.
Downloading the PDF File
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
bin_filesize = v_size
filename = c_name
filetype = c_bin
TABLES
data_tab = i_content_bin.
If you r using this function module check it once....
call function 'CONVERT_OTF'
EXPORTING
format = 'PDF'
max_linewidth = 132
IMPORTING
bin_filesize = v_len_in
TABLES
otf = i_otf
lines = i_tline
EXCEPTIONS
err_max_linewidth = 1
err_format = 2
err_conv_not_possible = 3
others = 4.
Fehlerhandling
if sy-subrc <> 0.
endif.
or u can use the standard program RSTXPDFT4 to download the script into PDF format onto a particular location
follow this link for sample program.
http://searchsap.techtarget.com/tip/0,289483,sid21_gci1121833,00.html
check...
How to send smart form via email
/people/pavan.bayyapu/blog/2005/08/30/sending-html-email-from-sap-crmerp
Regards
Anji

How can I send a website page by email with Firefox, not just the link?

I am unable to SEND web pages with Firefox.
With Internet Explorer, I simply go to FILE - Send - Page by email, (or Link by email). By sending the page, I can add some comments, remove some advertising, and/or highlight points I would like to highlight.
The question then, is there a way to Send - Page by email in Firefox?
If so, I will make it my default browser.
Thank you.

What email service are you using?

Send - "Page by Email" disabled for PDF document in IE

Hi,
We're currently running 10g reports, through 10g Application Server (Forms&Reports) and producing PDF documents that are displayed in Internet Explorer.
When viewing the report output the send "Page by Email" function is disabled. My outlook works fine and I've checked that my Email client is set to outlook in IE program settings.
Anyone have any ideas on what I need to do to enable the "Page by Email" function?
Note: I've also noticed that the View -> Source function is disabled.
Thanks,
Graeme

Oh, before I forget View -> Source for a PDF document being disabled makes sence because its not a HTML document. PDF documents are viewable via a browser only with that to the downloadable pluggable com object that adobe (and other pdf reader software providers) provides us with.
Cheers
Q

Send file as email attachment not working

any help would be greatly appreciated...
When I click "send file as email attachment" it will open outlook with the PDF attached but when I click send on the email, the email closes like it is sent but never actually gets sent (nothing in sent items and recipient never gets the email)
Adobe Acrobat 11 Pro (Creative Cloud Suite installed)
Outlook 2013

Hi sandyw26405588,
Could you please try sending PDF as email attachment via another email apart from Outlook.
Are you able to send the file successfully?
Also, go under 'Help> Check for Updates' and ensure if you are using the latest version of Acrobat XI i.e. 11.0.10
Have you tried sending any other PDF via Outlook?
Let me know.
Regards,
Anubha

Send reports as email attachment

Hi,
In the APEX application, I have a page that has filters on top and few reports generated based on the given filter values. I have a email button that when pressed, send the whole page as an email attachment. I cannot use PDF. Is it possible to send the page with few reports as email attachment?
Thanks
saru

When you send as an e-mail, do you mean the html produced report or some sort output file? You could send it as an excel produced output.
Why can't you use a PDF option in this case?
Thank you,
Tony Miller
Webster, TX

Pages as email attachment

Over the past few weeks since beginning to use Pages, I've tried to send Pages text document as an attachment to email. The are typically only a few pages, but the email is never sent. Have tried on Safari thru various online email programs, and also through my business mail program. No luck. End up everytime pasting the text into the email.
Today I had a half page text document, and same thing. The email would not leave the out box.
And suggestions?
G5 Mac OS X (10.4.9)

Welcome to the forums!
Pages "documents" are not actually single files, but a collection of files (a "package") that appears as a single file in the Finder. Many email systems (including online mail clients) do not understand the package format.
There are a few options for emailing a Pages document. If it is going to someone else who has Pages, you can first create an archive (or ZIP file) of the document. To do this, select the document in the Finder, then in the Finder File menu choose "Create Archive". This will take the package of files and create a single compressed file, which then can be sent through email. Your recipient will simply download the file and double-click it to unarchive it.
If your recipient does not have Pages, you can save the document in some other form, such as a Word document, Rich Text Format (RTF), or text document. All of these formats use single files for the document, and so are mailable without needing to archive.

Convert SAP spoolOR list to excel and send as an email attachment

Hello All Masterminds ,
Iu2019ve developed a utility, in which users has to maintain one u201CZu201D view where they can give any report name, type of attachment (PDF, XLS, TXT) and sender email addresses.u201DNote: thing to remember here is Iu2019m creating XLS,TXT,PDF format dynamicallyu201D
It is working fine for PDF. Iu2019m submitting the program and creating spool and converting it to PDF and sending to their emails as an attachment. It looks fantastic. When Iu2019m doing the same thing for XLS it is showing messy output, I tried many functions and search lots of unanswered, unfinished SDN posts. I almost tried every single clue given in these posts but no luck. Email part is working fine using classes ( l_document = cl_document_bcs=>create_document , l_document->add_attachment , l_send_request->set_document( l_document ).,cl_sapuser_bcs=>create( l_uname ).,l_send_request->add_recipient, l_send_request->set_send_immediately( '' ). ) .
My real deal is to create a beautiful XLS out put. I also tried FMs LIST_FROM_MEMORY and LIST_TO_ASCI but no-luck. I thought instead of spool if I use u201CSubmit EXPORTING LIST TO MEMORY u201C option may be It works but BIG NO 
   Iu2019m sure some genius out there has done something like his , I ain`t genius that is why I am stuck Please guys throw me some bones . As I said, I am able to do most of the things. I need some magic code /answer which turns my messy, ugly unformatted excel sheet attachment to beautiful u201Cpiece of art u201CExcel output.
Here are the FMs I tried so far with different combinations.
CALL FUNCTION 'LIST_FROM_MEMORY'
CALL FUNCTION 'LIST_TO_ASCI'
CALL FUNCTION 'GUI_DOWNLOAD'
CALL FUNCTION 'RSPO_DOWNLOAD_SPOOLJOB'
CALL FUNCTION 'RSPO_RETURN_SPOOLJOB'
CALL FUNCTION 'CONVERT_OTF'
CALL FUNCTION 'SAP_CONVERT_TO_XLS_FORMAT'
And logic like to get rid of things getting in Asci tables
cl_abap_char_utilities=>newline.
cl_abap_char_utilities=>horizontal_tab
cl_abap_char_utilities=>VERTICAL_TAB
cl_abap_char_utilities=>cr_lf
FIELD-SYMBOLS: <lfs_table>,    " Internal table structure
                 <lfs_con>.      " Field Content
DATA: l_text TYPE char1024.     " Text content for mail attachment
DATA: l_con(50) TYPE c.        " Field Content in character format
Columns to be tab delimeted
LOOP AT FINAL ASSIGNING <lfs_table>.
    DO.
      ASSIGN COMPONENT sy-index OF STRUCTURE <lfs_table>
             TO <lfs_con>.
      IF sy-subrc NE 0.
        CONCATENATE c_cr l_text INTO l_text.
        APPEND l_text TO i_attach.
        EXIT.
      ELSE.
        CLEAR: l_con.
        MOVE <lfs_con> TO l_con.
        CONDENSE l_con.
        IF sy-index = 1.
          CLEAR: l_text.
          MOVE l_con TO l_text.
        ELSE.
          CONCATENATE l_text l_con INTO l_text
             SEPARATED BY c_tab.
        ENDIF.
      ENDIF.
    ENDDO.
ENDLOOP.
Posts : https://forums.sdn.sap.com/click.jspa?searchID=14756211&messageID=4401940
https://forums.sdn.sap.com/click.jspa?searchID=14756211&messageID=4796657
https://forums.sdn.sap.com/search.jspa?threadID=&q=convertspoolintoexcelformatforsendingmail&objID=c42&dateRange=all&numResults=30&rankBy=10001
Will appreciate your help and time.
Thanks,
Saquib Khan

Hi,
i send excel-att like this.
REPORT Z_EMAIL_CL_BCS MESSAGE-ID ZZ.
More examples here BCS_EXAMPLE_* with se38
DATA: SEND_REQUEST       TYPE REF TO CL_BCS.
DATA: SUBJECT            TYPE SO_OBJ_DES.
DATA: ATT_TYPE           TYPE SOODK-OBJTP.
DATA: IT_TEXT            TYPE BCSY_TEXT.
DATA: WA_TEXT            LIKE SOLI.
DATA: IT_BIN             TYPE SOLIX_TAB.
DATA: WA_BIN             TYPE SOLIX.
DATA: DOCUMENT           TYPE REF TO CL_DOCUMENT_BCS.
DATA: SENDER             TYPE REF TO CL_SAPUSER_BCS.
DATA: RECIPIENT          TYPE REF TO IF_RECIPIENT_BCS.
DATA: BCS_EXCEPTION      TYPE REF TO CX_BCS.
DATA: SENT_TO_ALL        TYPE OS_BOOLEAN.
Bytes der Datei
DATA: IT_LENGHT          TYPE SO_OBJ_LEN.
DATA: N10(10)            TYPE N.
CONSTANTS: CON_NEWL TYPE ABAP_CHAR1 VALUE CL_ABAP_CHAR_UTILITIES=>NEWLINE,
           CON_TAB TYPE ABAP_CHAR1 VALUE CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB.
CONSTANTS: CON_NEWL TYPE X VALUE '0D', "OK for non Unicode
            CON_TAB TYPE X VALUE '09'. "OK for non Unicode
START-OF-SELECTION.
PERFORM MAIN.
END-OF-SELECTION.
FORM MAIN.
TRY.
    -------- create persistent send request ------------------------
      SEND_REQUEST = CL_BCS=>CREATE_PERSISTENT( ).
      PERFORM HEAD_CONT.
      PERFORM XLS_ATT.
    add document to send request
      CALL METHOD SEND_REQUEST->SET_DOCUMENT( DOCUMENT ).
    --------- set sender -------------------------------------------
      SENDER = CL_SAPUSER_BCS=>CREATE( SY-UNAME ).
      CALL METHOD SEND_REQUEST->SET_SENDER
        EXPORTING
          I_SENDER = SENDER.
    --------- set recipent -----------------------------------------
      RECIPIENT = CL_CAM_ADDRESS_BCS=>CREATE_INTERNET_ADDRESS(
                                        'the email adress' ).
    add recipient with its respective attributes to send request
      CALL METHOD SEND_REQUEST->ADD_RECIPIENT
        EXPORTING
          I_RECIPIENT = RECIPIENT
          I_EXPRESS   = 'X'.
     RECIPIENT = CL_CAM_ADDRESS_BCS=>CREATE_INTERNET_ADDRESS(
                                       'the email adress 2' ).
    add recipient with its respective attributes to send request
     CALL METHOD SEND_REQUEST->ADD_RECIPIENT
       EXPORTING
         I_RECIPIENT = RECIPIENT
         I_EXPRESS   = 'X'.
    ---------- send document ---------------------------------------
      CALL METHOD SEND_REQUEST->SEND(
        EXPORTING
          I_WITH_ERROR_SCREEN = 'X'
        RECEIVING
          RESULT              = SENT_TO_ALL ).
      COMMIT WORK.
    CATCH CX_BCS INTO BCS_EXCEPTION.
      WRITE: 'Fehler aufgetreten.'(001).
      WRITE: 'Fehlertyp:'(002), BCS_EXCEPTION->ERROR_TYPE.
      EXIT.
ENDTRY.
ENDFORM.                    "main
FORM HEAD_CONT.
CLEAR: IT_TEXT[], WA_TEXT, SUBJECT.
ATT_TYPE = 'RAW'.
CONCATENATE 'Betreffzeile am' SY-DATUM 'um' SY-UZEIT
INTO SUBJECT SEPARATED BY SPACE.
WA_TEXT = 'Hello!'.
APPEND WA_TEXT TO IT_TEXT.
WA_TEXT = 'dieses ist eine Testmail'.
APPEND WA_TEXT TO IT_TEXT.
WA_TEXT = 'Gruß'.
APPEND WA_TEXT TO IT_TEXT.
DESCRIBE TABLE IT_TEXT LINES N10.
N10 = ( N10 - 1 ) * 255 + STRLEN( WA_TEXT ).
IT_LENGHT = N10.
DOCUMENT = CL_DOCUMENT_BCS=>CREATE_DOCUMENT(
            I_TYPE    = ATT_TYPE
            I_TEXT    = IT_TEXT
            I_LENGTH = IT_LENGHT
            I_SUBJECT = SUBJECT ).
ENDFORM.                    "HEAD_CONT
FORM XLS_ATT.
DATA: BEGIN OF ITAB OCCURS 0,
        MATNR     LIKE MARA-MATNR,
        MTART     LIKE MARA-MTART,
        MATKL     LIKE MARA-MATKL,
        BRGEW     LIKE MARA-BRGEW,
      END   OF ITAB.
DATA: BRGEW(18).
CLEAR: IT_BIN[], WA_BIN, SUBJECT.
SELECT MATNR MTART MATKL BRGEW INTO TABLE ITAB FROM MARA UP TO 10 ROWS.
CONCATENATE 'Material'      CON_TAB
        'Materialart'   CON_TAB
        'Warengruppe'   CON_TAB
        'Bruttogewicht' CON_NEWL
          INTO WA_BIN.
APPEND WA_BIN TO IT_BIN.
LOOP AT ITAB.
    WRITE ITAB-BRGEW TO BRGEW.
    CONCATENATE ITAB-MATNR CON_TAB
                ITAB-MTART CON_TAB
                ITAB-MATKL CON_TAB
                     BRGEW CON_NEWL
                INTO WA_BIN.
    APPEND WA_BIN TO IT_BIN.
ENDLOOP.
ATT_TYPE = 'XLS'.
SUBJECT = 'My XLS attachment'.
DESCRIBE TABLE IT_BIN LINES N10.
N10 = ( N10 - 1 ) * 255 + STRLEN( WA_BIN ).
IT_LENGHT = N10.
CALL METHOD DOCUMENT->ADD_ATTACHMENT
    EXPORTING
      I_ATTACHMENT_TYPE    = ATT_TYPE
      I_ATT_CONTENT_HEX    = IT_BIN
      I_ATTACHMENT_SIZE    = IT_LENGHT
      I_ATTACHMENT_SUBJECT = SUBJECT.
ENDFORM.                    "XLS_ATT
Perhaps it helps.
regards, Dieter

HOW DO I SEND "PAGES" IN EMAIL SO THAT OTHERS CAN READ IT?

HOW DO I SEND "PAGES" DOCUMENTS SO PC'S CAN READ THEM?

Open the document, click Share in the Menu Bar > Send a Copy > Email > PDF is the safest but not easily edited on PC. You can choose Word if you know the person you are sending to has Microsoft Word.

Sending excel as email attachment

Hi All,
I am getting truncated with the header only upto 255 char length , and the field contents are ok more than 255 length it s taking.
I am using it_attach type standard table of solisti1 with header line.
the report code is given below
**& Report ZPBILL_INT1                                                 **
REPORT zpbill_int1 .
*Declaration of type-pools.
TYPE-POOLS slis.
     D A T A                                                         **
TABLES: zbill_inphdr,
        zbill_inpdtl.
TYPES: BEGIN OF t_zbill_ipdtl,
        cusnr   TYPE zbill_inpdtl-cusnr,
       svsnr TYPE   zbill_inpdtl-svsnr,
       revnr TYPE zbill_inpdtl-revnr,
       sysnr   TYPE zbill_inpdtl-sysnr,
       sdate TYPE zbill_inpdtl-sdate,
       filnm TYPE zbill_inpdtl-filnm,
       zlsch TYPE   zbill_inpdtl-zlsch,
       clrfe   TYPE zbill_inpdtl-clrfe,
       revds   TYPE zbill_inpdtl-revds,
       prind TYPE zbill_inpdtl-prind,
       svsds TYPE zbill_inpdtl-svsds,
       quant TYPE zbill_inpdtl-quant,
       adate TYPE zbill_inpdtl-adate,
       trdat TYPE zbill_inpdtl-trdat,
       mdate TYPE zbill_inpdtl-mdate,
      trdval type zbill_inpdtl-trdval,*
       exrate TYPE zbill_inpdtl-exrate,
       birate TYPE zbill_inpdtl-birate,
       cusds1 TYPE zbill_inpdtl-cusds1,
       cusds2 TYPE zbill_inpdtl-cusds2,
       cusstr TYPE zbill_inpdtl-cusstr,
       cuspc   TYPE zbill_inpdtl-cuspc,
       cuscity TYPE zbill_inpdtl-cuscity,
       cusctry   TYPE zbill_inpdtl-cusctry ,
       rect      TYPE zbill_inpdtl-rect,
        invno TYPE zbill_inpdtl-invno,
       ldate TYPE zbill_inpdtl-ldate,
       conty TYPE zbill_inpdtl-conty,
       edate TYPE zbill_inpdtl-edate,
       custa TYPE zbill_inpdtl-custa,
       currc TYPE zbill_inpdtl-currc,
       warrt TYPE zbill_inpdtl-warrt,
       indrp TYPE   zbill_inpdtl-indrp,
       textc   TYPE zbill_inpdtl-textc,
      gstr   TYPE   zbill_inpdtl-gstr,
       clrds TYPE zbill_inpdtl-clrds,
       commty TYPE zbill_inpdtl-commty,
       commyr   TYPE zbill_inpdtl-commyr,
       commmt TYPE zbill_inpdtl-commmt,
       commop   TYPE zbill_inpdtl-commop,
       eposdoc TYPE zbill_inpdtl-eposdoc,
       custp   TYPE zbill_inpdtl-custp,
END OF t_zbill_ipdtl.
DATA: it_zbill TYPE   STANDARD TABLE OF t_zbill_ipdtl
INITIAL SIZE 0.
ALV Data declaration.*
DATA : v_repid LIKE sy-repid.
ALV Function Module Variables*
DATA: gs_layout TYPE slis_layout_alv,
g_exit_caused_by_caller,
gs_exit_caused_by_user TYPE slis_exit_by_user.
DATA: gt_fieldcat TYPE slis_t_fieldcat_alv,
gs_print TYPE slis_print_alv,
gt_events TYPE slis_t_event,
gt_list_top_of_page TYPE slis_t_listheader,
g_status_set TYPE slis_formname VALUE 'PF_STATUS_SET',
g_user_command TYPE slis_formname VALUE 'USER_COMMAND',
g_top_of_page TYPE slis_formname VALUE 'TOP_OF_PAGE',
g_top_of_list TYPE slis_formname VALUE 'TOP_OF_LIST',
g_end_of_list TYPE slis_formname VALUE 'END_OF_LIST',
g_variant LIKE disvariant,
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.
DATA : gr_layout_bck TYPE slis_layout_alv.
DATA : wa_zbill TYPE t_zbill_ipdtl.
*Email related declarations
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: it_attach TYPE STANDARD TABLE OF SOMLRECI1 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_attachment LIKE SOMLRECI1 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.
*DATA IT_HEADER    TYPE STANDARD TABLE OF SOLIX INITIAL SIZE 0 WITH
*HEADER LINE.
*data : begin of it_header occurs 0,
       header(1023) type C,*
     end of it_header.*
    S E L E C T I O N S                                              **
SELECTION-SCREEN BEGIN OF BLOCK b01 WITH FRAME TITLE text-b01.
SELECT-OPTIONS:   s_cusnr   FOR zbill_inpdtl-cusnr,
                  s_svsnr   FOR zbill_inpdtl-svsnr,
                  s_revnr FOR zbill_inpdtl-revnr,
                  s_sysnr FOR zbill_inpdtl-sysnr,
                  s_sdate FOR zbill_inpdtl-sdate,
                  s_filnm    FOR zbill_inpdtl-filnm,
                  s_prind   for zbill_inpdtl-prind.
PARAMETERS: p_test AS CHECKBOX,
              p_email AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK b01.
*PARAMETERS: p_email TYPE somlreci1-receiver
    Initialization                                             **
INITIALIZATION.
v_repid = sy-repid.
    start-of-selection                                           **
START-OF-SELECTION.
PERFORM data_retrieval.
IF p_test = '' AND P_EMAIL = ''.
MESSAGE S038(ZMBILLING).
ELSEIF P_TEST = 'X'.
display the data in the form of ALV*
    PERFORM display_data.
ELSEIF P_EMAIL = 'X'.
*Populate table with detaisl to be entered into .xls file
    PERFORM build_xls_data_table.
*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
    'Billing Details list'
    'XLS'
    'filename'
    CHANGING gd_error
    gd_reciever.
*Instructs mail send program for SAPCONNECT to send email(rsconn01)
    PERFORM initiate_mail_execute_program.
ENDIF.
*&      Form data_retrieval
      text*
FORM data_retrieval.
SELECT revnr sysnr sdate filnm cusnr
         svsnr zlsch clrfe revds prind svsds
         quant adate trdat mdate exrate
         birate cusds1 cusds2 cusstr
         cuspc cuscity cusctry rect
         invno ldate conty edate custa
         currc warrt indrp textc
         gstr clrds commty commyr commmt
         commop eposdoc custp
    INTO CORRESPONDING FIELDS OF TABLE it_zbill FROM zbill_inpdtl
    WHERE   cusnr IN s_cusnr
     AND     svsnr IN s_svsnr
     AND     revnr IN s_revnr
     AND    sysnr IN s_sysnr
     AND    sdate IN s_sdate
     AND    filnm IN s_filnm
     and prind in s_prind.
ENDFORM. " DATA_RETRIEVAL
**&      Form build_xls_data_table
      text*
FORM build_xls_data_table.
DATA: ld_store(50) TYPE c. "Leading zeros
DATA: wa_zbill-quant(20),
        wa_zbill-custa(20),
        wa_zbill-gstr(20).
        wa_zbill-mxamt(20).*
*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 'Customer code' 'Service Number' 'Revenue Type' 'Source
System Code' 'Date Source' 'File Name' 'Payment Code' 'Single Char Flag'
'Revenue Description' 'Processing Indicator' 'Service Description'
'Order Quantity' 'Date of Adustment' 'Trade Date' 'Mos Date'
'ExchangeRate' 'Billing Rate' 'Customer Name1' 'Customer name2'
'Customer adress' 'Customer postalcode' 'Customer city'
'Customer country' 'Billing amt without GST' 'GST Payable'
'Receipt number' 'Invoice Number' 'Listing Period'
'Contract Type' 'Entry date' 'Custody Code' 'Currency Code'
'Name of Warrant' 'Rights issue' 'No Of copies'
'GST Rate' 'Clearing Fee' 'Commodity type'
'Commodity year' 'Commodity month' 'Commodity Option Tpye'
'Quantity Transacted' 'Amendment Quantity' 'EPOS DOC type'
'Customer Type'
INTO IT_ATTACH SEPARATED BY con_tab.
CONCATENATE con_cret IT_ATTACH INTO IT_ATTACH.
*CONCATENATE con_cret it_attach INTO it_attach.
APPEND it_attach.
LOOP AT it_zbill INTO wa_zbill.
    CONCATENATE      wa_zbill-cusnr wa_zbill-svsnr wa_zbill-revnr
    wa_zbill-sysnr   wa_zbill-sdate wa_zbill-filnm wa_zbill-zlsch
    wa_zbill-clrfe   wa_zbill-revds   wa_zbill-prind   wa_zbill-svsds
    wa_zbill-quant   wa_zbill-adate   wa_zbill-trdat   wa_zbill-mdate
    wa_zbill-exrate wa_zbill-birate   wa_zbill-cusds1 wa_zbill-cusds2
wa_zbill-cusstr   wa_zbill-cuspc   wa_zbill-cuscity   wa_zbill-cusctry
    wa_zbill-rect    wa_zbill-invno   wa_zbill-ldate wa_zbill-conty
    wa_zbill-edate   wa_zbill-custa   wa_zbill-currc   wa_zbill-warrt
    wa_zbill-indrp   wa_zbill-textc   wa_zbill-gstr   wa_zbill-clrds
    wa_zbill-commty wa_zbill-commyr wa_zbill-commmt   wa_zbill-commop
    wa_zbill-eposdoc wa_zbill-custp
     INTO it_attach SEPARATED BY con_tab.
    CONCATENATE con_cret it_attach INTO it_attach.
it_header = it_attach .*
*append it_header.
    APPEND it_attach.
ENDLOOP.
ENDFORM. " BUILD_XLS_DATA_TABLE
***& Form SEND_FILE_AS_EMAIL_ATTACHMENT
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.
*ld_sender_address = SY-UNAME.
ld_sender_address_type = 'SMTP'.*
*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-OBJ_NAME = ld_attfilename.
w_doc_data-sensitivty = 'F'.
CLEAR t_attachment.
REFRESH t_attachment.
t_attachment = it_attach.
t_attachment[] = it_attach[] .
t_attachment = it_header.*
t_attachment[] = it_header[] .*
*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.                    "build_xls_data_table
regards
subba

Hi ,
i'm saying check the field doc_size, umcomment it .change 255--->1025 .
w_doc_data-doc_size =
**( w_cnt - 1 ) * 255 + STRLEN( it_attach ).**
**t_packing_list-doc_size = t_packing_list-body_num * 255.**
for more details , check the documentation.
regards
Prabhu

Send PO as email attachment

Currently Iam able to send the PO as an email attachment
using NACE settings as
Medium Program Form-routine Form
External SAPFM06P ENTRY_NEU MEDRUCK
send
My requiremnet is to send a custom designed form(PDF based)
when ever a new PO is created and saved.
Could any one please help me in finding out the exact program
where the current code for converting and sending the email
is present so that I can replace that one with the custom program
I have developed.

Check
Re: Send Purchase Order via email?
Re: Send Purchase Order via email&#2760004
Regards,
Santosh

Zip the data and send as an email attachment

Hi,
I have a requirement where I want to send the log as an email attachment. The log size is very huge about 20MB. When I try to send this log as an excel attachment through FM SO_DOCUMENT_SEND_API1 its throwing an error related to the attachment size. Is there any way to zip the data and send the zipped attachment?
Any help is really appreciated.
Thnaks,
Rajinikanth G

which might help you getting the file from the pc or you can change the source path and then send it to the following reciptant
data method1 like sy-ucomm.
data g_user like soudnamei1.
data g_user_data like soudatai1.
data g_owner like soud-usrnam.
data g_receipients like soos1 occurs 0 with header line.
data g_document like sood4 .
data g_header like sood2.
data g_folmam like sofm2.
data g_objcnt like soli occurs 0 with header line.
data g_objhead like soli occurs 0 with header line.
data g_objpara like selc occurs 0 with header line.
data g_objparb like soop1 occurs 0 with header line.
data g_attachments like sood5 occurs 0 with header line.
data g_references like soxrl occurs 0 with header line.
data g_authority like sofa-usracc.
data g_ref_document like sood4.
data g_new_parent like soodk.
data: begin of g_files occurs 10 ,
text(4096) type c,
   end of g_files.
data : fold_number(12) type c,
       fold_yr(2) type c,
       fold_type(3) type c.
parameters ws_file(4096) type c default 'c:\debugger.txt'.
Can me any file fromyour pc ....either xls or word or ppt etc ...
g_user-sapname = sy-uname.
call function 'SO_USER_READ_API1'
exporting
   user                            = g_user
   PREPARE_FOR_FOLDER_ACCESS       = ' '
importing
   user_data                       = g_user_data
EXCEPTIONS
   USER_NOT_EXIST                  = 1
   PARAMETER_ERROR                 = 2
   X_ERROR                         = 3
   OTHERS                          = 4
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
fold_type = g_user_data-outboxfol+0(3).
fold_yr = g_user_data-outboxfol+3(2).
fold_number = g_user_data-outboxfol+5(12).
clear g_files.
refresh : g_objcnt,
g_objhead,
g_objpara,
g_objparb,
g_receipients,
g_attachments,
g_references,
g_files.
method1 = 'SAVE'.
g_document-foltp = fold_type.
g_document-folyr   = fold_yr.
g_document-folno   = fold_number.
g_document-objtp   = g_user_data-object_typ.
*g_document-OBJYR   = '27'.
*g_document-OBJNO   = '000000002365'.
*g_document-OBJNAM = 'MESSAGE'.
g_document-objdes   = 'Manohar testing by program'.
g_document-folrg   = 'O'.
*g_document-okcode   = 'CHNG'.
g_document-objlen = '0'.
g_document-file_ext = 'TXT'.
g_header-objdes = 'Manohar testing by program'.
g_header-file_ext = 'TXT'.
call function 'SO_DOCUMENT_REPOSITORY_MANAGER'
exporting
    method             = method1
   office_user        = sy-uname
   ref_document       = g_ref_document
   new_parent         = g_new_parent
importing
   authority          = g_authority
tables
   objcont            = g_objcnt
   objhead            = g_objhead
   objpara            = g_objpara
   objparb            = g_objparb
   recipients         = g_receipients
   attachments        = g_attachments
   references         = g_references
   files              = g_files
changing
    document           = g_document
   header_data        = g_header
FOLMEM_DATA        =
RECEIVE_DATA       =
File from the pc to send...
method1 = 'ATTCREATEFROMPC'.
g_files-text = ws_file.
append g_files.
call function 'SO_DOCUMENT_REPOSITORY_MANAGER'
exporting
    method             = method1
   office_user        = g_owner
   ref_document       = g_ref_document
   new_parent         = g_new_parent
importing
   authority          = g_authority
tables
   objcont            = g_objcnt
   objhead            = g_objhead
   objpara            = g_objpara
   objparb            = g_objparb
   recipients         = g_receipients
   attachments        = g_attachments
   references         = g_references
   files              = g_files
changing
    document           = g_document
   header_data        = g_header
method1 = 'SEND'.
g_receipients-recnam = 'MK085'.
g_receipients-recesc = 'B'.
g_receipients-sndex = 'X'.
append g_receipients.
call function 'SO_DOCUMENT_REPOSITORY_MANAGER'
exporting
    method             = method1
   office_user        = g_owner
   ref_document       = g_ref_document
   new_parent         = g_new_parent
importing
   authority          = g_authority
tables
   objcont            = g_objcnt
   objhead            = g_objhead
   objpara            = g_objpara
   objparb            = g_objparb
   recipients         = g_receipients
   attachments        = g_attachments
   references         = g_references
   files              = g_files
changing
    document           = g_document
   header_data        = g_header.
this code might help you

Really struggling to export adobe pdf to a microsoft word format so i can send onwards as email attachment

really struggling to export adobe pdf to a microsoft word format so i can send onwards as email attachment

Why would you need to do that? You can attach a PDF to an email directly...

Send page by email attaching to Lotus as a link instead of a pdf attachment

Similar Messages

Maybe you are looking for