Jump to content

click.png

click.png

click.png

click.png click.png click.png

click.png

click.png

click.png

click.png

click.png

click.png

Erro Na Funcao Acbrpaf.savefiletxt_N


jaildocc
  • Este tópico foi criado há 3147 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Quando utilizo essa função da o erro "Erro ao ler a chave", alguem sabe dizer como posso resolver isso, segue abaixo o codigo

 

 

                 EmpresaVO Empresa = new EmpresaController().PegaEmpresa(FCaixa.Configuracao.IdEmpresa);
 
                //  registro N1
                FDataModule.ACBrPAF.PAF_N.RegistroN1.CNPJ = Empresa.Cnpj;
                FDataModule.ACBrPAF.PAF_N.RegistroN1.IE = Empresa.InscricaoEstadual;
                FDataModule.ACBrPAF.PAF_N.RegistroN1.IM = Empresa.Cnpj;
                FDataModule.ACBrPAF.PAF_N.RegistroN1.UF = Empresa.Uf;
                FDataModule.ACBrPAF.PAF_N.RegistroN1.RazaoSocial = Empresa.RazaoSocial;
 
                //  registro N2
                R01VO R01 = new RegistroRController().RegistroR01();
 
                FDataModule.ACBrPAF.PAF_N.RegistroN2.LAUDO = R01.NumeroLaudoPaf;
                FDataModule.ACBrPAF.PAF_N.RegistroN2.NOME = R01.NomePafEcf;
                FDataModule.ACBrPAF.PAF_N.RegistroN2.VERSAO = R01.VersaoPafEcf;
                FDataModule.ACBrPAF.PAF_N.RegistroN3.Clear();
                
                //  registros N3
                ACBrPAFRegistroN3 N3;
                NomeArquivo = Application.StartupPath + "\\PafEcf.exe";
                N3 = new ACBrPAFRegistroN3();
                N3.NOME_ARQUIVO = R01.PrincipalExecutavel;
                N3.MD5 = Biblioteca.MD5File(NomeArquivo);
                FDataModule.ACBrPAF.PAF_N.RegistroN3.Add(N3);
                
                NomeArquivo = Application.StartupPath + "\\Balcao.exe";
                N3 = new ACBrPAFRegistroN3();
                N3.NOME_ARQUIVO = "Balcao.exe";
                N3.MD5 = Biblioteca.MD5File(NomeArquivo);
                FDataModule.ACBrPAF.PAF_N.RegistroN3.Add(N3);
 
                FDataModule.ACBrPAF.Path = Application.StartupPath;
                FDataModule.ACBrPAF.SaveFileTXT_N("ArquivoMD5.txt");

 

Link to comment
Share on other sites

Realmente estava faltando as dlls coloquei... funcionou legal no projeto de exemplo PAFTeste, porém no meu ainda nao está funcionando, observei q no projeto de teste é utilizado o controle acbrPAF e lá tem um evento com o nome acbrPAF_OnPAFGetKeyRSA onde é carregado a chave privada.

 

, porém nesse meu código o controle é criado no módulo FDataModule, como faço para adicionar esse mesmo evento no meu controle que é criado via código nesse módulo FDataModule?

 

PS.: Obrigado a todos pela ajuda.

Link to comment
Share on other sites

  • Este tópico foi criado há 3147 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.