[NFS-e Ponta Grossa/PR - fintelISS - Trunk2]

  Ola Akai, saberia me dizer se o trunk2 está funcionando com a  NFSe de Belo horizonte?

   Grato.

[Tarja NFE Cancelada Fortes Report]

Boa tarde. Eu cheguei a postar essa duvida num tópico que já estava aberta por outro usuário como NFe Cancelada, porém acho que não tinha muito  a ver com a dúvida que ele tinha postado, por isso resolvi abrir um novo topico.

Ao atualizar o componente para o trunk2, já sabendo que o danfe para rave estava em desuso, optei então por usar o Fortes Report para meu DANFE. quando estava fazendo testes notei que a tarja de NFe Cancelada está vindo sobre o código de barras, sendo que o do Rave imprimia a tarja no meio da página. Juliomar Marcheetti me orientou a mudar a tarja no componente.

Então procurei e encontrei o arquivo ACBrNFeDANFeRLRetrato.pas que está no caminho ...\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes

Encontrei o componente responsável por mostrar a mensagem de NF-e Cancelada, o componente é o rllXmotivo, eu o coloquei mais centralizado na página, salvei. Logo após mandei reinstalar o acbr novamente pelo ACBrInstall_Trunk2.exe, parece que não fez efeito, pois a mensagem de NF-e Cancelada continua aparecendo junto com o codigo de barras do protocolo.

   Alguem poderia me dar uma dica me orientando o que eu posso estar fazendo de errado?

  Grato.

[Duvida NFS-e Trunk2]

  Boa noite. Alguma previsão para ser implantado o sistema de emissão de NFSe para Belo horizonte no Trunk2?

  Grato.

[NF-e cancelada]

Boa tarde. Eu consegui encontrar o arquivo, pelo menos acho que é esse mesmo. 

Abri o arquivo ACBrNFeDANFeRLRetrato.pas que está no caminho ...\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes

Encontrei o componente responsável por mostrar a mensagem de NF-e Cancelada, o componente é o rllXmotivo, eu o coloquei mais centralizado na página, salvei. Logo após mandei reinstalar o acbr novamente pelo ACBrInstall_Trunk2.exe, parece que não fez efeito, pois a mensagem de NF-e Cancelada continua aparecendo junto com o codigo de barras do protocolo.

   Alguem poderia me dar uma dica me orientando o que eu posso estar fazendo de errado?

  Grato.

[NF-e cancelada]

  Ola Juliomar,obrigado pela resposta. 

  Não domino muito bem essa parte de alterar um componente, eu teria que alterar a classe ACBrNFeDANFeRLClass.pas?

  Se sim, em qual linha eu altero a posição dele?

  Obrigado.

[NF-e cancelada]

   Boa tarde a todos. Estou com uma dúvida em Impressão da NFe cancelada e gostaria da ajuda de vocês, achei melhor não abrir um novo tópico já que esse daqui está tratando do tema.

   Sempre usei o acbr com o DANFE em Rave, ao atualizar para a versão Trunk2, notei que não tinha mais o DANFE para Rave e preferi adotar a versão Fortes Report, quando uma nota era cancelada no Rave, se eu reimprimisse aparecia a tarja NFe cancelada no meio do Danfe.

   Agora com o Fortes Report está aparecendo no código de barras do protocolo, a pergunta é : Eu consigo mudar a posição dessa tarja? Se sim alguém poderia me dar uma dica ou  exemplo de como fazê-lo?

  Grato.

[Enviar email nfe - com email do hotmail]

  Juliomar, bom dia. Você ainda consegue enviar emails com hotmail usando a porta 587? Surgiu um cliente meu agora que precisa enviar com hotmail e não consigo, interessante se eu usar outros como yahoo e gmail funcionaram normalmente. Tentei também com a porta 25.

   Grato.

[Novo Numero De Série]

   Obrigado a todos pela atenção dada nesse tópico.

[Novo Numero De Série]

  Ufa. que bom que entendeu. srrs

  Mas legalmente, eu posso gerar uma nova série sem ter completado a numeração da série anterior? Você saberia me dizer isso ou teria que ser um contador mesmo para me informar melhor?

   Grato.

