Italo Giurizzato Junior

Boa tarde Anderson, É preciso verificar se o método Enviar esta funcionado. Se sim, checar o que foi feito para o Enviar e fazer algo semelhante para o EnviarSincrono. Não foi eu que implementou essas alterações, pode ser que alguma coisa tenha ficado para trás.

Bom dia Matheus, Já enviei para o repositório.

Boa tarde Djean, Ainda não conseguimos resolver esse problema.

Boa tarde, O que temos são componentes para quem desenvolve em Objeto Pascal, ou seja, quem trabalha com Delphi ou Lazarus. Aos poucos (uma vez que temos por volta de 100 componentes) estamos desenvolvendo as DDLs, hoje temos o ACBrLibNFe que é uma DLL para a emissão de NF-e, temos também para CT-e, MDF-e, e outros para o varejo. Já esta em nossa lita de tarefas o desenvolvimento da ACBrLibNFSe, uma DLL para a emissão de NFS-e. Não temos prazo do seu lançamento.

Bom dia, Lhe convido a atualizar os fontes e instalar via pacote o novo componente para emissão de NFS-e: ACBrNFSeX. Já se encontra no Trunk2 os fontes do novo componente, bem como os pacotes de instalação para o Delphi e Lazarus e o programa exemplo para o Delphi, até o final deste mês teremos também o programa exemplo para o Lazarus e uma nova versão do ACBrInstall que contempla o novo componente. Não tenho como lhe informar se com o novo componente os problemas que você esta enfrentando já estão resolvidos, mas estamos focados no novo componente.

Bom dia ALA, Nenhum serviço do ambiente de homologação esta funcionando? Acabei de fazer um teste usando o programa exemplo, consultando o status de serviço e esta normal, veja: Inicio TMDFeStatusServico Versão Layout: 3.00 Ambiente: 2 Versão Aplicativo: RS20210422122736 Status Código: 107 Status Descrição: Servico em Operacao UF: SP Recebimento: 31/05/2021 11:25:22 Tempo Médio: 1 Retorno: Observação:

Bom dia Jacinto, Por favor faça um teste. Abra a unit ACBrCTe, a linha 315 esta assim: if ( (TipoEmissao in [teSVCSP]) and (CUF in [31,41,50,51]) ) then altere para: if ( (TipoEmissao in [teSVCSP]) and (CUF in [41,50,51]) ) then Remova o código IBGE da UF de MG que é 31 da lista. Reinstale a suíte ACBr, compile a sua aplicação e faça um novo teste.

Bom dia, O componente ACBrNFSe passou por um Refactoring e foi disponibilizado um novo componente chamado ACBrNFSeX. Testei todos os provedores, isso inclui o BHISS. Todos os testes foi usando a seguinte configuração: e SSLType = TL_TLSv1_2 Certificado digital A1. Com essa configuração vai funcionar mesmo depois deles desativarem o SSLv3. Existe uma tendência muito grande dos provedores migrarem para o TLS v 1.2

Boa tarde Alessandro, Já esta no repositório.

Boa tarde rlind, Maravilha, agora é só regaçar as mangas e começar os testes. Se puder depois criar um tópico relatando os problemas bem como o sucesso ficaremos gratos. Não esqueça de informar para qual ou quais cidades realizou os testes e os resultados. Em breve estarei escrevendo um tópico de como fazer para implementar um novo provedor no novo componente.

John, Primeiro, o certificado tem que ser A1 e o formato do arquivo ser PFX e ser exportável. Segundo, você informa o path+nome do PFX na propriedade de configuração: Configuracoes.Certificados.ArquivoPFX e a senha em: Configuracoes.Certificados.Senha Não informe o numero de Serie do certificado. Espero ter ajudado.

Bom dia John, Se o certificado é A1, porque você não configura o componente para ler o seu conteúdo da pasta onde ele esta salvo? Neste caso você informa o caminho do arquivo PFX e a senha do mesmo, das configurações do ACBr.

Bom dia Matheus, Muito obrigado pela colaboração, já inclui na minha lista de tarefas.

