echo $xP->setBodyinit();
    $xFrm = new cHForm("frmCobrosEnCheque", "cobro-cheques.frm.php");
    //agrega en un hidden el idrecibo
    $xTxt = new cHText("id");
    //$xTxt->setIncludeLabel(false);
    $xTxt2 = new cHText("id");
    $xSel1 = new cSelect("iBancos1", "iBancos1", TBANCOS_ENTIDADES);
    $xSel2 = new cSelect("iBancos2", "iBancos2", TBANCOS_ENTIDADES);
    $xSel2->addEspOption(SYS_NINGUNO);
    $xSel2->setOptionSelect(SYS_NINGUNO);
    $xFrm->addHElem("<div class='title'>IMPORTE : {$MontoOperacion}</div>");
    $xTxt->addEvent("jsActualizarPago", "onkeyup");
    //$xTxt->setDropProperty("disabled");
    $xFrm->addHElem(array($xSel1->get("Cheque 1.- Banco"), $xTxt2->get("iNumeroCheque1", "", "Cheque 1.- Numero"), $xTxt->getDeMoneda("iMontoCheque1", "Cheque 1.- Monto", 0)));
    $xFrm->addHElem("<div class='title'>TOTAL : <mark id='idtotal'>0</mark></div>");
    $xFrm->addHTML("<input type='hidden' id='iRecibo' name='iRecibo' value='{$recibo}' />");
    $xFrm->addHTML("<input type='hidden' id='iDiferencia' name='iDiferencia' value='0' />");
    $xFrm->addHTML("<input type='hidden' id='iTotal' name='iTotal' value='{$MontoOperacion}' />");
    $xFrm->addHTML("<div id='avisos'></div>");
    echo $xFrm->get();
    echo $xP->setBodyEnd();
    //=========================== HTML
    ?>
<script>
	var oCh1	= $("#iMontoCheque1");
	var oTot	= $("#iTotal");
	var oNCh1	= $("#iNumeroCheque1");
	var onEnd	= false;
	
