PHP mex函数代码示例

function estendi_menu_date($file_menu, $nuovo_file_menu, $tipo_periodi, $data_ini, $data_ini_agg, $data_fine, $anno, $pag)
{
    $mese_fine = substr($data_fine, 5, 2);
    $anno_fine = substr($data_fine, 0, 4);
    $giorno_fine = substr($data_fine, 8, 2);
    if ((int) substr($data_fine, 8, 2) == 1) {
        $mese_fine--;
    }
    if ($anno_fine > $anno) {
        $diff = $anno_fine - $anno;
        $mese_fine = $diff * 12 + $mese_fine;
    }
    # fine if ($anno_fine > $anno)
    if (!$data_ini_agg or $data_ini_agg < $data_ini) {
        $data_ini_agg = $data_ini;
    }
    $mese_ini_agg = substr($data_ini_agg, 5, 2);
    $anno_ini_agg = substr($data_ini_agg, 0, 4);
    $numgiorno = substr($data_ini_agg, 8, 2);
    if ($anno_ini_agg > $anno) {
        $diff = $anno_ini_agg - $anno;
        $mese_ini_agg = $diff * 12 + $mese_ini_agg;
    }
    # fine if ($anno_fine > $anno)
    if ($tipo_periodi == "g") {
        $aggiungi_giorni = 1;
    } else {
        $aggiungi_giorni = 7;
    }
    $date_option_agg = "";
    $n_date_menu_agg = 0;
    $mesecreato = $mese_ini_agg;
    while ($mesecreato <= $mese_fine) {
        if ($date_option_agg) {
            $numgiorno = $numgiorno + $aggiungi_giorni;
        }
        $datafine = date("Y-m-d", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno));
        $annocreato = date("Y", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno));
        $mesecreato = date("n", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno));
        if ($annocreato > $anno) {
            $diff = $annocreato - $anno;
            $mesecreato = $diff * 12 + $mesecreato;
        }
        # fine if ($annocreato > $anno)
        $nome_giorno = date("D", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno));
        if ($tipo_periodi == "g") {
            $nome_giorno = "[{$nome_giorno}]";
        } else {
            $nome_giorno = "";
        }
        $nome_mese = substr($datafine, 5, 2);
        $numero_giorno = substr($datafine, 8, 2);
        $numero_anno = substr($datafine, 0, 4);
        if (!$date_option_agg) {
            $a_ini_menu_agg = substr($datafine, 0, 4);
            $m_ini_menu_agg = substr($datafine, 5, 2) - 1;
            $g_ini_menu_agg = substr($datafine, 8, 2);
        }
        # fine if (!$date_option_agg)
        $n_date_menu_agg++;
        $date_option_agg .= "<option value=\\\"{$datafine}\\\">[{$nome_mese}] {$numero_giorno}{$nome_giorno}, {$numero_anno}</option>\n";
    }
    # fine while ($mesecreato <= $mese_fine)
    if ($tipo_periodi == "g") {
        $date_option_agg = str_replace("[Sun]", mex(" Do", "inizio.php"), $date_option_agg);
        $date_option_agg = str_replace("[Mon]", mex(" Lu", "inizio.php"), $date_option_agg);
        $date_option_agg = str_replace("[Tue]", mex(" Ma", "inizio.php"), $date_option_agg);
        $date_option_agg = str_replace("[Wed]", mex(" Me", "inizio.php"), $date_option_agg);
        $date_option_agg = str_replace("[Thu]", mex(" Gi", "inizio.php"), $date_option_agg);
        $date_option_agg = str_replace("[Fri]", mex(" Ve", "inizio.php"), $date_option_agg);
        $date_option_agg = str_replace("[Sat]", mex(" Sa", "inizio.php"), $date_option_agg);
    }
    # fine if ($tipo_periodi == "g")
    $date_option_agg = str_replace("[01]", mex("Gen", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[02]", mex("Feb", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[03]", mex("Mar", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[04]", mex("Apr", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[05]", mex("Mag", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[06]", mex("Giu", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[07]", mex("Lug", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[08]", mex("Ago", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[09]", mex("Set", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[10]", mex("Ott", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[11]", mex("Nov", "inizio.php"), $date_option_agg);
    $date_option_agg = str_replace("[12]", mex("Dic", "inizio.php"), $date_option_agg);
    unset($y_ini_menu);
    unset($m_ini_menu);
    unset($d_ini_menu);
    unset($n_dates_menu);
    unset($d_increment);
    include $file_menu;
    $num_periodi_vecchi = count($y_ini_menu);
    $fileaperto = fopen($nuovo_file_menu, "w+");
    flock($fileaperto, 2);
    fwrite($fileaperto, "<?php \n\n");
    $num_menu = 0;
    for ($num1 = 0; $num1 < $num_periodi_vecchi; $num1++) {
        $scrivi = 0;
        if ($y_ini_menu[$num1] . "-" . $m_ini_menu[$num1] . "-" . $d_ini_menu[$num1] > $data_ini) {
            $scrivi = 1;
//.........这里部分代码省略.........

                    }
                    # fine if ($righe_tab_disp)
                }
                # fine if ($mostra_quadro_disp)
            } else {
                echo "<br>\n<div style=\"text-align: center;\">";
            }
        } else {
            unlock_tabelle($tabelle_lock);
        }
        if ($origine) {
            $action = $origine;
            $fr_torna_indietro = mex("Torna indietro", $pag);
        } else {
            $action = "inizio.php";
            $fr_torna_indietro = mex("Torna al menù principale", $pag);
        }
        # fine else if ($origine)
        echo "<br><br><form accept-charset=\"utf-8\" method=\"post\" action=\"{$action}\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"{$fr_torna_indietro}\">\n</div></form><br><br>";
        if ($verificare != "NO") {
            echo "</div>";
        }
        if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) {
            include "./themes/" . $tema[$id_utente] . "/php/foot.php";
        } else {
            include "./includes/foot.php";
        }
    }
    # fine if ($anno_utente_attivato == "SI" and ($priv_ins_nuove_prenota == "s" or $priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n"))
}
# fine if ($id_utente)

