Imprimir Ticket de Venta en Impresora Termica

[gedolos]

Buenas Noches grupo., Mi inquietusd es relacionado a la impresion de
tickets de venta en impresora termica., estare usando la star TSP100 y
mi pregunta es es necesario hacer el reporte çutilisando el @SAY o
desde el reporteador de VFP ., o como ., gracias a todos.

[Víctor Hugo Espínola Domínguez]

Mira este hilo:  https://mail.google.com/mail/?shva=1#search/imprime+ticket/133472639e15089c 

Saludos, Víctor

[gedolos]

la liga no me llega a ningun lado .,


On 18 ene, 08:38, Víctor Hugo Espínola Domínguez <vichus...@gmail.com>
wrote:
> Mira este hilo:https://mail.google.com/mail/?shva=1#search/imprime+ticket/133472639e...
>
> Saludos, Víctor

>
> El 17 de enero de 2012 22:09, gedolos <gerardomingue...@hotmail.com>escribió:
>
>
>
> > Buenas Noches grupo., Mi inquietusd es relacionado a la impresion de
> > tickets de venta en impresora termica., estare usando la star TSP100 y
> > mi pregunta es es necesario hacer el reporte çutilisando el @SAY o

> > desde el reporteador de VFP ., o como ., gracias a todos.- Ocultar texto de la cita -
>
> - Mostrar texto de la cita -

[Daniel Del Giudice]

Puedes usar lo siguiente:

set printer font mi_fuente, mi_tamaño style mi_estilo
set printer on
set console off
? "Texto..."
set console on
set printer off
set printer to default

[Viktor Velazquez]

puedes empezar con esto me ha sacado de apuros..

*LCRUTA_IMPRESORA=GETPRINTER()

**LCRUTA_IMPRESORA = "TIKET"  && NOMBRE DE LA IMPRESORA.. :D 

SET CONSOLE OFF 

SET PRINTER TO NAME GETPRINTER( )

*Se Establece la Configuración de Márgenes y otros valores del Documento 

LNMARGEN_SUP = 5 

LNMARGEN_INF = 5 

LN_NCOL          = 40 

        *Se inicializa el codigo de Impresion 

        ??? CHR(27)+CHR(48)+CHR(27)+CHR(67)+CHR(44) 

        ???  CHR(18)+CHR(27)+CHR(77)+CHR(15) 

        ???  CHR(27)+CHR(77)+CHR(20) 

        *Se imprime el margenSuperior 

        FOR I=1 TO      LNMARGEN_SUP 

                ??? CHR(10)+CHR(13) 

        ENDFOR 

        *--------------------------------- ENCABEZADO DEL TIKET 

        *-123456789-123456789-123456789-123456789-12 

        ??? CHR(10)+CHR(13)+PADC('ESTO ES UNA PRUEBA',LN_NCOL) 

        *------------------------------ FIN DEL ENCABEZADO DEL TIKET 

        USE basura

        GO TOP 

        DO WHILE .NOT. EOF() 

                        ??? CHR(10)+CHR(13)+DTOC(DATE()) 

                        ??? CHR(10)+CHR(13)+TIME() 

                        ??? CHR(10)+CHR(13)+PADC('GOBIERNO DEL ESTADO DE ************',LN_NCOL) 

                        ??? CHR(10)+CHR(13)+PADC('COORDINACION MUNICIPAL DEL  PROGRAMA',LN_NCOL) 

                ??? CHR(10)+CHR(13)+PADC('COORDINACION MUNICIPAL DEL  PROGRAMA',LN_NCOL) 

                ??? CHR(10)+CHR(13)+REPLICATE("-",LN_NCOL) 

                ??? CHR(10)+CHR(13)+PADC('MUNICIPIO DE XXXXXXX',LN_NCOL) 

                ??? CHR(10)+CHR(13)+PADC('** DATOS DEL VALLE **',LN_NCOL) 

                ??? CHR(10)+CHR(13)+PADC('BENEFICIARIO:  ',LN_NCOL) 

                ??? CHR(10)+CHR(13)+ALLTRIM("appat")+' '+ALLTRIM("apmat")+' '+ALLTRIM("nombre") 

                ??? CHR(10)+CHR(13)+PADC('LOCALIDAD:  ',LN_NCOL) 

                ??? CHR(10)+CHR(13)+TRANSFORM("localidad",'999')+'-'+ALLTRIM ("colonia") 

                ??? CHR(10)+CHR(13)+'VALE POR: '+' '+alltrim("0235") 

                ??? CHR(10)+CHR(13)+'Casa Comercial: '+alltrim("prov") 

                ??? CHR(10)+CHR(13)+'Contacto: '+alltrim("contacto") 

                ??? CHR(10)+CHR(13)+PADC('AUTORIZO:',LN_NCOL) 

                        ??? CHR(10)+CHR(13)+PADC('LIC..........:',LN_NCOL) 

                        ??? CHR(10)+CHR(13)+PADC('PUESTO',LN_NCOL) 

                        ??? CHR(10)+CHR(13)+REPLICATE("-",LN_NCOL) 

           SKIP 

        ENDDO 

        STORE 0 TO m.cualinfo 

        FOR I=1 TO LNMARGEN_INF 

                ??? CHR(10)+CHR(13) 

        ENDFOR 

        *Configuración Terminal de Impresion 

        CLOSE PRINT 

        SET CONSOLE ON 

        SET PRINTER TO 

