Clipper/FiveWin - Armar TXT para Dosprinter

   
Vista:

Armar TXT para Dosprinter

Publicado por César (28 intervenciones) el 09/09/2015 17:55:15
Hola
Quisiera armar un txt para imprimir con dosprinter alguien tiene algun ejemplo de como armar un archivo txt que contenga fuentes, tamaños de letra mediante el codigo ESC busco informacion por todos lados y no logro hacerlo, cuando imprimo me saca todo con la misma letra.
Gracias de antemano por la ayuda

César
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

Armar TXT para Dosprinter

Publicado por Mauricio Arevalo (1 intervención) el 23/09/2015 16:31:16
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
/*
 *** el parametro 80 significa un listado de 80 caracteres o menos de ancho
 *** si coloco    96 significa un listado de 96 caracteres o menos de ancho
 *** para 120 significa un listado de 120 caracteres o menos de ancho
 *** para 140 significa un listado de 140 caracteres o menos de ancho
 *** para 160 significa un listado de 160 caracteres o menos de ancho
 *** todo esto en una hoja normal tama¤o carta, aunque tambien debe funcionar
 *** con oficio o A4.
 *** el parametro PRE significa con preliminar e impresora por defecto.
 *** el parametro PRE/SEL significa preliminar con seleccion de impresora.
 *** el parametro SEL significa seleccion de impresora sin preliminar.
 *** el parametro VER significa verbal (muestra en una ventana que archivo esta procesando)
 *** el parametro APA significa impresion apaisada.
 *** el parametro GRA sirve para anadir un grafico a la primera hoja que se imprima en la ubicacion definida.

                chr(12) = 12 o FF. salto de pagina.         estandar
Ademas chr(14) = letra ancha  60 cpl               estandar
                chr(18) = modo normal  80 cpl               estandar
                chr(15) = modo condensado 140 cpl           hibrido
                chr(16) = modo condensado 120 cpl           extendido
                chr(17) = modo semi condensado 96 cpl       extendido
                chr(19) = negrita                           extendido
               chr(20) = modo super condensado 160 cpl     extendido
*/
 
Ejemplo:
 
SET PRIN TO &LPT.
SET DEVI TO PRIN
...
 
@12,(80-LEN(D))/2      SAY +CHR(19)+D
@13,0 SAY CHR (19)
@14,02 SAY CHR(19)+"......SALDO ANTERIOR......"
@14,28 SAY CHR(19)
@14,30 SAY SDOANT PICT &PI
@14,47 SAY SDOANT+CHMA-COMA PICT &PI
.....
 
SET PRIN TO
SET DEVI TO SCRE
 
RUN NODOSIMP &CFILE 80 SEL
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

Armar TXT para Dosprinter

Publicado por Cleto Mora cmora_52@yahoo.com (4 intervenciones) el 29/09/2016 04:38:40
No tienes que hacer nada complicado.

Primero, debes establecer un nombre ficticio al informe.
IMPRESOR=Carpeta+ALLTRIM(nombre)+".TXT"

En tu programa, y antes de empezar a imprimir, debes incluir estas instrucciones
set printer to &Impresor
SET DEVI TO PRINT

Al finalizar la rutina de impresión, debe colocar estas instrucciones.
SET DEVI TO SCREE
SET PRINTER TO
RUN dosprinter &Impresor

Por supuesto que si quieres particulares en la impresión, debes indicarlo con algo como esto:

RUN dosprinter &(Parámetros que deseas incorporar) &Impresor

Estos valores están definidos dentro de las opciones de DOSPRINTER.
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