Smartforms nach PDF konvertieren

[Leah824]

Hello ,

ICh hoffe mir kann jemand helfen oder mich auf jemanden verweisen

Ich möchte mein Smartform in meiner BSP Applikation nach PDF konvertieren und das PDF in einem neuen Fenster anzuzeigen.
Ich habe eine Seite mit einem Button(Druckansicht) implemtiert. Diesen habe ich im InputProcessing event implementiert. Auf einer neuen Seite soll nun der Smart form aufruf stattfinden und die anschließende Konvertierung nach pdf.

Wenn das PDF geöffnet werden soll, geht der Adobe Reade auf , ohne Inhalt und es kommt die Nachricht: Daei beginnt nicht mit "%-pdf".

Habe hierbei schon alles probiert.
Mein Code ist:

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. * event handler for data retrieval
2.  
3. * parameters for generated function module
4. data: l_function_module_name type rs38l_fnam,
5.       ls_output_options      type ssfcompop,
6.       ls_control_parameters  type ssfctrlop,
7.       ls_output_data         type ssfcrescl,
8.       l_devtype              type rspoptype.
9.  
10. * generated result: HTML with embedded CSS
11. data: ls_xmloutput   type ssfxmlout,
12.       lt_html_raw    type tsfixml,
13.       l_xstring      type xstring,    "needed for HTTP response
14.       l_html_xstring type xstring,
15.       l_xlength      type i.
16.  
17.  
18. * generated result: PDF format
19. data: l_pdf_xstring  type xstring,
20.       lt_lines       type table of tline,
21.       ls_line        type tline,
22.       l_pdf_len      type i.
23.  
24. * Cookie mit Eingabewerten holen
25. cl_bsp_server_side_cookie=>get_server_cookie(
26.   EXPORTING
27.      name                      = 'lt_fields'
28.      application_namespace     = 'NONE'
29.      application_name          = 'NONE'
30.      username                  = 'NONE'
31.      session_id                = 'NONE'
32.      data_name                 = 'NONE'
33.   "IMPORTING
34.     "expiry_date                = date
35.     "expiry_time                = time
36.   CHANGING
37.     data_value                 = lt_fields ).
38.  
39.  
40. * Cookie mit Equipmentdaten holen
41. cl_bsp_server_side_cookie=>get_server_cookie(
42.   EXPORTING
43.      name                      = 'ums_equip_ges'
44.      application_namespace     = 'NONE'
45.      application_name          = 'NONE'
46.      username                  = 'NONE'
47.      session_id                = 'NONE'
48.      data_name                 = 'NONE'
49.   "IMPORTING
50.     "expiry_date                = date
51.     "expiry_time                = time
52.   CHANGING
53.     data_value                 = ums_equip ).
54.  
55. *-----------------------------------------------------------------------
56. * Get name of generated function module
57. *-----------------------------------------------------------------------
58. call function 'SSF_FUNCTION_MODULE_NAME'
59.      exporting  formname           = 'Z_REPKOST_GES'
60. *                 variant            = ' '
61. *                 direct_call        = ' '
62.      importing  fm_name            = l_function_module_name
63.      exceptions no_form            = 1
64.                 no_function_module = 2
65.                 others             = 3.
66.  
67. if sy-subrc  0.
68. *   error handling
69.   message id sy-msgid type sy-msgty number sy-msgno
70.           with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
71.   exit.
72. endif.
73.  
74. *---------------------------------------------------------------------------
75. * get device type from language
76. *---------------------------------------------------------------------------
77. call function 'SSF_GET_DEVICE_TYPE'
78.   exporting
79.     i_language                   = sy-langu
80. *     i_application                = 'SAPDEFAULT'
81.   importing
82.     e_devtype                    = l_devtype
83.   exceptions
84.     no_language                  = 1
85.     language_not_installed       = 2
86.     no_devtype_found             = 3
87.     system_error                 = 4
88.     others                       = 5.
89.  
90. if sy-subrc  0.
91. *   error handling
92.   message id sy-msgid type sy-msgty number sy-msgno
93.           with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
94. endif.
95.  
96. * set device type in output options
97. ls_output_options-tdprinter = l_devtype.
98.  
99. *-----------------------------------------------------------------------
100. * Call the generated function module
101. *-----------------------------------------------------------------------
102. call function l_function_module_name
103.      exporting
104. *                 archive_index        =
105. *                 archive_parameters   =
106.                 control_parameters   = ls_control_parameters
107. *                 mail_appl_obj        =
108. *                 mail_recipient       =
109. *                 mail_sender          =
110.                 output_options       = ls_output_options
111.                 user_settings        = space
112.                 UMS_EQUIP             = UMS_EQUIP
113.                 LT_FIELDS             = LT_FIELDS
114.  
115.      importing
116. *                 document_output_info =
117.                 job_output_info      = ls_output_data
118. *                 job_output_options   =
119. *      tables
120. *                zsystems             = lt_sys
121.      exceptions formatting_error     = 1
122.                 internal_error       = 2
123.                 send_error           = 3
124.                 user_canceled        = 4
125.                 others               = 5.
126.  
127. if sy-subrc  0.
128. *   error handling
129.   message id sy-msgid type sy-msgty number sy-msgno
130.           with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
131. endif.
132.  
133. *-----------------------------------------------------------------------
134. * Conversion of output format OTF into PDF format
135. *-----------------------------------------------------------------------
136. * now convert the final document (OTF format) into PDF format
137. call function 'CONVERT_OTF'
138.      exporting
139.        format                      = 'PDF'
140. *        MAX_LINEWIDTH               = 132
141. *        ARCHIVE_INDEX               = ' '
142. *        COPYNUMBER                  = 0
143.      importing
144.        bin_filesize                = l_pdf_len
145.        bin_file                    = l_pdf_xstring       " binary file
146.      tables
147.        otf                         = ls_output_data-otfdata
148.        lines                       = lt_lines
149.      exceptions
150.        err_max_linewidth           = 1
151.        err_format                  = 2
152.        err_conv_not_possible       = 3
153.        err_bad_otf                 = 4
154.        others                      = 5
155.               .
156. if sy-subrc  0.
157. *   error handling
158.   message id sy-msgid type sy-msgty number sy-msgno
159.           with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
160. endif.
161.  
162. DATA: cached_response TYPE REF TO if_http_response.
163. DATA: guid TYPE guid_32.
164. DATA: fileUpload TYPE REF TO CL_HTMLB_FILEUPLOAD.
165.  
166.  if sy-subrc EQ 0.
167.  
168.     CREATE OBJECT cached_response TYPE  CL_HTTP_RESPONSE EXPORTING add_c_msg = 1.
169.  
170.     l_pdf_len = xstrlen( l_pdf_xstring ).
171.     cached_response->set_data( data   = l_pdf_xstring
172.                         length = l_pdf_len ).
173.  
174.     cached_response->set_header_field( name  = if_http_header_fields=>content_type
175.                                        value = 'application/pdf' ).
176.     cached_response->set_status( code = 200 reason = 'OK' ).
177.     cached_response->server_cache_expire_rel( expires_rel = 180 ).
178.  
179.     CALL FUNCTION 'GUID_CREATE'
180.       IMPORTING
181.         ev_guid_32 = guid.
182.     CONCATENATE runtime->application_url '/' guid '.pdf' INTO display_url.
183.  
184.     cl_http_server=>server_cache_upload( url      = display_url
185.                                          response = cached_response ).
186.  
187.   ENDIF.
188.   RETURN.
189.  

