Clipper On Line • Ver Tópico - ZEBRA TLP 2488 termica

ZEBRA TLP 2488 termica

Discussão sobre a linguagem CA-Clipper.

Moderador: Moderadores

 

ZEBRA TLP 2488 termica

Mensagempor juniorcamilo » 30 Jan 2007 10:28

amigos do forum um cliente meu comprou um impressora zebra tlp 2844 para que possamos imprimir o nome do produto e preço para colocar em gondulas no supermercado, a impressora nao quer imprimir pelo programa alguem tem alguma solucao, detalhes ela esta instalada na LPT1, e imprime pelo Windows, ja testei o prwin do nosso amigo vagucs e nao funcionou , ela recebe o documento em spool mas nao imprime...
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

Re: ZEBRA TLP 2488 termica

Mensagempor Maligno » 30 Jan 2007 10:42

Quando você diz que imprime pelo Windows você quer dizer que imprime pelo programa de teste/demo da fábrica?
Se ela está conectada à LPT1, você poderia imprimir diretamente pelo seu programa Clipper? Ou ela é "for Windows only"?
Se pelo programa PRWin ou outro qualquer você consegue enviar seus dados para o spooler do Windows mas a impressora não dá sinal de vida, imagino que possa estar faltando algum comando de controle ou até mesmo você possa estar enviando comandos errados. Experiência própria: estou montando um conjunto de funções para impressão em PCL. Nada dava certo. Não imprimia. Até que eu descobri que o manual da própria HP estava com códigos errados. Portanto, é bom conferir isso. Imagino que você deve ter o manual com todos os códigos de controle.

[]'s
Maligno
http://www.buzinello.com/prg
Avatar de usuário

Maligno
Membro Master

Membro Master
 
Mensagens: 6390
Data de registro: 06 Jul 2004 01:40
Cidade/Estado: Londrina/PR
Curtiu: 1 vez
Mens.Curtidas: 14 vezes

Mensagempor gvc » 30 Jan 2007 13:39

A zebra usa a linguagem ZPL.

Algumas delas aceitam impressão do windows, mas vc deve capturar a porta que ela esta ligada ou se for compartilhada, deve atribuir uma LPT para a impressora.

Em modo ZPL, vc pode programar em clipper, mas passar os comando para ela, montando toda a etiqueta.
Veja com seu fornecedor se ela aceita impressão windows e se tem o programa que monta etiquetas.
Após montar a etiqueta, mande imprimir em ZPL, mas em arquivo texto.
Pegue o arquivo e transfira os comandos para dentro do seu sistema.
Então use:
set print on
? "comandos ZPL"
...
set print off

Boa sorte.
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
Avatar de usuário

gvc
Colaborador

Colaborador
 
Mensagens: 1269
Data de registro: 23 Ago 2005 10:57
Curtiu: 0 vez
Mens.Curtidas: 0 vez

o principio é este

Mensagempor filizola » 30 Jan 2007 20:11

O CD DE INSTALACAO TEM O HELP COM TODOS OS COMANDOS.


set devi to print
set printer to temp.txt

?'^XA' -> inicia o arquivo
?'^FO50,50' -> posiciona na linha e coluna da etiqueta (em pixel)
?'^ADN60,50' -> tamanho da fonte
?'^FDMeu primeiro campo arquivo ou variavel' -> campo a ser impresso
?'^FS' -> fim de campo a ser impresso
?'^FO50,50' -> posiciono numa nova linha e coluna
?'^FDMeu segundo campo' -> segundo campo
?'^FS' -> fim segundo campo
?'^PQ1' -> onde 1= numero de copias da etiqueta
?'^XZ' -> fim de impressao

set printer to
set devi to screen
!type temp.txt >lpt1
"Um passo a frente, e já não estará mais no mesmo lugar..."
Avatar de usuário

filizola
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 412
Data de registro: 19 Ago 2003 20:10
Cidade/Estado: Belo Horizonte/MG
Curtiu: 5 vezes
Mens.Curtidas: 6 vezes

Re: o principio é este

Mensagempor juniorcamilo » 31 Jan 2007 09:18

filizola escreveu:O CD DE INSTALACAO TEM O HELP COM TODOS OS COMANDOS.

