function setActualizarNivelDeRiesgo($nivel = SYS_RIESGO_BAJO, $mensaje = "", $fecha = false)
{
$xNot = new cNotificaciones();
$xF = new cFecha();
$fecha = $xF->getFechaISO($fecha);
$mensaje = $xNot->cleanString($mensaje);
//AML.- Agregar aviso de cambio
if ($nivel >= SYS_RIESGO_ALTO and MODULO_AML_ACTIVADO == true) {
$xAml = new cAML();
$xAml->setForceAlerts();
$xAml->sendAlerts($this->mCodigo, AML_OFICIAL_DE_CUMPLIMIENTO, AML_RISK_INTERNAL_OPERATION, $mensaje, false, $fecha);
//TODO: Exportar a asociada, falta relaciones exportar relaciones
$this->getExportarAsociada(TPERSONAS_GENERALES, SVC_REMOTE_HOST);
$this->getExportarAsociada(TPERSONAS_DIRECCIONES, SVC_REMOTE_HOST);
$this->getExportarAsociada(TPERSONAS_ACTIVIDAD_ECONOMICA, SVC_REMOTE_HOST);
$this->mMessages .= $xAml->getMessages();
}
//Omitir AML en la actualizacion
$this->setOmitirAML(true);
$this->setUpdate(array("nivel_de_riesgo_aml" => $nivel));
//agregar una Noticiacion a la Persona de Nota
$this->addMemo(MEMOS_TIPO_HISTORIAL, $mensaje, false, $fecha);
}