GeSHi ©

Hoffe mir kann einer sagen, wo der Fehler ist.
Danke.

Grüße

[Yunus3041]

Ohne mir Deinen Code angesehen zu haben,kann ich Dir mal meinen Fehler nennen, den ich mit gleichem Aussehen in der Kommunikation WebDynpro <=> SAP hatte: bei der Generierung des PDFs aus einem Smartforms im ABAP wurden in der PDF-Tabelle Zeilenumbrüche nicht korrekt umgesetzt. Ich empfehle Dir, so ein PDF mal nur im ABAP herzustellen, zu speichern und ein diff auf das im Browser angezeigte PDF zu machen. Damit findest Du eine Stelle, wo es schief geht, was Dir vielleicht zeigt, _was_ schiefgeht.

[Carl3263]

Hi,

ich würde an Deiner Stelle folgendes tun:
Wenn Du Deine PDF-Daten erzeugt hast, rufe eine BSP-Seite auf. Die Seite muß zwingend die Endung .pdf (nicht .htm) haben. Dieser Seite übergibst Du die PDF-Tabelle.
Im Layout steht dann nur eine einzige Zeile:
<%page language="abap"%><%loop at pdf_lines into ls_lines.%><%=lslines(134)%><%if ls_lines+133(1) eq space %> <%endif.%><%endloop.%>
Die Seite darf keinerlei blanks oder sonstiges enthalten.

Damit geht es.

Gruß

Mathias

[Leah824]

ist schon seit knapp e monaten gelöst . Trotzdem danke