function initComponents(){
	oNCh1.focus(); oNCh1.select();
$credito = parametro("solicitud", $credito, MQL_INT);
$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$persona = parametro("i", $persona, MQL_INT);
$xHP->init();
$xFRM = new cHForm("frm", "./");
$msg = "";
$ssql = $xL->getListadoDeCuentasDeCapt($persona, false, $tipo, $subtipo);
$tb = new cTabla($ssql);
$tb->setEventKey("setCuenta");
//$tb->
$xFRM->addHTML($tb->Show());
$xFRM->addCerrar();
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
?>
<script  >
function setCuenta(id){
	msrc	= null;
	if (window.parent){ msrc = window.parent.document; }
	if (opener){ msrc = opener.document; }
<?php 
if ($f != false) {
    echo "\n\t\t\tif(msrc == null){} else {\n\t\t\t\tmsrc.{$f}.{$c}.value \t= id;\n\t\t\t\tmsrc.{$f}.{$c}.focus();\n\t\t\t\tmsrc.{$f}.{$c}.select();\n\t\t\t\t//if(typeof msrc.jsGetDescCredito != \"undefined\"){ msrc.jsGetDescCredito();\t}\n\t\t\t}";
    if ($OtherEvent != "") {
        echo "if(msrc == null){} else { msrc.{$OtherEvent};}";
    }
$xSel = new cHSelect();
$jsb->setNameForm($xFRM->getName());
$selcat = $xSel->getListaDeTipoDeRiesgoEnAML();
$selcat->addEvent("onblur", "jsGetListadoAvisos()");
$selcat->addEvent("onchange", "jsGetListadoAvisos()");
$selcat->addEspOption(SYS_TODAS);
$selcat->setOptionSelect(SYS_TODAS);
$xFRM->OHidden("idfecha-1", "", "");
$xFRM->OHidden("idfecha-2", "", "");
//$xFRM->addHElem( $xDate->get( $xFRM->lang("fecha inicial"), $xF->getDiaInicial(), 1 ));
//$xFRM->addHElem( $xDate->get( $xFRM->lang("fecha final"), $xF->getDiaFinal(), 2 ));
$xFRM->addHElem($selcat->get(true));
$xFRM->addSubmit("", "jsGetListadoAvisos()");
$xFRM->OCheck("TR.Mostrar Inactivas", "idactivas");
//$xFRM->addCreditBasico();
$xFRM->addHTML("<div id='lstalertas'></div>");
$xFRM->addAviso("", "idmsg");
echo $xFRM->get();
echo $xHP->setBodyEnd();
$jsb->show();
$jxc->drawJavaScript(false, true);
?>
<!-- HTML content -->
<script>
var xG		= new Gen();
function jsGetListadoAvisos(){
	jsaGetListadoDeAvisos();
}
function jsModificarEstatus(id){
	xG.w({ url : "estatus_de_alerta.frm.php?codigo=" +id , w: 800, h: 600, tiny : true, callback: jsGetListadoAvisos  });
}
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//=====================================================================================================
$xHP = new cHPage("TR.Tipos de Operacion", HP_FORM);
$xT = new cTipos();
$xIcs = new cFIcons();
$xHP->init();
$clave = parametro("idoperaciones_tipos", null, MQL_INT);
$xFRM = new cHForm("frmoperaciones_tipos", "operaciones_tipos");
$xFRM->OButton("TR.General", "jsGetGrid('general')", $xIcs->REPORTE);
$xFRM->OButton("TR.Contabilidad", "jsGetGrid('contable')", $xIcs->CONTABLE);
$xFRM->OButton("TR.Clase", "jsGetGrid('clase')", $xIcs->TIPO);
$xFRM->OButton("TR.Formulas", "jsGetGrid('formulas')", $xIcs->TIPO);
$xFRM->addHTML("<iframe src='../principal.php' id='ifoperaciones' height='800'></iframe>");
echo $xFRM->get();
?>
<script>
	function jsGetGrid(ctipo) {
		var xG	= new Gen();
		//xG.w({ url : "operaciones_tipos.grid.php?tipo=" + ctipo });
		$("#ifoperaciones").attr("src", "operaciones_tipos.grid.php?tipo=" + ctipo );
	}
	/* <iframe src="http://webdesign.about.com/od/iframes/a/aaiframe.htm" width="300" height="600">A page about learning iFrames</iframe> */
</script>
<?php 
$xHP->end();
?>
 
$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){
			jsaGuardarReestructura();
        $credito = $xCred->getNumeroDeCredito();
        //Si es Automatizado
        $xCat = new cCreditosOtrosDatos();
        if ($tieneprops == true) {
            $xCred->setOtrosDatos($xCat->AML_CON_PROPIETARIO, "1");
        }
        if ($tieneprovs == true) {
            $xCred->setOtrosDatos($xCat->AML_CON_PROVEEDOR, "1");
        }
        if ($xCred->getTipoDeAutorizacion() == CREDITO_TIPO_AUTORIZACION_AUTOMATICA) {
            //$saldo_actual = $monto_autorizado;
            //TODO: Acabar con este modulo
            $xFRM->addToolbar($xBtn->getBasic($xHP->lang("Imprimir", "Orden de Desembolso"), "jsImprimirOrdenDeDesembolso()", "imprimir", "cmdprintdes", false));
        }
        //----------------------------------------------------------------------
        $xFRM->addHTML($xCred->getFichaDeSocio());
        $xFRM->addHTML($xCred->getFicha());
        $xFRM->addCreditoComandos($xCred->getNumeroDeCredito());
        $xFRM->addToolbar($xBtn->getBasic("TR.Autorizar credito", "var CGen=new CredGen();CGen.getFormaAutorizacion({$credito})", "imprimir", "cmdprintdes5", false));
        $xFRM->addToolbar($xBtn->getBasic("TR.GENERAR PLAN_DE_PAGOS", "var CGen=new CredGen();CGen.getFormaPlanPagos({$credito})", "reporte", "generar-plan", false));
    }
}
$msg .= $xSoc->getMessages();
$xFRM->addAviso($msg);
echo $xFRM->get();
?>
<script>
var xGen	= new Gen();
var CGen	= new CredGen();

var idcredito	= <?php 
if (setNoMenorQueCero($idsocio) <= DEFAULT_SOCIO) {
    $xFRM = new cHForm("extrasocios", "socios.panel.frm.php");
    $xBtn = new cHButton();
    $xTxt = new cHText();
    $xFRM->setTitle($xHP->getTitle());
    $xFRM->addPersonaBasico();
    $xFRM->addSubmit();
    echo $xFRM->get();
} else {
    $xSoc = new cSocio($idsocio, true);
    $xHTabs = new cHTabs();
    $xBtn = new cHButton("");
    $oFrm = new cHForm("extrasocios", "");
    $xHSel = new cHSelect();
    $oFrm->OButton("TR.Recargar", "jsRecargar()", $oFrm->ic()->RECARGAR);
    $oFrm->addHTML($xSoc->getFicha(true));
    $oFrm->addPersonaComandos($idsocio);
    if (getEsModuloMostrado(USUARIO_TIPO_OFICIAL_CAPT) == true or getEsModuloMostrado(USUARIO_TIPO_OFICIAL_CRED) == true) {
        //Agregar otra opciones
        $oFrm->addToolbar($xBtn->getBasic("TR.Actualizar Datos", "updateDat()", "editar", "edit-socio", false));
        $oFrm->addToolbar($xBtn->getBasic("TR.Agregar Descuento Solicitado", "jsAddDescuento()", "dinero", "edit-descuento", false));
        $oFrm->OButton("TR.Reporte SIC", "jsGetCirculoDeCredito()", $xBtn->ic()->REPORTE);
        $oFrm->addToolbar($xBtn->getBasic("TR.Enviar a Empresa Asociada", "jsaSetEnviarParaAsociada()", $xBtn->ic()->EXPORTAR, "edit-aasoc", false));
    }
    //===============================================================================
    $setSql4 = $xql->getListadoDeNotas($idsocio);
    $c4Tbl = new cTabla($setSql4);
    $c4Tbl->setKeyField("idsocios_memo");
    $c4Tbl->addTool(2);
    $xHTabs->addTab($oFrm->lang("NOTAS"), $c4Tbl->Show());
    //1
     $oFrm->addToolbar($xBtn->getRegresar("../index.xul.php?p=frmcreditos/creditos.panel.frm.php", true));
     $oFrm->addCreditBasico();
     $oFrm->addSubmit();
     $oFrm->addAviso($xCred->getMessages());
     //echo $oFrm->get();
 } else {
     if (setNoMenorQueCero($idsocio) <= 0) {
         $idsocio = $xCred->getClaveDePersona();
     }
     $xOPdto = $xCred->getOProductoDeCredito();
     if ($idsocio != $xCred->getClaveDePersona()) {
         $msg = "ERROR\tLa Persona {$idsocio} no es la propietaria del credito, el credito marca " . $xCred->getClaveDePersona() . "\r\n";
         $oFrm->addToolbar($xBtn->getRegresar("../index.xul.php?p=frmcreditos/creditos.panel.frm.php", true));
         $oFrm->addAviso($msg);
     } else {
         $oFrm->addHTML($xCred->getFichaDeSocio(true));
         $oFrm->addHTML($xCred->getFicha(true, "", true));
         $codigo_de_oficial = $xCred->getClaveDeOficialDeCredito();
         if (MODO_DEBUG == true) {
             $oFrm->addToolbar($xBtn->getBasic("TR.EDICION_AVANZADA", "jsActualizarCreditoRAW()", "aviso", "edit-credito2", false));
             $oFrm->addToolbar($xBtn->getBasic("TESTING", "var xG=new Gen();xG.w({url:'../unit/core.creditos.test.php?credito={$idsolicitud}'})", "checar", "test-cred", false));
         }
         $oFrm->addCreditoComandos($idsolicitud);
         $oFrm->addToolbar($xBtn->getBasic("TR.ACTUALIZAR DATOS", "jsActualizarCredito()", "editar", "edit-credito", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR PAGARE", "printpagare()", "dinero", "view-pagare", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR formato NOTARIAL", "cedulanotario({$idsolicitud})", "reporte", "view-cedula", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.ORDEN_DE_DESEMBOLSO", "printodes()", "imprimir", "print-order", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.CONTRATO", "contratocredito()", "imprimir", "print-contrato", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR RECIBO DE credito", "printrec()", "imprimir", "print-recP", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR MANDATO", "printMandato()", "imprimir", "print-mandato", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.ESTADO_DE_CUENTA", "getEstadoDeCuenta({$idsolicitud})", "statistics", "estado-cta", false));
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frmbuscargrupos", "./");
$xTxt = new cHText();
$msg = "";
//$xFRM->OText("idbusqueda", "", "TR.Buscar Grupo");
//$xFRM->addHElem(  );
$xTxt->setDivClass("");
$xTxt->addEvent("jsaGetGrupos()", "onkeyup");
$xFRM->addDivSolo($xTxt->getNormal("idbusqueda", "", "TR.Nombre"), " ");
$xFRM->OButton("TR.Buscar", "jsaGetGrupos()", "buscar");
$xFRM->addHTML("<div class='tx1' id='listabusqueda'></div>");
//$xFRM->addJsBasico();
//$xFRM->addCreditBasico();
//$xFRM->addSubmit();
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
<script>
function setGrupo(id){
	if (window.parent){ msrc = window.parent.document; }
	if (opener){ msrc = opener.document; }
<?php 
if (trim($jscallback) != "") {
    echo "msrc.{$jscallback}(id);";
}
if (trim($form) != "") {
            } else {
                $recibo = $xCta->setRetiro($monto, $cheque, $comopago, $foliofiscal, $detalles, DEFAULT_GRUPO, $Fecha);
            }
        } else {
            $sucess = false;
        }
        if (MODO_DEBUG == true) {
            $msg .= $xCta->getMessages();
        }
        $xFRM->addAviso($msg);
        if ($sucess == true) {
            //Imprime la Ficha del socio
            $xCta->init();
            $xSoc = new cSocio($xCta->getClaveDePersona());
            $xSoc->init();
            $xFRM->addHTML($xSoc->getFicha());
            $xFRM->addHTML($xCta->getFicha(true));
            $xFRM->addHTML($xCta->getORec()->getFicha(true));
            $xFRM->addHTML($xCta->getORec()->getJsPrint(true));
            // *****************************************************************************
            $xFRM->addPrintRecibo();
            $xFRM->addAvisoRegistroOK();
        }
    }
}
echo $xFRM->get();
?>
</body>
<?php 
/*$jsb	= new jsBasicForm("retiroahorro", iDE_CAPTACION);
//$jsb->setConCaptacion(true);
$xDate = new cHDate();
$xSel = new cHSelect();
$jsb->setNameForm($xFRM->getName());
$xFRM->addHElem($xSel->getListaDePerfilTransaccional()->get("TR.tipo de perfil", true));
$xFRM->addHElem($xSel->getListaDePaises()->get("TR.pais de origen", true));
$xFRM->addHElem($xTxt->getDeMoneda("idmonto", "TR.monto maximo de operaciones mensuales"));
$xFRM->addHElem($xTxt->getDeMoneda("idnumero", "TR.numero maximo de operaciones mensuales"));
//$xFRM->addHElem(  );
$arr = array_merge($xTxt->getIDs(), $xTxt2->getIDs(), $xSel->getIDs());
$xFRM->addHElem($xTxt2->get("idobservaciones", "", "TR.observaciones"));
//$xFRM->addHElem( $xTxt->get("idnumero", 0, "TR.Numero maximo de operaciones mensuales"));
//$xFRM->addCreditBasico();
$QL = new cSQLListas();
$xT = new cTabla($QL->getListadoDePerfil($persona));
$xT->addTool(SYS_DOS);
$xFRM->addHTML("<div id='idperfil'>" . $xT->Show() . "</div>");
$xFRM->addHTML("<input type='hidden' value='{$persona}' id='idpersona' />");
//$xFRM->addAviso( $xFRM->getProcessIDs($arr) );
$xFRM->addSubmit("", "setGuardarRegistro()");
echo $xFRM->get();
echo $xHP->setBodyEnd();
//$jsb->show();
$jxc->drawJavaScript(false, true);
?>
<!-- HTML content -->
<script>
    function setGuardarRegistro() {
		jsaGuardarPerfil();
		document.getElementById("id-frmperfiltransaccional").reset();
    }
</script>
$xFRM = new cHForm("frmPreRecibo", "frmcobrosdecreditos2.php");
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
$msel = $xSel->getListaDeProductosDeCredito();
$msel->addEvent("onchange", "initComponents()");
$xDate->setDivClass("");
$xFRM->addDivSolo($xDate->get("TR.Fecha"), "<div id='mscom'></div>", "tx14", "tx34");
$xFRM->addCreditBasico();
$xTxt->addEvent("jsaGetLetras();jsaGetVerifyPlan();", "onfocus");
$xTxt->setDivClass("");
$props = array(1 => array("id" => "divparcialidad"));
$xFRM->addDivSolo($xTxt->get("idparcialidad", "", "TR.Numero de Parcialidad", "", false, CTRL_GOLETRAS), "<p class='aviso' id='aviso'></p>", "tx14", "tx34", $props);
$xDate->addEvents("onblur=\"initComponents()\" onchange=\"initComponents()\" ");
$xFRM->addHTML("<div id='lst' class='inv'></div>");
$xFRM->addSubmit("", "setFrmSubmit()");
$xFRM->addToolbar($xBtn->getBasic("TR.Letras Pendientes", "jsObtenerLetras()", "ejecutar", "cmdGetLetras", false));
$xFRM->addToolbar($xBtn->getBasic("TR.panel_de_control_de", "jsGoPanel()", "panel", "idgetpanel", false));
$xFRM->addToolbar($xBtn->getBasic("TR.Estado de Cuenta", "getEdoCtaCredito()", "reporte", "cmdEdoCta", false));
echo $xFRM->get();
?>
</body>
<?php 
$jbf->show();
?>
<script>
var Wo			= new Gen();
var onAsClicked = false;
var mCURFrm 	= document.getElementById("id-frmPreRecibo");
var jrsFileE 	= "./jscaja.js.php";
$xTabs = new cHTabs();
$xFRM->addPersonaBasico("", false, $idsocio);
$xFRM->OText("nombrecorto", $alias, "TR.Nombre_corto");
$xFRM->addHElem($xTxt2->getDeNombreDePersona("iddirectivo", $iddirectivo, "TR.Clave_de_Persona del Contacto"));
$xFRM->OText("directivo", $directivo, "TR.Nombre de Contacto");
$xFRM->addHElem($xSel->getListaDeProductosDeCredito("", $producto)->get(true));
$xTabs->addTab("TR.Periocidad 1", $xSel->getListaDePeriocidadDePago("idperiocidad1", $periocidad1)->get("TR.Periocidad de pago", true));
$xTabs->addTab("TR.Periocidad 1", $xTxt->getNormal("dias_de_aviso1", $diasaviso1, "TR.Dias de Aviso"));
$xTabs->addTab("TR.Periocidad 1", $xTxt->getNormal("dias_de_nomina1", $diasnomina1, "TR.Dias de Nomina"));
$xTabs->addTab("TR.Periocidad 1", $xTxt->getNormal("dias_de_pago1", $diaspago1, "TR.Dias de Pago"));
$xTabs->addTab("TR.Periocidad 2", $xSel->getListaDePeriocidadDePago("idperiocidad2", $periocidad1)->get("TR.Periocidad de pago", true));
$xTabs->addTab("TR.Periocidad 2", $xTxt->getNormal("dias_de_aviso2", $diasaviso2, "TR.Dias de Aviso"));
$xTabs->addTab("TR.Periocidad 2", $xTxt->getNormal("dias_de_nomina2", $diasnomina2, "TR.Dias de Nomina"));
$xTabs->addTab("TR.Periocidad 2", $xTxt->getNormal("dias_de_pago2", $diaspago2, "TR.Dias de Pago"));
$xFRM->addAviso($msg);
$xFRM->addHTML($xTabs->get());
$xFRM->addHElem($xSel->getListaDeOficiales("", "", $oficial)->get(true));
$xFRM->OText("idemail1", $mail1, "TR.Email de contacto 1");
$xFRM->OText("idemail2", $mail2, "TR.Email de contacto 2");
$xFRM->OText("idemail3", $mail3, "TR.Email de contacto 3");
$xFRM->addSubmit();
// $dias_de_aviso = "", $periocidad_de_aviso, $nombre_corto = "", $oficial_a_cargo = false
//
if ($step != MQL_MOD) {
    $mtbl = new cTabla($xLi->getListadoDeEmpresas());
    $mtbl->setKeyField("idsocios_aeconomica_dependencias");
    //$mtbl->addTool(SYS_UNO);
    //$mtbl->addTool(SYS_DOS);
    $mtbl->OButton("TR.Editar", "var xEmp = new EmpGen(); xEmp.setActualizarDatos(" . HP_REPLACE_ID . ")", $xFRM->ic()->EDITAR);
    $mtbl->OButton("TR.Panel", "jsGoToPanel(" . HP_REPLACE_ID . ")", $xFRM->ic()->EJECUTAR);
    $mtbl->setWithMetaData();
    $xFRM->OHidden("idrazonnofiel", "GRUPO INFORMAL", "TR.Razones por la cual no tiene FIEL");
}
$xFRM->endSeccion();
$xFRM->addSeccion("idintegrantes", "TR.Integrantes");
$xFRM->addPersonaBasico("2", false, false, "", "TR.Representante de Grupo");
$xFRM->addPersonaBasico("3", false, false, "", "TR.Vocal de Grupo");
$xFRM->addPersonaBasico("4", false, false, "", "TR.Integrante de grupo");
$xFRM->addPersonaBasico("5", false, false, "", "TR.Integrante de grupo");
$xFRM->addPersonaBasico("6", false, false, "", "TR.Integrante de grupo");
$xFRM->addPersonaBasico("7", false, false, "", "TR.Integrante de grupo");
$xFRM->addPersonaBasico("8", false, false, "", "TR.Integrante de grupo");
$xFRM->addPersonaBasico("9", false, false, "", "TR.Integrante de grupo");
//$xFRM->OMoneda("iddescuento", 0, "TR.Descuento Deseado");
//$xFRM->addHElem( $xSel->getListaDeEmpresas("idempresa")->get(true) );
//$xFRM->addGrupoBasico();
$xFRM->addHTML("<datalist id=\"dlBuscarPersona\" ><option /></datalist>");
//$xFRM->endSeccion();
//$xFRM->addSeccion("iddatosgenerales", "TR.Domicilio");
//========================================================================== domicilio
//$xFRM->endSeccion(); $xFRM->addSeccion("iddomicilio", "TR.Domicilio");
$xFRM->endSeccion();
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
<script>
var gn			= new Gen();
var val			= new ValidGen();
var errors		= 0;
$(document).ready(function () {
	$('#id-frmsolingreso').isHappy({
	    fields: {
         $integrantes[] = parametro("idsocio7", false, MQL_INT);
         $integrantes[] = parametro("idsocio8", false, MQL_INT);
         $integrantes[] = parametro("idsocio9", false, MQL_INT);
         foreach ($integrantes as $key => $idpersona) {
             if (setNoMenorQueCero($idpersona) > DEFAULT_SOCIO) {
                 $xGrupo->addIntegrante($idpersona);
             }
         }
         if (MODO_DEBUG == true) {
             $msg .= $xGrupo->getMessages();
         }
     }
 }
 //Agregar Domicilio si existe
 $persona = $xSoc->getCodigo();
 $xFRM->addHTML($xSoc->getFicha());
 $lastpersona = $xCL->getUltimoSocioRegistrado(true);
 $xFRM->addPersonaComandos($persona);
 $xFRM->addAvisoRegistroOK();
 //==================================== Nuevas Relaciones
 if ($origen_relacion == false) {
     $xTbl = new cHTabla("idtblrels");
     $xHSel = new cHSelect();
     $xChk = new cHCheckBox();
     $xText = new cHText();
     $xText->setDivClass("");
     $xChk->setDivClass("");
     $xBtn = new cHButton();
     $xUl = new cHUl();
     $li = $xUl->getO();
     $li->setT("ul");
$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();
	function jsGetListadoAvisos(){
		jsaGetListadoDeAvisos();
	}
$xHP->init();
$xJs = new jsBasicForm("frm");
$xJs->setIncludeJQuery();
$xFRM = new cHForm("frm", "cuentas.panel.frm.php");
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
if ($cuenta <= 0) {
    $xFRM->addJsBasico(iDE_CAPTACION);
    $xFRM->addCuentaCaptacionBasico(true);
    $xFRM->addSubmit();
} else {
    $xCta = new cCuentaDeCaptacion($cuenta);
    $xCta->init();
    $xFRM->addHTML($xCta->getFicha(true, "", true));
    $xFRM->addSubmit();
    //$xFRM->addToolbar( $xBtn->getBasic("TR.refrescar", "jsRecargar()", "refrescar", "refrescar", false ) );
    //$xFRM->addToolbar( $xBtn->getBasic("TR.imprimir contrato", "jsRecargar()", "refrescar", "refrescar", false ) );
    $xFRM->addCaptacionComandos($cuenta);
    $xHTabs = new cHTabs();
    $cTblx = new cTabla($mSQL->getListadoDeRecibos("", $xCta->getClaveDePersona(), $xCta->getNumeroDeCuenta()));
    $cTblx->setKeyField("idoperaciones_recibos");
    $cTblx->setTdClassByType();
    $cTblx->setEventKey("jsGoPanelRecibos");
    $xHTabs->addTab("TR.RECIBOS", $cTblx->Show());
    $xFRM->addHTML($xHTabs->get());
    $xFRM->OHidden("idcuentacaptacion", $cuenta);
    /*
    	 * <fieldset>
    				<legend>Barra de Acciones</legened>
 $OProd = $xCred->getOProductoDeCredito();
 $OPer = $xCred->getOPeriocidad();
 $fecha_de_mora = $xF->setSumarDias($OProd->getDiasTolerados() + 1, $fecha_de_vencimiento);
 $vencimiento_dinamico = $xF->setSumarDias($OPer->getDiasToleradosEnVencer(), $fecha_de_mora);
 $arrUpdate = array("plazo_en_dias" => $dias_netos, "dias_autorizados" => $dias_netos, "fecha_vencimiento" => $fecha_de_vencimiento, "monto_parcialidad" => $primera_parcialidad, "contrato_corriente_relacionado" => $cuenta_captacion, "tipo_de_pago" => $FormaDePago, "fecha_ministracion" => $fecha_ministracion, "interes_diario" => $interes_diario, "fecha_mora" => $fecha_de_mora, "fecha_vencimiento_dinamico" => $vencimiento_dinamico, "fecha_de_primer_pago" => $fecha_primer_abono);
 if ($xCred->getSaldoActual() == $xCred->getMontoAutorizado() or $xCred->getEsAfectable() == false) {
     $arrUpdate["ultimo_periodo_afectado"] = SYS_CERO;
 }
 //Pagos de solo interes
 if ($xCred->getPagosSinCapital() == true) {
     $arrUpdate["ultimo_periodo_afectado"] = $ultima_parcialidad;
 }
 $xCred->setUpdate($arrUpdate);
 // -------------------------------------------- Actualiza el Saldo del Recibo
 $xCred->init();
 $xFRM->addHTML($xCred->getFicha(true, "", false, true));
 $xFRM->addHTML($xPlan->getFicha());
 $sqlparc = "SELECT periodo_socio AS 'parcialidad', MAX(fecha_afectacion) AS 'fecha_de_pago', SUM((afectacion_real * valor_afectacion)) AS 'total_parcialidad',\n\t\t\t\t\t MAX(saldo_anterior) AS 'saldo_anterior_', MIN(saldo_actual) AS 'saldo_actual_' FROM operaciones_mvtos\n\t\t\t\tWHERE recibo_afectado={$idrecibo} GROUP BY periodo_socio ORDER BY periodo_socio";
 $cTMvtos = new cTabla($sqlparc);
 $cTMvtos->setWidth();
 $xFRM->addHTML($cTMvtos->Show());
 $urctr = $xCred->getPathDelContrato();
 $urlsend = $DProducto->getPathPagare($solicitud);
 $xFRM->addAviso("Dias Totales: {$dias_netos} -- Vence: {$fecha_de_vencimiento}");
 $xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "plan de pagos"), "jsImprimirPlanPagos({$idrecibo})", "lista", "cm1", false));
 $xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "orden de desembolso"), "jsImprimirOrdenDesembolso()", "lista", "cm2", false));
 $xFRM->addToolbar($xBtn->getBasic($xFRM->lang(array("imprimir", "CONTRATO de", "credito")), "jsImprimirContrato()", "lista", "cm3", false));
 $xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "recibo"), "jsImprimirReciboDePrestamo()", "lista", "cm4", false));
 $xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "mandato"), "jsImprimirMandato()", "lista", "cm5", false));
 $xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "pagare"), "jsImprimirPagare()", "lista", "cm6", false));
 $xFRM->addHElem("<div class='tx4'><label for='idNoAvales'>No Mostrar Avales</label><input name=\"noAvales\" id=\"idNoAvales\" type=\"checkbox\" onchange=\"setNoAvales()\" /></div>");
$c = parametro("c", false, MQL_RAW);
$f = parametro("f", false, MQL_RAW);
$xHP->init();
$xFRM = new cHForm("frmsearchrecs", "./");
$xSel = new cHSelect();
$xFRM->addPersonaBasico();
$sqlsel = "SELECT\n\t\t\t\t\t\t\t`operaciones_recibostipo`.`idoperaciones_recibostipo` AS `tipo`,\n\t\t\t\t\t\t\t`operaciones_recibostipo`.`descripcion_recibostipo`   AS `descripcion`\n\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t`operaciones_recibostipo` `operaciones_recibostipo`";
$mSel = $xSel->getListadoGenerico($sqlsel, "idTipoRecibo");
$mSel->addEspOption(SYS_TODAS);
$mSel->addEvent("onchange", "getListRecibos()");
$xFRM->addHElem($mSel->get("TR.Tipo de Recibo", true));
$xFRM->addCerrar();
$xFRM->OButton("TR.Buscar", "getListRecibos()", "buscar");
//$xFRM->addSubmit();
$xFRM->addJsBasico(iDE_SOCIO);
$xFRM->addHTML('<fieldset><legend>Resultados de la Busqueda</legend><div id="lst-resultados"></div></fieldset>');
echo $xFRM->get();
?>
</body>
<?php 
$jxc->drawJavaScript(false, true);
?>
<script  >
function setRecibo(id){
	if (window.parent){ msrc = window.parent.document; }
	if (opener){ msrc = opener.document; }
<?php 
if ($f != false) {
    echo "\n\t\t\tif(msrc == null){} else {\n\t\t\t\tmsrc.{$f}.{$c}.value \t= id;\n\t\t\t\tmsrc.{$f}.{$c}.focus();\n\t\t\t\tmsrc.{$f}.{$c}.select();\n\t\t\t}";
    /*if( $OtherEvent != ""){
    				echo "if(msrc == null){} else { msrc.$OtherEvent;}";
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$clave = parametro("id", null, MQL_INT);
$xHP->init();
$xFRM = new cHForm("frm", "./");
$msg = "";
//$xFRM->addJsBasico();
//$xFRM->addCreditBasico();
$xFRM->addSubmit();
$xP = new cCreditos_productos_otros_parametros();
$xGrid = new cHGrid("idotrosdatos", $xHP->getTitle());
$xGrid->addkey($xP->idcreditos_productos_otros_parametros()->get(), "false");
$xGrid->addElement($xP->clave_del_parametro()->get(), "TR.Parametro", "50%");
$xGrid->addElement($xP->valor_del_parametro()->get(), "TR.Valor", "50%");
$where = base64_encode(" `clave_del_producto`={$clave} ");
$xGrid->setListAction("../svc/datos.svc.php?out=jtable&tabla=creditos_productos_otros_parametros&w={$where}");
$xFRM->addHTML($xGrid->getDiv());
echo $xFRM->get();
echo $xGrid->getJsHeaders();
?>
<script>
$(document).ready(function () {
	<?php 
echo $xGrid->getJs(true);
?>
});
</script>
<?php 
//$jxc ->drawJavaScript(false, true);
$xHP->fin();
$xDate = new cHDate();
$xSel = new cHSelect();
$xChk = new cHCheckBox();
$msg = "";
$xFRM->setTitle("TR.purgar de entidadades federativas");
$xFRM->addJsBasico();
//$xFRM->addCreditBasico();
$mql = new MQL();
//Obtener lista de estados
$sql = "SELECT * FROM `general_estados` ";
$data = $mql->getDataRecord($sql);
$cEs = new cGeneral_estados();
foreach ($data as $rows) {
    $cEs->setData($rows);
    if ($action == SYS_NINGUNO) {
        $xFRM->addHTML($xChk->get($cEs->nombre()->v(), "estado" . $cEs->clave_numerica()->v()));
    } else {
        $eliminar = parametro("estado" . $cEs->clave_numerica()->v(), false, MQL_BOOL);
        $estado = $cEs->clave_numerica()->v();
        if ($eliminar == true) {
            my_query("DELETE FROM `general_colonias` WHERE `codigo_de_estado` = {$estado} ");
            my_query("DELETE FROM `general_municipios` WHERE `clave_de_entidad` = {$estado} ");
            //my_query("DELETE FROM `catalogos_localidades` WHERE `clave_de_estado` = $estado ");
        }
    }
}
$xFRM->addSubmit();
echo $xFRM->get();
echo $xHP->setBodyEnd();
//$jxc ->drawJavaScript(false, true);
?>
    $xSoc->init();
    $xSoc->setVerificacion($tipo, $id, $fecha, $notas, $oficial);
    return $xSoc->getMessages(OUT_HTML);
}
$jxc->exportFunction('jsaGuardarVerificacion', array('idfechaverificacion', 'idoficial', 'idtipo', 'idclave', "idnotas", 'idsocio'), "#avisos");
$jxc->process();
$tipo = $_REQUEST["t"];
$id = $_REQUEST["i"];
$socio = $_REQUEST["s"];
$xHP->init();
//d = domicilio t = trabajo y o actividad economica
$xFRM = new cHForm("socios_verificacion", "socios_verificacion.frm.php");
$xHSel = new cHSelect();
$xOfi = $xHSel->get("idoficial", "Oficial a Cargo", getUsuarioActual(), TVISTA_OFICIALES);
$xFRM->ODate("idfechaverificacion", false, "TR.Fecha de Verificacion");
$xFRM->addHElem($xOfi);
$xFRM->OTextArea("idnotas", "", "TR.Observaciones");
$xFRM->addHTML("<input type='hidden' id='idtipo' value='{$tipo}' >");
$xFRM->addHTML("<input type='hidden' id='idclave' value='{$id}' >");
$xFRM->addHTML("<input type='hidden' id='idsocio' value='{$socio}' >");
$xFRM->addHTML("<div class='aviso' id='avisos'></div>");
$xFRM->addSubmit("Guardar Verificacion", "jsGuardarVerificacion()");
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
<script  >
var xG	= new Gen();	
function jsGuardarVerificacion(){	jsaGuardarVerificacion(); jsCloseWithTimer(1500); }
</script>
<?php 
$xHP->fin();
//$jxc ->exportFunction('jsAgregarContrato', array('idsolicitud', 'idparcialidad'), "#iddatos_pago");
$jxc->process();
//ini_set("display_errors", "on");
$xHP->init("initComponents()");
if ($action == SYS_NINGUNO) {
    $xFRM->addHElem($xFMT->getSelectDeFormatos()->get(true));
    $xFRM->addSubmit();
} elseif ($action == SYS_UNO) {
    //editar
    $xFMT->init($idcontrato);
    $titulo = $xFMT->getTitulo();
    $xFRM->setTitle($titulo);
    $xFRM->addHElem($xFMT->getSelectVariables("", "onchange=\"jsAddText()\" "));
    $xFRM->addSubmit("", "", "");
    $text_default = $xFMT->get();
    $xFRM->addHTML("<textarea class=\"ckeditor\" name=\"ckeditor\" id=\"ckeditor\" rows=\"20\" cols=\"15\">{$text_default}</textarea>");
    $xFRM->addFootElement("<input type='hidden' value='{$idcontrato}' name='idcontrato' />");
    $xFRM->setAction("frmeditor_contratos.php?action=2");
} elseif ($action == SYS_DOS) {
    //guardar
    $s = isset($_REQUEST["ckeditor"]) ? $_REQUEST["ckeditor"] : "";
    $i = parametro("idcontrato");
    $text_default = stripslashes($s);
    if ($s != "" && $i != "") {
        $sqluc = "UPDATE general_contratos SET texto_del_contrato='{$s}' WHERE idgeneral_contratos={$i}";
        $x = my_query($sqluc);
        if ($x[SYS_ESTADO] != false) {
            //$xFRM->addSubmit("", "", "");echo $text_default;
            $xFRM->addSubmit("", "getForma({$i})");
        } else {
            $xFRM->addAviso("SURGIO UN PROBLEMA AL GUARDAR");
$fecha = parametro("idfechaactual", false, MQL_DATE);
//descuentos
$creditodescontado = parametro("idcreditodescontado", 0, MQL_INT);
$montocreditodesc = parametro("idmontocreditodescontado", 0, MQL_FLOAT);
$montocomision = parametro("idmontocomisiondescontado", 0, MQL_FLOAT);
$xHP->init();
$xFRM = new cHForm("frmacciones", "./");
if ($idsolicitud <= 0 or $monto_cheque1 <= 0) {
    echo JS_CLOSE;
} else {
    $xCred = new cCredito($idsolicitud, $idsocio);
    $xCred->init();
    if ($xCred->getEstadoActual() == CREDITO_ESTADO_AUTORIZADO or $monto_cheque1 <= 0) {
        $recibo = $xCred->setMinistrar($recibo_fiscal, $cheque, $monto_cheque1, $cuenta_cheques, $cheque2, $cuenta_cheques2, $observaciones, $fecha);
        if (setNoMenorQueCero($recibo) > 0) {
            $xFRM->addHTML($xCred->getFichaDeSocio());
            $xFRM->addHTML($xCred->getFicha());
            $xFRM->OButton("TR.RECIBO DE MINISTRACION", "jsImprimirReciboMinistracion()", $xFRM->ic()->REPORTE, "id4");
            $xFRM->addToolbar($xBtn->getIrAlInicio(true));
            $uPagare = "elUrl='" . $xCred->getOProductoDeCredito()->getPathPagare($idsolicitud) . "';";
            $uContrato = "esUrl='" . $xCred->getPathDelContrato() . "';";
            if ($creditodescontado >= DEFAULT_CREDITO) {
                $xDCred = new cCredito($creditodescontado);
                $xDCred->init();
                $saldodesc = $xDCred->getSaldoActual($fecha);
                if ($saldodesc < $montocreditodesc) {
                    $montocreditodesc = $saldodesc;
                    $montocomision = $montocomision + ($montocreditodesc - $saldodesc);
                }
                $idrecibocap = $xDCred->setAbonoCapital($montocreditodesc, SYS_UNO, $cheque, TESORERIA_COBRO_DESCTO, $recibo_fiscal, $observaciones);
                if (setNoMenorQueCero($idrecibocap) > 0) {
$persona = parametro("idsocio", $persona, MQL_INT);
$credito = parametro("credito", DEFAULT_CREDITO, MQL_INT);
$credito = parametro("idsolicitud", $credito, MQL_INT);
$credito = parametro("solicitud", $credito, MQL_INT);
$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frmseguimiento_llamadas", "llamadas.frm.php");
if ($credito > DEFAULT_CREDITO) {
    $xCred = new cCredito($credito);
    $xCred->init();
    $xFRM->addHTML($xCred->getFicha(true, "", false, true));
    /* -----------------  -----------------------*/
    $clave = parametro("idseguimiento_llamadas", null, MQL_INT);
    $xTabla = new cSeguimiento_llamadas();
    if ($clave != null) {
        $xTabla->setData($xTabla->query()->initByID($clave));
    }
    $xTabla->setData($_REQUEST);
    $clave = parametro("id", null, MQL_INT);
    $xSel = new cHSelect();
    if ($clave == null) {
        $step = MQL_ADD;
        $clave = $xTabla->query()->getLastID() + 1;
        $xTabla->idseguimiento_llamadas($clave);
    } else {
        $step = MQL_MOD;
            } else {
                $msg .= "WARN\tLINEA OMITIDA\r\n";
            }
        }
        $msg .= $xCred->getMessages();
        $msg .= $xPlan->getMessages();
        $mObj = $xPlan->getObjRec();
        if ($mObj != null) {
            $mObj->setFinalizarRecibo(true);
            $msg .= $mObj->getMessages(OUT_TXT);
        }
    }
    $msg .= $xFil->getMessages();
    if (MODO_DEBUG == true) {
        $xFl = new cFileLog();
        $xFl->setWrite($msg);
        $xFl->setClose();
        $xFRM->addHTML($xFl->getLinkDownload("archivo de eventos"));
    } else {
        echo JS_CLOSE;
    }
    echo $xFRM->get();
}
echo $xHP->setBodyEnd();
//$jsb->show();
?>
<!-- HTML content -->
<script>
</script>
<?php 
$xHP->end();
 if ($ide > 0) {
     $saldo = $xCta->getNuevoSaldo();
     $ide_observacion = "Retencion Generada por un Deposito de {$monto}, Recibo {$recibo}, saldo de {$saldo}";
     //Si el Saldo de la Cuenta es Mayor al IDE
     if ($saldo > $ide) {
         $reciboIDE = $xCta->setRetenerIDE($Fecha, false, $ide, $ide_observacion);
     } else {
         //Si no el IDE es igual al Saldo
         $ide = $saldo;
         $reciboIDE = $xCta->setRetenerIDE($Fecha, false, $ide, $ide_observacion);
     }
 }
 //Imprime la Ficha del socio
 $xRec = new cReciboDeOperacion();
 $xRec->setNumeroDeRecibo($recibo, true);
 $xFRM->addHTML($xRec->getFichaSocio());
 $xFRM->addHTML($xRec->getFicha(true));
 $xFRM->addHTML($xRec->getJsPrint(true));
 if (CAPTACION_IMPUESTOS_A_DEPOSITOS_ACTIVO == true) {
     if ($ReciboIDE != 0) {
         $xFRM->addToolbar($xBtn->getBasic("TR. Imprimir recibo de impuestos", "jsPrintIDE()", "imprimir", "idrec-ide", false));
     }
 }
 if (MODO_DEBUG == true) {
     $msg .= $xCta->getMessages();
     $msg .= $xRec->getMessages();
     $xFL = new cFileLog(false, true);
     $xFL->setWrite($msg);
     $xFL->setClose();
     $xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", ""));
 }