function scarica_backup_subordinazione ($file_backup,$url_subordinazione,$utente_subordinazione,$password_subordinazione,$anno,$compresso_subordinazione) {
global $tableversioni,$pag;
$errore = "NO";
if ($output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione&anno=$anno&azione=SI&crea_backup=SI")) {
$backup = @fopen($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione&anno=$anno&azione=SI&mostra_header=NO&salva_backup=SI&compresso=$compresso_subordinazione","r");
if ($backup) {
if ($fileaperto = fopen($file_backup,"w")) {
flock($fileaperto,2);
while (!feof($backup)) {
$linee = fread($backup,524288);
fwrite($fileaperto,$linee);
} # fine while (!feof($fbackup))
flock($fileaperto,3);
fclose($fileaperto);
} # fine if ($fileaperto = fopen($file_backup,"w"))
else {
$errore = "SI";
echo mex("Non ho i permassi di scrittura sulla cartella data",$pag).".<br>";
} # fine else if ($fileaperto = fopen($file_backup,"w"))
fclose ($backup);
if ($errore != "SI") {
if ($compresso_subordinazione == "SI") {
if (rename($file_backup,$file_backup.".gz")) {
if ($fileaperto = fopen($file_backup,"w")) {
flock($fileaperto,2);
$gzbackup = gzopen($file_backup.".gz","r");
if ($gzbackup) {
while (!feof($gzbackup)) {
$linee = gzread($gzbackup,524288);
fwrite($fileaperto,$linee);
} # fine while (!feof($gzbackup))
} # fine if ($gzbackup)
flock($fileaperto,3);
fclose($fileaperto);
} # fine if ($fileaperto = fopen($file_backup,"w"))
unlink($file_backup.".gz");
} # fine if (rename($file_backup,$file_backup.".gz"))
} # fine if ($compresso_subordinazione == "SI")
$linee = "";
if ($fbackup = fopen($file_backup,"r")) {
$linee = fread($fbackup,524288);
fclose($fbackup);
} # fine if ($fbackup = fopen($file,"r"))
$versione_corrente = esegui_query("select * from $tableversioni where idversioni = 1");
$versione_corrente = risul_query($versione_corrente,0,'num_versione');
if (str_replace("<versione>$versione_corrente</versione>","",$linee) == $linee) {
$errore = "SI";
if (str_replace("<versione>","",$linee) == $linee) echo mex("Non si è potuto scaricare il backup remoto",$pag).".<br>";
else echo mex("Versione locale diversa da quella remota",$pag).".<br>";
include("./includes/funzioni_aggiorna.php");
global $agg_cod_sorg;
unset($linee);
$agg_cod_sorg = aggiorna_codice_sorgente_phpr($url_subordinazione);
if ($agg_cod_sorg) echo "<br>".mex("Aggiornamento codice sorgente eseguito con successo",$pag)."!<br><br>";
} # fine if (str_replace("<versione>$versione_corrente</versione>","",$linee) == $linee)
unset($linee);
} # fine if ($errore != "SI")
} # fine if ($backup)
else {
$errore = "SI";
echo mex("Non si è potuto stabilire la connessione",$pag).".<br>";
} # fine else if ($backup)
} # fine if ($output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione"))
else {
$errore = "SI";
echo mex("Non si è potuto stabilire la connessione",$pag).".<br>";
} # fine else if ($output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione"))
if ($errore != "SI") $output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione&anno=$anno&azione=SI&cancella_backup=SI");
return $errore;
} # fine function scarica_backup_subordinazione

function crea_modello_rat ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) {
global $num_periodi_date,$M_PHPR_DB_TYPE,$M_PHPR_DB_NAME,$M_PHPR_DB_HOST,$M_PHPR_DB_PORT,$M_PHPR_DB_USER,$M_PHPR_DB_PASS,$M_PHPR_LOAD_EXT,$M_PHPR_TAB_PRE,$estendi_ultima_data;
global $m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$mostra_caparra,$modello_esistente,$cambia_frasi,$template_data_dir,$template_file_name,$parola_settimane;
global $apertura_tag_font,$chiusura_tag_font,$stile_tabella_tariffe,$m_valuta_sing,$m_valuta_plur,$prima_parte_html,$ultima_parte_html,$file_css_frame,$tema_modello;
$tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello;
$tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello;
$tableanni = $PHPR_TAB_PRE."anni";

if (controlla_anno($anno_modello) != "SI") {
$continua = "NO";
$anno_modello = "";
} # fine if (controlla_anno($anno_modello) != "SI")
else {
$anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'");
if (numlin_query($anno_esistente) != 1) $continua = "NO";
} # fine else if (controlla_anno($anno_modello) != "SI")
if ($continua != "NO") {

if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO";

$date_in_menu = "";
$idfineperiodo_prec = -10;
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1};
$inizioperiodo = aggslashdb(${"inizioperiodo".$num1});
$fineperiodo = aggslashdb(${"fineperiodo".$num1});
$idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; }
else { $idinizioperiodo = risul_query($idinizioperiodo,0,idperiodi); }
$inizioperiodo = $idinizioperiodo;
if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) {
$idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello");
$idfineperiodo = risul_query($idfineperiodo,0,0);
} # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
else {
$idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) { $idfineperiodo = -1; }
else { $idfineperiodo = risul_query($idfineperiodo,0,idperiodi); }
} # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
$fineperiodo = $idfineperiodo ;
${"inizioperiodo".$num1} = $inizioperiodo;
${"fineperiodo".$num1} = $fineperiodo;
if ($idfineperiodo < $idinizioperiodo) $continua = "NO";
if (($idfineperiodo_prec + 1) > $idinizioperiodo) $continua = "NO";
$idfineperiodo_prec = $idfineperiodo;
${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1});
if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO";
} # fine for $num1
if ($continua == "NO") {
if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>";
} # fine if ($continua == "NO")
else {
$file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php");
$num_linee_file_intero = count($file_intero);
$pag_gm = "giorni_mesi.php";
$m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'");
$m_tipo_periodi = risul_query($m_tipo_periodi,0,0);
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
$inizioperiodo = ${"inizioperiodo".$num1};
$fineperiodo = ${"fineperiodo".$num1};
$num_intervallo = 1;
for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) {
if (substr($file_intero[$num2],0,7) == "<option") {
$data_option = substr($file_intero[$num2],16,10);
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' ");
$esiste_data_option = numlin_query($id_data_option);
if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,idperiodi);
else {
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' ");
$id_data_option = risul_query($id_data_option,0,idperiodi);
} # fine else if ($esiste_data_option == 1)
if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) {
if ($num_intervallo == 1) {
$giorno_option = substr($data_option,8,2);
$mese_option = substr($data_option,5,2);
$anno_option = substr($data_option,0,4);
$nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
$nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
if ($m_tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello);
if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello);
if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello);
if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello);
if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello);
if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello);
if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello);
} # fine if ($m_tipo_periodi == "g")
else $nome_giorno = "";
if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello);
if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello);
if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello);
if ($nome_mese == "Apr") $nome_mese = mex2("Apr",$pag_gm,$lingua_modello);
if ($nome_mese == "May") $nome_mese = mex2("Mag",$pag_gm,$lingua_modello);
if ($nome_mese == "Jun") $nome_mese = mex2("Giu",$pag_gm,$lingua_modello);
if ($nome_mese == "Jul") $nome_mese = mex2("Lug",$pag_gm,$lingua_modello);
if ($nome_mese == "Aug") $nome_mese = mex2("Ago",$pag_gm,$lingua_modello);
if ($nome_mese == "Sep") $nome_mese = mex2("Set",$pag_gm,$lingua_modello);
//.........这里部分代码省略.........

$template_theme_name[1] = "default";
$template_theme_colors[1][1]['name'] = "font";
$template_theme_colors[1][1]['default'] = "#000000";
$template_theme_colors[1][2]['name'] = "background";
$template_theme_colors[1][2]['default'] = "#ffffff";
$template_theme_colors[1][3]['name'] = "background 2";
$template_theme_colors[1][3]['default'] = "#ebebeb";
$template_theme_values[1][1]['name'] = mex("URL della home",$pag);
$template_theme_values[1][1]['default'] = $dati_struttura[4];
$template_theme_values[1][1]['replace'] = "<div style=\"width: 100%; padding: 10px 0 10px 20px; margin: 0; border-bottom: 2px solid [theme_color_1]; background-color: [theme_color_3];\"><a href=\"[theme_value_1]\" style=\"color: [theme_color_1];\" target=\"_top\">[theme_value_2]</a></div>";
$template_theme_values[1][2]['name'] = mex("URL del logo",$pag);
$template_theme_values[1][2]['default'] = $dati_struttura[15];
$template_theme_values[1][2]['replace'] = "<img style=\"text-decoration: none; border: 0px;\" src=\"[theme_value_2]\" alt=\"[theme_value_3]\">";
$template_theme_values[1][2]['null'] = "[theme_value_3]";
$template_theme_values[1][3]['name'] = mex("Torna alla HOME",$pag);
$template_theme_values[1][3]['default'] = mex2("Torna alla HOME",$pag,$lingua_modello);
$template_theme_html_pre[1] = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\"
        \"http://www.w3.org/TR/html4/strict.dtd\">
