Italo Giurizzato Junior

Bom dia Sérgio, Se você atribuir vazio a Token o componente se encarrega de gerar um Token de Homologação. Mas algumas SEFAZ estão gerando também o Token de Homologação, neste caso devemos solicitar esse Token e atribuir ele a propriedade Token.

Bom dia Leonardo, A cidade de Palhoça/SC esta sim implementada para o provedor Betha. Por outro lado esse provedor IPM não esta. Procure obter informações sobre ele, tais como: Segue o padrão ABRASF? Se sim qual versão: 1, 2 ? Schemas; Endereços dos Web Services tanto de homologação quanto de produção; XML de exemplos; Cidades atendidas por esse provedor; Quanto mais informações conseguir melhor, para que possamos implementar.

Bom dia Fernando, Por não utilizar, não conheço as versões do Forts, Fast, Rave, ... eu trabalho com o Quick Report. No caso do Quick Report, temos a versão 3 que vem junto com o Delphi 7, mas é possível utilizarmos a versão 4 ou a 5. Eu em particular utilizo a versão 5.02, os DA (DANFE, DACTE, etc) feitos em Quick Report são disponibilizados no repositório segundo a versão 5.02 Portanto se você vai utilizar uma versão diferente, com certeza vai ter problemas com propriedades não existentes. Inclusive, existem propriedades a mais ou a menos na mesma versão do Quick Report para versões diferentes de Delphi. No caso do Quick Report disponibilizei um passo a passo que encontra-se dentro da pasta que contem os fontes do componente. Sei que você não utiliza o Quick Report, mas que tal tentar fazer algo semelhante, pode resolver o seu problema. Faça como eu fiz escreva um passo a passo que faz com que o problema seja resolvido. Post aqui como anexo para que outros colegas possam testar, ai vamos disponibilizar o seu passo a passo junto com os fontes.

Bom dia Rubens, Altere a sua rotina para: ACBrCTe.EventoCTe.Evento.Clear; with ACBrCTe.EventoCTe.Evento.Add do begin infEvento.nSeqEvento := 1; infEvento.chCTe := sChave; // Chave do CT-e a ser cancelado infEvento.CNPJ := sCNPJ; // CNPJ do emitente do CT-e infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := trim(sJustificativa); // Justificativa pelo cancelamento, minimo 15 caracteres infEvento.detEvento.nProt := sProtocolo; // Protocolo de autorização do CT-e a ser cancelado end; ACBrCTe.EnviarEventoCTe(nLote); // numero do lote de eventos Pela mensagem de Rejeicao: O autor do evento diverge do emissor do CT-e. Concluo que o CNPJ que você esta informando em infEvento.CNPJ não é o mesmo do emitente (transportadora) do CT-e.

Bom dia ilsouza, Respondendo a sua pergunta, deixe o componente gerar a chave. Note que a chave é compostas por vários elementos conhecidos, como código da UF, ano, mês, CNPJ, etc. Mas, um deles é o código do conhecimento, TAG cCT, trata-se de um numero aleatório de 8 dígitos que compõe a chave de 44 dígitos do CT-e. Na minha aplicação quando o usuário vai salvar no banco de dados as informações digitadas, faço com que esse numero seja gerado pelo Randomize e salvo junto. Portanto na estrutura do registro no banco de dados tenho um campo chamado cCT e outro chamado chave (que ao salvar o registro deixo em branco). Ao ler os dados do banco de dados para alimentar o componente, atribuo a propriedade cCT o conteúdo do campo cCT lido do registro. Desta forma o componente vai utilizar esse numero como sendo o numero aleatório. Se informarmos zero a cCT, o componente se encarrega de gerar esse numero, mas eu prefiro ter o controle dessa informação. Ao executar os comandos Assinar ou Valida ou Envia, lembrando que o Envia se encarrega de executar o Assinar e o Valida, é possível ler a chave gerada pelo componente. Eu faço a leitura dessa informação e atualizo o registro no banco de dados (campo Chave). Mais dicas, estude os fragmentos de códigos que estão na pasta ...\Exemplos\ACBrCTe.

