function getListenPermissions($iMenu)
{
$sql = "SELECT\n\t\t\t\tmenu_rules\n\t\t\tFROM\n\t\t\t\t`general_menu` `general_menu`\n\t\t\tWHERE idgeneral_menu='{$iMenu}' LIMIT 0,1";
$Itbl = obten_filas($sql);
$sPerms = $Itbl["menu_rules"];
$aPerms = explode(",", $sPerms);
//Array de Tipos de Permisos
$aTipoPerms = array(0 => "false", 1 => "rw", 2 => "ro");
$options = "";
$sqlP = "SELECT\n\t\t\t\t`general_niveles`.`idgeneral_niveles`,\n\t\t\t\t`general_niveles`.`descripcion_del_nivel` \n\t\t\tFROM\n\t\t\t\t`general_niveles` `general_niveles` WHERE idgeneral_niveles != 99 ";
$rs = getRecordset($sqlP);
$xHSel = new cHSelect();
$xHSel->addOptions(array("" => "Ninguno", "ro" => "Solo Puede Ver", "rw" => "Todo"));
while ($rw = mysql_fetch_array($rs)) {
$nivel = $rw["idgeneral_niveles"];
$desc = $rw["descripcion_del_nivel"];
$tds = "";
$selOp = "";
foreach ($aTipoPerms as $key => $value) {
if (in_array("{$nivel}@{$value}", $aPerms)) {
$selOp = $value;
}
}
$xHSel->setDivClass("tx1");
$mNivel = $xHSel->get("idNiv{$nivel}", "{$desc}", $selOp);
$options .= $mNivel;
}
return $options;
}
function setGenerarIDE_mensual($recibo, $fecha_de_corte = false)
{
if ($fecha_de_corte == false) {
$fecha_de_corte = fechasys();
}
$dia_inicial = date("Y-m", strtotime($fecha_de_corte)) . "-01";
$dia_final = date("Y-m-t", strtotime($fecha_de_corte));
$BySucursal = "";
//" AND (`operaciones_recibos`.`sucursal` = '" . getSucursal() . "') ";
$msg = "=============\t\tGENERANDO EL IMPUESTO SOBRE DEPOSITOS EN EFECTIVO\r\n";
//general el Archivo de IDE pagado
//Impuesto sobre Depositos en Efectivo
$sql = "SELECT\n\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`,\n\t\t\t\t\t\t`operaciones_recibos`.`tipo_pago`,\n\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real`) AS 'monto'\n\t\t\t\t\tFROM\n\t\t\t\t\t\t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\t\t\tINNER JOIN `operaciones_recibos` `operaciones_recibos`\n\t\t\t\t\t\t\tON `operaciones_mvtos`.`recibo_afectado` = `operaciones_recibos`.\n\t\t\t\t\t\t\t`idoperaciones_recibos`\n\t\t\t\t\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` =\n\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\t\t\t\tWHERE\n\t\t\t\t\t(`operaciones_mvtos`.`fecha_afectacion` >='{$dia_inicial}')\n\t\t\t\t\tAND\n\t\t\t\t\t(`operaciones_mvtos`.`fecha_afectacion` <='{$dia_final}')\n\t\t\t\t\tAND\n\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 2600)\n\t\t\t\t\tAND\n\t\t\t\t\t(`operaciones_recibos`.`tipo_pago` = 'efectivo' )\n\t\t\t\t\t{$BySucursal}\n\t\t\t\t\tGROUP BY\n\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`,\n\t\t\t\t\t`operaciones_recibos`.`tipo_pago`\n\t\t\t\tHAVING\n\t\t\t\t\tmonto > " . EXCENCION_IDE;
$cRec = new cReciboDeOperacion(12, false, $recibo);
$cRec->setNumeroDeRecibo($recibo, true);
$rsIDE = mysql_query($sql, cnnGeneral());
while ($rwIDE = mysql_fetch_array($rsIDE)) {
$socio = $rwIDE["socio_afectado"];
$monto = $rwIDE["monto"];
if ($monto > EXCENCION_IDE) {
//TODO: Analize this line
$SqlMax = "\n\t\t\t\t\t\t\t\tSELECT\n\t\t\t\t\t\t\t\t\t\t`captacion_cuentas`.*,\n\t\t\t\t\t\t\t\t\t\t`captacion_cuentastipos`.`descripcion_cuentastipos` AS `tipo`,\n\t\t\t\t\t\t\t\t\t\t`captacion_subproductos`.`descripcion_subproductos` AS `subproducto`,\n\t\t\t\t\t\t\t\t\t\t`captacion_subproductos`.`algoritmo_de_premio`,\n\t\t\t\t\t\t\t\t\t\t`captacion_subproductos`.`algoritmo_de_tasa_incremental`,\n\t\t\t\t\t\t\t\t\t\t`captacion_subproductos`.`metodo_de_abono_de_interes`,\n\t\t\t\t\t\t\t\t\t\t`captacion_subproductos`.`destino_del_interes`\n\t\t\t\t\t\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t\t\t\t\t\t`captacion_cuentas` `captacion_cuentas`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tINNER JOIN `captacion_cuentastipos` `captacion_cuentastipos`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tON `captacion_cuentas`.`tipo_cuenta` = `captacion_cuentastipos`.\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t`idcaptacion_cuentastipos`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\tINNER JOIN `captacion_subproductos` `captacion_subproductos`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\tON `captacion_cuentas`.`tipo_subproducto` = `captacion_subproductos`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t.`idcaptacion_subproductos`\n\t\t\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\t\tnumero_socio={$socio}\n\t\t\t\t\t\t\t\t\t\t\tAND `captacion_cuentas`.tipo_cuenta = 10\n\t\t\t\t\t\t\t\t\t\tORDER BY saldo_cuenta DESC\n\t\t\t\t\t\t\t\t\t\t\t\t\tLIMIT 0,1";
$DCtaMax = obten_filas($SqlMax);
$CuentaMax = $DCtaMax["numero_cuenta"];
$saldo = $DCtaMax["saldo_cuenta"];
if (isset($CuentaMax) and $saldo > TOLERANCIA_SALDOS) {
$cCta = new cCuentaALaVista($CuentaMax);
$cCta->initCuentaByCodigo($DCtaMax);
$ide = $cCta->getMontoIDE($fecha_de_corte);
if ($ide > 0) {
//Si el Saldo de la Cuenta es Mayor al IDE
if ($saldo >= $ide) {
$ReciboIDE = $cCta->setRetenerIDE($fecha_de_corte, $recibo, $ide);
} else {
//Si no el IDE es igual al Saldo
$ide_por_pagar = ($ide - $saldo) * -1;
$ide = $saldo;
$ReciboIDE = $cCta->setRetenerIDE($fecha_de_corte, $recibo, $ide);
//OK: agregar movimiento ide por pagar
if ($ide_por_pagar > 0) {
$cRec->setNuevoMvto($fecha_de_corte, $ide_por_pagar, 236, 1, "IDE no Retenido del {$dia_inicial} al {$dia_final}", 1, TM_CARGO, $socio, $CuentaMax);
}
}
$msg .= $cCta->getMessages("txt");
} else {
$msg .= "{$socio}\t{$CuentaMax}\tNO_PIDE\tNo retuvo IDE porque el Monto a Retener es {$ide}\r\n";
}
} else {
//OK: agregar movimiento ide por pagar
$msg .= "{$socio}\t{$CuentaMax}\tNO_CTA\tNo retuvo IDE por que no existe una cuenta valida({$saldo}) para descontar, Base de {$monto}\r\n";
}
} else {
$msg .= "{$socio}\t{$CuentaMax}\tNO_IDE\tNo retuvo IDE por que a Base de Calculo es {$monto}\r\n";
}
}
return $msg;
}
function valorar_convenio($idconvenio = "99")
{
$info = " alert('NO HAY INFORMACION.- ERROR DE DATOS');";
$sql_convenio = "SELECT * FROM creditos_tipoconvenio WHERE idcreditos_tipoconvenio={$idconvenio}";
$row = obten_filas($sql_convenio);
$info = $row["code_valoracion_javascript"];
unset($row);
return $info;
}
function calcula_ica($solicitud, $form)
{
$sql = "SELECT * FROM creditos_solicitud WHERE numero_solicitud={$solicitud}";
$mysolicitud = obten_filas($sql);
$socio = $mysolicitud["numero_socio"];
// Numero de Socio
$diasaut = $mysolicitud["dias_autorizados"];
// Dias Autorizados
$montoMin = $mysolicitud["monto_autorizado"];
// Monto Autorizado
$tasaInt = $mysolicitud["tasa_interes"];
// Monto Autorizado
$tipoConv = $mysolicitud["tipo_convenio"];
// Interes Diario */
$ICA_pagado = $mysolicitud["sdo_int_ant"];
// saldo ICA */
$infoConv = get_convenio($tipoConv);
$tasaICA = $infoConv["porcentaje_ica"];
$intneto = 0;
$inttotal = 0;
$intpagado = 0;
$intdiario = $montoMin * $tasaInt / EACP_DIAS_INTERES;
/**
* Consulta todos los creditos que aplican Interes Anticipado
*/
$totaliva = 0;
$nota = "";
$intneto = $intdiario * $diasaut * $tasaICA;
//Resta el Interes pagado
$intneto -= $ICA_pagado;
/**
* @see Parche: Solo se Incluye la afectacion del Credito
*/
$nota .= "Tasa ICA {$tasaICA}; Dias {$diasaut}, Int. Diario" . getFMoney($intdiario) . ", ICA Pag. {$ICA_pagado}";
//Valor IVA, obtenido del tipo de solicitud
$tasaiva = $infoConv["tasa_iva"];
$iva_inc = $infoConv["iva_incluido"];
if ($iva_inc == 1) {
$intneto = $intneto * (1 / (1 + $tasaiva));
$totaliva = $intneto * $tasaiva;
} else {
$totaliva = $intneto * $tasaiva;
}
$intneto = number_format($intneto, 2, '.', '');
//getFMoney($intneto);
$totaliva = number_format($totaliva, 2, '.', '');
//getFMoney($totaliva);
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("valorinteres", $intneto));
$tab->add(TabSetValue::getBehavior("valoriva", $totaliva));
$tab->add(TabSetValue::getBehavior("idobservaciones", $nota));
$tab->add(TabSetValue::getBehavior("idTasaIva", $tasaiva));
return $tab->getString();
}
/**
* @param int $socio
* @return float
* @see obtiene e� riesgo en monto por el promedio de creditos
*/
function getRiesgoDeRetrasoDePago($socio)
{
$x = array();
$sql = "SELECT COUNT(numero_solicitud) AS 'creditos', SUM(monto_autorizado) AS 'monto',\r\n\t\t\tSUM(DATEDIFF(fecha_ultimo_mvto, fecha_vencimiento)) AS 'retraso'\r\n\t\t\tFROM creditos_solicitud\r\n\t\t\tWHERE numero_socio={$socio}\r\n\t\t\tAND saldo_actual<=0\r\n\t\t\tGROUP BY numero_socio";
$d = obten_filas($sql);
$dias = round($d["retraso"] / $d["creditos"], 0);
$monto = $d["monto"] / $d["creditos"];
$riesgo = getRiesgoPorDias($dias) * $monto;
$x["monto"] = $monto;
$x["dias"] = $dias;
$x["riesgo"] = $riesgo;
return $x;
}
function jsinfo_util($id, $frm)
{
$sqlInfo = "SELECT * FROM general_utilerias WHERE idgeneral_utilerias ={$id}";
$rw = obten_filas($sqlInfo);
$tab = new TinyAjaxBehavior();
//$tab -> add(TabSetValue::getBehavior("i_3193c", $rw["nombre_utilerias"]));
$tab->add(TabSetValue::getBehavior("imsg", $rw["descripcion_utileria"]));
$tab->add(TabSetValue::getBehavior("iID1", $rw["describe_param_1"]));
$tab->add(TabSetValue::getBehavior("iID2", $rw["describe_param_2"]));
$tab->add(TabSetValue::getBehavior("iID3", $rw["describe_param_3"]));
$tab->add(TabSetValue::getBehavior("id_de", $rw["describe_init"]));
$tab->add(TabSetValue::getBehavior("id_a", $rw["describe_end"]));
return $tab->getString();
}
function jsSetCuotas($socio, $form)
{
//selecciona el tipo de ingreso
$SQLSP = "SELECT\n\t`socios_general`.`codigo`,\n\t`socios_tipoingreso`.`parte_social`,\n\t`socios_tipoingreso`.`parte_permanente`\nFROM\n\t`socios_general` `socios_general`\n\t\tINNER JOIN `socios_tipoingreso` `socios_tipoingreso`\n\t\tON `socios_general`.`tipoingreso` =\n\t\t`socios_tipoingreso`.`idsocios_tipoingreso`\nWHERE\n\t(`socios_general`.`codigo` ={$socio})";
$dSocio = obten_filas($SQLSP);
$social = $dSocio["parte_social"];
if (!$social) {
$social = 0;
}
$permanente = $dSocio["parte_permanente"];
if (!$permanente) {
$permanente = 0;
}
$total = $social + $permanente;
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idpartesocial", $social));
$tab->add(TabSetValue::getBehavior("idpartepermanente", $permanente));
$tab->add(TabSetValue::getBehavior("idtotalcuotas", $total));
return $tab->getString();
}
$interes_moratorio = 0;
$otros_cargos = 0;
//Cuando el Ultimo Mvto es mayor a la fecha de Vcto
if ($f_ultimo_mvto < $f_vencimiento) {
$dias_vigente = restarfechas($f_ultimo_mvto, $f_vencimiento);
$dias_vencidos = restarfechas($f_vencimiento, fechasys());
} else {
$dias_vencidos = restarfechas($f_ultimo_mvto, fechasys());
}
$interes = $capital * $dias_vigente * $tasan / EACP_DIAS_INTERES;
$interes_moratorio = $capital * $dias_vencidos * ($tasan + $tasam) / EACP_DIAS_INTERES;
//
$total = $saldo + $interes + $interes_moratorio + $otros_cargos;
//Obtiene el Telefono del Socio
$sql_150 = "SELECT * FROM socios_vivienda WHERE socio_numero={$socio} AND principal='1'";
$ddomicilio = obten_filas($sql_150);
$telefono1 = $ddomicilio[10];
$telefono2 = $ddomicilio[11];
$hora_default = date("H:i");
$fecha_default = fechasys();
$observaciones = "Generado el {$fecha_default} a las {$hora_default} Hrs. por {$oficial}";
if ($dias_vencidos > 1 && $dias_vencidos <= 15) {
//Primera Notificacion
$tnotif = "segunda_notificacion";
$idnant = 1;
$idnnew = 2;
$sql_hay = "SELECT COUNT('idseguimiento_notificaciones') AS 'siexiste' FROM seguimiento_notificaciones WHERE socio_notificado={$socio}\n\t\t\tAND numero_solicitud={$solicitud} AND numero_notificacion={$idnant}";
$exists = mifila($sql_hay, "siexiste");
//si existe llamada, dar seguimiento
if ($exists > 0) {
//Cancelar las Llamadas ya hechas, pero sin compromisos
function init()
{
$sql = "SELECT *\n\t\t\t\t\t/*\n\t\t\t\t\tidcaptacion_subproductos, descripcion_subproductos, descripcion_completa,\n\t\t\t\t\tfecha_alta, fecha_baja, algoritmo_de_premio, algoritmo_de_tasa_incremental,\n\t\t\t\t\ttipo_de_cuenta, nombre_del_contrato, contable_movimientos, contable_intereses_por_pagar,\n\t\t\t\t\tcontable_gastos_por_intereses, contable_cuentas_castigadas, metodo_de_abono_de_interes,\n\t\t\t\t\tdestino_del_interes, algoritmo_modificador_del_interes\n\t\t\t\t\t*/\n \t\t\t\tFROM captacion_subproductos\n \t\t\t\tWHERE idcaptacion_subproductos = " . $this->mCodigo . " LIMIT 0,1 ";
$this->aDatos = obten_filas($sql);
return $this->aDatos;
}
//Mejorar
?>
<script >
function cierrame() { if( window.console ) window.console.log( '' ) ; window.close(); }
</script>
<body onLoad="setTimeout('cierrame()',60*5)">
<p class="frmTitle"><script> document.write(document.title); </script></p>
<?php
$filter = isset($_GET["f"]) ? $_GET["f"] : false;
$table = isset($_GET["t"]) ? $_GET["t"] : false;
$msg = "";
if ($filter == false or $table == false) {
$msg .= "ERROR\tNO SE TIENE UN DATO\r\n";
} else {
$insql = "DELETE FROM {$table} WHERE {$filter}";
$sqlor = "SELECT * FROM {$table} WHERE {$filter}";
$filas = obten_filas($sqlor);
$cadena = json_encode($filas);
$xErr = new cCoreLog();
$xErr->add("{$oficial} Elimino {$filter} de {$table}.\n ORIGINAL:\n{$cadena}");
$xErr->guardar($xErr->OCat()->ELIMINAR_RAW);
$rs = my_query($insql);
if ($rs["stat"] == true) {
$msg .= "OK\tSE HA ELIMINADO EL REGISTRO\r\n";
}
}
echo JS_CLOSE;
?>
</body>
</html>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>PLANEACION DEL CREDITO EN GRUPOS SOLIDARIOS</title>
</head>
<link href="../css/reporte.css" rel="stylesheet" type="text/css">
<body>
<?php
echo getRawHeader();
$title = "PLANEACION DEL CREDITO EN GRUPOS SOLIDARIOS EN ETAPA DE AUTORIZACION";
$thTit = "Monto Autorizado";
$idplan = $_GET["plan"];
$tipo_docto = 40;
$rs_find_plan = false;
if (!isset($idplan)) {
$idgrupo = $_GET["on"];
$sql_find_plan = "SELECT * FROM operaciones_recibos WHERE grupo_asociado={$idgrupo} AND tipo_docto=14 LIMIT 0,1";
$rs_find_plan = obten_filas($sql_find_plan);
$idplan = $rs_find_plan["idoperaciones_recibos"];
}
//
echo "";
//
//$rsrain = mysql_query($sqlrain);
$xRec = new cReciboDeOperacion($tipo_docto, $idplan);
$xRec->setNumeroDeRecibo($idplan, true, $rs_find_plan);
$rsr = $xRec->getDatosReciboInArray();
//while ($rsr = mysql_fetch_array($rsrain)) {
$idgrupo = $rsr["grupo_asociado"];
$tipo_docto = $rsr["tipo_docto"];
//
$sql_infogroup = "select * from socios_grupossolidarios ";
$sql_infogroup .= " where idsocios_grupossolidarios={$idgrupo}";
function init($arrDatos = false)
{
if (is_array($arrDatos)) {
$this->mDataArray = $arrDatos;
} else {
$this->mDataArray = obten_filas("SELECT * FROM `tesoreria_cajas_movimientos` WHERE `idtesoreria_cajas_movimientos` =" . $this->mCodigo . " LIMIT 0,1");
}
//if($this->mObj == null){
$this->mObj = new cTesoreria_cajas_movimientos($this->mDataArray);
//}
if (setNoMenorQueCero($this->mCodigo) <= 0) {
$this->mCodigo = $this->mObj->idtesoreria_cajas_movimientos()->v();
}
$this->mObj->setData($this->mDataArray);
$this->mClaveDeBanco = $this->mObj->cuenta_bancaria()->v();
$this->mCodigoDeRecibo = $this->mObj->recibo()->v();
}
$totalExcedente += $MontoGrav;
$totalOperaciones++;
$totalPendiente += $IDEPend;
$totalRecaudado += $IDERet;
$totalDeterminados += $IDECalc;
$totalRemanenteDep += $RemPerA;
echo "\n\t\t\t\t<PersonaFisica curp=\"{$curp}\" rfc=\"{$rfc}\">\n\t\t\t\t\t<Nombre>\n\t\t\t\t\t\t<NombreCompleto>{$nombre}</NombreCompleto>\n\t\t\t\t\t</Nombre>\n\t\t\t\t\t<Domicilio>\n\t\t\t\t\t\t<DomicilioCompleto>{$domicilio}</DomicilioCompleto>\n\t\t\t\t\t</Domicilio>\n\t\t\t\t</PersonaFisica>\n\n\t\t\t\t<DepositoEnEfectivo impuestoDeterminado=\"{$IDECalc}\"\n remanentePeriodosAnteriores=\"{$RemPerA}\"\n montoExcedente=\"{$MontoGrav}\"\n impuestoRecaudado=\"{$IDERet}\"\n recaudacionPendiente=\"{$IDEPend}\"\n />\n";
}
echo "</RegistroDeDetalle>";
//Registra el Pago diario del IDE
$sqlPagos = "SELECT\n\t\t\t`operaciones_mvtos`.`idoperaciones_mvtos`,\n\t\t\t`operaciones_mvtos`.`fecha_operacion`,\n\t\t\t`operaciones_mvtos`.`socio_afectado`,\n\t\t\t`operaciones_mvtos`.`docto_afectado`,\n\t\t\t`operaciones_mvtos`.`recibo_afectado`,\n\t\t\t`operaciones_mvtos`.`tipo_operacion`,\n\t\t\t`operaciones_mvtos`.`afectacion_real`\n\t\tFROM\n\t\t\t`operaciones_mvtos`\n\t\tWHERE\n\t\t\t(`operaciones_mvtos`.`fecha_operacion` >='{$fecha_inicial}')\n\t\t\tAND\n\t\t\t(`operaciones_mvtos`.`fecha_operacion` <='{$fecha_final}')\n\t\t\tAND\n\t\t\t(`operaciones_mvtos`.`tipo_operacion` = 9301 )\n\t\tORDER BY\n\t\t\t`operaciones_mvtos`.`fecha_operacion` ";
//echo $sqlPagos;
$rsPagos = mysql_query($sqlPagos, cnnGeneral());
while ($rwPagos = mysql_fetch_array($rsPagos)) {
$fecha_de_pago = $rwPagos["fecha_operacion"];
$monto = $rwPagos["afectacion_real"];
$numero_operac = $rwPagos["idoperaciones_mvtos"];
$recibo = $rwPagos["recibo_afectado"];
$sqlOps = "SELECT\n\t\t\t\t\t numero_de_documento\n\t\t\t\t\t recibo_relacionado,\n\t\t\t\t\t fecha_expedicion,\n\t\t\t\t\t cuenta_bancaria\n\t\t\t\t\t FROM bancos_operaciones\n\t\t\t\t\tWHERE recibo_relacionado = {$recibo}\n\t\t\t\t\t\tAND fecha_expedicion ='{$fecha_de_pago}'\n\t\t\t\t\t\tAND tipo_operacion = 'retiro'\n\t\t\t\t\tLIMIT 0,1 ";
$DOps = obten_filas($sqlOps);
$operacion = $DOps["numero_de_documento"];
$banco = $DOps["cuenta_bancaria"];
$xBanc = new cCuentaBancaria($banco);
$DBanc = $xBanc->getDatosInArray();
$banco_nom = $DBanc["nombre_de_la_entidad"];
$banco_rfc = $DBanc["rfc_de_la_entidad"];
$totalEnterado += $monto;
$totalOperaciones++;
echo "\n\t\t\t<EnteroPropio noOperacion=\"{$operacion}\" impuestoEnterado=\"{$monto}\" fechaEntero=\"{$fecha_de_pago}\" nombreInstitucion=\"{$banco_nom}\" rfcInstitucion=\"{$banco_rfc}\"/>\n";
}
echo "\n\t\t</ReporteDeRecaudacionYEnteroDiaria>\n\t\t<Totales importeRemanenteDepositos=\"{$totalRemanenteDep}\" importeCheques=\"0\" importeDeterminadoDepositos=\"{$totalDeterminados}\" importeRecaudadoDepositos=\"{$totalRecaudado}\"\n\t\timportePendienteRecaudacion=\"{$totalPendiente}\" operacionesRelacionadas=\"{$totalOperaciones}\" importeExcedenteDepositos=\"{$totalExcedente}\" importeEnterado=\"{$totalEnterado}\"/>\n\t</InstitucionDeCredito>\n</DeclaracionInformativaMensualIDE>";
$nombre = mifila($sqlrec, "cadena_distributiva");
}
$direccion = $domicilio_del_socio;
$rfc = $DSoc["rfc"];
$curp = $DSoc["curp"];
// obtiene datos del documento que ayudaran al detalle en contabilidad
$observaciones = mifila($sqlrec, "observacion_recibo");
//
$sql_d_mvto = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=500 ";
$sql_d_inv = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=223 ";
$sql_d_ide = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\tfecha_operacion = '{$fechaRecibo}'\n\t\t\t\t\t\tAND docto_afectado = {$docto}\n\t\t\t\t\t\tAND tipo_operacion=235 ";
$xInv = new cCuentaInversionPlazoFijo($docto, $idsocio);
$dcuentas = $xInv->getDatosInArray();
$dmvto = obten_filas($sql_d_mvto);
$dInv = obten_filas($sql_d_inv);
$dIDE = obten_filas($sql_d_ide);
//
$iSocio = new cFicha(iDE_SOCIO, $idsocio);
$iSocio->setTableWidth();
$iSocio->show();
echo "<hr />";
$cInv = new cFicha(iDE_CINVERSION, $docto);
$cInv->setTableWidth();
$cInv->show();
?>
<hr />
<?php
$tasa = getFMoney($dcuentas["tasa_otorgada"] * 100);
$interes = getFMoney($dmvto["afectacion_real"]);
//$capital = getFMoney($dInv["afectacion_real"]);
$capital = getFMoney($dcuentas["saldo_cuenta"]);
function xul_back_record($mark)
{
if ($mark < 0) {
$mark = 0;
}
$strSQL_Select = "SELECT * FROM captacion_subproductos\n LIMIT {$mark}, 1";
$tab = new TinyAjaxBehavior();
$rw = obten_filas($strSQL_Select);
$mark--;
$tab->add(TabSetValue::getBehavior("id-idcaptacion_subproductos", $rw["idcaptacion_subproductos"]));
$tab->add(TabSetValue::getBehavior("id-tipo_de_cuenta", $rw["tipo_de_cuenta"]));
$tab->add(TabSetValue::getBehavior("id-descripcion_subproductos", $rw["descripcion_subproductos"]));
$tab->add(TabSetValue::getBehavior("id-descripcion_completa", $rw["descripcion_completa"]));
$tab->add(TabSetValue::getBehavior("id-fecha_alta", $rw["fecha_alta"]));
$tab->add(TabSetValue::getBehavior("id-fecha_baja", $rw["fecha_baja"]));
$tab->add(TabSetValue::getBehavior("id-metodo_de_abono_de_interes", $rw["metodo_de_abono_de_interes"]));
$tab->add(TabSetValue::getBehavior("id-destino_del_interes", $rw["destino_del_interes"]));
$tab->add(TabSetValue::getBehavior("id-algoritmo_de_premio", $rw["algoritmo_de_premio"]));
$tab->add(TabSetValue::getBehavior("id-algoritmo_de_tasa_incremental", $rw["algoritmo_de_tasa_incremental"]));
$tab->add(TabSetValue::getBehavior("id-algoritmo_modificador_del_interes", $rw["algoritmo_modificador_del_interes"]));
$tab->add(TabSetValue::getBehavior("id-contable_movimientos", $rw["contable_movimientos"]));
$tab->add(TabSetValue::getBehavior("id-contable_gastos_por_intereses", $rw["contable_gastos_por_intereses"]));
$tab->add(TabSetValue::getBehavior("id-contable_intereses_por_pagar", $rw["contable_intereses_por_pagar"]));
$tab->add(TabSetValue::getBehavior("id-contable_cuentas_castigadas", $rw["contable_cuentas_castigadas"]));
$tab->add(TabSetValue::getBehavior("id-nombre_del_contrato", $rw["nombre_del_contrato"]));
$tab->add(TabSetValue::getBehavior("id-markRecord", $mark));
return $tab->getString();
}
$sqlcontrato = "SELECT * FROM captacion_cuentas where numero_cuenta={$idcuenta}";
$datos_de_la_cuenta = obten_filas($sqlcontrato);
$idsocio = $datos_de_la_cuenta["numero_socio"];
$tasa = $datos_de_la_cuenta["tasa_otorgada"];
$tasa = $tasa * 100;
$xSoc = new cSocio($idsocio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$domicilio_del_socio = $xSoc->getDomicilio();
$nombre_del_socio = $xSoc->getNombreCompleto();
$numero_de_socio = $idsocio;
$caja_local = eltipo("socios_cajalocal", $DSoc["cajalocal"]);
/**
* Busca el Primer Deposito del Socio.
*/
$datos_primer_deposito = obten_filas("SELECT * FROM operaciones_mvtos WHERE docto_afectado={$idcuenta} ORDER BY fecha_operacion LIMIT 0,1");
$monto_inicial = $datos_primer_deposito[7];
$monto_inicial_letras = convertirletras($monto_inicial);
$numero_dias = $datos_primer_deposito[29];
$variable_lugar = $eacp_estado . ", " . $eacp_municipio;
$variable_fecha_actual = fecha_larga();
$variable_tasa_otorgada = $datos_de_la_cuenta["tasa_otorgada"] * 100;
$variable_fecha_vencimiento = fecha_larga($datos_primer_deposito[11]);
$variable_oficial = $oficial;
/**
* Obtiene la Lista de Beneficiados
*/
$beneficiados = "";
$sql_beneficiados = "SELECT * FROM socios_relaciones WHERE tipo_relacion=11 AND socio_relacionado={$idsocio} LIMIT 0,100";
$rs_beneficiados = mysql_query($sql_beneficiados);
while ($row_beneficiado = mysql_fetch_array($rs_beneficiados)) {
function init($persona = false, $credito = false, $numero = false)
{
//TODO: Verificar cambios de incencias 2014-10-01
$persona = setNoMenorQueCero($persona);
$credito = setNoMenorQueCero($credito);
$numero = setNoMenorQueCero($numero);
$this->mPersona = $persona > 0 ? $persona : $this->mPersona;
$this->mCredito = $credito > 0 ? $credito : $this->mCredito;
$this->mNumero = $numero > 0 ? $numero : $this->mNumero;
$sql = "SELECT * FROM letras WHERE socio_afectado={$persona} AND docto_afectado={$credito} AND periodo_socio={$numero} LIMIT 0,1";
$init = true;
if (count($this->mDatosInArray) > 2) {
$Datos = $this->mDatosInArray;
} else {
$Datos = obten_filas($sql);
if (!isset($Datos["letra"])) {
$init = false;
}
}
$this->mOB = new cLetrasVista();
$this->mOB->setData($Datos);
$this->mDatosInArray = $Datos;
//$fecha = $this->mOB->fecha_de_pago()->v();
//$this->mMessages .= "[FECHA_DE_PAGO : $fecha]\r\n";
return $init;
}
case TPERSONAS_DIRECCIONES:
$xDom = new cSocios_vivienda();
$D = obten_filas("SELECT * FROM socios_vivienda WHERE socio_numero = {$data} ORDER BY fecha_alta DESC LIMIT 0,1");
$xDom->setData($D);
//setLog("SELECT * FROM socios_vivienda WHERE socio_numero = $data ORDER BY fecha_alta DESC LIMIT 0,1");
//$value = mb_check_encoding($value, 'UTF-8') ? $value : utf8_encode($value);
//$comment = iconv('UTF-8', 'UTF-8//IGNORE', $comment);
//SELECT column1, CONVERT(column2 USING utf8)
$query = $xDom->query();
$query->setToUTF8();
//setLog(json_encode($query->getCampos()) );
$cnt = $svc->getEncryptData(json_encode($query->getCampos()));
break;
case TPERSONAS_ACTIVIDAD_ECONOMICA:
$xTrab = new cSocios_aeconomica();
$D = obten_filas("SELECT * FROM `socios_aeconomica` WHERE\t(`socios_aeconomica`.`socio_aeconomica` = {$data} ) ORDER BY `socios_aeconomica`.`fecha_alta` DESC\tLIMIT 0,1");
$xTrab->setData($D);
$query = $xTrab->query();
$query->setToUTF8();
$cnt = $svc->getEncryptData(json_encode($query->getCampos()));
break;
case TCATALOGOS_EMPRESAS:
$xEmp = new cSocios_aeconomica_dependencias();
$D = obten_filas("SELECT * FROM `socios_aeconomica_dependencias` WHERE (`socios_aeconomica_dependencias`.`clave_de_persona` ={$data}) LIMIT 0,1");
$xEmp->setData($D);
$query = $xEmp->query();
$query->setToUTF8();
$cnt = $svc->getEncryptData(json_encode($query->getCampos()));
break;
}
echo $cnt;
function xul_back_record($mark)
{
if ($mark < 0) {
$mark = 0;
}
$strSQL_Select = "SELECT * FROM general_reports\n LIMIT {$mark}, 1";
$tab = new TinyAjaxBehavior();
$rw = obten_filas($strSQL_Select);
$mark--;
$tab->add(TabSetValue::getBehavior("id-idreport", $rw["idreport"]));
$tab->add(TabSetValue::getBehavior("id-descripcion_reports", $rw["descripcion_reports"]));
$tab->add(TabSetValue::getBehavior("id-aplica", $rw["aplica"]));
$tab->add(TabSetValue::getBehavior("id-idgeneral_reports", $rw["idgeneral_reports"]));
$tab->add(TabSetValue::getBehavior("id-explicacion", $rw["explicacion"]));
$tab->add(TabSetValue::getBehavior("id-markRecord", $mark));
return $tab->getString();
}
function setPolizaPorRecibo($recibo, $generador = false)
{
$sucess = false;
$QL = new MQL();
$xLogg = new cCoreLog();
//$arrEquivEfvo =
//if (GENERAR_CONTABILIDAD == true){
$xLogg->add("=======\tGENERAR POLIZA POR RECIBO NUM {$recibo}\r\n", $xLogg->DEVELOPER);
$xT = new cCatalogoOperacionesDeCaja();
$centro_de_costo = DEFAULT_CENTRO_DE_COSTO;
//($generador == GENERAR_POLIZAS_AL_CIERRE) AND
if (setNoMenorQueCero($recibo) > 0) {
$xRec = new cReciboDeOperacion(false, false, $recibo);
if ($xRec->init() == true) {
$sucess = true;
//Obten datos del recibo para la Poliza
$sqlRec = "SELECT\r\n\t\t\t\t\t\t\t`operaciones_recibos`.*,\r\n\t\t\t\t\t\t\t`operaciones_recibostipo`.`tipo_poliza_generada`,\r\n\t\t\t\t\t\t`operaciones_recibostipo`.`afectacion_en_flujo_efvo`\r\n\t\t\t\t\t\tFROM\r\n\t\t\t\t\t\t\t`operaciones_recibos` `operaciones_recibos`\r\n\t\t\t\t\t\t\t\tINNER JOIN `operaciones_recibostipo`\r\n\t\t\t\t\t\t\t\t`operaciones_recibostipo`\r\n\t\t\t\t\t\t\t\tON `operaciones_recibos`.`tipo_docto` =\r\n\t\t\t\t\t\t\t\t`operaciones_recibostipo`.\r\n\t\t\t\t\t\t\t\t`idoperaciones_recibostipo`\r\n\t\t\t\t\t\tWHERE\r\n\t\t\t\t\t\t\t(`operaciones_recibos`.`idoperaciones_recibos` = {$recibo})\r\n\t\t\t\t\t\tLIMIT 0,1 ";
$dRec = obten_filas($sqlRec);
$tipo_de_pago = $xRec->getTipoDePago();
//Corrige los cargos de la PolizaS
$total_poliza = 0;
$SQLSumCargos = "SELECT SUM(monto) AS 'total' FROM contable_polizas_proforma\r\n\t\t\t\t\t\t\t\t\t\t\t\tWHERE contable_operacion = '" . TM_CARGO . "'\r\n\t\t\t\t\t\t\t\t\t\t\t\tAND numero_de_recibo={$recibo} ";
$TMPCargos = mifila($SQLSumCargos, "total");
$SQLSumAbonos = "SELECT SUM(monto) AS 'total' FROM contable_polizas_proforma\r\n\t\t\t\t\t\t\t\t\t\t\t\tWHERE contable_operacion = '" . TM_ABONO . "'\r\n\t\t\t\t\t\t\t\t\t\t\t\tAND numero_de_recibo={$recibo} ";
$TMPAbonos = mifila($SQLSumAbonos, "total");
if ($TMPCargos > $TMPAbonos) {
$diferencia = $TMPAbonos - $TMPCargos;
$diferencia = $diferencia < 0 ? $diferencia * -1 : $diferencia;
$total_poliza = $TMPCargos;
setPolizaProforma($recibo, $xT->getTipoOperacionByTipoPago($tipo_de_pago), $diferencia, 1, 1, TM_ABONO);
$xLogg->add("OK\tCUADRAR\tABONO\tOperacion Agregada por DESCUADRE en {$tipo_de_pago} por {$diferencia}\r\n", $xLogg->DEVELOPER);
//$xLogg->add( , $xLogg->DEVELOPER);
} elseif ($TMPCargos < $TMPAbonos) {
$diferencia = $TMPCargos - $TMPAbonos;
$diferencia = $diferencia < 0 ? $diferencia * -1 : $diferencia;
$total_poliza = $TMPAbonos;
setPolizaProforma($recibo, $xT->getTipoOperacionByTipoPago($tipo_de_pago), $diferencia, 1, 1, TM_CARGO);
$xLogg->add("OK\tCUADRAR\tCARGOS\tOperacion Agregada por DESCUADRE en {$tipo_de_pago} por {$diferencia}\r\n", $xLogg->DEVELOPER);
} else {
$total_poliza = $TMPCargos;
}
//tipos de Poliza 1=ingreso, 2=egreso, 3 Diario, 4=orden 5
$xD = new cFecha(0, $xRec->getFechaDeRecibo());
$numero_de_recibo = $recibo;
$tipo_de_poliza = $xRec->getOTipoRecibo()->getTipoPolizaContable();
$fecha_de_poliza = $xRec->getFechaDeRecibo();
$ejercicio_de_poliza = $xD->anno();
$periodo_de_poliza = $xD->mes();
$recibo_fiscal = strlen($xRec->getReciboFiscal()) > 2 ? ";RF:" . $xRec->getReciboFiscal() : "";
$observacion_recibo = $xRec->getObservaciones();
$cheque = strlen($xRec->getNumeroDeCheque()) > 2 ? ";Ch:" . $xRec->getNumeroDeCheque() : "";
$concepto_poliza = substr("R:" . $numero_de_recibo . $recibo_fiscal . $cheque . ";" . $xRec->getObservaciones(), 0, 80);
$flujo_efectivo = $xRec->getOTipoRecibo()->getAfectacionEnEfvo();
$socio = $xRec->getCodigoDeSocio();
$propietario = $xRec->getCodigoDeUsuario();
$xLogg->add("=====\tRECIBO TIPO: " . $xRec->getTipoDeRecibo() . " SUMA: " . $xRec->getTotal() . " \r\n", $xLogg->DEVELOPER);
//------------------ Agregar Poliza
$xPol = new cPoliza($tipo_de_poliza, false, $ejercicio_de_poliza, $periodo_de_poliza);
$xPol->add($concepto_poliza, $fecha_de_poliza, false, 0, 0, $propietario, $centro_de_costo, $recibo);
$numero_de_poliza = $xPol->get();
$xLogg->add("=====\tPOLIZA NUM: {$numero_de_poliza} | TIPO: {$tipo_de_poliza} | EJERCICIO: {$ejercicio_de_poliza} | PERIODO: {$periodo_de_poliza}\r\n", $xLogg->DEVELOPER);
$sucess = $xPol->mRaiseError == true ? false : true;
//------------------ Leer la PROFORMA
$sqlMvtosToPoliza = "SELECT\r\n\t\t\t\t\t`contable_polizas_proforma`.*,\r\n\t\t\t\t\t`operaciones_tipos`.*\r\n\t\t\r\n\t\t\t\t\tFROM\r\n\t\t\t\t\t`operaciones_tipos` `operaciones_tipos`\r\n\t\t\t\t\t\tINNER JOIN `contable_polizas_proforma`\r\n\t\t\t\t\t\t`contable_polizas_proforma`\r\n\t\t\t\t\t\tON `operaciones_tipos`.`idoperaciones_tipos` =\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`tipo_de_mvto`\r\n\t\t\t\t\t\tAND `contable_polizas_proforma`.`numero_de_recibo` = {$numero_de_recibo}\r\n\t\t\t\t\tORDER BY\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`contable_operacion` DESC,\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`socio`,\r\n\t\t\t\t\t\t`contable_polizas_proforma`.`tipo_de_mvto`\t\t\t\t\r\n\t\t\t\t\t";
if ($sucess == true) {
$rs = $QL->getDataRecord($sqlMvtosToPoliza);
foreach ($rs as $rw) {
$cuenta = CUENTA_DE_CUADRE;
$nombre = "";
$socio = $rw["socio"];
if (CONTABLE_CUENTAS_POR_SOCIO == true) {
$xSoc = new cSocio($socio, true);
$nombre = $xSoc->getNombreCompleto();
}
$documento = $rw["documento"];
$monto_movimiento = $rw["monto"];
$tipoOp = $rw["tipo_de_mvto"];
$tipo_movimiento = $rw["contable_operacion"];
$RecUsr = $rw["idusuario"];
$cuenta_bancaria = $rw["banco"];
$cargo_movimiento = 0;
$abono_movimiento = 0;
if ($tipo_movimiento == TM_CARGO) {
$cargo_movimiento = $monto_movimiento;
$abono_movimiento = 0;
} else {
$cargo_movimiento = 0;
$abono_movimiento = $monto_movimiento;
}
$formula = $rw["cuenta_contable"];
//Corregir de urgencia: OK: 06Oct2011
$sForms = new cValorarFormulas();
$cuenta = $sForms->getCuentaContable($socio, $documento, $formula, $RecUsr, $xRec->getNumeroDeCheque(), $cuenta_bancaria);
$xLogg->add($sForms->getMessages(), $xLogg->DEVELOPER);
//tipo de cuenta es Abonos a efectivo
if ($cuenta != "NO_CONTABILIZAR") {
$xCuenta = new cCuentaContable($cuenta);
$xCuenta->init();
$cuenta = $xCuenta->get();
//Carga los datos del Oficial
if ($xCuenta->getEsCuentaDeCirculante() == true) {
$xOf = new cSystemUser($RecUsr);
$xOf->init();
$nombre = $xOf->getNombreCompleto();
$xLogg->add("OK\tCUENTA_ADD\tLa Cuenta {$cuenta} de Carga por Usuario [ {$nombre} ]\r\n", $xLogg->DEVELOPER);
} else {
$xLogg->add("OK\tCUENTA\tLa Cuenta de Trabajo es {$cuenta} Originado del Socio {$socio}\r\n", $xLogg->DEVELOPER);
}
//verifica para dar de alta a la cuenta
$Existentes = $xCuenta->getCountCuenta();
if ($Existentes == false) {
$xLogg->add("WARN\tCUENTA_ADD\tLa Cuenta de Trabajo {$cuenta} NO EXISTE, se AGREGA\r\n", $xLogg->DEVELOPER);
$cuenta = $xCuenta->add($nombre);
if ($xCuenta->mRaiseError == true) {
//$msg .= "ERROR\tLa Cuenta de Trabajo $cuenta NO EXISTE\r\n";
//$msg = $xCuenta->getMessages();
}
}
$xCuenta->init();
$xPol->addMovimiento($cuenta, $cargo_movimiento, $abono_movimiento, "{$socio}", "{$documento}:{$tipoOp}", false, $fecha_de_poliza);
//$xLogg->add("WARN\tNO_CONT\tAGREGAR $cuenta, $cargo_movimiento, $abono_movimiento\r\n" , $xLogg->DEVELOPER);
$xLogg->add($xCuenta->getMessages(), $xLogg->DEVELOPER);
} else {
$xLogg->add("WARN\tNO_CONT\tEl Movimiento de {$socio} | {$documento} | {$tipoOp} de Monto {$monto_movimiento} se OMITE\r\n", $xLogg->DEVELOPER);
}
}
$xPol->setFinalizar();
}
//sucess
$xLogg->add($xPol->getMessages(), $xLogg->DEVELOPER);
$this->mIDDePoliza = $xPol->getCodigo();
}
}
//END VALUE.- GENERAR AL FINAL
//} //END VALUE.- GENERAR CONTABILIDAD
$this->mMessages .= $xLogg->getMessages();
return $xLogg->getMessages();
}
@mysql_free_result($rs);
return "<div id='i_lst'>\r\n <table border='1'> \r\n {$tds} \r\n </table>\r\n </div>\r\n ";
}
function ClearSearch($similar)
{
return '';
}
$jxc->exportFunction('jsGetRegistro', array('i_b62df', 'frm1879d025'));
$jxc->exportFunction('SearchRecord', array('i_b62df'), '#mFind');
$jxc->exportFunction('ClearSearch', array('i_b62df'), '#mFind');
$jxc->exportFunction('BackRecord', array('ifproperties', 'frm1879d025'));
$jxc->exportFunction('NextRecord', array('ifproperties', 'frm1879d025'));
$jxc->process();
if (isset($retrieveKey)) {
$sql_get_rec = "SELECT aplicado_a, code_type, description_short, estructura_de_la_formula\r\n FROM general_formulas WHERE aplicado_a={$retrieveKey}";
$arrRs = obten_filas($sql_get_rec);
$lim = sizeof($arrRs) - 1;
for ($i = 0; $i <= $lim; $i++) {
if ($i == 0) {
$str .= "{$arrRs[$i]}";
} else {
$str .= "@{$arrRs[$i]}";
}
}
$values = explode("@", $str);
$defaultAction = "o_3ac340832f29c11538fbe2d6f75e8bcc";
} else {
$values = explode("@", "0@php@@");
}
switch ($o) {
case "o_e0df5f3dfd2650ae5be9993434e2b2c0":
}
if ($MontoGarantia < 0) {
$msg .= date("H:i:s") . "\t{$codigo}\t{$credito}\tERROR la Garantia Liquida({$MontoGarantia}) es Menor a Cero, deberia ser de " . $MontoOriginal * $porcentaje_gtia_liq . " \r\n";
} else {
$msg .= date("H:i:s") . "\t{$codigo}\t{$credito}\tEl % de la Garantia es {$porcentaje_gtia_liq} y tiene un Monto de {$MontoGarantia} de " . $MontoOriginal * $porcentaje_gtia_liq . " \r\n";
}
//Garantia Hipotecaria
$Hipoteca = "NO";
$HipotecaValuacion = "";
$HipotecaGravamen = "";
$HipotecaSeguro = "";
$HipotecaActualizado = "";
$HipotecaMonto = 0;
$sqlHipoteca = "SELECT\n\t`creditos_garantias`.`tipo_garantia`,\n\t`creditos_garantias`.`estatus_actual`,\n\t`creditos_garantias`.`tipo_valuacion`,\n\t`creditos_garantias`.`solicitud_garantia`,\n\tSUM(`creditos_garantias`.`monto_valuado`) AS 'hipoteca'\nFROM\n\t`creditos_garantias` `creditos_garantias`\nWHERE\n\t(`creditos_garantias`.`tipo_garantia` =1)\n\tAND\n\t(`creditos_garantias`.`estatus_actual` =2)\n\tAND\n\t(`creditos_garantias`.`solicitud_garantia` ={$credito})\nGROUP BY\n\t(`creditos_garantias`.`tipo_garantia`),\n\t(`creditos_garantias`.`solicitud_garantia`)";
if ($rw["aplica_gastos_notariales"] == 1) {
$DHipoteca = obten_filas($sqlHipoteca);
if (isset($DHipoteca["solicitud_garantia"])) {
$HipotecaValuacion = $VAvaluo[$DHipoteca["tipo_valuacion"]];
$HipotecaGravamen = "SI";
$HipotecaSeguro = "NO";
$HipotecaActualizado = "NO";
$HipotecaMonto = $DHipoteca["hipoteca"];
$msg .= date("H:i:s") . "\t{$codigo}\t{$credito}\tSe Agrega la Hipoteca por un Monto de {$HipotecaMonto}\r\n";
} else {
$msg .= date("H:i:s") . "\t{$codigo}\t{$credito}\tNo existe la Hipoteca, la Razon de Garantia Hipotecaria es {$razon_garantia}\r\n";
}
}
if ($rw["periocidad_de_pago"] == 360) {
$FrecuenciaDePagos = $dias_autorizados;
}
$tdBody .= "\n\t\t<tr>\n\t\t\t<td>{$personalidad}</td>\t<td>{$nombre}</td>\n\t\t\t<td>{$codigo}</td>\n\t\t\t<td>{$credito}</td>\n\t\t\t<td>{$tipo_credito}</td>\n\t\t\t<td>{$MAutorizacion}</td>\n\t\t\t<td>{$IngresoPrioritario}</td>\n\t\t\t<td>{$cumplioPagoSostenido}</td>\n\t\t\t<td>" . EACP_NAME . "</td>\n\t\t\t<td>Caja Solidaria</td>\n\t\t\t<td>{$CondicionDePago}</td>\n\t\t\t<td>{$FechaDeMinistracion}</td>\n\t\t\t<td>{$MontoOriginal}</td>\n\t\t\t<td>{$FechaDeVencimiento}</td>\n\t\t\t<td>{$TasaInteresAnual}</td>\n\t\t\t<td>{$NumeroPagos}</td>\n\t\t\t<td>{$FrecuenciaDePagos}</td>\n\t\t\t<td>{$CapitalInsoluto}</td>\n\t\t\t<td>{$Interesdevengado}</td>\n\t\t\t<td>{$FechaDeMvto}</td>\n\t\t\t<td>{$EstatusCredito}</td>\n\t\t\t<td>{$MontoGarantia}</td>\n\t\t\t<td>SI</td>\n\t\t\t<td>SI</td>\n\t\t\t<td>NO</td>\n\t\t\t<td>SI</td>\n\t\t\t<td>{$Hipoteca}</td>\n\t\t\t<td>{$HipotecaGravamen}</td>\n\t\t\t<td>{$HipotecaSeguro}</td>\n\t\t\t<td>{$HipotecaActualizado}</td>\n\t\t\t<td>{$HipotecaValuacion}</td>\n\t\t\t<td>{$HipotecaMonto}</td>\n\t\t\t<td>0</td>\n\t\t\t<th>{$dias_vencidos}</th>\n\t\t\t<th>" . $VI_Autorizado[$rw["tipo_autorizacion"]] . "</th>\n\t\t\t<th>" . $VATipoIngreso[$rw["tipoingreso"]] . "</th>\n\t\t\t<th>" . $VDBEstatus[$rw["estatus_actual"]] . "</th>\n\t\t\t<th>" . $rw["descripcion_tipoconvenio"] . "</th>\n\t\t\t<th>" . $arrOficiales[$rw["oficial_credito"]] . "</th>\n\t\t\t<th>" . $CausaDeMora . "</th>\n\t\t</tr>\n\t\t";
</td>
</tr>
<tr>
<th class="der">Fecha de Solicitud</th>
<td><?php
echo getFechaLarga($fecha_de_solicitud);
?>
</td>
</tr>
</tbody>
</table>
</fieldset>
<?php
$sqlconyuge = "SELECT numero_socio, CONCAT(nombres, ' ', apellido_paterno, ' ', apellido_materno)\n\t\t\t\t\tAS 'Nombre_Completo',\n\t \t\t\t\tCONCAT( telefono_residencia, ', ', telefono_movil) as 'telefonos', ocupacion\n\t\t\t\t\tfrom socios_relaciones where consanguinidad=3\n\t\t\t\t\tAND socio_relacionado={$idsocio}";
$conyuge = obten_filas($sqlconyuge);
$txtConyuge = "";
//$conyuge[0] - $conyuge[1] - Tel(s): $conyuge[2] Ocupación: $conyuge[3]
$rwy = $xSocio->getDatosInArray();
$idconyuge = $xSocio->getClaveDePersonaDeConyuge();
if ($conyuge > 0) {
$xCon = new cSocio($idconyuge);
$xCon->init();
$DConT = $xCon->getTelefonos();
$txtConyuge .= $idconyuge . "-" . $xCon->getNombreCompleto();
$txtConyuge .= " TEL(S): " . $DConT["principal"];
$conyuge_ocup = $xCon->getDatosActividadEconomica();
$txtConyuge .= " OCUPACIÓN: " . $conyuge_ocup["puesto"];
}
$genero = eltipo("socios_genero", $rwy[15]);
$civil = eltipo("socios_estadocivil", $rwy[14]);
function xul_back_record($mark)
{
if ($mark < 0) {
$mark = 0;
}
$strSQL_Select = "SELECT * FROM contable_centrodecostos\r\n LIMIT {$mark}, 1";
$tab = new TinyAjaxBehavior();
$rw = obten_filas($strSQL_Select);
$mark--;
$tab->add(TabSetValue::getBehavior("id-idcontable_centrodecostos", $rw["idcontable_centrodecostos"]));
$tab->add(TabSetValue::getBehavior("id-nombre_centrodecostos", $rw["nombre_centrodecostos"]));
$tab->add(TabSetValue::getBehavior("id-markRecord", $mark));
return $tab->getString();
}
function init()
{
$arrEq = array("aumento" => 1, "disminucion" => -1, "" => 0, "ninguno" => 0, "ninguna" => 0);
$sql = "SELECT idoperaciones_recibostipo, descripcion_recibostipo, detalles_del_concepto, subclasificacion,\n\t\t\t nombre_sublasificacion, mostrar_en_corte, tipo_poliza_generada,\n\t\t\t afectacion_en_flujo_efvo, path_formato, origen\n\t\t\t FROM operaciones_recibostipo\n\t\t\t WHERE idoperaciones_recibostipo=" . $this->mCodigo . " LIMIT 0,1 ";
$this->aDatos = obten_filas($sql);
$this->mPathFormato = $this->aDatos["path_formato"];
$this->mTipoPolizaCont = $this->aDatos["tipo_poliza_generada"];
$this->mOrigen = $this->aDatos["origen"];
//ninguna disminucion aumento
$this->mAfectacionEfvo = $arrEq[$this->aDatos["afectacion_en_flujo_efvo"]];
$this->mNombre = $this->aDatos["descripcion_recibostipo"];
unset($arrEq);
}
$idlocalidad = $cont[0];
$nombrelocal = $xT->setNoAcentos($cont[1]);
$estadolocal = $cont[2];
$paislocal = $cont[3];
$idestadoloc = $xT->cInt($cont[4]);
//cosulta de pais
$municipio = EACP_CLAVE_DE_MUNICIPIO;
$estado = EACP_CLAVE_DE_ENTIDADFED;
if (setNoMenorQueCero($idestadoloc) == 0) {
$D = obten_filas("SELECT * FROM general_estados WHERE nombre LIKE '%{$estadolocal}%' LIMIT 0,1");
if (isset($D["clave_numerica"])) {
$idestadoloc = $D["clave_numerica"];
}
}
//calcular pais
$D = obten_filas("SELECT * FROM `personas_domicilios_paises` WHERE `nombre_oficial` LIKE '%{$paislocal}%' LIMIT 0,1");
if (isset($D["clave_de_control"])) {
$paislocal = $D["clave_de_control"];
} else {
$paislocal = EACP_CLAVE_DE_PAIS;
}
$xLoc = new cCatalogos_localidades();
$xLoc->altitud(0);
$xLoc->clave_de_estado($idestadoloc);
$xLoc->clave_de_localidad($idlocalidad);
$xLoc->clave_de_municipio(1);
$xLoc->clave_unica($xT->cInt($idlocalidad));
$xLoc->latitud(0);
$xLoc->longitud(0);
$xLoc->nombre_de_la_localidad($nombrelocal);
$xLoc->clave_de_pais($paislocal);
function cwcuenta($socio, $tipo, $estatus, $credito = 0)
{
$sql = "SELECT codigo, cajalocal FROM socios_general WHERE codigo={$socio} LIMIT 0,1";
$resc = "";
if ($credito != 0) {
$resc = " AND numero_solicitud={$credito} ";
} else {
$resc = " AND numero_socio={$socio} ";
}
$datos = obten_filas($sql);
$socio_cw = "";
$cuenta = "";
$prefijo = "";
/**
* Si el Socio es Menor a 37999
*/
if ($datos[0] <= 37999) {
$socio_cw = substr("00" . $datos[1] . "0" . substr($datos[0], -3), -6);
} else {
$socio_cw = $datos[0];
}
/**
* Si es automatizado se va a Automaticos
*/
if ($tipo == 10) {
if ($estatus == 20) {
$cuenta = "111201" . $socio_cw;
} else {
$cuenta = "110501" . $socio_cw;
}
} else {
if ($estatus == 20) {
$cuenta = "111203" . $socio_cw;
} else {
$cuenta = "110601" . $socio_cw;
}
}
return $cuenta;
}
$socio = $rw["codigo"];
$fecha = date("d/m/y", strtotime($rw["fecha_de_alta"]));
//Seleccionar la cuenta de captacion
$numero_cuenta = "";
$saldo_cuenta = 0;
$fecha_cuenta = "";
$saldo_carga = $arrCaps[$socio]["saldo"];
$credito = $arrCreds[$socio]["credito"];
$credito_monto = $arrCreds[$socio]["monto"];
if (!isset($credito)) {
$credito = "";
$credito_monto = 0;
}
if (isset($saldo_carga)) {
$sqlSQ = "SELECT numero_socio, fecha_apertura, numero_cuenta, saldo_cuenta\n\t\t\t\t\t\t\tFROM captacion_cuentas\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t(numero_socio= {$socio})\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t(saldo_cuenta = {$saldo_carga})";
$xD = obten_filas($sqlSQ);
if (isset($xD["numero_socio"])) {
$saldo_cuenta = $xD["saldo_cuenta"];
$numero_cuenta = $xD["numero_cuenta"];
$fecha_cuenta = $xD["fecha_apertura"];
}
}
$tdBody .= "<tr>\n\t\t\t\t\t\t<td>" . $fecha . "</td>\n\t\t\t\t\t\t<td>" . $socio . "</td>\n\t\t\t\t\t\t<td>" . $rw["apellido_paterno"] . "</td>\n\t\t\t\t\t\t<td>" . $rw["apellido_materno"] . "</td>\n\t\t\t\t\t\t<td>" . $rw["nombre"] . "</td>\n\t\t\t\t\t\t<td>{$fecha_cuenta}</td>\n\t\t\t\t\t\t<td>{$numero_cuenta}</td>\n\t\t\t\t\t\t<td>{$saldo_cuenta}</td>\n\t\t\t\t\t\t<td>{$credito}</td>\n\t\t\t\t\t\t<td>{$credito_monto}</td>\n\t\t\t\t\t\t</tr>";
}
echo "\n\t\t\t<table width='100%' align='center' >\n\t\t\t</thead>\n\t\t\t<tr>\n\t\t\t\t<th>Fecha de <br />Ingreso</th>\n\t\t\t\t<th>Clave de Persona</th>\n\t\t\t\t<th>Apellido <br />Paterno</th>\n\t\t\t\t<th>Apellido <br />Materno</th>\n\t\t\t\t<th>Nombre(s)</th>\n\t\t\t\t<th>Fecha de Apertura <br /> de su Cuenta de Ahorro</th>\n\t\t\t\t<th>Numero de Cuenta <br />de Ahorro</th>\n\t\t\t\t<th>Saldo Actual <br />de la Cuenta <br />de ahorro</th>\n\t\t\t\t<th>Numero de Credito</th>\n\t\t\t\t<th>Monto Ministrado</th>\n\t\t\t</tr>\n\t\t\t</thead>\n\t\t\t<tbody>\n{$tdBody}\n\t\t\t</tbody>\n\t\t\t</table>\n\t\t\t";
if (!isset($exportTo)) {
echo getRawFooter();
?>
</body>
<script >
<?php
if (!$idgrupo) {
exit($msg_rec_exit . $fhtm);
}
// Verifica que no haya una Planeacion Previa;
// Cuenta los Creditos por Grupos Solidarios
//$sqlcc = "SELECT COUNT(numero_solicitud) AS 'loscreditos' FROM creditos_solicitud WHERE estatus_actual!=99 AND grupo_asociado=$idgrupo";
// determina si es de una a 4 Min
//Datos del Tipo de Creditos
//
$sqlgpo = "SELECT * FROM socios_grupossolidarios WHERE idsocios_grupossolidarios={$idgrupo}";
$info_grupo = the_row($sqlgpo);
$nivel = $info_grupo["nivel_ministracion"];
//Datos del Nivel de Grupo
$pnivel = $nivel + 1;
$sqldnivel = "SELECT * FROM creditos_nivelesdegrupo WHERE nivel={$pnivel}";
$dtsnivel = obten_filas($sqldnivel);
$monto = $dtsnivel["monto_xintegrante"];
//Nivel de Ministracion
if (!isset($monto)) {
$monto = 0;
}
//
$socio_rep = $info_grupo["representante_numerosocio"];
if ($socio_rep == 1) {
exit("<p class='aviso'>LOS DATOS DEL GRUPO NO ESTAN CORRECTOS - NO SE ACEPTA PUBLICO GENERAL</p>");
}
//
$xGr = new cGrupo($idgrupo, true);
$xGr->init();
echo $xGr->getFicha(true);
//
</head>
<body>
<?php
$socio_inicial = $_GET["on"];
$socio_final = $_GET["off"];
$sql_notificaciones = "SELECT * FROM seguimiento_notificaciones WHERE tipo_credito='planes'\n\tAND estatus_notificacion='pendiente' AND numero_notificacion<3";
$rs = mysql_query($sql_notificaciones);
while ($rw = mysql_fetch_array($rs)) {
$nombre = getNombreSocio($rw[1]);
$domicilio = $rw[15];
if ($domicilio == '0') {
$domicilio = "NO EXISTE DOMICILIO DEFINIDO. CAPTURELO O EDITELO";
}
//Datos del Credito
$sql_cred = "SELECT * FROM creditos_solicitud WHERE numero_solicitud={$rw['2']} AND numero_socio={$rw['1']} LIMIT 0,1";
$dsol = obten_filas($sql_cred);
$dias_venc = restarfechas(fechasys(), $dsol[15]);
$interes = getFMoney($rw[9]);
$moratorio = getFMoney($rw[10]);
$otros_cargos = getFMoney($rw[11]);
$capital = getFMoney($rw[8]);
$total = getFMoney($rw[12]);
echo getRawHeader();
?>
<p class='bigtitle'>NOTIFICACION DE COBRO NUM. <?php
echo $rw[3];
?>
</p>
<br />
<div class='numc'>
<table width="60%" >