[Novo Numero De Série]

    Prezados Andre Ferreira e João Henrique, acho que deixei o tópico mais confuso né? rsrs

    Pode ser que eu não tenha explicado corretamente, vou tentar dar um exemplo mais prático pra ver se consigo explicar melhor.

    Supondo que meu cliente está emitindo a nota de numero 1000 da série 1, no momento da emissão recebo um retorno da SEFAZ/MG de lote em processamento, ficando assim sem saber como ficou essa nota 1000. Nesse momento eu ativaria uma outra série, pr exemplo a série 2, e enviar essa nota para a SEFAZ-VIRTUAL com a numeração 1 e assim por diante. 

   Depois de algum tempo meu sistema verificaria uma consulta para ver a situação da Nota 1000 da série 1 na SEFAZ/MG, se a mesma retornar como existente mostro uma mensagem ao usuário para ele ter ciência e fazer os tramites legais (cancelar, gerar NFe de devolução, etc), caso contrário o usuário poderá excluir essa numeração do meu sistema. Entendo que assim não haveria problemas para inutilizar notas que ficaram sem ser emitidas fora de sequência.

   Grato.

[Novo Numero De Série]

  Então, era por isso que eu queria gerar uma serie nova para somente para emitir para a SEFAZ-VIRTUAL, deu problema no estado ativo essa série nova e depois verifico se a que deu problema foi enviada ou não para o estado, se sim peço ao usuário para cancelar, se não excluo a nota para aproveitar o número nocamente sem me preocupar em inutilizar.

[Novo Numero De Série]

   Prezado Joao, obrigado pelo rápido retorno. Quanto a passar para o próximo número, isso para mim é tranquilo, a minha dúvida é quando acontecer de ter dado problema na SEFAZ, eu insiro um novo número e envio para o SCAN, quando a SEFAZ voltar ao normal vou consultar a NFe que deu problema e percebo que o número que enviei não foi gerado por eles, o que farei com essa nota? Terei que inutilizá-la?

   Grato.

[Novo Numero De Série]

  Pois é João, a minha preocupação é essa, supondo que você enviou uma NFe para a SEFAZ de São Paulo e por algum motivo não teve retorno, o que fazer nesse momento? Enviar com a numeração seguinte? Se for essa a opção, o que fazer quando a SEFAZ voltar ao normal e você descobrir que a Nota anterior não foi gravada nos servidores dela, o que fazer com essa nota? Ter que inutilizá-la? Se for essa a opção, a coisa vai ficar feia aqui em Minas, porque os servidores daqui vivem parando e acontecendo essa situação que descrevi.

   Quando mudamos de série, a numeração não fica pulando,  assim quando a SEFAZ para, vou para a série do SCAN e deixo a última nota da SEFAZ em aberto no meu sistema, depois de algum tempo meu sistema tenta recuperar a NFe na SEFAZ, se a mesma nao existir meu cliente a exclui e reemite outra na mesma numeração.

[Novo Numero De Série]

Mas e a opção de gerar com uma serie nova como foi a minha dúvida postada aqui? Toda vez que desse problema eu ativaria essa série nova, enviaria para a SEFAZ-VIRTUAL, deixaria a nota que deu problema na série anterior sem mexer nela e posteriormente quando a sefaz voltasse ao normal eu verificaria a situação dela na sefaz.

[Novo Numero De Série]

  Prezado Italo, eu até tinha entendido isso, só não descrevi na minha dúvida postada acima.

  Vou dar um outro exemplo para ficar melhor o entendimento, um exemplo até real do que esta acontecendo hoje aqui em Minas Gerais, os meus clientes tentaram enviar uma NFe para a secretaria de fazenda e há um retorno de mensagem de Lote em Processamento, aí está o problema, quando dá esse erro não há como eu saber se a mesma foi recepcionada e gerada na base de dados da SEFAZ, se eu gerar essa nota na SEFAZ-VIRTUAL e a mesma aceitar haverá duplicidade depois que ela enviar as notas para a SEFAZ do estado.

  Por isso pensei em deixar uma série só para enviar para a SEFAZ-VIRTUAL, não haveria o risco de duplicar a nota.

  Grato,

  Cesar.

[Novo Numero De Série]

  Boa noite a  todos

  Quanto a desativação do SCAN e a entrada de contingência tanto  de outros ambientes de contigencia tanto por SVC-AN (SEFAZ Virtual de Contingência do Ambiente Nacional) e SVC-RS (SEFAZ Virtual de Contingência do Rio Grande do Sul).

  Gostaria de saber se posso deixar em meus programas uma série dedicada somente a esses dois novos serviços de contingencias, como por exemplos série 2, inicializando a numeração da nota fiscal novamente à partir do 1.

   Para passar para uma nova série é necessário terminar a numeração da série anterior?

   Grato.

   Castro.

[Mensagem Substituição Nfse Bh.]

  Imagino que seja isso mesmo, infelizmente a documentação fornecida por eles deixa um pouco distorcido esse tipo de informação. 

  Obrigado Italo. 

  Paz e Sucessos!!!