$oFrm6->addFootElement($oBtn->getBasic($lguardar, "jsaCambiarProducto();jsTipTimer()", "guardar", "idsapdto"));
$oFrm6->addFootElement($oBtn->getBasic($lcancelar, "jsCancelarAccion()", "cancelar", "idcancela6"));
echo $oFrm6->get();
?>
</div>

<!--  PERIOCIDAD DE PAGO -->
<div class="inv" id="divperiocidad">
    <?php 
$oFrm5 = new cHForm("frmperiocidad", "", "idfrmperiocidad");
$oFrm5->addHElem($xSelCP->get("idperiocidad", $xFRM->lang("Nueva", "Periocidad"), $xCred->getPeriocidadDePago()));
$oFrm5->addHElem($xSelTP->get("idtipopago", $xFRM->lang(array("Nuevo", "Tipo de", "Pago")), $xCred->getTipoDePago()));
$oFrm5->addHElem($oTxt->getDeMoneda("idpagos", $xFRM->lang("Numero de", "Pagos"), $xCred->getPagosAutorizados()));
$oFrm5->addHElem($oFch->get($xFRM->lang("Fecha de", "Vencimiento"), $xCred->getFechaDeVencimiento(), 2));
$oFrm5->OMoneda("idpagoactual", $xCred->getPeriodoActual(), "TR.Ultima Parcialidad");
$oFrm5->addHTML($oUL->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());
$oFrm5->addFootElement($oBtn->getBasic($lguardar, "jsaCambiarPeriocidad();jsTipTimer()", "guardar", "idmonto"));
$oFrm5->addFootElement($oBtn->getBasic($lcancelar, "jsCancelarAccion()", "cancelar", "idcancela"));
echo $oFrm5->get();
?>
</div>

