Send spool as PDF, error in opening PDF- Could not find the XObject '00014'

Question

Hi
I am sendind a spool as PDF and when opening the PDF I am getting error saying Could not find the XObject named ‘00014’.
Please let me know how I can see the PDF contents proerly.
Regards
Bala

Answer 1

Hi Bala
Check the sample which can be useful for you.
Pseudo code for sending PDF attachment:
TABLES: tsp01.
  TYPES: BEGIN OF t_spool,
                      Rqident TYPE tsp01-rqident,
                END OF t_spool.
  DATA: i_spool TYPE STANDARD TABLE OF t_spool,
            Wa_spool TYPE t_spool.
  SELECT rqident FROM tsp01
  INTO TABLE i_spool
WHERE rqowner = sy-uname.
  SORT i_spool DESCENDING BY rqident.
  LOOP AT i_spool INTO wa_spool.
  ENDLOOP.
YPES: l_ty_tab_pdf TYPE tline OCCURS 0.
  DATA: l_pdf TYPE l_ty_tab_pdf,
            l_spool TYPE tsp01-rqident.
Type for binary attachment table.
  TYPES: l_ty_tab_objbin TYPE solisti1 OCCURS 0.
  DATA: l_objbin TYPE l_ty_tab_objbin.
            l_spool = wa_spool-rqident.
  CALL FUNCTION 'CONVERT_OTFSPOOLJOB_2_PDF'            
      EXPORTING
        src_spoolid                    = l_spool
        no_dialog                      = ' '
      TABLES
        pdf                            = l_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.
  IF sy-subrc <> 0.
    WRITE: / 'error', sy-subrc.
  ENDIF.
**/ Convert the PDF format to the table type required for the attachment.
CALL FUNCTION 'QCE1_CONVERT'
    TABLES
      t_source_tab         = l_pdf
      t_target_tab          = l_objbin
    EXCEPTIONS
      convert_not_possible = 1
      OTHERS               = 2.
  IF sy-subrc <> 0.
    WRITE: / 'error', sy-subrc.
  ENDIF.
TABLES: soli.
  DATA: v_email TYPE soli-line.  “Manager’s Email
  DATA: l_adrnr LIKE kna1-adrnr. “Address Number
  DATA: l_objky TYPE nast-objky. “Object Key
  DATA: l_reclist LIKE somlreci1 OCCURS 0 WITH HEADER LINE.
  DATA: l_objtxt    LIKE solisti1 OCCURS   0 WITH HEADER LINE.
  DATA: l_objpack   LIKE sopcklsti1 OCCURS 0 WITH HEADER LINE.
  DATA: l_doc_chng  LIKE sodocchgi1.
  DATA: l_objhead   LIKE solisti1 OCCURS   0 WITH HEADER LINE.
  DATA: l_tab_lines LIKE sy-tabix.
  CONSTANTS: k_true TYPE boolean_flg VALUE 'X'.
  DATA: l_mail TYPE somlreci1-receiver.
  l_mail = v_email.
Creation of the document to be sent as File Name
  l_doc_chng-obj_name = 'SENDFILE'.
Mail Subject
  l_doc_chng-obj_descr =l_text-001.
“Here text-001 will contains “Compensation Review Statement for Employee Name”
Here we can concatenate employee first name and last name to l_text-001.
Completing the recipient list
  l_reclist-receiver = l_mail. “Manager Email Address
  l_reclist-rec_type = 'U'.
  APPEND l_reclist.
Mail Contents
  l_objtxt = text-002.
  APPEND l_objtxt.
Calculate email size in bytes
  DESCRIBE TABLE l_objtxt LINES l_tab_lines.
  READ TABLE l_objtxt INDEX l_tab_lines.
  l_doc_chng-doc_size = (l_tab_lines - 1 ) * 255 + STRLEN( l_objtxt ).
Creation of the entry for the compressed document for the email text
  CLEAR l_objpack-transf_bin.
  l_objpack-head_start = 1.
  l_objpack-head_num = 0.
  l_objpack-body_start = 1.
  l_objpack-body_num = l_tab_lines.
  l_objpack-doc_type = 'RAW'.
  APPEND l_objpack.
Creation of the document attachment
(Assume that the data in OBJBIN is in BMP format)
  DESCRIBE TABLE l_objbin LINES l_tab_lines.
  l_objhead = text-001.
  APPEND l_objhead.
  CLEAR l_objpack.
Creation of the entry for the compressed/attached document
  l_objpack-transf_bin = k_true.
  l_objpack-head_start = 1.
  l_objpack-head_num = 1.
  l_objpack-body_start = 1.
  l_objpack-body_num = l_tab_lines.
  l_objpack-doc_type = 'PDF'.
  l_objpack-obj_name = text-005.
  l_objpack-obj_descr = text-001.
  l_objpack-doc_size = l_tab_lines * 255.
  APPEND l_objpack. "/ .
Sending the document
  CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
    EXPORTING
      document_data              = l_doc_chng
      put_in_outbox              = 'X'
    TABLES
      packing_list               = l_objpack
      object_header              = l_objhead
      contents_bin               = l_objbin
      contents_txt               = l_objtxt
      receivers                  = l_reclist
    EXCEPTIONS
      too_many_receivers         = 1
      document_not_sent          = 2
      operation_no_authorization = 4
      OTHERS                     = 99.
  IF sy-subrc <> 0.
    WRITE: / 'unsuccessful', sy-subrc.
  ELSE.
    WRITE:  / 'successful'.
  ENDIF.
*Take note it is a requirement to do a commit work for the email to go into transaction   
  SOST.
COMMIT WORK.  
Regards,
Sree