Problem while downloading sform..

Question

HI all,
I am converting smartform to pdf format.
but i get the error 0 bytes transported, code page 0000.
can anyone help me plz

Answer 1

hI..
data: i_otf LIKE itcoo OCCURS 100 WITH HEADER LINE,
      i_pdf LIKE tline OCCURS 100 WITH HEADER LINE.
data: op_option type SSFCTRLOP,
job_output type SSFCRESCL.
*DATA : w_FILE_NAME type string,
      w_File_path type string,
      w_FULL_PATH type string,
      W_bin_filesize TYPE i. " Binary File Size
op_option-getotf = 'X'.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
     EXPORTING
       formname                 = 'ZHRM_BANK_LETTER'
  VARIANT                  = ' '
  DIRECT_CALL              = ' '
  IMPORTING
      fm_name                  = f_name
EXCEPTIONS
  NO_FORM                  = 1
  NO_FUNCTION_MODULE       = 2
  OTHERS                   = 3
  IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  "ME
  SORT itab BY srno.
*sort itab by pernr.
  RANGES : c_abkrs FOR pa0001-abkrs.
  c_abkrs-sign = 'I'.
  c_abkrs-option = 'EQ'.
  c_abkrs-low = p_abkrs-low.
  c_abkrs-high = p_abkrs-high.
  APPEND c_abkrs.
  CALL FUNCTION f_name "'/1BCDWB/SF00000005'
     EXPORTING
  ARCHIVE_INDEX              =
  ARCHIVE_INDEX_TAB          =
  ARCHIVE_PARAMETERS         =
   CONTROL_PARAMETERS          = OP_OPTION  "***CHANGED
  MAIL_APPL_OBJ              =
  MAIL_RECIPIENT             =
  MAIL_SENDER                =
  OUTPUT_OPTIONS             =
   USER_SETTINGS               = 'X'  "***CHANGED
       p_abrp                  = p_pabrp
       p_pabrj                 = p_pabrj
       p_abkrs                 = c_abkrs-low
IMPORTING
   DOCUMENT_OUTPUT_INFO       = JOB_OUTPUT  "***CHANGED
  JOB_OUTPUT_INFO            =
  JOB_OUTPUT_OPTIONS         =
     TABLES
       itab                       = itab
  EXCEPTIONS
    formatting_error           = 1
    internal_error             = 2
    send_error                 = 3
    user_canceled              = 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.
*****CHANGED ON
CALL FUNCTION 'CONVERT_OTF'
EXPORTING
   FORMAT                      = 'PDF'
   MAX_LINEWIDTH               = 132
  ARCHIVE_INDEX               = ' '
  COPYNUMBER                  = 0
  ASCII_BIDI_VIS2LOG          = ' '
  PDF_DELETE_OTFTAB           = ' '
IMPORTING
   BIN_FILESIZE                = w_binfile_size
  BIN_FILE                    =
  TABLES
    otf                         = job_output-otfdata
    lines                       = I_PDF
EXCEPTIONS
   ERR_MAX_LINEWIDTH           = 1
   ERR_FORMAT                  = 2
   ERR_CONV_NOT_POSSIBLE       = 3
   ERR_BAD_OTF                 = 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 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE = w_binfile_size
filename = 'c:\test_pdf_sf.pdf'
FILETYPE = 'BIN'
tables
data_tab = i_pdf
*FIELDNAMES =
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.