<html>
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\" >
<title> $nome_file </title>
<style type=\"text/css\">
 .rates { background-color: [theme_color_3]; border-radius: 10px; }
 .rates tr:first-child td:first-child { border-top-left-radius: 10px; }
 .rates tr:first-child td:last-child { border-top-right-radius: 10px; }
 .rates tr:last-child td:first-child { border-bottom-left-radius: 10px; }
 .rates tr:last-child td:last-child { border-bottom-right-radius: 10px; }
</style>
</head>

echo "$istogramma<br><br>";

} # fine if (@is_array($x))


} # fine if ($tipo_tabella == "statistiche" and $priv_vedi_tab_stat != "n")





echo "<div style=\"text-align: center;\"><br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input class=\"sbutton\" type=\"submit\" name=\"indietro\" value=\"".mex("Torna al menù principale",$pag)."\">
</div></form></div><div style=\"height: 20px\"></div>";



if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/".$tema[$id_utente]."/php")) include("./themes/".$tema[$id_utente]."/php/foot.php");
else include("./includes/foot.php");


} # fine if ($anno_utente_attivato == "SI")
} # fine if ($id_utente)



?>

                # fine if ($priv_ins_entrate == "s")
                if ($priv_ins_spese == "s") {
                    echo "\n<h3>" . mex("Inserisci i costi di gestione per l'anno", $pag) . " {$anno}.</h3>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"costi.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\"><br>\n<table style=\"margin-left: auto; margin-right: auto;\" cellspacing=2 cellpadding=5>\n<tr><td>";
                    if ($num_casse_attive == 1) {
                        echo $hidden_cassa;
                    } else {
                        echo "" . mex("Cassa", $pag) . ":&nbsp;<select name=\"id_cassa\">\n{$opt_casse}</select></td></tr>\n<tr><td>";
                    }
                    echo "" . mex("Natura spesa", $pag) . ":&nbsp;\n<input type=\"text\" name=\"nome_costo\" size=\"30\" value=\"\">\n</td></tr>\n<tr><td>\n" . mex("Importo", $pag) . ":&nbsp;\n<input type=\"text\" name=\"val_costo\" size=\"10\" value=\"\">&nbsp;{$Euro}.\n</td></tr>\n{$metodo_pagamento_txt}";
                    if ($priv_persona_ins_costi == "c") {
                        echo "<tr><td>" . mex("Persona che inserisce", $pag) . ":&nbsp;\n<input type=\"text\" name=\"persona_costo\" size=\"20\" value=\"\">&nbsp;(" . mex("opzionale", $pag) . ").\n</td></tr>";
                    }
                    # fine if ($priv_persona_ins_costi == "c")
                    echo "</table><div style=\"text-align: center;\">\n<input class=\"sbutton\" type=\"submit\" name=\"inserisci_spesa\" value=\"" . mex("Inserisci la spesa", $pag) . "\"><br>\n</div></div></form>\n<table><tr><td style=\"height: 8px;\"></td></tr></table><hr style=\"width: 95%\">";
                }
                # fine if ($priv_ins_spese == "s")
                echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div style=\"text-align: center;\">\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"tipo_tabella\" value=\"costi\">\n<input class=\"sbutton\" type=\"submit\" name=\"visualizza\" value=\"" . mex("Visualizza la tabella con tutte le spese e le entrate", $pag) . "\">\n</div></form>";
            }
            # fine else if (!$num_casse_attive)
            echo "<table><tr><td style=\"height: 8px;\"></td></tr></table>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div style=\"text-align: center;\">\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"indietro\" value=\"" . mex("Torna al menù principale", $pag) . "\">\n</div></form><table><tr><td style=\"height: 20px;\"></td></tr></table>";
        }
        # fine if ($mostra_form_inserimento != "NO")
        if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) {
            include "./themes/" . $tema[$id_utente] . "/php/foot.php";
        } else {
            include "./includes/foot.php";
        }
    }
    # fine if ($anno_utente_attivato == "SI")
}
# fine if ($id_utente)

