Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- NFC.SSL.SSLType := LT_TLSv1_2; //Protocolo de Segurança de Comunicação
- NFC.SSL.SSLXmlSignLib := xsLibXml2; //Gerenciador de Assinatura
- NFC.SSL.Senha := FormCertificado.Senha;
- //Certificado A1
- if (FormCertificado.TipoCertificado = 0) then //arquivo pfx
- begin
- NFC.SSL.SSLCryptLib := cryOpenSSL; //Gerenciador de Certificado
- NFC.SSL.SSLHttpLib := httpOpenSSL; //Gerenciador da Comunicação
- NFC.SSL.ArquivoPFX := FormCertificado.LocalCertificado;
- end;
- //Certificado A3
- if (FormCertificado.TipoCertificado = 1) then //do repositorio
- begin
- NFC.SSL.SSLCryptLib := cryWinCrypt; //Gerenciador de Certificado
- NFC.SSL.SSLHttpLib := httpWinHttp; //Gerenciador da Comunicação
- NFC.SSL.NumeroSerie := FormCertificado.SerieCerTificado;
- NFC.SSL.CarregarCertificado;
- end;
- NFE.Configuracoes.Geral.ForcarGerarTagRejeicao938 := fgtSempre; //Evita Rejeição
- NFE.Configuracoes.Arquivos.PathNFe := FormCertificado.LocalNF;
- NFE.Configuracoes.Arquivos.PathSchemas := FormCertificado.LocalSchemas;
- NFE.Configuracoes.WebServices.Ambiente := Ambiente;
- NFE.Configuracoes.Arquivos.SepararPorModelo := True;
- NFE.Configuracoes.Arquivos.SepararPorMes := True;
- NFE.Configuracoes.Geral.VersaoDF := ve400;
- NFE.DANFE := Danfe;
- NFE.Configuracoes.Geral.ModeloDF := moNFe;
- NFE.Configuracoes.Geral.AtualizarXMLCancelado := True;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement