Pdf attachment through workflow

Question

Hi SDNers,
I need to attach a PDF to send mail in my workflow. Workflow triggers whenever PO changed or release at ME22N or ME21N.
Which PO has been changed, data PO details need to display in PDF.
For this I created a smarform by passing PO number. I created attribute for emailaddress, in this i written code. But, when executed manually it is going. but I changed or release from ME22N or ME21N just a body mail is going butwithout attachment.Please suggest me. Here is the code which I have written in the attribute.
FORM SELECT_TABLE_ADR6 USING SUBRC LIKE SY-SUBRC.
  TYPES: BEGIN OF ty_ekko,
         ebeln TYPE ebeln,
         lifnr TYPE lifnr,
         END OF ty_ekko,
         BEGIN OF ty_lfa1,
         lifnr TYPE lifnr,
         adrnr TYPE adrnr,
         END OF ty_lfa1.
  DATA: it_ekko TYPE STANDARD TABLE OF ty_ekko INITIAL SIZE 0,
        it_lfa1 TYPE STANDARD TABLE OF ty_lfa1 INITIAL SIZE 0,
        wa_ekko TYPE ty_ekko,
        wa_lfa1 TYPE ty_lfa1.
DATA: gv_form_name TYPE rs38l_fnam,
      gv_bin_filesize TYPE i,
      gv_pos TYPE i,
      gv_len TYPE i,
      gv_tab_lines TYPE i.
DATA: gc_text(11) TYPE c VALUE 'Form Output',
      gc_tst(3) TYPE c VALUE 'TST',
      gc_testing(20) TYPE c VALUE 'PURCHASE ORDER'.
DATA: gs_docdata TYPE sodocchgi1,
      gs_ctrlop TYPE ssfctrlop,
      gs_outopt TYPE ssfcompop,
      gs_otfdata TYPE ssfcrescl,
      gs_reclist TYPE somlreci1,
      gs_copy type somlreci1,
      gs_pdf_tab TYPE tline,
      gs_objbin TYPE solisti1,
      GS_OBJTXT TYPE SOLISTI1,
      gs_objpack TYPE sopcklsti1.
DATA: gt_reclist TYPE TABLE OF somlreci1,
      gt_copy type table of somlreci1,
      gt_pdf_tab TYPE TABLE OF tline,
      gt_otf TYPE TABLE OF itcoo,
      gt_objbin TYPE TABLE OF solisti1,
      GT_OBJTXT  TYPE TABLE OF SOLISTI1,
      gt_objpack TYPE TABLE OF sopcklsti1.
DATA: G_SMTP_ADDR type AD_SMTPADR.
DATA: p_plist(40) type C,
      gc_c type  C,
      gc_u type C.
CLEAR : gv_form_name,
        gs_ctrlop,
        gs_outopt,
        gs_otfdata,
        gv_bin_filesize,
        gv_pos,
        gv_len,
        gv_tab_lines.
  IF OBJECT-_ADR6-CLIENT IS INITIAL
  AND OBJECT-_ADR6-ADDRNUMBER IS INITIAL
  AND OBJECT-_ADR6-PERSNUMBER IS INITIAL
  AND OBJECT-_ADR6-DATE_FROM IS INITIAL
  AND OBJECT-_ADR6-CONSNUMBER IS INITIAL.
    SELECT ebeln lifnr FROM ekko INTO TABLE it_ekko
    WHERE ebeln = object-key-purchaseorder.
    SELECT lifnr adrnr FROM lfa1 INTO TABLE it_lfa1
    FOR ALL ENTRIES IN it_ekko WHERE lifnr = it_ekko-lifnr.
    READ TABLE it_lfa1 INTO wa_lfa1 INDEX 1.
    SELECT SINGLE * FROM ADR6 CLIENT SPECIFIED
        WHERE CLIENT = SY-MANDT
        AND ADDRNUMBER = WA_LFA1-ADRNR.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      formname           = 'ZMMF_PUR_DOMESTIC001'
    IMPORTING
      fm_name            = gv_form_name
    EXCEPTIONS
      no_form            = 1
      no_function_module = 2
      OTHERS             = 3.
  gs_ctrlop-getotf = 'X'.
  gs_ctrlop-device = 'PRINTER'.
  gs_ctrlop-LANGU   = SY-LANGU.
   gs_ctrlop-no_dialog = 'X'.
   gs_outopt-tddest = 'LP01'.
   gs_outOPT-TDIMMED = 'X'.
   gs_OUTOPT-TDRECEIVER = SY-UNAME.
   gs_OUTOPT-TDNOPREV = 'X'.
