Roger Rodrigues

Bom dia. O link correto da produção é: https://nfem.joinville.sc.gov.br/nfse_integracao/Services

Boa tarde. Isso está em uma nota do manual do banco do Brasil.

Bom dia. Recentemente tive que implementar no CNAB 400 do Banco do Brasil a opção para geração da remessa indicando Sacador/Avalista. Segue em anexo implementação para avaliação. ACBrBancoBrasil.pas

Bom dia Paulo. Você conseguiu a homologação do banco? Poderia passar os fontes? Obrigado.

Bom dia Antonio. Conforme mencionei nos posts acima, todas as alterações estão funcionando para os fontes do Trunk e não do Trunk2. Por isso todo processo tem que ser feito manualmente. Você usou os fontes do Trunk?

Leonardo. Nos fontes, todos locais que foram alterados, possuem um comentário {add-SP}. Sugiro que você baixe o Trunk e atualize os fontes com as alterações de SP. Pelo que me recordo, nunca tive esse tipo de erro no envio. Parece que algum objeto não foi criado, sugiro que você faça depuração do processo para encontrar o erro.

Boa tarde Leonardo. Os fontes funcionam sim para emissão de NFSe para SP, inclusive já tenho clientes emitindo notas. Porém, como os fontes não foram adicionados ao ACBr, todos estão no formato dos fontes do Trunk antigo. Para o Trunk2 será necessário adequações de acordo com as novas implementações do ACBr.

Boa tarde Daniel. Só para lembrar, os métodos de consulta não funcionam para homologação. A única coisa que funciona em homologação é o envio do lote. Se você está testando em produção, tente chamar a consulta do lote da seguinte maneira: ACBrNFSe.ConsultarLoteRps(Protocolo, Protocolo, Cnpj, Inscmun); Roger Rodrigues

Felipe. As alterações em questão implementam apenas a NFS-e. 1-O tomador de serviços é a pessoa que irá receber os serviços (consumidor final). 2-Pelas minhas pesquisas, o NFTS-e é mais um mecanismo (burocracia) do governo para impedir a sonegação de impostos. O NFS-e será sempre emitido pelo prestador do serviço. Já o NFTS-e será emitido pelo tomador do serviço (consumidor final). Porém, a emissão de NFTS-e se aplica somente a condomínios ou pessoas jurídicas que tomaram serviço de algum prestador de fora da cidade. Roger Rodrigues

Boa tarde Felipe. O arquivo Fontes_SP.zip a 4 posts acima contém todos os arquivos. Roger Rodrigues

Claudemir. Não entendi seu questionamento. O que foi implementado é a tratativa para a prefeitura de São Paulo. Pelo que tenho conhecimento, não existem outras prefeituras que utilizam o layout de São Paulo. Roger Rodrigues

Correto. Irei modificar a maneira como meu sistema trata este retorno. Desculpe pela falta de atenção. Roger Rodrigues

Boa tarde Italo. Desculpe, mas acho que acabei me confundindo. Em alguns casos a consulta não chega a ser feita e uma mensagem muito semelhante é retornada pelo WebService de envio de lote RPS. E eu retorno estes erros para o meu sistema como se fossem de uma consulta. Por ser uma estrutura semelhante, podemos manter a alteração ou devo achar outra maneira de tratar o retorno no meu sistema? Roger Rodrigues 1041-rec.xml

Bom dia. Implementando a NFSe de Duque de Caxias notei que ao realizar a consulta de situação do lote para o provedor Tiplan, o componente não está carregando quais os erros ou alertas para o lote. Portanto, alterei o fonte pnfsConsSitLoteRpsResposta.pas nas linhas 190 e 191 para carregar os erros e alertas contidos na tag "EnviarLoteRpsResposta". (leitor.rExtrai(1, 'ConsultarSituacaoLoteRpsResult') <> '') or (leitor.rExtrai(1, 'EnviarLoteRpsResposta') <> '') then Segue o fonte em anexo. Roger Rodrigues pnfsConsSitLoteRpsResposta.pas

Bom dia. O provedor SimplISS permite informar vários itens de serviço no RPS. E ao implementar a NFSe de Piracicaba, notei que o método de leitura de RPS não estava contemplando essa característica. Portanto alterei o fonte pnfsNFSeR.pas nas linhas 123 e 206 a 219. Adicionei a varíavel "i" e o seguinte trecho para carregar os serviços do RPS: item, i: Integer; //Provedor SimplISS permite varios itens servico if FProvedor = proSimplISS then begin i := 1; while (Leitor.rExtrai(4, 'ItensServico', 'ItensServico', i) <> '') do begin with NFSe.Servico.ItemServico.Add do begin Descricao := Leitor.rCampo(tcStr, 'Descricao'); Quantidade := Leitor.rCampo(tcInt, 'Quantidade'); ValorUnitario := Leitor.rCampo(tcDe2, 'ValorUnitario'); end; i := i + 1; end; end; Segue o fonte em anexo. Roger Rodrigues pnfsNFSeR.pas