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