| 1 | <? | 
|---|
| 2 | // ************************************************************************************************************************************************* | 
|---|
| 3 | // Aplicación WEB: ogAdmWebCon. | 
|---|
| 4 | // Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla | 
|---|
| 5 | // Fecha Creación: 2009-2010 | 
|---|
| 6 | // Fecha Última modificación: Agosto-2010 | 
|---|
| 7 | // Nombre del fichero: CreaTablaParametros.php | 
|---|
| 8 | // Descripción : | 
|---|
| 9 | //              Crea una tabla en memoria con especificaciones sobre los parámetros de cada comando | 
|---|
| 10 | //      Parametros: | 
|---|
| 11 | //              - cmd: Un comando ya operativo (con conexión abierta) | 
|---|
| 12 | //              - tabla_parametros: Referencia a la tabla donde se guardarán las especificaciones | 
|---|
| 13 | //              - cont_parametros: Referencia a la variable que contendrá el número de elementos totales de la tabla | 
|---|
| 14 | // ************************************************************************************************************************************************* | 
|---|
| 15 | function CreaTablaParametros($cmd,$tabla_parametros,$cont_parametros){ | 
|---|
| 16 | $rs=new Recordset; | 
|---|
| 17 | $cmd->texto="SELECT * FROM parametros"; | 
|---|
| 18 | $rs->Comando=&$cmd; | 
|---|
| 19 | if (!$rs->Abrir()) return; // Error al abrir recordset | 
|---|
| 20 | $rs->Primero(); | 
|---|
| 21 | $cont=0; | 
|---|
| 22 | while (!$rs->EOF){ | 
|---|
| 23 | $auxtabla_parametros=""; | 
|---|
| 24 | $auxtabla_parametros["nemonico"]=$rs->campos["nemonico"]; | 
|---|
| 25 | $auxtabla_parametros["descripcion"]=$rs->campos["descripcion"]; | 
|---|
| 26 | $auxtabla_parametros["nomidentificador"]=$rs->campos["nomidentificador"]; | 
|---|
| 27 | $auxtabla_parametros["nomtabla"]=$rs->campos["nomtabla"]; | 
|---|
| 28 | $auxtabla_parametros["nomliteral"]=$rs->campos["nomliteral"]; | 
|---|
| 29 | $tabla_parametros[$cont][0]=$auxtabla_parametros["nemonico"]; | 
|---|
| 30 | $tabla_parametros[$cont][1]=$auxtabla_parametros; | 
|---|
| 31 | $cont++; | 
|---|
| 32 | $rs->Siguiente(); | 
|---|
| 33 | } | 
|---|
| 34 | $auxnemonico=""; | 
|---|
| 35 | // Ordena según el nemonico | 
|---|
| 36 | for ($i=0;$i<$cont-1;$i++){ | 
|---|
| 37 | for ($j=$i+1;$j<$cont;$j++){ | 
|---|
| 38 | if($tabla_parametros[$i][0]>$tabla_parametros[$j][0]){ | 
|---|
| 39 | $auxnemonico=$tabla_parametros[$i][0]; | 
|---|
| 40 | $tabla_parametros[$i][0]=$tabla_parametros[$j][0]; | 
|---|
| 41 | $tabla_parametros[$j][0]=$auxnemonico; | 
|---|
| 42 | $auxtabla_parametros=$tabla_parametros[$i][1]; | 
|---|
| 43 | $tabla_parametros[$i][1]=$tabla_parametros[$j][1]; | 
|---|
| 44 | $tabla_parametros[$j][1]=$auxtabla_parametros; | 
|---|
| 45 | } | 
|---|
| 46 | } | 
|---|
| 47 | } | 
|---|
| 48 | $cont_parametros=$cont; | 
|---|
| 49 | } | 
|---|
| 50 | ?> | 
|---|