Italo Giurizzato Junior

Boa tarde @Davi De Sousa Calixto, Atualize todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

Bom dia @Danilo Martins Xavier, Os dados do prestador estarem retornando null, pode ser problema no cadastro do prestador junto ao provedor que esta faltando essas informações ou o provedor retorna dessa forma mesma pelo simples fato de ser apenas um teste. E acredito que o valor da base de calculo e valor do iss estarem com esses valores, chego a mesma conclusão, por ser teste retorna esses valores. Mas você entrar em contato com o provedor e questionar sobre esses retornos.

@arielguareschi, Gostaria de entender o motivo dessa alteração na unit ACBrDebitoAutomatico: function TACBrDebitoAutomatico.GravarTxtRemessa(const ANomeArquivo: String): Boolean; begin if Self.Arquivos.Count <=0 then raise EACBrDebitoAutomaticoException.Create('ERRO: Nenhum arquivo adicionado.'); SetProvider; // <== linha incluida if not Assigned(FProvider) then raise EACBrDebitoAutomaticoException.Create(ERR_SEM_BANCO); FProvider.Gerar(ANomeArquivo); Result := True; end; e na unit ACBrDebitoAutomaticoArquivo: function TRegistro.Ler(const aArquivoTXT: String): boolean; var FProvider: IACBrDebitoAutomaticoProvider; Ok: Boolean; begin // Incluida a condição abaixo if (TACBrDebitoAutomatico(FACBrDebitoAutomatico).Configuracoes.Geral.Banco = debNenhum) then begin TACBrDebitoAutomatico(FACBrDebitoAutomatico).Configuracoes.Geral.Banco := StrToBanco(Ok, Copy(aArquivoTXT, 1, 3)); end; FProvider := TACBrDebitoAutomatico(FACBrDebitoAutomatico).Provider; if not Assigned(FProvider) then raise EACBrDebitoAutomaticoException.Create(ERR_SEM_BANCO); Result := FProvider.LerTxt(aArquivoTXT, FDebitoAutomatico); end;

Olá Pessoal, Alguns prestadores de serviço da cidade de Campinas/SP estão recebendo um e-mail com informações sobre a implementação de um novo WebService para emissão de NFS-e. O WebService atual possui um layout próprio e o novo vai usar a versão 2.03 do layout da ABRASF. Recentemente criamos novas units para atender Campinas, pois a mesma tinha comprado o sistema do provedor ISSDSF, dessa forma o provedor deixou de atender os chamados dos desenvolvedores. Criamos então o provedor ISSCampinas. Agora com essa noticia do novo WebService as units referente ao provedor ISSCampinas foram alteradas para atender o novo WebService. Já esta tudo no SVN. Para poder realizar testes no ambiente de homologação do novo WebService se faz necessário fazer a alteração abaixo no arquivo ACBrNFSeXServicos.ini e seguir as orientação no inicio do referido arquivo. [3509502] ; Atualizado em 08/07/2024 Nome=Campinas UF=SP Provedor=ISSCampinas ;ProRecepcionar=https://issdigital.campinas.sp.gov.br/WsNFe2/LoteRps.jws ;ProNameSpace=http://proces.wsnfe2.dsfnet.com.br ;HomNameSpace=http://proces.wsnfe2.dsfnet.com.br Versao=2.03 ProRecepcionar= HomRecepcionar=https://homol-rps.ima.sp.gov.br/notafiscal-abrasfv203-ws/NotaFiscalSoap Não garanto que esta funcionando 100%, pois não tenho credenciais de um prestador de campinas para realizar os testes. Peço a colaboração de vocês para realizarem os testes e reportarem os resultados. Desde já muito obrigado pela compreensão e pelos testes.

