PHP obten_filas函数代码示例

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();
}