Programación General > Power Builder

 Guardar un DW composite en formato PDF

(1/1)

diespinola:
hola  a todos! Necesito en forma urgente saber como guardar un dw composite compuesto por 3 datawindows... ya desarrollé un codigo que me funciona muy bien con datawindows simples pero al aplicar a un dw composite no me genera el PDF.

El codigo para DW simples es el siguiente:

//CONVIERTE Y GUARDA EL DW A PDF
string ls_archivo
integer li_ret
ls_archivo = 'nc'+string(ll_doc)+'.pdf'
dw_print.Object.DataWindow.Export.PDF.Method = XSLFOP! dw_print.Object.DataWindow.Export.PDF.xslfop.Print="no"
li_ret = dw_print.SaveAs('\serverc$Pegasus 2001NC'+ls_archivo,PDF!,true)

COMO HABIA DICHO ESTE CODIGO FUNCIONA PERFECTAMENTE PARA DW SIMPLES PERO NO PARA DW COMPOSITE....

POR FAVOR AGUARDO SU AYUDA!!!

DESDE YA MUCHAS GRACIAS!

F_Tanori:
Hola, un metodo efectivo es usando una impresora virtual, que te envie el datawindow a un pdf y utilizando un postscript

Descargate Ghostscript
http://pages.cs.wisc.edu/~ghost/

Como impresora virtual hay muchas
Te recomiendo PDF reDirect

http://www.exp-systems.com/PDFreDirect/Downloads.htm?1


--- Código: Visual Basic ---//CONVIERTE Y GUARDA EL DW A PDFstring ls_archivointeger li_retls_archivo = 'nc'+string(ll_doc)+'.pdf'      dw_print.Object.DataWindow.Export.PDF.Method = Distill!    dw_print.Object.DataWindow.Printer = "PDF reDirect v2" // Nombre de la impresora virtual    dw_print.Object.DataWindow.Export.PDF.Distill.CustomPostScript="Yes" // Permitir Postscript    li_ret = dw_print.SaveAs('\serverc$Pegasus 2001NC'+ls_archivo,PDF!,true)   
Para que funcione el codigo, deberas copiar el contenido del directorio bin de donde se instalo GhostScript (Ejemplo: C:Program Filesgsgs8.64bin)
a WindowsSystem32

Suerte

Saludos

Navegación

[0] Índice de Mensajes