function jsaListadoDeEventos($generadoEn, $programado)
{
$xPRG = new cAlertasDelSistema();
$cnt = "";
$xSel = new cHSelect();
$xRuls = new cReglaDeNegocio();
if ($generadoEn == SYS_ALERTA_POR_EVENTO) {
$xProg = new cAlertasDelSistema();
$xSel->addOptions($xRuls->getEventos());
$cnt = $xSel->get("idprogramacion", "TR.Evento Marcado");
} else {
$xTxtA = new cHTextArea();
$xFld = new cHFieldset("TR.Programacion");
if ($programado == "") {
//$xFld->addHElem( );
} else {
//$xFld->addHElem( );
}
$xFld->addHElem($xTxtA->get("idprogramacion", "", "TR.programacion"));
$cnt .= $xFld->get();
}
return $cnt;
}
$xSelEA = $xCE->query()->html()->select($xCE->descripcion_estatus()->get());
$xCP = new cCreditos_periocidadpagos();
$xSelCP = $xCP->query()->html()->select($xCP->descripcion_periocidadpagos()->get());
$xCTP = new cCreditos_tipo_de_pago();
$xSelTP = $xCTP->query()->html()->select($xCTP->descripcion()->get());
$xPP = new cCreditos_tipoconvenio();
$xSelPP = $xPP->query()->html()->select($xPP->descripcion_tipoconvenio()->get());
$oFRM = new cHForm("frmrenegociar", "", "idfrmrenegociar");
$oFRM->addHElem($xSelPP->get("idpdto", "Producto Actual", $xCred->getClaveDeProducto()));
$oFRM->addHElem($xSelCP->get("idperiocidad", "Nueva Periocidad", $xCred->getPeriocidadDePago()));
$oFRM->addHElem($xSelTP->get("idtipopago", "Nuevo Tipo de Pago", $xCred->getTipoDePago()));
$oFRM->addHElem($oTxt->getDeMoneda("idmonto", "Monto a Renegociar", $xCred->getSaldoActual()));
$oFRM->addHElem($oTxt->getDeMoneda("idpagos", "Pagos nuevos", $xCred->getPagosAutorizados()));
$oFRM->addHElem($oTxt->getDeMoneda("idtasa", "Tasa Nueva", $xCred->getTasaDeInteres() * 100));
//$oFRM->addHElem( $oTxt->getDeMoneda("idinteres", "Interes a Renegociar", $xCred->getInteresNormalPorPagar() ) );
$oFRM->addHElem($oTa->get("idobservaciones", "", "Observaciones"));
$oFRM->addHTML("<p class='aviso' id='resultados'></p>");
$oFRM->addHTML($oUL->li("Se Clona el Credito")->li("Eliminar Plan de Pagos")->li("Reestructurar SDPM")->li("Recalcular Intereses Devengados")->li("Cambiar el Numero de Pagos")->li("Generar Movimiento de Fin de Mes")->end());
$oFRM->addHElem($oBtn->getBasic("Guardar", "jsGuardarCambios", "guardar", "idguardar"));
$oFRM->addHElem($oBtn->getBasic("Cancelar", "jsCancelarCambios", "cancelar", "idcancelar"));
echo $oFRM->get();
echo $xHP->setBodyEnd();
$jsb->show();
$jxc->drawJavaScript(false, true);
?>
<!-- HTML content -->
<script>
var xGen = new Gen();
function jsGuardarCambios(){
var si = confirm("DESEA REESTRUCTURAR ESTE CREDITO?\nESTO NO PUEDE DESHACERSE.\nTENGA CUIDADO!.\n-----------------------------");
if(si){
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
$jsb->setNameForm($xFRM->getName());
$selcat = $xSel->getCatalogoDeRiesgos();
$selcat->addEvent("onblur", "jsGetListadoAvisos()");
$selcat->addEvent("onchange", "jsGetListadoAvisos()");
$selcat->addEspOption(SYS_TODAS);
$selcat->setOptionSelect(SYS_TODAS);
$xFRM->addHElem($xDate->get($xFRM->lang("fecha inicial"), false, 1));
$xFRM->addHElem($xDate->get($xFRM->lang("fecha final"), false, 2));
$xFRM->addHElem($selcat->get($xFRM->lang(array("tipo de", "Riesgo")), true));
$xFRM->addSubmit("", "jsGetListadoAvisos()");
$xta = new cHTextArea();
$xFRM9 = new cHForm("frmupdateriesgo");
$xFRM9->addHElem("<div id='tx1'>" . $xta->get("iddetalles", "", "TR.Notas") . "</div>");
//$xFRM9->addObservaciones();
$xFRM9->addSubmit("", "jsGuardarDescarto()", "jsCancelarAccion()");
$xFRM->addHTML("<div class='inv' id='iduriesgo'>" . $xFRM9->get() . "</div>");
//$xFRM->addCreditBasico();
$xFRM->addHTML("<div id='lstalertas'></div>");
$xFRM->addHTML("<input type='hidden' id='idriesgo' />");
$xFRM->addAviso("", "idmsg");
echo $xFRM->get();
echo $xHP->setBodyEnd();
$jsb->show();
$jxc->drawJavaScript(false, true);
?>
<!-- HTML content -->
<script>
var xG = new Gen();
$_SESSION["current_file"] = addslashes($theFile);
//=====================================================================================================
$xHP = new cHPage("", HP_FORM);
$DDATA = $_REQUEST;
//$jxc = new TinyAjax();
//$jxc ->exportFunction('datos_del_pago', array('idsolicitud', 'idparcialidad'), "#iddatos_pago");
//$jxc ->process();
echo $xHP->getHeader();
$jsb = new jsBasicForm("frmjson");
//$jxc ->drawJavaScript(false, true);
echo $xHP->setBodyinit();
$xFRM = new cHForm("frmjson", "../install/update.json.php");
$xBtn = new cHButton();
$xTxt = new cHText();
$xArea = new cHTextArea("idjson", "idjson", "Texto JSON a Exportar");
$xFRM->addHElem($xArea->get());
$xFRM->addHElem($xBtn->getBasic("Enviar", "jsSubmit()", "guardar"));
echo $xFRM->get();
echo $xHP->setBodyEnd();
$jsb->show();
?>
<style>
<!--
-->
#idjson {
width: 99%;
height: 400px;
}
</style>
<!-- HTML content -->
foreach ($data as $rows) {
$ql->setData($rows);
$socio = $ql->clave_de_persona()->v();
$tipo = $ql->tipo_de_documento()->v();
$tdocto->setData($tdocto->query()->initByID($tipo));
$id = $ql->clave_de_control()->v();
//var_dump($rows);
$str = "<div class='tx1'>";
$str .= "<div class='tx34'>";
$str .= "<fieldset><legend>{$socio} - " . $tdocto->nombre_del_documento()->v() . "</legend>";
//$xDoc = new cDocumentos($ql->);
//XXX: Modificar 1.- Asunto de documento
//$str .= "<img src='../frmsocios/documento.png.php?persona=$socio&tipo=" . $tipo . "' class='docto' onclick=\"jsToImage('$socio&tipo=" . $tipo . "')\">";
$str .= "</fieldset></div>";
$str .= "<div class='tx14'>";
$str .= $xAt->get("idobservaciones-{$id}", "", $xFRM->lang("observaciones"));
$str .= "<div class='tx1'><table>";
$str .= "<tr><th>" . $xFRM->lang("validacion") . "</th></tr>";
$str .= "<tr><td>";
$str .= $xBtn->getBasic($xFRM->lang("marcar como", "real"), "jsMarcarFalso({$id}, {$socio})", "bien");
$str .= "</td></tr>";
$str .= "<tr><td>";
$str .= $xBtn->getBasic($xFRM->lang("marcar como", "falso"), "jsMarcarReal({$id}, {$socio})", "mal");
$str .= "</td></tr>";
$str .= "<tr><td>";
$str .= $xBtn->getBasic($xFRM->lang("marcar como", "insuficiente"), "jsMarcarInsuficiente({$id}, {$socio})", "aviso");
$str .= "</td></tr>";
//$str .= $rows["clave_de_control"];
$str .= "</table></div>";
//$str .= "<div class='tx1'>";
//$str .= "</div>";
$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);
if (MODO_DEBUG == true) {
$xFRM->addAviso($xSoc->getMessages());
}
}
}
echo $xFRM->get();
function OTextArea($id, $valor, $titulo, $add = true)
{
$xTxt = new cHTextArea();
if ($add == true) {
$this->addHElem($xTxt->get($id, $valor, $titulo));
}
return $xTxt;
}
$xBtn = new cHButton();
$xTxt = new cHText();
$xSel = new cHSelect();
$xFec = new cHDate();
$xTa = new cHTextArea();
if ($action == SYS_NINGUNO) {
$xUsers = $xSel->getUsuarios("idusuarioreportado");
$xMot = $xSel->getListaDeRiesgosAML("", AML_CLAVE_OPERACIONES_INTERNAS);
$xFRM->setTitle($xHP->getTitle());
$xFRM->ODate("fecha_de_evento", false, "TR.Fecha de Suceso");
$xFRM->addHElem($xUsers->get($xHP->lang("usuario", "reportado"), true));
$xFRM->addHElem($xMot->get($xHP->lang("motivos"), true));
$xFRM->addPersonaBasico("", false, false, "", "TR.Persona Relacionada");
$xFRM->addHElem($xTxt->get("iddocumento", DEFAULT_CREDITO, $xHP->lang("documento", "relacionado")));
$xFRM->addHElem($xSel->getListaDeObjetosEnSistema()->get(true));
$xFRM->addHElem($xTa->get("idmensaje", "", $xHP->lang("mensaje")));
//$xFRM->addCreditBasico();
$xFRM->addSubmit();
} else {
//LOS REPORTES DIRECTOS SI SE NOTIFICAN AL OFICIAL
$arrValores = array("montoabonado" => MQL_FLOAT, "idusuarioreportado" => MQL_INT, "idmensaje" => MQL_STRING, "fecha_de_evento" => MQL_STRING, "idtipoderiesgo" => MQL_INT, "iddocumento" => MQL_INT, "idsocio" => MQL_INT);
$xF = new cFecha();
$VR = getVariablesSanas($_POST, $arrValores);
$fecha = $xF->getFechaISO($VR["fecha_de_evento"]);
//$fecha = $xF->getInt($fecha);
$usuarioreportado = $VR["idusuarioreportado"];
$motivo = $VR["idtipoderiesgo"];
$mensaje = $VR["idmensaje"];
$documento = $VR["iddocumento"];
$tercero = $VR["idsocio"];
$tipo_de_documento = parametro("idobjetodesistema", iDE_RECIBO, MQL_INT);
