‎2006 Dec 29 10:14 AM
HOW TO GET OUTPUT IN PDF FORMAT OR DOC FORMAT FROM SMARTFORMS.
KINDLY GUIDE
THANKS & REGARDS
‎2006 Dec 29 10:28 AM
hI, THIS PROGRAM IS USED TO CONVERT SMARTFORMS INTO PDF
&----
*& Report ZTEST_SMARTFORM *
*& *
&----
*& *
*& *
&----
REPORT ZTEST_SMARTFORM .
TABLES : ZCUSTOMER,ZTRAN,ZTRANS.
DATA : IT_CUST LIKE TABLE OF ZCUSTOMER WITH HEADER LINE,
IT_TRAN LIKE TABLE OF ZTRAN WITH HEADER LINE,
IT_VIEW LIKE TABLE OF ZTRANS WITH HEADER LINE.
*DATA : BILL LIKE ZSAL_DETAILS-BILLNO.
DATA : ZFM_NAME TYPE RS38L_FNAM, "NAME OF THE FN MODULE
Ztest_form TYPE TDSFNAME. "NAME OF THE FORM
DATA: CTRLPARAMS TYPE SSFCTRLOP,
JOBOUTPUT TYPE SSFCRESCL,
TLINES LIKE TABLE OF TLINE,
IT_FILETABLE LIKE TABLE OF FILE_TABLE WITH HEADER LINE,
FNAME TYPE STRING value 'c:\report.pdf',
RC TYPE I,
BIN_SIZE TYPE I.
SELECT-OPTIONS CUSTID FOR ZCUSTOMER-CUSTID .
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = 'ZTEST_FORM'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = ZFM_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.
CTRLPARAMS-GETOTF = 'X'.
CALL FUNCTION ZFM_NAME
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
CONTROL_PARAMETERS = CTRLPARAMS
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
OUTPUT_OPTIONS =
USER_SETTINGS = 'X'
CID = CUSTID-LOW
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO = JOBOUTPUT
JOB_OUTPUT_OPTIONS =
TABLES
IT_CUST = IT_CUST
IT_TRAN = IT_TRAN
IT_VIEW = IT_VIEW
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.
CALL FUNCTION 'CONVERT_OTF'
EXPORTING
FORMAT = 'PDF'
IMPORTING
BIN_FILESIZE = BIN_SIZE
TABLES
OTF = JOBOUTPUT-OTFDATA
LINES = TLINES.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE = BIN_SIZE
FILENAME = FNAME
FILETYPE = 'BIN'
TABLES
DATA_TAB = tlines.
Reward if useful
‎2006 Dec 29 10:20 AM
Hi Manmeet,
How to convert smartform output to PDF and mailing them
weblog
/people/community.user/blog/2006/11/08/calling-smartforms-dynamically-using-dynamic-function-parameters
Regards,
Raghav
‎2006 Dec 29 10:21 AM
DATA: t_ssfcrescl TYPE ssfcrescl.
DATA: t_ssfctrlop TYPE ssfctrlop.
DATA: pdf_tab TYPE TABLE OF tline.
DATA: pdf_fsize TYPE i.
DATA: fname(30).
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'YHR_CONFIRM'
IMPORTING
fm_name = fname.
t_ssfctrlop-no_dialog = 'X'.
t_ssfctrlop-getotf = 'X'.
t_ssfctrlop-langu = 'E'.
CALL FUNCTION fname
EXPORTING
control_parameters = t_ssfctrlop
g_pernr = g_pernr
IMPORTING
job_output_info = t_ssfcrescl.
CALL FUNCTION 'HR_EFI_SHOW_PDF_FORM'
EXPORTING
top_edge = 15
left_edge = 10
TABLES
otf_table = t_ssfcrescl-otfdata.
‎2006 Dec 29 10:25 AM
‎2006 Dec 29 10:28 AM
hI, THIS PROGRAM IS USED TO CONVERT SMARTFORMS INTO PDF
&----
*& Report ZTEST_SMARTFORM *
*& *
&----
*& *
*& *
&----
REPORT ZTEST_SMARTFORM .
TABLES : ZCUSTOMER,ZTRAN,ZTRANS.
DATA : IT_CUST LIKE TABLE OF ZCUSTOMER WITH HEADER LINE,
IT_TRAN LIKE TABLE OF ZTRAN WITH HEADER LINE,
IT_VIEW LIKE TABLE OF ZTRANS WITH HEADER LINE.
*DATA : BILL LIKE ZSAL_DETAILS-BILLNO.
DATA : ZFM_NAME TYPE RS38L_FNAM, "NAME OF THE FN MODULE
Ztest_form TYPE TDSFNAME. "NAME OF THE FORM
DATA: CTRLPARAMS TYPE SSFCTRLOP,
JOBOUTPUT TYPE SSFCRESCL,
TLINES LIKE TABLE OF TLINE,
IT_FILETABLE LIKE TABLE OF FILE_TABLE WITH HEADER LINE,
FNAME TYPE STRING value 'c:\report.pdf',
RC TYPE I,
BIN_SIZE TYPE I.
SELECT-OPTIONS CUSTID FOR ZCUSTOMER-CUSTID .
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = 'ZTEST_FORM'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = ZFM_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.
CTRLPARAMS-GETOTF = 'X'.
CALL FUNCTION ZFM_NAME
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
CONTROL_PARAMETERS = CTRLPARAMS
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
OUTPUT_OPTIONS =
USER_SETTINGS = 'X'
CID = CUSTID-LOW
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO = JOBOUTPUT
JOB_OUTPUT_OPTIONS =
TABLES
IT_CUST = IT_CUST
IT_TRAN = IT_TRAN
IT_VIEW = IT_VIEW
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.
CALL FUNCTION 'CONVERT_OTF'
EXPORTING
FORMAT = 'PDF'
IMPORTING
BIN_FILESIZE = BIN_SIZE
TABLES
OTF = JOBOUTPUT-OTFDATA
LINES = TLINES.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE = BIN_SIZE
FILENAME = FNAME
FILETYPE = 'BIN'
TABLES
DATA_TAB = tlines.
Reward if useful
‎2006 Dec 29 10:28 AM
Refer this link for PDF conversion
<a href="https://forums.sdn.sap.com/click.jspa?searchID=556723&messageID=2889208">https://forums.sdn.sap.com/click.jspa?searchID=556723&messageID=2889208</a>
<a href="https://forums.sdn.sap.com/click.jspa?searchID=556723&messageID=2797838">https://forums.sdn.sap.com/click.jspa?searchID=556723&messageID=2797838</a>
‎2006 Dec 29 10:42 AM
‎2006 Dec 29 10:51 AM
‎2006 Dec 29 10:52 AM
U have to use the function module called 'CONVERT_OTF'.
The following is the code for converting smartforms into a PDF format.
&----
*& Report ZRAJ_KA_SF_06 *
*& *
&----
*& *
*& *
&----
REPORT ZRAJ_KA_SF_06 .
TABLES : ZCUSTOMER,ZTRAN,ZTRANS.
DATA : IT_CUST LIKE TABLE OF ZCUSTOMER WITH HEADER LINE,
IT_TRAN LIKE TABLE OF ZTRAN WITH HEADER LINE,
IT_VIEW LIKE TABLE OF ZTRANS WITH HEADER LINE.
*DATA : BILL LIKE ZSAL_DETAILS-BILLNO.
DATA : ZFM_NAME TYPE RS38L_FNAM, "NAME OF THE FN MODULE
ZRAJ_KA_SF_06 TYPE TDSFNAME. "NAME OF THE FORM
DATA: CTRLPARAMS TYPE SSFCTRLOP,
JOBOUTPUT TYPE SSFCRESCL,
TLINES LIKE TABLE OF TLINE,
IT_FILETABLE LIKE TABLE OF FILE_TABLE WITH HEADER LINE,
FNAME TYPE STRING value 'c:\report.pdf',
RC TYPE I,
BIN_SIZE TYPE I.
SELECT-OPTIONS CUSTID FOR ZCUSTOMER-CUSTID .
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = 'ZRAJ_KA_SF_06'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = ZFM_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.
CTRLPARAMS-GETOTF = 'X'.
CALL FUNCTION ZFM_NAME
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
CONTROL_PARAMETERS = CTRLPARAMS
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
OUTPUT_OPTIONS =
USER_SETTINGS = 'X'
CID = CUSTID-LOW
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO = JOBOUTPUT
JOB_OUTPUT_OPTIONS =
TABLES
IT_CUST = IT_CUST
IT_TRAN = IT_TRAN
IT_VIEW = IT_VIEW
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.
CALL FUNCTION 'CONVERT_OTF'
EXPORTING
FORMAT = 'PDF'
IMPORTING
BIN_FILESIZE = BIN_SIZE
TABLES
OTF = JOBOUTPUT-OTFDATA
LINES = TLINES.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE = BIN_SIZE
FILENAME = FNAME
FILETYPE = 'BIN'
TABLES
DATA_TAB = tlines.