Lfm_

Boa tarde @Italo Giurizzato Junior, pode deixar, muito obrigado Abraço, Luiz

Oi @Italo Giurizzato Junior, em modo debug, adiciono um breakpoint até chegar na procedure TACBrNFSeProviderABRASFv2.GerarMsgDadosCancelaNFSe, adicionei um comentário: procedure TACBrNFSeProviderABRASFv2.GerarMsgDadosCancelaNFSe( Response: TNFSeCancelaNFSeResponse; Params: TNFSeParamsResponse); var Emitente: TEmitenteConfNFSe; InfoCanc: TInfCancelamento; begin Emitente := TACBrNFSeX(FAOwner).Configuracoes.Geral.Emitente; InfoCanc := Response.InfCancelamento; with Params do begin Response.ArquivoEnvio := '<' + Prefixo + 'CancelarNfseEnvio' + NameSpace + '>' + '<' + Prefixo2 + 'Pedido>' + '<' + Prefixo2 + 'InfPedidoCancelamento' + IdAttr + NameSpace2 + '>' + '<' + Prefixo2 + 'IdentificacaoNfse>' + '<' + Prefixo2 + 'Numero>' + InfoCanc.NumeroNFSe + '</' + Prefixo2 + 'Numero>' + Serie + '<' + Prefixo2 + 'CpfCnpj>' + GetCpfCnpj(Emitente.CNPJ, Prefixo2) + '</' + Prefixo2 + 'CpfCnpj>' + GetInscMunic(Emitente.InscMun, Prefixo2) + '<' + Prefixo2 + 'CodigoMunicipio>' + IntToStr(InfoCanc.CodMunicipio) + //NESTE PONTO, EM MODO DEBUG, ALTERO A VARIÁVEL EM TEMPO DE EXECUÇÃO // IntToStr(TACBrNFSeX(FAOwner).Configuracoes.Geral.CodigoMunicipio) + '</' + Prefixo2 + 'CodigoMunicipio>' + CodigoVerificacao + '</' + Prefixo2 + 'IdentificacaoNfse>' + '<' + Prefixo2 + 'CodigoCancelamento>' + InfoCanc.CodCancelamento + '</' + Prefixo2 + 'CodigoCancelamento>' + Motivo + '</' + Prefixo2 + 'InfPedidoCancelamento>' + '</' + Prefixo2 + 'Pedido>' + '</' + Prefixo + 'CancelarNfseEnvio>'; end; end;

@Italo Giurizzato Junior Segue os arquivos de exemplo que encontrei no site da prefeitura de Erechim, onde consta a informação do CodigoMunicipio no xml de substituição. Exemplos_WebService.zip

Bom dia Italo, tudo bem? Então, até novembro isso não ocorria, porém meus clientes de lá agora começaram a relatar o erro abaixo ao tentarem substituir uma nota fiscal: L8: Município inválido: Código do município do cancelamento não é o mesmo do Município gerador. Então ao informar o município manualmente no componente, a substituição é realizada com sucesso. Att, Luiz

Boa tarde Pessoal, O município de Erechim\RS solicita a inclusão do código do município ao substituir uma nota fiscal. Verifiquei no código fonte da ACBrNFSeX e não consta estes dados, para incluí-lo como posso proceder? Solicito a vocês ou tenho a liberdade de fazer? No aguardo, Luiz

Bom dia Pessoal, agradeço a atenção e as respostas. O prestador tem os dois casos\cnpjs, simples nacional e lucro presumido. Já estou tentando entender junto com eles o processo, de fato não vi o processo de autenticação no componente da Acbr via certificado digital, mas olharei mais atentamente ao exemplo. Att, Luiz