//.........这里部分代码省略.........
                }
                $prenota_comp_control = $prenota_comp;
                if ($d_prenota_comp and $prenota_comp_control) {
                    $prenota_comp_control .= ",";
                }
                $prenota_comp_control .= $d_prenota_comp;
                for ($num1 = 0; $num1 < $num_spostamenti; $num1++) {
                    $idprenota_cambiata = $spostamenti[$num1];
                    if ($app_assegnabili_id[0][$idprenota_cambiata]) {
                        if (str_replace(",{$idprenota_cambiata},", "", ",{$prenota_comp_control},") == ",{$prenota_comp_control},") {
                            $prenota_comp_copia = $app_assegnabili_id[0][$idprenota_cambiata];
                            if ($prenota_comp_copia != "") {
                                $prenota_comp_copia = $idprenota_cambiata . "," . $prenota_comp_copia;
                            }
                            controlla_prenota_vicine($prenota_comp_copia, $dati_app, $app_prenota_id);
                            if ($prenota_comp_copia) {
                                $inserire = "NO";
                            } else {
                                $prenota_comp_control .= "," . $app_assegnabili_id[0][$idprenota_cambiata];
                            }
                            if (substr($prenota_comp_control, 0, 1) == ",") {
                                $prenota_comp_control = substr($prenota_comp_control, 1);
                            }
                        }
                        # fine if (str_replace(",$idprenota_cambiata,","",",$prenota_comp_control,") == ",$prenota_comp_control,")
                    }
                    # fine if ($app_assegnabili_id[0][$idprenota_cambiata])
                }
                # fine for $num1
                if ($d_checkin and !$d_checkout and $app_prenota_id[$id_prenota] != $d_appartamento) {
                    $checkin_presente = esegui_query("select idprenota from {$tableprenota} where idappartamenti = '" . aggslashdb($app_prenota_id[$id_prenota]) . "' and checkin is not NULL and checkout is NULL");
                    if (numlin_query($checkin_presente) >= 1) {
                        $inserire = "NO";
                        echo mex("Non si è potuto spostare la prenotazione per la registrazione dell'entrata", $pag) . ".<br>";
                    }
                    # fine if (numlin_query($checkin_presente) >= 1)
                }
                # fine if ($d_checkin and !$d_checkout and...
            }
            # fine for $num_idpr
        }
        # fine if ($tableprenota_da_aggiornare)
    }
    # fine if ($inserire != "NO")
    if ($inserire != "NO" and $tableprenota_da_aggiornare) {
        for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
            $id_prenota = $id_prenota_idpr[$num_idpr];
            if (strcmp($app_prenota_id[$id_prenota], "") and !strcmp($app_orig_prenota_id[$id_prenota], "")) {
                $app_orig_prenota_id[$id_prenota] = $app_prenota_id[$id_prenota] . "x";
            }
        }
        # fine for $num_idpr
        $risul_agg = aggiorna_tableprenota($app_prenota_id, $app_orig_prenota_id, $tableprenota);
        if (!$risul_agg) {
            $inserire = "NO";
        }
    }
    # fine if ($inserire != "NO" and $tableprenota_da_aggiornare)
    if ($inserire == "NO") {
        echo mex("La prenotazione", $pag) . " {$id_prenota} " . mex("<b>non è stata modificata</b> perchè la tabella prenotazioni è cambiata nel frattempo", $pag) . ".<br>";
        unlock_tabelle($tabelle_lock);
    } else {
        for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
            $id_prenota = $id_prenota_idpr[$num_idpr];
            $d_id_utente_inserimento = $d_id_utente_inserimento_idpr[$id_prenota];
            $d_app_eliminati_costi = $d_app_eliminati_costi_idpr[$id_prenota];

function trova_prima_data($testo, $stile_data, $lingua)
{
    global $lingua_mex;
    $prima_data = "";
    $lung_prima_data = strlen($testo);
    if (preg_match("|[^0-9][0-9]{1,2}[-/ ][0-9]{1,2}[-/ ][0-9]{4,4}[^0-9]|", $testo)) {
        $prima_data_vett = preg_split("|[0-9]{1,2}[-/ ][0-9]{1,2}[-/ ][0-9]{4,4}|", $testo);
        $lung_prima_data_corr = strlen($prima_data_vett[0]);
        if ($lung_prima_data_corr < $lung_prima_data) {
            $lung_prima_data = $lung_prima_data_corr;
            $prima_data = substr($testo, $lung_prima_data);
            if ($prima_data_vett[1]) {
                $prima_data = explode($prima_data_vett[1], $prima_data);
                $prima_data = $prima_data[0];
            }
            # fine if ($prima_data_vett[1])
            $prima_data_corr = preg_split("|[-/ ]|", $prima_data);
            if (strlen($prima_data_corr[0]) < 2) {
                $prima_data_corr[0] = "0" . $prima_data_corr[0];
            }
            if (strlen($prima_data_corr[1]) < 2) {
                $prima_data_corr[1] = "0" . $prima_data_corr[1];
            }
            if ((int) $prima_data_corr[0] > 12) {
                $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[1] . "-" . $prima_data_corr[0];
            } else {
                if ((int) $prima_data_corr[1] > 12) {
                    $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[0] . "-" . $prima_data_corr[1];
                } else {
                    if ($stile_data == "usa") {
                        $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[0] . "-" . $prima_data_corr[1];
                    } else {
                        $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[1] . "-" . $prima_data_corr[0];
                    }
                }
                # fine else if ($prima_data_corr[1] > 12)
            }
            # fine else if ($prima_data_corr[0] > 12)
        }
        # fine if ($lung_prima_data_corr < $lung_prima_data)
    }
    # fine if (preg_match("|[^0-9][0-9]{1,2}[-/ ][0-9]{1,2}[-/ ][0-9]{4,4}|",$testo))
    if (preg_match("|[^0-9][0-9]{4,4}[-/ ][0-9]{1,2}[-/ ][0-9]{1,2}[^0-9]|", $testo)) {
        $prima_data_vett = preg_split("|[0-9]{4,4}[-/ ][0-9]{1,2}[-/ ][0-9]{1,2}|", $testo);
        $lung_prima_data_corr = strlen($prima_data_vett[0]);
        if ($lung_prima_data_corr < $lung_prima_data) {
            $lung_prima_data = $lung_prima_data_corr;
            $prima_data = substr($testo, $lung_prima_data);
            if ($prima_data_vett[1]) {
                $prima_data = explode($prima_data_vett[1], $prima_data);
                $prima_data = $prima_data[0];
            }
            # fine if ($prima_data_vett[1])
            $prima_data_corr = preg_split("|[-/ ]|", $prima_data);
            if (strlen($prima_data_corr[1]) < 2) {
                $prima_data_corr[1] = "0" . $prima_data_corr[1];
            }
            if (strlen($prima_data_corr[2]) < 2) {
                $prima_data_corr[2] = "0" . $prima_data_corr[2];
            }
            $prima_data = $prima_data_corr[0] . "-" . $prima_data_corr[1] . "-" . $prima_data_corr[2];
        }
        # fine if ($lung_prima_data_corr < $lung_prima_data)
    }
    # fine if (preg_match("|[^0-9][0-9]{4,4}[-/ ][0-9]{1,2}[-/ ][0-9]{1,2}[^0-9]|",$testo))
    $lingua_orig = $lingua_mex;
    $lingua_mex = $lingua;
    $Gen = mex("Gen", 'giorni_mesi.php');
    $Feb = mex("Feb", 'giorni_mesi.php');
    $Mar = mex("Mar", 'giorni_mesi.php');
    $Apr = mex("Apr", 'giorni_mesi.php');
    $Mag = mex("Mag", 'giorni_mesi.php');
    $Giu = mex("Giu", 'giorni_mesi.php');
    $Lug = mex("Lug", 'giorni_mesi.php');
    $Ago = mex("Ago", 'giorni_mesi.php');
    $Set = mex("Set", 'giorni_mesi.php');
    $Ott = mex("Ott", 'giorni_mesi.php');
    $Nov = mex("Nov", 'giorni_mesi.php');
    $Dic = mex("Dic", 'giorni_mesi.php');
    $Gennaio = mex("Gennaio", 'giorni_mesi.php');
    $Febbraio = mex("Febbraio", 'giorni_mesi.php');
    $Marzo = mex("Marzo", 'giorni_mesi.php');
    $Aprile = mex("Aprile", 'giorni_mesi.php');
    $Maggio = mex("Maggio", 'giorni_mesi.php');
    $Giugno = mex("Giugno", 'giorni_mesi.php');
    $Luglio = mex("Luglio", 'giorni_mesi.php');
    $Agosto = mex("Agosto", 'giorni_mesi.php');
    $Settembre = mex("Settembre", 'giorni_mesi.php');
    $Ottobre = mex("Ottobre", 'giorni_mesi.php');
    $Novembre = mex("Novembre", 'giorni_mesi.php');
    $Dicembre = mex("Dicembre", 'giorni_mesi.php');
    $lingua_mex = $lingua_orig;
    $mesi_alternativi = "{$Gen}|{$Feb}|{$Mar}|{$Apr}|{$Mag}|{$Giu}|{$Lug}|{$Ago}|{$Set}|{$Ott}|{$Nov}|{$Dic}|{$Gennaio}|{$Febbraio}|{$Marzo}|{$Aprile}|{$Maggio}|{$Giugno}|{$Luglio}|{$Agosto}|{$Settembre}|{$Ottobre}|{$Novembre}|{$Dicembre}";
    if (preg_match("=[^0-9a-z]({$mesi_alternativi})[, -/]+[0-9]{1,2}[, -/]+[0-9]{4,4}[^0-9a-z]=i", $testo)) {
        $prima_data_vett = preg_split("=({$mesi_alternativi})[, -/]+[0-9]{1,2}[, -/]+[0-9]{4,4}=i", $testo);
        $lung_prima_data_corr = strlen($prima_data_vett[0]);
        if ($lung_prima_data_corr < $lung_prima_data) {
            $lung_prima_data = $lung_prima_data_corr;
            $prima_data = substr($testo, $lung_prima_data);
            if ($prima_data_vett[1]) {
//.........这里部分代码省略.........

            $tariffa = risul_query($regole4, $num1, 'tariffa_per_persone');
            $persone = risul_query($regole4, $num1, 'iddatainizio');
            echo "if (tariffa == \"{$tariffa}\") txt_box.value = \"{$persone}\";\n";
        }
        # fine for $num1
        echo "}\n-->\n</script>\n\n<div style=\"text-align: center;\">" . mex("Regola di assegnazione", $pag) . " <b>4</b>.</div><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"crearegole.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"inserisci\" value=\"SI\">\n" . mex("Quando si sceglie la tariffa", $pag) . "\n<select name=\"tipotariffa\" id=\"t4\" onchange=\"aggiorna_val_reg4()\">\n<option value=\"\" selected>----</option>";
        for ($numtariffa = 1; $numtariffa <= $numero_tariffe; $numtariffa = $numtariffa + 1) {
            $tariffa = "tariffa" . $numtariffa;
            $tariffa_vedi = mex("tariffa", "prenota.php") . $numtariffa;
            $nometariffa = risul_query($rigatariffe, 0, $tariffa);
            if ($nometariffa != "") {
                $nometariffa_vedi = " ({$nometariffa})";
            } else {
                $nometariffa_vedi = "";
            }
            echo "\n<option value=\"{$tariffa}\">{$tariffa_vedi}{$nometariffa_vedi}</option>";
        }
        # fine for $numtariffa
        echo "</select>\n " . mex("assegna automaticamente come numero di persone", $pag) . "\n <input type=\"text\" id=\"v4\" name=\"num_persone\" size=\"5\">\n " . mex("se non si inserisce nessun altro numero", $pag) . ".<br>";
        echo "<script type=\"text/javascript\">\n<!--\nvar txt_box = document.getElementById(\"v4\");\ntxt_box.disabled = true;\n-->\n</script>\n<div style=\"text-align: center;\">\n<input class=\"sbutton\" type=\"submit\" name=\"regola_4\" value=\"" . mex("Inserisci o modifica la regola", $pag) . " 4\">\n</div></div></form><hr style=\"width: 95%\">";
        echo "<table><tr><td style=\"height: 6px;\"></td></tr></table>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"creaprezzi.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"ins_rapido_costo\" value=\"SI\">\n<input type=\"hidden\" name=\"origine\" value=\"crearegole.php\">\n" . mex("Inserimento rapido di un nuovo costo aggiuntivo per", 'creaprezzi.php') . "\n <select name=\"tipocostoagg\">\n<option value=\"perm_min\">" . mex("permanenza minima", 'creaprezzi.php') . "</option>\n<option value=\"num_bamb\">" . mex("numero di bambini", 'creaprezzi.php') . "</option>\n<option value=\"letto_agg\">" . mex("letto aggiuntivo", 'creaprezzi.php') . "</option>\n<option value=\"off_spec\">" . mex("offerta speciale", 'creaprezzi.php') . "</option>\n</select>\n<input class=\"sbutton\" type=\"submit\" value=\"" . mex("inserisci", 'creaprezzi.php') . "\">.\n<table><tr><td style=\"height: 6px;\"></td></tr></table>\n</div></form><hr style=\"width: 95%\">";
        echo "<div style=\"text-align: center;\"><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"tipo_tabella\" value=\"regole\">\n<input class=\"sbutton\" type=\"submit\" name=\"visualizza\" value=\"" . mex("Vedi le regole già inserite", $pag) . "\">\n</div></form><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"" . mex("Torna al menù principale", $pag) . "\">\n<br></div></form><br></div>";
    }
    # fine else if ($inserisci)
    if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) {
        include "./themes/" . $tema[$id_utente] . "/php/foot.php";
    } else {
        include "./includes/foot.php";
    }
}
# fine if ($id_utente and $id_utente == 1)

                     $id_utente_mod = $id_utente;
                 }
                 echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"./personalizza.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"id_utente_mod\" value=\"{$id_utente_mod}\">\n<input type=\"hidden\" name=\"aggiorna_qualcosa\" value=\"SI\">\n<input type=\"hidden\" name=\"origine\" value=\"./creaprezzi.php\">\n<input type=\"hidden\" name=\"cambiaarrtasse\" value=\"SI\">";
                 $arrotond_tasse = esegui_query("select * from {$tablepersonalizza} where idpersonalizza = 'arrotond_tasse' and idutente = '{$id_utente}'");
                 $arrotond_tasse = virgola_in_num(risul_query($arrotond_tasse, 0, 'valpersonalizza'), $stile_soldi);
                 echo ucfirst(mex("valore a cui arrotondare le percentuali delle tasse", "personalizza.php")) . ":\n <input type=\"text\" name=\"nuovo_arrotond_tasse\" size=\"4\" value=\"{$arrotond_tasse}\">\n<input class=\"sbutton\" type=\"submit\" value=\"" . mex("Cambia", "personalizza.php") . "\">\n</div></form><br>";
             }
             # fine if ($modifica_pers != "NO")
             echo "<hr style=\"width: 95%\">";
         }
         # fine if ($priv_mod_tariffe != "n" and $lista_opt_tariffe)
         if ($priv_vedi_tab_periodi != "n") {
             echo "<div style=\"text-align: center;\"><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">\n<input class=\"sbutton\" type=\"submit\" name=\"visualizza\" value=\"" . mex("Vedi i prezzi già inseriti", $pag) . "\">\n</div></form><br>";
         }
         # fine if ($priv_vedi_tab_periodi != "n")
         echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"indietro\" value=\"" . mex("Torna al menù principale", $pag) . "\">\n</div></form></div><br>";
     }
     # fine if ($mostra_form_iniziale != "NO")
 }
 # fine else if (($modificacaparra or $modificacommissioni or $modificacommper or $modificatasse) and $priv_mod_tariffe != "n")
 if ($aggiorna_tariffe_interconn == "SI") {
     $lock = 1;
     $aggiorna_disp = 0;
     $aggiorna_tar = 1;
     if (@function_exists('pcntl_fork')) {
         include "./includes/interconnect/aggiorna_ic_fork.php";
     } else {
         include "./includes/interconnect/aggiorna_ic.php";
     }
 }
 # fine if ($aggiorna_tariffe_interconn == "SI")

