Perguntas Impressão da Logo na impressora Zebra

Bom dia ,

Estou com um problema aqui na impressao da logo marca da empresa, o que esta acontecendo é que a logo nao sai de forma nenhuma na etiqueta, alguem sabe me dizer se existe algum programa que converte uma imagem .jpg para .grf porque pelo que eu li a imagem tem que ser .grf outra duvida que tenho é se existe alguma pasta especifica no servidor onde eu armazeno a imagem.grf para que a funcao mscbloadgrf() busque esta imagem? se alguem tiver um codigo fonte que esteja funcionando a impressao da logo poderia me passar para fazer um teste aqui?

segue abaixo o trecho do codigo fonte onde eu imprimo a etiqueta


//ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
static function imprime()
//ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
local cporta := "LPT1"
local _fonte := "033,018"
local _fonte2 := "033,040"
local _fonte3 := "033,030"

procregua(0)
incproc()

geratmp1()

tmp1->(dbgotop())

if !tmp1->(eof())

mscbprinter("IR1025",cporta,,,.f.)

_nota := tmp1->nf
_serie := tmp1->serie

while _nota == tmp1->nf .and. _serie == tmp1->serie .and. !tmp1->(eof())

nquant := tmp1->quant

if tmp1->volalmx > 0
nvols := mod(nquant , tmp1->volalmx)
quantetiq := 1
else
quantetiq := 1
endif

incproc(" Produto: " + alltrim(tmp1->cod) + " Lote: " + alltrim(tmp1->lote))

for x := 1 to quantetiq
mscbbegin(1,6)
mscbchkstatus(.f.)
mscbloadgrf("/system/novafarma.GRF")
mscbgrafic(2,3,"novafarma")
mscbsay(20,02,alltrim(tmp1->descri),"N","0",_fonte3)

if tmp1->generic == "S"
mscbsay(35,06,"Medicamento Generico Lei n 9.787, de 1999. ","N","0",_fonte)
endif

mscbsay(70,11,"Cod.: "+alltrim(tmp1->cod),"N","0",_fonte2)
mscbsay(70,15,"Lot.: "+alltrim(tmp1->lote),"N","0",_fonte2)
mscbsay(70,19,"Fab.: "+substr(tmp1->dtfabric,5,2)+"/"+substr(tmp1->dtfabric,1,4),"N","0",_fonte2)
mscbsay(70,23,"Val.: "+substr(tmp1->dtvalid,5,2)+"/"+substr(tmp1->dtvalid,1,4),"N","0",_fonte2)
mscbsay(40,30,alltrim(tmp1->forma),"N","0",_fonte)
mscbsay(45,34,"Contem "+alltrim(str(nvols))+" caixa(s)","N","0",_fonte)
mscbsay(30,38,"CADA CAIXA CONTEM "+alltrim(str(tmp1->conv))+space(1)+tmp1->embala,"N","0",_fonte)
mscbsay(15,42,"Conservar em temperatura ambiente (entre 15o C e 30o C). Proteger da luz e umidade","N","0",_fonte)

mscbsaybar(20,11,AllTrim(tmp1->codnac),"N","C",13,.f.,.t.,,,3,2,.t.)
mscbend()

next
quantetiq ++
gravalog()
tmp1->(dbskip())
end

mscbcloseprinter()

else
alert("Não foram encontrados dados para estes paramêntros!")
endif

tmp1->(dbclosearea())


return

desde já agradeço pela ajuda

Boa tarde, você precisar carregar o logo na memória da impressora zebra para ser impresso, existem uma sequencia de comandos a ser dado nela via prompt.

Boa tarde,

Como carrego a imagem e quais comandos são estes poderia me ajudar ??

Você tem que converter para um formato que a impressora entende(monocromatico pcx) senão me engando e depois carregar os dados ex:
copy C:\Figura2.pcx LPT1/b // seria pra enviar a imagem a impressora
GM"Figura2"515 //carregar a imagem Figura2 de 515 bytes
GG720,240,"Figura2" //Imprimir a Imagem nas posicoes 720,240

Caso sua impressora seja USB, use o comando net use para redirecionar portas.