set devi to print
set printer to temp.txt

?'^XA' -> inicia o arquivo
?'^FO50,50' -> posiciona na linha e coluna da etiqueta (em pixel)
?'^ADN60,50' -> tamanho da fonte
?'^FDMeu primeiro campo arquivo ou variavel' -> campo a ser impresso
?'^FS' -> fim de campo a ser impresso
?'^FO50,50' -> posiciono numa nova linha e coluna
?'^FDMeu segundo campo' -> segundo campo
?'^FS' -> fim segundo campo
?'^PQ1' -> onde 1= numero de copias da etiqueta
?'^XZ' -> fim de impressao

set printer to
set devi to screen
!type temp.txt >lpt1



amigo filisola tentei exatamente o q vc sugeriu, mas nao funcionou, mas o caminho é este mesmo!!!
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

Mensagempor rochinha » 31 Jan 2007 10:06

Amiguinho

Se voce instalou algum driver desta impressora na maquina verifique em suas propriedades algom sobre IMPRESSAO POR SPOOL e selecione a opção de IMPRIMIR DIRETAMENTE NA PORTA.

Crie o arquivo texto pelo DOS e de os comandos:

TYPE arquivo.txt > LPT1
COPY /B arquivo.txt LPT1
NOTEPAD /P arquivo.txt

Se funcionar a impressora esa ok, senão tem algum problema, na impressora, no cabo ou nos comandos.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para fivolution@hotmail.com. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Avatar de usuário

rochinha
Membro Master

Membro Master
 
Mensagens: 4538
Data de registro: 18 Ago 2003 20:43
Cidade/Estado: São Paulo - Brasil
Curtiu: 800 vezes
Mens.Curtidas: 242 vezes

Mensagempor gvc » 31 Jan 2007 10:28

Se vc tiver o help no cd, poderia mandar-me uma cópia?

gvcortez@uol.com.br

tks.
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
Avatar de usuário

gvc
Colaborador

Colaborador
 
Mensagens: 1269
Data de registro: 23 Ago 2005 10:57
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Mensagempor Poka » 31 Jan 2007 11:13

Olá

Experimente também esses comandos.


vENTER=CHR(13)+CHR(10) // o enter deve estar no final de cada liha
qtd=str(10,3))
nomeprod:="azeitonas verdes raiolita"
obs:="observacao qualquer"
codbar:="7896237900021"
//
// ativa a impressora
//

@ prow(),Pcol() say Venter
@ prow(),Pcol() say 'D11' + venter
@ prow(),Pcol() say 'N' + venter
@ prow(),pcol() say 'JF' + venter
@ prow(),Pcol() say 'q416' + venter
@ prow(),Pcol() say 'Q240,30' + venter
@ prow(),Pcol() say 'R0,2' + venter

@ prow(),Pcol() say 'A250,10,0,1,1,2,N,"' + nomeprod + '"' + venter
@ prow(),Pcol() say 'A250,90,0,1,1,2,N,"' + obs + '"' + venter
@ prow(),Pcol() say 'B250,120,0,E30,3,4,70,B,"' + codbar + '"' + venter
@ prow(),Pcol() say 'P' + qtd + venter
@ prow(),pcol() say 'JF' + venter

//
// desativa a impressora
//


Um abraço

Poka
Avatar de usuário

Poka
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 509
Data de registro: 25 Out 2004 21:26
Cidade/Estado: Leme/SP
Curtiu: 0 vez
Mens.Curtidas: 23 vezes

Mensagempor Clipper » 31 Jan 2007 23:26

O caminho é esse que o colega Poka postou, a impressora funciona perfeitamente com clipper, não é necessária nenhuma mudança ou envio de comando que não seja pelo próprio clipper.

Até logo.

Marcelo
Programador que é programador, quando tá de folga vai inventar função nova, fazer testes, ou seja... se divertir
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)
Avatar de usuário

Clipper
Colaborador

Colaborador
 
Mensagens: 1320
Data de registro: 23 Ago 2004 00:04
Cidade/Estado: Recife/PE
Curtiu: 0 vez
Mens.Curtidas: 3 vezes

Obrigado a Todos vai ai o que eu desenvolvi.