function mostra_dati_cliente(&$dati_cliente, &$dcognome, &$dnome, &$dsoprannome, &$dtitolo_cli, &$dsesso, &$ddatanascita, &$ddatanascita_f, &$dnazionenascita, &$dcittanascita, &$dregionenascita, &$ddocumento, &$dscadenzadoc, &$dscadenzadoc_f, &$dtipodoc, &$dnazionedoc, &$dregionedoc, &$dcittadoc, &$dnazionalita, &$dlingua_cli, &$dnazione, &$dregione, &$dcitta, &$dvia, &$dnumcivico, &$dtelefono, &$dtelefono2, &$dtelefono3, &$dfax, &$dcap, &$demail, &$dcod_fiscale, &$dpartita_iva, $mostra_num = "", $priv_ins_clienti = "", $silenzio = "")
{
    global $pag, $id_utente, $PHPR_TAB_PRE;
    if ($id_utente == 1 or !$id_utente) {
        $priv_vedi_telefoni = "s";
        $priv_vedi_indirizzo = "s";
    } else {
        if (!$priv_ins_clienti) {
            $privilegi_globali_utente = esegui_query("select * from {$PHPR_TAB_PRE}" . "privilegi where idutente = '{$id_utente}' and anno = '1'");
            $priv_ins_clienti = risul_query($privilegi_globali_utente, 0, 'priv_ins_clienti');
        }
        # fine if (!$priv_ins_clienti)
        $priv_vedi_telefoni = substr($priv_ins_clienti, 3, 1);
        $priv_vedi_indirizzo = substr($priv_ins_clienti, 4, 1);
    }
    # fine else if ($id_utente == 1 or !$id_utente)
    $didclienti = risul_query($dati_cliente, 0, 'idclienti');
    $dcognome = risul_query($dati_cliente, 0, 'cognome');
    $dnome = risul_query($dati_cliente, 0, 'nome');
    $dsoprannome = risul_query($dati_cliente, 0, 'soprannome');
    $dtitolo_cli = risul_query($dati_cliente, 0, 'titolo');
    $dsesso = risul_query($dati_cliente, 0, 'sesso');
    $ddatanascita = risul_query($dati_cliente, 0, 'datanascita');
    $ddatanascita_f = formatta_data($ddatanascita, $stile_data);
    $ddocumento = risul_query($dati_cliente, 0, 'documento');
    $dtipodoc = risul_query($dati_cliente, 0, 'tipodoc');
    $dscadenzadoc = risul_query($dati_cliente, 0, 'scadenzadoc');
    $dscadenzadoc_f = formatta_data($dscadenzadoc, $stile_data);
    $dcittadoc = risul_query($dati_cliente, 0, 'cittadoc');
    $dregionedoc = risul_query($dati_cliente, 0, 'regionedoc');
    $dnazionedoc = risul_query($dati_cliente, 0, 'nazionedoc');
    $dcittanascita = risul_query($dati_cliente, 0, 'cittanascita');
    $dregionenascita = risul_query($dati_cliente, 0, 'regionenascita');
    $dnazionenascita = risul_query($dati_cliente, 0, 'nazionenascita');
    $dnazionalita = risul_query($dati_cliente, 0, 'nazionalita');
    $dlingua_cli = risul_query($dati_cliente, 0, 'lingua');
    $dnazione = risul_query($dati_cliente, 0, 'nazione');
    $dregione = risul_query($dati_cliente, 0, 'regione');
    $dcitta = risul_query($dati_cliente, 0, 'citta');
    if ($priv_vedi_indirizzo == "s") {
        $dvia = risul_query($dati_cliente, 0, 'via');
        $dnumcivico = risul_query($dati_cliente, 0, 'numcivico');
        $dcap = risul_query($dati_cliente, 0, 'cap');
    }
    # fine if ($priv_vedi_indirizzo == "s")
    if ($priv_vedi_telefoni == "s") {
        $dtelefono = risul_query($dati_cliente, 0, 'telefono');
        $dtelefono2 = risul_query($dati_cliente, 0, 'telefono2');
        $dtelefono3 = risul_query($dati_cliente, 0, 'telefono3');
        $dfax = risul_query($dati_cliente, 0, 'fax');
        $demail = risul_query($dati_cliente, 0, 'email');
    }
    # fine if ($priv_vedi_telefoni == "s")
    $dcod_fiscale = risul_query($dati_cliente, 0, 'cod_fiscale');
    $dpartita_iva = risul_query($dati_cliente, 0, 'partita_iva');
    if ($dlingua_cli) {
        if ($dlingua_cli == "ita") {
            $d_nome_lingua = "Italiano";
        } elseif (preg_replace("/[a-z]{2,3}/", "", $dlingua_cli) == "") {
            if (@is_file("./includes/lang/{$dlingua_cli}/l_n")) {
                $d_nome_lingua = file("./includes/lang/{$dlingua_cli}/l_n");
                $d_nome_lingua = ucfirst(togli_acapo($d_nome_lingua[0]));
            }
            # fine if (@is_file("./includes/lang/$dlingua_cli/l_n"))
        }
        # fine elseif (preg_replace("/[a-z]{2,3}/","",$dlingua_cli) == "")
        if (!$d_nome_lingua) {
            $dlingua_cli = "";
        }
    }
    # fine if ($dlingua_cli)
    $output = "";
    $O = "o";
    $O2 = "o";
    if ($dsesso == "f") {
        $O = "a";
    }
    if ($dsesso2 == "f") {
        $O2 = "a";
    }
    if ($mostra_num == "SI") {
        $output .= "{$didclienti}. <em>{$dcognome}</em> ";
        if ($dnome) {
            $output .= "<em>{$dnome}</em> ";
        }
    } else {
        if ($dtitolo_cli) {
            $output .= "{$dtitolo_cli} ";
        }
        $output .= "<b>{$dcognome}</b>";
        if ($dnome) {
            $output .= " {$dnome}";
        }
        if ($dsoprannome) {
            $output .= " ({$dsoprannome})";
        }
    }
    # fine else if ($mostra_num == "SI")
    if ($ddatanascita or $dcittanascita) {
        $output .= " " . mex("nat{$O}", $pag);
//.........这里部分代码省略.........

<a style=\"color: #666666;\" href=\"./inizio.php?$sessione_anno_var\"><b>".mex("MENU","head.php")."</b></a>";
if ($priv_ins_nuove_prenota == "s" or $priv_ins_spese == "s" or $priv_ins_entrate == "s" or $inserimento_nuovi_clienti != "NO" or ($modifica_clienti != "NO" and $vedi_clienti != "NO")) {
echo "&nbsp;|&nbsp;<b>".mex("INSERIRE","head.php").":</b>";
if ($priv_ins_nuove_prenota == "s") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./prenota.php?$sessione_anno_var\"><b>".mex("PRENOTAZIONE","head.php")."</b></a>";
if ($inserimento_nuovi_clienti != "NO" or ($modifica_clienti != "NO" and $vedi_clienti != "NO")) echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./clienti.php?$sessione_anno_var\"><b>".mex("CLIENTE","head.php")."</b></a>";
if ($priv_ins_spese == "s" or $priv_ins_entrate == "s") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./costi.php?$sessione_anno_var\"><b>".mex("SPESE","head.php")."</b></a>";
} # fine if ($priv_ins_nuove_prenota == "s" or...
if ($priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n" or $vedi_clienti != "NO" or $priv_vedi_tab_costi != "n" or $priv_vedi_tab_periodi != "n" or $priv_vedi_tab_appartamenti != "n") {
echo "&nbsp;|&nbsp;<b>".mex("TABELLE","head.php").":</b>";
if ($priv_vedi_tab_mesi != "n") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./tabella.php?$sessione_anno_var&amp;mese=$mese_attuale\"><b>".mex("$MESE_ATT","head.php")."</b></a>";
if ($priv_vedi_tab_prenotazioni != "n") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&amp;tipo_tabella=prenotazioni\"><b>".mex("PRENOTAZIONI","head.php")."</b></a>";
if ($vedi_clienti != "NO") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&amp;tipo_tabella=clienti\"><b>".mex("CLIENTI","head.php")."</b></a>";
if ($priv_vedi_tab_costi != "n") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&amp;tipo_tabella=costi\"><b>".mex("SPESE","head.php")."</b></a>";
if ($priv_vedi_tab_periodi != "n") echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&amp;tipo_tabella=periodi\"><b>".mex("TARIFFE","head.php")."</b></a>";
if ($priv_vedi_tab_appartamenti != "n") {
$fr_APPARTAMENTI = mex("APPARTAMENTI","unit.php");
if (strlen($fr_APPARTAMENTI) > 11) $fr_APPARTAMENTI = substr($fr_APPARTAMENTI,0,6).".";
echo "&nbsp;&nbsp;<a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&amp;tipo_tabella=appartamenti\"><b>$fr_APPARTAMENTI</b></a>";
} # fine if ($priv_vedi_tab_appartamenti != "n")
} # fine if ($priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n" or...
echo "</td>";

if ($idprenota_origine) $anno = $anno - 1;

if ($mostra_X == "SI") {
if (@is_array($_POST)) reset($_POST);
for($num1 = 0 ; $num1 < count($_POST); $num1++) {
$lista_var_X .= "&amp;".key($_POST)."=".$_POST[key($_POST)];
next($_POST);
} # fine for $num1
if (@is_array($_GET)) reset($_GET);

function mostra_form_relutenti ($rel_sing,$rel_plur,$nome_sing,$nome_plur,$e,$a,$le,$tablerel,$id_utente,$id_utente_mod,$id_utente_sel,$option_select_utenti_importa_contratti,$anno,$id_sessione,$pag,$tablerelutenti,$rel_sup_sing="",$rel_sup_plur="",$tablerel_sup="",$frase_nella_sup="") {
echo "<div style=\"line-height: 150%;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"./personalizza.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"id_utente_mod\" value=\"$id_utente_mod\">
<input type=\"hidden\" name=\"aggiorna_qualcosa\" value=\"SI\">";

if ($rel_sup_sing) {
$rel_sup_utente = esegui_query("select distinct $tablerel_sup.nome_$rel_sup_sing from $tablerelutenti inner join $tablerel_sup on $tablerelutenti.id$rel_sup_sing = $tablerel_sup.id$rel_sup_plur where $tablerelutenti.idutente = '$id_utente_sel' order by $tablerel_sup.nome_$rel_sup_sing");
$num_rel_sup_utente = numlin_query($rel_sup_utente);
for ($num1 = 0 ; $num1 < $num_rel_sup_utente ; $num1++) {
$rel_sup = htmlspecialchars(risul_query($rel_sup_utente,$num1,"nome_$rel_sup_sing",$tablerel_sup));
$opt_rel_sup .= "<option value=\"$rel_sup\">$rel_sup</option>";
} # fine for $num1
$rel_sup_esist = esegui_query("select id$rel_sing from $tablerelutenti where id$rel_sing is not NULL and idsup is not NULL and idutente = '$id_utente_sel' limit 1");
if (numlin_query($rel_sup_esist) > 0) {
$mostra_sup = "SI";
if ($opt_rel_sup) {
$mostra_linea_canc = "SI";
echo mex(ucfirst($nome_plur),$pag)." ".mex($frase_nella_sup,$pag)."
 <select id=\"$rel_sup_sing"."_$rel_sing\" onchange=\"ricarica_ifrm('dati_rel','$rel_sing"."_da_eliminare','$rel_sup_sing"."_$rel_sing','$rel_sing','$rel_sup_sing','$id_utente_sel')\">
<option value=\"\" selected>----</option>
$opt_rel_sup
</select>:
<b id=\"b_$rel_sing"."_da_eliminare\" style=\"font-weight: normal;\">";
$rel_utente = esegui_query("select distinct $tablerel.nome_$rel_sing,$tablerel.codice_$rel_sing,$tablerel.codice2_$rel_sing,$tablerel.codice3_$rel_sing from $tablerelutenti inner join $tablerel on $tablerelutenti.id$rel_sing = $tablerel.id$rel_plur where $tablerelutenti.idutente = '$id_utente_sel' and $tablerelutenti.idsup is NULL order by $tablerel.nome_$rel_sing");
$num_rel_utente = numlin_query($rel_utente);
if ($num_rel_utente) {
echo "<select name=\"$rel_sing"."_da_eliminare\" id=\"$rel_sing"."_da_eliminare\">";
for ($num1 = 0 ; $num1 < $num_rel_utente ; $num1++) {
$rel = htmlspecialchars(risul_query($rel_utente,$num1,"nome_$rel_sing",$tablerel));
$codice = htmlspecialchars(risul_query($rel_utente,$num1,"codice_$rel_sing",$tablerel));
$codice2 = htmlspecialchars(risul_query($rel_utente,$num1,"codice2_$rel_sing",$tablerel));
$codice3 = htmlspecialchars(risul_query($rel_utente,$num1,"codice3_$rel_sing",$tablerel));
echo "<option value=\"$rel\">$rel";
if (strcmp($codice,"")) echo " ($codice)";
if (strcmp($codice2,"")) echo " (".mex("2°",$pag)." $codice2)";
if (strcmp($codice3,"")) echo " (".mex("3°",$pag)." $codice3)";
echo "</option>";
} # fine for $num1
echo "</select>";
} # fine if ($num_rel_utente)
else echo "<input type=\"text\" name=\"$rel_sing"."_da_eliminare\" id=\"$rel_sing"."_da_eliminare\" size=\"20\" maxlength=\"50\">";
echo "</b>";
} # fine if ($opt_rel_sup)
} # fine if (numlin_query($rel_sup_esist) > 0)
} # fine if ($rel_sup_sing)

if ($mostra_sup != "SI") {
$rel_utente = esegui_query("select distinct $tablerel.nome_$rel_sing,$tablerel.codice_$rel_sing,$tablerel.codice2_$rel_sing,$tablerel.codice3_$rel_sing from $tablerelutenti inner join $tablerel on $tablerelutenti.id$rel_sing = $tablerel.id$rel_plur where $tablerelutenti.idutente = '$id_utente_sel' order by $tablerel.nome_$rel_sing");
$num_rel_utente = numlin_query($rel_utente);
if ($num_rel_utente) {
$mostra_linea_canc = "SI";
echo mex(ucfirst($nome_plur),$pag).":
 <select name=\"$rel_sing"."_da_eliminare\">";
for ($num1 = 0 ; $num1 < $num_rel_utente ; $num1++) {
$rel = htmlspecialchars(risul_query($rel_utente,$num1,"nome_$rel_sing",$tablerel));
$codice = htmlspecialchars(risul_query($rel_utente,$num1,"codice_$rel_sing",$tablerel));
$codice2 = htmlspecialchars(risul_query($rel_utente,$num1,"codice2_$rel_sing",$tablerel));
$codice3 = htmlspecialchars(risul_query($rel_utente,$num1,"codice3_$rel_sing",$tablerel));
echo "<option value=\"$rel\">$rel";
if (strcmp($codice,"")) echo " ($codice)";
if (strcmp($codice2,"")) echo " (".mex("2°",$pag)." $codice2)";
if (strcmp($codice3,"")) echo " (".mex("3°",$pag)." $codice3)";
echo "</option>";
} # fine for $num1
echo "</select>";
} # fine if ($num_rel_utente)
} # fine if ($mostra_sup != "SI")
if ($mostra_linea_canc == "SI") {
echo "<input class=\"sbutton\" type=\"submit\" name=\"elimina_$rel_sing\" value=\"".mex("elimina",$pag)."\">";
if ($mostra_sup != "SI") echo "&nbsp;&nbsp;&nbsp;<input class=\"sbutton\" type=\"submit\" name=\"elimina_tutte_$rel_plur\" value=\"".mex("Elimina tutt$e",$pag)."\">";
echo "<br>";
} # fine if ($mostra_linea_canc == "SI")

echo "<table cellspacing=0 cellpadding=0 style=\"margin: 4px 0 4px 0;\"><tr><td>
".mex("Nuov$a $nome_sing",$pag).": <input type=\"text\" name=\"nuova_$rel_sing\" size=\"20\" maxlength=\"50\"> (";
if ($opt_rel_sup) {
echo "".mex($frase_nella_sup,$pag)."
 <select name=\"sup_n_$rel_sing\">
<option value=\"\" selected>----</option>
$opt_rel_sup
</select>,<br>";
} # fine if ($opt_rel_sup)
echo mex("codice",$pag)." <input type=\"text\" name=\"cod_n_$rel_sing\" size=\"12\" maxlength=\"50\">,";
if (!$opt_rel_sup) echo "<br>";
else echo " ";
echo "".mex("2° codice",$pag)." <input type=\"text\" name=\"cod2_n_$rel_sing\" size=\"12\" maxlength=\"50\">,
 ".mex("3° codice",$pag)." <input type=\"text\" name=\"cod3_n_$rel_sing\" size=\"12\" maxlength=\"50\">)
</td><td style=\"width: 10px;\"></td><td valign=\"middle\">
<input class=\"sbutton\" type=\"submit\" name=\"aggiungi_$rel_sing\" value=\"".mex("aggiungi",$pag)."\">
</td></tr></table>";
if ($id_utente == 1 and $option_select_utenti_importa_contratti) {
echo "".mex("Importa $le $nome_plur",$pag)."
 ".mex("dell'utente",$pag)."
 <select name=\"utente_importa_$rel_plur\">
$option_select_utenti_importa_contratti
</select>
<input class=\"sbutton\" type=\"submit\" name=\"importa_$rel_plur\" value=\"".mex("Importa",$pag)."\">&nbsp;&nbsp;&nbsp;";
//.........这里部分代码省略.........

function crea_modello_disponibilita ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) {
global $num_periodi_date,$M_PHPR_DB_TYPE,$M_PHPR_DB_NAME,$M_PHPR_DB_HOST,$M_PHPR_DB_PORT,$M_PHPR_DB_USER,$M_PHPR_DB_PASS,$M_PHPR_LOAD_EXT,$M_PHPR_TAB_PRE,$estendi_ultima_data,$max_num_app_tipologia,$chiedi_num_app_tipologia,$parola_appartamenti,$parola_appartamento,$aggiungi_tipologie,$max_num_tipologie,$chiedi_num_persone,$max_num_persone,$costo_aggiungi_letti,$max_num_aggiungi_letti,$sett_no_prenota;
global $mostra_richiesta_via_mail,$mostra_costi_aggiuntivi,$num_colonne_costi_agg,$num_motivazioni,$mostra_quadro_disp,$mostra_numero_liberi_quadro_disponibilita,$allinea_disponibilita_con_arrivo,$m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$utente_lis,$aggiungi_costi_fissi,$assegna_con_regola2,$mostra_frase_alternativa_regola1,$mostra_caparra,$ind_email,$maschera_envelope,$manda_copia_richiesta_email;
global $colore_sfondo_quadro_disponibilita,$colore_inizio_settimana_quadro_disponibilita,$colore_libero_quadro_disponibilita,$colore_occupato_quadro_disponibilita,$apertura_font_quadro_disponibilita,$chiusura_font_quadro_disponibilita,$apertura_tag_font,$chiusura_tag_font,$apertura_tag_font_rosse,$chiusura_tag_font_rosse,$stile_tabella_prenotazione,$m_valuta_sing,$m_valuta_plur,$frase_alternativa_regola1;
global $cambia_frasi,$utente_mess,$orig_prenota,$num_metodi_pagamento,$num_campi_pers,$num_campi_doc_cond,$chiedi_cognome,$chiedi_nome,$chiedi_email,$chiedi_sesso,$chiedi_datanascita,$chiedi_documento,$chiedi_nazione,$chiedi_citta,$chiedi_regione,$chiedi_via,$chiedi_numcivico,$chiedi_cap,$chiedi_telefono,$chiedi_telefono2,$chiedi_telefono3,$chiedi_fax,$chiedi_commento,$chiedi_oracheckin,$chiedi_metodopagamento;
global $mostra_bottone_paypal,$nome_modello_paypal,$mostra_calendario_scelta_date,$stile_riquadro_calendario,$stile_tabella_calendario,$stile_bottoni_calendario,$stile_bottone_apertura_calendario,$spostamento_orizzontale_calendario,$colore_data_attiva_calendario,$colore_data_selezionata_calendario,$prima_parte_html,$ultima_parte_html,$mostra_giorni_pieni,$modello_esistente;
global $file_css_frame,$apri_nuova_finestra_da_frame,$altezza_finestra_da_frame,$larghezza_finestra_da_frame,$tema_modello;
$tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello;
$tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello;
$tableanni = $PHPR_TAB_PRE."anni";
$tableutenti = $PHPR_TAB_PRE."utenti";
$tablepersonalizza = $PHPR_TAB_PRE."personalizza";
$tablecontratti = $PHPR_TAB_PRE."contratti";

if (controlla_anno($anno_modello) != "SI") {
$continua = "NO";
$anno_modello = "";
} # fine if (controlla_anno($anno_modello) != "SI")
else {
$anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'");
if (numlin_query($anno_esistente) != 1) $continua = "NO";
} # fine else if (controlla_anno($anno_modello) != "SI")
if ($continua != "NO") {

if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO";

$date_in_menu = "";
$idfineperiodo_prec = -10;
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1};
$inizioperiodo = aggslashdb(${"inizioperiodo".$num1});
$fineperiodo = aggslashdb(${"fineperiodo".$num1});
$idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; }
else { $idinizioperiodo = risul_query($idinizioperiodo,0,'idperiodi'); }
$inizioperiodo = $idinizioperiodo;
if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) {
$idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello");
$idfineperiodo = risul_query($idfineperiodo,0,0);
} # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
else {
$idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) { $idfineperiodo = -1; }
else { $idfineperiodo = risul_query($idfineperiodo,0,'idperiodi'); }
} # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
$fineperiodo = $idfineperiodo;
${"inizioperiodo".$num1} = $inizioperiodo;
${"fineperiodo".$num1} = $fineperiodo;
if ($idfineperiodo < $idinizioperiodo) $continua = "NO";
if (($idfineperiodo_prec + 1) >= $idinizioperiodo) $continua = "NO";
$idfineperiodo_prec = $idfineperiodo;
${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1});
if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO";
} # fine for $num1
if ($continua == "NO") {
if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>";
} # fine if ($continua == "NO")
else {
$file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php");
$num_linee_file_intero = count($file_intero);
$pag_gm = "giorni_mesi.php";
$m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'");
$m_tipo_periodi = risul_query($m_tipo_periodi,0,0);
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
$inizioperiodo = ${"inizioperiodo".$num1};
$fineperiodo = ${"fineperiodo".$num1};
$num_intervallo = 1;
for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) {
if (substr($file_intero[$num2],0,7) == "<option") {
$data_option = substr($file_intero[$num2],16,10);
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' ");
$esiste_data_option = numlin_query($id_data_option);
if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,'idperiodi');
else {
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' ");
$id_data_option = risul_query($id_data_option,0,'idperiodi');
} # fine else if ($esiste_data_option == 1)
if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) {
if ($num_intervallo == 1) {
$giorno_option = substr($data_option,8,2);
$mese_option = substr($data_option,5,2);
$anno_option = substr($data_option,0,4);
$nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
$nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
if ($m_tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello);
if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello);
if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello);
if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello);
if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello);
if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello);
if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello);
} # fine if ($m_tipo_periodi == "g")
else $nome_giorno = "";
if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello);
if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello);
if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello);
//.........这里部分代码省略.........