Com a ajuda de voces, consegui imprimir etiquetas na impressora zebra mas após todas as etiquetas imppressas a impressora salta folha e eu queria que ela imprimisse uma etiqueta e parasse para que o programa possa imprimir outras etiquetas.
Se alguem souber o comando que faz isso, por favor me informe.
Abaixo está a rotina que eu estou usando para impressão.
x_Nomlst := 'Supermercado Teste'
set cons off
set print on
set devi to print
use etiqueta
go top
do while !eof()
npre := preco
desc = descricao
? chr(13)+chr(10)
? 'D11'+chr(13)+chr(10)
? 'N'+chr(13)+chr(10)
? 'JF'+chr(13)+chr(10)
? 'q800'+chr(13)+chr(10)
? 'Q240,10'+chr(13)+chr(10)
? 'A10,5,0,1,1,1,N,"'+x_Nomlst+'"'+chr(13)+chr(10)
? 'A10,20,0,1,2,6,N,"'+substr(desc,1,39)+'"'+chr(13)+chr(10)
? 'A225,85,0,2,3,8,N,"* R$ '+substr(trans(nPre,"@E 9999,999.99"),1,8)+'"'+chr(13)+chr(10)
? 'A695,85,0,1,2,8,N,"'+substr(trans(nPre,"@E 9999,999.99"),9)+'"'+chr(13)+chr(10)
*? 'A760,85,0,2,3,8,N,"*"'+chr(13)+chr(10)
? 'P1'
? 'JF'
skip
enddo
set print off
set cons on
set devi to screen
Impressora Zebra
Moderador: Moderadores
-
Sergio Cabral
- Usuário Nível 2

- Mensagens: 52
- Registrado em: 18 Set 2004 18:51
- Localização: São José dos Campos
Impressora Zebra
Sou programador em Clipper 5.01 a 15 anos e procuro melhorar meus conhecimentos. Este site me parece muito bom e poderemos nos ajudar.
- filizola
- Usuário Nível 3

- Mensagens: 421
- Registrado em: 19 Ago 2003 20:10
- Localização: Belo Horizonte/MG
Re: Impressora Zebra
utilizo esta impressora e acho que o que esta faltando para vc seria calibrar esta impressora, leia no manual como fazê-lo
"Um passo a frente, e já não estará mais no mesmo lugar..."