FoxPro/Visual FoxPro - impresion lenta en dos

 
Vista:

impresion lenta en dos

Publicado por Fernando (60 intervenciones) el 02/03/2009 02:00:17
Hola amigos, envío impresión desde foxpro2.6 ( dos bajo XP) a lpt1, y demora de 3 min. en epson lx 810, lx300.
Desde dos envio comando c:dir > lpt1 y... rápido, pero desde fox, tanto con comandos como con reportes, lentísimos...
Ya configuré en windows "Imprimir directamente a la impresora" tambien, y nada...
alguien podría ayudarme???
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
sin imagen de perfil
Val: 4
Ha aumentado su posición en 2 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:impresion lenta en dos

Publicado por kong (682 intervenciones) el 03/03/2009 01:32:17
hola.
cheka esto y has pruebas, haber si algo resulta.

SET PRINTER TO NAME &pubcImpresoraCocina &&\CAJA1COCINA
* SET PRINTER TO
SET DEVICE TO PRINTER
SET PRINTER ON
???chr(27)+chr(64)
* ???CHR(17)
SET CONSOLE OFF
IF NOT EMPTY(titulo)
???CHR(27)+"!"+CHR(32)
???titulo
?
ENDIF
???CHR(27)+"!"+CHR(48)
???impMesa
???CHR(27)+"!"+CHR(0)
?
?impTicket
@PROW()+1,1 say CHR(27)+"!"+CHR(8)+REPLICATE("_",30)
?CHR(27)+"!"+CHR(16)
SELECT(tabla)
GO TOP
DO WHILE NOT EOF()
?CHR(27)+"!"+CHR(16)+ALLTRIM(STR(cantidad))+" "+ALLTRIM(nom_plato)
IF NOT EMPTY(aditivo)
?CHR(27)+"!"+CHR(1)+"---"+ALLTRIM(aditivo)
*nCuentaExtra=nCuentaExtra+1
ENDIF
SKIP
ENDDO
SELECT curCambioActual &&Esto puede ser reemplazado por curPedidoResumen
GO TOP
IF NOT EOF()
?
ENDIF
DO WHILE NOT EOF()
nCuentaExtra=nCuentaExtra+2
?CHR(27)+"!"+CHR(32)+prefijo+CHR(27)+"!"+CHR(16)+ALLTRIM(STR(cantidad))+" "+ALLTRIM(nom_plato)
SKIP
ENDDO
IF HayEliminados
F_IMPRIMIRTODOELTICKET() &&HACER RE-IMPRESION DE TODO EL TICKET
ENDIF
nPromedioLineas=nPromedioLineas-nCuentaExtra
IF nCantidadItem<nPromedioLineas
FOR i=1 TO (nPromedioLineas-nCantidadItem)
?
?
ENDFOR
ENDIF
IF BETWEEN(nCantidadItem,4,6)
?
ENDIF
???CHR(27)+"!"+CHR(0)
?"MESERO No. "+CHR(27)+"!"+CHR(32)+ALLTRIM(STR(impMesero))+" "+CHR(27)+"!"+CHR(0)
???pubcEstacion
?impHora
@PROW()+8,1 say ""
?CHR(27)+"m" &&Corte Parcialmente
???CHR(17)
SET PRINTER TO
SET DEVICE TO SCREEN
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:impresion lenta en dos

Publicado por Edgar dvd (135 intervenciones) el 05/03/2009 01:05:44
tu problema amigo es que seguramente estas utilziando reportes graficos, es decir que utilizas el reporteador de vfp y lo mandas imprimir a impresoras matriciales
esto te trae el problema que las impresoras matriciales tienen que hacer la letra elaborada de widows y por eso tarda

utiliza los reportes en modo texto (VFP para DOS)
o bien manda imprimir tu reporte tal y como te dice el amigo Kong (Tambien funciona)
pero es mas sencillo usar los reportes modo texto

con esto tu problema se soluciona

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