[Mensagem Substituição Nfse Bh.]

   Italo, bom dia. Obrigado pela dica quanto à enviar um anexo, o farei da próxima vez.

   Consegui cancelar em Belo Horizonte, mas só passando a opção de código cancelamento = 2 (serviço não concluído), quando vou gerar uma NFSe, se eu gerar o grupo <RpsSubstituido> informando o Numero, Serie e Tipo ele me retorna a mensagem  "Belo Horizonte nao permite substituicao de rps".

   Será que belo horizonte não aceita passar esse grupo por programas de terceiros?

  Grato

[Mensagem Substituição Nfse Bh.]

  Prezado Italo. Desde já agradeço a atenção dada.

  Envio de NFSe é um recurso novo para mim e mesmo já usando o componente para NFe, vi que há alguns conceitos diferentes. O material disponibilizado pela prefeitura de BH não ajuda muito, pode ser que eu esteja fazendo algo errado. Para fazer testes, criei um botão novo que vem no exemplo do ACBR com as seguintes linhas para tentar substituir a NFSe, tem como você verificar se eu estou fazendo algo errado?

 

procedure TfrmDemo_ACBrNFSe.Button2Click(Sender: TObject);

var

 vAux, vNumLote, vNumSubs : String;

 ValorISS: Double;

begin

 if not(InputQuery('Gerar e Enviar Lote', 'Numero do RPS', vAux))

  then exit;

 

 if not(InputQuery('Gerar e Enviar Lote', 'Numero do Lote', vNumLote))

  then exit;

 

 if not(InputQuery('Numero a ser substituido', 'Nº Substituição', vNumSubs))

  then exit;

 

 ACBrNFSe1.NotasFiscais.Clear;

 

// GerarNFSe(vAux, True, vNumSubs);

 

 ACBrNFSe1.NotasFiscais.Clear;

 

 with ACBrNFSe1 do

  begin

   NotasFiscais.NumeroLote:='2';

   NotasFiscais.Transacao := True;

 

   with NotasFiscais.Add.NFSe do

    begin

     IdentificacaoRps.Numero := FormatFloat('#########0', StrToInt(vAux));

 

     IdentificacaoRps.Serie := 'UNICA';

 

     IdentificacaoRps.Tipo := trRPS;

 

     DataEmissao := Date;

 

     NaturezaOperacao := noTributacaoNoMunicipio;

 

     RegimeEspecialTributacao := retNenhum;

 

     // TnfseSimNao = ( snSim, snNao );

     OptanteSimplesNacional := snNao;

 

     // TnfseSimNao = ( snSim, snNao );

     IncentivadorCultural := snNao;

 

     Producao := snNao;

 

     // TnfseStatusRPS = ( srNormal, srCancelado );

     Status := srNormal;

 

     OutrasInformacoes := 'Pagamento a Vista';

 

     RpsSubstituido.Numero := FormatFloat('#########0', StrToFloat(vNumSubs));

     RpsSubstituido.Serie  := 'UNICA';

     // TnfseTipoRPS = ( trRPS, trNFConjugada, trCupom );

     RpsSubstituido.Tipo   := trRPS;

 

     Servico.Valores.ValorServicos          := 100;

     Servico.Valores.ValorDeducoes          := 0.00;

     Servico.Valores.ValorPis               := 0.00;

     Servico.Valores.ValorCofins            := 0.00;

     Servico.Valores.ValorInss              := 0.00;

     Servico.Valores.ValorIr                := 0.00;

     Servico.Valores.ValorCsll              := 0.00;

 

     Servico.Valores.IssRetido              := stNormal;

     Servico.Valores.ValorIssRetido         := 0.00;

 

     Servico.Valores.OutrasRetencoes        := 0.00;

     Servico.Valores.DescontoIncondicionado := 0.00;

     Servico.Valores.DescontoCondicionado   := 0.00;

 

     Servico.Valores.BaseCalculo := 100;

 

     Servico.Valores.Aliquota    := 3;

 

     ValorISS := Servico.Valores.BaseCalculo * Servico.Valores.Aliquota;

 

 

     Servico.Valores.ValorIss       := RoundTo5(ValorISS, -2);

 

     Servico.Valores.ValorLiquidoNfse := Servico.Valores.ValorServicos -

                                         Servico.Valores.ValorPis -

                                         Servico.Valores.ValorCofins -

                                         Servico.Valores.ValorInss -

                                         Servico.Valores.ValorIr -

                                         Servico.Valores.ValorCsll -

                                         Servico.Valores.OutrasRetencoes -

                                         Servico.Valores.ValorIssRetido -

                                         Servico.Valores.DescontoIncondicionado -

                                         Servico.Valores.DescontoCondicionado;

 

     Servico.ItemListaServico         := '17.12';

 

     Servico.CodigoTributacaoMunicipio := '171200188';

     Servico.Discriminacao             := 'discriminacao';

 

     Servico.CodigoMunicipio := edtCodCidade.Text;

 

     Servico.ExigibilidadeISS := exiExigivel;

 

     Servico.CodigoPais := 1058; // Brasil

     Servico.MunicipioIncidencia := StrToIntDef(edtCodCidade.Text, 0);

 

     with Servico.ItemServico.Add do

      begin

       Descricao     := 'SERVICO 1';

       Quantidade    := 1;

       ValorUnitario := 100.00;

      end;

 

     Prestador.Cnpj               := edtEmitCNPJ.Text;

     Prestador.InscricaoMunicipal := edtEmitIM.Text;

 

 

    PrestadorServico.Endereco.CodigoMunicipio := edtCodCidade.Text;

     PrestadorServico.RazaoSocial := edtEmitRazao.Text;

 

     Tomador.IdentificacaoTomador.CpfCnpj            := '99999999000191';

     Tomador.IdentificacaoTomador.InscricaoMunicipal := '1733160024';

 

     Tomador.RazaoSocial := 'INSCRICAO DE TESTE';

 

     Tomador.Endereco.Endereco        := 'RUA PRINCIPAL';

     Tomador.Endereco.Numero          := '100';

     Tomador.Endereco.Complemento     := 'APTO 11';

     Tomador.Endereco.Bairro          := 'CENTRO';

     Tomador.Endereco.CodigoMunicipio := edtCodCidade.Text;

     Tomador.Endereco.UF              := edtEmitUF.Text;

     Tomador.Endereco.CEP             := edtEmitCEP.Text;

 

