Empresa MEI pode emitir NFSe consumindo o WebService padrão nacional

[Destak]

Boa noite pessoal,

1. Empresa MEI pode emitir NFSe consumindo o WebService padrão nacional ou obrigatoriamente tem que emitir pelo portal do governo federal?

2. Se pode emitir consumindo o WebService como configuro isso no componente visto que por padrão ele vai tentar usar o provedor configurado para o determinado município no arquivo ACBrNFSeXServicos.ini?

[Renato Rubinho]

Segue tópico com maiores informações.

 

[Destak]

Eu ja havia lido esse topico, então vamos la, veja o que esta ocorrendo, eu configuro o componente assim:

ACBrNFSeX1.Configuracoes.Geral.LayoutNFSe := lnfsPadraoNacionalv1;
ACBrNFSeX1.Configuracoes.Geral.Provedor := proPadraoNacional;

e uso o metodo ACBrNFSeX1.Emitir(IntToStr(NumLote),meUnitario,False) para envio então recebo a seguinte msg de erro:

------------------------------
Versão OpenSSL
------------------------------
Requisição
Ambiente : 1
Cidade   : Nova Iguacu/RJ
Provedor : ISSDSF Versão: 1.00
Data/Hora: 13/07/2024 21:22:13
 
Método Executado: Gerar NFSe
 
Parâmetros de Envio
Numero do Lote: 1
 
Parâmetros de Retorno
Data de Envio : 30/12/1899
Numero do Prot: 
Numero da Nota: 
Link          : 
Código Verif. : 
Sucesso       : False
 
Erro(s):
Código  : X001
Mensagem: Serviço não implementado pelo Provedor.
Correção: 
---------

Ou seja o componente esta tentando enviar para o provedor ISSDSF conforme consta no arquivo ACBrNFSeXServicos.ini e esta descrito na minha pergunta inicial, falta alguma configuração adicional?

Segue o XML do RPS em anexo.

3324073951050700012056000000000000001-rps.xml

[Italo Giurizzato Junior]

Bom dia @Destak,

Quando eu peço para estudar o programa exemplo, sou criticado.

Vocês perdem um tempo extremamente preciso tentando fazer do jeito que vocês sonham que deve ser.

Me diz uma coisa, de onde você tirou isso?

ACBrNFSeX1.Configuracoes.Geral.Provedor := proPadraoNacional;

Não existe nenhuma linha no programa exemplo que diz que você tem que configurar a propriedade Provedor.

Você vai achar diversas linhas no programa exemplo verificando o valor dessa propriedade, por exemplo:

  if ACBrNFSeX1.Configuracoes.Geral.Provedor = proPadraoNacional then
  begin
    pgcProvedores.Pages[0].TabVisible := False;
    pgcProvedores.Pages[1].TabVisible := True;
  end
  else
  begin
    pgcProvedores.Pages[0].TabVisible := True;
    pgcProvedores.Pages[1].TabVisible := False;
  end

No programa exemplo temos o seguinte na procedure ConfigurarComponente:

  // A propriedade CodigoMunicipio tem que ser a ultima a receber o seu valor
  // Pois ela se utiliza das demais configurações
  with ACBrNFSeX1.Configuracoes.Geral do
  begin
    LayoutNFSe := TLayoutNFSe(cbLayoutNFSe.ItemIndex);
    CodigoMunicipio := StrToIntDef(edtCodCidade.Text, -1);
  end;

Temos um comentário dizendo que a propriedade CodigoMunicipio tem que ser a ultima a ser configurada.

Esse foi o seu erro, configurar a propriedade LayoutNFSe depois de configurar CodigoMunicipio, sendo que é o inverso como é mostrado no programa exemplo.

Por fim, apesar do componente possuir as propriedades: Versao e Provedor, elas não devem ser configuradas, pois o componente as configura automaticamente quando configuramos a propriedade CodigoMunicipio.

Volto a frisar, a propriedade de configuração CodigoMunicipio tem que ser a ultima a ser configurada dentro da procedure de configuração.

[Destak]

Boa tarde @Italo Giurizzato Junior

