codigo] - descripcion * El parametro $elegido indica que opcion es la seleccionada */ function armarOpcionesSelect(&$appConfig, &$aDatos, $elegido, $descr) { $NIVEL_DEBUG = $appConfig->DEBUG["nivel"]; //Para manejar errores $ret_sel = ""; //retorno de la funcion //Precondicion: El arreglo no puede estar vacio $longDatos = sizeof($aDatos); if($longDatos == 1 ) { $campoId = key($aDatos[0]); if($aDatos[0][$campoId] == '' ) { return $ret_sel; } reset($aDatos[0]); } if($longDatos > 0) { $tagOption = ""; //String para almacenar el codigo HTML de cada opcion de select //Como el arreglo es asociativo y no conocemos los nombres, los tomamos del primer elemento $campoId = key($aDatos[0]); next($aDatos[0]); //avanza el puntero interno del arreglo pos[0] = (Id,Descripcion) $campoDesc = key($aDatos[0]); if(isset($descr)) { next($aDatos[0]); //avanza el puntero interno del arreglo pos[0] = (Id,Descripcion) $campoDesc2 = key($aDatos[0]); } for($i=0;$i<$longDatos;$i++) { $tagOption = " 1) { $war_msg = "Error en parametros: ${$longDatos}"; trigger_error($war_msg, E_USER_WARNING); } } return $ret_sel; } /** Genera el codigo JavaScript de dos arreglos de fechas 'fdes' y 'fhas' a partir de un arreglo de la * forma arreglo[codigo][descripcion][fechaDesde][fechaHasta]*/ function armarArrayFechasDeVersion(&$aVersiones) { //PRECONDICION: el arreglo tiene al menos un elemento $ret_afv = ""; //retorno de la funcion $sizeArray = sizeof($aVersiones); //tamanio del arreglo if($sizeArray > 0) { $ret_afv .= "var aFechasDesde = new Array($sizeArray);\n". "var aFechasHasta = new Array($sizeArray);\n"; for($i=0;$i<$sizeArray;$i++) { //crea el codigo javascript de los dos arreglos $ret_afv .= "aFechasDesde[$i] = \"{$aVersiones[$i]["mov_fdes"]}\";\n". "aFechasHasta[$i] = \"{$aVersiones[$i]["mov_fhas"]}\";\n"; } } else { $err_msg = "Error en parametros de funcion armarArrayFechasDeVersion: parametro nulo"; trigger_error($err_msg, E_USER_ERROR); } return $ret_afv; } //Devuelve la fecha actual en el formato seteado function verFechaActual($formato) { $ret_fecha = strftime($formato, time()); return $ret_fecha; } /** * Utility function to return a value from a named array or a specified default * Codigo obtenido del soft Mambo Open Source (www.mamboserver.com) * @copyright (C) 2000 - 2004 Miro International Pty Ltd * @license http://www.gnu.org/copyleft/gpl.html GNU/GPL * * @param array arreglo con los valores (POST, GET, etc) a recibir * @param string nombre del parametro * @param T valor por defecto si no existe el dato * @param int mascara a utilizar * * @return T */ define('_CIG_NOTRIM' , 0x0001 ); define('_CIG_ALLOWHTML', 0x0002 ); define('_CIG_NOSLASHES', 0x0003 ); define('_CIG_SQLSLASHES',0x0004 ); function utl_getParam( &$arr, $name, $def=null, $mask=0 ) { $return = null; if (isset( $arr[$name] )) { if (is_string( $arr[$name] )) { /* Elimina los espacios */ if (!($mask & _CIG_NOTRIM)) { $arr[$name] = trim( $arr[$name] ); } /* Elimina los tags html */ if (!($mask & _CIG_ALLOWHTML)) { $arr[$name] = strip_tags( $arr[$name] ); } /* Elimina las contrabarras */ if ($mask & _CIG_NOSLASHES) { if (get_magic_quotes_gpc()) { $arr[$name] = stripslashes($arr[$name]); } } elseif ($mask & _CIG_SQLSLASHES) { // Stripslashes if (get_magic_quotes_gpc()) { $arr[$name] = stripslashes($arr[$name]); } // Quote if not integer if (!is_numeric($arr[$name])) { if (function_exists('mysql_real_escape_string')) { $arr[$name] = @mysql_real_escape_string($arr[$name]); } else { $arr[$name] = @mysql_escape_string($arr[$name]); } } } else { //Por defecto escapa los caracteres sin importar las Magic Quotes if (get_magic_quotes_gpc()) { $arr[$name] = stripslashes($arr[$name]); } $arr[$name] = addslashes($arr[$name]); } } return $arr[$name]; } else { return $def; } } /** * Prints the page header. * @param $title The title of the page * @param $css css tag * @param $script script tag */ function utl_printHeader($title = '', $css = null, $script = null) { global $appConfig; echo "\n"; echo "\n"; echo "\n"; echo '\n"; echo "\n"; echo '\n"; echo '\n"; if ($css) { echo "{$css}\n"; } if ($script) { echo "{$script}\n"; } echo "\n"; } /** * Prints the page footer */ function utl_printFooter() { echo "\n\n"; } /** * Prints the page body. * @param $bodyClass - name of body class */ function utl_printBody($bodyClass = '', $onload='', $onsubmit='') { $bodyClass = htmlspecialchars($bodyClass); echo "\n"; } /** * Prints the HTML header (H1,.. Hn) * @param int $size header font size * @param string $title title to print */ function utl_printTitle($title, $size = 1, $class = '') { $class = ($class != '') ? " class=\"$class\"" : ''; echo "$title\n"; } /** Convierte la cadena aaaa-mm-dd a dd/mm/aaaa */ function utl_Formatea_fecha( &$cadena ) { if(strlen($cadena)>0) { $pattern = '/-/'; $v_fecha= preg_split($pattern, trim($cadena), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); $cadena = $v_fecha[2]. '/'. $v_fecha[1] . '/'. $v_fecha[0]; } } /** Convierte la cadena dd/mm/aaaa a aaaa-mm-dd */ function utl_Formatea_fecha_pg( &$cadena ) { if(strlen($cadena)>0) { $pattern = '/\//'; $v_fecha= preg_split($pattern, trim($cadena), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); $cadena = $v_fecha[2]. '-'. $v_fecha[1] . '-'. $v_fecha[0]; return $cadena; } } /** Calcula edad de una persona a partir de la fecha de nacimiento y una fecha actual * @param string $p_FecNac Fecha de nacimiento [AAAA-MM-DD] * @param string $p_FecAct Fecha actual [AAAA-MM-DD] * @return array Retorna una matriz de la forma matriz[item_registro][campo1][campo2]...[campon] */ function utl_Calcula_Edad($p_FecNac, $p_FecAct) { if(!$p_FecAct) { $p_FecAct=date("Y-m-d"); } if( strlen($p_FecNac) < 0 ) { echo "La fecha de nacimiento, para el calculo de la edad, no puede ser nula
"; return 0; } if( strlen($p_FecAct) < 0 ) { echo "La fecha actual, para el calculo de la edad, no puede ser nula
"; return 0; } $v_pattern = '/-/'; $v_FecNac= preg_split($v_pattern, trim($p_FecNac), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); $v_FecAct= preg_split($v_pattern, trim($p_FecAct), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); if( (count($v_FecNac)!=3) ) { echo "El formato de la fecha de nacimiento es INVALIDO [AAAA-MM-DD]
"; return 0; } if( (count($v_FecAct)!=3) ) { echo "El formato de la fecha actual es INVALIDO [AAAA-MM-DD]
"; return 0; } $v_Edad = $v_FecAct[0]-$v_FecNac[0]; if( ( $v_FecAct[1] < $v_FecNac[1] ) || ( $v_FecAct[1] == $v_FecNac[1] && $v_FecAct[2] < $v_FecNac[2]) ) $v_Edad=$v_Edad-1; return $v_Edad; } /** Funcion que Agrega un mes a una fecha dada * @param $p_FecCar: Fecha de carga, en formato dd/mm/aaaa * @param $p_mes: Meses a agregar * @return Cadena del tipo dd/mm/aaaa con el mes incrementado */ function utl_AgregaMes($p_FecCar, $p_mes) { $pattern = '/\//'; $v_fecha= preg_split($pattern, trim($p_FecCar), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); $p_FecCar=$v_fecha[1]. "/" . $v_fecha[0] . "/" . $v_fecha[2]; $my_time = strtotime($p_FecCar); $nextmonth = mktime(0, 0, 0, date("m", $my_time)+$p_mes, date("d", $my_time), date("Y", $my_time)); return date("d/m/Y", $nextmonth); } /** Funcion que cuenta los registros devueltos por un query, este revisa el primer campo * que por definicion debe ser parte de la clave y no debe ser nulo */ function utl_count(&$pDatos) { $longDatos = sizeof($pDatos); if($longDatos == 1 ) { $campoId = key($pDatos[0]); if($pDatos[0][$campoId] == '' ) { return 0; } return 1; } return $longDatos; } /** Verifica que la primer fecha sea mayor que la segunda Retorna 0 si la primera es mayor que la segunda 1 si la segunda es mayor que la primera */ function utl_FechaMayorIgual( $p_fechaA, $p_fechaB ) { //Cargar los arrays desde y hasta, de esta forma // array[0] = dia, array[1] = mes, array[2] = anio $v_pattern = '/\//'; $v_array_fecha_A = preg_split($v_pattern, trim($p_fechaA), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); $v_array_fecha_B = preg_split($v_pattern, trim($p_fechaB), -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY); $v_dia_A=$v_array_fecha_A[0]; $v_mes_A=$v_array_fecha_A[1]; $v_anio_A=$v_array_fecha_A[2]; $v_dia_B=$v_array_fecha_B[0]; $v_mes_B=$v_array_fecha_B[1]; $v_anio_B=$v_array_fecha_B[2]; if( $v_anio_B < $v_anio_A) //Anio return 0; else { if( $v_anio_B == $v_anio_A) { if ( $v_mes_A > $v_mes_B ) //Mes return 0; else { if( $v_mes_B == $v_mes_A) { if( $v_dia_A > $v_dia_B) //Dia return 0; } } } } return 1; } function utl_Mensaje($ptipo, $pcod, $pmensaje, $pquery) { $return = ''; $v_tipo=strtoupper($ptipo); $return .= '' . $pcod. " "; if(trim($v_tipo) == "OK") { $return .= 'Ok '; } if(trim($v_tipo) == "ERROR") { $return .= 'Error: '; } if(trim($v_tipo) == "ADVERTENCIA") { $return .= 'Advertencia: '; } $return .= '' . $pmensaje . ' '; if($pquery!='') $return .= ' - Consulta: ' . $pquery . ''; $return.='
'; return $return; } ?>