willian_delan

Deixei validado por município então, obrigado, pode encerrar.

Bom dia, tudo bem? Boleto Itau V3 Com PIX QR Code No ACBrBoletoRet_Itau_API, ao dar o erro: '{'#$A' "codigo" : "422",'#$A' "mensagem" : "Erro na validação de Campos",'#$A' "campos" : [ {'#$A' "campo" : "txid",'#$A' "mensagem" : "Campo “txid” inválido. Deve possuir de 26 a 35 caracteres.",'#$A' "valor" : "BL3704009988310900000000000000000834"'#$A' } ]'#$A'}' o código não está tratado, dando acess violation ao tentar pegar os "dados_individuais_boleto" sendo que houve erro no registro e não tem os campos de dados do boleto, print anexo. Sugestão englobar o processo validando se o LJsonBoletoObject estiver assigned.

vlr unitário é 145,13 vlr total 507,96 qtde 3,5 hoje estamos fazendo assim: AValorUnitIPM := RoundABNT(AVlrTotal / AQtde, 10); ValorUnitario := AValorUnitIPM; AValorTotalItemIPM := (RoundABNT(AValorUnitIPM * AQtde, 2)); ValorTotal := AValorTotalItemIPM; ValorTributavel := AValorTotalItemIPM; AValorTotalIPM := AValorTotalIPM + AValorTotalItemIPM; Isso porque no ACBr na unit IPM.GravarXml o unidade_valor_unitario usa tcDe10 e o valor_tributavel usa tcDe2 mas da forma que está o vlr unitário fica: 145,1314285714 que multiplicando por 3,5 fica 507,9599999999, sendo esse diferente do valor tributável que é 507,96. Ao deixarmos como AValorUnitIPM := RoundABNT(AVlrTotal / AQtde, 2); ele pega o vlr unitario como 145,13 ficando a correta multiplicação e deixando 507,96, assim como o valor tributável, mas dai foge do tcDe10 que consta no ACBr. Para outros clientes fica correta a emissão, mas essa venda deste cliente gerou este caso, queremos uma abordagem que fique correta para todos ou que antecipe consiga prevenir o máximo que puder.

Boa tarde, tudo bem? Ao emitir NFSe para a cidade de FRAIBURGO (SC) provedor IPM estou com o seguinte retorno: 00169 - O valor unitário da UNIDADE DO SERVIÇO não foi informado corretamente. - Analisei o XML mas aparenta estar correto, ou não achei o que seria, alguém sabe dizer? Segue XML anexo: 00149269464000197331828052025-EnviarLote.xml

Bom dia@Italo Giurizzato Junior, Concordo, pode ignorar esta alteração, encerrem este tópico. Verifiquei e já temos esse recurso implementado internamente, provavelmente foi tido a ideia inicial de fazer nos fontes do ACBr e depois que mudaram de ideia e fizeram internamente na aplicação ficou perdida esta alteração, podem ignorar, obrigado pela analise.

@Italo Giurizzato JuniorBoa tarde, espero que esteja bem. - Em relação ao ProvedorToStr foi implementado mais porque no componente antigo tinha esse método e utilizávamos ele em alguns processo e na mudança para o NFSeX vimos que não tinha e implementamos internamente, mas realmente, concordo que com o FACBrNFSe.Configuracoes.Geral.xProvedor a opção não se faz tão útil. - Em relação ao NFSe.ChaveAcesso na unit Aspec.GravarJson quando eu criei essa unit e mandei para vocês eu enviei incorretamente, era para estar da forma que enviei agora, mas realmente, caso alguém esteja usando agora pode atrapalhar, então sem problemas. Quanto ao RLZ, mesma coisa. - Sobre o SoftPlan.GravarXml realmente é estranho a mudança, não sei lhe dizer ao certo o porque foi alterado desta forma e segue o mesmo princípio do Aspec e RLZ de não mudar para não atrapalhar quem já usa desta forma e também que a mudança no contexto do nome da propriedade não faria sentido. Pode encerrar este fórum, obrigado pela atenção e apoio.

@Alexandre de Paula Sim, é porque temos implementado o Pix do PagSeguro e este o ACBr ainda não fez. Mas se não é útil para o ACBr, sem problemas, vamos manter alterado internamente e quando implementarem o PIX do PagSeguro removemos. Obrigado.

@Alexandre de PaulaAlgumas balanças tem particularidades que precisa ativar com um Baud e ler com outro. Toledo Prix 3 somente ativa com 9600, mas somente é possível ler com 2400.

@Alexandre de Paula Sicredi: Sicoob: Inter: Itau: @Alexandre de PaulaNovos fóruns abertos acima, pode encerrar este e dar prosseguimento nos demais. Se possível dar uma atenção maior ao do Inter que tem um erro de alto impacto. Obrigado.

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrBoletoRet_Itau_API.pas ACBrBoletoW_Itau_API.pas Alterações incluem: * Mapeado uses httpsend para no GerarHeader definir o HTTPSend.Protocol como 1.1 para algumas funcionalidades precisa estar neste protocolo, e no DefinirKeyUser quando IndicadorPix mapear apenas o x-itau-correlationID(Client ID) e quando não tiver, mapear x-itau-correlationID(Client ID) e x-itau-apikey(Client ID) para o W Itau; * Em LerRetorno, mapeado "message" como um retorno possível a ser tratado e quando o codigo_erro = 0, será mapeado no código como HTTPResultCode.ToString e na mensagem LJsonObject.AsString['message']. Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref:

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrBoletoRet_Inter_API.pas Alterações incluem: * Mapeado CodigoEstadoTituloCobranca com 1; 6 e 7 para indicar código do status do título no retorno do Inter e colocado um Trim(RetWS) para não tratar quando o retorno for vazio para não dar exceção; *** Importante: Em LerRetornoPix tanto o NossoNumeroCorrespondente quanto o IDBoleto estão mapeado incorretamente! Está pegando LJsonObjectItem.AsString['codigoSolicitacao'] e o correto deveria ser LJsonObjectItem.AsJSONObject['cobranca'].AsString['codigoSolicitacao'] @Alexandre de Paula Se possível de uma atenção em especial a está alteração acima, alto impacto. Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref:

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrBoletoRet_Sicoob_V3.zip Alterações incluem: * Em homologação preencher as propriedades CodBarras e LinhaDig com dados fictícios para gerar o boleto com QR Code em homologação para o Sicoob V3; Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref:

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrBoletoRet_Sicredi_APIV2.pas Alterações incluem: * Mapeado o CodigoEstadoTituloCobranca como 6 para indicar que está pago no retorno da V2 do Sicredi; Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref:

@Alexandre de PaulaSim, ainda é utilizado, vão remover a unit pcnNFeW? É possível incluir a alteração que enviei para a nova unit?

@Alexandre de Paula Isso mesmo, usado nas implementações dos PSP. Print anexo pegamos do FConexaoPIX.ACBrPix.PSP.Token para mapear o token após autenticado.

Conforme consta no fórum abaixo, não preciso passar o VCL. antes da uses, deste fórum pode considerar apenas a alteração incluído a balança balToledoPrix3, demais alterações são desnecessárias.

@Juliomar MarchettiEntendi, quando tivemos este problema não tínhamos no Unit scopes names o vcl adicionado, mas aparentemente nas novas versões já vem por padrão ou algo assim, removendo as alterações do VCL. antes deu certo, agradeço pela dica, vou remover esta parte das nossas alterações. Pode ignorar as alterações deste tópico e encerrar.

Certo, entendido, fiz assim pois eram pequenas alterações, achei que não teria problemas. Para os próximos abro tópico para cada.

Sim, realmente não é mais dados, mas como tenho essas alterações pendentes aqui para mim quis repassar caso seja útil aos demais e para remover de minhas pendências. Já utilizamos NFSeX, mas não em todos os municípios ainda, em alguns ainda utilizamos do componente antigo.

@Alexandre de Paula Não sei dizer, sei que Delphi Delphi 10.2 Tokyo pra cima funciona, 7 não tenho certeza. Atualmente estamos com o 12.3 funcionando normalmente. @Juliomar Marchetti Consegue me explicar?

Aberto fóruns para as alterações, pode encerrar este aqui.

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrNFSeXConversao.pasRLZ.GravarXml.pasSoftPlan.GravarXml.pasAspec.GravarJson.pasAspec.LerJson.pas Alterações incluem: * ACBrNFSeXConversao: Implementado ProvedorToStr do NFSeX; * Aspec.GravarJson: No GerarDadosNota na TAG tokenRPS alterado de ChaveAcesso para NFSe.ChaveAcesso. (Provedor e units implementado por mim, pode deixar desta nova forma que é o correto, quando enviei ao ACBr faltou esta alteração); * Aspec.LerJson: Deixado parse do TACBrJSONObject dentro do try nos métodos. (Provedor e units implementado por mim, pode deixar desta nova forma que é o correto, quando enviei ao ACBr faltou esta alteração); * RLZ.GravarXml: Em GerarXml, ao mapear a Tag chave, alterado de pegar do ChaveAcesso para Nfse.ChaveAcesso; * SoftPlan.GravarXml: No GerarItemServico, Ao mapear a Tag idCNAE, alterado de pegar do CodigoCnae para o CodigoTributacaoMunicipio; e ao mapear o cfps alterado de pegar do CFPS para CodigoCnae. Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref: https://www.projetoacbr.com.br/forum/topic/83304-arquivos-acbr-alterados-contribuição/#replyForm

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrNFSeWebServices.paspnfsConversao.paspnfsNFSe.paspnfsNFSeG.paspnfsNFSeR.paspnfsNFSeW_IPM.pas Alterações incluem: * ACBrNFSeWebServices: No InicializarServico se for IPM no self.FPAuthorizationHeader passar o 'Basic ' + self.FPAuthorizationHeader; Em TratarRespostaFinal removido validação do proInfiscv11 pois nao estava retornando as rejeições ; * pnfsConversao: Adicionado ao TnfseNaturezaOperacao os tipos no21 e no22 assim como no NaturezaOperacaoToStr; Adicionado no TnfseTipoRPS o tipo trCFSe assim como no TipoRPSToStr e StrToTipoRPS pois internamente implementamos a emissão de CFS-e(Cupom Fiscal de Serviços Eletrônico); Adicionado em TnfseProvedor os provedores proBauhaus, proPadraoNacional, proSoftPlan, proSimple, proSintese, proAspec assim como no ProvedorToStr e StrToProvedor; * pnfsNFSe: Implementado as propertys FCodigoCNAE e FCodCNO; * pnfsNFSeG: Em Gera_DadosMsgCancelarNFSe para a IPM, mapeado a TAG serie_nfse do SerieRps; * pnfsNFSeR: Em LerNFSe_IPM, mapeado DDD do Tomador do ddd_fone_comercial e mapeado o NFSe.Servico.CodigoCnae do Codigo_atividade; * pnfsNFSeW_IPM: Em GerarListaServicos, mapeado a Tag codigo_atividade do CodigoCNAE; ao mapear o valor_issrf utilizar o tcDe2; Mapeado o cno pegando do CodCNO > CNO (Cadastro Nacional de Obras). Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref:

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit pcnNFeW.pas Alterações incluem: * Implementado GetGerarICMS60RepCodANP > // derivado de petroleo codigo ANP diferente dos mencionados abaixo gerar icms 60 de repass Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref:

Bom dia, espero que estejam bem. Temos alterações internas em alguns arquivos do ACBr e gostaríamos de ver se são úteis para serem incluídos ao repositório oficial, para contribuir com o repositório e ao mesmo tempo eliminar essas pendências do SVN que precisamos ter devido alguma particularidade encontrada ou algo nesse sentido. unit ACBrCAPICOM_TLB.pas Alterações incluem: * Em CoStore.Create Implementado Try Except e no Except tentado garantir criação do objeto. Dúvidas questionar; Caso seja aproveitado parcial ou completo informar aqui por gentileza. Ref: