Power Builder - PB 6.5 Generar PDF de forma TRANSPARENTE.

 
Vista:

PB 6.5 Generar PDF de forma TRANSPARENTE.

Publicado por FER (11 intervenciones) el 01/06/2004 14:08:58
Necesito generar muchisimos PDF de forma transparente, como si fuera una copia de seguridad de un proceso másivo de impresión;

He estado leyendo el foro, y la mayoría de las soluciones son para la versión 9 de PB, con el SaveAs;

Los informes son DW composites con RTF; no se si es una pega o da lo mismo.

Habría alguna solución sencilla o compleja que alguien me pudiera explicar bastatne bien.

Muchisimas Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:PB 6.5 Generar PDF de forma TRANSPARENTE.

Publicado por Jorge (900 intervenciones) el 02/06/2004 00:13:13
Hola.
Mira esta pagina
Aqui existe un scrip que lo haria sin la caja de dialogo
Yo no lo he probado pues estoy en la Vers 9

http://www.celso.cortes.nom.br/

Suerte,
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:PB 6.5 Generar PDF de forma TRANSPARENTE.

Publicado por Oscar (1178 intervenciones) el 02/06/2004 07:16:54
¡BUEN APORTE! Jorge.
Pues, yo sí lo he probado y funciona muy bien (en cualquier versión de PB y con cualquier versión de Windows).

En esencia, para generar los pdf , en la ruta que uno quiera, con el nombre que quiera y sin que aparezca la caja de diálogo, se necesitan muy pocas cosas:

* Un archivo comprimido llamado: pdfwriter.zip (355 kB), que contiene tres archivitos:
- pdfwritr.drv (568 KB)
- PDFwin32.dll (129 KB)
- Pdfwlib.dll (64 KB)
Con ellos creamos nuestra impresora virtual.

Luego en esencia, simplemente se modifica desde un script de PB el archivo plano llamado: pdfwritr.ini. Se escribe dentro de él, principalmente dos cosas:
- PDFFILENAME="ruta_completa\nombre_archivo.pdf"
- Y la línea:
bExecViewer=0 // 0 para no abrir el Adobe Acrobat ó 1 para mostrar el pdf generado.

Si desean el pdfwriter.zip, pueden solicitarlo para mandarles por e-mail. (Las instrucciones para crear la impresora virtual, vienen dentro de él). Y el script para cambiar el pdfwritr.ini, explica en el enlace que Jorge mencionó:

http://www.celso.cortes.nom.br/pb-0224.html

Un saludo a todos, en especial a Jorge.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:PB 6.5 Generar PDF de forma TRANSPARENTE.

Publicado por Jorge (900 intervenciones) el 02/06/2004 16:13:03
Hola ...

Gracias Oscar por tus apreciaciones, pero en realidad el de los
laureles es Celso Cortes, que explico el proceso.

En verdad ya existen muchas alternativas para la generacion
de pdfs.

Y no se si a pesar de quer la vers 9 genera ya PDF, ( teniendo en
cuenta que hay que instalar el GostScrip y lios drivers de
Acrobat Distiller) esta solucion no es mas sencilla.

Bueno a evaluar que hacer a la hora señalada.

Saludos a todos y a ti Oscar muy especialmente
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:PB 6.5 Generar PDF de forma TRANSPARENTE.

Publicado por FER (11 intervenciones) el 03/06/2004 12:59:39
Bueno muchisimas gracias a los dos

Me voy a poner al lio ahora mismo y espero hablar mas con vosotros...

Gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Como conseguir pdfwriter.zip

Publicado por FER (11 intervenciones) el 03/06/2004 13:35:32
Hola de nuevo.

Perdonad, aquien le tengo que enviar un e-mail para conseguir el pdfwriter.zip

Gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como conseguir pdfwriter.zip

Publicado por Oscar (1178 intervenciones) el 03/06/2004 15:56:38
Ya se te envió el pdfwriter.zip. Luego de descomprimir, debes abrir el archivo Readme.txt, que contiene instrucciones en perfecto español para instalar tu impresora virtual.
Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como conseguir pdfwriter.zip

Publicado por Jorge (4 intervenciones) el 03/06/2004 16:19:55
Hola, tambien desde la misma pagina de celso cortes
tiene dos link que si bien no se el pdfwriter sino el
PDF995 el cual es un ejecutable que con un solo clik
te instala el drivers y te deja instalada la Impresora Virtual
Pruebenlo anda barbaro.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como conseguir pdfwriter.zip

