Error while opening a pdf file sent as an attachment in mail

Question

Dear All,
        We have converted a alv grid into pdf and sent a mail with the attached pdf file. When the attachment is opened in the received mail we get an error " File does not begin with %pdf-". I am pasting the code.
Select single
  from
    TSP01
  where
    RQIDENT = wa_listident.
  if sy-subrc <> 0.
     exit.
  endif.
  client = tsp01-rqclient.
  name   = tsp01-rqo1name.
*BREAK-POINT.
  CALL FUNCTION 'RSTS_GET_ATTRIBUTES'
         EXPORTING
              AUTHORITY     = 'SP01'
              CLIENT        = client
              NAME          = name
              PART          = 1
         IMPORTING
          CHARCO        =
          CREATER       =
          CREDATE       =
          DELDATE       =
          MAX_CREDATE   =
          MAX_DELDATE   =
          NON_UNIQ      =
          NOOF_PARTS    =
          RECTYP        =
          SIZE          =
          STOTYP        =
              TYPE          = type
              OBJTYPE       = objtype
         EXCEPTIONS
              FB_ERROR      = 1
              FB_RSTS_OTHER = 2
              NO_OBJECT     = 3
              NO_PERMISSION = 4.
  if objtype(3) = 'OTF'.
    is_otf = 'X'.
  else.
    is_otf = space.
  endif.
*BREAK-POINT.
CALL FUNCTION 'RSPO_RETURN_SPOOLJOB'
         EXPORTING
              rqident              = wa_listident
              desired_type         = desired_type
         IMPORTING
              real_type            = real_type
         TABLES
              buffer               = l_objcont
         EXCEPTIONS
              no_such_job          = 14
              type_no_match        = 94
              job_contains_no_data = 54
              no_permission        = 21
              can_not_access       = 21
              read_error           = 54.
    IF sy-subrc EQ 0.
      attach_type = real_type.
    ENDIF.
if is_otf = 'X'.
CALL FUNCTION 'CONVERT_OTFSPOOLJOB_2_PDF'
        EXPORTING
          SRC_SPOOLID                    = wa_listident
          NO_DIALOG                      = c_no
      DST_DEVICE                     =
      PDF_DESTINATION                =
        IMPORTING
          PDF_BYTECOUNT                  =  gd_bytecount
          PDF_SPOOLID                    = pdfspoolid
      OTF_PAGECOUNT                  =
          BTC_JOBNAME                    = jobname
          BTC_JOBCOUNT                   = jobcount
        TABLES
          PDF                            = it_pdf_output
        EXCEPTIONS
          ERR_NO_OTF_SPOOLJOB            = 1
          ERR_NO_SPOOLJOB                = 2
          ERR_NO_PERMISSION              = 3
          ERR_CONV_NOT_POSSIBLE          = 4
          ERR_BAD_DSTDEVICE              = 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
  CHECK sy-subrc = 0.
  ENDIF.
Transfer the 132-long strings to 255-long strings
  LOOP AT it_pdf_output.
    TRANSLATE it_pdf_output USING ' ~'.
    CONCATENATE gd_buffer it_pdf_output INTO gd_buffer.
  ENDLOOP.
  TRANSLATE gd_buffer USING '~ '.
  DO.
    it_mess_att = gd_buffer.
    APPEND it_mess_att.
    SHIFT gd_buffer LEFT BY 255 PLACES.
    IF gd_buffer IS INITIAL.
      EXIT.
    ENDIF.
  ENDDO.
Please guide me to resolve this issue.
Thanks & Regards,
Anand

Answer 1

Hi,
is the next part of the code correct.
What i mean is packing of the attachment, finding out the size of pdf file and doc type as PDF.
You can also try below link..
Link: [http://wiki.sdn.sap.com/wiki/display/Snippets/SENDALVGRIDASPDFATTACHMENTTOSAPINBOXUSINGCLASSES]
Hope this helps.
Regards,
-Sandeep