function setActualizarRiesgoPorNucleo()
{
//si todos son riesgo
$xLi = new cSQLListas();
$xQL = new MQL();
$sql = $xLi->getListadoDePersonasExpuestas($this->mClaveDePersona);
$rs = $xQL->getDataRecord($sql);
$xCat = new cPersonasCatalogoOtrosDatos();
foreach ($rs as $rows) {
$idpersona = $rows["numero_socio"];
$afinidad = $rows["grado_de_afinidad"];
$consanguinidad = $rows["grado_de_consanguinidad"];
$vinculoeconom = $rows["tiene_vinculo_patrimonial"];
//agregar
$tipoaml = $consanguinidad > 0 ? $xCat->AML_PEP_CONSANGUINIDAD : "";
$tipoaml = ($afinidad > 0 and $tipoaml == "") ? $xCat->AML_PEP_AFINIDAD : $tipoaml;
$tipoaml = ($vinculoeconom > 0 and $tipoaml == "") ? $xCat->AML_PEP_VINCULO_ECONOM : $tipoaml;
if ($tipoaml != "") {
$xRel = new cSocio($idpersona);
if ($xRel->init() == true) {
$xRel->addOtrosParametros($tipoaml, "1");
$this->mMessages .= $xRel->getMessages();
}
}
}
}