Bom dia, Estamos verificado e logo vamos enviar para o repositório as units que foram alteradas. Mas você pode fazer um teste removendo a palavra abstract na definição das classes.

Bom dia Djean, Estou verificando com a Equipe ACBr qual é a melhor solução para esse problema. Bom dia Dercide, Na sua aplicação mais precisamente na rotina que alimenta o componente você tem algo semelhante a rotina abaixo: with Servico.ItemServico.New do begin // fintelISS, Agili, EL, Equiplano // Para o provedor Elotech o tamanho máximo é de 20 caracteres Descricao := 'Desc. do Serv. 1'; // fintelISS ItemListaServico := '09.01'; // infisc, EL CodServ := '12345'; // Infisc, EL codLCServ := '123'; ValorDeducoes := 0; ValorIss := 0; Aliquota := 4; BaseCalculo := 100; DescontoIncondicionado := 0; DescontoCondicionado := 0; //EloTech Tributavel := snNao; // SimplISS, EloTech Quantidade := 10; ValorUnitario := 5; ValorTotal := Quantidade * ValorUnitario; end;

Bom dia Bruno. Se tratando de NFS-e sempre é enviado o XML do Rps e não o XML da NFS-e. O XML da NFS-e é gerado pelo provedor que no seu caso é o Ginfes. O provedor Ginfes ele segue a versão 1 do layout da ABRASF. Nesse layout temos o serviço que recepciona um lote com até 50 Rps. O componente ACBrNFSe gera e envia esse lote de Rps para o webservice do provedor Ginfes, que por sua vez analisa todos os dados e retorna um lote com até 50 NFS-e. Lembrando que o fluxo de um provedor que segue a versão 1 do layout da ABRASF é: 1. Gerar e enviar o lote de Rps; 2. Consultar a Situação do Lote; 3. Se a situação for 3 (processado com falhas) ou 4 (processado com sucesso) devemos Consultar o Lote; Se a situação for 3 o retorno dessa consulta vai constar a lista de rejeições, mas se a situação for 4 teremos como retorno o XML das NFS-e.

Bom dia Alessandro, Muito obrigado pela colaboração, já inclui na minha lista de tarefas.

Bom dia a todos, Já enviei para o repositório com algumas correções para não gerar efeito colateral em outros provedores. Fiz alterações no schema também. Não inclui na configuração a propriedade Token, favor utilizar a propriedade WebChaveAcesso. Cada provedor tem as suas loucuras e se formos criando uma propriedade de configuração por conta deles daqui a pouco teremos uma centena de propriedades. Sendo assim optei por utilizar uma que já existia, ou seja, WebChaveAcesso.

Bom dia Tiago, Já esta no repositório.

Será executada, em 30/05/2021, a partir das 7h da manhã, com duração de até 1 hora, parada programada para manutenção emergencial do ambiente de autorização NFC-e da SEFAZ/RS. Neste dia, as NFC-e autorizadas na SEFAZ/RS deverão ser emitidas na modalidade de contingência off-line.

Elisângela, Favor atualizar os fontes e faça novos testes.

Boa tarde Elisângela, Na unit pnfsNFSeR consta a leitura dos serviços, veja: //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.New do begin Descricao := Leitor.rCampo(tcStr, 'Descricao'); Quantidade := Leitor.rCampo(tcDe2, 'Quantidade'); ValorUnitario := Leitor.rCampo(tcDe2, 'ValorUnitario'); ValorTotal := Leitor.rCampo(tcDe2, 'ValorTotal'); if ValorTotal = 0 then ValorTotal := Quantidade * ValorUnitario; end; inc(i); end; end; Não entendi muito bem o que você esta fazendo. Você gera o RPS, depois o carrega para poder enviar é isso?

Boa tarde Antonio, Foi enviado para o repositório alterações no arquivo INI do provedor VersaTecnologia visando atender as duas cidades que você esta realizando testes. Favor reportar se deu certo.

Boa tarde, Já enviei para o repositório o novo schema do provedor iiBrasil.