Ir para conteúdo
  • Cadastre-se

Quality Automação

Membros Pro
  • Total de ítens

    160
  • Registro em

  • Última visita

Tudo que Quality Automação postou

  1. Estou passando no meu Caso a Carteira é 1 LayoutVersaoArquivo 81 estou passando ou tenho que verificar qual LayoutVersaoArquivo é para determinada carteira ?
  2. estou com o mesmo problema antes de atualizar estava normal atualizei também ocorre o mesmo erro .Se retornar para a versao anterior o erro nao acontece
  3. Obrigado pelas informações deu certo.
  4. Entendi vou fazer o teste. reparei antes de efetuar o teste que tem N toRemessaAlterar.... no caso de ter q alterar por exemplo data de vencimento e data limite de pagamento no mesmo titulo eu tenho fazer isso separadamente ou posso em uma única alteração passar todas as alterações e passar apenas toRemessaAlterarVencimento visto que no caso seria diferente o toRemessaAlterar....
  5. Bom dia, Estou tentando fazer a alteração no vencimento de um boleto usando a API para o banco Sicob Abasteço o boleto completo alterando o vencimento. porem só me retorna HTTP_Result=400 JSON={"mensagens":[{"mensagem":"Preencha um dos campos para alteração.","codigo":"5002"}]} estou configurando o componente igual para a inclusão ,baixa e consulta no Scope: with CedenteWS do begin //ClientID := '9b5e603e428cc477a2841e2683c92d21'; ClientID := pClientId; ClientSecret := pClientSecret; KeyUser := ''; IndicadorPix := False; Scope := 'boletos_inclusao boletos_consulta boletos_alteracao'; end; e para enviar estou passando : AdicionaBoleto(pBoleto,pJsonAlteracao); ApiBoletoSicob.Configuracoes.WebService.Operacao := tpAltera; ApiBoletoSicob.Enviar; algo mais que tenha que configurar ? segue anexo Log Log
  6. Certo obrigado por esclarecer.
  7. então no caso não existe retorno para a baixa ? Somente efetuando a consulta mesmo correto ?
  8. Boa tarde estou baixando um boleto via api no sicob usando o metodo ApiBoletoSicob.Configuracoes.WebService.Operacao := tpBaixa; ApiBoletoSicob.Enviar; ele baixa correto no banco Porem n tenho retorno a lista de retorno ApiBoletoSicob.TotalListaRetornoWeb contem 1 item porem os dados do Json ApiBoletoSicob.ListaRetornoWeb[i].JSON quanto as demais propriedades como por ex: ApiBoletoSicob.ListaRetornoWeb[i].DadosRet.TituloRet.SeuNumero ApiBoletoSicob.ListaRetornoWeb[i].DadosRet.TituloRet.DataBaixa retornam vazias existe alguma forma de pegar essas informações no ato da baixa em si Obs: na consulta (Dia seguinte) retorna normalmente
  9. cielo, rede, stone, atualmente eu pego o pdf converto em bmp e mando imprimir.
  10. Bom dia, estou precisando disso nfce, as maquininhas de cartao trabalham mais rapido e com mais qualidade usando bmp, vou ter que implementar
  11. Obrigado pela informação.
  12. Boa tarde, é possível visualiza quais bancos são suportados para Abcr Boletos via API e também se Banco Banestes é suportado pela API.
  13. Descobri oque eu estava fazendo de errado, eu tenho duas formas de cancelamento, posso cancelar um pagamento ou cancelar a venda toda, no cancelamento da venda toda eu nao estava chamando o cancelamento do Tef.
  14. Tentei mandar na sequencia, primeiro eu vejo se o tef ja está iniciado depois configuro a operacao e chamo crt 01, ele entra em aguardando resposta e fica dando contantemente a mesma mensagem, venda não efetuada, favor reter o cupom, esse tef foi feito tem bastante tempo na epoca da ecf.
  15. estou com esse problema, o log vem CliSiTef DoExibeMsg: Oper: opmOK Mensagem: Transação não efetuada. Favor reter o Cupom
  16. Obrigado. Vamos ir acompanhando.
  17. Vai ter um modulo especifico? Pois pelas documentações que andei lendo vai existir um padrão para gerar o QrCode e um URL para consulta da transação, mesmo assim será necessario passar pelo TEF?
  18. Boa tarde. Está nos planos do projeto criar um componente para gerar o QrCode de pagamentos PIX? Dei uma olhada aqui e não encontrei.
  19. Estava correndo aqui tambem. Vou testar por aqui.
  20. Exelente a implementação, mas sempre tem um porem né... O colega informou um bug pois estava sempre imprimendo bandeira visa, mas acredito que é pelo fato de quando a venda não for integrada ele não preenche as informações de autorização, no meu caso eu já preencho e precisava que imprimisse. Podemos tratar de outra forma?
  21. Daniel Simoes Obrigado pela velocidade. Acabei implementando a autorização do cartão. Consegue adicionar pra gente? var i: Integer; Troco: Real; DescPagto, DescBandeira,CodigoAutorizacao: String; begin //Total := 0; FPosPrinter.Buffer.Add('<c>' + PadSpace('FORMA DE PAGAMENTO | VALOR PAGO R$', FPosPrinter.ColunasFonteCondensada, '|')); for i := 0 to FpNFe.pag.Count - 1 do begin with FpNFe.pag.Items[i] do begin DescPagto := ACBrStr(FormaPagamentoToDescricao(tPag)); if (tPag in [fpCartaoCredito, fpCartaoDebito]) then begin DescBandeira := BandeiraCartaoToDescStr(tBand); CodigoAutorizacao := 'Aut: '+cAut; end else begin DescBandeira := ''; CodigoAutorizacao := ''; end; FPosPrinter.Buffer.Add('<c>' + PadSpace( DescPagto + ' ' + DescBandeira + ' ' + CodigoAutorizacao + '|' + FormatFloatBr(vPag), FPosPrinter.ColunasFonteCondensada, '|')); end; end; Troco := IIf(FpNFe.pag.vTroco > 0,FpNFe.pag.vTroco,vTroco); if Troco > 0 then FPosPrinter.Buffer.Add('<c>' + PadSpace('Troco R$|' + FormatFloatBr(Troco), FPosPrinter.ColunasFonteCondensada, '|')); end;
  22. Acompanhei os ultimos commit's e não identifique a alteração. Acreditam que vão colocar essa opção no ESCPOS ou é necessario mudar manual mesmo? Se for preciso posso enviar a classe com as alterações para ser feito o commit.
  23. Bom dia Juliana. Estou passando por uma dificuldade na leitura de um retorno do Banco do Brasil. Tenho uma conta com Carteira 17 e convenio composto por 6 Números. Na leitura do retorno o componente capta o nosso numero pela seguinte função: NossoNumero := Copy(Linha,63,11) No meu caso ele retorna 18916368669 Pelo que entendo esse nosso numero tem o convenio + numero do titulo. Só que ao setar o valor do nosso numero ele faz a validação e me retorna um exceção falando que o tamanho do nosso numero é 5. Eu entendo que ele seria sim desse tamanho caso na captura não pegue o convenio, tanto que para liberar aqui deixei da seguinte forma no componente: NossoNumero := Copy(Linha,63,11).Replace(ACBrBoleto.Cedente.Convenio,''); Vou anexar o arquivo de retorno aqui para se for possível dar uma avaliada e ver se e necessário uma correção em uma das funções. Muito Obrigado. CBR64348332806201612149.ret
  24. Bom dia. 1 – ESTRUTURA DO NÚMERO BANCÁRIO (NOSSO NÚMERO) E E E E E N N N N N D Onde: EEEEE = Código do Cliente no Banco (Nº. do Range) Código numérico a ser fornecido pelo Banco por ocasião do início dos testes. Este código tem amarração cadastral com a conta de cobrança, portanto deverão ser obtidos tantos códigos quantos forem às contas de cobrança a serem utilizadas para a Cobrança Diretiva ou após utilizar todos os números sequenciais do documento. NNNNN = Número sequencial do documento / título. Uso a critério do cliente e quando utilizar todos, deve solicitar um novo número Range. D = Dígito verificador de segurança. É calculado pelo Módulo 11, com pesos de 2 a 7 da direita para a esquerda. Pagina 13. Olhei no manual mais fui na logica. Se tem uma verificação se o nosso numero e maior que 6 então não tem logica limitar um nosso numero com 5 dígitos. Aguardo o retorno. cobbarra.pdf
  25. Tambem estou passando pelo mesmo problema. No meu caso preciso de utilizar o nosso numero com 10 dígitos. Acredito que a validação esta errada, pois tem um lugar da classe que tem o seguinte codigo: if (ACBrTitulo.Carteira = 'CSB') or (ACBrTitulo.Carteira = '1') then begin if Length(ACBrTitulo.NossoNumero) < 6 then wNossoNumero:= PadLeft(trim(ACBrTitulo.ACBrBoleto.Cedente.Convenio),5,'0') + RightStr(ACBrTitulo.NossoNumero,5) else wNossoNumero:= RightStr(ACBrTitulo.NossoNumero,10); Modulo.CalculoPadrao; Modulo.MultiplicadorFinal := 7; Modulo.Documento := wNossoNumero; Modulo.Calcular; Result := RightStr(wNossoNumero,10) + AnsiString(IntToStr(Modulo.DigitoFinal)); end else Result :=ACBrTitulo.NossoNumero + '-' + CalcularDigitoVerificador(ACBrTitulo); Como não posso ter um nosso numero com 10 dígitos???? Para funcionar precise alterar a função CalcularTamMaximoNossoNumero function TACBrBancoHSBC.CalcularTamMaximoNossoNumero( const Carteira: String; NossoNumero : String = ''): Integer; begin Result := fpTamanhoMaximoNossoNum; if (trim(Carteira) = '') then raise Exception.Create(ACBrStr('Banco HSBC requer que a carteira seja '+ 'informada antes do Nosso Número.')); if (trim(Carteira) = 'CSB') or (trim(Carteira) = '1') then begin Result := 10; fpTamanhoMaximoNossoNum := 10; end; end; Se for possível fazer o commit dessa alteração.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.