Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 9076

Re: smartform to pdf copies

$
0
0

Hi Manish,

 

Am also facing the same situation. Have created 3 copies 1.Original 2.Transport 3.Duplicate

While printing am getting all the 3 copies using tdcopies = 3. But when ever am trying to convert PDF am getting the First one Original copy as PDF. Could you please elaborate the procedure to achieve this.Please see the bellow snippet you can understand what am doing exactly.


REPORT  ZTEST_SF_TO_PDF_EX1.

PARAMETER: PO_NO1 TYPE EBELN DEFAULT 4500006370.

* Internal table declaration
DATA:

       it_otf       TYPE STANDARD TABLE OF itcoo,
       it_otf2     TYPE STANDARD TABLE OF itcoo,
       it_docs    TYPE STANDARD TABLE OF docs,
       it_lines    TYPE STANDARD TABLE OF tline.
* Declaration of local variables.
DATA:
       st_job_output_info              TYPE ssfcrescl,
       st_document_output_info    TYPE ssfcrespd,
       st_job_output_options         TYPE ssfcresop,
       st_output_options               TYPE ssfcompop,
       st_control_parameters         TYPE ssfctrlop,
       v_len_in                              TYPE so_obj_len,
       v_language                         TYPE sflangu VALUE 'E',
       v_e_devtype                        TYPE rspoptype,
       v_bin_filesize                       TYPE i,
       v_name                               TYPE string,
       v_path                                 TYPE string,
       v_fullpath                             TYPE string,
       v_filter                                 TYPE string,
       v_uact                                 TYPE i,
       v_guiobj                               TYPE REF TO cl_gui_frontend_services,
       v_filename                           TYPE string,
       v_fm_name                          TYPE rs38l_fnam.


CONSTANTS c_formname          TYPE tdsfname VALUE 'ZTEST_SF_EX1'.

CALL FUNCTION 'SSF_GET_DEVICE_TYPE'
   EXPORTING
     i_language          = v_language
     i_application       = 'SAPDEFAULT'
   IMPORTING
     e_devtype           = v_e_devtype
             .


st_output_options-tdcopies = 3.
st_output_options-tdprinter = v_e_devtype.
*st_control_parameters-no_dialog = 'X'.
st_control_parameters-getotf = 'X'.


*.................GET SMARTFORM FUNCTION MODULE NAME.................*


   CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
     EXPORTING
       FORMNAME                 = c_formname
    IMPORTING
      FM_NAME                  = v_fm_name
             .
*...........................CALL SMARTFORM............................*


CALL FUNCTION v_fm_name
   EXPORTING
     control_parameters = st_control_parameters
     output_options       = st_output_options
      PO_NO                = PO_NO1
   IMPORTING
     document_output_info  = st_document_output_info
     job_output_info       = st_job_output_info
     job_output_options    = st_job_output_options
             .
*.........................CONVERT TO OTF TO PDF.......................*


   CALL FUNCTION 'CONVERT_OTF_2_PDF'
     IMPORTING
       bin_filesize   = v_bin_filesize
     TABLES
       otf            = st_job_output_info-otfdata
       doctab_archive = it_docs
       lines          = it_lines
               .
*........................GET THE FILE NAME TO STORE....................*


   CONCATENATE 'smrt' '.pdf' INTO v_name.
   CREATE OBJECT v_guiobj.
   CALL METHOD v_guiobj->file_save_dialog
     EXPORTING
       default_extension  = 'pdf'
       default_file_name  = v_name
       file_filter               = v_filter
     CHANGING
       filename              = v_name
       path                    = v_path
       fullpath                = v_fullpath
       user_action         = v_uact.
   IF v_uact = v_guiobj->action_cancel.
     EXIT.
   ENDIF.


*..................................DOWNLOAD AS FILE....................*

   MOVE v_fullpath TO v_filename.
   CALL FUNCTION 'GUI_DOWNLOAD'
     EXPORTING
       bin_filesize     = v_bin_filesize
       filename         = v_filename
       filetype           = 'BIN'
     TABLES
       data_tab         = it_lines
               .




Thanks in Advance,

PoornaChand M



Viewing all articles
Browse latest Browse all 9076

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>