Boa tarde pessoal, estou precisando emitir uma nota fiscal para uma pessoa jurídica de Porto Alegre, porém eles não tem usuário e senha de acesso, eles realizam o acesso por certificado digital, nestes casos como devo configurar o componente? Pois ao tentar emitir o retorno é este: <GerarNfseResposta xmlns="http://www.abrasf.org.br/nfse.xsd"> <ListaMensagemRetorno> <MensagemRetorno> <Codigo>E182</Codigo> <Mensagem>Erro na autenticação.</Mensagem> </MensagemRetorno> </ListaMensagemRetorno> </GerarNfseResposta> Agradeço a atenção desde já! Att, Luiz

Boa tarde Ítalo, desculpe pela demora e obrigado pelo retorno. Deu certo!!! Abraço, Luiz

Bom Dia, não sei se algo mudou na nota carioca, porém neste mês o componente ACBrNFSeX não consegue mais fazer a leitura do retorno da emissão de nota fiscal única (modoEnvio = meUnitario). Segue em anexo o XML de retorno gerado pelo componente. Abaixo segue linhas do código da unit ISSRio.Provider, método TACBrNFSeProviderISSRio.TratarRetornoEmitir, percebam que o componente busca a tag ListaNfse, porém no XML de retorno ela não existe quando é nota única: if Response.ModoEnvio <> meUnitario then begin inherited TratarRetornoEmitir(Response); Exit; end; Document := TACBrXmlDocument.Create; try try Document.LoadFromXml(Response.ArquivoRetorno); ProcessarMensagemErros(Document.Root, Response); ProcessarMensagemErros(Document.Root, Response, 'ListaMensagemRetornoLote'); ANode := Document.Root; Response.Data := ObterConteudoTag(ANode.Childrens.FindAnyNs('DataRecebimento'), tcDatHor); Response.Protocolo := ObterConteudoTag(ANode.Childrens.FindAnyNs('Protocolo'), tcStr); ANode := Document.Root.Childrens.FindAnyNs('ListaNfse'); if not Assigned(ANode) then begin AErro := Response.Erros.New; AErro.Codigo := Cod202; AErro.Descricao := ACBrStr(Desc202); Exit; end; Estou configurando algo errado ou de fato mudou algo no provedor ISSRio? Fico no aguardo e agradeço a atenção. Luiz 0-ger-nfse.xml 0-lista-nfse-ger.xml

Boa noite Pessoal, estou tentando emitir uma nota fiscal para o provedor SigISS para a cidade de Londrina-PR. A nota não possuí retenção de ISS e a prestação do serviço é realizada dentro do município. Como não há retenção, não informo a alíquota do ISS, porém o componente gera a tag com o valor zerado. Ocorre o seguinte erro: E0013 - Início do processoNFSe_1.xml Correção: Valor da alí­quota do simples nacional inválida. Segue o xml gerado pelo componente. Alguém pode dar uma ajuda?

Boa Tarde Ítalo, Sim, com certeza, é bem recorrente essa situação. Att, Luiz

Verificando o código da unit Bauhaus.GravarJson, na rotina GerarDadosNota: .AddPair('MunicipioPrestacao', StrToIntDef(NFSe.Prestador.Endereco.CodigoMunicipio, 0)) Neste caso, não deveria obter o município do Tomador? Que seria o local onde o serviço está sendo prestado? No aguardo, Luiz

Bom Dia Renato, muito obrigado pelo retorno. Essa chave de autorização seria o que? Devo solicitar ao provedor? Obrigado, Luiz

Boa Tarde Pessoal, estou tentando implementar no meu sistema o provedor Bauhaus para a cidade de Itapema. O retorno do componente é este: <?xml version="1.0" encoding="UTF-8"?> {"Message":{"Kind":"Error","Code":"PAD-E001","Message":"Token Inv\u00E1lido.","Detail":""}}{"Message":{"Kind":"Error","Code":"PAD-E001","Message":"Token Inv\u00E1lido.","Detail":""}} Alguém poderia me ajudar?