CALL FUNCTION gv_form_name
     EXPORTING
       control_parameters = gs_ctrlop
       output_options     = gs_outopt
     user_settings      = us_screen
      user_settings      = ent_retco
     customer           = customer
     bookings           = bookings
     connections        = connections
       i_ebeln            = object-key-purchaseorder
     IMPORTING
       job_output_info    = gs_otfdata
     EXCEPTIONS
       formatting_error   = 1
       internal_error     = 2
       send_error         = 3
       user_canceled      = 4.
CLEAR gt_otf.
  gt_otf[] = gs_otfdata-otfdata[].
Convert the OTF DATA to SAP Script Text lines
  CLEAR gt_pdf_tab.
  CALL FUNCTION 'CONVERT_OTF'
    EXPORTING
      format                = 'PDF'
      max_linewidth         = 200
    IMPORTING
      bin_filesize          = gv_bin_filesize
    TABLES
      otf                   = gt_otf
      lines                 = gt_pdf_tab
    EXCEPTIONS
      err_max_linewidth     = 1
      err_format            = 2
      err_conv_not_possible = 3
      OTHERS                = 4.
Data : Order(50) type c,
       sep(10) type c value ' / '.
  CLEAR gs_docdata.
  gs_docdata-obj_name = gc_tst.
    CONCATENATE gc_testing sep 'test mail' into order.
  gs_docdata-obj_descr = order.
  CLEAR : gt_reclist, gs_reclist.
  REFRESH: GT_RECLIST, GT_OBJPACK, GT_OBJBIN.
  clear:  gt_copy, gs_copy.
IF internal mail id
  gs_reclist-receiver = ADR6-SMTP_ADDR.
  GS_RECLIST-REC_TYPE = 'U'.
  APPEND gs_reclist TO gt_reclist.
APPEND gs_copy to gt_copy.
CLEAR : gs_objbin, gs_pdf_tab.
  LOOP AT gt_pdf_tab INTO gs_pdf_tab.
    gv_pos = 255 - gv_len.
    IF gv_pos > 134. "length of pdf_table
      gv_pos = 134.
    ENDIF.
    gs_objbin+gv_len = gs_pdf_tab(gv_pos).
    gv_len = gv_len + gv_pos.
    IF gv_len = 255. "length of out (contents_bin)
      APPEND gs_objbin TO gt_objbin.
      CLEAR: gs_objbin, gv_len.
      IF gv_pos < 134.
        gs_objbin = gs_pdf_tab+gv_pos.
        gv_len = 134 - gv_pos.
      ENDIF.
    ENDIF.
  ENDLOOP.
IF gv_len > 0.
    APPEND gs_objbin TO gt_objbin.
  ENDIF.
Filling the details in SAPoffice: Description of Imported
  DESCRIBE TABLE gt_objbin LINES gv_tab_lines.
  CLEAR gs_objbin.
  READ TABLE gt_objbin INTO gs_objbin INDEX gv_tab_lines.
  IF sy-subrc = 0.
    gs_objpack-transf_bin = 'X'.
    gs_objpack-head_start = 1.
    gs_objpack-head_num = 0.
    gs_objpack-body_start = 1.
    gs_objpack-body_num = gv_tab_lines.
    gs_objpack-doc_type = 'PDF'.
    gs_objpack-obj_name = 'ATTACHMENT'.
    gs_objpack-obj_descr = 'test'.
    APPEND gs_objpack TO gt_objpack.
  ENDIF.
IF p_plist IS NOT INITIAL.
gs_reclist-receiver = p_plist.
gs_reclist-rec_type = gc_c.
APPEND gs_reclist TO gt_reclist.
CLEAR gs_reclist.
ENDIF.
Populating the reciever list
gs_reclist-receiver = p_plist.
gs_reclist-rec_type = gc_c.
APPEND gs_reclist TO gt_reclist.
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
  EXPORTING
    DOCUMENT_DATA                    = gs_docdata
   PUT_IN_OUTBOX                    = 'X'
   COMMIT_WORK                      = 'X'
IMPORTING
  SENT_TO_ALL                      =
  NEW_OBJECT_ID                    =
  TABLES
    PACKING_LIST                     = gt_objpack
  OBJECT_HEADER                    =
   CONTENTS_BIN                     = gt_objbin
  CONTENTS_TXT                     =
  CONTENTS_HEX                     =
  OBJECT_PARA                      =
  OBJECT_PARB                      =
    RECEIVERS                        = gt_reclist
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 = 0.
SUBMIT rsconn01
WITH mode EQ 'INT'
and return.
ENDIF.

Answer 1

Hi-
You need to convert the smartform's OTF data to PDF and then create a SOFM instance. Now bind this SOFM instance to workflow container 'ATTACH_OBJECTS' in your email step and your smartform will be showed as a PDF attachment
Vinoth