imprimir etiqueta en zebra GC420t

[Patricio Avalos Aguirre]

Hola tod@s

Consulta si alguien del foro a imprimido etiquetas con cod. de barra en la impresora zebra GC420t?

tengo problema al imprimir con Fastreport, imprime 4 etiquetas bien y luego empieza a correrse de apoco le hecho de todo y nada

alguien tiene algo para ir probando otra alternativa..

[devwin2010]

Hola Patricio

Tenes que calibrarla fijate este video https://www.youtube.com/watch?v=BhIrkBjijfM
cualquier duda avisame
Saludos
Fabian

[Patricio Avalos Aguirre]

Hola Favian

gracias por la info

hice todo pero igual se corre

[devwin2010]

Patricio

Te envio el codigo que uso fijate de setear bien la impresora , he llegado a imprimir 70 etiquetas sin que se corra un mm

Cualquier duda avisame

Saludos

function barcode2tp()

local opr, xStep, yStep, oBr, oFont , N := 0

* public XCANCELA := "N"
PUBLIC XCODIGOC := SPACE(13)
public ocodigo

if msgyesno ("Imprime Codigo de trazabilidad ","Trazabilidad Compras")

printersetup()


printer oprinter NAME "IMPRESION CODIGO DE BARRAS"
oprinter:lPrvmodal := .T.

define brush oBr color CLR_YELLOW
define font oFont name 'ARIAL' size 0, -12 of oPr
define font oFont1 name 'ARIAL' size 0, -10 of oPr
rescoluna:=oPrinter:nlogpixelx()/2.54
reslinha:=oPrinter:nlogpixely()/2.54


*if msgyesno ("Imprime Codigo de trazabilidad ","Trazabilidad Compras")


store 12->descripcio to Xdetalle
store str(xnfac1,6) to xnfactu

store dtos(date()) to Xvto1
store alltrim(xvto1)+alltrim(xnfactu) to xcodigocc




page
nLineDes := 1.8
nCol := 1.5
nLineBar := 300
nLineCod := 300
@ 1*rescoluna,2*reslinha code3_9 ALLTRIM(XCODIGOCC) of oPrinter
oPrinter:say(3*reslinha,.5*rescoluna,ALLTRIM(Xnombre))
oPrinter:say(3.5*reslinha,.5*rescoluna,"FECHA "+DTOC(DATE()))


ENDPAGE



else

return



ENDIF



*
endprint
oBr:end()
oFOnt:end()
return nil

[karinha]

https://km.zebra.com/kb/index?page=content&id=SO8413&actp=LIST