function jsaSetDesvincularPersona($credito, $fecha, $observaciones)
{
    $msg = "";
    $xLng = new cLang();
    $xCred = new cCredito($credito);
    $xCred->init();
    $xdat = new cFecha(0);
    $fecha = $xdat->getFechaISO($fecha);
    $xCred->setResetPersonaAsociada($fecha, $observaciones);
    $oP = $xCred->getOPersona();
    $xEmp = new cEmpresas($xCred->getClaveDeEmpresa());
    $xEmp->init();
    $xRN = new cReglaDeNegocio();
    $xRN->setVariables(array("nombre_de_persona" => $oP->getNombreCompleto(), "mensaje" => $observaciones, "saldo_del_credito" => $xCred->getSaldoActual(), "nombre_de_la_empresa" => $xEmp->getNombreCorto()));
    $xRN->setExecuteActions($xRN->reglas()->RN_NOMINA_AL_DESVINCULAR);
    return $xLng->get(MSG_READY_SAVE);
}
 function getFicha($mark = true, $extraTool = "", $extendido = false, $ConPersona = false)
 {
     if ($this->mCreditoInicializado == false) {
         $this->initCredito();
     }
     $lafila = $this->getDatosDeCredito();
     $xL = new cLang();
     $solicitud = $this->getNumeroDeCredito();
     $convenio = $lafila["descripcion_tipoconvenio"];
     $fministracion = $lafila["fecha_ministracion"];
     $fvencimiento = $lafila["fecha_vencimiento"];
     $periocidad_pago = $lafila["descripcion_periocidadpagos"];
     $autorizado = getFMoney($lafila["monto_autorizado"]);
     $saldo = getFMoney($lafila["saldo_actual"]);
     $estatus = $lafila["descripcion_estatus"];
     $tool = $extraTool;
     $tasa = getFMoney($lafila["tasa_interes"] * 100);
     $mora = $lafila["tasa_moratorio"] * 100;
     $pagos = $lafila["pagos_autorizados"];
     $ultimopago = $lafila["ultimo_periodo_afectado"];
     $cls = "";
     $xD = new cFecha(0);
     $TasaIVA = $this->getTasaIVA();
     $TasaMora = $this->getTasaDeMora();
     $trInicial = "";
     $cls = "credito-estado-" . $this->getEstadoActual();
     $montoParc = getFMoney($this->mMontoFijoParcialidad);
     $activo = true;
     if ($ConPersona == true) {
         $xSoc = $this->getOPersona();
         // new cSocio($this->getClaveDePersona(), true);
         $trInicial = "<tr><th>" . $xL->getT("TR.Persona") . "</th><td>" . $xSoc->getCodigo() . "</td><td colspan='2'>" . $xSoc->getNombreCompleto() . "</td></tr>";
     }
     if ($this->getTipoEnSistema() == CREDITO_PRODUCTO_NOMINA) {
         if ($this->getClaveDeEmpresa() != DEFAULT_EMPRESA) {
             $xEmp = new cEmpresas($this->getClaveDeEmpresa());
             $xEmp->init();
             $convenio = "{$convenio} - " . $xEmp->getNombreCorto();
         } else {
             $convenio = "{$convenio} - ND";
         }
     }
     $tdSaldo = "<th class='izq'>" . $xL->getT("TR.Saldo Principal") . "</th><td class='mny'>{$saldo}</td>";
     $tdMonto = "<th class='izq'>" . $xL->getT("TR.Monto Original") . "</th><td class='mny'>{$autorizado}</td>";
     $tdFecha = "<th class='izq'>" . $xL->getT("TR.fecha de desembolso") . "</th><td>" . $xD->getFechaCorta($fministracion) . "</td>";
     $tdPagos = $this->getPeriocidadDePago() != CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO ? "<td class='mny'>{$ultimopago} de {$pagos} POR \$ {$montoParc}</td>" : "<td class='izq'>UNICO</td>";
     $tdVencimiento = "<th class='izq'>" . $xL->getT("TR.Fecha de Vencimiento") . "</th><td>" . $xD->getDayName($fvencimiento) . "; " . $xD->getFechaCorta($fvencimiento) . "</td>";
     //Si el Estatus es AUTORIZADO
     if ($this->getEstadoActual() == CREDITO_ESTADO_AUTORIZADO) {
         $tdSaldo = "";
         $tdFecha = "<th class='izq'>" . $xL->getT("TR.Fecha de Autorizacion") . "</th><td>" . $xD->getFechaCorta($this->getFechaDeAutorizacion()) . "</td>";
         $activo = false;
         $tdPagos = "<td class='mny'>{$pagos}</td>";
     } elseif ($this->getEstadoActual() == CREDITO_ESTADO_SOLICITADO) {
         $tdSaldo = "";
         $tdMonto = "<th class='izq'>" . $xL->getT("TR.Monto Solicitado") . "</th><td class='mny'>" . getFMoney($this->getMontoSolicitado()) . "</td>";
         $tdFecha = "<th class='izq'>" . $xL->getT("TR.Fecha de Solicitud") . "</th><td>" . $xD->getFechaCorta($this->getFechaDeMinistracion()) . "</td>";
         $activo = false;
         $tdPagos = "<td class='mny'>{$pagos}</td>";
     }
     if ($this->getPeriocidadDePago() != CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
         $fvencimiento = $this->getFechaDeMora();
         $tdVencimiento = "<th class='izq'>" . $xL->getT("TR.Fecha de Vencimiento") . "</th><td>" . $xD->getDayName($fvencimiento) . "; " . $xD->getFechaCorta($fvencimiento) . "</td>";
     }
     if ($extendido == true) {
         $xPP = new cCreditos_destinos();
         $xPP->setData($xPP->query()->initByID($this->getClaveDeDestino()));
         $tdExigible = $activo == false ? "" : "<th class='izq'>" . $xL->getT("TR.Saldo exigible") . "</th><td class='mny'>" . getFMoney($this->getSaldoIntegrado(false, true)) . "</td>";
         $oficial = $this->getOOficial()->getNombreCompleto();
         $codigo_de_oficial = $this->getClaveDeOficialDeCredito();
         $tool = "<tr>\n\t\t\t\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Tasa Anualizada de Moratorio") . "</th><td class='mny'>" . getFMoney($TasaMora * 100) . "%</td>\n\t\t\t\t\t\t\t\t{$tdExigible}</tr>\n\t\t\t\t\t<tr><th class='izq'>" . $xL->getT("TR.Destino del Credito") . "</th><td colspan='3'>" . $xPP->descripcion_destinos()->v() . ": " . $this->mDescripcionDestino . "</td></tr>\n\t\t\t\t\t<tr><th class='izq'>Oficial a Cargo</td><td class='notice' colspan='3'>{$oficial}</td></tr>" . $tool;
         if ($activo == true) {
             if ($this->getPeriocidadDePago() != CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
                 $letra = $this->getPeriodoActual() + 1;
                 $IntAct = $this->getInteresDevengado(fechasys(), $letra, false, true);
             } else {
                 $IntAct = $this->getInteresDevengado();
             }
             $IntDevNorm = $this->getInteresNormalDevengado();
             $IntDevMor = $this->getInteresMoratorioDev();
             $IntPerNor = $IntAct[SYS_INTERES_NORMAL];
             $IntPerMor = $IntAct[SYS_INTERES_MORATORIO];
             $IntPagMor = $this->getInteresMoratorioPagado();
             $IntPagNor = $this->getInteresNormalPagado();
             $TIntNorm = $IntDevNorm + $IntPerNor - $IntPagNor;
             $TIntMor = $IntDevMor + $IntPerMor - $IntPagMor;
             $BaseIVA = $TIntNorm > 0 ? $TIntNorm : 0;
             $BaseIVA += $TIntMor > 0 ? $TIntMor : 0;
             $IntIVA = setNoMenorQueCero(($TIntNorm + $TIntMor) * $TasaIVA);
             $cargos = $this->getCargosDeCobranza();
             $cargosIVA = setNoMenorQueCero($cargos * TASA_IVA);
             $trCargos = "";
             if ($cargos > 0) {
                 $trCargos = "<tr>\n\t\t\t\t\t\t<td /><td />\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Cargos por Cobranza") . "</th><td class='mny'>" . getFMoney($cargos) . "</td>\n\t\t\t\t\t</tr><tr>\n\t\t\t\t\t\t<td /><td />\n\t\t\t\t\t\t<th>" . $xL->getT("TR.IVA de Otros cargos") . "</th><td class='mny'>" . getFMoney($cargosIVA) . "</td>\n\t\t\t\t\t</tr>\t";
             }
             $tool .= "<tr>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Interes Normal Generado") . "</th><td class='mny'>" . getFMoney($IntDevNorm) . "</td>\n\t\t\t\t\t\t\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Interes Moratorio Generado") . "</th><td class='mny'>" . getFMoney($IntDevMor) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Interes Normal del Mes") . "</th><td class='mny'>" . getFMoney($IntPerNor) . "</td>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Interes Moratorio del mes") . "</th><td class='mny'>" . getFMoney($IntPerMor) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Interes Normal Pagado") . "</th><td class='mny'>(" . getFMoney($IntPagNor) . ")</td>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.Interes Moratorio Pagado") . "</th><td class='mny'>(" . getFMoney($IntPagMor) . ")</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.TOTAL INTERES NORMAL") . "</th><th class='mny'>" . getFMoney($TIntNorm) . "</th>\n\t\t\t\t\t\t<th>" . $xL->getT("TR.TOTAL INTERES MORATORIO") . "</th><th class='mny'>" . getFMoney($TIntMor) . "</th>\n\t\t\t\t\t</tr>\n\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td /><td />\n\t\t\t\t\t\t<th>" . $xL->getT("TR.SALDO DE CAPITAL") . "</th><td class='total, mny'>" . getFMoney($this->getSaldoActual()) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td /><td />\n\t\t\t\t\t\t<th>" . $xL->getT("TR.TOTAL INTERESES") . "</th><td class='mny'>" . getFMoney($TIntNorm + $TIntMor) . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td /><td />\n\t\t\t\t\t\t<th>" . $xL->getT("TR.IVA POR INTERESES") . "</th><td class='mny'>" . getFMoney($IntIVA) . "</td>\n\t\t\t\t\t</tr>\t\t\t\t\t\n\t\t\t\t\t\t\t\t{$trCargos}\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td /><td />\n\t\t\t\t\t\t<th>" . $xL->getT("TR.TOTAL POR PAGAR") . "</th><td class='total, mny'>" . getFMoney($TIntNorm + $TIntMor + $IntIVA + $this->getSaldoActual() + ($cargos + $cargosIVA)) . "</td>\n\t\t\t\t\t</tr>";
         }
         $tool = "<tfoot>{$tool}</tfoot>";
     }
     $exoFicha = "\n\t\t<table id='fichadecredito'>\n\t\t\t<tbody>\n\t\t\t\t{$trInicial}\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Numero de Credito") . "</th><td>{$solicitud}</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Producto") . "</th><td>{$convenio}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Periocidad de Pago") . "</th><td>{$periocidad_pago}</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Numero de Pagos") . "</th>{$tdPagos}\n\t\t\t\t<tr>\n\t\t\t\t<tr>\n\t\t\t\t\t\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Tasa Anualizada de interes") . "</th><td class='mny'>" . getFMoney($tasa) . "%</td>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Estado_actual") . "</th><td  class='{$cls}'>{$estatus}</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th class='izq'>" . $xL->getT("TR.Tasa de IVA") . "</th><td class='mny'>" . getFMoney($TasaIVA * 100) . "%</td>\n\t\t\t\t\t<th class='izq'>CAT</th><td class='mny'>" . $this->getCAT() . "</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>{$tdFecha} {$tdVencimiento}</tr>\n\t\t\t\t<tr>{$tdMonto} {$tdSaldo}</tr>\n\t\t\t</tbody>\n\t\t\t{$tool}\n\t\t</table>";
     if ($mark == true) {
         $exoFicha = "<fieldset><legend>|&nbsp;&nbsp;" . $xL->getT("TR.Informacion de Credito") . "&nbsp;&nbsp;|</legend>{$exoFicha}</fieldset>";
     }
     return $exoFicha;
 }
 /**
  * Funcion que Retorna una Ficha Descriptiva por el recibo
  * @param boolean $fieldset
  * @param string $trTool
  * @param string $wTable
  * @return string
  */
 function getFicha($fieldset = false, $trTool = "", $extend = false)
 {
     $this->init();
     $xLg = new cLang();
     $personaAsoc = $this->getPersonaAsociada();
     //$fichaEmpresa	= "";
     if ($this->mReciboIniciado == false) {
         $exoFicha = "<div class='error'>" . $xLg->get(MSG_NO_DATA) . "</div>";
     } else {
         $xLg = new cLang();
         $tool = $trTool;
         if ($extend == true) {
             $xUsr = new cSystemUser($this->getCodigoDeUsuario());
             $xUsr->init();
             $xSoc = new cSocio($this->getCodigoDeSocio());
             $xSoc->init();
             $tool .= "<tr><th class='izq'>" . $xLg->getT("TR.persona") . "</th>";
             $tool .= "<td>" . $xSoc->getNombreCompleto() . "</td>";
             $tool .= "<th class='izq'>" . $xLg->getT("TR.Documento") . "</th>";
             $tool .= "<td>" . $this->getCodigoDeDocumento() . "</td>";
             $tool .= "<tr><th class='izq'>" . $xLg->getT("TR.Elabora") . "</th>";
             $tool .= "<td>" . $xUsr->getNombreCompleto() . "</td>";
             if ($this->isDeEmpresa() == true) {
                 $xEmp = new cEmpresas($personaAsoc);
                 $xEmp->init();
                 $tool .= "<th class='izq'>" . $xLg->getT("TR.Empresa") . "</th>";
                 $tool .= "<td>" . $xEmp->getNombre() . "</td>";
             }
             $tool .= "</tr>";
         }
         if ($this->isDivisaExtranjera() == true) {
             $tool .= "<tr><th class='izq'>" . $xLg->getT("TR.Moneda") . "</th>";
             $tool .= "<td>" . $this->getMoneda() . "</td>";
             $tool .= "<th class='izq'>" . $xLg->getT("TR.Original") . "</th>";
             $tool .= "<td>" . $this->getUnidadesOriginales() . "</td>";
             $tool .= "</tr>";
         }
         $xF = new cFecha(0);
         $exoFicha = "\n\t\t\t\t<table id=\"ficharecibo\">\n\t\t\t\t<tbody>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th class='izq'>Numero de Recibo</th>\n\t\t\t\t\t\t<td class='mny'>" . $this->mCodigoDeRecibo . "</td>\n\t\t\t\t\t\t<th class='izq'>Tipo de Recibo</th>\n\t\t\t\t\t\t<td>" . $this->mTipoDescripcion . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th class='izq'>Fecha de Recibo</th>\n\t\t\t\t\t\t<td>" . $xF->getFechaCorta($this->mFechaDeOperacion) . "</td>\n\t\t\t\t\t\t<th class='izq'>Recibo Fiscal</th>\n\t\t\t\t\t\t<td>" . $this->mReciboFiscal . "</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th class='izq'>Tipo de Pago</th>\n\t\t\t\t\t\t<td>" . strtoupper($this->mTipoDePago) . "</td>\n\t\t\t\t\t\t<th class='izq'>Total</th>\n\t\t\t\t\t\t<td>" . getFMoney($this->mTotalRecibo) . "</td>\n\n\t\t\t\t\t</tr>\n\n\t\t\t\t\t{$tool}\n\t\t\t\t</tbody>\n\t\t\t\t</table>";
         if ($fieldset == true) {
             $exoFicha = "<fieldset>\n\t\t\t\t\t\t\t\t<legend>&nbsp;&nbsp;INFORMACI&Oacute;N DEL RECIBO&nbsp;&nbsp;</legend>\n\t\t\t\t\t\t\t\t{$exoFicha}\n\t\t\t\t\t\t\t</fieldset>";
         }
     }
     return $exoFicha;
 }
 function getResumenDeCaja()
 {
     $xF = new cFecha();
     $xSQL = new cSQLListas();
     $xTxt = new cHText();
     $xLn = new cLang();
     $xTbl = new cHTabla();
     $this->mSumaRecibos = 0;
     $this->mSumaCobros = 0;
     $resumen = "";
     $fecha_inicial = $this->mFecha;
     $fecha_final = $this->mFecha;
     $cajero = $this->mCajero;
     //==================================================================== TOTAL CORTE
     $resumen .= "<h3>" . $xLn->getT("TR.Resumen de caja") . "</h3>";
     $sqlTi = $xSQL->getListadoResumenTesoreria($cajero, $fecha_inicial, $fecha_final);
     $xT = new cTabla($sqlTi);
     $xT->setTdClassByType();
     $xT->setFootSum(array(2 => "operacion", 3 => "recibido", 4 => "cambio"));
     $resumen .= $xT->Show("TR.Resumen");
     $resumen .= "<input type='hidden' id='idsumacaja' value='" . $xT->getFieldsSum("recibido") . "' />";
     $resumen .= "<h3>" . $xLn->getT("TR.Efectivo") . "</h3>";
     //==================================================================== EFECTIVO
     $sqlTE = $xSQL->getListadoResumenOperaciones($fecha_inicial, $fecha_final, $cajero, TESORERIA_COBRO_EFECTIVO);
     $xTE = new cTabla($sqlTE);
     $xTE->setTdClassByType();
     $xTE->setFootSum(array(5 => "total"));
     $resumen .= $xTE->Show("TR.Cobros por Efectivo");
     $this->mSumaRecibos += $xTE->getFieldsSum("total");
     $resumen .= "<h3>" . $xLn->getT("TR.Documentos") . "</h3>";
     $sqlArq = "SELECT\r\n\t\t\t\t`tesoreria_caja_arqueos`.`fecha_de_arqueo`,\r\n\t\t\t\t`tesoreria_caja_arqueos`.`documento`,\r\n\t\t\t\t`tesoreria_caja_arqueos`.`monto_total_arqueado`,\r\n\t\t\t\t`tesoreria_caja_arqueos`.`observaciones` \r\n\t\t\tFROM\r\n\t\t\t\t`tesoreria_caja_arqueos` `tesoreria_caja_arqueos` \r\n\t\t\tWHERE\r\n\t\t\t\t(`tesoreria_caja_arqueos`.`codigo_de_caja` ='" . $this->getKey() . "')";
     $xTArq = new cTabla($sqlArq);
     $xTArq->setTdClassByType();
     $xTArq->setFootSum(array(2 => "monto_total_arqueado"));
     $resumen .= $xTArq->Show("TR.Arqueo");
     $this->mSumaCobros += $xTArq->getFieldsSum("monto_total_arqueado");
     //==================================================================== CHEQUES Y DOCUMENTOS
     $sqlLC = $xSQL->getListadoDeTesoreria($cajero, $fecha_inicial, $fecha_final, TESORERIA_COBRO_CHEQUE);
     $xT2 = new cTabla($sqlLC);
     $xT2->setTdClassByType();
     $xT2->setFootSum(array(5 => "operacion"));
     $resumen .= $xT2->Show("TR.Operaciones en Cheque");
     $this->mSumaCobros += $xT2->getFieldsSum("operacion");
     $sqlTD = $xSQL->getListadoResumenOperaciones($fecha_inicial, $fecha_final, $cajero, TESORERIA_COBRO_CHEQUE);
     $xTD = new cTabla($sqlTD);
     $xTD->setTdClassByType();
     $xTD->setFootSum(array(5 => "total"));
     $resumen .= $xTD->Show("TR.Cobros por Cheque");
     $this->mSumaRecibos += $xTD->getFieldsSum("total");
     $resumen .= "<h3>" . $xLn->getT("TR.Bancos") . "</h3>";
     //==================================================================== TRANFERENCIAS
     $sqlTO = $xSQL->getListadoDeCajaEnBanco(BANCOS_OPERACION_DEPOSITO, "", $cajero, $fecha_inicial, $fecha_final);
     $xT = new cTabla($sqlTO);
     $xT->setTdClassByType();
     $xT->setFootSum(array(4 => "monto"));
     $resumen .= $xT->Show("TR.Operaciones Bancarias");
     $this->mSumaCobros += $xT->getFieldsSum("monto");
     //-------------------------------------------
     $sqlT = $xSQL->getListadoResumenOperaciones($fecha_inicial, $fecha_final, $cajero, TESORERIA_COBRO_TRANSFERENCIA);
     $xT = new cTabla($sqlT);
     $xT->setTdClassByType();
     $xT->setFootSum(array(5 => "total"));
     $resumen .= $xT->Show("TR.Cobros por Transferencia");
     $this->mSumaRecibos += $xT->getFieldsSum("total");
     //====================================================================
     $xTbl->initRow();
     $xTbl->addTH("TR.Suma de Recibos");
     $xTbl->addTD(getFMoney($this->mSumaRecibos));
     $xTbl->endRow();
     $xTbl->initRow();
     $xTbl->addTH("TR.Suma de Cobranza");
     $xTbl->addTD(getFMoney($this->mSumaCobros));
     $xTbl->endRow();
     $resumen .= $xTbl->get();
     $resumen .= "<input type='hidden' id='idsumaoperaciones' value='" . $this->mSumaRecibos . "' />";
     $resumen .= "<input type='hidden' id='idsumacobros' value='" . $this->mSumaCobros . "' />";
     $this->mArqueoInit = true;
     return $resumen;
 }
 function getListaDeDias($events = false)
 {
     $selDias = "";
     $xLn = new cLang();
     $dias = $xLn->get("dias");
     if (CAPTACION_INVERSIONES_POR_DIA == true) {
         $xTxt = new cHText();
         if (is_array($events)) {
             foreach ($events as $evento => $func) {
                 $xTxt->addEvent($func, $evento);
             }
         }
         $selDias = $xTxt->getNormal("iddias", INVERSION_DIAS_MINIMOS, "TR.Plazo de Inversion");
     } else {
         $xSel = new cHSelect();
         if (is_array($events)) {
             foreach ($events as $evento => $func) {
                 $xSel->addEvent($func, $evento);
             }
         }
         $xSel->addOptions(array(7 => "7 {$dias}", 14 => "14 {$dias}", 28 => "28 {$dias}", 30 => "30 {$dias}", 60 => "60 {$dias}", 90 => "90 {$dias}", 120 => "120 {$dias}", 180 => "180 {$dias}", 360 => "360 {$dias}"));
         $selDias = $xSel->get("iddias", "TR.Plazo de Inversion", INVERSION_DIAS_MINIMOS);
     }
     return $selDias;
 }
{
    $funid2 = ROTTER_KEY;
    $tab = new TinyAjaxBehavior();
    $tab->add(TabSetValue::getBehavior("t{$funid2}", md5($low)));
    return $tab->getString();
}
function jsaSetSucursal($sucursal)
{
    getSucursal($sucursal);
}
$jxc->exportFunction('fu_76e369257240ded4b1c059cf20e8d9a4', array("t{$funid}", "frm{$funid}"));
$jxc->exportFunction('jsaSetSucursal', array("idsucursal"), "#idavisos");
$jxc->process();
$xPatch = new cSystemPatch();
//$xPatch->patch();
$xLng = new cLang();
$now = gmdate('D, d M Y H:i:s') . ' GMT';
header('Expires: 0');
// rfc2616 - Section 14.21
header('Last-Modified: ' . $now);
header('Cache-Control: no-store, no-cache, must-revalidate');
// HTTP/1.1
header('Cache-Control: pre-check=0, post-check=0, max-age=0');
// HTTP/1.1
header('Pragma: no-cache');
?>
<!DOCTYPE html>
<html>
<head>
	<!--  alta en Google -->
<meta name="google-site-verification" content="SqK5tVk5JReoW3FFNXc546UJPulr5Ed4ZUgWXG9laJ4" />
    $ByAMaterno = "";
}
$sql = "SELECT\n\t\t`socios_general`.`codigo`          AS `codigo`,\n\t\t`socios_general`.`apellidopaterno` AS `primerapellido`,\n\t\t`socios_general`.`apellidomaterno` AS `segundoapellido`,\n\t\t`socios_general`.`nombrecompleto`  AS `nombres`,\n\t\t`socios_general`.`curp`,\n\t\t'soundlike' AS 'tipo'\n\tFROM\n\t\t`socios_general`\n\tWHERE\n\t\tcodigo != " . DEFAULT_SOCIO . " AND (`tipoingreso`= " . TIPO_INGRESO_SDN . " OR `nivel_de_riesgo_aml` = 100)\n\t\t{$ByNombre} {$ByAPaterno} {$ByAMaterno} {$OrderBy} LIMIT 0,10";
if ($UseJW == true) {
    $sql .= " UNION SELECT\n\t\t`socios_general`.`codigo`          AS `codigo`,\n\t\t`socios_general`.`apellidopaterno` AS `primerapellido`,\n\t\t`socios_general`.`apellidomaterno` AS `segundoapellido`,\n\t\t`socios_general`.`nombrecompleto`  AS `nombres`,\n\t\t`socios_general`.`curp`,\n\t\t'jarowinkler' AS 'tipo'\n\tFROM\n\t\t`socios_general`\n\tWHERE\n\t\tcodigo != " . DEFAULT_SOCIO . " AND (`tipoingreso`= " . TIPO_INGRESO_SDN . " OR `nivel_de_riesgo_aml` = 100)\n\t\t\t{$ByJWNombre}  {$ByJWAPaterno} {$ByJWAMaterno} {$OrderBy}\n\t\t\tLIMIT 0,10";
}
if ($UseMeta == true) {
    $sql .= " UNION SELECT\n\t\t`socios_general`.`codigo`          AS `codigo`,\n\t\t`socios_general`.`apellidopaterno` AS `primerapellido`,\n\t\t`socios_general`.`apellidomaterno` AS `segundoapellido`,\n\t\t`socios_general`.`nombrecompleto`  AS `nombres`,\n\t\t`socios_general`.`curp`,\n\t\t'metaphone' AS 'tipo'\n\tFROM\n\t\t`socios_general`\n\tWHERE\n\t\tcodigo != " . DEFAULT_SOCIO . "\n\t\tAND (`tipoingreso`= " . TIPO_INGRESO_SDN . "\tOR `nivel_de_riesgo_aml` = 100)\n\t\t\t{$ByMNombre} {$ByMAPaterno} {$ByMAMaterno} {$OrderBy} LIMIT 0,10\n\t\t\t";
}
//exit($sql);
header('Content-type: application/json');
$json = array();
$mql = new MQL();
$rs = $mql->getRecordset($sql);
$idx = 0;
$xLng = new cLang();
if ($rs) {
    while ($row = $rs->fetch_assoc()) {
        foreach ($row as $campo => $valor) {
            if (is_string($valor)) {
                $valor = htmlentities($valor);
                //htmlentities( (string) $valor, ENT_QUOTES, 'utf-8', FALSE);
            }
            $json["record_{$idx}"][$campo] = $valor;
            //base64_encode($valor);//utf8_encode($valor);
        }
        $idx++;
        //Generar el Acuse
        if ($getPDF == true) {
            $id = $row["codigo"];
            $tipo = $row["tipo"];
<?php

//=====================================================================================================
//=====>	INICIO_H
include_once "../core/go.login.inc.php";
include_once "../core/core.error.inc.php";
include_once "../core/core.html.inc.php";
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
$iduser = $_SESSION["log_id"];
//=====================================================================================================
include_once "../core/core.deprecated.inc.php";
include_once "../core/entidad.datos.php";
include_once "../core/core.config.inc.php";
include_once "../core/core.lang.inc.php";
header("Content-type:text/javascript");
$xLng = new cLang();
echo "var jsonWords = " . json_encode($xLng->getWords()) . ";";
 /**
  * Funcion que retorna un HTML:SELECT con las horas del dia
  * 
  * @param boolean $ret
  *        	se imprime o se retorna un valor
  * @return string del SELECT o se imprime con echo
  */
 function getHours($ret = false, $titulo = "", $id = "")
 {
     $id = $id == "" ? "id-hours-" . $this->mIndex : $id;
     $name = $id == "" ? "cHours-" . $this->mIndex : $id;
     $options = "";
     $xL = new cLang();
     $titulo = $titulo == "" ? "" : $xL->getT($titulo);
     foreach ($this->mAHours as $key => $value) {
         $options .= "<option value=\"{$key}\">{$value}</option>";
     }
     $cHours = "<select id=\"{$id}\" name=\"{$name}\" >\r\n\t\t{$options}\r\n\t\t</select>";
     return $titulo == "" ? $cHours : "<div class=\"tx4\"><label for=\"{$id}\">{$titulo}</label>{$cHours}</div>";
 }
//=====>	INICIO_H
include_once "../core/go.login.inc.php";
include_once "../core/core.error.inc.php";
include_once "../core/core.html.inc.php";
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
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("Estado de Cuenta de Creditos", HP_REPORT);
$xL = new cLang();
$oficial = elusuario($iduser);
$output = isset($_GET["out"]) ? $_GET["out"] : "default";
$idsolicitud = isset($_GET["pb"]) ? $_GET["pb"] : false;
//Numero de Solicitud
$id = isset($_GET["pa"]) ? $_GET["pa"] : false;
//Numero de Socio
if (isset($_REQUEST["persona"])) {
    $id = $_REQUEST["persona"];
}
//Agosto-2013
$idsolicitud = isset($_GET["credito"]) ? $_GET["credito"] : $idsolicitud;
$f15 = isset($_GET["f15"]) ? $_GET["f15"] : "no";
$f14 = isset($_GET["f14"]) ? $_GET["f14"] : "no";
$f16 = isset($_GET["f16"]) ? $_GET["f16"] : "no";
$f18 = isset($_GET["f18"]) ? $_GET["f18"] : "no";
 function getListadoDeMovimientos($complementoTD = "")
 {
     $xL = new cLang();
     $xQL = new cSQLListas();
     $sql = $xQL->getListadoDeMovimientosContables($this->mCodigoDePoliza);
     $ql = new MQL();
     $td = "";
     $tcargos = 0;
     $tabonos = 0;
     $cnt = 1;
     $th = "<tr>\n\t\t    <th class='movimiento'>#</th>\n\t\t    <th class='cuenta'>" . $xL->getT("TR.Cuenta") . "</th>\n\t\t    <th class='nombrecuenta'>" . $xL->getT("TR.Nombre") . "</th>\n\t\t    <th class='cargos'>" . $xL->getT("TR.Cargos") . "</th>\n\t\t    <th class='abonos'>" . $xL->getT("TR.Abonos") . "</th>\n\t\t    <th class='referencia'>" . $xL->getT("TR.Referencia") . "</th>\n\t\t    <th class='concepto'>" . $xL->getT("TR.Concepto") . "</th>\n  \t\t</tr>";
     $rs = $ql->getDataRecord($sql);
     foreach ($rs as $rows) {
         $operacion = $rows["operacion"];
         $nid = $this->mCodigoDePoliza . $this->mDiv . $operacion;
         $cuenta = $rows["cuenta"];
         $pid = str_replace(".", "_", $nid);
         $cnt = $cnt >= 2 ? 1 : $cnt + 1;
         $cls = $cnt == 2 ? " class='trOdd' " : "";
         $td .= "<tr{$cls} id='{$pid}'><td>" . $rows["operacion"] . "</td>";
         $td .= "<td>" . $cuenta . "</td>";
         $td .= "<td  class='nombrecuenta' onclick='var xC = new ContGen(); xC.goToPanel({$cuenta})'>" . $rows["nombre"] . "</td>";
         if ($rows["tipo"] == TM_CARGO) {
             $tcargos += $rows["importe"];
             $td .= "<td onclick='jsEditarMvto(\"{$nid}\")' class='mny'>" . getFMoney($rows["importe"]) . "</td><td />";
         } else {
             $tabonos += $rows["importe"];
             $td .= "<td /><td onclick='jsEditarMvto(\"{$nid}\")' class='mny'>" . getFMoney($rows["importe"]) . "</td>";
         }
         $td .= "<td>" . $rows["referencia"] . "</td>";
         $td .= "<td>" . $rows["concepto"] . "</td></tr>";
     }
     $tf = "<tr>\n\t\t    <td />\n\t\t    <td />\n\t\t    <th>" . $xL->getT("TR.Sumas") . "</th>\n\t\t    <th><input type='text' disabled value='" . getFMoney($tcargos) . "' id='idsumacargos' class='mny' /></th>\n\t\t    <th><input type='text' disabled value='" . getFMoney($tabonos) . "' id='idsumaabonos' class='mny' /></th>\n\t\t    <td />\n\t\t    <td />\n  \t\t</tr>";
     return "<table id='movimientocontables'><thead>{$th} {$complementoTD} </thead><tbody>{$td}</tbody><tfoot>{$tf}</tfoot></table>";
 }
 function getFicha($telefonoPrincipal = "")
 {
     $xLng = new cLang();
     $xT = new cTipos();
     $xT->setForceMayus();
     $xDS = $this->obj();
     $telefonos = $telefonoPrincipal == "" ? "" : "{$telefonoPrincipal} /";
     $telefonos .= setNoMenorQueCero($xDS->telefono_residencial()->v()) <= 0 ? "" : $xDS->telefono_residencial()->v() . " /";
     $telefonos .= setNoMenorQueCero($xDS->telefono_movil()->v()) <= 0 ? "" : $xDS->telefono_movil()->v() . " /";
     $numero = $xDS->numero_exterior()->v();
     $numero .= trim($xDS->numero_interior()->v()) == "" ? "" : " /" . $xDS->numero_interior()->v();
     $numero = strtoupper($numero);
     $callenum = $xT->cChar($this->getCalleConNumero());
     $eldom = "<table>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th class='izq'>" . $xLng->getT("TR.Acceso") . "/" . $xLng->getT("TR.Codigo_postal") . "</th>\n\t\t\t\t\t\t\t<td>" . $callenum . "/" . $this->getCodigoPostal() . "</td>\n\t\t\t\t\t\t\t<th class='izq'>" . $xLng->getT("TR.Numero") . "</th>\n\t\t\t\t\t\t\t<td>{$numero}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th class='izq'>" . $xLng->getT("TR.Colonia") . "</th>\n\t\t\t\t\t\t\t<td>" . $xT->cChar($this->getColonia()) . "</td>\n\t\t\t\t\t\t\t<th class='izq'>" . $xLng->getT("TR.Telefono") . "</th>\n\t\t\t\t\t\t\t<td>{$telefonos}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th class='izq'>" . $xLng->getT("TR.Ciudad") . "</th>\n\t\t\t\t\t\t\t<td>" . $xT->cChar($this->getCiudad()) . "</td>\n\t\t\t\t\t\t\t<th class='izq'>" . $xLng->getT("TR.Municipio") . "/" . $xLng->getT("Estado") . "</th>\n\t\t\t\t\t\t\t<td>" . $xT->cChar($this->getMunicipio()) . "/" . $xT->cChar($this->getEstado()) . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>";
     return $eldom;
 }
 function getListadoDeGarantias($credito = false)
 {
     $credito = $credito == false ? $this->mDocumento : $credito;
     $xLng = new cLang();
     //cargar garantias
     $xCG = new cCreditos_garantias();
     $data = $xCG->query()->select()->exec("(`creditos_garantias`.`solicitud_garantia` ={$credito})");
     $contar = 1;
     $strgarantias = "";
     foreach ($data as $campos) {
         $xCG->setData($campos);
         $xTG->setData($xTG->query()->initByID($xCG->tipo_garantia()->v()));
         $xTV->setData($xTV->query()->initByID($xCG->tipo_valuacion()->v()));
         //$this->setGarantiaDeCredito($xCG->idcreditos_garantias()->v(), $contar, $campos );
         $str = "<tr>";
         $str .= "<td>" . $xCG->documento_presentado->v() . "<td>";
         $str .= "<td>" . $xCG->descripcion()->v() . "<td>";
         $str .= "<td>" . $xCG->observaciones()->v() . "<td>";
         $str .= "</tr>";
         $contar++;
         $strgarantias .= "";
     }
     $strgarantias = "<table><thead><tr>\n\t\t\t\t\t\t\t\t<th>" . $xLng->getT("TR.factura") . "</th>\n\t\t\t\t\t\t\t\t<th>" . $xLng->getT("TR.descripcion") . "</th>\n\t\t\t\t\t\t\t\t<th>" . $xLng->getT("TR.observaciones") . "</th>\n\t\t\t\t\t\t\t\t</tr></thead><tbody>{$strgarantias}</tbody></table>";
     return $strgarantias;
 }
    return split("\\n", trim($str));
}
$locale = "es_MX.iso-8859-1";
setlocale(LC_ALL, $locale);
$locales = list_system_locales();
//var_dump($locales);
//Crear formularios
$xFRM = new cHForm("frmTest", "./test.php");
$xHTxt = new cHText("");
//====================================================================================================
$xFRM->addHElem("<p class='aviso'>Pruebas de la Clase Colonia</p>");
//$txt 	= $xHTxt->getDeMoneda("id", "Moneda de Prueba",  100);
$xColonia = new cDomiciliosColonias();
$clave = $xColonia->getClavePorNombre("Ampliacion josefa ortiz de dom");
$xColonia->init();
$lng = new cLang();
$xFRM->addHElem($lng->getT("TR.La Clave Buscada es ") . $clave . "<br />");
$xFRM->addHElem($lng->getT("TR.El Codigo Postal Buscado es ") . $xColonia->getCodigoPostal() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre de la Colonia es ") . $xColonia->getNombre() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre del Municipio es ") . $xColonia->getNombreMunicipio() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre del Estado es ") . $xColonia->getNombreEstado() . "<br />");
$xFRM->addHElem($lng->getT("TR.EL Nombre de la Localidaad es ") . $xColonia->getNombreLocalidad() . "<br />");
//$xFRM->addHElem( $txt );
$xFRM->addHElem("<p class='aviso'>Probando con el C.P. 24026</p>");
$clave = $xColonia->getClavePorCodigoPostal(24026);
//$xColonia->init();
$xFRM->addHElem("<p>La OTRA Clave Buscada es " . $clave . "</p>");
$xFRM->addHElem("<p>EL Nombre de la Colonia es " . $xColonia->getNombre() . "</p>");
$xFRM->addHElem("<p>EL Nombre del Municipio es " . $xColonia->getNombreMunicipio() . "</p>");
$xFRM->addHElem("<p>EL Nombre del Estado es " . $xColonia->getNombreEstado() . "</p>");
$xFRM->addHElem("<p>EL Nombre de la Localidad es " . $xColonia->getNombreLocalidad() . "</p>");
$oficial = elusuario($iduser);
//$wonner		= $iduser;
$tabla = parametro("t", "", MQL_RAW);
// ( isset($_GET["t"]) ) ? $_GET["t"] : "";
$tabla = parametro("tabla", $tabla, MQL_RAW);
$filtro = isset($_GET["f"]) ? $_GET["f"] : "";
$comando = isset($_GET["cmd"]) ? $_GET["cmd"] : SYS_DEFAULT;
$clave = parametro("id", null, MQL_RAW);
$clave = parametro("clave", $clave, MQL_RAW);
//necesarios tabla clave
$encode = isset($_REQUEST["enc"]) ? $_REQUEST["enc"] : false;
$options = isset($_REQUEST["opts"]) ? $_REQUEST["opts"] : "";
$frm = "frm8db7028bdcdf054882ab54f644a9d36b";
$xRef = new MQL();
$xDBTip = $xRef->getTipos();
$xLng = new cLang();
if ($comando == SYS_DEFAULT) {
    echo $xHP->getHeader(true);
    echo $xHP->setBodyinit("initComponents()");
    $jsVars = "";
    $location = "{$frm}.php?t={$tabla}&f={$filtro}&enc={$encode}&cmd={$comando}";
    $xTxt = new cHText();
    $xBtn = new cHButton();
    $original = "";
    if ($tabla != "" and ($filtro != "" or $clave != null)) {
        $xFRM = new cHForm($frm, $location, $frm, SYS_GET);
        //$DFiltro	= explode("=", $filtro);
        $conTitulo = false;
        $xData = new cSAFETabla($tabla);
        $mObj = $xData->obj();
        if ($mObj == null) {
//=====>	INICIO_H
include_once "../core/go.login.inc.php";
include_once "../core/core.error.inc.php";
include_once "../core/core.html.inc.php";
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
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("TR.PROCESAMIENTO DE PAGO. PART 01", HP_FORM);
$xLng = new cLang();
$params = isset($_GET["p"]) ? $_GET["p"] : false;
$jxc = new TinyAjax();
$xT = new cTipos();
$xSQL = new cSQLListas();
$xF = new cFecha();
$ql = new MQL();
$capital_original_de_letra = 0;
//Monto original de capital de la letra
$msg = "";
$xLog = new cCoreLog();
function jsaActualizarLetra($persona, $credito, $letra, $monto)
{
    $NLetra = $letra + 1;
    $xCred = new cCredito($credito, $persona);
    $xCred->init();