CONVERT into PDF Files

Question

hi all,
    i have the scenario to convert Purchase Order into PDF Format.
that PDF format should be stored in app server.
please help me to solve this problem.
Your help is greatly appreciated.

Answer 1

HI ,
u can get idea on looking this code.
data: ctrlparams type ssfctrlop.
data: fm_name type rs38l_fnam,
      fname type string value 'c:\reportpdf.pdf',
      bin_size type i,
      joboutput type ssfcrescl,
     it_result like table of itcoo,"JOBOUTPUT-OTFDATA
      otf like table of itcoo,
      doc like table of docs,
      tlines like table of tline.
data: begin of struct occurs 0.
        include structure spfli.
data: end of struct.
data: itab like table of struct with header line.
               call function 'SSF_FUNCTION_MODULE_NAME'
                 exporting
                   formname                 = 'ZSIVA_SMARTFORMS'
                   FORMNAME                 = 'SF_TOTALS'
                importing
                  fm_name                  = fm_name
               if sy-subrc <> 0.
               endif.
ctrlparams-getotf = 'X'.
call function fm_name
exporting
    control_parameters         = ctrlparams
importing
    job_output_info            = joboutput
tables
   itab                    = itab.
EXCEPTIONS
   FORMATTING_ERROR           = 1
   INTERNAL_ERROR             = 2
   SEND_ERROR                 = 3
   USER_CANCELED              = 4
   OTHERS                     = 5.
*IF SY-SUBRC <> 0.
*ENDIF.
call function 'CONVERT_OTF_2_PDF'
importing
   bin_filesize                 = bin_size
  tables
    otf                          = joboutput-otfdata[] "otf
    doctab_archive               = doc
    lines                        = tlines
  call function 'GUI_DOWNLOAD'
    exporting
      bin_filesize                  = bin_size
      filename                      = 'C:\siva\test.pdf'
      filetype                      = 'BIN'
    tables
      data_tab                      = tlines.
* Open PDF
data: program like soxpc-path.
call function 'SO_PROGNAME_GET_WITH_PATH'
  exporting
    doctype = 'PDF'
  importing
    pathname = program
  exceptions
    path_not_found = 1
    program_not_found = 2
    no_batch = 3
    x_error = 4
    others = 5.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
         with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
call function 'WS_EXECUTE'
  exporting
    commandline = 'C:\siva\test.pdf'
    program     = program
  exceptions
    frontend_error = 1
    no_batch = 2
    prog_not_found = 3
    illegal_option = 4
    gui_refuse_execute = 5
    others = 6.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
         with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
regards,
shan