Mensagempor juniorcamilo » 02 Fev 2007 10:17

Obrigado a Todos vai ai o que eu desenvolvi.
..........
npre := 'Qual o preço?'
x_Nomlst := 'nome da empres'
if testa_impressora() = "0";loop;endif
mensagem("Aguarde, Imprimindo ...")
......... procura o item
Imprimir(.t.) && IMPRIMIR NA lpt1
? 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(PRO->DESEST,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'
imprimir(.f.)
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

Mensagempor juniorcamilo » 02 Fev 2007 10:23

gvc escreveu:Se vc tiver o help no cd, poderia mandar-me uma cópia?

gvcortez@uol.com.br

tks.


eu zipei os arq. e nao estou conseguindo mandar para vc...
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

Mensagempor Clipper » 05 Fev 2007 08:58

Só para complementar.

As impressoras Zebra modelo TLP e LP são fabricadas pela ELTRON que foi comprada pela ZEBRA, os comandos são idênticos entre estes modelos, sendo assim qualquer impressora TLP e LP funcionam com os mesmos comandos.

Até logo.

Marcelo
Programador que é programador, quando tá de folga vai inventar função nova, fazer testes, ou seja... se divertir
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)
Avatar de usuário

Clipper
Colaborador

Colaborador
 
Mensagens: 1320
Data de registro: 23 Ago 2004 00:04
Cidade/Estado: Recife/PE
Curtiu: 0 vez
Mens.Curtidas: 3 vezes

Re: ZEBRA TLP 2488 termica

Mensagempor wfr123 » 19 Nov 2010 07:40

ola a todos, desculpe reviver este topico, mas nao gostaria de criar outro,
Estou com o problema que gero o arquivo para mandar para a LPT1 mas a impressora nao começa imprimir da esquerda para a direita e sim da direita para a esquerda e ainda as letras ficam de cabeça para baixo.

veja abaixo como sai na etiqueta, o quadro é como se fosse a etiqueta:
+------------------------------------+
| |
| |
| |
| etset ed otxet | "texto de teste" Mas lembrando que sai tudo de cabeça para baixo ou seja invertido
+------------------------------------+
agradeço qualquer ajuda.
programa que envio para a impressora zebra tlp-2844 e envio para a impressora como: type texto.prn >lpt1

N
A000,300,0,3,2,2,R,"texto de teste"
P1
wfr123
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 20
Data de registro: 23 Nov 2009 09:56
Cidade/Estado: goiania-GO
Curtiu: 0 vez
Mens.Curtidas: 1 vez

Re: ZEBRA TLP 2488 termica

Mensagempor alaminojunior » 19 Nov 2010 20:23

Então meu caro, essa Zebra eu nunca trabalhei, mas existem comandos para impressão espelhada. Verifique se este comando existe para esta versão.
Compilador xHarbour 1.2.3 + Embarcadero C++ 7.30
MySQL c/ SQLRDD
HwGui + GTWVG
Avatar de usuário

alaminojunior
Colaborador

Colaborador
 
Mensagens: 1689
Data de registro: 16 Dez 2005 20:26
Cidade/Estado: Ubatuba - SP
Curtiu: 27 vezes
Mens.Curtidas: 11 vezes

Re: ZEBRA TLP 2488 termica

Mensagempor SandroBelarmino » 22 Nov 2010 09:46

wfr123 escreveu:N
A000,300,0,3,2,2,R,"texto de teste"
P1


Experimente trocar o R pelo N, ficando dessa maneira:
N
A000,300,0,3,2,2,N,"texto de teste"
P1


Veja se resolve.
Alessandro R Belarmino
Clipper 5.2e - Blinker 7 - DBFNTX / DBFCDX
"Quem trabalha muito erra muito, quem trabalha pouco erra pouco, quem não trabalha não erra e quem não erra é promovido !!!!"
SandroBelarmino
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 464
Data de registro: 04 Set 2007 16:11
Cidade/Estado: Pedreira-SP
Curtiu: 18 vezes
Mens.Curtidas: 0 vez

Próximo



Retornar para CA-Clipper

Quem está online

Usuários vendo este fórum: Google [Bot] e 3 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro