Pesquisar na Comunidade

Olá Pessoal, Ao incluir uma nova cidade no arquivo ACBrNFSeXServicos.ini ou até mesmo alterar o provedor e ou URLs de ambiente de produção ou homologação de uma cidade devemos seguir os passos abaixo: 1. Salvar o arquivo ACBrNFSeXServicos.ini; 2. Executar o Compila_RES que se encontra na mesma pasta; 3. Reinstalar o ACBr; 4. Compilar a aplicação com a opção Build; 5. Realize os testes sempre usando o programa exemplo; 6. Criei um tópico no fórum incluindo a alteração ou inclusão feita para que possamos avaliar e enviar para o SVN. Se não seguir os passos acima a alteração realizada no ACBrNFSeXServicos.ini não será reconhecida pelo componente ACBrNFSeX. Toda contribuição é sempre bem vinda.

Olá pessoal! Houve uma alteração na forma como o ACBrMonitorPLUS devolve a informação do nome do XML gerado. Quem utiliza o ACBrMonitorPLUS a muito tempo, provavelmente está acostumado a receber na resposta do mesmo, o nome do arquivo em dois locais diferentes como no exemplo abaixo: OK: C:\ACBrMonitorPLUS\Logs\352409XXXXXXXXXXXX395700100000000112147XXXX1-cte.xml Autorizado o uso do CT-e. [Envio] CStat=100 CUF=35 DhRecbto= Msg=Autorizado o uso do CT-e. NProt=123XXX94 NRec= TMed=0 VerAplic=SP-CTe-2024-01-31-2 Versao=SP-CTe-2024-01-31-2 XMotivo=Autorizado o uso do CT-e. Xml=<CTe>...</CTe> [CTe352409XXXXXXXXXXXX395700100000000112147XXXX1] Id= XML= cStat=100 chDFe=352409XXXXXXXXXXXX395700100000000112147XXXX1 dhRecbto=05/02/2024 20:26:22 digVal=XXXXXXXXXXXXXXXXXXXXXXXX35oA= nProt=13XXXXXXXXXX994 tpAmb=1 verAplic=SP-CTe-2024-01-31-2 xMotivo=Autorizado o uso do CT-e. [CTe_Arq1] Arquivo=C:\ACBrMonitorPLUS\Logs\352409XXXXXXXXXXXX395700100000000112147XXXX1-cte.xml Vejam que mesmo havendo na resposta uma seção específica para as informações do CT-e autorizado, há um seção [CTe_Arq1] que recebe somente o local onde o arquivo foi gerado. Esta seção [DFe_ArqX] costuma ser gerada no retorno quando assíncrono. Agora, com alguns documentos adotando somente o modo de envio síncrono e visando padronização na forma como está informação é devolvida tanto na resposta do Monitor e na resposta da Lib, está seção foi removida e a informação foi movida para a já existente seção com os dados do documento fiscal com o identificador NomeArq. Então a resposta agora será desta forma: OK: C:\ACBrMonitorPLUS\Logs\352409XXXXXXXXXXXX395700100000000112147XXXX1-cte.xml Autorizado o uso do CT-e. [Envio] CStat=100 CUF=35 DhRecbto= Msg=Autorizado o uso do CT-e. NProt=123XXX94 NRec= TMed=0 VerAplic=SP-CTe-2024-01-31-2 Versao=SP-CTe-2024-01-31-2 XMotivo=Autorizado o uso do CT-e. Xml=<CTe>...</CTe> [CTe352409XXXXXXXXXXXX395700100000000112147XXXX1] Id= NomeArq=C:\ACBrMonitorPLUS\Logs\352409XXXXXXXXXXXX395700100000000112147XXXX1-cte.xml XML= cStat=100 chDFe=352409XXXXXXXXXXXX395700100000000112147XXXX1 dhRecbto=05/02/2024 20:26:22 digVal=XXXXXXXXXXXXXXXXXXXXXXXX35oA= nProt=13XXXXXXXXXX994 tpAmb=1 verAplic=SP-CTe-2024-01-31-2 xMotivo=Autorizado o uso do CT-e. Todos os meus retornos foram alterados? Foram alterados os retornos dos comandos de envio dos objetos do CTe e do MDFe, ambos documentos que adotaram somente o modo de envio síncrono.

Olá, tudo bem? Gostaria de reportar uma alteração para enviar NFS-e do munícipio de Gaúcha do Norte - MT. No ACBrNFSeXServicos.ini alterei [5103858] Nome=Gaucha do Norte UF=MT Provedor= para [5103858] Nome=Gaucha do Norte UF=MT Provedor=Coplan Versao=2.01 ProRecepcionar=https://www.gp.srv.br/tributario/gauchadonorte/anfse_web_service ProLinkURL=http://www.gp.srv.br/tributario/gauchadonorte/tnfse_validacao?%CodVerif% Desde já, agradeço... muito obrigado. ACBrNFSeXServicos.ini

Bom dia, tudo bem! Fiz algumas alterações para incluir o serviço de substituir NFS-e no provedor da SoftPlan. Foi adicionado os métodos: procedure TACBrNFSeProviderSoftPlan.PrepararSubstituiNFSe(Response: TNFSeSubstituiNFSeResponse); procedure TACBrNFSeProviderSoftPlan.TratarRetornoSubstituiNFSe(Response: TNFSeSubstituiNFSeResponse); function TACBrNFSeXWebserviceSoftPlan.ConsultarDFe(ACabecalho, AMSG: string): string; Para substituir uma NFS-e é necessário enviar um XML com as informação que serão alteradas. Para esse provedor não precisa cancelar a NFS-e antes de substituir. Como o serviço de substituir NFS-e cancela antes de enviar uma nova, foi tratado em PrepararCancelaNFSe e TratarRetornoCancelaNFSe para ignorar caso TACBrNFSeX(FAOwner).Status = stNFSeSubstituicao. Também foi necessário fazer algumas alterações no GravarXML. Apenas algumas informações poderão ser substituídas outras serão igual a nota anterior logo, o XML de envio da NFS-e de substituição será diferente do XML de envio de quando gera a NFS-e. Então no GravarXML foi preciso separar em dois métodos para um para gravar o XML de substituição e outro para o XML que envia NFS-e; function GerarXmlEnvio: Boolean; function GerarXmlSubstituicao: Boolean; Estou anexando as units que foram alteradas para analise. Muito Obrigado. SoftPlan.GravarXml.pas SoftPlan.Provider.pas

Olá tudo bem! Continuando os testes na NFPS-e de Florianópolis (SoftPlan), ao tentar enviar para um tomador que não é contribuinte ou pessoa física no caso, ocorre a falha: O campo "inscricaoMunicipalTomador" tamanho deve estar entre 1 e 7 <?xml version="1.0" encoding="UTF-8"?> <xmlNfpse> <message>O campo "inscricaoMunicipalTomador" tamanho deve estar entre 1 e 7</message> </xmlNfpse> para solucionar o problema, em SoftPlan.GravarXml.pas foi alterado para verificar se a informação está em branco, caso esteja não é inserido a tag no XML. if (NFSe.Tomador.IdentificacaoTomador.InscricaoMunicipal <> '') then NFSeNode.AppendChild(AddNode(tcStr, '#1', 'inscricaoMunicipalTomador', 0, 30, 1, NFSe.Tomador.IdentificacaoTomador.InscricaoMunicipal, '')); Então estou encaminhando a unit com as alterações para analise. Muito Obrigado. SoftPlan.GravarXml.pas

Olá tudo bem! Fiz algumas alterações para consultar NFS-e e baixar o XML que ainda não estavam funcionando. A consulta da NFS-e retorna uma JSON e não vem o XML . O XML deve ser baixado por outro endpoint. O ConsultarNFSe irá retornar o JSON com as informações da NFS-e, logo em seguida é usado o ConsultarDFe para baixar o xml. function TACBrNFSeXWebserviceSoftPlan.ConsultarDFe(ACabecalho, AMSG: string): string; #define a url de acordo com o tpConsulta tcPorCodigoVerificacao ou tcPorNumero procedure TACBrNFSeProviderSoftPlan.PrepararConsultaNFSe(Response: TNFSeConsultaNFSeResponse); override; #trata o retorno lendo as informações do JSON e executa o ConsultarDFe para baixar o xml procedure TACBrNFSeProviderSoftPlan.TratarRetornoConsultaNFSe(Response: TNFSeConsultaNFSeResponse); override; #prepara a url para baixar o xml da NFS-e procedure TACBrNFSeProviderSoftPlan.PrepararConsultarDFe(Response: TNFSeConsultarDFeResponse); override; #Lê e salva o xml que retornou procedure TACBrNFSeProviderSoftPlan.TratarRetornoConsultarDFe(Response: TNFSeConsultarDFeResponse); override; ... No LerXML, foi alterado para copiar a situação da NFS-e (cancelada/normal) da tag statusNFPSe do XML. Situacao := ObterConteudo(ANode.Childrens.FindAnyNs('statusNFPSe'), tcInt); ... Em ACBrNFSeXConversao.pas, também foi adicionado o tipo tcPorCodigoVerificacao no enumerador TtpConsulta. TtpConsulta = (tcPorNumero, tcPorFaixa, tcPorPeriodo, tcServicoPrestado, tcServicoTomado, tcPorCodigoVerificacao); SoftPlan.Provider.pas SoftPlan.LerXml.pas ACBrNFSeXConversao.pas

Olá tudo bem! O cancelamento de NFS-e do profedor SoftPlan funcionou mas foi preciso fazer alguns ajustes porque alguns atributos conflitaram com o serviço de gerar token. Coloquei os três pontos no mesmo tópico, não sei se era obrigatório criar um tópico para cada um. Estava com problemas com a identificação do tomador na unit SoftPlan.GravarXML, era necessário remover os caracteres especiais e deixar apenas números. NFSeNode.AppendChild(AddNode(tcStr, '#1', 'identificacaoTomador', 0, 20, 1, OnlyNumber(NFSe.Tomador.IdentificacaoTomador.Cnpj), '')); O atributo ChaveAutoriz esta sendo utilizado para definir o numeroAEDF no xml de envio e de cancelamento também e conflitava com o serviço de gerar token. Esse mesmo atributo foi utilizado para salvar o client_secret que é utilizado para gerar o token. Então para evitar conflitos eu fiz alterações no serviço de gerar token para utilizar o atributo Emitente.WSFraseSecr ao invés do Emitente.WSChaveAutoriz. Então em procedure TACBrNFSeProviderSoftPlan.PrepararGerarToken(Response: TNFSeGerarTokenResponse) aonde define a URL foi alterado de: FpPath := FpPath + '&client_secret=' + Emitente.WSChaveAutoriz; para: FpPath := FpPath + '&client_secret=' + Emitente.WSFraseSecr; E em procedure TACBrNFSeXWebserviceSoftPlan.SetHeaders(aHeaderReq: THTTPHeader) aonde define o cabeçalho do request foi alterado de: with TConfiguracoesNFSe(FPConfiguracoes).Geral do Auth := Emitente.WSChaveAcesso + ':' + Emitente.WSChaveAutoriz; para: with TConfiguracoesNFSe(FPConfiguracoes).Geral do Auth := Emitente.WSChaveAcesso + ':' + Emitente.WSFraseSecr; O número da nota estava ficando errado quando gerava a nfse. Estava copiando o numero do rps ao invés do numero da nota no xml de retorno. Então alterei para copiar da tag 'numeroSerie' ao invés da tag 'identificacao'; Então em procedure TACBrNFSeProviderSoftPlan.TratarRetornoEmitir(Response: TNFSeEmiteResponse) foi alterado de: with Response do begin ... NumeroNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('identificacao'), tcStr); end; para: with Response do begin ... NumeroNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('numeroSerie'), tcStr); end; Muito Obrigado SoftPlan.GravarXml.pas SoftPlan.Provider.pas

Olá pessoal tudo bem? A cidade de Florianópolis utiliza o provedor SoftPlan. O provedor possuí uma API e é necessário fazer a autenticação e gerar o token antes de gerar, consultar e cancelar a NFSe. Então eu implementei os métodos de GerarToken nesse provedor antes de prosseguir com as outras alterações. Se alguém puder validar e gerar um commit delas, provavelmente eu vou continuar com alterações nos outros métodos também. Resumindo as principais alterações na unit SoftPlan.Provider.pas: Foi criado o método PrepararGerarToken aonde é formado a URL com os parametros necessarios que são username, password, client_id, client_secret. Para o client_id foi utilizado Emitente.WSChaveAcesso e para o client_secret foi utilizado Emitente.WSChaveAutoriz. client_id e client_secret tem que credenciar junto a prefeitura, então eles vão fornecer essas credenciais. Foi criado os método TratarRetornoGerarToken que trata os erros ou extrai o token retorno pelo JSON no response. Foi adicionado as seguintes urls no ini cidades: ProGerarToken=https://nfps-e.pmf.sc.gov.br/api/v1/autenticacao/oauth/token HomGerarToken=http://nfps-e-hml.pmf.sc.gov.br/api/v1/autenticacao/oauth/token Desde já agradeço pelo auxilio. Estou a disposição pra qualquer duvidas também. SoftPlan.Provider.pas ACBrNFSeXServicos.ini

Pessoal, teve uma alteração do modelo carnê dos boletos referente ao Banco Caixa. A empresa onde trabalho efetuou a homologação para emissão de boletos, ai tivemos de fazer algumas alterações no modelo Carnê. Peço que alterem no ACBr. Segue o arquivo em anexo. BoletoCarne.fr3

Boa dia, Pessoal alguém saberia me informar se houve alguma alteração no parte de gerar o Impresso/PDF do acbr ou se é alguma configuração? Antes as informações adicionais dos produtos saiam dessa maneira: Agora elas saem jundo com o nome do produto, ficando confuso para o usuário:

