cancel
Showing results for 
Search instead for 
Did you mean: 

Smartform can be convert to PDF file?

Former Member
0 Kudos

As subject.

Because my client asked, when after preview then convert to PDF file?

Please help, Thanks a lot!!

Accepted Solutions (0)

Answers (6)

Answers (6)

Former Member
0 Kudos

Dear,

you can use PDF printer 995.

Which converts your form in to PDF file when printed through it.

Its a software available easily on Internet.

This may usefull to you.

Regards,

Prasad C Gore

Former Member
0 Kudos

Hi

use FM CONVERT_OTFSPOOLJOB_2_PDF

if you want to download use ws_download..

reward if helpful

vivekanand

Former Member
0 Kudos

Hi

check this link. this is a sample code provided my me in WIKI.

https://wiki.sdn.sap.com/wiki/display/Snippets/DownloadSMARTFORMoutputtoPDF+file.

Reward if useful

Regards

ANUPAM

Former Member
0 Kudos

PROGRAM TO CONVERT SMARTFORM TO PDF IN LOCAL DISK with a checkbox asking the user if needed in pdf format

REPORT Z7SFORMTABLE.

TABLES : KNA1, VBAK.

DATA: it_otf TYPE STANDARD TABLE OF itcoo,

it_docs TYPE STANDARD TABLE OF docs,

it_lines TYPE STANDARD TABLE OF tline,

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 :gc_filename(15) type c value 'F:\SMART'.

CONSTANTS c_formname TYPE tdsfname VALUE 'Z7SFORMTABLE1'.

*PARAMETERS : P_CUSTNO TYPE KNA1-KUNNR.

SELECT-OPTIONS : S_CUSTNO FOR KNA1-KUNNR.

parameters p_check as checkbox."File download

parameter : p_value like ibipparms-path default gc_filename ."Path

DATA ITAB TYPE VBAK OCCURS 1.

DATA ITAB1 TYPE KNA1 OCCURS 1.

SELECT * FROM KNA1 INTO TABLE ITAB1

WHERE KUNNR IN S_CUSTNO.

SELECT * FROM VBAK INTO TABLE ITAB

WHERE KUNNR IN S_CUSTNO.

IF P_CHECK = 'X'.

CALL FUNCTION 'SSF_GET_DEVICE_TYPE'

EXPORTING

I_LANGUAGE = v_language

I_APPLICATION = 'SAPDEFAULT'

IMPORTING

E_DEVTYPE = v_e_devtype.

st_output_options-tdprinter = v_e_devtype.

*st_output_options-tdprinter = 'locl'.

st_control_parameters-no_dialog = 'X'.

st_control_parameters-getotf = 'X'.

**SMART FUNCTION MODULE**

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING

FORMNAME = C_FORMNAME

IMPORTING

FM_NAME = V_FM_NAME.

**FORM FUNCTION MODULE**

CALL FUNCTION v_fm_name

EXPORTING

control_parameters = st_control_parameters

output_options = st_output_options

IMPORTING

document_output_info = st_document_output_info

job_output_info = st_job_output_info

job_output_options = st_job_output_options

TABLES

T_VBAK = ITAB

  • T_KNA1 = ITAB1

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.

ELSE.

.........................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

EXCEPTIONS

err_conv_not_possible = 1

err_otf_mc_noendmarker = 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.

........................GET THE FILE NAME TO STORE....................

  • CONCATENATE 'smrt' '.pdf' INTO v_name.

CONCATENATE P_VALUE '.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

EXCEPTIONS

file_write_error = 1

no_batch = 2

gui_refuse_filetransfer = 3

invalid_type = 4

no_authority = 5

unknown_error = 6

header_not_allowed = 7

separator_not_allowed = 8

filesize_not_allowed = 9

header_too_long = 10

dp_error_create = 11

dp_error_send = 12

dp_error_write = 13

unknown_dp_error = 14

access_denied = 15

dp_out_of_memory = 16

disk_full = 17

dp_timeout = 18

file_not_found = 19

dataprovider_exception = 20

control_flush_error = 21

OTHERS = 22.

IF sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDIF.

ELSE.

CALL FUNCTION '/1BCDWB/SF00000021'

  • EXPORTING

  • ARCHIVE_INDEX =

  • ARCHIVE_INDEX_TAB =

  • ARCHIVE_PARAMETERS =

  • CONTROL_PARAMETERS =

  • MAIL_APPL_OBJ =

  • MAIL_RECIPIENT =

  • MAIL_SENDER =

  • OUTPUT_OPTIONS =

  • USER_SETTINGS = 'X'

  • IMPORTING

  • DOCUMENT_OUTPUT_INFO =

  • JOB_OUTPUT_INFO =

  • JOB_OUTPUT_OPTIONS =

TABLES

T_VBAK = ITAB

  • T_KNA1 = ITAB1

  • 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.

ENDIF.

Former Member
0 Kudos

hi

try to use

CALL FUNCTION 'CONVERT_OTF'

EXPORTING

FORMAT = 'PDF'

  • MAX_LINEWIDTH = 132

  • ARCHIVE_INDEX = ' '

  • COPYNUMBER = 0

  • ASCII_BIDI_VIS2LOG = ' '

  • PDF_DELETE_OTFTAB = ' '

  • IMPORTING

  • BIN_FILESIZE =

  • BIN_FILE =

TABLES

OTF =

LINES =

  • 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.

this fuction with appropriate values to be passed in it , and after this use call FUNCTION "WS_DOWNLOAD" to download that file in ur local system.

reward if helpful.

Former Member
0 Kudos

Hi,

we can convert the smartform into PDF format.

by using the program RSTXPDFT4.

after getting the program we get the spoolnumber. that number assign in rstxpdft4 program based on that one it will convert.

we can change into PDF.

please reward points,

regards,

satish.

Former Member
0 Kudos

Hi,

Check this threads

Regards,

Maha