Problemas com a linguagem Epl (Zebra Tlp 2248)

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

vejjitt0
Usuário Nível 1
Usuário Nível 1
Mensagens: 7
Registrado em: 08 Jun 2010 09:23
Localização: São Paulo

Problemas com a linguagem Epl (Zebra Tlp 2248)

Mensagem por vejjitt0 »


Olá a todos, bem estou com um problema de codigos;
tenho duas impressoras zebra uma na linguagem epl(tlp 2248) e outra na linguagem zpl(s4m-203dpi).
na linguagem zpl consegui imprimir normalmente com meu programa, mas já a epl nem ejetar etiquetas consigo,
alguém poderia me ajudar nessa linguagem(EPL)??? segue abaixo o código:

Código: Selecionar todos

func main
 
wusuario:="" 
if seta_imp()
* --------------------------------------------------------------------------------- 
* Este é un exemplo para impressão de etiquetas  
* ---------------------------------------------------------------------------------- 
* 
// 
// 
// 
// 
@ 0,0 say  "Q406,019"+;
           "q831"+;
           "rN"+;
           "S4"+;
           "D7"+;
           "ZT"+;
           "JB"+;
           "OD"+;
           "R111,0"+;
           "N"+;
           'B575,325,2,3,3,9,160,B,"1234567S"'+;
           "P1"
                        
set device to screen 
set printer to 

endif 

func seta_imp 
como disse se trocar o código epl por zpl funfa, mas o contrário nem sai etiquetas.
Alguém pode me ajudar???

[/b]
Editado pela última vez por Toledo em 08 Jun 2010 12:24, em um total de 1 vez.
Razão: Mensagem editada para colocar a tag [ code ]<br>Veja como utilizar esta tag: http://www.pctoledo.com.br/forum/faq.php?mode=bbcode#f2r1
Avatar do usuário
alaminojunior
Colaborador
Colaborador
Mensagens: 1717
Registrado em: 16 Dez 2005 21:26
Localização: Ubatuba - SP

Re: Problemas com a linguagem Epl (Zebra Tlp 2248)

Mensagem por alaminojunior »

É só um palpite, pois nunca programei para esta marca, apenas Argox.
Mas para usar estes comandos não seria necessário colocar um chr(13)+chr(10) ao final de cada comando ? Pois os comandos segundo o seu post, estão indo um na frente do outro. Talvez seja a falta de um lf+cr ao final de cada um.

Código: Selecionar todos

func main
crlf:= chr(13)+chr(10)
wusuario:=""
if seta_imp()
* ---------------------------------------------------------------------------------
* Este é un exemplo para impressão de etiquetas
* ----------------------------------------------------------------------------------
*
//
//
//
//
@ 0,0 say "Q406,019"+crlf+;
"q831"+crlf+;
"rN"+crlf+;
"S4"+crlf+;
"D7"+crlf+;
"ZT"+crlf+;
"JB"+crlf+;
"OD"+crlf+;
"R111,0"+crlf+;
"N"+crlf+;
'B575,325,2,3,3,9,160,B,"1234567S"'+crlf+;
"P1"

set device to screen
set printer to

endif

func seta_imp 
Compilador xHarbour 1.2.3 + Embarcadero C++ 7.30
MySQL c/ SQLRDD
HwGui + GTWVG
vejjitt0
Usuário Nível 1
Usuário Nível 1
Mensagens: 7
Registrado em: 08 Jun 2010 09:23
Localização: São Paulo

Re: Problemas com a linguagem Epl (Zebra Tlp 2248)

Mensagem por vejjitt0 »


olá alaminojunior , obrigado pela sua resposta ao tópico, tambem imprimo em argox e uso estes comandos, mas a zebra nada acontece so fica estática!!!
como disse antes na linguagem ZPL que é da mesma marca funfa de boa, mas Na EPL nenhum progresso.
nem os comando dela no notepad imprime...
se alguém mais poder colaborar agradeço desde já...
jamazevedo
Usuário Nível 3
Usuário Nível 3
Mensagens: 122
Registrado em: 29 Dez 2005 16:50
Localização: Manaus - AM

Problemas com a linguagem Epl (Zebra Tlp 2248)

Mensagem por jamazevedo »

Gere um arquivo txt.
E envie para impressora como se fosse um arquivo texto.
Exemplo: arquivo etiqueta.txt

Código: Selecionar todos

Q104,24
q831
rN
S4
D7
ZT
JB
OD
R56,0
N
B70,0,0,2,4,10,30,N,"000001"
B70,62,0,2,4,10,30,N,"567890"
A154,28,0,2,1,1,N,"000001"
A154,48,0,2,1,1,N,"567890"
B430,0,0,2,4,10,30,N,"000001"
B430,62,0,2,4,10,30,N,"567890"
A514,28,0,2,1,1,N,"000001"
A514,48,0,2,1,1,N,"567890"
P1
Em Linux para enviar: lpr -p tlp-2844 etiqueta.txt
Em Windows para enviar: run type etiqueta.txt >prn

Isso acontece porque a tlp tem linguagem própria e ela interpreta o arquivo inteiro e não linha a linha como você postou no comando @ say...

No manual da impressora tem o significado dos comandos Q, q, r, A, B, etc...
______________________________________________________
Usando: Linux Ubuntu 18.04, Harbour 3.2.0dev r1811161533
______________________________________________________
José Airton de Menezes Azevedo
Manaus - AM
Avatar do usuário
alaminojunior
Colaborador
Colaborador
Mensagens: 1717
Registrado em: 16 Dez 2005 21:26
Localização: Ubatuba - SP

Re: Problemas com a linguagem Epl (Zebra Tlp 2248)

Mensagem por alaminojunior »

Praticamente o que eu citei. Após cada comando, um crlf.
Da maneira como o colega vejjitt0 havia colocado no início, os comandos iríam aparecer um na frente do outro na mesma linha.
Intercalando cada um com crlf fica como o Jamar indicou.
Compilador xHarbour 1.2.3 + Embarcadero C++ 7.30
MySQL c/ SQLRDD
HwGui + GTWVG
Responder