Bom dia, Estou tendo a seguinte dúvida no Sped Fiscal. Tenho um cliente que cadastrou um produto no sistema como tributado 18% e esta vendendo desta maneira até então. Hoje ele descobriu pelo escritório que este produto é substituição, logo ele quer fazer a alteração da tributação do item pois esta pagando imposto a mais. No Sped Fiscal pelo que li no guia prático, não há nada falando de alterações de tributação, somente de alteração da descrição desde que não descaracterize o item. Gostaria de saber se alguém conhece o procedimento correto a ser tomado nesse caso, se não há problema de ter movimentação de um mesmo item com dois tipos de tributação, ou se é melhor vender o item errado até o final do mês pagando assim mais imposto, ou cadastrar um novo item e dar esse cadastro errado como encerrado? Att,

Olá a todos. Utilizo o componente ACBrNFSe e as vezes preciso de algumas "alterações" para atender as minhas necessidades e de meus clientes. Decidi criar o tópico, não sei se é o correto, mas com o objetivo de sugerir algumas dessas alterações, para quem sabe for útil para mais algum ou para que alguém também coloque aqui alguma alteração que possa me ajudar. Só ressaltando, é apenas sugestão, pois sei que algumas alterações não seria aplicada a todos os servidores e poderiam complicar a manutenção do componente. Seguem duas alterações que precisei fazer para poder me atender: 1ª - Não estava preenchendo a lista de NFSe's no método ACBrNFSe1.ConsultarNFSe ficando em um loop infinito e travando a aplicação; 2ª - Essa já dava briga desde o trunk2 mas no meu caso preciso: Quebra de linha com #13 nas NFSe. Parece bobagem mas tem cliente que quer emitir a nota e só mandar o link para o cliente também poder realizar a impressão só que por exemplo, no caso do servidor ISSCuritiba, ao fazer a impressão por meio do site da prefeitura, sem essa alteração sai tudo em uma só linha e com um monte de ;;;; mesmo alterando o ISSCuritiba.ini. Espero que possa ajudar mais alguém e que me desculpem se estiver criando tópicos desnecessários. Obrigado. 1ª Sugestão.zip 2ª Sugestão.zip

Boa tarde ! Estou compilando o exemplo Demo_ACBrNFSe para o provedor Fiorilli (Serra Negra - SP) e consegui fazer a emissão NFe usando o ambiente de homologação do mesmo. Só que o layout que imprimir via componente ACBrNFSeDANFSeRL1 não foi aceito pela Fiorili. Resposta deles: Devido às exigências do padrão 2.2 da Abrasf, você terá que fazer um layout igual o nosso, porque em ambiente de produção esse layout nao daria certo. Existe esta exigência de fato ? Tem como eu mudar o layout do componente ACBrNFSeDANFSeRL1 ? Desde já agradeço a atenção.

Boa tarde Precisei fazer alguns ajustes no Método GerarRegistroTransacao240, na geração do "SEGMENTO P". Conforme manual o campo "Nosso Número: - Se emissão a cargo do Sicoob (vide planilha ""Capa"" deste arquivo): NumTitulo - 10 posições (1 a 10) = Zeros Parcela - 02 posições (11 a 12) - ""01"" se parcela única Modalidade - 02 posições (13 a 14) - vide planilha ""Capa"" deste arquivo Tipo Formulário - 01 posição (15 a 15): ""1"" -auto-copiativo ""3""-auto-envelopável ""4""-A4 sem envelopamento ""6""-A4 sem envelopamento 3 vias Em branco - 05 posições (16 a 20) - Se emissão a cargo do Cedente (vide planilha ""Capa"" deste arquivo): NumTitulo - 10 posições (1 a 10): Vide planilha ""02.Especificações do Boleto"" deste arquivo item 3.13 Parcela - 02 posições (11 a 12) - ""01"" se parcela única Modalidade - 02 posições (13 a 14) - vide planilha ""Capa"" deste arquivo Tipo Formulário - 01 posição (15 a 15): ""1"" -auto-copiativo ""3""-auto-envelopável ""4""-A4 sem envelopamento ""6""-A4 sem envelopamento 3 vias Em branco - 05 posições (16 a 20)" Por conta disso precisei fazer um ajuste na função segue o código a baixo com o que foi alterado: Linha: 604 if (ACBrBoleto.Cedente.ResponEmissao = tbCliEmite) then begin Result := Result+padR(NossoNum, 10, '0')+ padR(IntToStr(ACBrTitulo.Parcela), 02, '0')+ //--Alterado padR(ACBrBoleto.Cedente.Modalidade, 02, '0')+ //--Alterado '4'+ Space(5); end else Result := Result+Space(20); Espero que o código seja incorporado ao projeto. Att, Maicon da Silva Evangelista