Bom dia Heto Andrade, Alterei o tamanho da fonte de 8 para 6, agora é para exibir mais linhas.

Bom dia Wesley, Você chegou a realizar testes com o programa exemplo? Se sim, você selecionou no combo box a cidade do Rio de Janeiro? Configurou a pasta: ...\Exemplos\ACBrNFSe\Delphi\Schemas\RJ como sendo a pasta que contem os Schemas? Testou o envio usando o botão [Gerar e Enviar Lote] ? Qual Schema você esta utilizando, o que vem junto com o programa exemplo ou outro?

Boa tarde Wesley, O componente esta configurado corretamente? O path schemas esta apontando para a pasta que contem os schemas utilizado pelo provedor que atende a cidade para qual a NFS-e vai ser emitida?

E qual é o problema em atualizar os fontes? Eu mantenho os meus fontes atualizados diariamente.

ilsouza, Também utilizo a versão 5.02 do Quick Report sem nenhum problema. Todo caso, exclua os fontes referentes ao DACTE - Quick Report que estão na pasta: ...\Fontes\ACBrCTe. Baixe novamente e compile a sua aplicação com a opção Build e teste novamente.

Boa tarde ajlcorreia, Quando você fez a última atualização dos fontes?

Boa tarde NatanaB, O problema é com o provedor. O componente possui configurações, para determinar o numero de tentativas de consultas que ele ira fazer, bem como o tempo entre uma tentativa e outra. Experimente aumentar o tempo e o numero de tentativas.

Boa tarde ilsouza, Eu também utilizo o Delphi 7 com o Quick Report - DACTE tamanho A4 - Retrato. E esta aparecendo o código de barras da chave.

Boa tarde Binho, Se o problema esta ocorrendo com o XML retornado ( NFS-e ) pelo Web Services e não o que é enviado ( RPS ) com certeza o problema é no provedor.

Boa tarde Heto Andrade, O que ocorre se colocar mais linhas? Ele corta, só mostra as 5 primeiras linhas?

Bom dia Samuel, Se a nota foi processada 4 segundos após o envio, e mesmo assim ao usar o ConsultarLoteRps o Web Services retorna uma mensagem que ainda não foi processado, com certeza o problema é no Web Services.

Boa tarde Ailton, Muito obrigado pela colaboração, ainda hoje estarei disponibilizando.

Bom dia Caetano, Sim, exceto CE (ainda não disponibilizou os Web Services de homologação) e PR (não disponibilizou os Web Services de produção).

Bom dia Cristiano, Como o cancelamento é por evento e este esta na versão 1.00 independente da versão da NF-e, logo é possível sim, cancelar sem nenhum problema.

Bom dia Graça, Eu pensei em fazer isso, mas voltando ao exemplo: Carregar o XML (salvo em disco) para poder envia-lo por e-mail. O EnviarEmail executa o SaveToStream ou SaveToFile em ambas as rotinas o XML é gerado novamente pelo GerarXML e consequentemente se baseia nas configurações de Modelo e Versão. Se o LoadFromFile carrega o XML e restaura o Modelo e versão, ao executar o EnviarEmail o XML a ser enviado estará invalido, pelo que foi descrito acima.

