$persona = parametro("socio", $persona, MQL_INT); $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); $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) {
$query = new MQL(); $subproducto = parametro("subproducto", SYS_TODAS, MQL_INT); $producto = parametro("producto", SYS_TODAS, MQL_INT); $operacion = parametro("operacion", SYS_TODAS, MQL_INT); //$empresa = parametro("empresa", SYS_TODAS); $out = parametro("out", SYS_DEFAULT); $FechaInicial = parametro("on", false); $FechaInicial = parametro("fecha-0", $FechaInicial); $FechaInicial = $FechaInicial == false ? FECHA_INICIO_OPERACIONES_SISTEMA : $xF->getFechaISO($FechaInicial); $FechaFinal = parametro("off", false); $FechaFinal = parametro("fecha-1", $FechaFinal); $FechaFinal = $FechaFinal == false ? fechasys() : $xF->getFechaISO($FechaFinal); $senders = getEmails($_REQUEST); $xHP->init(); //XXX: Cambiar SQL por uno que facilite la ejecucion $sql = $xL->getListadoDeCuentasDeCapt(false, false, $producto, $subproducto); //exit($sql); $titulo = ""; $archivo = "reporte-de-captacion-del-{$FechaInicial}-al-{$FechaFinal}"; $xRPT = new cReportes($titulo); $xRPT->setFile($archivo); $xRPT->setOut($out); $xRPT->setSQL($sql); $xRPT->setTitle($xHP->getTitle()); //============ Reporte $xT = new cTabla($sql, 2); $xT->setTipoSalida($out); $body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal); $xRPT->setBodyMail($body); $xRPT->addContent($body); $xT->setFootSum(array(5 => "saldo"));
$oFrm->OHidden("idempresa", $idempresa); } if ($xSoc->getEsSucursal() == true) { $oFrm->OButton("TR.Actualizar Sucursal", "jsaActualizarSucursal()", $oFrm->ic()->EJECUTAR); $oFrm->OHidden("idsucursal", $xSoc->getIDSucursalAsociada()); } if ($xSoc->getEsUsuario(true)) { $oFrm->OButton("TR.Actualizar Usuario", "jsaActualizarUsuario()", $oFrm->ic()->EJECUTAR); $oFrm->OHidden("idusuario", $xSoc->getOUsuario()->getID()); } //Agregar convenios $xTListaCreds = new cTabla($xql->getListadoDeCreditos($idsocio), 2); $xTListaCreds->OButton("TR.Panel", "jsGoToPanelCredito(" . HP_REPLACE_ID . ")", $xTListaCreds->ODicIcons()->CONTROL); $xHTabs->addTab("TR.Creditos", $xTListaCreds->Show()); //agregar cuenta de ahorro $xTListaCapt = new cTabla($xql->getListadoDeCuentasDeCapt($idsocio)); $xHTabs->addTab("TR.Captacion", $xTListaCapt->Show()); //Actualizar Descuentos $xDiv2 = new cHDiv("inv", "iddivdescuento"); $xFRM10 = new cHForm("frmdescuento"); $xFRM10->addSubmit("", "jsGuardarDescuento()", "jsCancelarAccion()"); $xFRM10->OMoneda("iddescuento", 0, "TR.Monto"); //======================================== AML /*Validacion*/ if (MODO_DEBUG == true) { $xHTabs->addTab("TR.Validacion", $xSoc->getValidacion(OUT_HTML)); } $xDiv2->addHElem($xFRM10->get()); $oFrm->addHTML($xHTabs->get()); $oFrm->addHTML($xDiv2->get()); $oFrm->OHidden("idsocio", $idsocio);
$cSocio->init(); echo $cSocio->getFicha(true); $cTae = new cTabla($xLi->getListadoDeActividadesEconomicas($idsocio)); $cTae->setTdClassByType(); echo $cTae->Show("TR.ACTIVIDAD_ECONOMICA"); // $cTpr = new cTabla($xLi->getListadoDeRelaciones($idsocio)); $cTpr->setTdClassByType(); echo $cTpr->Show(PERSONAS_TITULO_PARTES); // $sqlcred = $xLi->getListadoDeCreditos($idsocio, true); $cTcred = new cTabla($sqlcred); $cTcred->setTdClassByType(); echo $cTcred->Show("TR.Creditos"); // $cTcta = new cTabla($xLi->getListadoDeCuentasDeCapt($idsocio)); $cTcta->setTdClassByType(); echo $cTcta->Show("TR.CUENTAS DE CAPTACION"); // $sqlgar = $sqlb17_ext . " AND creditos_garantias.socio_garantia={$idsocio} "; $cTgar = new cTabla($sqlgar); echo $cTgar->Show("TR.GARANTIAS DE CREDITOS"); $cTbl = new cTabla($xLi->getListadoDeRecibosEmitidos($idsocio)); echo $cTbl->Show("TR.Recibos"); // MOVIMIENTOS $sqli = $sqlb18d . " AND socio_afectado={$idsocio} " . $subf; $xLi->getListadoDeOperaciones($idsocio); $cTi = new cTabla($xLi->getListadoDeOperaciones($idsocio)); $cTi->setTdClassByType(); echo $cTi->Show("TR.MOVIMIENTOS GENERALES"); //