$notas = $xAml->getMessages();
}
}
//$jxc = new TinyAjax();
//$jxc ->exportFunction('datos_del_pago', array('idsolicitud', 'idparcialidad'), "#iddatos_pago");
//$jxc ->process();
$xHP->init();
//$jxc ->drawJavaScript(false, true);
$xFRM = new cHForm("frmriesgo", "registro_persona_riesgosa.frm.php?action=" . MQL_ADD);
$xBtn = new cHButton();
$xTxt = new cHText();
$xSel = new cHSelect();
$xFec = new cHDate();
$xTa = new cHTextArea();
if ($action == SYS_NINGUNO) {
$xUsers = $xSel->getUsuarios("idusuarioreportado");
$xFRM->setTitle($xHP->getTitle());
$xFRM->addPersonaBasico("", false, $persona);
$xFRM->addJsBasico(iDE_AML);
$xFRM->ODate("idfechaevento", false, "TR.Fecha de Evento");
$xFRM->addHElem($xSel->getListaDeNivelDeRiesgo("", $nivelcargado)->get("TR.Nivel de Riesgo", true));
$xFRM->addHElem($xTa->get("idmensaje", $notas, "TR.Razones por la cual se cambia el Nivel de riesgo"));
$xFRM->addSubmit();
} else {
if (setNoMenorQueCero($persona) > 0) {
$fecha = parametro("idfechaevento", false, MQL_DATE);
$mensaje = parametro("idmensaje");
$nivel = parametro("idnivelderiesgo", 0, MQL_INT);
$xSoc = new cSocio($persona);
$xSoc->init();
$xSoc->setActualizarNivelDeRiesgo($nivel, $mensaje, $fecha);
