netstart

Bom dia! Precisei fazer 2 ajustes para atender um cliente, estou anexando a Unit para analise: 1 - Quando a versão LayoutVersaoArquivo = 003 e possui mensagens com avalista no boleto, gerava duplicidade no registro Tipo 2 2 - Precisei fazer um override no método MontaInstrucoesCNAB400 para esse banco 274 para não afetar outros, esse método remove para primeira linha das mensagens e precisava da mensagem igual foi impresso no boleto no registro tipo 2 ACBrBancoBradescoMoneyPlus.pas

Boa tarde! Estou usando sim, acredito que a rejeição seja por conta do layout 003, não informei no componente, pode fechar o tópico, caso não de certo eu abro outro tópico, grato pela atenção.

Boa tarde! Segue em anexo novo layout Layout_CNAB_400_11.2.pdfversão 11.2 – 11/2024 para análise.

Bom dia! @Italo Giurizzato Junior deu certo, fiz as atualizações e configurei a propriedade como citado acima: WebServices.QuebradeLinha := sLineBreak;

Boa tarde! @Italo Giurizzato Junior Precisei fazer um ajuste nas units do AssessorPublico.Provider e AssessorPublico.GravarXml para conseguir fazer interpretar as quebras de linha na TAG <OBSERVACAO>. Para que o resultado final seja este abaixo: AssessorPublico.GravarXml.pas AssessorPublico.Provider.pas

Caso queira analisar os arquivos, estou anexando, se deixar o componente como está e seguir as instruções deles não passa, ai tem que entrar em contato com o pessoal da Fiorilli, mas como já está funcionando em produção para o municipio que precisava vou deixar para quando tiver mais tempo rsrs... 25-lista-nfse-sinc-Aceito.zip 25-lista-nfse-sinc-soap-Rejeitado.zip

Não testei RpsGerarNFSe, RpsSubstituirNFSe, SubstituirNFSe, não tenho esses recursos implementados no sistema ainda...

Boa tarde! Como eles me enviaram os arquivos no e-mail como versão 2.01, segui o padrão e criei as pastas de schemas na mesma versão citada por eles, não comparei com a versão 2.0 pois achei que tivesse alguma diferença, senão qual o motivo de criar uma nova versão. Também fui motivado pelo fato de homologar usando o município de Balsomo e lá estar informando 2.0 e como estava tendo problemas, enviei para eles os arquivos SOAP e primeira coisa que me falaram, foi que estava errado a versão, ai acabei deixando no código isso. Mas se não precisar removo sem problemas, mesmo achando que deveria estar separado para seguir o padrão, como estava com pressa não mexi, pois eu ia até separar as classes: TACBrNFSeProviderFiorilli200 = class (TACBrNFSeProviderABRASFv2) TACBrNFSeProviderFiorilli201 = class (TACBrNFSeProviderABRASFv201) ...

Boa tarde! Estou anexando os arquivos que precisei ajustar para homologar a prefeitura de Coroados/SP, testado em ambiente de produção e homologação. Precisei mexer no método acima porque está dando erro ao consultarRPS. ACBrNFSeXServicos.ini Fiorilli.Provider.pas Schemas-Fiorilli.zip

Boa tarde! Pessoal analisar ao correção no cancelamento, foi inserido um copy na chave para popular o número da NFSe na hora de enviar o cancelamento, mas não são todos os provedores que contém o número da nota na composição da chave, um exemplo é o SmarAPD "PYHD-ENJC". Eu coloquei um "AND" para corrigir o erro na minha aplicação, porém acredito que esse código deveria ser removido do método, pois se eu já informo o número da nota não poderia estar sendo alterado no dentro do método. " ACBrNFSeX.pas

Bom dia @Italo Giurizzato Junior, Pode fechar o tópico e dar com resolvido, obrigado pela atenção!

Boa tarde @Italo Giurizzato Junior, Atualizei novamente o componente e tive que fazer 2 ajustes: - Passar na configuração para assinar ao cancelar - Remover o trecho de código do método ProcessarMensagemErros, que já havíamos comentado antes. SmarAPD.Provider.pas

Italo, O problema da mascara está no trecho de código abaixo, o property foi apenas porque eu não sabia se poderia tratar diretamente no método sem afetar os demais: procedure TACBrNFSeXProvider.SalvarXmlNfse(aNota: NotaFiscal); var aPath, NomeArq: string; aConfig: TConfiguracoesNFSe; begin aNota.Confirmada := True; aNota.NomeArq := ''; if FAOwner.Configuracoes.Arquivos.Salvar then begin aConfig := TConfiguracoesNFSe(FAOwner.Configuracoes); aPath := aConfig.Arquivos.GetPathNFSe; if aConfig.Arquivos.NomeLongoNFSe then NomeArq := GerarNomeNFSe(aConfig.WebServices.UFCodigo, aNota.NFSe.DataEmissao, aNota.NFSe.Prestador.IdentificacaoPrestador.Cnpj, StrToInt64Def(aNota.NFSe.Numero, 0),aConfig.Arquivos.ApenasNumerosCNPJ) + '-nfse.xml' else NomeArq := aNota.NFSe.Numero + aNota.NFSe.IdentificacaoRps.Serie + '-nfse.xml'; aNota.NomeArq := NomeArq; TACBrNFSeX(FAOwner).Gravar(NomeArq, aNota.XML, aPath); end; end;

Bom dia Italo, Os fontes foram atualizados no mesmo dia que enviei as units para tópico. Com relação ao bloco comentado é porque não faz sentido aquele código, sempre estava incluído erro mesmo não existindo erros no xml de retorno. Sobre a propriedade, inserimos porque não encontramos nenhuma propriedade que permitisse remover a mascara de CNPJ ao salvar o arquivo xml da nota, nesse novo componente mudou o padrão que estava no anterior, fizemos isso para não afetar os demais:

Boa tarde @Italo Giurizzato Junior Tivemos que dar uma parada na homologação desse provedor com o NFSeX, mas agora já finalizamos, tivemos que fazer alguns ajustes, se puder analisar para colocar em produção e encerrarmos esse tópico agradeço, estou anexando as units para analise. SmarAPD.zip