Como convertir un archivo TXT a PDF

349 views
Skip to first unread message

Mario Escudero

unread,
Oct 10, 2022, 5:08:34 PM10/10/22
to Comunidad de Visual Foxpro en Español
Buenas tardes:
Para imprimir una factura genero un TXT y lo imprimo con RAWPRINT.
Pero me han pedido que en vez de eso lo genere e imprima en PDF.
En otras palabras, necesito convertir mi archivo factura.txt qe genero,  a factura.pdf e imprimirla.
Muchas gracias de antemano.
Saludos 

Jean Pierre Adonis De La Cruz Garcia

unread,
Oct 10, 2022, 10:18:29 PM10/10/22
to Comunidad de Visual Foxpro en Español
Los mas rapido a mi parecer es creas una impresora virtual y en vez de enviarlo a la impresora lo mandas a la impresora virtual PDF de esa forma solucionas el problema mas rapido.

Mario Escudero

unread,
Oct 11, 2022, 12:35:29 AM10/11/22
to Comunidad de Visual Foxpro en Español
Gracias Juan. 
Y para imprimi directo? 

Ing. Mario Escudero
995-817087
www.eprope.com

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/HHYKeWhJxF4/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/78ab9fb2-5863-4499-aa2f-07008df69f52n%40googlegroups.com.

roberto martinez andrade

unread,
Oct 11, 2022, 8:49:44 AM10/11/22
to publice...@googlegroups.com
y con FoxyPreviewer???

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/be3df103-2263-40f3-ac08-58744ea2e8bcn%40googlegroups.com.

Mario Escudero

unread,
Oct 11, 2022, 9:54:15 AM10/11/22
to publice...@googlegroups.com
Hola Roberto.
FoxyPreviewer lo uso para generar PDFs en base a un report form.
Lo que sucede en mi caso es que mi sistema genera un txt con RawPrint (factura.txt) y lo imprime directo. Asi lo tengo hace mas de 15 años y lo que no quiero es perder más tiempo en generar un report form para esto sólo por un cliente.
Entonces deseo encontrar la manera de que ese txt, que ya está generado, convertirlo a PDF y enviarlo a la ticketera directamente.
Gracias


----
Ing. Mario Escudero
Eprope S.A.C.
995-817087 


Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/HHYKeWhJxF4/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/CADxff07s-Eo5DJWYa3NQuYP-Of1hh5by1jjPYR57cafVANjY-g%40mail.gmail.com.

roberto martinez andrade

unread,
Oct 11, 2022, 10:02:46 AM10/11/22
to publice...@googlegroups.com
Ese TXT tiene algún formato especial o es texto puro????, porque se me ocurre que podrías abrirlo o cargarlo desde VFP, meterlo en una tabla y después conectar la tabla a un report y generar el pdf.

Hace años cargaba script que estaban en archivos txt puros y los manipulaba después desde una tabla en que cada registro era una línea del txt, asi que por ahi podria ser, no se que te parece.

Sl2s
Roberto
Coyhaique .- Chile



Mario Escudero

unread,
Oct 11, 2022, 10:05:22 AM10/11/22
to publice...@googlegroups.com
Este es mi txt.
Podrias hacerse lo que dices?
Gracias
----
Ing. Mario Escudero
Eprope S.A.C.
995-817087 

boleta.txt

Mario Escudero

unread,
Oct 11, 2022, 10:10:48 AM10/11/22
to publice...@googlegroups.com
Mejor dicho, se puede hacer lo que mencionas?

----
Ing. Mario Escudero
Eprope S.A.C.
995-817087 

roberto martinez andrade

unread,
Oct 11, 2022, 10:17:30 AM10/11/22
to publice...@googlegroups.com
dejame probar y te cuento, por lo visto es texto, salvo por los caracteres de control que tiene al comienzo y al final, pero eso puede controlarse.

Te aviso del resultado

Mario Escudero

unread,
Oct 11, 2022, 10:21:21 AM10/11/22
to publice...@googlegroups.com
Gracias !

----
Ing. Mario Escudero
Eprope S.A.C.
995-817087 

Zarlu

unread,
Oct 11, 2022, 10:53:02 AM10/11/22
to Comunidad de Visual Foxpro en Español
Buenos días mescudero0302 !

Prueba esto:

Si funciona con TXT. Lo acabo de probar

Suerte
zarlu
Chetumal, Quintana Roo, México

Mario Escudero

unread,
Oct 11, 2022, 11:22:02 AM10/11/22
to publice...@googlegroups.com
Aaasuuuu....tan largo? jeje
Gracias de todos modos....

----
Ing. Mario Escudero
Eprope S.A.C.
995-817087 

Jean Pierre Adonis De La Cruz Garcia

unread,
Oct 11, 2022, 12:29:47 PM10/11/22
to Comunidad de Visual Foxpro en Español
en este caso te voy a dar un mejor solucion a tu caso, te mostrare un ejemplo de tu TXT en modo PDF, solo debes usar un proceso pero debes configurarlo correctamente desde tu sistema, ya que no quieres migrar, que seria lo mejor y mas limpio, en este caso vas a tener que usar una alternativa para que te solucione el problema.
Yo en mi caso lo hago con un Api en PHP y me devuelve rapidamente el PDF con mi diseño que yo deseo y lo puedo enviar por email, o whatsapp al cliente sin necesidad de imprimirlo.
boleta.pdf

Víctor Hugo Espínola Domínguez

unread,
Oct 11, 2022, 7:17:32 PM10/11/22
to publice...@googlegroups.com
Local laTxt[1]   ;
, lcBol As String  ;
, lcTxt As String  ;
, lnLin As Number  ;
, lnTxt As Number  ;
, loPdf As Object

lcBol = "Boleta.txt"
lcTxt = Filetostr(m.lcBol)
lnTxt = Alines(laTxt, m.lcTxt)

Create Cursor curBoleta (Linea V(50))
For lnLin = 2 To m.lnTxt - 13
Insert Into curBoleta Values (m.laTxt[m.lnLin])
Next m.lnLin

*!* Browse

*!* Create Report Boleta From curBoleta

loPdf = Pdf3()
Report Form Boleta Object m.loPdf To File Boleta.pdf Prev


Saludos,
Víctor.
Lambaré - Paraguay.



boleta.FRT
boleta.FRX
txt2pdf.prg
PDF3.PRG

Jean Pierre Adonis De La Cruz Garcia

unread,
Oct 11, 2022, 7:49:38 PM10/11/22
to Comunidad de Visual Foxpro en Español
La solucion que ha dado Victor esta excelente, es directa, mas rapido 

Víctor Hugo Espínola Domínguez

unread,
Oct 11, 2022, 8:01:38 PM10/11/22
to publice...@googlegroups.com
Una vez generado el cursor es la más obvia, pero quise que conozcan PDF3.

Saludos,
Víctor.
Lambaré - Paraguay.


Edwin Duran

unread,
Oct 11, 2022, 9:36:32 PM10/11/22
to Comunidad de Visual Foxpro en Español
Gracias Víctor por el aporte, una pregunta, veo que muchos dicen que PDF3 es mucho mas rápido que FoxyPreviewer 

Víctor Hugo Espínola Domínguez

unread,
Oct 11, 2022, 10:02:53 PM10/11/22
to publice...@googlegroups.com
Nunca los comparé, en este caso sería irrelevante la diferencia debido al pequeño tamaño del pdf.

Saludos,
Víctor.
Lambaré - Paraguay.


Reply all
Reply to author
Forward
0 new messages