//seleciona certificado
vEr_certificado			is Variant	= ""
O_certificadodigital	is CertificadoDigital
WHEN EXCEPTION IN 
	vEr_certificado=O_certificadodigital.Selecionar()
	Info("certificado ok")
DO
	vEr_certificado="Erro["+ExceptionInfo(errFullDetails)
	fSaveText(fExeDir+"\erro.txt",vEr_certificado)
	ShellExecute(fExeDir+"\erro.txt")
END
// status servico
retorno_xml		is string	= ""
cstat			is string	= ""
// ler o certicado escolhido
o_configuracao	is Configuracao
o_configuracao.CertificadoDigital=vEr_certificado
//status
o_ConsStatServ is ConsStatServ
o_ConsStatServ.VERSAO	= "4.00" 
o_ConsStatServ.CUF		= 43 
o_ConsStatServ.TpAmb	= 2 
WHEN EXCEPTION IN
	clO_StatusServico is Unimake.Business.DFe.Servicos.NFe.StatusServico()
	clO_StatusServico.Executar(o_ConsStatServ,o_configuracao)
	retorno_xml	= clO_StatusServico.RetornoWSString
	cstat		= clO_StatusServico.Result.cStat
DO
	retorno_xml="ERRO:"+ExceptionInfo(errFullDetails)
END
// mostrando o resultado
fSaveText(fExeDir+"\xml\status.xml",retorno_xml)
ShellExecute(fExeDir+"\xml\status.xml")
Failure initializing the .NET framework.
Check your .NET security parameters.
In most cases, the .NET framework cannot be used from a network path.
Call stack:
Click BTN_Seleciona_certifiado_e_status_servico (WIN_uninfe_dll.BTN_Seleciona_certifiado_e_status_servico), line 4
Date: 21/06/2022 07:10:09
Project: Video_3742_Uninfe_dll_Windev27
Additional information:
Error code: 2452
Module: wd270vm.dll (01F270103n - 27.0.549.5)
EIT_TYPE_WDFILE : <2>
EIT_IDCODE : <18>