<!--  ELIMINAR -->
<div class="inv" id="diveliminar">
    <h3>Acciones</h3>
    <ul>
	<li>Eliminar Credito</li>
	<li>Eliminar Operaciones</li>
	<li>Eliminar Recibos</li>
	<li>Eliminar Avales</li>
	<li>Eliminar Garantias</li>
include_once "../core/core.init.inc.php";
$theFile = __FILE__;
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
    header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<=====	FIN_H
//====================================================================================================
$xHP = new cHPage("TR.Creditos del Sistema");
$xDiv = new cHDiv();
$xHP->init();
$xFRM = new cHForm("frm", "./");
$msg = "";
$xFRM->addDivSolo('<img src="../images/banner-safe.png" />');
$xFRM->addHTML("<h3>AUTOR</h3>");
$xFRM->addHTML("<h5>Balam Gonzalez Luis Humberto 2005-2014</h5>");
$xUl2 = new cHUl();
$xUl2->li('<a href="http://www.opencorebanking.com/">P&aacute;gina del Proyecto : www.opencorebanking.com</a>');
$xUl2->li('<a href="http://sourceforge.net/projects/safemicrofin/"> Hosting del Proyecto :  SourceForge</a>');
//$xUl2->li('Blog del Proyecto <a href="http://sourceforge.net/apps/wordpress/safemicrofin/">Hospedado en SourceForge</a>');
//$xFRM->addHTML( $xUl2->li('<a href="http://wiki.opencorebanking.com/">Wiki del Proyecto Hospedado en www.opencorebanking.com</a>')->end());
//$xFRM->addDivSolo("")
$xFRM->addHTML("<h3>FINANCIAMIENTO</h3>");
$xUl3 = new cHUl();
//<a href="http://www.grupopadio.com.mx"> <a href="http://www.mulmeyah.org">
$xUl3->li('GRUPO PADIO, SOFOM ENR (Desde Agosto de 2013).- Calle 25 # 87-A, Col. México, Mérida, Yucatán');
$xFRM->addHTML($xUl3->li('CAJA SOLIDARIA MULMEYAH, S.C. DE A.P. DE C.V. DE R.L (Hasta Diciembre de 2006).- Calle 61 Num. 50 Entre 16 y 14, Col. Centro. San Francisco de Campeche, 01(981)8113766')->end());
$xFRM->addHTML("<h3>AGRADECIMIENTOS ESPECIALES</h3>");
$xUl = new cHUl();
$xUl->li("Lic. Alejandro Roberto de jesus Ojeda Mendez, Por su confianza en el proyecto.");
     /* si es Credito de Grupos solidarios, Actualiza los Mvtos de Otorgacion */
     if ($OConv->getEsProductoDeGrupos() == true) {
         $sqlusolc = "UPDATE operaciones_mvtos\tSET estatus_mvto = 10\tWHERE\n\t\t\t\tgrupo_asociado={$gpoasoc}\tAND (tipo_operacion=112) AND (estatus_mvto=40)";
         my_query($sqlusolc);
     }
     //Eliminar Plan de Pagos
     $plan = setNoMenorQueCero($xCred->getNumeroDePlanDePagos());
     if ($plan > 0) {
         $xPlan = new cPlanDePagos($plan);
         $xPlan->setEliminar();
         $msg .= $xPlan->getMessages();
     }
 }
 //------------------------------- IMPRIME UNA PEQUE%A DESCRIPCION DE LA SOLICITUD -----------------------
 $xCred->init();
 $xFRM->addHTML($xCred->getFichaDeSocio(true));
 $xFRM->addHTML($xCred->getFicha(true));
 //$urlsend 				= "elUrl='" . $OConv->getPathPagare($idsolicitud) . "';";
 $cedula_grupal = 0;
 //$urctr 					= "esUrl='" . $xCred->getPathDelContrato() . "';";
 if ($OConv->getEsProductoDeGrupos() == true) {
     //Si la cedula Grupal existe y el Tipo de Integracion el GRUPO
     if (isset($_SESSION["recibo_en_proceso"])) {
         $cedula_grupal = $_SESSION["recibo_en_proceso"];
     }
     $xFRM->addToolbar($xBtn->getBasic("TR.IMPRIMIR CEDULA GRUPAL DE AUTORIZACION", "jsPrintCedulaGrupal())", "personas", "print-cedulagrupo", false));
 }
 //$xFRM->addToolbar( $xBtn->getBasic("TR.IMPRIMIR CEDULA DE AUTORIZACION", "printcedula()", "documento", "print-cedula", false ) );
 $xFRM->addToolbar($xBtn->getSalir("", true));
 // $xBtn->getIrAlInicio(true) );
 $msg .= "WARN\tLos Datos de Fecha de vencimiento, Dias Autorizados\r\n";