How to attach pdf data into SRM ?

Question

we have a report which sends out a smartform purchaseorder as a pdf to a vendor by email.
Now the requirement is to connect the sent pdf into srm in order to be visible for checking the billing.
it is easy to attach an external file into srm but now I already have alle the data available in sap after sending the pdf as attachment in the mail.
is it also possible to directly transfer this data directly into srm with for instance BAPI_DOCUMENT_CREATE ??
or is another step in between necessary ?
this is the coding for sending the email
CALL FUNCTION 'SX_OBJECT_CONVERT_OTF_PDF'
       EXPORTING
            format_src      = 'OTF'
            format_dst      = 'PDF'
            devtype         = 'MAIL'
*           FUNCPARA        =
       CHANGING
            transfer_bin    = xtransfer_bin
            content_txt     = t_cont_txt
            content_bin     = t_cont_bin
            objhead         = objhead_att
            len             = tabsize
       EXCEPTIONS
            err_conv_failed = 1.
  DESCRIBE TABLE t_cont_bin LINES tablines.
  MOVE i_attach_head TO t_objhead.
  APPEND t_objhead.
* Objectpack opbouwen voor attachment
  t_objpack-transf_bin = 'X'.
  t_objpack-head_start = 1.
  t_objpack-head_num = 1.
  t_objpack-body_start = 1.
  t_objpack-body_num = tablines.
  t_objpack-obj_name = i_attach_name.
  t_objpack-obj_descr = i_attach_descr.
  t_objpack-doc_type = 'PDF'.
  t_objpack-doc_size = tablines * 255.
  APPEND t_objpack.
* Ontvangerlijst opbouwen
  LOOP AT t_receiver.
    MOVE-CORRESPONDING t_receiver TO trcv.
    MOVE 'U' TO trcv-rec_type.    " Extern mailadres
    APPEND trcv.
  ENDLOOP.
  DESCRIBE TABLE trcv LINES h_lines.
  IF h_lines = 0.
    RAISE no_receiver.
    EXIT.
  ENDIF.
* Zender
  IF i_sender IS INITIAL.
    so_sender = sy-uname.
    so_sendertype = 'B'.
  ELSE.
    so_sender = i_sender.
    so_sendertype = 'INT'.
  ENDIF.
* Mail verzenden
  CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
       EXPORTING
          document_data              = s_docdata
          put_in_outbox              = 'X'
          sender_address             = so_sender
          sender_address_type        = so_sendertype
          commit_work                = i_commit_work
*       IMPORTING
*         SENT_TO_ALL                =
*         NEW_OBJECT_ID              =
*         SENDER_ID                  =
       TABLES
          packing_list             = t_objpack
          object_header            = t_objhead " Mailheader
*          CONTENTS_BIN             = T_OBJBIN  " Binaire data (attach)
          contents_txt             = t_doctxt  " ASCII-data
          contents_hex             = t_cont_bin " Hex-data
*         OBJECT_PARA              =
*         OBJECT_PARB              =
          receivers                = trcv
       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.
  IF sy-subrc NE 0.
    RAISE mail_not_sent.
  ENDIF.
I have also found this thread but also no answer there to this as it seems simple requirement ??
PDF Creation + connection to DMS
kind regards
Arthur de Smidt
Edited by: A. de Smidt on May 17, 2011 2:43 PM

Answer 1

ok solved it myself by using cl_gui_frontend_services=>gui_download with
BAPI_DOCUMENT_CREATE2