"; $strgen.=" "; $db = openDB(); $rs = $db->Execute("SELECT * FROM lav_Sections where sec_Isaction=1 order by sec_order"); if (!$rs->EOF) { $num=1; while ($o = $rs->FetchNextObject()) { //mentres hi ha valors $total_actions=$rs->recordcount(); $menu[$num]=returnSectionName("SEL_NAME",$o->SEC_PK,1); $num++; } } $rs->Close(); $db->Close(); for($x = 1;$x<=$total_actions;$x++){ $action=explode("@",$string); $total=sizeof($action); for($y = 1;$y <= $total;$y++){ $pos = strpos($action[$y], "#"); if ($pos==0){$pos=strlen($action[$y]);} $content[$y]=substr($action[$y],0,$pos); $content_bin[$y]=decbin($content[$y]); $pos2=strlen($content_bin[$y])-$x; if ($pos2>=0){ if (substr($content_bin[$y],$pos2,1)<>"1"){ $failed=1; } else { $strgen.=" ![](\"/admin/img/verm_petit.gif\") ";
$strgen.=$menu[$x].""; break; } } } } $strgen.=" | ![](\"/admin/img/shim.gif\"){kind=spacer} | ";
return $strgen;
}
//Comprovació de permisos a nivell d'acció (per introduir continguts)
function actionPermission() {
global $session_content_id,$ida;
$string=$_SESSION['session_permissions'];
if (!$session_content_id){
echo " ";
}
$actions="ok";
return $actions;
}
// *****************************************************************************
//Comprovació de permisos a nivell d'acció i secció (per introduir continguts)
// *****************************************************************************
function sectionPermission_query($field) {
global $session_content_id,$ida;
$string=$_SESSION['session_permissions'];
$section=explode("#",$string);
$total=sizeof($section);
for($y = 1;$y < $total;$y++){
$pos = strpos($section[$y],"@");
$section_per[$y]=substr($section[$y],0,$pos);
$end=strlen($section[$y])-$pos;
$content=substr($section[$y],$pos+1,$end);
$content_bin=decbin($content);
$pos2=strlen($content_bin)-$ida;
if ($pos2>=0){
if (substr($content_bin,$pos2,1)=="1"){
$hit++;
if ($hit>1){
$strgen.=" OR ".$field."=";
}
$strgen.=$section_per[$y];
}
}
}
return $strgen;
}
// *****************************************************************************
//Comprovació de permisos a nivell de secció
// *****************************************************************************
function sectionPermission($sec) {
$string=$_SESSION['session_permissions'];
$section=explode("#",$string);
$total=sizeof($section);
$section_per=array();
for($y = 1;$y < $total;$y++){
$pos = strpos($section[$y],"@");
$section_per[$y]=substr($section[$y],0,$pos);
}
if (in_array ($sec, $section_per)) return "true";
else return "false";
}
?>";
$code=substr($key,0,4);
$prefix=substr($key,4,strlen($TablePrefix));
if ($prefix==$TablePrefix) {
// de tipo texto
if ($code=="txt_") {
$sql1.=substr($key,4).", ";
$sql2.="'$val', ";
}
if ($code=="htm_") {
// de tipo html
//$val = ToHtmlEditor($val);
$sql1.=substr($key,4).", ";
$sql2.="'$val', ";
}
else if ($code=="dnt_") {
// de tipo fecha
$sql1.=substr($key,4).", ";
$sql2.="'".canviar_fecha($val)."', ";
}
else if ($code=="int_") {
// de tipo entero
$sql1.=substr($key,4).", ";
if (!$val) $val="0";
$sql2.="$val, ";
}
else if ($code=="PKN_") {
// de tipo PK numerico
$sql1.=substr($key,4).", ";
if (!$val) $val="0";
$sql2.="$val, ";
}
else if ($code=="PKA_") {
// Si es un PK Autonumerico no se incluye
// en la consulta INSERT
}
else if ($code=="PKT_") {
// de tipo PK no numerico
$sql1.=substr($key,4).", ";
$sql2.="'$val', ";
}
}
}
if (strlen($sql1)>0 && strlen($sql2)>0) {
$sql1=substr($sql1,0,strlen($sql1)-2);
$sql2=substr($sql2,0,strlen($sql2)-2);
$bigsql="INSERT INTO $TableName ($sql1) VALUES ($sql2)";
//echo $bigsql;
if ($debug!="") echo $bigsql;
if (!$db->Execute($bigsql)) die("Error de base de datos (" . $db->ErrorNo() . "): " . $db->ErrorMsg());
}
else {
print "No hay ningún registro para añadir o no se ha especificado la clave primaria";
}
return 0;
}
function UpdateRow ($TableName, $TablePrefix, &$db) {
reset($_POST);
$sql="";
$pk="";
while (list($key, $val) = each($_POST)) {
$code=substr($key,0,4);
$prefix=substr($key,4,strlen($TablePrefix));
//echo $key." "; if ($prefix==$TablePrefix) { if ($code=="txt_") { $sql.=" "; $sql.=substr($key,4); $sql.="='$val', "; } if ($code=="htm_") { $sql .= " "; $sql .=substr($key,4); //$sql .="='".ToHtmlEditor($val)."', "; $sql.="='$val', "; } else if ($code=="dnt_") { $sql.=" "; $sql.=substr($key,4); $sql.="='".canviar_fecha($val)."', "; } else if ($code=="int_") { $sql.=" "; $sql.=substr($key,4); $sql.="=$val, "; } else if ($code=="PKN_") { $pk[]=substr($key,4)."=$val"; } else if ($code=="PKA_") { $pk[]=substr($key,4)."=$val"; } else if ($code=="PKT_") { $pk[]=substr($key,4)."='$val'"; } } } if (strlen($sql)>0 && count($pk)>0) { $sql=substr($sql,0,strlen($sql)-2); $bigsql="UPDATE $TableName SET"; $bigsql.=$sql; $bigsql.=" WHERE"; reset($pk); for ($i=0,$n=count($pk);$i<$n;$i++) $bigsql.=" ".$pk[$i]." AND"; $bigsql=substr($bigsql, 0, strlen($bigsql)-4); //echo $bigsql; if ($db->Execute($bigsql) === false) die("Error de base de datos (" . $db->ErrorNo() . "): " . $db->ErrorMsg()); } else { print "No hay ningún registro a actualizar o no se ha especificado la clave primaria"; } return 0; } function DeleteRow ($TableName, $TablePrefix, $value) { global $Gestor; $sql = "DELETE FROM $TableName WHERE ".$TablePrefix."_PK=$value"; //echo $sql; if (!$Gestor->Execute($sql)){ die ("Error de base de datos (" . $Gestor->ErrorNo() . "): " . $Gestor->ErrorMsg()); } } // ***************** // funciones varias // ***************** function CallJSValidation(){ echo " "; } function forms_datePopup($name, $value, $extrahtml){ global $genjs; if (! $genjs ){ $genjs = " ![](\"/admin/img/calendar.gif\")
";
return ( $aux.$obj );
}
function forms_datePopup2($name, $value, $extrahtml, $top=20, $left=1){
global $genjs;
if (! $genjs ){
$genjs = "
";
return ( $aux.$obj );
}
function forms_recSelect( $name, $idname, $optname, $parentname, $table, $rootid, $wherec, $orderc){
$fobj = "";
return($fobj);
}
function ADOGetMultipleSelectOptions($str_sql1, $str_sql2)
{
global $db;
$DataArray = Array();
$DataArray["RestItems"] = Array();
$DataArray["SelectedItems"]=array();
if (!empty($str_sql1))
{
$rs = $db -> Execute($str_sql1);
while ($o1 = $rs->FetchNextObject()) {
$FirstList[$o1->VALUE]=$o1->LABEL;
$DataArray["SelectedItems"][]=array("value"=>$o1->VALUE, "label"=>$o1->LABEL);
}
}
if (!empty($str_sql2))
{
$rs = $db -> Execute($str_sql2);
while ($o2 = $rs->FetchNextObject()) {
$SecondList[$o2->VALUE]=$o2->LABEL;
}
if ((!empty($FirstList)) && (!empty($SecondList)))
{
$array_diff = array_diff($SecondList, $FirstList);
if (!empty($array_diff))
{
reset($array_diff);
while (list($key,$val)=each($array_diff)) {
$DataArray["RestItems"][]=array("value"=>$key, "label"=>$val);
}
}
}
else
if (!empty($SecondList))
{
reset($SecondList);
while (list($key,$val)=each($SecondList))
{
$DataArray["RestItems"][]=array("value"=>$key, "label"=>$val);
}
}
}
return $DataArray;
}
function GetFieldOptions ($ListDataSource,$numchar=" ") {
return ADOGetFieldOptions($ListDataSource,$numchar);
}
function ADOGetFieldOptions ($ListDataSource,$numchar=" ") {
//$numchar = número maximo de caracteres de longitud para cada Option
global $db, $Gestor;
if (!is_object($db) && is_object($Gestor)){
$db = $Gestor;
}
if (substr($ListDataSource,0,4)=="sql=") {
$dsSQL=substr($ListDataSource,4);
if (!$rs=$db->Execute($dsSQL)) die( "Error de base de datos (" . $db->ErrorNo() . "): " . $db->ErrorMsg() );
while ($o1 = $rs->FetchNextObject()) {
if ($numchar!=" "){
if (strlen($o1->LABEL)>$numchar){$textSelected=substr ($o1->LABEL, 0, $numchar)."..";}
else{$textSelected=$o1->LABEL;}
}
else{$textSelected=$o1->LABEL;
}
$o[]=array("label" => $textSelected, "value" => $o1->VALUE);
}
}
else if ($ListDataSource!="") {
$ds=explode(";", $ListDataSource);
$p=0;
for ($i=0, $n=count($ds); $i<$n; $i++) {
if ($p) {
$o[]=array("label" => $ds[$i], "value" => $ds[$i-1]);
$p=0;
}
else $p=1;
}
}
if (!is_array($o)) return GetFieldOptions (";");
return $o;
}
function ADOGetFieldValue($sql){
global $db, $Gestor;
if (!is_object($Gestor) && is_object($db)){
$Gestor = $db;
}
if (!$rs=$Gestor->Execute($sql)) die( "Error de base de datos (" . $Gestor->ErrorNo() . "): " . $Gestor->ErrorMsg() );
if ($rs->EOF) return false;
$o = $rs->FetchNextObject();
$res = $o -> VALUE;
//$db->free();
return $res;
}
function GetFieldLeveledOptions ($value, $label, $parentname, $table, $rootid, $wherec, $orderc) {
/**
* Construye listas indentadas en tablas con estructura de árbol
* Estas tablas deben contener un campo xxx_Parent
*
**/
//$o[] = array(0, 1);
//$count = 0;
RecursiveLeveledOption( $o, $value, $label, $parentname, $table, 0, $rootid, $wherec, $orderc);
return $o;
}
function InsertRow_OLD ($TableName, $TablePrefix, $db, $debug="") {
reset($_POST);
$sql1="";
$sql2="";
while (list($key, $val) = each($_POST)) {
$code=substr($key,0,4);
$prefix=substr($key,4,strlen($TablePrefix));
if ($prefix==$TablePrefix) {
if ($code=="txt_") {
$sql1.=substr($key,4).", ";
$sql2.="'$val', ";
}
else if ($code=="dnt_") {
$sql1.=substr($key,4).", ";
$sql2.="'".canviar_fecha($val)."', ";
}
else if ($code=="int_") {
$sql1.=substr($key,4).", ";
if (!$val) $val="0";
$sql2.="$val, ";
}
else if ($code=="PKN_") {
$sql1.=substr($key,4).", ";
if (!$val) $val="0";
$sql2.="$val, ";
}
else if ($code=="PKA_") {
// Si es un PK Autonumerico no se incluye
// en la consulta INSERT
}
else if ($code=="PKT_") {
$sql1.=substr($key,4).", ";
$sql2.="'$val', ";
}
}
}
if (strlen($sql1)>0 && strlen($sql2)>0) {
$sql1=substr($sql1,0,strlen($sql1)-2);
$sql2=substr($sql2,0,strlen($sql2)-2);
$bigsql="INSERT INTO $TableName ($sql1) VALUES ($sql2)";
if ($debug!="") echo $bigsql;
$db->query($bigsql);
}
else {
print "No hay ningún registro para añadir o no se ha especificado la clave primaria";
}
return 0;
}
function UpdateRow_OLD ($TableName, $TablePrefix, $db) {
reset($_POST);
$sql="";
$pk="";
while (list($key, $val) = each($_POST)) {
$code=substr($key,0,4);
$prefix=substr($key,4,strlen($TablePrefix));
if ($prefix==$TablePrefix) {
if ($code=="txt_") {
$sql.=" ";
$sql.=substr($key,4);
$sql.="='$val', ";
}
else if ($code=="dnt_") {
$sql.=" ";
$sql.=substr($key,4);
$sql.="='".canviar_fecha($val)."', ";
}
else if ($code=="int_") {
$sql.=" ";
$sql.=substr($key,4);
$sql.="=$val, ";
}
else if ($code=="PKN_") {
$pk[]=substr($key,4)."=$val";
}
else if ($code=="PKA_") {
$pk[]=substr($key,4)."=$val";
}
else if ($code=="PKT_") {
$pk[]=substr($key,4)."='$val'";
}
}
}
if (strlen($sql)>0 && count($pk)>0) {
$sql=substr($sql,0,strlen($sql)-2);
$bigsql="UPDATE $TableName SET";
$bigsql.=$sql;
$bigsql.=" WHERE";
reset($pk);
for ($i=0,$n=count($pk);$i<$n;$i++) $bigsql.=" ".$pk[$i]." AND";
$bigsql=substr($bigsql, 0, strlen($bigsql)-4);
//echo $bigsql;
$db->query($bigsql);
}
else {
print "No hay ningún registro a actualizar o no se ha especificado la clave primaria";
}
return 0;
}
function DeleteRow_old ($TableName, $TablePrefix, $db) {
reset($_POST);
$sql="";
$pk="";
while (list($key, $val) = each($_POST)) {
$code=substr($key,0,4);
$prefix=substr($key,4,strlen($TablePrefix));
if ($prefix==$TablePrefix) {
if ($code=="PKN_") {
$pk[]=substr($key,4)."=$val";
}
if ($code=="PKA_") {
$pk[]=substr($key,4)."=$val";
}
else if ($code=="PKT_") {
$pk[]=substr($key,4)."='$val'";
}
}
}
if (count($pk)>0) {
$bigsql="DELETE FROM $TableName WHERE";
reset($pk);
for ($i=0,$n=count($pk);$i<$n;$i++) $bigsql.=" ".$pk[$i]." AND";
$bigsql=substr($bigsql, 0, strlen($bigsql)-4);
//echo $bigsql;
$db->query($bigsql);
}
else {
print "No hay ningún registro a eliminar o no se ha especificado la clave primaria";
}
return 0;
}
function HTMLEditor($name, $prefix, $value,$idservice="0"){
global $ShowHTML;
if (! $ShowHTML ){
$ShowHTML = "
function ShowHTMLView (myfield, myhtmlfield) {
var dest='/admin/modules/htmledit/default.phtml?htmlfield='+myhtmlfield+'&field='+myfield+'&form='+document.forms[0].name+'&service=$idservice';
window.open (dest,'edit','resizable=yes, dependent=yes, width=550,height=350, screenX=50, screenY=50, titlebar=yes, status=yes');
}";
$more = $ShowHTML;
}
$value = str_replace( chr(13).chr(10), "", $value);
$value = str_replace( chr(10), "", $value);
$value = str_replace( chr(13), "", $value);
return "
* *
";
}
function FStree($name, $folder, $size=10, $parent=0, $level=0){
/**
* DIRECTORIOS
* DIRECTORIOS
* DIRECTORIOS
* DIRECTORIOS
* Construye un combo que reproduce el contenido de un directorio con estructura de árbol
* $name: nombre que tomará el objeto de formulario resultante
* $size: número de filas visibles en el combo
**/
global $extrajs;
global $rownum;
if (!$extrajs){
$extrajs = "
function show(row, sel, index, level, selected){
//FUNCION RECURSIVA
var i, j;
var label;
//alert(sel.name);
for (i=0; ires:$int $float"; for ($i=strlen($int); $i>0; $i--){ // echo "i:$i-"; // echo "len:".strlen($int)." "; if ( ((strlen($int) - $i) % 4 == 0 ) ) { $int = substr($int,0,$i).$punct[$lang]["mil"].substr($int,$i); } } $int = substr($int,0, strlen($int)-1); $result = $int.$punct[$lang]["float"].$float; if (!$float){ // borramos el float point $result = substr($result,0, strlen($result)-1); } return $result; } function NewOrder($table, $order) { global $Gestor; $sql = "SELECT max($order) as m FROM $table"; if (!$rs=$Gestor->Execute($sql)){ die("Error de base de datos (" . $Gestor->ErrorNo() . "): " . $Gestor->ErrorMsg()); } $last = $rs->Fields("m"); $rs->close(); return $last + 1; } /** * Basado en ToHtmlEditor * NO filtra los parámetros de los TAGS introducidos por WORD */ function ToHtmlEditorSimple($field) { // De \" a '' //$field = str_replace("\\\"","'",$field); // De ' a '' //$field = str_replace("'","''",$field); // De " a '' $field = str_replace("\"","'",$field); //Quitar CR y LF $field = str_replace(chr(13).chr(10), "", $field); $field = str_replace(chr(10), "", $field); $field = str_replace(chr(13), "", $field); return $field; } function ToHtmlEditor($field) { // De \" a '' //$field = str_replace("\\\"","'",$field); // De ' a '' //$field = str_replace("'","''",$field); // De " a '' $field = str_replace("\"","'",$field); //Quitar CR y LF $field = str_replace(chr(13).chr(10), "", $field); $field = str_replace(chr(10), "", $field); $field = str_replace(chr(13), "", $field); //Salvamos del filtrado las alineaciones de párrafos introducidas por el editor // DESACTIVADO //$field = saveFromEditor($field, "center"); //$field = saveFromEditor($field, "left"); //$field = saveFromEditor($field, "right"); //$field = saveFromEditor($field, "justify"); //Etiquetas insertadas por el WORD $punct = "[\"':=;.-]*(#)?(\\\')?"; //if (!ereg("align")) //$field = eregi_replace(" "," ", $field);
$field = eregi_replace("","", $field);
//$field = eregi_replace(" |