Gilson Heleno

Vc conseguiu resolver Eduardo?

o tempo de expiração pode influir também? pois no exemplo teste está 3600 (3,6 segundos) e o timeout 90000 (1,5 minutos).

é justamente isso que acontece Eduardo. O tempo deixei o mesmo do exemplo teste. Nesse caso qual o timeout ideal?

produção

Estou testando com o PSP do Sicoob. O interessante que faço 10 vendas seguidas e as confirmações atualiza certinho. E quando acontece é seguido, ou seja, todas vendas que fizer em seguida o status de confirmação não atualiza.

Bom dia a todos! Estou implementando o recebimento de PIX em meu sistema e ao realizar os testes hora atualiza o status de confirmado e hora não. O que posso verificar pra corrigir o problema?

Estou implmentando em nosso sistema o recebimento de PIX utilizando o ACBRPIXCD. Este problema está ocorrendo quando tentamos pagar um qrcode usando o app do banco do brasil. O qrcode foi gerado pelo PSP sicoob. Se tentar leor pelo app do SICOOB vcc consegue pagar sem problemas.

Bom dia! consegui resolver. pode encerrar o tópico. Obrigado

Boa noite. não foi minha intenção. Peço a desculpa a todos. Caso seja necessário pode encerrar o POST que abro um novo tópico seguindo as regras do Forum.

BOA TARDE! TENHO UM EXECUTÁVEL DATADO DE 12/02/2019 DO ETQTeste.exe (SEM OS FONTES) QUE QUANDO TESTO AS ETIQUETAS DE GONDOLA SAI COM UMA FONTE DIFERENTE DO EXEMPLO DISPONIBILIZADO NO PROJETO ACBR. VOU ANEXAR AS IMPRESSÕES QUE FIZ PRA VER SE ALGUÉM PODE M E AJUDAR. GOSTARIA QUE NO MEU SISTEMA FOSSE IMPRESSO COMO AS DUAS PRIMEIRAS. MAS NO EXEMPLO QUE TENHO QUANDO IMPRIME FICA COMO AS DUAS ULTIMAS. VOU POSTA O CÓDIGO. ESTOU USANDO O MODELO: etqZPLII while not tb_etiqtemp.eof do begin IniciarEtiqueta; ImprimirTexto(orNormal, '0', 60, 60, 3, 3, tb_etiqtempNOME.Value, 0, True); ImprimirTexto(orNormal, '0', 60, 60, 8, 3, ''); ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, tb_etiqtempCODIGO.Value, 10, becSIM); ImprimirTexto(orNormal, 'A', 100, 100, 18, 32, 'R$'); ImprimirTexto(orNormal, 'A', 120, 120, 15, 50, tb_etiqtempPVENDA.AsString); //formatfloat('#,##0.00',tb_etiqtempPVENDA.Value)); FinalizarEtiquetaComCopiasEAvanco; tb_etiqtemp.Next; end;

Eu também tinha imaginado desta forma mas fiquei aguardando uma dica. Obrigado mais uma vez. Gilson Heleno

Boa tarde! agradeço a dica. vou realizar os teste. Outro problema que esqueci de comentar é quando mando imprimir exemplo 7 etiquetas. Como utilizo 3 colunas então as duas ultima era pra sair em branco. Mas ele preenche as duas ultimas com informação do ultimo item. Tem idéia como posso resolver? Segue codigo para analise: tb_etiqtemp.First; AtivarACBrETQ; with ACBrETQ do begin while not tb_etiqtemp.eof do begin // xtam:=Length(dm.tb_etiquetasCODIGO.Value); IniciarEtiqueta; ImprimirTexto(orNormal, '0', 20, 30, 2, 3, 'R$ '+ formatfloat('##,##0.00',tb_etiqtempPVENDA.Value)); ImprimirTexto(orNormal, '0', 20, 20, 6, 3, tb_etiqtempNOME.Value); ImprimirBarras(orNormal, barCODE128, 2, 4, 10, 3,tb_etiqtempCODIGO.Value, 8,becSIM); tb_etiqtemp.Next; ImprimirTexto(orNormal, '0', 20, 30, 2, 37, 'R$ '+ formatfloat('##,##0.00',tb_etiqtempPVENDA.Value)); ImprimirTexto(orNormal, '0', 20, 20, 6, 37, tb_etiqtempNOME.Value); ImprimirBarras(orNormal, barCODE128, 2, 4, 10, 37,tb_etiqtempCODIGO.Value, 8,becSIM); tb_etiqtemp.Next; ImprimirTexto(orNormal, '0', 20, 30, 2, 72, 'R$ '+formatfloat('##,##0.00',tb_etiqtempPVENDA.Value)); ImprimirTexto(orNormal, '0', 20, 20, 6, 72, tb_etiqtempNOME.Value); ImprimirBarras(orNormal, barCODE128, 2, 4, 10, 72,tb_etiqtempCODIGO.Value, 8,becSIM); FinalizarEtiquetaComCopiasEAvanco; tb_etiqtemp.Next; end; ImprimirEtiquetaComCopiasEAvanco; Desativar; end;

Gostaria de saber se é possível imprimir codigos de barras de padrão diferente dependendo do tamanho do código do produto. Explico: No cadastro de produto tenho produtos com códigos de barra e produtos sem códigos de barra. Esses sem código de barras utiliza um código menor tipo um sequencial (ex: 1015). Quando estou imprimindo as etiquetas utilizo barCODE128. Pra os códigos menor que 13 digitos tipo 1015 dá certo, mas no caso de codigo de barras as barras não cabem na etiqueta pois utilizo 3 colunas. Por isso a dúvida se é possivel quando enviar o comando dependendo do tamanho do código envio com barCODE128 caso contrário barEAN13? Fiz um teste mas não deu certo conforme codigo abaixo: IniciarEtiqueta; xtam:=Length(dm.tb_etiquetasCODIGO.Value); ImprimirTexto(orNormal, '0', 20, 30, 2, 3, 'R$ '+ formatfloat('##,##0.00',dm.tb_etiquetasPVENDA.Value)); ImprimirTexto(orNormal, '0', 20, 20, 6, 3, dm.tb_etiquetasNOME.Value); if xtam<13 then ImprimirBarras(orNormal, barCODE128, 2, 4, 10, 3,dm.tb_etiquetasCODIGO.Value, 8,becSIM) else ImprimirBarras(orNormal, barEAN13, 2, 4, 10, 3,dm.tb_etiquetasCODIGO.Value, 8,becSIM) Agradeço a atenção. Gilson Heleno - SPMICRO