Bom dia @daniel.afonso, Já esta no SVN as alterações necessárias para usar o novo webservice de Campinas/SP. Favor atualizar todos os fontes de todas as pastas. Antes de reinstalar faça a seguinte alteração no arquivo ACBrNFSeXServicos.ini: [3509502] ; Atualizado em 08/07/2024 Nome=Campinas UF=SP Provedor=ISSCampinas ;ProRecepcionar=https://issdigital.campinas.sp.gov.br/WsNFe2/LoteRps.jws ;ProNameSpace=http://proces.wsnfe2.dsfnet.com.br ;HomNameSpace=http://proces.wsnfe2.dsfnet.com.br Versao=2.03 ProRecepcionar= HomRecepcionar=https://homol-rps.ima.sp.gov.br/notafiscal-abrasfv203-ws/NotaFiscalSoap Depois siga com as orientações no inicio do arquivo. Não sei se vai funcionar de primeira, uma vez que eu não tenho credenciais de um prestador da cidade.

Bom dia @arielguareschi, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5778

Bom dia @Davi De Sousa Calixto, Respondendo a sua pergunta referente ao comentário do @Juliomar Marchetti, sobre os dados estarem zerados. Esse arquivo que você anexou não é o XML da NFS-e, e sim o XML de envio unitário do RPS. Abra ele com um navegador para você ver. A primeira tag <GerarNfseEnvio> é a tag de envio do RPS de modo unitário, o "GerarNfse" indica que se o RPS for processado com sucesso será gerada a NFS-e. A segunda tag <Rps> indica que a partir dela inicia os dados do RPS. Se esse RPS foi enviado e processado com sucesso, na pasta Notas você vai encontrar o XML (*-nfse.xml) que é o XML propriamente dito da NFS-e. É este o XML que deve ser carregado para poder imprimir o DANFSE.

Bom dia @IvoSilva, Você chegou a comparar a configuração do componente usada na maquina de desenvolvimento com a maquina que efetivamente vai usar a aplicação?

Boa tarde @Mega Online, Experimenta executar o comando: CTE.SetVersaoDF("4.00") antes de executar: CTe.EnviarCTe("C:\ACBrMonitorPLUS\Logs\35240749577968000174570010000008111000022396-cte.xml", 1, 1, 1, "", 0) Outra coisa altere a execução do comando de envio confirme exemplo acima. CTE.EnviarCTe Enviar XML do CTE CTE.EnviarCTe(nXMLCTe, [nLote], [nAssinar],[nImprimi],[nImpressora], [bAssincrono] ) Parâmetros: nXMLCTe - Caminho do XML do CT-e nLote - Número do Lote (opcional) nAssinar - Assinar o XML (opcional - informe 0 para não assinar) nImprimi - Imprimir CT-e (opcional - informe 1 para imprimir) nImpressora - Nome da Impressora (opcional) bAssincrono - (Opcional) Por Default o envio é sempre Assíncrono, Informe 0 para utilizar Envio Síncrono.

@IOB Tecnologia, Dica, não precisa configurar a propriedade Provedor, pois esta é configurada automaticamente quando configuramos o CodigoMunicipio. Experimenta configurar a propriedade IniServicos com o path+"ACBrNFSeXServicos.ini" antes de configurar o CodigoMunicipio. ACBrNFSeX.Configuracoes.Arquivos.IniServicos := 'C:\Aplicacao\ACBrNFSeXServicos.ini'; (por exemplo)

Boa tarde @IOB Tecnologia, No inicio do arquivo ACBrNFSeXServicos.ini existe uma orientação do que deve ser feito ao efetuar alteração no arquivo, veja. ; ##################################################################### ; O que fazer após a alteração deste arquivo? ; ; Resposta: ; Após a alteração salve este arquivo, execute o Compila_RES que se encontra na mesma pasta. ; Reinstale o ACBr, abra a aplicação e compile ela com a opção Build. ; Por fim realize os testes de preferencia com o programa exemplo do componente ACBrNFSeX. ; ; Opcionalmente você pode apenas fazer o seguinte (apenas para testes): ; Faça uma cópia deste arquivo para dentro da pasta que tem o EXE do programa exemplo ou ; da sua aplicação. ; Altere a cópia. ; Execute o programa exemplo ou a sua aplicação e faça os testes. ; ; Estando tudo OK, crie um tópico no fórum com a sua alteração para que possamos validar e ; caso esteja tudo correto enviaremos para o SVN. ; No fórum não precisa anexar este arquivo, apenas anexe a sua alteração. Qual foi o procedimento que você fez?

