Árvore de páginas

Tempo aproximado para leitura: 05 min


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus
Segmento:Varejo
Módulo:SigaLoja (Controle de Loja)
Ticket:4500818 
Requisito/Story/Issue (informe o requisito relacionado) :DVARLOJ4-2905
Fontes do Pacote:LOJA1345.PRW  23/01/2019 


02. SITUAÇÃO/REQUISITO


O método INFCodeBar quando utilizado informando a tag ITF estava provocando um caso de looping infinito, não imprimindo a etiqueta e causando travamento do sistema.

03. SOLUÇÃO

Foram aplicadas correções no fonte LOJA1345.PRW para que passasse a tratar de maneira correta a tag ITF de impressão. O fonte constava com 2 erros, sendo um deles de loop que provocava o travamento do sistema e outro de má tratativa das informações, ambos foram devidamente corrigidos.

Fonte para teste:


#Include 'Protheus.ch'
#Include 'TBICONN.ch'

User Function impB4200()

PREPARE ENVIRONMENT EMPRESA '99' FILIAL '01' USER 'caixa4' PASSWORD '123'

cModelo := "BEMATECH MP4200 V01.00.00"
cPorta := "USB"
INFAbrir( cModelo, cPorta )

INFCodeBar("<itf>", "12345678901234567890")

RESET ENVIRONMENT

Return