Painel de líderes

Seguem as units e o patch do svn, caso alguém queira analisar, devido a falta de tempo, implementei somente os endpoints para atender a minha necessidade, as funcionalidade básicas estão implementadas, caso alguém queira incluir os outros endpoints, como alterar vencimento, desconto, etc, fique a vontade, caso contrario implementarei conforme sobrar um tempo aqui. Está funcionando o boleto híbrido inclusive, com o retorno do EMV. Tive que alterar a ACBrBoletoWS.Rest.pas para incluir o HttpResultCode 207 como Result válido, por que o Sicoob retorna ele, na inclusão de boletos. Alterei também a ACBrBoletoWS.pas, pois ao chamar TBoletoWS.Clear, o field FBoleto não era setado, passando a ser Nil; ACBrBoletoW_Bancoob.pas ACBrBoletoWS.Rest.pas ACBrBoletoWS.pas ACBrBoletoRet_Bancoob.pas Sicoob Api.patch

Olá pessoal, Sou de São José do Rio Preto/SP, e gostaria de contribuir com layout para NFSe da minha cidade. Ambos validados (ocultei os dados sensíveis). Em anexo. Gostaria de colaborar com a criação do ACBrLibNFSe ... o quanto antes ... o que for possível eu acrescentar, por favor, coloquem ... Obrigado Canc-00001718.xml ConsPosicao-00000179.xml ConsSitLote-00000179.xml Venda-00000179.xml

Pequenas correções na leitura das propriedades TituloRet.EMV e RetornoWeb.JSON ACBrBoletoRet_Bancoob.pas

Consulta o lote após o envio, mais percebi que servidor de homologação deles as vezes da problema

Boa noite, Cola o print do programa de exemplo com o retorno do envio. Aparentemente este provedor devolve as mensagens na lista de erros, no campo descrição. procedure TACBrNFSeProviderABRASFv1.ProcessarMensagemErros(RootNode: TACBrXmlNode; Response: TNFSeWebserviceResponse; const AListTag, AMessageTag: string); . . . for I := Low(ANodeArray) to High(ANodeArray) do begin Mensagem := ObterConteudoTag(ANodeArray[I].Childrens.FindAnyNs('Mensagem'), tcStr); if Mensagem <> '' then begin AErro := Response.Erros.New; AErro.Codigo := ObterConteudoTag(ANodeArray[I].Childrens.FindAnyNs('Codigo'), tcStr); AErro.Descricao := ACBrStr(Mensagem); AErro.Correcao := ACBrStr(ObterConteudoTag(ANodeArray[I].Childrens.FindAnyNs('Correcao'), tcStr)); end; end;

no caso salvo exceções em locais os valores monetarios são todos 2 digitos.

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-3737

Olá Pessoal, O nosso Moderador Renato Rubinho implementou e disponibilizou os fontes de um novo provedor: Prescon. No momento temos apenas a cidade Vargem/SP configurada para este provedor. O Renato entrou em contato com o provedor, mas infelizmente eles não forneceram as demais cidades atendidas por eles, paciência. Abaixo algumas informações importantes levantadas pelo Renato sobre o provedor. 1. Particularidades: * Não requer certificado digital. * Não possui ambiente de homologação. * Não retornam xml da NFSe. * Utiliza token, gerado com o método GerarToken. * Na documentação, diz que o token expira em 15 minutos, mas durante os testes, não expirou. * Emitente.InscMun: IM utilizada como usuário para geração do token. * Emitente.WSSenha: Senha para geração do token. * Emitente.WSChaveAutoriz: Token obtido pelo método GerarToken, que será utilizado pelos demais métodos. 1.1. Método para retorno do próximo Número de NFSe a utilizar (getNextInvoice). * O provedor possui um método que consiste em retornar o próximo número de NFSe a utilizar. * Para não criar um novo método específico, foi utilizado o método ConsultarNFSePorFaixa para obter o próximo número de NFSe a ser utilizado, pois o provedor não utiliza este método. * Na procedure GerarMsgDadosEmitir, gerada trava quando o NFSe.Numero não for preenchido. Na mensagem, avisado sobre a utilização da ConsultarNFSePorFaixa para pegar o próximo número. 1.2. Erros * Existe uma tabela com as descrições dos erros, pois na maioria são retornados apenas códigos. * Configuada função para retornar a descrição dos respectivos erros. * Em algumas situações, retornam a descrição do erro na tag "retorno" ao invés apenas do código. 1.2.1. Existem bugs nos tratamentos de erros do provedor * Documentei o problema por e-mail e retornaram que está em análise. * Se passar um json inválido, retorna erro de token expirado. * Testei anomalias, passando por exemplo na chave devidoNoLocal "N" e "S" ao invés de "0" e "1", retornou apenas "ERRO". Passei para o provedor e não responderam se corrigiriam. * E-mail de contato do provedor: [email protected] Quem desejar ou precisar emitir notas para a cidade de Vargem/SP, favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e inicie os testes usando o programa exemplo do ACBrNFSeX.