Bom Dia Pessoal, estou com algumas dificuldades de enviar a remessa para o banco Itaú. Gero um título sem juros, ocorre tudo bem, porém, se adiciono juros ele retorna a seguinte mensagem: OCORRÊNCIA INVÁLIDA - JUROS DE MORA MAIOR QUE O PERMITIDO Utilizei 1% de juros e 2% de multa. Porém, minha conta não tem nenhum limite. Segue o arquivo cb130901 (1).rem gerado pelo componente. Obrigado, Luiz

Bom Dia, tentamos contato a prefeitura, mas até o momento sem sucesso. Teria alguém que conseguiu fazer emissão para fora do município utilizando o provedor ISSRio? Att, Luiz

Boa Tarde, Realizei a migração do componente para o ACBRNFSeX e tentei emitir uma nota de fiscal para fora do município utilizando o provedor ISSRio (Nota carioca). Porém recebo o retorno: E39: Apenas empresas tomadoras de serviços inscritas neste município podem efetuar retenção de ISS. Correção: O CNPJ e/ou a Inscrição Municipal informada do tomador não foi encontrada na base de dados do município, não sendo permitida a retenção. Acerte o CNPJ e/ou Inscrição Municipal ou altere o campo ISS Re.. Segue em anexo o XML da requisição. Olhando para um XML gerado pelo site da prefeitura do Rio, a única diferença é que, no XML gerado pelo componente, não há a tag <OrgaoGerador>, porém eu informo estas propriedades dentro do componente. Alguém poderia me ajudar? Att, Luiz 141-env-lot.xml

Obrigado Italo... Att, Luiz

Boa Tarde Italo, essa alteração foi apenas para o ACBrNFSeX? Ou para o antigo tbm? Ainda estou utilizando o antigo e no cidades.ini balneario está com o provedor SimplISS. Obrigado, Luiz

Segue a unit pnfsNFSeW_IPM.pas

Boa Tarde, o provedor IPM recebe na alíquota e no valor do ISS até 4 casas decimais, precisei alterar o componente neste caso, pois a alíquota vigente em uma cidade é de 4,3257%. Podem por favor adicionar esta implementação no componente?? Alterei nestes pontos (unit: pnfsNFSeW_IPM, rotina: GerarListaServicos): if NFSe.Servico.ItemServico.Aliquota = 0 then Gerador.wCampo(tcDe4, '', 'aliquota_item_lista_servico', 1, 15, 1, NFSe.Servico.Valores.Aliquota, '') else Gerador.wCampo(tcDe4, '', 'aliquota_item_lista_servico', 1, 15, 1, NFSe.Servico.ItemServico.Aliquota, ''); if NFSe.Servico.Valores.ValorIssRetido > 0 then Gerador.wCampo(tcDe4, '', 'valor_issrf', 1, 15, 0, NFSe.Servico.ItemServico.ValorIss, DSC_VISS ) else Gerador.wCampo(tcDe4, '', 'valor_issrf', 1, 15, 0, 0, DSC_VISS ); Obrigado, Luiz

Boa Tarde Ítalo, estou indo direto no site da prefeitura

Boa Tarde Ítalo, deu certo aqui, obrigado... Somente resta uma dúvida, na discriminação dos serviços não estou conseguindo aplicar a quebra de linha, obtenho do arquivo INI o caractere de quebra, porém na nota não está respeitando, imprime assim: SERVICO R$ 100,00; ; FATURA\DUPLICATAS; VENCIMENTO: 14/01/2020; TOTAL: R$ 100,00; ; OBSERVACAO:; ;;TESTE;;; O caractere que está configurado como quebra é o ponto e vírgula, porém na impressão é impresso ele ao invés da quebra

Boa Tarde Ítalo, fiz aqui, porém ele retorna que o lote está em processamento, tentei utilizar o método consultaSituacao, porém para o Simplissv2 não há este método implementado. Qual o procedimento padrão neste caso?

Não realizo a consulta pra nenhuma cidade, neste caso teria que fazer isso?