1 hora atrás, Italo Giurizzato Junior disse:

Quando eu peço para estudar o programa exemplo, sou criticado.

Eu o Andre, nunca critiquei quando me dizem para estudar os fontes o Daniel mesmo sempre fala "use  a força" leia os fontes  e eu concordo plenamente, o que ocorre é que nem sempre compreendemos 100% do material feito por um terceiro, ainda mais se for um conteúdo muito grande e ou muito especifico, lembre-se é impossivel ser especialista em todos os temas/componentes e é até por isso que ai no projeto existe uma pessoa responsável para temas/componentes específicos, como vc para  DFe certo.

1 hora atrás, Italo Giurizzato Junior disse:

Me diz uma coisa, de onde você tirou isso?

ACBrNFSeX1.Configuracoes.Geral.Provedor := proPadraoNacional;

Eu tirei isso de dedução propria baseado no topico ja mencionado aqui anteriomente, todos programadores trabalham com tentativas e erros, essa foi uma tentativa comum, como muitas vezes tento e da certo, e quando isso ocorre não preciso acionar o suporte aqui (O que sempre pretendo).

 

1 hora atrás, Italo Giurizzato Junior disse:

Vocês perdem um tempo extremamente preciso tentando fazer do jeito que vocês sonham que deve ser.

Ja conversamos algumas vezes pessoalmente nos eventos o qual estive em todos eles e voce me pareceu um cara educado mas com essa infeliz frase parece que voce esta perdendo essa característica, não é correto usar esses termos comigo e nem com nenhum integrante da comunidade, afinal de contas o proposito do forum e do suporte não é ajudar, esclarecer etc..., se fosse para sabermos tudo não seria necessário forum e ou suporte, se voce usa no seu circulo pessoal esses termos é uma questao particular sua, mas aqui acredito que não seja o adequado.

1 hora atrás, Italo Giurizzato Junior disse:

Esse foi o seu erro, configurar a propriedade LayoutNFSe depois de configurar CodigoMunicipio, sendo que é o inverso como é mostrado no programa exemplo.

Otimo vou analisar o programa exemplo mais a fundo e retorno aqui com o resultado, por enquanto obrigado.

[Italo Giurizzato Junior]

Bom dia André,

Lhe peço mil desculpas por ter sido muito rude com você.

Sei que algumas coisas parem obvias para uns, mas não é para outros.

Caso nos venhamos a nos encontrar no Dia do ACBr quero lhe pedir desculpas pessoalmente.

Por fim, configure primeiro o LayoutNFSe e depois o CodigoMunicipio que vai funcionar.

[Destak]

Boa tarde @Italo Giurizzato Junior

Tranquilo meu amigo esta tudo certo, se Deus quiser vamos sim nos encontrar no dia do evento novamente, meu ingresso ja foi comprado esta garantido.

Fiz os testes conforme sua instrução e deu tudo certo NFSe emitida com sucesso obrigado, somente a parte de cancelamento que não pude testar tudo, vi que agora é por evento o cancelamento, vou trabalhar nisso depois e havendo alguma duvida abro outro topico, obrigado mais uma vez e pode fechar o topico.

[Italo Giurizzato Junior]

Boa tarde @Destak,

Maravilha que deu certo o envio.

O cancelamento da NFS-e Padrão Nacional é um evento e funciona de forma semelhante da NF-e.

  InfEvento := TInfEvento.Create;

  try
    with InfEvento.pedRegEvento do
    begin
      tpAmb := ACBrNFSeX1.Configuracoes.WebServices.AmbienteCodigo;
      verAplic := 'ACBrNFSeX-1.0';
      dhEvento := Now;
      chNFSe := xChaveNFSe;
      nPedRegEvento := 1;
      tpEvento := ACBrNFSeXConversao.teCancelamento;
      cMotivo := StrToIntDef(xCodigo, 1);
      xMotivo := xMotivoCanc;
    end;

    ACBrNFSeX1.EnviarEvento(InfEvento);
  finally
    InfEvento.Free;
  end;

Vou fechar esse tópico.

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.