Impressora zebra S4M

[Cristiane]

Boa tarde a todos

Gostaria, por favor, de uma ajuda, tenho um sistema em clipper que fazia a impressao de etiquetas em uma impressora argox e utulizava os seguintes comandos:

Código: Selecionar todos

FUNCTION ImpEtiq(zporta,; && porta de impressao
  zdistlat,; && deslocamento lateral da etiq. para direita Ex: 0020 com 4 casa e caracter
  ztemp,; && temperatura EX 10 caracter e com 2 casa
  zproduto,; && descricao do produto
  zean,; && codigo ean com 12 pos. sem o digito
  zpeso,; && peso
  zembala,; && data da embalagem em caract.
  zvalid,; && data da valid em caract.
  zquant ) && quant de etiq.
SET DEVICE TO PRINT
DO CASE
  CASE zpoRta = '0'
    SET PRINT TO LPT1
  CASE zporta = '1'
    SET PRINT TO COM1
  CASE zporta = '2'
    SET PRINT TO COM2
ENDCASE
wln = 0
@ wln++,00 SAY CHR(02) + 'O0220'
@ wln++,00 SAY CHR(02)+'M3000'
@ wln++,00 SAY CHR(02)+'f275'
@ wln++,00 SAY CHR(02)+'L'
@ wln++,00 SAY 'C' + zdistlat
@ wln++,00 SAY 'R0000'
@ wln++,00 SAY 'H' + ztemp
@ wln++,00 SAY 'D11'
@ wln++,00 SAY 'SE'
@ wln++,00 SAY 'PE'
@ wln++,00 SAY '191200300480000' + zproduto
@ wln++,00 SAY '1F3204000030000' + zean
@ wln++,00 SAY '191100300370107PESO LIQ.:' +ZPESO
@ wln++,00 SAY '191100300200107DATA FAB.:' + DTOC(zembala)
@ wln++,00 SAY 'Q' + PADL(ROUND(zquant,0),4,'0')
@ wln++,00 SAY 'E'
SET PRINT TO
SET DEVICE TO SCREEN
RETURN

Agora mudei para uma impressora stripe s4m e preciso dos comandos de impressao para substituir nessa funcao

Alguem poderia me ajudar?

Desde já agradeço

[anacatacombs]

Ola Cristiane, seja bem vinda.
Conforme conversamos no forum de FIVEWIN, acho melhor você baixar o manual PPLZ e reenquadrar a etiqueta.
Como vc já tem o código PPLA em mãos, a unica coisa que vai mudar, talvez, é a ordem de alguns comandos.

[]'s

Ana