Error opening PDF file when send as attachment via email

Question

Hi,
I searched around the forum to resolve my issue and there's alot of post that is related but i can't find any answer to my issues.
Here's the scenario :-
I try to convert the smartform to PDF and then send the PDF as an attachment via email.
After converting the smartform to PDF, i managed to download the file and view it without any problem but i can't view the PDF as an attachment. It has the following error :-
Adobe Reader could not open '4500002325.PDF' because it is either not a supported fle type or because the file has been damaged (for example, it was sent as an email and wasn't correctly decoded
The following is the snapshot of my code:-
* Determine smartform function module for invoice
  CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      formname           = lf_formname
    IMPORTING
      fm_name            = lf_fm_name
    EXCEPTIONS
      no_form            = 1
      no_function_module = 2
      OTHERS             = 3.
  IF sy-subrc <> 0.
*  error handling
    ent_retco = sy-subrc.
    PERFORM protocol_update_i.
  ENDIF.
  ls_control_param-getotf = 'X'.
  CALL FUNCTION lf_fm_name
    EXPORTING
      archive_index        = toa_dara
      archive_parameters   = arc_params
      control_parameters   = ls_control_param
      mail_recipient       = ls_recipient
      mail_sender          = ls_sender
      output_options       = ls_composer_param
      zxekko               = l_doc-xekko  " user_settings = ' '
      zxpekko              = l_doc-xpekko
    IMPORTING
      document_output_info = l_ssfcrespd
      job_output_info      = l_ssfcrescl
      job_output_options   = l_ssfcresop
    TABLES
      l_xekpo              = l_doc-xekpo[]
      l_xekpa              = l_doc-xekpa[]
      l_xpekpo             = l_doc-xpekpo[]
      l_xeket               = l_doc-xeket[]
      l_xtkomv             = l_doc-xtkomv[]
      l_xekkn              = l_doc-xekkn[]
      l_xekek              = l_doc-xekek[]
      l_xkomk              = l_xkomk
    EXCEPTIONS
      formatting_error     = 1
      internal_error       = 2
      send_error           = 3
      user_canceled        = 4
      OTHERS               = 5.
  IF sy-subrc = 0.
    CALL FUNCTION 'CONVERT_OTF'
      EXPORTING
        FORMAT                = 'PDF'
      IMPORTING
        BIN_FILESIZE          = v_len_in
        BIN_FILE              = v_bin_file
      TABLES
        OTF                   = l_ssfcrescl-otfdata
        LINES                 = l_pdf
      EXCEPTIONS
        ERR_MAX_LINEWIDTH     = 1
        ERR_FORMAT            = 2
        ERR_CONV_NOT_POSSIBLE = 3
        ERR_BAD_OTF           = 4
        OTHERS                = 5.
* email subject
    CONCATENATE 'Purchase order' l_doc-xekko-ebeln INTO lw_subject
                SEPARATED BY space.
* RECIPIENTS
    lwa_recipients-rec_type = 'U'.
    lwa_recipients-express = 'X'.
    SELECT adr6~smtp_addr
    INTO TABLE gv_smtp_addr
    FROM ekko AS ekko INNER JOIN
         lfa1 AS lfa1 ON ekko~lifnr      = lfa1~lifnr INNER JOIN
         adr6 AS adr6 ON adr6~addrnumber = lfa1~adrnr
    WHERE ekko~ebeln = l_doc-xekko-ebeln.
    IF NOT gv_smtp_addr[] IS INITIAL.
      LOOP AT gv_smtp_addr INTO gv_smtp_addr_line FROM 2.
        lwa_recipients-receiver = gv_smtp_addr_line.
        lwa_recipients-copy = ''.
        APPEND lwa_recipients TO ptb_recipients.
      ENDLOOP.
* Text Data
        CALL FUNCTION 'READ_TEXT'
          EXPORTING
            id                      = 'ST'
            language                = 'E'
            name                    = 'TEST'
            object                  = 'TEXT'
          TABLES
            lines                   = lv_lines
          EXCEPTIONS
            id                      = 1
            language                = 2
            name                    = 3
            not_found               = 4
            object                  = 5
            reference_check         = 6
            wrong_access_to_archive = 7
            OTHERS                  = 8.
      LOOP AT lv_lines INTO lv_lines_line.
        ltb_objtxt = lv_lines_line-tdline.
        APPEND ltb_objtxt.
      ENDLOOP.
      DESCRIBE TABLE ltb_objtxt LINES lw_tab_lines.
      READ TABLE ltb_objtxt INDEX lw_tab_lines.
* document data contains information for the whole message
      lwa_doc_chng-obj_descr = 'ABAPlist'.
* Control Data
      lwa_doc_chng-obj_name   = 'TESTING'.
      lwa_doc_chng-sensitivty = 'F'.
      lwa_doc_chng-no_change  = 'X'.
      lwa_doc_chng-priority   = '1'.
      lwa_doc_chng-obj_prio   = '1'.
      lwa_doc_chng-obj_langu  = sy-langu.
      CLEAR ltb_objpack-transf_bin.
*Attachment
*Move the binary attachment to other internal table.
      ltb_objpack-head_start = 1.
      ltb_objpack-head_num   = 0.
      ltb_objpack-body_start = 1.
      ltb_objpack-body_num   = lw_tab_lines.
      ltb_objpack-doc_type   = 'RAW'.
      APPEND ltb_objpack.
      clear : lw_tab_lines.
*Get the number of lines in the Attachment (PDF FILE)
*      DESCRIBE TABLE it_mess_att LINES lw_tab_lines.
      DESCRIBE TABLE l_objbin lines lw_tab_lines.
      ltb_objpack-transf_bin = 'X'.
      ltb_objpack-head_start = 1.
      ltb_objpack-head_num   = 1.
      ltb_objpack-body_start = 1.
      ltb_objpack-body_num = lw_tab_lines.
      ltb_objpack-doc_type = 'PDF'.
      ltb_objpack-obj_descr = l_doc-xekko-ebeln.
      ltb_objpack-doc_size = lw_tab_lines * 255.
      APPEND ltb_objpack.
*Email Subject
      lwa_doc_chng-obj_descr = lw_subject.
        lwa_recipients-receiver = recipeint.
        lwa_recipients-rec_type = 'U'.
        lwa_recipients-copy     = 'X'.
        lwa_recipients-express  = 'X'.
        APPEND lwa_recipients TO ptb_recipients.
      CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
        EXPORTING
          document_data = lwa_doc_chng
          COMMIT_WORK   = 'X'
        TABLES
          packing_list  = ltb_objpack
          contents_bin  = l_objbin
          contents_txt  = ltb_objtxt
          receivers     = ptb_recipients.
      IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDIF.
  ENDIF.
Edited by: ~loObie on Apr 23, 2010 12:01 PM
Edited by: ~loObie on Apr 23, 2010 12:02 PM

Answer 1

Did you send the pdf in the following format ...
2. Sending PDF as mail.
CLEAR t_receivers.
REFRESH t_receivers.
t_receivers-receiver = sy-uname.
t_receivers-rec_type = 'B'.
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.
Quote from the Following [LINK|http://www.sap-basis-abap.com/smartforms/convert-the-smart-form-into-pdf-and-send.htm]