//Provedor Equiplano é obrigatório o pais e IE

     Tomador.Endereco.xPais           := 'BRASIL';

     Tomador.IdentificacaoTomador.InscricaoEstadual := '123456';

 

     Tomador.Contato.Telefone := '1122223333';

     Tomador.Contato.Email    := '[email protected]';

 

    end;

 end;

 

 ACBrNFSe1.Enviar(vNumLote);

 

 ACBrNFSe1.NotasFiscais.Clear;

 

end;

 

[Mensagem Substituição Nfse Bh.]

    Boa noite a todos, já uso há algum tempo o componente ACBR para NFe e agora surgiu a necessidade de implantar a NFSe (Serviços) num cliente que fica em Belo Horizonte, consegui sem problemas gerar e consultar uma Nota em homologação. 

   Estou tendo um problema ao tentar substituir uma Nota, talvez até por falta de conhecimento, ao tentar cancelar recebo uma mensagem de erro:

 

 "Belo Horizonte nao permite substituicao de rps"

 

  Andei pesquisando na net e vi que algumas cidades não aceitam o cancelamento ou a substituição de Nota em programas de terceiros, sendo aceito esse processo somente em seus sites.

  Tenten encontrar alguma informação se BH entra nessa lista de cidades e não encontrei, alguem poderia me informar se BH está entre essas cidades ou se essa mensagem é proveniente de algum comando errado que eu enviei ao tentar substituir?

   Desde já agradeço.

   Cesar Augustus

[Exemplo M205 E M605]

    Ok, valeu mais uma vez pela rápida resposta. Como faço para marcar esse tópico como resolvido?

[Exemplo M205 E M605]

   Prezado Juliomar, boa tarde. 

   Obrigado pela resposta, mesmo que tenha vindo um pouco irônica. rsrs

   Fiz a leitura do manual sim, como acho que a mesma deve ser feita 1,2 ou até 3 vezes antes de virmos aqui tirar alguma dúvida.

   Na verdade não sei se me expressei bem ao expor minha dúvida, quando me referi a um exemplo em delphi é porque imaginei que os campos Num_Campo e Cod_Rec tivessem um tipo de registro no ACBR como acontece com alguns campos como por exemplo Regime de Apuração (dot tipo TACBRCodIndTrib), Tipo_Item (do tipo TACBRTipoItem), CST_PIS (do tipo TACBRCstPis) e outros mais.

  Foi uma falha minha, mesmo que primária, não perceber que o tipo desses dois registros é do tipo STRING, acho que acontece nas melhores famílias né? 

  SUCESSOS e PAZ !!

[Exemplo M205 E M605]

   Prezados, boa tarde.

   Alguem poderia me mostrar um exemplo em delphi dos campos COD_REC e NUM_CAMPO do registro m205 e m605.

   Tentei pesquisar aqui e não encontrei nada.

   Agradeço.

   Cesar Castro.

 

[Erro Versão Xml]

   Deu certo. E foi justamente numa atualização que passou a dar  problema, so agora que percebi.

   Valeu pela dica.

   Castro.

[Erro Versão Xml]

  Blza. Valeu, irei atualizar o meu componente aqui.

  Atenciosamente.

  Castro