'; $ind = ProcElemArray($a_campos , $a_campo); $resu = $a_reg[$ind]; return $resu; } // Procura um elemento ($elemento) num array ($array_proc) function ProcElemArray($array_proc , $elemento) { $resu = 9999; // echo "elemento ao entrar ". $elemento. $b; for ($n=0; $n<=sizeof($array_proc) ; $n=$n+1) { if ( strtoupper($array_proc[$n]) == strtoupper($elemento) ) { // echo 'iff '. $array_proc[$n] . " = ". $elemento. '
'; $resu = $n; } } //for if( $resu == 9999) { echo 'ERRO!!! Campo n?o Encontrado...'; die; } return $resu; } // function ProcElemArray($array_proc , $elemento) { // retorna verdadeiro se existir sub-grupos para o grupo passado como parametro function tem_subgrupo($codgru) { global $con ; //ve se tem sub - grupos $sql_cts = "SELECT count(codgru) as total FROM subgrupos WHERE codgru = $codgru"; $res_sgrp = qry($con,$sql_cts,$campo_cts); $ct_subgrupo = ibase_fetch_row($res_sgrp); $total = mostra($ct_subgrupo,$campo_cts,'total'); return ($total>0) ? true : false; }//function tem_subgrupo() { /* RICARDO - 19-05-2008 */ // Cria uma matriz com ref. por nome do campo como o pg_fecth_array - semelhante a fun??o cria_array_campos so que essa cria para todas as linhas do resultado do select // feito para substituir a fun??o mostra (ficou bem mais pratico, porque da para aproveitar mais c?digo antigo j? que o array vai ficar igual) // $a_reg = id do resultado do select // $a_campos = array com a lista de campos do select // $nome_array = nome do array que ser? criado // Retorna false se n?o tinha mais linha function cria_matriz_campos(&$a_reg,$a_campos,&$nome_array) { include_once '../auxiliar/strings.inc'; $rows=0; $lin = ibase_fetch_row($a_reg); while ($lin) { for ($n=0; $n<=sizeof($a_campos) ; $n=$n+1) { $nome_campo = strtolower($a_campos[$n]); $nome_array[$rows][$nome_campo] = retiraacentos($lin[$n]); } $lin = ibase_fetch_row($a_reg); $rows++; } return $rows; } //$sql = comando select //&$nome_array = array q tera os dados do select - por referencia function cria_matriz_campos_pelo_sql($sql,&$nome_array) { include_once '../auxiliar/strings.inc'; $a_reg = qry($con, $sql, $a_campos); $rows=0; $lin = ibase_fetch_row($a_reg); while ($lin) { for ($n=0; $n<=sizeof($a_campos) ; $n=$n+1) { $nome_campo = strtolower($a_campos[$n]); $nome_array[$rows][$nome_campo] = retiraacentos($lin[$n]); } $lin = ibase_fetch_row($a_reg); $rows++; } return $rows; } function exec_sql_simples($con, $comando){ include 'conecta.inc.php'; // ECHO $comando; $sql = ibase_query($con, $comando); ibase_commit($con); return $sql; } function recebevar($nomevar){ $var = $_GET[$nomevar]; if (!$var){ $var = $_POST[$nomevar]; } return $var; } function lecookie($nomecookie){ $cookie = $_COOKIE["$nomecookie"]; //pega o cookie if ($cookie =='deleted'){ // se n?o existir o cookie o palm retorna o valor 'deleted' $cookie = false; // echo $nomecookie.' = '. $cookie; so pra testar } return $cookie; } function tratacamponulo($campo){ if ($campo) { return $campo; }else{ return 'null'; } } function TrazValorCampo($tabela, $campo, $chave, $ValorChave){ $l_select = "SELECT $campo as campo FROM $tabela WHERE ($chave = $ValorChave)"; $a_reg = qry($con, $l_select, $a_campos); if (cria_matriz_campos($a_reg,$a_campos,$l_a_sql)) { return $l_a_sql[0]['campo']; } else { return '' ; } } ?>