murilorodrigues62

Ah, faltou os eventos para o StatusServico. Segue em anexo a unit com Before e After para este procedimento também. ACBrNFeWebServices.pas

Estou começando a testar impressão de Danfe pelo ACBR usando Delphi XE2 e FastReport. Ai me deparai um a seguinte situação, quando eu vou imprimir um DANFE de uma nota já processada (dou um load num XML) o arquivo do DANFe em PDF sai sem nome (.pdf). Isso porque dentro do componente é feito assim: dmDanfe.frxPDFExport.FileName := PathPDF + dmDanfe.NFe.procNFe.chNFe + '.pdf'; Só que não tenho a chave da acesso nesse momento nessa classe procNFe, pois não acabei de processar a nota, e sim estou imprimindo o DANFE de uma nota já processada, dando load no XML. Alguém aqui já passou por isso também? Está parecendo um erro, mas não tenho certeza. Estou fazendo alguma coisa errada?

Estou compilando o pacote PCN2. O erro ocorre no uses da unit pcnNFe.pas Algo semelhante acontece na unit ACBrReg compilando o pacote ACBr_NFe2: unit ACBrNFeReg; interface uses SysUtils, Classes, ACBrNFe, pcnConversao, {$IFDEF VisualCLX} QDialogs {$ELSE} Dialogs, FileCtrl {$ENDIF}, {$IFDEF FPC} LResources, LazarusPackageIntf, PropEdits, componenteditors {$ELSE} {$IFNDEF COMPILER6_UP} DsgnIntf {$ELSE} DesignIntf, DesignEditors {$ENDIF} {$ENDIF} ; O XE2 tenta compilar usando o DsgnIntf, porém ele deveria usar DesignIntf e DesignEditors.

Galera, estou migrando do Delphi 7 para o XE2, e ao compilar o pacote PCN o Delphi gera um erro pois não encontra o Dialogs. No XE2 agora deve-se usar a chama VCL.Dialogs. O pacote já está preparado para isso, usando a diretiva de compilação DELPHI16_UP, porém no meu Delphi ele não entra nessa condição, veja como está o código: {$I ACBr.inc} unit pcnNFe; interface uses SysUtils, Classes, {$IFDEF DELPHI16_UP} Vcl.Dialogs, {$ELSE} Dialogs, {$ENDIF} Por enquanto eu tirei tudo isso e deixei apenas a chama VCL.Dialogs para poder instalar o ACBrNFe, porém gostaria de saber o que devo fazer nessa situação, o que pode estar errado?

Alguma novidade?

Pessoal, tive a necessidade de implementar eventos de onBefore e onAfter no componente do ACBrNFe, e estou disponibilizando aqui pois poderá ser útil a mais pessoas, caso seja publicado nas versões oficiais do componente. Necessito destes eventos pois com eles faço o controle dos lotes e notas no banco de dados. Como essas ações (enviar, cancelar e etc) são usadas em diversos lugares do sistema, fica mais seguro controlar com eventos pois garanto que eles sempre serão executados, claro se implementado. O uso é semelhante a qualquer outro evento, se desejar usar é só implementar. Foram criados eventos onBefore e onAfter para as seguintes ações do NFe: * Enviar / Retorno / Recibo / Consulta / Cancelamento / Inutilizacao / ConsultaCadastro / EnviarDPEC / ConsultaDPEC / EnvEvento / ConsNfeDest / DowloadNFe; Atualmente estou utilizando apenas os eventos OnBeforeEnviar, OnAfterEnviar, OnAfterRetorno, OnAfterRecibo, OnAfterInutilizacao, OnAfterEnvEvento, porém já implementei para os outros eventos caso alguém necessite usar. Então dentro da classe TACBrNFe, unit ACBrNFe.pas, criei as propriedade do tipo TNotifyEvent, com exceção do evento OnBeforeEnviar que é uma procedure com um parâmetro denominado Abortar do tipo boolean. Se dentro da sua implementação vocês retornar true para esse parâmetro, o evento de envio do lote será abortado. Eu utilizo isso, por exemplo, para abortar o envio de NFe caso algum erro ocorra na inclusão das informações das notas no banco de dados. As propriedades criadas são chamadas nas funções de cada ação que estão na unit ACBrNFeWebServices.pas. Olhando para a minha implementação percebe-se que os eventos BeforeEnviar e AfterEnviar são os únicos que não são chamadas de dentro da function Executar da respectiva ação, isso se deve ao uso do parâmetro Abortar mencionado anteriormente. Vale se atentar que o evento enviar executa a ação Enviar e Retorno, então ao enviar um lote temos a execução da seguinte ordem de eventos: BeforeEnviar, AfterEnviar, BeforeRetorno e AfterRetorno. Segue em anexo a versão das units antes e depois da minha implementação. Aguardo retorno dos administradores. ACBrNFe.rar

Sidnei, o XML guardado nesta campo é o XML de uma das notas, eupreciso do XML do lote todo, contendo os dados do Lote e de todas as NFes dele. E achei nesta propriedade: ACBrNFe.WebServices.Enviar.DadosMsg

Na propriedade ACBrNFe.NotasFiscais.Items[x].XML eu obtenho o XML da NFe em questão, certo? Mas eu estou precisando pegar também o XML todo, ou seja, que tenha o cabeçalho do Lote e o todas as suas notas. Existe alguma propriedade no ACBrNFe que eu consiga isso? Obrigado!

Gostaria de saber como é feito o controle dos schemas em uso pelo ACBrNFe. Isso deve ser feito individualmente, manualmente ou podemos sempre usar os schemas presentes no SVN, como por exemplo da pasta "ACBr\Exemplos\ACBrNFe2\Delphi\Schemas" ?

Um, parece que achei na versão 4.8 : http://www.fast-report.com/en/news/4485.php

Estou iniciando o uso do ACBrNFe com Fast Report, e ao executar a aplicação acontece o seguinte erro: "Error reading frxIdentificacao.BCDToCurrency: Property BCDToCurrency does not exist." frxIdentificacao é um TfrxDBDataset. Tenho instalado o FastReport 4.0, pelo que intendi eu teria que atualizar meu FastReport. É isso mesmo? Que versão devo usar?

Opa, verdade, esqueci de comentar. É que atualmente no componente do ACBrNFe só temos as informações da serial e data final de validade. E gostaria de apresentar para o usuário o proprietário do certificado que ele selecionou, além da data inicial de validade. Eles serão usados simplesmente para demonstração ao usuário, para ter certeza de que selecionou o certificado digital correto. Como a CAPICOM já estava implementada para trazer esses campos, apenas implementei as propriedades no ACBrNFe. Ah, só o nome do proprietário que tive que recortar a string para apresentar corretamente o nome desejado, sem a string "CN=" e sem virgula. Ah, e acabei de atualizar o arquivo em anexo do post original, pois o ajuste do nome do proprietário eu passei para dentro do seu Get, para ficar mais correto.

Implementei na classe TCertificadosConf, as propriedades "Proprietário" e "Data Inicial de Validade" dos Certificados Digitais, vindas do objeto ICertificate na ACBrCAPICOM_TLB. Por favor, gostaria que fosse publicado na versão oficial do projeto. Obrigado! ACBrNFeConfiguracoes.pas

Obrigado! Só para ter certeza de que a CAPICOM não faz uso do .NET.

Olá, pretendo usar o ACBr_NFe2 em Delphi, com CAPICOM. Os PCs que forem executar meu projeto precisam do Microsoft .NET Framework?