
Quality Automação
Membros Pro-
Total de ítens
160 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Quality Automação postou
-
Estou passando no meu Caso a Carteira é 1 LayoutVersaoArquivo 81 estou passando ou tenho que verificar qual LayoutVersaoArquivo é para determinada carteira ?
-
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
-
Alteração de Boleto via Api Banco Sicob V3
Quality Automação replied to Quality Automação's tópico in ACBrBoleto
Obrigado pelas informações deu certo. -
Alteração de Boleto via Api Banco Sicob V3
Quality Automação replied to Quality Automação's tópico in ACBrBoleto
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.... -
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
-
Certo obrigado por esclarecer.
-
então no caso não existe retorno para a baixa ? Somente efetuando a consulta mesmo correto ?
-
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
-
NFSeX - Método para gerar imagem BMP da Nota Fiscal
Quality Automação replied to Ivan Orosco's tópico in ACBrNFSe
cielo, rede, stone, atualmente eu pego o pdf converto em bmp e mando imprimir. -
NFSeX - Método para gerar imagem BMP da Nota Fiscal
Quality Automação replied to Ivan Orosco's tópico in ACBrNFSe
Bom dia, estou precisando disso nfce, as maquininhas de cartao trabalham mais rapido e com mais qualidade usando bmp, vou ter que implementar -
Obrigado pela informação.
-
Boa tarde, é possível visualiza quais bancos são suportados para Abcr Boletos via API e também se Banco Banestes é suportado pela API.
-
Clisitef Seq.66 Multiplos Pagamentos
Quality Automação replied to Paulinho's tópico in Dúvidas sobre TEF
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. -
Clisitef Seq.66 Multiplos Pagamentos
Quality Automação replied to Paulinho's tópico in Dúvidas sobre TEF
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. -
Clisitef Seq.66 Multiplos Pagamentos
Quality Automação replied to Paulinho's tópico in Dúvidas sobre TEF
estou com esse problema, o log vem CliSiTef DoExibeMsg: Oper: opmOK Mensagem: Transação não efetuada. Favor reter o Cupom -
Obrigado. Vamos ir acompanhando.
-
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?
-
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.
-
Emissão de NFe com Certificado na Nuvem RemoteID
Quality Automação replied to tdpsistemas's tópico in ACBrNFe
Estava correndo aqui tambem. Vou testar por aqui. -
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?
- 24 replies
-
- nfce
- danfe fortes nfce
- (e 5 mais)
-
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;
- 24 replies
-
- nfce
- danfe fortes nfce
- (e 5 mais)
-
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.
- 24 replies
-
- nfce
- danfe fortes nfce
- (e 5 mais)
-
Retorno Banco do Brasil - Convênio de 7 posições e Nosso Número com 17
Quality Automação replied to brsamn's tópico in ACBrBoleto
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 -
Boleto e Remessa HSBC Tamanho máximo do nosso número: 5
Quality Automação replied to Patricialiderall's tópico in ACBrBoleto
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 -
Boleto e Remessa HSBC Tamanho máximo do nosso número: 5
Quality Automação replied to Patricialiderall's tópico in ACBrBoleto
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.