Bom dia a todos, Como todos sabem, o componente ACBrNFe possui todas as funcionalidades para trabalharmos com a NF-e e NFC-e. Para isso devemos sempre configurar o componente setando o Modelo e a Versão do Documento Fiscal da seguinte forma: para NF-e: ACBrNFe.Configuracoes.Geral.ModeloDF := moNFe; ACBrNFe.Configuracoes.Geral.VersaoDF := ve200; // ou ve310; para NFC-e: ACBrNFe.Configuracoes.Geral.ModeloDF := moNFCe; ACBrNFe.Configuracoes.Geral.VersaoDF := ve300; // ou ve310; O problema esta agora em carregar um XML, vou explicar: A sua aplicação esta configurada para emitir NF-e na versão 3.10, mas você necessita carregar o XML de uma NF-e versão 2.00 para enviar por e-mail, por exemplo. O LoadFromFile (por exemplo) ao carregar o XML, vai executar a procedure GerarNFe que por sua vez gera conforme o ModeloDF e VersaoDF setados. Isso faz com que o XML da NF-e que você carregou se transforme na versão 3.10 antes de ser enviado por e-mail. Uma solução que encontrei foi alterar o LoadFromFile de tal maneira que ele reconfigura o componente com o modelo e versão do XML carregado. Desta forma devemos tomar como regra, sempre setar o Modelo e Versão antes de alimentar o componente e/ou antes de enviar, cancelar, inutilizar numeração. Quero deixar claro que essa alteração não é A solução e sim UMA solução, caso alguém tenha uma proposta melhor por favor post neste tópico.

Boa tarde Dércio, Quem rejeitou a nota, foi a SEFAZ ou o componente? Por favor use o termo Rejeitar quando se tratar da SEFAZ e Erro de Validação quando se tratar do componente. Se foi um erro de validação, verifique se você não esta informando algum dado referente ao endereço. Lembre-se que espaço em branco é diferente de vazio.

Boa tarde a todos, Só para fechar com chave de ouro esse assunto. Se não me falha a memória a NF-e foi instituída em 30 setembro de 2005 através do AJUSTE SINIEF 07/05. Pois muito bem o meu sistema possui um módulo chamado: Controle de Entrada (implantado em 2005), a sua finalidade é simples, lançar as notas de compra de materiais. Quando começou a obrigatoriedade da emissão das NF-e, alguém lembra? Pois muito bem nesse meio tempo e até hoje o almoxarifado não digita nenhuma nota, detalhe importante, apesar de recebermos os XMLs dos fornecedores os mesmos não são importados. Resumindo tudo: Recebo por e-mail os XML das Notas; Não tenho nenhuma rotina para importar os dados das mesmas; O funcionário do almoxarifado da entrada nas notas sem a necessidade de digita-las. Para não dizer que ele não digita nada, ele digita o CNPJ do fornecedor e o numero do pedido de compra emitido pelo departamento de compras. Em vez de criar mecanismos obscuros para minimizar o trabalho, que tal desenvolver um módulo de compra de material que se integra com o de entrada?

Boa tarde, Alterei o Destroy: destructor TListaNfse.Destroy; begin if Assigned(FCompNfse) then FCompNfse.Free; FMsgRetorno.Free; inherited; end; Em vez de comentar inclui o if em negrito.

Boa tarde Luiz, A principio a ABRASF definiu o seguinte método de envio: EnviarLoteRps. Mas acontece que a empresas que chamamos de provedores, empresas estas que implantam os Web Services nas prefeituras, algumas criaram um método chamado EnviarLoteRpsSincrono e outras o GerarNfse. Muito bem, hoje temos provedores que se utilizada apenas de um dos métodos e outros que se utilizam de 2 ou todos os 3 métodos. Se você abrir o fonte: ACBrProvedorBHISS.pas vai notar que tanto a function Gera_TagI como a Gera_TagF a ação acGerar retorna vazio por outro lado a acRecepcionar temos o: EnviarLoteRpsEnvio. Esse provedor se utiliza apenas desse método. Note que o programa exemplo possui 3 botões: [Gerar e Enviar Lote] - utiliza o método: EnviarLoteRps. [Gerar e Enviar Lote - Síncrono] - utiliza o método: EnviarLoteRpsSincrono. e [Gerar e Enviar NFSe] - utiliza o método: GerarNfse. Se o provedor BHISS se utiliza apenas do método EnviarLoteRps, concluímos que devemos utilizar o botão [Gerar e Enviar Lote]. Troque a palavra Funcionalidade por método na mensagem apresentada pelo componente, temos: O método [ Gerar NFSe ] não foi disponibilizada pelo servidor: BHISS Entendeu como é que a coisa funciona?