Italo Giurizzato Junior

Eu que peço desculpas, deveria ter pedido a você para atualizar os fontes e testar novamente.

Boa tarde Heto Andrade, ACBrNFe.Enviar(Lote); sRecibo := ACBrNFe.WebServices.Enviar.Recibo; ACBrNFe.WebServices.Retorno.Recibo := sRecibo; if ACBrNFe.WebServices.Retorno.Executar then begin for i := 0 to (ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Count - 1) do begin sDataHora := DateTimeToStr(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.dhRecbto); sProtocolo := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.nProt; sStat := IntToStr(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.cStat); sMotivo := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.xMotivo; sChave := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.chNFe; // Atualizar o banco de dados end; end; Espero ter ajudado.

Boa tarde Wesley, A sua aplicação sempre vai gerar e enviar o RPS. Quem gera a NFS-e é o provedor, que recebe o XML do seu RPS, processa, caso esteja tudo OK, é gerado o XML da NFS-e e retornado. A sua aplicação pega o retorno e extrai dele o XML da NFS-e e salva em disco. Alem do DANFSE feito em Quick Report, se não me falha a memória tem ele feito também em Fast Report.

Boa tarde Heto Andrade, Você atualizou os fontes? Pois essa propriedade não influencia em nada no DANFE feito em Quick Report.

Boa tarde Leandro, Não existe TAG no XML para esta informação. Outra coisa, mesmo que a ABRASF venha incluir ela no layout, as chances dos provedores incluírem essa TAG é zero. Digo isso pelo simples fato que o layout da ABRASF esta na versão 2.02 e existem provedores que ainda utilizam a versão 1.00 A solução é colocar essa informação caso seja necessário no campo de discriminação dos serviços.

Boa tarde, Eu apenas ajudo na implementação, não utilizo e não tenho nenhum cliente que emite NFS-e. Aconselho você entrar em contato com o provedor e questionar sobre esse assunto.

Boa tarde jGuto, Muito obrigado pela colaboração, já esta disponível.

Boa tarde Leonardo, O pouco que vi do manual, realmente não segue o padrão ABRASF. O componente ACBrNFSe tem como objetivo atender as cidades que se utilizam de provedores que seguem o padrão. Se você não quer que seu cliente emita a NFS-e via site o jeito vai ser regaçar as mangas e desenvolver um outro componente somente para atender esse provedor. Que por sinal os caras são muito ruim em propaganda e para mim o numero de cidades é tão pequeno que os caras tem vergonha de contar e diz que essa informação das cidades atendidas é confidencial. No link que você me passou tem uma opção de Download e nesta tem um tal de Exemplo Integrador Delphi. Acredito que deva ser um conjunto de rotinas feitas por eles para você incluir na sua aplicação.

Bom dia Wesley, Os erros que você listou, se referem a não encontrar determinados arquivos. Isso pode ser resolvido incluído o path da pasta desses arquivos, no Library Path, importante é que esse path esteja antes do path do componente. Quanto ao certificado, muitos utilizam o certificado de clientes para realizarem testes. Post como anexo os schemas que você esta utilizando.

Bom dia EFV, Primeiro vamos ao Manual versão 2.00a do CT-e. Página 134 campo # 261 se refere ao grupo infDoc - nível 2 ou seja esta dentro do grupo infCTeNorm. O grupo infDoc se refere a informações dos documentos originários, ou seja, o documento emitido pelo remetente da carga. Esse grupo poderá ser omitido quando se tratar de redespacho intermediário caso contrario temos que informar. Outro detalhe como esse grupo esta dentro do infCTeNorm isso significa que estamos emitindo um CT-e Normal, não se tratata de um de complementação de valores ou anulação. Página 140 campo #344 se refere ao grupo docAnt - nível 2 ou seja esta dentro do grupo infCTeNorm, também. Esse grupo é opcional ele só é informado quando se tratar de redespacho ou redespacho intermediário. É nesse grupo que informamos o documento emitido pela transportadora anterior. Cuidado para não confundir: O tipo do CT-e (tpCTe) que pode ser: Normal, Complemento de Valores, Anulação ou Substituição. O tipo do Serviço (tpServ) que pode ser: Normal, Subcontratação, Redespacho, Redespacho Intermediário ou Serviço Vinculado a Multimodal. Outra coisa, você esta utilizando os schemas da pasta: ...\Exemplos\ACBrCTe\Delphi\Schemas\V200? Tanto os fontes quanto os schemas estão atualizados? Espero ter ajudado.

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 Luiz, Se o fragmento de código que você postou em ( #7 ) se refere a unit: ACBrMDFeConfiguracoes - function GetCertificado os seus fontes estão desatualizados. Compare com o que você postou com que esta disponível no repositório: (...) if CertStoreMem = nil then begin CertStoreMem := CoStore.Create; CertStoreMem.Open(CAPICOM_MEMORY_STORE, 'Memoria', CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); CertStoreMem.Add(Cert); (...) no repositório: (...) if CertStoreMem = nil then begin CertStoreMem := CoStore.Create; CertStoreMem.Open(CAPICOM_MEMORY_STORE, 'MemoriaACBrMDFe', CAPICOM_STORE_OPEN_READ_ONLY); CertStoreMem.Add(Cert); (...) A diferença nesta linha não é o que esta provocando o erro, mas mostra que os seus fontes estão desatualizados.

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?

Cristiam, Fiz uma alteração no fonte do componente ACBrCTe que é utilizado pelo monitor: ACBrNFeMonitor. Aguarde a próxima compilação do mesmo.

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?

Luiz, O componente esta configurado corretamente? O path de schemas esta apontando para a pasta que contem os schemas do MDF-e atualizados?

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 Cristiam, No segundo bloco de informações as linhas: Identificador : Chave Acesso : Recebimento : Protocolo : Estão em branco porque você removeu os dados ou aparece mesmo em branco?