$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xP->init();
$xFRM = new cHForm("frmCompromisos", "frm_agregar_compromisos.php?action=" . MQL_ADD);
$msg = "";
$xFRM->addJsBasico();
$xFRM->addCreditBasico();
$xFRM->addSubmit();
$arr = array("promesa_de_pago" => "Promesa de Pago", "promesa_de_revision" => "Promesa de Revision(Cita)", "promesa_de_reestructuracion" => "Promesa de Reestructuracion", "promesa_de_renovacion" => "Promesa de Renovacion");
$xHSel = new cHSelect();
$xHSel->addOptions($arr);
$xFRM->addHElem($xHSel->get("idtipocompromiso", "TR.Tipo de Compromiso", "promesa_de_pago"));
$xHF = new cHDate();
$cH = new cFecha();
$xFRM->addHElem($xHF->get("TR.Fecha"));
$xFRM->addHElem($cH->getHours(true, "TR.Horario", "idhora"));
$xFRM->OTextArea("idnotas", "", "TR.Notas");
if ($action == MQL_ADD) {
//Insertar Nuevo Registro
$socio = $persona;
$solicitud = $credito;
$oficial = $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"];
$fecha = $cH->getFechaISO($_POST["idfecha-0"]);
$hora = $_POST["idhora"];
$compromiso = $_POST["idtipocompromiso"];
$anotacion = $_POST["idnotas"];
//Valores Pre-establecidos
$eacp = EACP_CLAVE;
$sucursal = getSucursal();
$estatus = "pendiente";
//$xSeg = new cSe