saludos.. vick

> Date: Thu, 19 Jan 2012 07:18:22 -0800
> Subject: [vfp] Re: Imprimir Ticket de Venta en Impresora Termica
> From: daniel...@gmail.com
> To: publice...@googlegroups.com

[Víctor Hugo Espínola Domínguez]

Adjunto el archivo, fue posteado por Armando Rodríguez Bermúdez.

Saludos, Víctor

[Armando Rodríguez Bermúdez]

Lo posteé hace algún tiempo. No es de mi autoría, y debo comentarles que me fue de mucha utilidad.

 

Saludos

Armando

[gedolos]

Agradezco mucho la ayuda dada., por el grupo ., resolvi el problema de
la impresion en star tsp100 de la siguente manera: para aquellos que
les interese.



generan sus reportes tal cual en VFp y le asignan la impresora como
default., ademas le dicen que el formato a considerar el de 712mm x
recibo ., con eso lo hace tan largo como sea su ticket., ademas
tambien tube el problema de que no imprimia., pero usando el
foxypreview., le asigna la tabla y lo envia directo y sin problemas...
ahi voy,. saludos al grupo
On 19 ene, 18:03, Armando Rodríguez Bermúdez

<armandorodrigu...@hotmail.com> wrote:
> Lo posteé hace algún tiempo. No es de mi autoría, y debo comentarles que me
> fue de mucha utilidad.
>
> Saludos
>
> Armando
>
> De: publice...@googlegroups.com
> [mailto:publice...@googlegroups.com] En nombre de Víctor Hugo Espínola
> Domínguez
> Enviado el: jueves, 19 de enero de 2012 05:43 p.m.
> Para: publice...@googlegroups.com
> Asunto: Re: [vfp] Re: Imprimir Ticket de Venta en Impresora Termica
>
> Adjunto el archivo, fue posteado por Armando Rodríguez Bermúdez.
>
> Saludos, Víctor
>

> El 18 de enero de 2012 13:47, gedolos <gerardomingue...@hotmail.com>

> escribió:
>
> la liga no me llega a ningun lado .,
>
> On 18 ene, 08:38, Víctor Hugo Espínola Domínguez <vichus...@gmail.com>
> wrote:> Mira este
>
> hilo:https://mail.google.com/mail/?shva=1#search/imprime+ticket/133472639e..
> .
>
> > Saludos, Víctor
>
> > El 17 de enero de 2012 22:09, gedolos
>
> <gerardomingue...@hotmail.com>escribió:
>
>
>
>
>
>
>
> > > Buenas Noches grupo., Mi inquietusd es relacionado a la impresion de
> > > tickets de venta en impresora termica., estare usando la star TSP100 y
> > > mi pregunta es es necesario hacer el reporte çutilisando el @SAY o
> > > desde el reporteador de VFP ., o como ., gracias a todos.- Ocultar texto
> de la cita -
>

> > - Mostrar texto de la cita -- Ocultar texto de la cita -

[Cesar J PaEs]

 
tengo un programita compilado, estuvo corriendo bien pero ahora me sale el siguiente mensaje, alguien puede ayudarme y decirme porque esta saliendo ese mensaje, estoy trabajando en Window7, gradcias por su ayuda..
 
Cesar..

[Javier Brumatti]

Porque debes estar llamando a un formulario con la clausula TO (para que devuelva algun valor) y este formulario no está declarado como Modal

Saludos
Javier

El 25/01/2012 12:28 a.m., Cesar J PaEs escribió:

 
tengo un programita compilado, estuvo corriendo bien pero ahora me sale el siguiente mensaje, alguien puede ayudarme y decirme porque esta saliendo ese mensaje, estoy trabajando en Window7, gradcias por su ayuda..
 
Cesar..

--
Este mensaje ha sido analizado en busca
de virus y otros contenidos peligrosos,
y se considera que está limpio.

--
Este mensaje ha sido analizado en busca
de virus y otros contenidos peligrosos,
y se considera que está limpio.

[Cesar J PaEs]

Tengo un formulario que llama a otro formulario, y esta en modal, este formulario es para buscar a una persona, una vez encontrado devuelve lo encontrado al formulario que lo invoco, gracias por responder, lo extraño que estuvo funcionando bien, pero ahora sale ese mensaje, nuevamente gracias... 
 

---

Date: Wed, 25 Jan 2012 08:10:26 -0300
From: jbru...@amr.org.ar
To: publice...@googlegroups.com
Subject: Re: [vfp] mensaje de error...

[ZeRoberto]

El mensaje lo dice todo

Para poder hacer

DO FORM miFormulario TO miVariable

El formulario tiene que estar definido como MODAL

El 25/01/12, Cesar J PaEs <libra...@hotmail.com> escribió:

>
> Tengo un formulario que llama a otro formulario, y esta en modal, este
> formulario es para buscar a una persona, una vez encontrado devuelve lo
> encontrado al formulario que lo invoco, gracias por responder, lo extraño
> que estuvo funcionando bien, pero ahora sale ese mensaje, nuevamente
> gracias...
>
>
>
>