Mota

Obrigado pelas respostas. Artigo bem esclarecedor. Mas só consegui compilar novamente, depois que limpei e reinstalei o ACBr. Não sei se será preciso que todos o façam, estou apenas informando que resolvi o "problema" assim.

Bom dia! Como de costume, hoje atualizei os fontes do componente. Após isso não estou mais conseguindo compilar meu projeto. Mensagem de erro: [dcc32 Fatal Error] ACBrDFeWinCrypt.pas(45): F1026 File not found: 'ACBr_WinCrypt.dcu' Como posso resolver? Será preciso desinstalar tudo? Desde já, obrigado!

Mais uma vez, muito obrigado! Me salvou de novo. Era só o arquivo ISSFortaleza.ini Deus te abençoe.

Pronto, Ítalo. Segue... 2179-can-soap.xml 2179-ped-can-soap.xml

Bom dia! Ainda não estou conseguindo Cancelar NFSe (ISS Fortaleza), já reinstalei o componente. Ao tentar Cancelar o componente está retornando uma mensagem vazia. 2179-can.xml 2179-ped-can.xml

Também estava com o mesmo problema(Não encontrei final do elemento </CancelarNfseEnvio>). Atualizei os fontes e agora retorna um erro que parece não estar tratado. Uso o GINFES para Fortaleza\CE. 2139-can.xml 2139-ped-can.xml

Bom, na aplicação aqui da empresa, faço da maneira que mencionei: \\Sem retenção Servico.Valores.IssRetido := stNormal; \\ Com retenção Servico.Valores.IssRetido := stRetencao; E no valor líquido, "debito" o valor do ISS retido, assim: Servico.Valores.ValorLiquidoNfse := Servico.Valores.ValorServicos - Servico.Valores.ValorPis - Servico.Valores.ValorCofins - Servico.Valores.ValorInss - Servico.Valores.ValorIr - Servico.Valores.ValorCsll - Servico.Valores.OutrasRetencoes - Servico.Valores.ValorIssRetido - Servico.Valores.DescontoIncondicionado - Servico.Valores.DescontoCondicionado;

Infelizmente, o problema não foi resolvido. Pra piorar, ele acontece de forma intermitente. Já tentei até tirar a divisão, e passar a alíquota já divida, mas ora o xml fica 0.0388 ora fica 0.0387.

Se não me engano é isso: Servico.Valores.IssRetido := stRetencao;

Não entendi Italo. A alíquota correta é 3,87. E passo este valor para o componente. Servico.Valores.Aliquota := 3.87; Mas quando é feita a divisão o valor fica 0.0388 ao invés de 0.0387

Bom dia! Esqueci de mencionar que o problema citado anteriormente gera uma rejeição, ou seja, não é só o fato de ter essa pequena diferença de centavos. O RPS não é convertido, pois a alíquota não condiz com a esperada.

Bom dia! Estou com um problema no valor da alíquota, por algum motivo, em algumas situações ela vem com valores diferentes. O problema está ocorrendo quando o valor passado possui casas decimais, por exemplo 3,87. Estou passando para o componente da seguinte forma: Servico.Valores.Aliquota := 3.87; Percebi que na unit pnfsNFSeW_ABRASFv1, quando o provedor é Ginfes, a alíquota é dividida por 100. case FProvedor of proGINFES: Gerador.wCampoNFSe(tcDe4, '#25', 'Aliquota', 01, 05, 0, (NFSe.Servico.Valores.Aliquota / 100), ''); Então o valor correto para ser enviado para o xml deveria ser 0,0387, mas algumas vezes(não sei o motivo) é enviado 0.0388. Observem os dois xml, cada um com uma alíquota diferente. Será que ao invés de deixar o componente fazer essa divisão não seria melhor já passar o valor dividido? Na verdade não sei se o problema realmente é este, é apenas uma suposição. Enfim, se alguém puder me ajudar, agradeço. 103UNICA-rps.xml 1212UNICA-rps.xml

Vlw, Italo! Agora está tudo ok! Obrigado e Deus te abençoe.

Como não sei ao certo de quais você precisa, estou mandando todos. Enviei, consultei(retornou que foi convertido) e tentei cancelar. Obrigado. NFSe.rar

Boa tarde! Estou migrando para o trunk2 e já consigo enviar e consultar RPS, mas ainda não consegui cancelar uma NFSe. Não consegui identificar o motivo. Estou cancelando assim: ACBrNFSe1.NotasFiscais.Clear; with ACBrNFSe1.NotasFiscais.Add do begin NFSe.Numero := FieldByName('NUMDOCUMENTO').AsString; NFSe.IdentificacaoRps.Numero := FieldByName('NUMERO_RPS').AsString; NFSe.IdentificacaoRps.Serie := FieldByName('SERIE_RPS').AsString; NFSe.IdentificacaoRps.Tipo := trRPS; NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj := _LojaCNPJ; NFSe.PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal:= LojaIM); NFSe.PrestadorServico.Endereco.CodigoMunicipio := _LojaCodCidade; NFSe.MotivoCancelamento := Codigo; end; ACBrNFSe1.WebServices.CancelaNFSe(Codigo); A forma que mostro acima, funciona no trunk1(veja xml 2007), porêm no trunk 2(veja xml 2008) não cancela. Alguma dica? Obrigado. 2008-ped-can.xml 2008-can.xml 2007-can.xml 2007-ped-can.xml