Smartform data in pdf format

[Former Member]

Hi all,

I want to extract the data from the invoice smartform and i should display it in pdf format.I have invoice number with me as input parameter.

Can any one solve my problem...it is urgent plz.........

Thanks ,

Rakesh.

[Former Member]

Hi all,

I want to extract the data from the invoice smartform and i should display it in pdf format.I have invoice number with me as input parameter.

Can any one solve my problem...it is urgent plz.........

Thanks ,

Rakesh.

[former_member188829]

Hi,

Use the Function module:CONVERT_OTF_2_PDF

check these links..

http://www.saptechnical.com/Tutorials/Smartforms/OTF2PDF.htm

https://www.sdn.sap.com/irj/sdn/wiki?path=/display/snippets/convertSmartformtoPDFformat&

Message was edited by:

Vishnu Reddy

[Former Member]

Hi vishnu,

i want all the steps in detail like extracting the output type from NAST table using the invoice number and than getting form name from TNAPR table with the output type.....like that

Thanks ,

Rakesh.

[Former Member]

hi

good

please check this code

By using FM we can convert smartform to PDF like CONVERT_PDF

and GUI_DOWNLOAD.

&----

---

*& Report ZSRI_RE_02

*&

&----

---

REPORT ZSRI_RE_02.

SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME.

PARAMETER: P_DATE LIKE SY-DATUM.

PARAMETER: P_REA TYPE CHAR255.

SELECTION-SCREEN:END OF BLOCK B1.

*DATA:WS_UCOMM LIKE SY-UCOMM.

DATA FORM_NAME TYPE rs38L_fnam.

DATA: WA_CTRLOP TYPE SSFCTRLOP,

WA_OUTOPT TYPE SSFCOMPOP.

DATA: T_OTFDATA TYPE SSFCRESCL,

T_PDF_TAB LIKE TLINE OCCURS 0 WITH HEADER LINE.

DATA: t_otf TYPE itcoo OCCURS 0 WITH HEADER LINE.

DATA: w_filesize TYPE i.

DATA: w_bin_filesize TYPE i.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

EXPORTING

FORMNAME = 'ZSRI_FORM_01'

• VARIANT = ' '

• DIRECT_CALL = ' '

IMPORTING

FM_NAME = FORM_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.

wa_ctrlop-getotf = 'X'.

wa_ctrlop-no_dialog = 'X'.

wa_outopt-tdnoprev = 'X'.

CALL FUNCTION FORM_NAME

EXPORTING

• ARCHIVE_INDEX =

• ARCHIVE_INDEX_TAB =

• ARCHIVE_PARAMETERS =

CONTROL_PARAMETERS = WA_CTRLOP

• MAIL_APPL_OBJ =

• MAIL_RECIPIENT =

• MAIL_SENDER =

OUTPUT_OPTIONS = WA_OUTOPT

USER_SETTINGS = 'X'

MYDATE = P_DATE

REASON = P_REA

IMPORTING

• DOCUMENT_OUTPUT_INFO =

JOB_OUTPUT_INFO = T_OTFDATA.

• JOB_OUTPUT_OPTIONS =

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

t_otf[] = t_otfdata-otfdata[].

*Convert into PDF

CALL FUNCTION 'CONVERT_OTF'

EXPORTING

FORMAT = 'PDF'

MAX_LINEWIDTH = 132

• ARCHIVE_INDEX = ' '

• COPYNUMBER = 0

• ASCII_BIDI_VIS2LOG = ' '

• PDF_DELETE_OTFTAB = ' '

IMPORTING

BIN_FILESIZE = w_bin_filesize

• BIN_FILE =

TABLES

OTF = T_OTF

LINES = T_PDF_TAB

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.

*

• To download into PC

CALL FUNCTION 'WS_DOWNLOAD'

EXPORTING

BIN_FILESIZE = W_BIN_FILESIZE

• CODEPAGE = ' '

FILENAME = 'D:\SRI2.PDF'

FILETYPE = 'BIN'

• MODE = ' '

• WK1_N_FORMAT = ' '

• WK1_N_SIZE = ' '

• WK1_T_FORMAT = ' '

• WK1_T_SIZE = ' '

• COL_SELECT = ' '

• COL_SELECTMASK = ' '

• NO_AUTH_CHECK = ' '

IMPORTING

FILELENGTH = W_FILESIZE

TABLES

DATA_TAB = T_PDF_TAB.

• FIELDNAMES =

• EXCEPTIONS

• FILE_OPEN_ERROR = 1

• FILE_WRITE_ERROR = 2

• INVALID_FILESIZE = 3

• INVALID_TYPE = 4

• NO_BATCH = 5

• UNKNOWN_ERROR = 6

• INVALID_TABLE_WIDTH = 7

• GUI_REFUSE_FILETRANSFER = 8

• CUSTOMER_ERROR = 9

• NO_AUTHORITY = 10

• OTHERS = 11

.

IF SY-SUBRC <> 0.

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

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

ENDIF.

reward point if helpful.

thanks

mrutyun^