/**
*	Funcion para Agregar Llamada
*/
function Common_eb8d3f1b179bfca7a3d31880b4d66778($strOrden)
{
    $d = explode(STD_LITERAL_DIVISOR, $strOrden, 4);
    $socio = $d[0];
    $solicitud = $d[1];
    $fecha = $d[2];
    $hora = $d[3];
    $observaciones = "AGREGADO_DESDE_EL_CALENDARIO";
    saveError(11, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Se creo la Llamada del Socio {$socio} por el Credito {$solicitud}");
    setNewLlamadaBySocio($socio, $solicitud, $fecha, $hora, $observaciones);
    return "Llamada Agregada al socio {$socio} por el Credito {$solicitud}";
}
function setCompacWtExportarPolizas($fecha_inicial, $fecha_final, $FolioInicial = 0, $FolioFinal = 999999, $mTipo = "todas")
{
    $sucursal = getSucursal();
    //Traducciones del ContPaqw
    $CWTipoMvto = array("1" => 1, "-1" => "2");
    //Formato	:	polizas + fecha + sucursal;
    $mTmpFileAlias = "{$sucursal}-polizas-" . date("Y-m-d") . "";
    $mNametmpFile = PATH_TMP . $mTmpFileAlias . ".txt";
    if (file_exists($mNametmpFile)) {
        $BKPFile = fopen($mNametmpFile, "a+");
    } else {
        //$mNametmpFile = tempnam (PATH_BACKUPS, "polizas" . date("Y-m-d") . $sucursal . ".sbk");
        $BKPFile = fopen($mNametmpFile, "a");
    }
    //filtros
    $wByTipo = $mTipo == "todas" ? "" : " AND (`contable_polizas`.`tipopoliza` =" . $mTipo . ")  ";
    //Generar Polizas
    $FInicial = $FolioInicial;
    $FFinal = $FolioFinal;
    $sqlPol = "SELECT\r\n\t\t\t\t\t\t*\r\n\t\t\t\t\t\tFROM\r\n\t\t\t\t\t\t\t`contable_polizas` `contable_polizas` \r\n\t\t\t\t\t\tWHERE\r\n\t\t\t\t\t\t\t(`contable_polizas`.`fecha` >='{$fecha_inicial}')\r\n\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t(`contable_polizas`.`fecha` <='{$fecha_final}')\r\n\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t(\r\n\t\t\t\t\t\t\t(`contable_polizas`.`numeropoliza` >={$FInicial}) \r\n\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t(`contable_polizas`.`numeropoliza` <={$FFinal}) \r\n\t\t\t\t\t\t\t) {$wByTipo} ";
    //echo $sqlPol;
    $rs = mysql_query($sqlPol, cnnGeneral());
    if (!$rs) {
        //Codigo de Control de Error
        saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|||Numero: " . mysql_errno() . "|||Instruccion SQL: \n " . $sqlPol);
    }
    while ($rw = mysql_fetch_array($rs)) {
        //Seleccionar los Movimientos
        $ejercicio = $rw["ejercicio"];
        $periodo = $rw["periodo"];
        $tipoPoliza = $rw["tipopoliza"];
        $numeroPoliza = $rw["numeropoliza"];
        $fechaPoliza = $rw["fecha"];
        $conceptoPoliza = $rw["concepto"];
        $WriteText = "P " . date("Ymd", strtotime($fechaPoliza));
        $WriteText .= " " . $tipoPoliza;
        $WriteText .= " " . substr(str_pad($numeroPoliza, 8, "0", STR_PAD_LEFT), -8);
        $WriteText .= " 1 000 " . substr(str_pad($conceptoPoliza, 100, " ", STR_PAD_RIGHT), 0, 100);
        $WriteText .= " 01 2 \r\n";
        //Escribe la Poliza
        @fwrite($BKPFile, $WriteText);
        /*
        3 Caracter para quien sabe.- Diario.- supongo
        2 Caracter para quien sabe
        1 Caracter Espacion
        1 Caracter Para quien Sabe
        1 Caracter Espacio
        */
        $sqlMvtos = "SELECT\r\n\t\t\t\t\t\t`contable_movimientos`.* \r\n\t\t\t\t\t\tFROM\r\n\t\t\t\t\t\t\t`contable_movimientos` `contable_movimientos` \r\n\t\t\t\t\t\tWHERE\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`ejercicio` ={$ejercicio}) AND\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`periodo` ={$periodo}) AND\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`tipopoliza` ={$tipoPoliza}) AND\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`numeropoliza` ={$numeroPoliza})\r\n\t\t\t\t\t\tORDER BY `contable_movimientos`.`ejercicio`,\r\n\t\t\t\t\t\t`contable_movimientos`.`periodo`,\r\n\t\t\t\t\t\t`contable_movimientos`.`tipopoliza`,\r\n\t\t\t\t\t\t`contable_movimientos`.`numeropoliza`,\r\n\t\t\t\t\t\t`contable_movimientos`.`numeromovimiento`\r\n\t\t\t\t\t\t";
        $MRs = mysql_query($sqlMvtos, cnnGeneral());
        while ($MRw = mysql_fetch_array($MRs)) {
            $cuenta = $MRw["numerocuenta"];
            $referencia = $MRw["referencia"];
            //Corrige la Cuenta de Cuadre
            if ($cuenta == CUENTA_DE_CUADRE) {
                $cuenta = "_CUADRE";
            }
            //Tipo M + espacio
            //Cuenta   20
            //Referencia 10
            //TipoMvto 2 espacios 1 Cargo 2 Abono
            //Importe 16 Alineado
            //espacio + 000 + espacio + "            0.00 "
            //concepto 30 + espacio
            $WriteMvto = "M " . substr(str_pad($cuenta, 20, " ", STR_PAD_RIGHT), 0, 20);
            $WriteMvto .= " " . substr(str_pad($referencia, 10, " ", STR_PAD_RIGHT), 0, 10);
            $WriteMvto .= " " . $CWTipoMvto[$MRw["tipomovimiento"]];
            $WriteMvto .= " " . substr(str_pad($MRw["importe"], 16, " ", STR_PAD_LEFT), -16);
            $WriteMvto .= " 000 " . "            0.00 " . substr(str_pad($MRw["concepto"], 30, " ", STR_PAD_RIGHT), 0, 30) . " \r\n";
            @fwrite($BKPFile, $WriteMvto);
        }
    }
    @fclose($BKPFile);
    return "<a href=\"../utils/download.php?type=txt&download={$mTmpFileAlias}&file={$mTmpFileAlias}\" target=\"_blank\" class='boton'>Descargar Archivo de Polizas</a>";
}
function getSIPAKALPermissions($myFile)
{
    //Tratar el __FILE__, eliminar el directorio
    $vUno = substr_count($myFile, "/");
    $vDos = substr_count($myFile, "\\");
    $notes = "";
    $pUSRID = isset($_SESSION["SN_b80bb7740288fda1f201890375a60c8f"]) ? $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"] : 0;
    $pUSRNivel = isset($_SESSION["SN_d567c9b2d95fbc0a51e94d665abe9da3"]) ? $_SESSION["SN_d567c9b2d95fbc0a51e94d665abe9da3"] : 0;
    $pUSRPWD = isset($_SESSION["SN_0d35c1f17675a8a2bf3caaacd59a65de"]) ? $_SESSION["SN_0d35c1f17675a8a2bf3caaacd59a65de"] : "";
    $mUSR = isset($_SESSION["SN_0a744893951e0d1706ff74a7afccf561"]) ? $_SESSION["SN_0a744893951e0d1706ff74a7afccf561"] : "";
    //
    //obtener variables por CONTEXT
    if (isset($_REQUEST)) {
        if (isset($_REQUEST["ctx"])) {
            $ctx = md5($_REQUEST["ctx"]);
            $sql = "SELECT\t`t_03f996214fba4a1d05a68b18fece8e71`.*\r\n\t\t\tFROM `t_03f996214fba4a1d05a68b18fece8e71` WHERE \r\n\t\t\t(MD5(MD5(CONCAT(MD5(`t_03f996214fba4a1d05a68b18fece8e71`.`idusuarios`) , '|', MD5(`t_03f996214fba4a1d05a68b18fece8e71`.`f_34023acbff254d34664f94c3e08d836e`)))) = '{$ctx}') \r\n\t\t\tOR\r\n\t\t\t(MD5(MD5(CONCAT(MD5(`t_03f996214fba4a1d05a68b18fece8e71`.`f_28fb96d57b21090705cfdf8bc3445d2a`) , '|', MD5(`t_03f996214fba4a1d05a68b18fece8e71`.`f_34023acbff254d34664f94c3e08d836e`)))) = '{$ctx}')\r\n\t\t\tLIMIT 0,1 ";
            //$notes		= $sql;
            $xMQL = new MQL();
            $data = $xMQL->getDataRecord($sql);
            foreach ($data as $rows) {
                $pUSRID = $rows["idusuarios"];
                $pUSRNivel = $rows["f_f2cd801e90b78ef4dc673a4659c1482d"];
                $pUSRPWD = $rows["f_34023acbff254d34664f94c3e08d836e"];
                $mUSR = $rows["f_28fb96d57b21090705cfdf8bc3445d2a"];
                $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"] = $pUSRID;
                $_SESSION["SN_d567c9b2d95fbc0a51e94d665abe9da3"] = $pUSRNivel;
                $_SESSION["SN_0d35c1f17675a8a2bf3caaacd59a65de"] = $pUSRPWD;
                $_SESSION["SN_0a744893951e0d1706ff74a7afccf561"] = $mUSR;
            }
            //
        }
    }
    $PUBLICSVC = array("personas.svc.php" => true, "personas.actividades.economicas.php" => true, "listanegra.svc.php" => true, "equivalente.moneda.svc.php" => true, "cantidad_en_letras.php" => true);
    //servicios publicos
    $PFile = "";
    $myPermission = false;
    if ($vUno >= 1) {
        $DCFile = explode("/", $myFile);
        $elems = count($DCFile) - 1;
        if ($elems >= 0) {
            $PFile = $DCFile[$elems];
        }
    } else {
        $DCFile = explode("\\", $myFile);
        $elems = count($DCFile) - 1;
        if ($elems >= 0) {
            $PFile = $DCFile[$elems];
        }
    }
    if (isset($PUBLICSVC[$PFile])) {
        $myPermission = true;
        //setLog("Acceso Publico al Servicio $PFile");
    } else {
        $tmpPWD = $mUSR != "" ? goLogged("contrasenna", $mUSR) : md5(session_id());
        if ($tmpPWD != $pUSRPWD) {
            $myPermission = false;
            //salvar el error
            saveError(98, session_id(), "NO HA DEFINIDO UNA SESSION PARA EL ARCHIVO {$myFile} {$notes}");
            //salir si no esta definida la session
            session_unset();
            // Finalmente, destruye la sesi&oacute;n
            session_destroy();
            header("location:inicio.php");
            exit;
        }
        $myPermission = false;
        //checar si la variable esta inicializada
        //si no enviar un unsetsession
        if (isset($pUSRNivel) and $pUSRNivel > 0) {
            $sqlRULES = "SELECT COUNT(idgeneral_menu) AS 'items', menu_rules FROM general_menu\r\n\t\t\t\t\t\tWHERE menu_file LIKE '%{$PFile}'\r\n\t\t\t\t\t\tAND (FIND_IN_SET('{$pUSRNivel}@rw', menu_rules)>0\r\n\t\t\t\t\t\tOR FIND_IN_SET('{$pUSRNivel}@ro', menu_rules)>0)\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t/*LIMIT 0,1*/ ";
            //setLog($sqlRULES);
            $cnxT = mysql_connect(WORK_HOST, USR_PERMISSIONS, PWD_PERMISSIONS);
            $dbT = mysql_select_db(MY_DB_IN, $cnxT);
            $rsRULES = mysql_query($sqlRULES, $cnxT);
            if (!isset($rsRULES)) {
                saveError(98, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], mysql_error($cnxT));
            }
            $aRULES = mysql_fetch_array($rsRULES);
            /**
             * Verifica la autenticacion
             * busca la pocision del permiso
             * //
             **/
            $mos = strtoupper(substr(PHP_OS, 0, 3));
            $myFile = str_replace("/", "|", $myFile);
            $myFile = str_replace("\\", "|", $myFile);
            $dFile = explode("|", $myFile);
            $idfile = sizeof($dFile) - 1;
            $myFile = $dFile[$idfile - 1] . "/" . $dFile[$idfile];
            //DIRECTORY_SEPARATOR
            if ($aRULES["items"] == 0) {
                $sqlA = "INSERT INTO `general_menu` (`menu_title`, `menu_file`) VALUES ('{$PFile}', '{$myFile}')";
                @mysql_query($sqlA, $cnxT);
            }
            if (!isset($aRULES["menu_rules"]) or empty($aRULES["menu_rules"]) or $aRULES["menu_rules"] == "") {
                //saveError(97, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], $sqlRULES);
                saveError(999, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Acceso no permitido a :" . addslashes($myFile) . " {$notes}");
                $myPermission = false;
            } else {
                $ARls = explode(",", $aRULES["menu_rules"]);
                if (in_array("{$pUSRNivel}@rw", $ARls)) {
                    $myPermission = "ReadWrite";
                } else {
                    $myPermission = "ReadOnly";
                }
            }
            @mysql_free_result($rsRULES);
            @mysql_close($cnxT);
            unset($rsRULES);
            unset($cnxT);
            unset($dbT);
        } else {
            $myPermission = false;
            //salvar el error
            saveError(98, session_id(), "NO HA DEFINIDO UNA SESSION PARA EL ARCHIVO {$myFile} {$notes}\r\n");
            //salir si no esta definida la session
            session_unset();
            // Finalmente, destruye la sesi&oacute;n
            session_destroy();
            header("location:inicio.php");
            exit;
        }
    }
    return $myPermission;
}
<?php

/**
 * @author Balam Gonzalez Luis Humberto
 * @version 1.0
 * @package caja.forms
 * 
 */
//=====================================================================================================
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";
$permiso = getSIPAKALPermissions(__FILE__);
if ($permiso === false) {
    saveError(999, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Acceso no permitido a :" . addslashes(__FILE__));
    header("location:404.php?i=999");
} else {
    $_SESSION["current_file"] = addslashes(__FILE__);
}
$iduser = $_SESSION["log_id"];
//=====================================================================================================
$xHP = new cHPage("TR.Cobro de Multas");
$idrecibo = 0;
$xCaja = new cCaja();
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$fecha = parametro("idfecha-0", false, MQL_DATE);
$fecha = parametro("idfechaactual", $fecha, MQL_DATE);
$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/entidad.datos.php";
include_once "../core/core.deprecated.inc.php";
include_once "../core/core.fechas.inc.php";
include_once "../libs/sql.inc.php";
include_once "../core/core.config.inc.php";
include_once "../core/core.operaciones.inc.php";
$oficial = elusuario($iduser);
$idrec = $_POST["idrecibo"];
//$frn 		= $_GET["u"];
if (!$idrec) {
    echo JS_CLOSE;
}
$cRec = new cReciboDeOperacion(false, false, $idrec);
$cRec->setNumeroDeRecibo($idrec);
$cRec->setRevertir();
//echo $cRec->getMessages("html");
saveError(10, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "EL Usuario {$oficial} Elimino el Recibo {$idrec} y sus Operaciones");
if ($u == "exn") {
    header("location: frmeditarrecibos.php");
} else {
    header("location: frmeliminarrecibos.php");
}
//*/
     //$mNametmpFile = tempnam (PATH_BACKUPS, "polizas" . date("Y-m-d") . $sucursal . ".sbk");
     $BKPFile = fopen($mNametmpFile, "a");
 }
 //filtros
 $wByTipo = $_POST["ctipopolizas"] == "todas" ? "" : " AND (`contable_polizas`.`tipopoliza` =" . $_POST["ctipopolizas"] . ")  ";
 //Generar Polizas
 $fecha_inicial = $_POST["elanno0"] . "-" . $_POST["elmes0"] . "-" . $_POST["eldia0"];
 $fecha_final = $_POST["elanno1"] . "-" . $_POST["elmes1"] . "-" . $_POST["eldia1"];
 $FInicial = $_POST["cNumeroInicial"];
 $FFinal = $_POST["cNumeroFinal"];
 $sqlPol = "SELECT\n\t\t\t\t\t\t*\n\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t`contable_polizas` `contable_polizas` \n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t(`contable_polizas`.`fecha` >='{$fecha_inicial}')\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t(`contable_polizas`.`fecha` <='{$fecha_final}')\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t(\n\t\t\t\t\t\t\t(`contable_polizas`.`numeropoliza` >={$FInicial}) \n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t(`contable_polizas`.`numeropoliza` <={$FFinal}) \n\t\t\t\t\t\t\t) {$wByTipo} ";
 //echo $sqlPol;
 $rs = mysql_query($sqlPol, cnnGeneral());
 if (!$rs) {
     //Codigo de Control de Error
     saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|||Numero: " . mysql_errno() . "|||Instruccion SQL: \n " . $sqlPol);
 }
 while ($rw = mysql_fetch_array($rs)) {
     //Seleccionar los Movimientos
     $ejercicio = $rw["ejercicio"];
     $periodo = $rw["periodo"];
     $tipoPoliza = $rw["tipopoliza"];
     $numeroPoliza = $rw["numeropoliza"];
     $fechaPoliza = $rw["fecha"];
     $conceptoPoliza = $rw["concepto"];
     $WriteText = "P " . date("Ymd", strtotime($fechaPoliza));
     $WriteText .= " " . $tipoPoliza;
     $WriteText .= " " . substr(str_pad($numeroPoliza, 8, "0", STR_PAD_LEFT), -8);
     $WriteText .= " 1 000 " . substr(str_pad($conceptoPoliza, 100, " ", STR_PAD_RIGHT), 0, 100);
     $WriteText .= " 01 2 \n";
     //Escribe la Poliza
 function setExport($FechaInicial = false, $FechaFinal = false)
 {
     $wByFi = $FechaInicial == false ? "" : " WHERE fecha_de_alta>='{$FechaInicial}' ";
     $wByFf = $FechaFinal == false ? "" : " AND fecha_de_alta<='{$FechaFinal}' ";
     $sucursal = getSucursal();
     $arrTipos = array("AD" => "A", "AA" => "B", "PD" => "C", "PA" => "D", "CD" => "E", "CA" => "F", "RD" => "G", "RA" => "H", "OD" => "K", "OA" => "L", "ED" => "I", "EA" => "J");
     //safe => Compaq
     $arrMayor = array("3" => "1", "4" => "2", "1" => "3", "2" => "4");
     //3 safe mayor
     $WriteText = "F  00000000000000\r\n";
     //cuenta de flujo de efectivo
     $sql = "SELECT numero, equivalencia, nombre, tipo, ctamayor, afectable, centro_de_costo, fecha_de_alta, digitoagrupador \r\n    \t\t\tFROM contable_catalogo {$wByFi} {$wByFf} \r\n    \t\t\tORDER BY numero\r\n    \t\t\t";
     $rs = mysql_query($sql, cnnGeneral());
     if (!$rs) {
         //Codigo de Control de Error
         saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|||Numero: " . mysql_errno() . "|||Instruccion SQL: \n " . $sql);
     }
     //$WriteText	.= "$sql\r\n";
     while ($rw = mysql_fetch_array($rs)) {
         //XXX: Si el titulo asignar 0 a superior
         //$WriteText	.= "C ";
         //CompAQi
         $WriteText .= "C  ";
         //$WriteText	.= substr(str_pad($rw["numero"], 20, " ", STR_PAD_RIGHT), 0, 20);
         $WriteText .= substr(str_pad($rw["numero"], 30, " ", STR_PAD_RIGHT), 0, 30);
         $WriteText .= " ";
         $WriteText .= substr(str_pad(trim($rw["nombre"]), 50, " ", STR_PAD_RIGHT), 0, 50);
         $WriteText .= " ";
         $WriteText .= substr(str_pad("", 50, " ", STR_PAD_RIGHT), 0, 50);
         $WriteText .= " ";
         //cuenta superior, mod a 30. compaqi
         //$WriteText	.= substr(str_pad( cuenta_superior( $rw["numero"] ), 20, " ", STR_PAD_RIGHT), 0, 20);
         $WriteText .= $rw["ctamayor"] == 1 ? substr(str_pad(cuenta_superior("0"), 30, " ", STR_PAD_RIGHT), 0, 30) : substr(str_pad(cuenta_superior($rw["numero"]), 30, " ", STR_PAD_RIGHT), 0, 30);
         $WriteText .= " ";
         $WriteText .= $arrTipos[$rw["tipo"]];
         $WriteText .= " ";
         $WriteText .= "0 ";
         //Baja
         $WriteText .= $arrMayor[$rw["ctamayor"]];
         $WriteText .= " ";
         $WriteText .= "0 ";
         $WriteText .= date("Ymd", strtotime($rw["fecha_de_alta"]));
         $WriteText .= " ";
         //Actualizacion ContPAQi
         $WriteText .= "81 ";
         //Sistema de Origen
         $WriteText .= "   1 ";
         //Moneda
         $WriteText .= "   0 ";
         //Digito Agrupador
         $WriteText .= "0    ";
         //Segmento de Negocio
         $WriteText .= "0 ";
         //Mvto.Segmento de Negocio
         $WriteText .= "\r\n";
         //$WriteText	.= "01 01 0000 000\r\n";
     }
     $nombre = "{$sucursal}-catalogo-contable-" . date("Ymd", strtotime(fechasys())) . "-" . rand(0, 1000) . "";
     $xFile = new cFileLog($nombre);
     $xFile->setWrite($WriteText);
     $xFile->setClose();
     return $xFile->getLinkDownload($nombre);
 }
function SearchRecord($filter)
{
    $limit_find = 5;
    $n_type = gettype($filter);
    if ($n_type == "string") {
        $filter = "'%{$filter}%'";
    } else {
        $filter = "'%{$filter}%'";
    }
    $sql = "SELECT * FROM general_formulas WHERE aplicado_a LIKE {$filter} LIMIT 0,{$limit_find}";
    $rs = mysql_query($sql, cnnGeneral());
    if (!$rs) {
        saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|Numero: " . mysql_errno() . "|Instruccion SQL:" . $sql);
    }
    $tds = "";
    while ($row = mysql_fetch_array($rs)) {
        $tds = $tds . "<tr> \r\n\r\n          <th onclick='cmdClick(" . $row["aplicado_a"] . "); jsGetRegistro(); '>" . $row["aplicado_a"] . "</th>\r\n          <td>{$row['1']}</td> \r\n\r\n      </tr> \r\n ";
    }
    @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 getTabla($caption)
 {
     $table = "";
     $td = "";
     $head = "";
     if ($caption) {
         $this->mTitle = $caption;
         $head = "<tr>\n\t\t\t\t<td colspan='3' class='csubtitle'>{$caption}</td>\n\t\t\t\t</tr>";
     }
     $rs = mysql_query($this->mSql, cnnGeneral());
     if (!$rs) {
         saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|Numero: " . mysql_errno() . "|Instruccion SQL:" . $this->mSql . "|EN:" . $_SESSION["current_file"]);
     }
     while ($rw = mysql_fetch_array($rs)) {
         $numero = $rw["numero"];
         $nombre = $rw["nombre"];
         $importe = $rw["imp" . $this->mPeriodo] * $this->factor;
         if ($importe < 0) {
             //$importe = $importe * -1;
         }
         $importe_fmt = getFMoney($importe);
         $td = $td . "\n\t\t<tr>\n\t\t\t<td class='cmayor'>{$nombre}</td>\n\t\t\t<td class='mny' width='20%'>{$importe_fmt}</td>\n\t\t\t<td width='20%'></td>\n\t\t</tr>";
         $this->mSuma += $importe;
     }
     @mysql_free_result($rs);
     $suma_fmt = getFMoney($this->mSuma);
     return "<table width='100%'>\n\t<tbody>\n\t{$head}\n\t{$td}\n\t\t<tr>\n\t\t\t<td class=\"csubtitle-footer\">TOTAL " . $this->mTitle . "</td>\n\t\t\t<td></td>\n\t\t\t<th class='mny'> " . $suma_fmt . " </th>\n\t\t</tr>\n\t</tbody>\n</table>";
 }
 function setEndSession()
 {
     $oficial = $this->getUserInfo();
     $iduser = $this->mCodeUser;
     $oficial = elusuario($iduser);
     /**
      * Eliminar al Usuarios de Conectados
      */
     $mduser = md5($iduser);
     $sqlDELCnn = "DELETE FROM usuarios_web_connected WHERE webid='{$mduser}' ";
     my_query($sqlDELCnn);
     saveError(10, $this->mCodeUser, "{$oficial}  cerro sesion");
     // sin variables
     session_unset();
     //$_SESSION = array();
     session_destroy();
 }
            $_SESSION["en_depurado"] = true;
        }
        saveError(10, session_id(), "El Usuario {$iUser} Inicio Sesion ");
        /**
         * Agregar a Conectados al usuario
         */
        $mdID = md5($ciduser);
        //option1 = fecha
        //option2 = hora
        $opt1 = date("Y-m-d");
        $opt2 = date("H:i:s");
        $sqlNCnn = "INSERT INTO usuarios_web_connected\r\n\t\t\t\t\t\t(webid, option1, option2)\r\n    \t\t\t\t\tVALUES\r\n\t\t\t\t\t\t('{$mdID}', '{$opt1}', '{$opt2}')";
        $xcnn = new mysqli(WORK_HOST, USR_ERROR, PWD_ERROR, MY_DB_IN, PORT_HOST);
        $xcnn->query($sqlNCnn);
        $xcnn->close();
        header("location:{$fileSet}");
        //====== Eliminar datos del usuario
        unset($ciduser);
        unset($nivel);
        unset($iPwd);
        unset($iUser);
    } else {
        saveError(98, session_id(), "{$iUser} Datos Incorrectos ");
        header("location:inicio.php");
        exit;
    }
} else {
    saveError(98, session_id(), "Faltan Datos para Iniciar session");
    header("location:inicio.php");
    exit;
}
 function __construct($aplicado_a)
 {
     $sql = "SELECT * FROM general_formulas WHERE aplicado_a='{$aplicado_a}' LIMIT 0,1";
     $rs = mysql_query($sql, cnnGeneral());
     if (!$rs) {
         saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|Numero: " . mysql_errno() . "|Instruccion SQL: \n " . $sql . "|EN:" . $_SESSION["current_file"]);
     }
     $this->mInfoF = mysql_fetch_array($rs);
     $this->mEstruct = $this->mInfoF["estructura_de_la_formula"];
     @mysql_free_result($rs);
 }
/** Devuelve cualquier dato de la tabla segun indice e id dado */
function damecredito($jimbo)
{
    //SOLICITUD,IDCAMPO
    $kimbo = explode(" ", $jimbo);
    if (isset($kimbo[0]) and trim($kimbo[0]) != "") {
        $sqlbind = "SELECT * FROM creditos_solicitud\r\n\t\t\t\t\tWHERE numero_solicitud={$kimbo['0']} LIMIT 0,1";
        $tirar = 0;
        $rsbind = mysql_query($sqlbind, cnnGeneral());
        if (!$rsbind) {
            saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|Numero: " . mysql_errno() . "|Instruccion SQL:" . $sqlbind);
        } else {
            while ($rw = mysql_fetch_array($rsbind)) {
                $tirar = $rw[$kimbo[1]];
            }
        }
        return $tirar;
        @mysql_free_result($rsbind);
    } else {
        //saveError(2,$_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :SQL Fallido o sin algun dato");
        return 0;
    }
}
$operacion = $DPar[5];
if ($aPagaCompleto[$operacion] == true) {
    $pago_total = true;
    $monto_a_operar = TESORERIA_MONTO_MAXIMO_OPERADO;
}
$mTipoPago = isset($DPar[6]) ? trim($DPar[6]) : DEFAULT_TIPO_PAGO;
$mReciboFiscal = isset($DPar[7]) ? $DPar[7] : DEFAULT_RECIBO_FISCAL;
$procesado = isset($_GET["procesar"]) ? $_GET["procesar"] : "normal";
$total = 0;
$tdCobranza = "";
$claveCbza = OPERACION_CLAVE_DE_COBRANZA;
$generarIVA = isset($aActosNoGravados[$mTipoPago]) ? false : true;
$montoCobranza = 0;
for ($ix = 0; $ix <= $limParms; $ix++) {
    if (!isset($DPar[$ix]) or $DPar[$ix] == "") {
        saveError(210, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Faltan Parametros({$params}) para el cobro, el Parametro {$ix} resulto " . $DPar[$ix]);
        header("location:../404.php?i=210");
        //provocar error 404
        exit;
    }
}
$xCred = new cCredito($solicitud, $socio);
$xCred->init();
$xLetra = null;
$tds = "";
$esp_tds = "";
$mMvtos = array();
$alerts = "";
//Movimientos que afectan al Capital
$cAfectCapital = new cBases(2004);
$aAfectCapital = $cAfectCapital->getMembers_InArray();