Bruno, Já esta no SVN.

Bom dia @Centrodata Sistemas, Já esta no SVN a devida correção.

Bom dia Bruno, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5772

Bom dia @daniel.afonso, O componente ACBrNFSeX vai sofrer alterações para contemplar esse novo webservice que segue a versão 2.03 do layout da ABRASF. Desde já muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5771

Bom dia @ademar-datalan, Com os fontes atualizados ocorre o mesmo problema usando o programa exemplo? O XML da nota é atualizado, ou seja, ele fica com o protocolo de autorização?

Bom dia @Vinicius Pereira, Você tem o manual do banco que diz que se não tem o Segmento O, mas tem o Segmento N2 a versão é 012?

Tópico fechado por falta de retorno do usuário

Bom dia @Centrodata Sistemas, A procedure foi escrita com base no manual que consta como 53. Não podemos confiar 100% nos manuais. Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5765

Bom dia @Arnaldo Cruz, Você não precisa fazer nada disso. Basta configurar a propriedade Salvar para que o componente salve automaticamente o XML (*-ProcInutNFe.xml) para você. Configuracoes.Arquivos.Salvar := True; Com relação ao caminho: Configuracoes.Arquivos.PathInu := 'C:\InutilizacaoNFCe\';

Bom dia @Danilo Martins Xavier, Complementado o que o @Juliomar Marchetti já lhe passou. No manual da ABRASF (layout seguido pelo provedor) não prevê uma lista de itens de serviço. Via site tudo é possível, mas via webservice se faz necessário seguir os schemas da versão do layout utilizado pelo provedor. Mas existe um macete para informar mais de um item mesmo que não esteja previsto. Leia atentamente o tópico abaixo.

Bom dia @IOB Tecnologia, Toda vez que o arquivo ACBrNFSeXServicos.ini sofre uma alteração (troca de provedor, troca de URL, uma cidade que não tinha um provedor vinculado e passou a ter, entre outras alterações) eu aconselho que o arquivo INI seja compilado e o ACBr reinstalado e a aplicação em Delphi ou Lazarus seja compilada novamente e no caso da DLL idem. Mas você pode alterar o arquivo INI e copia-lo para a pasta que esta o EXE da aplicação, neste caso não precisa realizar todo o processo mencionado acima. No inicio do arquivo INI tem uma explicação sobre o que fazer quando alteramos ele.

Bom dia @Arnaldo Cruz, Mas esse XML que você anexou só contem o retorno do pedido de inutilização. Quando inutilizamos um numero ou faixa de números são gerados 3 XML. O pedido de inutilização: *-ped-inu.xml O retorno: *-inu.xml E o processamento da inutilização: *-ProcInutNFe.xml Este ultimo é composto pelo pedido mais o retorno. Esse XML que você anexou é simplesmente o retorno mas com o nome do XML de processamento. O XML de processamento traz em seu nome o ID do pedido de inutilização e não o numero do protocolo. Esse XML foi gerado por outra aplicação e você esta tentando carregar ele para poder imprimir?

Boa tarde @IOB Tecnologia, No componente ACBrNFSeX nós usamos a unit ACBrJson para realizar tanto a escrita quanto a leitura de um Json. E ela funciona tanto para o Delphi quanto para o Lazarus. A titulo de estudo veja as units Bauhaus.LerJson e Bauraus.GravarJson

Boa tarde @Diego Reckziegel, Já esta no SVN.