Publicado por Lucho (2 intervenciones) el 22/02/2005 20:44:54
Oscar favor de enviarme el archivo pdfwriter.zip a mi correo.
Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como conseguir pdfwriter.zip

Publicado por Oscar (1178 intervenciones) el 23/02/2005 03:26:55
Puedes bajarte el pdfwriter de:

http://usuarios.lycos.es/jagrane/visual.htm

Si bien este pequeño programa evita colocar el nombre del archivo PDF; lo malo es que trabaja sólo con Win 9x.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Cambiar impresora por defecto

Publicado por FER (11 intervenciones) el 04/06/2004 10:54:25
Hola Oscar

Ya he realizado los pasos de toda la información que me has dado, a simple vista parece sencillo, pero claro el que lo descubrio era la leche.

AHortas tengo un problema, tengo que cambiar la impresora por defecto desde PB 6,5

Tendría que imprimir por impresora normal
despues poner la impresora pdfwriter
y despues volver a restablecer la impresora normal.

Claro esta que tampoco se el nombre de la impresora que esta por defecto en el equipo., En el mio si lo se, (pero esto se instalara en varios equipos que tendran redes distintas con una impresora distinta cada uno.)

Muchisimas gracias por todo lo que me estas ayudando.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cambiar impresora por defecto

Publicado por Oscar (1178 intervenciones) el 04/06/2004 17:53:45
* MOSTRAR LISTA DE IMPRESORAS INSTALADAS EN UN LISTBOX
String impresoras[]
Int rtn,i,nbImpresoras

//Recupera las subentradas disponibles para una determinada clave
rtn=RegistryKeys("HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\Print\Printers",impresoras)

nbImpresoras=UpperBound(impresoras)
For i=1 To nbImpresoras
lb_1.AddItem(impresoras[i])
next

* MOSTRAR IMPRESORA PREDETERMINADA

http://www.lawebdelprogramador.com/news/mostrar_new.php?id=73&texto=Power+Builder&n1=119688&n2=1&n3=1&n4=1&n5=1&n6=1&n7=1&n8=1&n9=0&n0=0

* CAMBIAR A IMPRESORA PREDETERMINADA
Vamos a emplear un truco, para que funcione con cualquier versión de PB. Primero, nos conectamos a Word (pero no hacemos nada con él, ni siquiera lo abrimos). Sólo usamos su función ActivePrinter y veremos que el cambio de impresora es inmediato!.

oleobject ole_object
long ll_rc

ole_object = CREATE oleobject
ll_rc = ole_object.ConnectToNewObject("word.application.8")

//Colocamos el nombre de la impresora
//O ese nombre obtienes de la lista de impresoras
ole_object.ActivePrinter = "Canon Bubble-Jet BJC-240"
ole_object.DisconnectObject()
Destroy ole_object

Nota: Vale la pena patentar este truco ;-)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cambiar impresora por defecto

Publicado por FER (11 intervenciones) el 06/06/2004 01:34:39
Ese truco es muy bueno

Lo unico que tengo una duda, para ello, supongo que el ordenador cliente tiene que tener instalado word, y que versión de word si es así.?

De todas formas muchas gracis.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cambiar impresora por defecto

Publicado por Oscar (1178 intervenciones) el 06/06/2004 17:32:50
Así es. Tener instalado Word, puede ser una limitante. Entonces, probemos otro truco. Usaremos la función SetDefaultPrinter de WSH para cambiar a impresora por defecto de manera remota (donde se coloca la ruta de la impresora); pero nosotros lo haremos de manera local, colocando directamente el nombre. Es decir:

oleobject ole_object
long ll_rc
ole_object=CREATE oleobject
ll_rc=ole_object.ConnectToNewObject("WScript.Network")

//Nombre de la impresora
ole_object.SetDefaultPrinter("Canon Bubble-Jet BJC-240")

ole_object.DisconnectObject()
Destroy ole_object

Nota: Listo, supongo que solucionado el problema. Ya tenemos ganado otro truco en favor de PB.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

pdfwrite.zip

Publicado por JHON (5 intervenciones) el 29/11/2019 06:40:31
Hola Oscar, podrías por favor enviarme el pdfwrite.zip para generar el pdf y automáticamente guardar. gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar