<?php

##################################################################################
#    PHP-RESIDENCE
#    Copyright (C) 2001-2009 by Marco Maria Francesco De Santis (marco@digitaldruid.net)
#
#    This program is free software: you can redistribute it and/or modify
#    it under the terms of the GNU Affero General Public License as published by
#    the Free Software Foundation, either version 3 of the License, or
#    any later version accepted by Marco Maria Francesco De Santis, which
#    shall act as a proxy as defined in Section 14 of version 3 of the
#    license.
#
#    This program is distributed in the hope that it will be useful,
#    but WITHOUT ANY WARRANTY; without even the implied warranty of
#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#    GNU Affero General Public License for more details.
#
#    You should have received a copy of the GNU Affero General Public License
#    along with this program.  If not, see <http://www.gnu.org/licenses/>.
##################################################################################

$pag = "visualizza_tabelle.php";
$titolo = "Pagina di visualizzazione tabelle";

include("./dati/dati_connessione.php");
include("./includes/funzioni_$PHPR_DB_TYPE.php");
$numconnessione = connetti_db($PHPR_DB_NAME,$PHPR_DB_HOST,$PHPR_DB_PORT,$PHPR_DB_USER,$PHPR_DB_PASS,$PHPR_LOAD_EXT);
include("./includes/funzioni.php");
include("./includes/sett_gio.php");
include("./includes/funzioni_testo.php");
$tablenometariffe = $PHPR_TAB_PRE."ntariffe".$anno;
$tableprenota = $PHPR_TAB_PRE."prenota".$anno;
$tableperiodi = $PHPR_TAB_PRE."periodi".$anno;
$tableregole = $PHPR_TAB_PRE."regole".$anno;
$tablecosti = $PHPR_TAB_PRE."costi".$anno;
$tablesoldi = $PHPR_TAB_PRE."soldi".$anno;
$tableanni = $PHPR_TAB_PRE."anni";
$tablepersonalizza = $PHPR_TAB_PRE."personalizza";
$tableappartamenti = $PHPR_TAB_PRE."appartamenti";
$tableclienti = $PHPR_TAB_PRE."clienti";
$tableversioni = $PHPR_TAB_PRE."versioni";
$tableutenti = $PHPR_TAB_PRE."utenti";
$tableprivilegi = $PHPR_TAB_PRE."privilegi";
$tablecostiprenota = $PHPR_TAB_PRE."costiprenota".$anno;
$tablecontratti = $PHPR_TAB_PRE."contratti";
$tabledescrizioni = $PHPR_TAB_PRE."descrizioni";
$tablerclientiprenota = $PHPR_TAB_PRE."rclientiprenota".$anno;
$tableinterconnessioni  = $PHPR_TAB_PRE."interconnessioni";
$tablerelutenti = $PHPR_TAB_PRE."relutenti";
$tablerelgruppi = $PHPR_TAB_PRE."relgruppi";
$tablebeniinventario = $PHPR_TAB_PRE."beniinventario";
$tablerelinventario = $PHPR_TAB_PRE."relinventario";
$tablemagazzini = $PHPR_TAB_PRE."magazzini";
$tabletransazioni = $PHPR_TAB_PRE."transazioni";


$id_utente = controlla_login($numconnessione,$PHPR_TAB_PRE,$id_sessione,$nome_utente_phpr,$password_phpr,$anno);
if ($id_utente) {

if ($id_utente != 1) {
$privilegi_annuali_utente = esegui_query("select * from $tableprivilegi where idutente = '$id_utente' and anno = '$anno'");
if (numlin_query($privilegi_annuali_utente) == 0) $anno_utente_attivato = "NO";
else {
$anno_utente_attivato = "SI";
$privilegi_globali_utente = esegui_query("select * from $tableprivilegi where idutente = '$id_utente' and anno = '1'");
$priv_vedi_tab = risul_query($privilegi_annuali_utente,0,'priv_vedi_tab');
$priv_vedi_tab_prenotazioni = substr($priv_vedi_tab,1,1);
if ($priv_vedi_tab_prenotazioni == "g" or $priv_vedi_tab_prenotazioni == "s") $prendi_gruppi = "SI";
$priv_vedi_tab_costi = substr($priv_vedi_tab,2,1);
if ($priv_vedi_tab_costi == "g") $prendi_gruppi = "SI";
$priv_vedi_tab_periodi = substr($priv_vedi_tab,3,1);
if ($priv_vedi_tab_periodi == "g") $prendi_gruppi = "SI";
$priv_vedi_tab_regole = substr($priv_vedi_tab,4,1);
$priv_vedi_tab_appartamenti = substr($priv_vedi_tab,5,1);
if ($priv_vedi_tab_appartamenti == "g") $prendi_gruppi = "SI";
$priv_vedi_tab_stat = substr($priv_vedi_tab,6,1);
if ($priv_vedi_tab_stat != "s" and $priv_vedi_tab_stat != "n") $prendi_gruppi = "SI";
$priv_vedi_tab_doc = substr($priv_vedi_tab,7,1);
$priv_ins_clienti = risul_query($privilegi_globali_utente,0,'priv_ins_clienti');
$modifica_clienti = "NO";
if (substr($priv_ins_clienti,1,1) == "s") $modifica_clienti = "SI";
if (substr($priv_ins_clienti,1,1) == "p") $modifica_clienti = "PROPRI";
if (substr($priv_ins_clienti,1,1) == "g") { $modifica_clienti = "GRUPPI"; $prendi_gruppi = "SI"; }
$vedi_clienti = "NO";
if (substr($priv_ins_clienti,2,1) == "s") $vedi_clienti = "SI";
if (substr($priv_ins_clienti,2,1) == "p") $vedi_clienti = "PROPRI";
if (substr($priv_ins_clienti,2,1) == "g") { $vedi_clienti = "GRUPPI"; $prendi_gruppi = "SI"; }
$priv_inventario = risul_query($privilegi_globali_utente,0,'priv_inventario');
$priv_vedi_beni_inv = substr($priv_inventario,0,1);
$priv_ins_beni_inv = substr($priv_inventario,1,1);
$priv_vedi_inv_mag = substr($priv_inventario,2,1);
$priv_ins_mag = substr($priv_inventario,3,1);
$priv_vedi_inv_app = substr($priv_inventario,6,1);
$priv_ins_beni_in_app = substr($priv_inventario,7,1);
if ($priv_vedi_beni_inv == "g" or $priv_vedi_inv_mag == "g" or $priv_vedi_inv_app == "g" or $priv_ins_beni_in_app == "g") $prendi_gruppi = "SI";
$priv_ins_prenota = risul_query($privilegi_annuali_utente,0,'priv_ins_prenota');
$priv_ins_nuove_prenota = substr($priv_ins_prenota,0,1);
$priv_ins_assegnazione_app = substr($priv_ins_prenota,1,1);
$priv_mod_prenota = risul_query($privilegi_annuali_utente,0,'priv_mod_prenota');
$priv_mod_prenotazioni = substr($priv_mod_prenota,0,1);
if ($priv_mod_prenotazioni == "g") $prendi_gruppi = "SI";
$priv_mod_assegnazione_app = substr($priv_mod_prenota,2,1);
$priv_mod_pagato = substr($priv_mod_prenota,10,1);
$priv_mod_prenota_iniziate = substr($priv_mod_prenota,11,1);
$priv_mod_prenota_ore = substr($priv_mod_prenota,12,3);
$priv_ins_costi = risul_query($privilegi_annuali_utente,0,'priv_ins_costi');
$priv_ins_spese = substr($priv_ins_costi,0,1);
$priv_ins_entrate = substr($priv_ins_costi,1,1);
$regole1_consentite = risul_query($privilegi_annuali_utente,0,'regole1_consentite');
$attiva_regole1_consentite = substr($regole1_consentite,0,1);
$applica_regole1 = substr($regole1_consentite,1,1);
if ($attiva_regole1_consentite != "n" or $applica_regole1 == "n") $regole1_consentite = explode("#@^",substr($regole1_consentite,3));
$tariffe_consentite = risul_query($privilegi_annuali_utente,0,'tariffe_consentite');
$attiva_tariffe_consentite = substr($tariffe_consentite,0,1);
if ($attiva_tariffe_consentite == "s") {
$tariffe_consentite = explode(",",substr($tariffe_consentite,2));
unset($tariffe_consentite_vett);
for ($num1 = 0 ; $num1 < count($tariffe_consentite) ; $num1++) if ($tariffe_consentite[$num1]) $tariffe_consentite_vett[$tariffe_consentite[$num1]] = "SI";
} # fine if ($attiva_tariffe_consentite == "s")
$costi_agg_consentiti = risul_query($privilegi_annuali_utente,0,'costi_agg_consentiti');
$attiva_costi_agg_consentiti = substr($costi_agg_consentiti,0,1);
if ($attiva_costi_agg_consentiti == "s") {
$costi_agg_consentiti = explode(",",substr($costi_agg_consentiti,2));
unset($costi_agg_consentiti_vett);
for ($num1 = 0 ; $num1 < count($costi_agg_consentiti) ; $num1++) if ($costi_agg_consentiti[$num1]) $costi_agg_consentiti_vett[$costi_agg_consentiti[$num1]] = "SI";
} # fine if ($attiva_costi_agg_consentiti == "s")
$contratti_consentiti = risul_query($privilegi_annuali_utente,0,'contratti_consentiti');
$attiva_contratti_consentiti = substr($contratti_consentiti,0,1);
if ($attiva_contratti_consentiti == "s") {
$contratti_consentiti = explode(",",substr($contratti_consentiti,2));
unset($contratti_consentiti_vett);
for ($num1 = 0 ; $num1 < count($contratti_consentiti) ; $num1++) if ($contratti_consentiti[$num1]) $contratti_consentiti_vett[$contratti_consentiti[$num1]] = "SI";
} # fine if ($attiva_contratti_consentiti == "s")
$priv_ins_tariffe = risul_query($privilegi_annuali_utente,0,'priv_ins_tariffe');
$priv_mod_tariffe = substr($priv_ins_tariffe,0,1);
$priv_ins_costi_agg = substr($priv_ins_tariffe,1,1);
$priv_mod_costi_agg = substr($priv_ins_tariffe,2,1);
$priv_canc_costi_agg = substr($priv_ins_tariffe,3,1);
} # fine else if (numlin_query($privilegi_annuali_utente) == 0)

unset($attiva_regole1_consentite_gr);
unset($regole1_consentite_gr);
unset($attiva_tariffe_consentite_gr);
unset($tariffe_consentite_vett_gr);
unset($priv_ins_nuove_prenota_gr);
unset($priv_ins_assegnazione_app_gr);
unset($priv_mod_prenotazioni_gr);
unset($priv_mod_assegnazione_app_gr);
unset($attiva_costi_agg_consentiti_gr);
unset($costi_agg_consentiti_vett_gr);
$priv_app_gruppi = "NO";
if ($priv_vedi_tab_appartamenti == "g" or $priv_vedi_inv_app == "g" or $priv_ins_beni_in_app == "g" or $priv_vedi_tab_stat == "r" or $priv_vedi_tab_stat == "g" or $priv_vedi_tab_periodi == "g") $priv_app_gruppi = "SI";
if ($priv_app_gruppi == "SI") {
$attiva_regole1_consentite_gr[$id_utente] = $attiva_regole1_consentite;
$regole1_consentite_gr[$id_utente] = $regole1_consentite;
$attiva_tariffe_consentite_gr[$id_utente] = $attiva_tariffe_consentite;
$tariffe_consentite_vett_gr[$id_utente] = $tariffe_consentite_vett;
$priv_ins_nuove_prenota_gr[$id_utente] = $priv_ins_nuove_prenota;
$priv_ins_assegnazione_app_gr[$id_utente] = $priv_ins_assegnazione_app;
$priv_mod_prenotazioni_gr[$id_utente] = $priv_mod_prenotazioni;
$priv_mod_assegnazione_app_gr[$id_utente] = $priv_mod_assegnazione_app;
} # fine if ($priv_app_gruppi == "SI")
unset($utenti_gruppi);
$utenti_gruppi[$id_utente] = 1;
if ($prendi_gruppi == "SI") {
$attiva_costi_agg_consentiti_gr = $attiva_costi_agg_consentiti;
$costi_agg_consentiti_vett_gr = $costi_agg_consentiti_vett;
$gruppi_utente = esegui_query("select idgruppo from $tablerelgruppi where idutente = '$id_utente' and idgruppo is not NULL ");
$num_gruppi_utente = numlin_query($gruppi_utente);
for ($num1 = 0 ; $num1 < $num_gruppi_utente ; $num1++) {
$idgruppo = risul_query($gruppi_utente,$num1,'idgruppo');
$utenti_gruppo = esegui_query("select idutente from $tablerelgruppi where idgruppo = '$idgruppo' ");
$num_utenti_gruppo = numlin_query($utenti_gruppo);
for ($num2 = 0 ; $num2 < $num_utenti_gruppo ; $num2++) {
$idutente_gruppo = risul_query($utenti_gruppo,$num2,'idutente');
if ($idutente_gruppo != $id_utente and !$utenti_gruppi[$idutente_gruppo]) {
$utenti_gruppi[$idutente_gruppo] = 1;
unset($priv_anno_ut_gr);

if ($priv_app_gruppi == "SI") {
$priv_anno_ut_gr = esegui_query("select * from $tableprivilegi where idutente = '$idutente_gruppo' and anno = '$anno'");
if (numlin_query($priv_anno_ut_gr) == 1) {
$regole1_consentite_gr[$idutente_gruppo] = risul_query($priv_anno_ut_gr,0,'regole1_consentite');
$attiva_regole1_consentite_gr[$idutente_gruppo] = substr($regole1_consentite_gr[$idutente_gruppo],0,1);
if ($attiva_regole1_consentite_gr[$idutente_gruppo] != "n") $regole1_consentite_gr[$idutente_gruppo] = explode("#@^",substr($regole1_consentite_gr[$idutente_gruppo],3));
$tariffe_consentite_tmp = risul_query($priv_anno_ut_gr,0,'tariffe_consentite');
$attiva_tariffe_consentite_gr[$idutente_gruppo] = substr($tariffe_consentite_tmp,0,1);
if ($attiva_tariffe_consentite_gr[$idutente_gruppo] == "s") {
$tariffe_consentite_tmp = explode(",",substr($tariffe_consentite_tmp,2));
$tariffe_consentite_vett_gr[$idutente_gruppo] = "";
for ($num1 = 0 ; $num1 < count($tariffe_consentite_tmp) ; $num1++) if ($tariffe_consentite_tmp[$num1]) $tariffe_consentite_vett_gr[$idutente_gruppo][$tariffe_consentite_tmp[$num1]] = "SI";
} # fine if ($attiva_tariffe_consentite_gr[$idutente_gruppo] == "s")
$priv_ins_prenota_tmp = risul_query($priv_anno_ut_gr,0,'priv_ins_prenota');
$priv_ins_nuove_prenota_gr[$idutente_gruppo] = substr($priv_ins_prenota_tmp,0,1);
$priv_ins_assegnazione_app_gr[$idutente_gruppo] = substr($priv_ins_prenota_tmp,1,1);
$priv_mod_prenota_tmp = risul_query($priv_anno_ut_gr,0,'priv_mod_prenota');
$priv_mod_prenotazioni_gr[$idutente_gruppo] = substr($priv_mod_prenota_tmp,0,1);
$priv_mod_assegnazione_app_gr[$idutente_gruppo] = substr($priv_mod_prenota_tmp,2,1);
} # fine if (numlin_query($priv_anno_ut_gr) == 1)
else {
$priv_ins_nuove_prenota_gr[$idutente_gruppo] = "n";
$priv_mod_prenotazioni_gr[$idutente_gruppo] = "n";
} # fine else if (numlin_query($priv_anno_ut_gr) == 1)
} # fine if ($priv_app_gruppi == "SI")

if ($priv_vedi_tab_periodi == "g") {
if (!$priv_anno_ut_gr) $priv_anno_ut_gr = esegui_query("select * from $tableprivilegi where idutente = '$idutente_gruppo' and anno = '$anno'");
if (numlin_query($priv_anno_ut_gr) == 1) {
$costi_agg_consentiti_tmp = risul_query($priv_anno_ut_gr,0,'costi_agg_consentiti');
$attiva_costi_agg_consentiti_tmp = substr($costi_agg_consentiti_tmp,0,1);
if ($attiva_costi_agg_consentiti_tmp == "n") $attiva_costi_agg_consentiti_gr = "n";
if ($attiva_costi_agg_consentiti_gr == "s") {
$costi_agg_consentiti_tmp = explode(",",substr($costi_agg_consentiti_tmp,2));
for ($num3 = 0 ; $num3 < count($costi_agg_consentiti_tmp) ; $num3++) if ($costi_agg_consentiti_tmp[$num3]) $costi_agg_consentiti_vett_gr[$costi_agg_consentiti_tmp[$num3]] = "SI";
} # fine if ($attiva_costi_agg_consentiti_gr == "s")
} # fine if (numlin_query($priv_anno_ut_gr) == 1)
} # fine if ($priv_vedi_tab_periodi == "g")

} # fine if ($idutente_gruppo != $id_utente)
} # fine for $num2
} # fine for $num1
} # fine if ($prendi_gruppi == "SI")


} # fine if ($id_utente != 1)
else {
$anno_utente_attivato = "SI";
$priv_vedi_tab_prenotazioni = "s";
$priv_vedi_tab_costi = "s";
$priv_vedi_tab_periodi = "s";
$priv_vedi_tab_regole = "s";
$priv_vedi_tab_appartamenti = "s";
$priv_vedi_tab_doc = "s";
$priv_vedi_tab_stat = "s";
$modifica_clienti = "SI";
$vedi_clienti = "SI";
$priv_vedi_beni_inv = "s";
$priv_ins_beni_inv = "s";
$priv_vedi_inv_mag = "s";
$priv_ins_mag = "s";
$priv_vedi_inv_app = "s";
$priv_ins_beni_in_app = "s";
$priv_ins_nuove_prenota = "s";
$priv_ins_assegnazione_app = "s";
$priv_mod_prenotazioni = "s";
$priv_mod_assegnazione_app = "s";
$priv_mod_pagato = "s";
$priv_mod_prenota_iniziate = "s";
$priv_mod_prenota_ore = "000";
$priv_ins_spese = "s";
$priv_ins_entrate = "s";
$attiva_regole1_consentite = "n";
$attiva_tariffe_consentite = "n";
$attiva_costi_agg_consentiti = "n";
$attiva_contratti_consentiti = "n";
$priv_mod_tariffe = "s";
$priv_ins_costi_agg = "s";
$priv_mod_costi_agg = "s";
$priv_canc_costi_agg = "s";
} # fine else if ($id_utente != 1)
if ($anno_utente_attivato == "SI") {

if (@is_file("./dati/dati_subordinazione.php")) {
$installazione_subordinata = "SI";
$modifica_clienti = "NO";
$priv_ins_beni_inv = "n";
$priv_ins_mag = "n";
$priv_ins_beni_in_app = "n";
$priv_mod_assegnazione_app = "n";
$priv_mod_pagato = "n";
$priv_ins_spese = "n";
$priv_ins_entrate = "n";
$priv_mod_tariffe = "n";
$priv_ins_costi_agg = "n";
$priv_mod_costi_agg = "n";
$priv_canc_costi_agg = "n";
} # fine if (@is_file("./dati/dati_subordinazione.php"))


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


$Euro = nome_valuta();
$stile_soldi = stile_soldi();
$stile_data = stile_data();


if ($tipo_tabella == "prenotazioni" and $priv_vedi_tab_prenotazioni != "n") {

if (defined("C_MASSIMO_NUM_STORIA_SOLDI") and C_MASSIMO_NUM_STORIA_SOLDI != 0) {
$num_soldi_esistenti = esegui_query("select idsoldi from $tablesoldi");
$num_soldi_esistenti = numlin_query($num_soldi_esistenti);
if ($num_soldi_esistenti >= (C_MASSIMO_NUM_STORIA_SOLDI + 1)) $priv_mod_pagato = "n";
} # fine if (defined("C_MASSIMO_NUM_STORIA_SOLDI") and C_MASSIMO_NUM_STORIA_SOLDI != 0)

if ($ordine_prenota != "iddatafine" and $ordine_prenota != "idprenota" and $ordine_prenota != "origine" and $ordine_prenota != "tariffa" and $ordine_prenota != "datainserimento" and $ordine_prenota != "idappartamenti") $ordine_prenota = "iddatainizio";
if ($ordine_prenota != "idprenota") $ordine_prenota .= ", idprenota";
if ($priv_mod_prenota_iniziate != "s") $id_periodo_corrente = calcola_id_periodo_corrente($anno);

if ($cambia_pagato) {

if ($continua != "SI") {
$mostra_tab_principale = "NO";
$metodi_pagamento_int = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'metodi_pagamento' and idutente = '$id_utente'");
$metodi_pagamento_int = risul_query($metodi_pagamento_int,0,'valpersonalizza');
$metodi_pagamento = explode(",",$metodi_pagamento_int);
echo mex("Verranno effettuati i seguenti cambiamenti",$pag).": <br>
<br><form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>";
$differenza_tot = 0;
if (controlla_num_pos($num_cambia_pren) == "NO") $num_cambia_pren = 0;
for ($num1 = 1 ; $num1 <= $num_cambia_pren ; $num1++) {
$numero = ${"cambia".$num1};
if ($numero and controlla_num_pos($numero) != "NO") {
$prenotazione = esegui_query("select idprenota,idclienti,iddatainizio,caparra,pagato,tariffa_tot,conferma,metodo_pagamento,utente_inserimento,datainserimento from $tableprenota where idprenota = '$numero' ");
if (numlin_query($prenotazione) == 1) {
$continua = "SI";
if ($priv_mod_prenotazioni == "n") $continua = "NO";
if ($priv_mod_prenotazioni == "p" or $priv_mod_prenotazioni == "g") {
$utente_inserimento = risul_query($prenotazione,0,'utente_inserimento');
if ($priv_mod_prenotazioni == "p" and $utente_inserimento != $id_utente) $continua = "NO";
if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $continua = "NO";
} # fine if ($priv_mod_prenotazioni == "p" or $priv_mod_prenotazioni == "g")
if ($priv_mod_prenota_iniziate != "s") {
$id_inizio_prenota = risul_query($prenotazione,0,'iddatainizio');
if ($id_periodo_corrente >= $id_inizio_prenota) $continua = "NO";
} # fine if ($priv_mod_prenota_iniziate != "s")
if ($priv_mod_prenota_ore != "000") {
$adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600)));
$data_ins = risul_query($prenotazione,0,'datainserimento');
$limite = date("YmdHis",mktime((substr($data_ins,11,2) + $priv_mod_prenota_ore),substr($data_ins,14,2),substr($data_ins,17,2),substr($data_ins,5,2),substr($data_ins,8,2),substr($data_ins,0,4)));
if ($adesso > $limite) $continua = "NO";
} # fine if ($priv_mod_prenota_ore != "000")
if ($continua == "SI") {
$id_clienti = risul_query($prenotazione,0,'idclienti');
$cognome = esegui_query("select cognome,utente_inserimento from $tableclienti where idclienti = '$id_clienti' ");
$mostra_cliente = "SI";
if ($vedi_clienti == "NO") $mostra_cliente = "NO";
if ($vedi_clienti == "PROPRI" or $vedi_clienti == "GRUPPI") {
$utente_inserimento = risul_query($cognome,0,'utente_inserimento');
if ($vedi_clienti == "PROPRI" and $utente_inserimento != $id_utente) $mostra_cliente = "NO";
if ($vedi_clienti == "GRUPPI" and !$utenti_gruppi[$utente_inserimento]) $mostra_cliente = "NO";
} # fine if ($vedi_clienti == "PROPRI" or...
if ($mostra_cliente == "NO") $cognome = mex("cliente",$pag)." $id_clienti";
else $cognome = risul_query($cognome,0,'cognome');
$caparra = risul_query($prenotazione,0,'caparra');
if (!$caparra) $caparra = 0;
$caparra_p = punti_in_num($caparra,$stile_soldi);
$met_paga_caparra = risul_query($prenotazione,0,'metodo_pagamento');
$pagato = risul_query($prenotazione,0,'pagato');
if (!$pagato) $pagato = 0;
$pagato_p = punti_in_num($pagato,$stile_soldi);
$costo_tot = risul_query($prenotazione,0,'tariffa_tot');
if (!$costo_tot) $costo_tot = 0;
$costo_tot_p = punti_in_num($costo_tot,$stile_soldi);
if ($somma_pagata == "tutto") $pagato_dopo = $costo_tot;
if ($somma_pagata == "caparra") $pagato_dopo = $caparra;
if ($somma_pagata == "niente") $pagato_dopo = 0;
$pagato_dopo_p = punti_in_num($pagato_dopo,$stile_soldi);
$differenza = $pagato_dopo - $pagato;
$differenza_p = punti_in_num($differenza,$stile_soldi);
if (substr($differenza_p,0,1) != "-") $differenza_p = "+".$differenza_p;
$differenza_tot = $differenza_tot + $differenza;
if ($somma_pagata != "conferma") {
echo mex("I soldi pagati per la prenotazione",$pag)." <i>$numero</i> ".mex("a nome di",$pag)." <b><i>$cognome</i></b> ".mex("verranno cambiati da",$pag)." <b>$pagato_p</b>
 ".mex("a",$pag)." <b>$pagato_dopo_p</b> $Euro ($differenza_p).";
if ($metodi_pagamento_int and $differenza != 0) {
echo " ".mex("Metodo pagamento",$pag).":
 <select name=\"metodo_pagamento$numero\">
<option value=\"\">----</option>";
for ($num2 = 0 ; $num2 < count($metodi_pagamento) ; $num2++) {
if ($met_paga_caparra == $metodi_pagamento[$num2] and $caparra > $pagato) $sel = " selected";
else $sel = "";
echo "<option value=\"".$metodi_pagamento[$num2]."\"$sel>".$metodi_pagamento[$num2]."</option>";
} # fine for $num2
echo "</select>.";
} # fine if ($metodi_pagamento_int and $differenza != 0)
echo "<br><table cellspacing=0 cellpadding=0><tr><td style=\"height: 4px;\"></td></tr></table>";
} # fine if ($somma_pagata != "conferma")
else echo mex("La prenotazione",$pag)." <i>$numero</i> ".mex("a nome di",$pag)." <b><i>$cognome</i></b> ".mex("verrà confermata",$pag).".<br>";
$nascosti_in_form .= "<input type=\"hidden\" name=\"d_id_clienti$numero\" value=\"$id_clienti\">
<input type=\"hidden\" name=\"d_costo_tot$numero\" value=\"$costo_tot\">
<input type=\"hidden\" name=\"d_caparra$numero\" value=\"$caparra\">
<input type=\"hidden\" name=\"d_pagato$numero\" value=\"$pagato\">
<input type=\"hidden\" name=\"d_confermato$numero\" value=\"$confermato\">
<input type=\"hidden\" name=\"d_pagato_dopo$numero\" value=\"$pagato_dopo\">";
$numeri_cambia .= "#".$numero;
} # fine if ($continua == "SI")
} # fine if (numlin_query($prenotazione) == 1)
} # fine if ($numero and controlla_num_pos($numero) != "NO")
} # fine for $num1
$differenza_tot_p = punti_in_num($differenza_tot,$stile_soldi);
echo "<br>".mex("Saldo totale",$pag).": <b>$differenza_tot_p</b> $Euro<br>";
if ($numeri_cambia) {
$numeri_cambia = substr($numeri_cambia,1);
echo "<br>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"cambia_pagato\" value=\"$cambia_pagato\">
<input type=\"hidden\" name=\"senza_colori\" value=\"$senza_colori\">
<input type=\"hidden\" name=\"id_utente_vedi\" value=\"$id_utente_vedi\">
<input type=\"hidden\" name=\"pag_pren_corr\" value=\"$pag_pren_corr\">
<input type=\"hidden\" name=\"pag_pren_succ\" value=\"$pag_pren_succ\">
<input type=\"hidden\" name=\"pag_pren_prec\" value=\"$pag_pren_prec\">
<input type=\"hidden\" name=\"cerca_prenota\" value=\"$cerca_prenota\">
<input type=\"hidden\" name=\"opz_cerc_pren\" value=\"$opz_cerc_pren\">
<input type=\"hidden\" name=\"somma_pagata\" value=\"$somma_pagata\">
<input type=\"hidden\" name=\"continua\" value=\"SI\">
$nascosti_in_form
<input type=\"hidden\" name=\"numeri_cambia\" value=\"$numeri_cambia\">
<input class=\"sbutton\" type=\"submit\" name=\"cont_op\" value=\"".mex("Continua",$pag)."\">
</div></form><table cellspacing=0 cellpadding=0><tr><td style=\"height: 1px;\"></td></tr></table>
<hr style=\"width: 350px; margin-left: 0; text-align: left;\"><br><br>";
} # fine if ($numeri_cambia)
else echo "</div></form>";
} # fine if ($continua != "SI")

else {
$tabelle_lock = array($tableprenota,$tablesoldi);
$altre_tab_lock = array($tablepersonalizza);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$metodi_pagamento = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'metodi_pagamento' and idutente = '$id_utente'");
$metodi_pagamento = risul_query($metodi_pagamento,0,'valpersonalizza');
$metodi_pagamento = explode(",",$metodi_pagamento);
unset($met_paga_perm);
for ($num1 = 0 ; $num1 < count($metodi_pagamento) ; $num1++) $met_paga_perm[$metodi_pagamento[$num1]] = "SI";
$numeri_cambia = explode("#",$numeri_cambia);
for ($num1 = 0 ; $num1 < count($numeri_cambia) ; $num1++) {
$numero = $numeri_cambia[$num1];
$numero = aggslashdb($numero);
$prenotazione = esegui_query("select idprenota,idclienti,iddatainizio,caparra,pagato,tariffa_tot,conferma,utente_inserimento,datainserimento from $tableprenota where idprenota = '$numero'");
if (numlin_query($prenotazione) == 1) {
$utente_inserimento = risul_query($prenotazione,0,'utente_inserimento');
if ($priv_vedi_tab_prenotazioni == "p" and $utente_inserimento != $id_utente) $modifica = "NO";
if ($priv_vedi_tab_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $modifica = "NO";
if ($priv_mod_prenotazioni == "n") $modifica = "NO";
if ($priv_mod_prenotazioni == "p" and $utente_inserimento != $id_utente) $modifica = "NO";
if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $modifica = "NO";
if ($priv_mod_prenota_iniziate != "s") {
if (numlin_query($prenotazione) == 1) $id_inizio_prenota = risul_query($prenotazione,0,'iddatainizio');
else $id_inizio_prenota = -2;
if ($id_periodo_corrente >= $id_inizio_prenota) $modifica = "NO";
} # fine if ($priv_mod_prenota_iniziate != "s")
if ($priv_mod_prenota_ore != "000") {
$adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600)));
$data_ins = risul_query($prenotazione,0,'datainserimento');
$limite = date("YmdHis",mktime((substr($data_ins,11,2) + $priv_mod_prenota_ore),substr($data_ins,14,2),substr($data_ins,17,2),substr($data_ins,5,2),substr($data_ins,8,2),substr($data_ins,0,4)));
if ($adesso > $limite) $modifica = "NO";
} # fine if ($priv_mod_prenota_ore != "000")
$id_clienti = risul_query($prenotazione,0,'idclienti');
$caparra = risul_query($prenotazione,0,'caparra');
if (!$caparra) $caparra = 0;
$pagato = risul_query($prenotazione,0,'pagato');
if (!$pagato) $pagato = 0;
$costo_tot = risul_query($prenotazione,0,'tariffa_tot');
if (!$costo_tot) $costo_tot = 0;
$d_id_clienti = "d_id_clienti".$numero;
if ($$d_id_clienti != $id_clienti) $modifica = "NO";
$d_costo_tot = "d_costo_tot".$numero;
if ($$d_costo_tot != $costo_tot) $modifica = "NO";
$d_caparra = "d_caparra".$numero;
if ($$d_caparra != $caparra) $modifica = "NO";
$d_pagato = "d_pagato".$numero;
if ($$d_pagato != $pagato) $modifica = "NO";
$d_pagato_dopo = "d_pagato_dopo".$numero;
if ($$d_pagato_dopo > $costo_tot) $modifica = "NO";
if ($d_pagato_dopo and controlla_soldi($$d_pagato_dopo,"SI") == "NO") $modifica = "NO";
if ($priv_mod_pagato != "s" and $$d_pagato_dopo != $pagato) $modifica = "NO";
if ($somma_pagata == "conferma" and $priv_mod_pagato == "n") $modifica = "NO";
} # fine if (numlin_query($prenotazione) == 1)
else $modifica = "NO";
if ($modifica == "NO") break;
} # fine for $num1

if ($modifica != "NO") {
for ($num1 = 0 ; $num1 < count($numeri_cambia) ; $num1++) {
$numero = $numeri_cambia[$num1];
$prenotazione = esegui_query("select idprenota,idclienti,caparra,pagato,tariffa_tot,conferma,iddatainizio,iddatafine from $tableprenota where idprenota = '$numero'");
if ($somma_pagata != "conferma") {
$pagato = risul_query($prenotazione,0,'pagato');
if (!$pagato) $pagato = 0;
$d_pagato_dopo = "d_pagato_dopo".$numero;
if ($$d_pagato_dopo != $pagato) {
esegui_query("update $tableprenota set pagato = '".$$d_pagato_dopo."' where idprenota = '$numero' ");
$confermato = risul_query($prenotazione,0,'conferma');
$confermato = substr($confermato[$num1],0,1);
if ($$d_pagato_dopo > 0 and $confermato != "S") esegui_query("update $tableprenota set conferma = 'S' where idprenota = '$numero' ");
$datainserimento_saldo = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600)));
$motivazione_saldo = risul_query($prenotazione,0,'idclienti');
$d_idinizioprenota = risul_query($prenotazione,0,'iddatainizio');
$d_idfineprenota = risul_query($prenotazione,0,'iddatafine');
$motivazione_saldo .= ";$d_idinizioprenota";
$motivazione_saldo .= ";$d_idfineprenota";
$motivazione_saldo .= ";$numero";
$saldo = $$d_pagato_dopo - $pagato;
if (get_magic_quotes_gpc()) ${"metodo_pagamento".$numero} = stripslashes(${"metodo_pagamento".$numero});
${"metodo_pagamento".$numero} = htmlspecialchars(${"metodo_pagamento".$numero});
if ($met_paga_perm[${"metodo_pagamento".$numero}] == "SI") $metodo_pagamento = aggslashdb(${"metodo_pagamento".$numero});
else $metodo_pagamento = "";
$idsoldi = esegui_query("select max(idsoldi) from $tablesoldi");
$idsoldi = risul_query($idsoldi,0,0) + 1;
esegui_query("insert into $tablesoldi (idsoldi,motivazione,saldo_prenota,soldi_prima,metodo_pagamento,data_inserimento,utente_inserimento) values ('$idsoldi','$motivazione_saldo','$saldo','$pagato','$metodo_pagamento','$datainserimento_saldo','$id_utente')");
} # fine if ($d_pagato_dopo != $pagato)
} # fine if ($somma_pagata != "conferma")
else esegui_query("update $tableprenota set conferma = 'S' where idprenota = '$numero' ");
} # fine for $num1
} # fine if ($modifica != "NO")
else {
$mostra_tab_principale = "NO";
echo mex("Le prenotazioni <b>non sono state modificate</b> perchè sono cambiate nel frattempo",$pag).".<br>";
} # fine else if ($modifica != "NO")
unlock_tabelle($tabelle_lock);
} # fine else if ($continua != "SI")


if ($mostra_tab_principale == "NO") {
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"senza_colori\" value=\"$senza_colori\">
<input type=\"hidden\" name=\"pag_pren_corr\" value=\"$pag_pren_corr\">
<input type=\"hidden\" name=\"pag_pren_succ\" value=\"$pag_pren_succ\">
<input type=\"hidden\" name=\"pag_pren_prec\" value=\"$pag_pren_prec\">
<input type=\"hidden\" name=\"cerca_prenota\" value=\"$cerca_prenota\">
<input type=\"hidden\" name=\"opz_cerc_pren\" value=\"$opz_cerc_pren\">
<input type=\"hidden\" name=\"id_utente_vedi\" value=\"$id_utente_vedi\">
<input class=\"sbutton\" type=\"submit\" name=\"torna_alla_tab\" value=\"".mex("Annulla",$pag)."\">
</div></form>";
} # fine if ($mostra_tab_principale == "NO")
} # fine if ($cambia_pagato)



if ($mostra_tab_principale != "NO") {

include("./includes/funzioni_tariffe.php");
include("./includes/funzioni_costi_agg.php");

if ($torna_indietro) {
$transaz_esistente = esegui_query("select * from $tabletransazioni where idsessione = '$id_sessione' and tipo_transazione = 'tab_p' ");
if (numlin_query($transaz_esistente)) {
$pag_pren_corr = risul_query($transaz_esistente,0,'dati_transazione1');
$pag_pren_succ = risul_query($transaz_esistente,0,'dati_transazione2');
$pag_pren_prec = risul_query($transaz_esistente,0,'dati_transazione3');
$ordine_prenota = risul_query($transaz_esistente,0,'dati_transazione4');
$mos_tut_dat = risul_query($transaz_esistente,0,'dati_transazione5');
$cerca_prenota = risul_query($transaz_esistente,0,'dati_transazione6');
$opz_cerc_pren = risul_query($transaz_esistente,0,'dati_transazione7');
$cerca_ini = risul_query($transaz_esistente,0,'dati_transazione8');
$cerca_fine = risul_query($transaz_esistente,0,'dati_transazione9');
$id_utente_vedi = risul_query($transaz_esistente,0,'dati_transazione10');
$senza_colori = risul_query($transaz_esistente,0,'dati_transazione11');
$lista_prenota = risul_query($transaz_esistente,0,'dati_transazione12');
} # fine if (numlin_query($transaz_esistente))
} # fine if ($torna_indietro)

if ($subtotale_selezionate) {
$lista_prenota = "";
for ($num1 = 1 ; $num1 <= $num_cambia_pren ; $num1++) if (${"cambia".$num1}) $lista_prenota .= ${"cambia".$num1}.",";
$lista_prenota = substr($lista_prenota,0,-1);
} # fine if ($subtotale_selezionate)
elseif ($lista_prenota) {
$subtotale_selezionate = 1;
$lista_prenota_vett = explode(",",$lista_prenota);
$num_cambia_pren = count($lista_prenota_vett);
for ($num1 = 1 ; $num1 <= $num_cambia_pren ; $num1++) ${"cambia".$num1} = $lista_prenota_vett[($num1 - 1)];
} # fine elseif ($lista_prenota)

if (!$id_utente_vedi) $id_utente_vedi = $id_utente;
if ($priv_vedi_tab_prenotazioni != "s" and $priv_vedi_tab_prenotazioni != "g") $id_utente_vedi = $id_utente;
if ($id_utente != 1 and !$utenti_gruppi[$id_utente_vedi]) $id_utente_vedi = $id_utente;
$utenti_gruppi_orig = $utenti_gruppi;
$priv_vedi_tab_prenotazioni_orig = $priv_vedi_tab_prenotazioni;
if ($id_utente != $id_utente_vedi) {
$privilegi_annuali_utente_vedi = esegui_query("select * from $tableprivilegi where idutente = '$id_utente_vedi' and anno = '$anno'");
if (numlin_query($privilegi_annuali_utente_vedi) != 0) {
$priv_vedi_tab_utente_vedi = risul_query($privilegi_annuali_utente_vedi,0,'priv_vedi_tab');
$priv_vedi_tab_prenotazioni = substr($priv_vedi_tab_utente_vedi,1,1);
if ($priv_vedi_tab_prenotazioni == "g") {
unset($utenti_gruppi);
$utenti_gruppi[$id_utente_vedi] = 1;
$gruppi_utente = esegui_query("select idgruppo from $tablerelgruppi where idutente = '$id_utente_vedi' and idgruppo is not NULL ");
$num_gruppi_utente = numlin_query($gruppi_utente);
for ($num1 = 0 ; $num1 < $num_gruppi_utente ; $num1++) {
$idgruppo = risul_query($gruppi_utente,$num1,'idgruppo');
$utenti_gruppo = esegui_query("select idutente from $tablerelgruppi where idgruppo = '$idgruppo' ");
$num_utenti_gruppo = numlin_query($utenti_gruppo);
for ($num2 = 0 ; $num2 < $num_utenti_gruppo ; $num2++) $utenti_gruppi[risul_query($utenti_gruppo,$num2,'idutente')] = 1;
} # fine for $num1
} # fine if ($priv_vedi_tab_prenotazioni == "g")
} # fine if (numlin_query($privilegi_annuali_utente_vedi) != 0)
} # fine if ($id_utente != $id_utente_vedi)

if (!$cerca_prenota) {
if (!$sel_tab_prenota) {
$sel_tab_prenota = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'selezione_tab_tutte_prenota' and idutente = '$id_utente'");
$sel_tab_prenota = risul_query($sel_tab_prenota,0,'valpersonalizza');
} # fine if (!$sel_tab_prenota)
if ($sel_tab_prenota == "correnti" or $sel_tab_prenota == "future") {
$oggi = date("Y-m-d",(time() + (C_DIFF_ORE * 3600)));
$oggi = esegui_query("select datainizio,datafine from $tableperiodi where datainizio <= '$oggi' and datafine > '$oggi' ");
if (numlin_query($oggi) != 0) {
$oggi_ini = risul_query($oggi,0,'datainizio');
$oggi_fine = risul_query($oggi,0,'datafine');
include("./dati/selperiodimenu$anno.$id_utente.php");
$num_periodi_date = count($d_increment);
if ($num_periodi_date > 1 or $d_increment[0] > 1) {
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
for ($num2 = 0 ; $num2 < $n_dates_menu[$num1] ; $num2++) {
$data_corr = date("Y-m-d",mktime(0,0,0,($m_ini_menu[$num1] + 1),($d_ini_menu[$num1] + ($num2 * $d_increment[$num1])),$y_ini_menu[$num1]));
if ($cerca_ini and (int) str_replace("-","",$data_corr) >= (int) str_replace("-","",$oggi_fine)) $cerca_fine = $data_prec;
if (!$cerca_ini and $data_prec and (int) str_replace("-","",$data_corr) >= (int) str_replace("-","",$oggi_ini)) $cerca_ini = $data_prec;
if ($cerca_ini and $cerca_fine) break;
$data_prec = $data_corr;
} # fine for $num2
if ($cerca_ini and $cerca_fine) break;
} # fine for $num1
} # fine if ($num_periodi_date > 1 or $d_increment[0] > 1)
else {
$cerca_ini = $oggi_ini;
$cerca_fine = $oggi_fine;
} # fine if ($num_periodi_date > 1 or $d_increment[0] > 1)
if ($sel_tab_prenota == "correnti" and $cerca_ini and $cerca_fine) $cerca_prenota = "SI";
if ($sel_tab_prenota == "future") {
$cerca_fine = "";
if ($cerca_ini) $cerca_prenota = "SI";
} # fine if ($sel_tab_prenota == "future")
} # fine if (numlin_query($date_select) != 0)
} # fine if ($sel_tab_prenota == "correnti" or...
} # fine if (!$cerca_prenota)

if ($show_bar != "NO") {
if (!$cerca_prenota or $cerca_prenota == "tutte") {
echo "<table class=\"buttonbar\"><tr><td align=\"left\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"senza_colori\" value=\"$senza_colori\">
<input type=\"hidden\" name=\"ordine_prenota\" value=\"$ordine_prenota\">
<input type=\"hidden\" name=\"mos_tut_dat\" value=\"$mos_tut_dat\">
<input type=\"hidden\" name=\"cerca_prenota\" value=\"SI\">
<input type=\"hidden\" name=\"id_utente_vedi\" value=\"$id_utente_vedi\">
<select name=\"opz_cerc_pren\">
<option value=\"\">".mex("Tutte le prenotazioni",$pag)."</option>
<option value=\"arr\">".mex("Solo arrivi",$pag)."</option>
<option value=\"part\">".mex("Solo partenze",$pag)."</option>
</select> ".mex("dal",$pag)." ";
$oggi = date("Y-m-d",(time() + (C_DIFF_ORE * 3600)));
$date_select = esegui_query("select datainizio,datafine from $tableperiodi where datainizio <= '$oggi' and datafine > '$oggi' ");
if (numlin_query($date_select) != 0) {
$inizio_select = risul_query($date_select,0,'datainizio');
$fine_select = risul_query($date_select,0,'datafine');
} # fine if (numlin_query($date_select) != 0)
mostra_menu_date("./dati/selperiodimenu$anno.$id_utente.php","cerca_ini",$inizio_select,"","",$id_utente,$tema);
echo " ".mex("al",$pag)." ";
mostra_menu_date("./dati/selperiodimenu$anno.$id_utente.php","cerca_fine",$fine_select,1,"",$id_utente,$tema);
echo " <input class=\"sbutton\" type=\"submit\" value=\"".mex("Vedi",$pag)."\">
</div></form></td>";
} # fine if (!$cerca_prenota or $cerca_prenota == "tutte")
else {
echo "<table class=\"buttonbar\"><tr><td align=\"left\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"senza_colori\" value=\"$senza_colori\">
<input type=\"hidden\" name=\"ordine_prenota\" value=\"$ordine_prenota\">
<input type=\"hidden\" name=\"mos_tut_dat\" value=\"$mos_tut_dat\">
<input type=\"hidden\" name=\"cerca_prenota\" value=\"tutte\">
<input type=\"hidden\" name=\"id_utente_vedi\" value=\"$id_utente_vedi\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Vedi tutte le prenotazioni",$pag)."\">
</div></form></td>";
} # fine else if (!$cerca_prenota or $cerca_prenota == "tutte")
if ($priv_vedi_tab_prenotazioni_orig == "s" or $priv_vedi_tab_prenotazioni_orig == "g") {
$tutti_utenti = esegui_query("select * from $tableutenti order by idutenti");
$option_select = "";
for ($num1 = 0 ; $num1 < numlin_query($tutti_utenti) ; $num1++) {
$idutenti = risul_query($tutti_utenti,$num1,'idutenti');
$nome_utente = risul_query($tutti_utenti,$num1,'nome_utente');
if ($id_utente_vedi != $idutenti and ($id_utente == 1 or $utenti_gruppi_orig[$idutenti])) $option_select .= "<option value=\"$idutenti\">$nome_utente</option>";
if ($id_utente_vedi == $idutenti) $nome_utente_vedi = $nome_utente;
} # fine for $num1
if ($option_select) {
echo "<td align=\"left\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div class=\"wsnowrap\">
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pag_pren_corr\" value=\"$pag_pren_corr\">
<input type=\"hidden\" name=\"pag_pren_succ\" value=\"$pag_pren_succ\">
<input type=\"hidden\" name=\"pag_pren_prec\" value=\"$pag_pren_prec\">
<input type=\"hidden\" name=\"ordine_prenota\" value=\"$ordine_prenota\">
<input type=\"hidden\" name=\"senza_colori\" value=\"$senza_colori\">
<input type=\"hidden\" name=\"mos_tut_dat\" value=\"$mos_tut_dat\">
<input type=\"hidden\" name=\"cerca_prenota\" value=\"$cerca_prenota\">
<input type=\"hidden\" name=\"opz_cerc_pren\" value=\"$opz_cerc_pren\">
<input type=\"hidden\" name=\"cerca_ini\" value=\"$cerca_ini\">
<input type=\"hidden\" name=\"cerca_fine\" value=\"$cerca_fine\">
<input type=\"hidden\" name=\"lista_prenota\" value=\"$lista_prenota\">
".mex("Profilo",$pag)."
<select name=\"id_utente_vedi\">
<option value=\"$id_utente_vedi\" selected>$nome_utente_vedi</option>
$option_select
</select>
<input class=\"sbutton\" type=\"submit\" name=\"cambia_ut_vedi\" value=\"".mex("Vedi",$pag)."\">
</div></form></td>";
} # fine if ($option_select)
$id_utente_vedi_passa = "&amp;id_utente_vedi=$id_utente_vedi";
} # fine if ($priv_vedi_tab_prenotazioni_orig == "s" or $priv_vedi_tab_prenotazioni_orig == "g")
else unset($id_utente_vedi_passa);
echo "<td align=\"right\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pag_pren_corr\" value=\"$pag_pren_corr\">
<input type=\"hidden\" name=\"pag_pren_succ\" value=\"$pag_pren_succ\">
<input type=\"hidden\" name=\"pag_pren_prec\" value=\"$pag_pren_prec\">
<input type=\"hidden\" name=\"ordine_prenota\" value=\"$ordine_prenota\">
<input type=\"hidden\" name=\"mos_tut_dat\" value=\"$mos_tut_dat\">
<input type=\"hidden\" name=\"cerca_prenota\" value=\"$cerca_prenota\">
<input type=\"hidden\" name=\"opz_cerc_pren\" value=\"$opz_cerc_pren\">
<input type=\"hidden\" name=\"cerca_ini\" value=\"$cerca_ini\">
<input type=\"hidden\" name=\"cerca_fine\" value=\"$cerca_fine\">
<input type=\"hidden\" name=\"id_utente_vedi\" value=\"$id_utente_vedi\">
<input type=\"hidden\" name=\"lista_prenota\" value=\"$lista_prenota\">";
if (!$senza_colori) {
echo "<input type=\"hidden\" name=\"senza_colori\" value=\"SI\">
<input class=\"sbutton\" type=\"submit\" name=\"cambi_colori\" value=\"".mex("Senza colori",$pag)."\">";
} # fine if (!$senza_colori)
else echo "<input class=\"sbutton\" type=\"submit\" name=\"cambi_colori\" value=\"".mex("Con colori",$pag)."\">";
echo "</div></form></td></tr></table>";
} # fine if ($show_bar != "NO")


$tabelle_lock = array($tableversioni,$tabletransazioni);
$tabelle_lock = lock_tabelle($tabelle_lock);
$ultimo_accesso = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600)));
$transaz_esistente = esegui_query("select idtransazioni from $tabletransazioni where idsessione = '$id_sessione' and tipo_transazione = 'tab_p' ");
if (numlin_query($transaz_esistente)) {
$transaz_esistente = risul_query($transaz_esistente,0,'idtransazioni');
esegui_query("update $tabletransazioni set dati_transazione1 = '".aggslashdb($pag_pren_corr)."', dati_transazione2 = '".aggslashdb($pag_pren_succ)."', dati_transazione3 = '".aggslashdb($pag_pren_prec)."', dati_transazione4 = '".aggslashdb($ordine_prenota)."', dati_transazione5 = '".aggslashdb($mos_tut_dat)."', dati_transazione6 = '".aggslashdb($cerca_prenota)."', dati_transazione7 = '".aggslashdb($opz_cerc_pren)."', dati_transazione8 = '".aggslashdb($cerca_ini)."', dati_transazione9 = '".aggslashdb($cerca_fine)."', dati_transazione10 = '".aggslashdb($id_utente_vedi)."', dati_transazione11 = '".aggslashdb($senza_colori)."', dati_transazione12 = '".aggslashdb($lista_prenota)."', ultimo_accesso = '$ultimo_accesso' where idtransazioni = '$transaz_esistente' ");
} # fine if (numlin_query($transaz_esistente))
else {
$adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600)));
list($usec, $sec) = explode(' ', microtime());
mt_srand((float) $sec + ((float) $usec * 100000));
$val_casuale = mt_rand(100000,999999);
$versione_transazione = prendi_numero_versione($tableversioni);
$id_transazione = $adesso.$val_casuale.$versione_transazione;
esegui_query("insert into $tabletransazioni (idtransazioni,idsessione,tipo_transazione,anno,dati_transazione1,dati_transazione2,dati_transazione3,dati_transazione4,dati_transazione5,dati_transazione6,dati_transazione7,dati_transazione8,dati_transazione9,dati_transazione10,dati_transazione11,dati_transazione12,ultimo_accesso) 
values ('$id_transazione','$id_sessione','tab_p','$anno','".aggslashdb($pag_pren_corr)."','".aggslashdb($pag_pren_succ)."','".aggslashdb($pag_pren_prec)."','".aggslashdb($ordine_prenota)."','".aggslashdb($mos_tut_dat)."','".aggslashdb($cerca_prenota)."','".aggslashdb($opz_cerc_pren)."','".aggslashdb($cerca_ini)."','".aggslashdb($cerca_fine)."','".aggslashdb($id_utente_vedi)."','".aggslashdb($senza_colori)."','".aggslashdb($lista_prenota)."','$ultimo_accesso')");
} # fine else if (numlin_query($transaz_esistente))
unlock_tabelle($tabelle_lock);


$tabelle_lock = "";
$altre_tab_lock = array($tableprenota,$tableperiodi,$tableappartamenti,$tablecontratti,$tablepersonalizza,$tableutenti);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);

$prendi_app = 0;
$prendi_doc = 0;
$attiva_checkin = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'attiva_checkin' and idutente = '$id_utente_vedi'");
$attiva_checkin = risul_query($attiva_checkin,0,'valpersonalizza');
$col_tab_tutte_prenota = esegui_query("select * from $tablepersonalizza where idpersonalizza = 'col_tab_tutte_prenota' and idutente = '$id_utente_vedi'");
$col_tab_tutte_prenota = risul_query($col_tab_tutte_prenota,0,'valpersonalizza');
$colonne_selezionate = explode("#@&",$col_tab_tutte_prenota);
$num_colonne_selezionate = count($colonne_selezionate);
$num_ca_tab = 0;
$num_gr_tab = 0;
unset($colonna_numero);
unset($colonna_cognome);
unset($colonna_ospite);
unset($colonna_inizio);
unset($colonna_fine);
unset($colonna_settimane);
unset($colonna_tariffacompleta);
unset($colonna_caparra);
unset($colonna_commissioni);
unset($colonna_restocomm);
unset($colonna_pagato);
unset($colonna_dapagare);
unset($colonna_nometariffa);
unset($colonna_appartamento);
unset($colonna_piano);
unset($colonna_casa);
unset($colonna_persone);
unset($colonna_commento);
unset($colonna_origine_prenota);
unset($colonna_docsalvati);
unset($colonna_datainserimento);
unset($colonna_utenteinserimento);
unset($colonne_necessarie);
for ($num1 = 0 ; $num1 < $num_colonne_selezionate ; $num1++) {
$colonna_selezionata = explode("#?&",$colonne_selezionate[$num1]);
if ($colonna_selezionata[0] == "nu") $colonna_numero = "SI";
if ($colonna_selezionata[0] == "cg") $colonna_cognome = "SI";
if ($colonna_selezionata[0] == "os") $colonna_ospite = "SI";
if ($colonna_selezionata[0] == "in") $colonna_inizio = "SI";
if ($colonna_selezionata[0] == "fi") $colonna_fine = "SI";
if ($colonna_selezionata[0] == "oe") $colonna_orarioentrata = "SI";
if ($colonna_selezionata[0] == "ns") $colonna_settimane = "SI";
if ($colonna_selezionata[0] == "tc") $colonna_tariffacompleta = "SI";
if ($colonna_selezionata[0] == "ca") $colonna_caparra = "SI";
if ($colonna_selezionata[0] == "cm") $colonna_commissioni = "SI";
if ($colonna_selezionata[0] == "rc") $colonna_restocomm = "SI";
if ($colonna_selezionata[0] == "pa") $colonna_pagato = "SI";
if ($colonna_selezionata[0] == "dp") $colonna_dapagare = "SI";
if ($colonna_selezionata[0] == "nt") $colonna_nometariffa = "SI";
if ($colonna_selezionata[0] == "ap") $colonna_appartamento = "SI";
if ($colonna_selezionata[0] == "pi") { $colonna_piano = "SI"; $prendi_app = 1; }
if ($colonna_selezionata[0] == "ka") { $colonna_casa = "SI"; $prendi_app = 1; }
if ($colonna_selezionata[0] == "pe") $colonna_persone = "SI";
if ($colonna_selezionata[0] == "co") $colonna_commento = "SI";
if ($colonna_selezionata[0] == "or") $colonna_origine_prenota = "SI";
if ($colonna_selezionata[0] == "ds") { $colonna_docsalvati = "SI"; $prendi_doc = 1; }
if ($colonna_selezionata[0] == "di") $colonna_datainserimento = "SI";
if ($colonna_selezionata[0] == "ui") $colonna_utenteinserimento = "SI";
if ($colonna_selezionata[0] == "cu" or $colonna_selezionata[0] == "cs") {
$tipo_ca_tab[$num_ca_tab] = $colonna_selezionata[0];
$nome_ca_tab[$num_ca_tab] = $colonna_selezionata[1];
$soprannome_ca_tab[$num_ca_tab] = $colonna_selezionata[2];
if ($colonna_selezionata[3] == "nec") $colonne_necessarie['ca'][$num_ca_tab] = "SI";
$num_ca_tab++;
} # fine if ($colonna_selezionata[0] == "cu" or $colonna_selezionata[0] == "cs")
if ($colonna_selezionata[0] == "gr") {
$nome_gr_tab[$num_gr_tab] = $colonna_selezionata[1];
$separatore_gr_tab[$num_gr_tab] = $colonna_selezionata[2];
$num_ca_col_gr[$num_gr_tab] = 0;
for ($num2 = 3 ; $num2 < count($colonna_selezionata)  ; $num2++) {
$dati_col_gr = explode("#%&",$colonna_selezionata[$num2]);
if ($dati_col_gr[0] == "ns") $col_gr_settimane[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "ca") $col_gr_caparra[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "cm") $col_gr_commissioni[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "rc") $col_gr_restocomm[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "pa") $col_gr_pagato[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "dp") $col_gr_dapagare[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "nt") $col_gr_nometariffa[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "ap") $col_gr_appartamento[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "pi") { $col_gr_piano[$num_gr_tab] = "SI"; $prendi_app = 1; }
if ($dati_col_gr[0] == "ka") { $col_gr_casa[$num_gr_tab] = "SI"; $prendi_app = 1; }
if ($dati_col_gr[0] == "pe") $col_gr_persone[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "co") $col_gr_commento[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "or") $col_gr_origine_prenota[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "ds") { $col_gr_docsalvati[$num_gr_tab] = "SI"; $prendi_doc = 1; }
if ($dati_col_gr[0] == "di") $col_gr_datainserimento[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "ui") $col_gr_utenteinserimento[$num_gr_tab] = "SI";
if ($dati_col_gr[0] == "cu" or $dati_col_gr[0] == "cs") {
$tipo_ca_col_gr[$num_gr_tab][$num_ca_col_gr[$num_gr_tab]] = $dati_col_gr[0];
$nome_ca_col_gr[$num_gr_tab][$num_ca_col_gr[$num_gr_tab]] = $dati_col_gr[1];
$num_ca_col_gr[$num_gr_tab]++;
} # fine if ($dati_col_gr[0] == "cu" or $dati_col_gr[0] == "cs")
} # fine for $num2
if ($colonna_selezionata[(count($colonna_selezionata) - 1)] == "nec") $colonne_necessarie['gr'][$num_gr_tab] = "SI";
$num_gr_tab++;
} # fine if ($colonna_selezionata[0] == "gr")
} # fine for $num1

$rig_tab_tutte_prenota = esegui_query("select * from $tablepersonalizza where idpersonalizza = 'rig_tab_tutte_prenota' and idutente = '$id_utente_vedi'");
$rig_tab_tutte_prenota = risul_query($rig_tab_tutte_prenota,0,'valpersonalizza');
$righe_selezionate = explode("#@&",$rig_tab_tutte_prenota);
$num_righe_selezionate = count($righe_selezionate);
unset($riga_totale);
unset($riga_tasse);
unset($riga_cassa);
unset($riga_prenotacanc);
for ($num1 = 0 ; $num1 < $num_righe_selezionate ; $num1++) {
if ($righe_selezionate[$num1] == "to") $riga_totale = "SI";
if ($righe_selezionate[$num1] == "ta") $riga_tasse = "SI";
if ($righe_selezionate[$num1] == "ca") $riga_cassa = "SI";
if ($righe_selezionate[$num1] == "pc") $riga_prenotacanc = "SI";
} # fine for $num1

if ($prendi_app) {
unset($piano_app);
unset($casa_app);
$dati_app = esegui_query("select * from $tableappartamenti");
$num_dati_app = numlin_query($dati_app);
for ($num1 = 0 ; $num1 < $num_dati_app ; $num1++) {
$idapp = risul_query($dati_app,$num1,'idappartamenti');
$piano_app[$idapp] = risul_query($dati_app,$num1,'numpiano');
$casa_app[$idapp] = risul_query($dati_app,$num1,'numcasa');
} # fine for $num1
} # fine if ($prendi_app)

if ($prendi_doc) {
include("./includes/funzioni_contratti.php");
unset($contratti_prenota);
unset($contratti_visti);
unset($dir_salva);
$nomi_contratti = trova_nomi_contratti($max_contr,$id_utente,$tablecontratti,$tablepersonalizza,$LIKE,$pag);
$contr_salva = esegui_query("select * from $tablecontratti where tipo = 'dir'");
$num_contr_salva = numlin_query($contr_salva);
for ($num_c = 0 ; $num_c < $num_contr_salva ; $num_c++) {
$num_contr = risul_query($contr_salva,$num_c,'numero');
$nome_contr = $nomi_contratti['salv'][$num_contr];
$dir_salva[$num_contr] = formatta_dir_salva_doc(risul_query($contr_salva,$num_c,'testo'));
if ($dir_salva[$num_contr] and ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI")) {
if (!$contratti_visti[$dir_salva."/".$nome_contr]) {
$contratti_visti[$dir_salva."/".$nome_contr] = 1;
$contr_dir = opendir($dir_salva[$num_contr]."/");
while ($contr_corr = readdir($contr_dir)) {
if ($contr_corr != "." and $contr_corr != ".." and is_file($dir_salva[$num_contr]."/".$contr_corr)) {
if (substr($contr_corr,0,strlen($nome_contr)) == $nome_contr) {
$suff_file_corr = "";
if (substr($contr_corr,-4) == ".rtf") $suff_file_corr = "rtf";
if (substr($contr_corr,-5) == ".html") $suff_file_corr = "html";
if (substr($contr_corr,-4) == ".txt") $suff_file_corr = "txt";
if ($suff_file_corr) {
$resto_nome_contr = substr($contr_corr,strlen($nome_contr));
if (substr($resto_nome_contr,0,1) != "_" or substr($resto_nome_contr,5,1) != "_") $anno_doc = "";
else $anno_doc = substr($resto_nome_contr,1,4);
if ($anno_doc == $anno or ($anno_doc == $anno_corrente and !@is_file("./dati/selectperiodi$anno_corrente.1.php"))) {
if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}(_[0-9]+(-[0-9]+)?)*\.$suff_file_corr/","",$resto_nome_contr) == "") {
$n_contr_corr = substr($resto_nome_contr,6,5);
$num_pren_esist = substr($resto_nome_contr,12);
$num_pren_esist = substr($num_pren_esist,0,(-1 * (strlen($suff_file_corr) + 1)));
if ($num_pren_esist) {
$num_pren_esist = explode("_",$num_pren_esist);
for ($num1 = 0 ; $num1 < count($num_pren_esist) ; $num1++) {
$num_pren_esist2 = explode("-",$num_pren_esist[$num1]);
$fine_for = $num_pren_esist2[(count($num_pren_esist2) - 1)];
for ($num2 = $num_pren_esist2[0] ; $num2 <= $fine_for ; $num2++) $contratti_prenota[$num2][$num_contr][$n_contr_corr] = $contr_corr;
} # fine for $num1
} # fine if ($num_pren_esist)
} # fine if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}\.$suff_file_corr/","",$resto_nome_contr) == "")
} # fine if (substr($resto_nome_contr,0,6) == $anno or...
} # fine if ($suff_file_corr)
} # fine if (substr($contr_corr,0,strlen($nome_contr)) == $nome_contr)
} # fine if ($contr_corr != "." and $contr_corr != ".." and...
} # fine while ($fattura_corr = readdir($fatture_dir))
closedir($contr_dir);
} # fine if (!$contratti_visti[$dir_salva."/".$nome_contr])
} # fine if ($dir_salva[$num_contr] and...
} # fine for $num_c 
} # fine if ($prendi_doc)

if ($priv_vedi_tab_prenotazioni == "p" or $priv_vedi_tab_prenotazioni == "g") {
$condizione_prenota_proprie = "and ( utente_inserimento = '$id_utente_vedi'";
if ($priv_vedi_tab_prenotazioni == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente_vedi) $condizione_prenota_proprie .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_tab_prenotazioni == "g")
$condizione_prenota_proprie .= " )";
} # fine if ($priv_vedi_tab_prenotazioni == "p" or $priv_vedi_tab_prenotazioni == "g")
else $condizione_prenota_proprie = "";

$anno_succ = $anno + 1;
$periodi_anno = esegui_query("select idperiodi from $tableperiodi where datainizio < '".$anno_succ."-01-01' order by idperiodi");
$num_periodi_anno = numlin_query($periodi_anno) - 1;
$ultimo_periodo = risul_query($periodi_anno,$num_periodi_anno,'idperiodi');
$prenotazioni = esegui_query("select * from $tableprenota where iddatainizio <= $ultimo_periodo and iddatainizio >= 1 and idclienti != '0' $condizione_prenota_proprie order by $ordine_prenota");
$num_prenotazioni = numlin_query($prenotazioni);
$prenotazioni_successive =  esegui_query("select * from $tableprenota where iddatainizio > $ultimo_periodo and idclienti != '0' $condizione_prenota_proprie order by $ordine_prenota");
$num_prenotazioni_successive = numlin_query($prenotazioni_successive);
$prenotazioni_precedenti =  esegui_query("select * from $tableprenota where iddatainizio < '1' and idclienti != '0' $condizione_prenota_proprie order by $ordine_prenota");
$num_prenotazioni_precedenti = numlin_query($prenotazioni_precedenti);
$data_inizio_assoluta = esegui_query("select datainizio from $tableperiodi where idperiodi = 1");
$data_inizio_assoluta = risul_query($data_inizio_assoluta,0,'datainizio');
$data_inizio_assoluta_f = formatta_data($data_inizio_assoluta,$stile_data);
$num_tabelle = 1;
if ($num_prenotazioni_precedenti != 0) {
$max_id_data_fine_prec = esegui_query("select max(iddatafine) from $tableprenota where iddatainizio < 1 $condizione_prenota_proprie");
$max_id_data_fine_prec = risul_query($max_id_data_fine_prec,0,0);
if ($priv_mod_prenota_iniziate == "s") $id_periodo_corrente = calcola_id_periodo_corrente($anno);
if ($max_id_data_fine_prec >= ($id_periodo_corrente + 1)) {
$num_tabelle = $num_tabelle + 1;
$tab_precedenti = "SI";
} # fine if ($max_id_data_fine_prec >= ($id_periodo_corrente + 1))
} # fine if ($num_prenotazioni_precedenti != 0)
if ($num_prenotazioni_successive != 0) { $num_tabelle = $num_tabelle + 1; }

$c_idinizioperiodo = 0;
$c_idfineperiodo = 0;
$num_cambia = 0;

if (($cerca_prenota and $cerca_prenota != "tutte") or $subtotale_selezionate) {
$tabella_unica_riassuntiva = "SI";
$num_tabelle = 1;

$freccia_sx = "";
$freccia_dx = "";

if ($cerca_prenota and $cerca_prenota != "tutte") {
$cerca_ini = aggslashdb($cerca_ini);
$cerca_fine = aggslashdb($cerca_fine);
$cerca_ini_f = formatta_data($cerca_ini,$stile_data);
$c_idinizioperiodo = esegui_query("select idperiodi from $tableperiodi where datainizio = '$cerca_ini' ");
$num_c_idinizioperiodo = numlin_query($c_idinizioperiodo);
if ($num_c_idinizioperiodo == 0) { $c_idinizioperiodo = 10000; }
else { $c_idinizioperiodo = risul_query($c_idinizioperiodo,0,'idperiodi'); }
if ($cerca_fine) {
$cerca_fine_f = formatta_data($cerca_fine,$stile_data);
$c_idfineperiodo = esegui_query("select idperiodi from $tableperiodi where datainizio = '$cerca_fine' ");
$num_c_idfineperiodo = numlin_query($c_idfineperiodo);
if ($num_c_idfineperiodo == 0) { $c_idfineperiodo = 10000; }
else { $c_idfineperiodo = risul_query($c_idfineperiodo,0,'idperiodi'); }
} # fine if ($cerca_fine)
else $c_idfineperiodo = 10000;
$c_idinizioperiodo_v = $c_idinizioperiodo;
if ($c_idinizioperiodo == 1 and $opz_cerc_pren != "arr") $c_idinizioperiodo = -1;
$iddatainizio = "iddatainizio";
$iddatafine = "iddatafine";
$c_idinizioperiodo_q = $c_idinizioperiodo;
$c_idfineperiodo_q = $c_idfineperiodo;
if ($opz_cerc_pren == "arr") $iddatafine = "iddatainizio";
if ($opz_cerc_pren == "part") {
$iddatainizio = "iddatafine";
$c_idinizioperiodo_q--;
$c_idfineperiodo_q--;
} # fine if ($opz_cerc_pren == "part")
$prenotazioni = esegui_query("select * from $tableprenota where $iddatainizio < $c_idfineperiodo_q and $iddatafine >= $c_idinizioperiodo_q and idclienti != '0' $condizione_prenota_proprie order by $ordine_prenota");
$num_prenotazioni = numlin_query($prenotazioni);
$frase_cerca = " ".mex("presenti dal",$pag)." $cerca_ini_f";
if ($cerca_fine) $frase_cerca .= " ".mex("al",$pag)." $cerca_fine_f";
if ($mos_tut_dat == "SI") include("./dati/selectperiodi$anno.$id_utente.php");
else include("./dati/selperiodimenu$anno.$id_utente.php");
$lista_date0 = explode("<option value=\"$cerca_ini\">",$dates_options_list);
$lista_date1 = explode("<option value=\"",$lista_date0[1]);
if (substr($lista_date1[1],0,10) == $cerca_fine) {
$lista_date0 = explode("<option value=\"",$lista_date0[0]);
$num_lista_date0 = count($lista_date0);
if ($num_lista_date0 > 1) {
$n_cerca_ini = substr($lista_date0[($num_lista_date0 - 1)],0,10);
$freccia_sx = "<a href=\"$pag?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=$tipo_tabella&amp;senza_colori=$senza_colori&amp;mos_tut_dat=$mos_tut_dat&amp;ordine_prenota=$ordine_prenota&amp;id_utente_vedi=$id_utente_vedi&amp;cerca_prenota=SI&amp;cerca_ini=$n_cerca_ini&amp;cerca_fine=$cerca_ini&amp;opz_cerc_pren=$opz_cerc_pren&amp;lista_prenota=$lista_prenota\">&lt;--</a>&nbsp;";
} # fine if ($num_lista_date0 > 1)
if (count($lista_date1) > 2) {
$n_cerca_fine = substr($lista_date1[2],0,10);
$freccia_dx = "&nbsp;<a href=\"$pag?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=$tipo_tabella&amp;senza_colori=$senza_colori&amp;mos_tut_dat=$mos_tut_dat&amp;ordine_prenota=$ordine_prenota&amp;id_utente_vedi=$id_utente_vedi&amp;cerca_prenota=SI&amp;cerca_ini=$cerca_fine&amp;cerca_fine=$n_cerca_fine&amp;opz_cerc_pren=$opz_cerc_pren&amp;lista_prenota=$lista_prenota\">--&gt;</a>";
} # fine if (count($lista_date1) > 2)
} # fine if (substr($lista_date1[0],0,10) == $cerca_fine)
} # fine if ($cerca_prenota and $cerca_prenota != "tutte")

if ($subtotale_selezionate and controlla_num_pos($num_cambia_pren) != "NO") {
$numeri_prenota_sel_query = "";
for ($num1 = 1 ; $num1 <= $num_cambia_pren ; $num1++) {
$cambianumero = "cambia".$num1;
if ($$cambianumero and controlla_num_pos($$cambianumero) != "NO") {
if ($numeri_prenota_sel_query) $numeri_prenota_sel_query .= " or idprenota = '".$$cambianumero."'";
else $numeri_prenota_sel_query = "and ( idprenota = '".$$cambianumero."'";
} # fine if ($$cambianumero and @is_integer($$cambianumero))
} # fine for $num1
if ($numeri_prenota_sel_query) $numeri_prenota_sel_query .= " ) ";
$prenotazioni = esegui_query("select * from $tableprenota where idclienti != '0' $numeri_prenota_sel_query $condizione_prenota_proprie order by $ordine_prenota");
$num_prenotazioni = numlin_query($prenotazioni);
$frase_cerca = " ".mex("selezionate precedentemente",$pag);
} # fine if ($subtotale_selezionate and @is_integer($num_cambia_pren))

} # fine if (($cerca_prenota and $cerca_prenota != "tutte") or $subtotale_selezionate)

else {
$frase_cerca = mex("del",$pag)." ".$anno;
$num_vedi_in_tab = esegui_query("select valpersonalizza_num from $tablepersonalizza where idpersonalizza = 'num_righe_tab_tutte_prenota' and idutente = '$id_utente_vedi'");
$num_vedi_in_tab = risul_query($num_vedi_in_tab,0,'valpersonalizza_num');
if ($num_prenotazioni > $num_vedi_in_tab or $num_prenotazioni_successive > $num_vedi_in_tab or $num_prenotazioni_precedenti > $num_vedi_in_tab) {
$oggi = date("Y-m-d",(time() + (C_DIFF_ORE * 3600)));
$annocorrente = date("Y",(time() + (C_DIFF_ORE * 3600)));
$idperiodocorrente = esegui_query("select idperiodi from $tableperiodi where datainizio <= '$oggi' and datafine >= '$oggi' ");
$numidperiodocorrente = numlin_query($idperiodocorrente);
if ( $numidperiodocorrente >= 1 ) {
$num_risposta = 0;
if ($numidperiodocorrente == 2) $num_risposta = 1;
$idperiodocorrente = risul_query($idperiodocorrente,$num_risposta,'idperiodi');
if ($idperiodocorrente >= $inizioperiodo) { $prenota_iniziata = "SI"; }
} # fine if ( $numidperiodocorrente >= 1 )
else {
if ( $anno == $annocorrente ) {
$id_periodi_precedenti = esegui_query("select idperiodi from $tableperiodi where datainizio <= '$oggi'");
$num_id_periodi_precedenti = numlin_query($id_periodi_precedenti);
if ($num_id_periodi_precedenti > 0) $idperiodocorrente = 100000;
else $idperiodocorrente = 0;
} # fine if ( $anno == $annocorrente )
else if ( $anno < $annocorrente ) $idperiodocorrente = 100000;
else $idperiodocorrente = 0;
} # fine else if ( $numidperiodocorrente >= 1 )
} # fine if ($num_prenotazioni > $num_vedi_in_tab or ...
} # fine else if (($cerca_prenota and $cerca_prenota != "tutte") or $subtotale_selezionate)

$tutti_utenti = esegui_query("select * from $tableutenti order by idutenti");
for ($num1 = 0 ; $num1 < numlin_query($tutti_utenti) ; $num1++) {
$idutenti = risul_query($tutti_utenti,$num1,'idutenti');
$nome_utente_prenota[$idutenti] = risul_query($tutti_utenti,$num1,'nome_utente');
} # fine for $num1

unlock_tabelle($tabelle_lock);


if ($tab_precedenti == "SI" or ($cerca_prenota and $cerca_prenota != "tutte") or $subtotale_selezionate) {
$anno_prec_esistente = esegui_query("select idanni from $tableanni where idanni = '".($anno - 1)."'");
if (numlin_query($anno_prec_esistente) == 1) $anno_prec_esistente = "SI";
else $anno_prec_esistente = "NO";
} # fine ($tab_precedenti == "SI" or ($cerca_prenota and $cerca_prenota != "tutte") or $subtotale_selezionate)


echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pag_pren_corr\" value=\"$pag_pren_corr\">
<input type=\"hidden\" name=\"pag_pren_succ\" value=\"$pag_pren_succ\">
<input type=\"hidden\" name=\"pag_pren_prec\" value=\"$pag_pren_prec\">
<input type=\"hidden\" name=\"senza_colori\" value=\"$senza_colori\">
<input type=\"hidden\" name=\"ordine_prenota\" value=\"$ordine_prenota\">
<input type=\"hidden\" name=\"mos_tut_dat\" value=\"$mos_tut_dat\">
<script type=\"text/javascript\">
<!--
function aggiorna_spunte (num_tab) {
var stato = document.getElementById('cbox_tab'+num_tab).checked;
var cbox_list = document.getElementById('tpren'+num_tab).getElementsByTagName('input');
for (var num = 0 ; num < cbox_list.length ; num++) {
cbox_list[num].checked = stato;
}
if (typeof aggiorna_prenota_sel == 'function') aggiorna_prenota_sel();
}
-->
</script>
<input type=\"hidden\" name=\"id_utente_vedi\" value=\"$id_utente_vedi\">";
unset($lista_prenota_contr);
unset($lista_prenota_mod);
$dati_tariffe = dati_tariffe($tablenometariffe,"",$tablepersonalizza);

for ($num_tab = 1 ; $num_tab <= $num_tabelle ; $num_tab = $num_tab + 1) {
$pagina_prenota = "";
$costo_tot_TOT = 0;
$caparra_TOT = 0;
$commissioni_TOT = 0;
$restocomm_TOT = 0;
$pagato_TOT = 0;
$tasse_TOT = 0;
$num_persone_TOT = 0;
if ($num_tab > 1) {
if ($tab_precedenti == "SI") {
$tab_precedenti = "";
$prenotazioni = $prenotazioni_precedenti;
$num_prenotazioni = $num_prenotazioni_precedenti;
$pagina_prenota_nome = "pag_pren_prec";
if ($pag_pren_prec) $pagina_prenota = $pag_pren_prec;
echo "<br><br><div style=\"text-align: center; font-size: large;\"><b>".mex("Tabella prenotazioni precedenti al",$pag)." $anno.</b></div><br>";
} # fine if ($tab_precedenti == "SI")
else {
$prenotazioni = $prenotazioni_successive;
$num_prenotazioni = $num_prenotazioni_successive;
$pagina_prenota_nome = "pag_pren_succ";
if ($pag_pren_succ) $pagina_prenota = $pag_pren_succ;
echo "<br><br><div style=\"text-align: center; font-size: large;\"><b>".mex("Tabella prenotazioni successive al",$pag)." $anno.</b></div><br>";
} # fine else if ($tab_precedenti == "SI")
} # fine if ($num_tab > 1)
else {
$pagina_prenota_nome = "pag_pren_corr";
if ($pag_pren_corr) $pagina_prenota = $pag_pren_corr;
$frase_tab = mex("Tabella con tutte le prenotazioni",$pag);
if ($opz_cerc_pren == "arr") $frase_tab = mex("Tabella con tutti gli arrivi",$pag);
if ($opz_cerc_pren == "part")$frase_tab =  mex("Tabella con tutte le partenze",$pag);
echo "<br><div style=\"text-align: center; font-size: large;\"><h5>$freccia_sx<b>$frase_tab $frase_cerca.</b>$freccia_dx</h5></div><br>";
} # fine else if ($num_tab > 1)

if (!$tabella_unica_riassuntiva and $num_prenotazioni > $num_vedi_in_tab) {
$num_pagine_prenota = ceil($num_prenotazioni/$num_vedi_in_tab);
$stringa_pagine = "<div style=\"text-align: center;\"><small>".mex("pagine",$pag)."</small>:";
for ($num1 = 1 ; $num1 <= $num_pagine_prenota ; $num1++) {
if (!$pagina_prenota and $num1 == $num_pagine_prenota) $pagina_prenota = $num_pagine_prenota;
if (!$pagina_prenota) {
#$iddata_inizio_parziale = risul_query($prenotazioni,(($num1 -1)*$num_vedi_in_tab),'iddatainizio');
$iddata_inizio_ultima = risul_query($prenotazioni,(($num1*$num_vedi_in_tab)-1),'iddatainizio');
if ($idperiodocorrente <= $iddata_inizio_ultima) $pagina_prenota = $num1;
} # fine if (!$pagina_prenota)
$stringa_pagine .= " ";
if ($num1 != $pagina_prenota) {
$stringa_pagine .= "<a href=\"visualizza_tabelle.php?tipo_tabella=prenotazioni&amp;anno=$anno&amp;id_sessione=$id_sessione$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;senza_colori=$senza_colori&amp;mos_tut_dat=$mos_tut_dat&amp;$pagina_prenota_nome=$num1&amp;ordine_prenota=$ordine_prenota";
if ($pagina_prenota_nome != "pag_pren_corr") $stringa_pagine .= "&amp;pag_pren_corr=$pag_pren_corr";
if ($pagina_prenota_nome != "pag_pren_prec") $stringa_pagine .= "&amp;pag_pren_prec=$pag_pren_prec";
if ($pagina_prenota_nome != "pag_pren_succ") $stringa_pagine .= "&amp;pag_pren_succ=$pag_pren_succ";
$stringa_pagine .= "&amp;lista_prenota=$lista_prenota\">";
} # fine if ($num1 != $pagina_prenota)
else $stringa_pagine .= "<b>";
$stringa_pagine .= "$num1";
if ($num1 != $pagina_prenota) $stringa_pagine .= "</a>";
else $stringa_pagine .= "</b>";
} # fine for $num1
$stringa_pagine .= "</div>";
echo $stringa_pagine;
$stringa_puntini_tab = "<tr><td colspan=\"".($num_colonne_selezionate+6)."\">...</td></tr>";
} # fine if ($num_prenotazioni > $num_vedi_in_tab)
else $pagina_prenota = 1;

$colore_sfondo = $t1color;
$class = "t1";
if ($senza_colori) {
$colore_sfondo = "";
$class = "t1wc";
} # fine if ($senza_colori)
echo "<table class=\"$class\" id=\"tpren$num_tab\" style=\"width: 3px; background-color: $colore_sfondo; margin-left: auto; margin-right: auto;\" border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td";
if ($colonna_numero) echo " colspan=\"2\">";
else echo ">&nbsp;";
if ($colonna_numero) {
if (substr($ordine_prenota,0,9) != "idprenota") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=idprenota$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo mex("N°",$pag);
if (substr($ordine_prenota,0,9) != "idprenota") echo "</a>";
} # fine if ($colonna_numero)
echo "</td>";
if ($colonna_cognome) echo "<td>".str_replace("_","&nbsp;",mex("Cognome_cliente",$pag))."</td>";
if ($colonna_inizio) {
echo "<td>";
if (substr($ordine_prenota,0,12) != "iddatainizio") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=iddatainizio$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo str_replace("_","&nbsp;",mex("Data_iniziale",$pag));
if (substr($ordine_prenota,0,12) != "iddatainizio") echo "</a>";
echo "</td>";
} # fine if ($colonna_inizio)
if ($colonna_fine) {
echo "<td>";
if (substr($ordine_prenota,0,10) != "iddatafine") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=iddatafine$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo str_replace("_","&nbsp;",mex("Data_finale",$pag));
if (substr($ordine_prenota,0,10) != "iddatafine") echo "</a>";
echo "</td>";
} # fine if ($colonna_fine)
if ($colonna_settimane) echo "<td style=\"font-size: x-small;\">".mex("$parola_sett",$pag).".</td>";
if ($colonna_tariffacompleta) echo "<td style=\"font-size: small;\">".str_replace("_","&nbsp;",mex("Tariffa_completa",$pag))."</td>";
if ($colonna_caparra) echo "<td>".mex("Caparra",$pag)."</td>";
if ($colonna_commissioni) echo "<td style=\"font-size: small;\">".mex("Commissioni",$pag)."</td>";
if ($colonna_restocomm) echo "<td style=\"font-size: x-small;\">".str_replace("_","&nbsp;",mex("Tariffa_completa",$pag)." ".mex("senza_commissioni",$pag))."</td>";
if ($colonna_pagato) echo "<td>".mex("Pagato",$pag)."</td>";
if ($colonna_dapagare) echo "<td style=\"font-size: x-small;\">".str_replace("_","&nbsp;",mex("Da_pagare",$pag))."</td>";
if ($colonna_nometariffa) {
echo "<td>";
if (substr($ordine_prenota,0,7) != "tariffa") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=tariffa$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo mex("Tariffa",$pag);
if (substr($ordine_prenota,0,7) != "tariffa") echo "</a>";
echo "</td>";
} # fine if ($colonna_nometariffa)
if ($colonna_appartamento) {
echo "<td style=\"font-size: x-small;\">";
if (substr($ordine_prenota,0,14) != "idappartamenti") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=idappartamenti$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo mex("App.",$pag);
if (substr($ordine_prenota,0,14) != "idappartamenti") echo "</a>";
echo "</td>";
} # fine if if ($colonna_appartamento)
if ($colonna_piano) {
echo "<td style=\"font-size: x-small;\">";
echo ucfirst(mex("piano",$pag));
echo "</td>";
} # fine if if ($colonna_piano)
if ($colonna_casa) {
echo "<td style=\"font-size: x-small;\">";
echo ucfirst(mex("casa",$pag));
echo "</td>";
} # fine if if ($colonna_casa)
if ($colonna_persone) echo "<td style=\"font-size: x-small;\">".mex("Pers.",$pag)."</td>";
if ($colonna_commento) echo "<td>".mex("Commento",$pag)."</td>";
if ($colonna_origine_prenota) {
echo "<td>";
if (substr($ordine_prenota,0,7) != "origine") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=origine$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo mex("Origine",$pag);
if (substr($ordine_prenota,0,7) != "origine") echo "</a>";
echo "</td>";
} # fine if ($colonna_origine_prenota)
if ($colonna_docsalvati) echo "<td style=\"font-size: x-small;\">".str_replace("_","&nbsp;",mex("Documenti_salvati",$pag))."</td>";
if ($colonna_datainserimento) {
echo "<td style=\"font-size: x-small;\">";
if (substr($ordine_prenota,0,15) != "datainserimento") echo "<a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=prenotazioni&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=datainserimento$id_utente_vedi_passa&amp;cerca_prenota=$cerca_prenota&amp;opz_cerc_pren=$opz_cerc_pren&amp;cerca_ini=$cerca_ini&amp;cerca_fine=$cerca_fine&amp;senza_colori=$senza_colori&amp;sel_tab_prenota=$sel_tab_prenota&amp;mos_tut_dat=$mos_tut_dat&amp;lista_prenota=$lista_prenota\">";
echo mex("Data di inserimento",$pag);
if (substr($ordine_prenota,0,15) != "datainserimento") echo "</a>";
echo "</td>";
} # fine if ($colonna_datainserimento)
if ($colonna_utenteinserimento) echo "<td>".mex("Utente",$pag)."</td>";
for ($num1 = 0 ; $num1 < $num_ca_tab ; $num1++) {
echo "<td>";
if ($soprannome_ca_tab[$num1]) {
if (num_caratteri_testo($soprannome_ca_tab[$num1]) > 4) $soprannome_ca_tab[$num1] = "<small><small>".$soprannome_ca_tab[$num1]."</small></small>";
echo $soprannome_ca_tab[$num1];
} # fine if ($soprannome_ca[$num1])
else {
if ($tipo_ca_tab[$num1] == "cu") echo "<small><small>".mex("Costo_uni.",$pag)." ".$nome_ca_tab[$num1]."</small></small>";
if ($tipo_ca_tab[$num1] == "cs") echo "<small><small>".mex("Costo_$parola_sett.",$pag)." ".$nome_ca_tab[$num1]."</small></small>";
} # fine else if ($soprannome_ca[$num1])
echo "</td>";
} # fine for $num1
for ($num1 = 0 ; $num1 < $num_gr_tab ; $num1++) {
echo "<td>";
if (num_caratteri_testo($nome_gr_tab[$num1]) > 4) $nome_gr_tab[$num1] = "<small><small>".$nome_gr_tab[$num1]."</small></small>";
echo $nome_gr_tab[$num1];
echo "</td>";
} # fine for $num1
echo "</tr>";

if (!$tabella_unica_riassuntiva and $num_prenotazioni > $num_vedi_in_tab and $pagina_prenota != 1) echo $stringa_puntini_tab;

for ($num1 = 0 ; $num1 < $num_prenotazioni ; $num1 = $num1 + 1) {
$numero = risul_query($prenotazioni,$num1,'idprenota');
$lista_prenota_contr .= ",".$numero;
$id_clienti = risul_query($prenotazioni,$num1,'idclienti');
$cognome = esegui_query("select cognome,utente_inserimento from $tableclienti where idclienti = '$id_clienti'");
$mostra_cliente = "SI";
if ($vedi_clienti == "NO") $mostra_cliente = "NO";
if ($vedi_clienti == "PROPRI" or $vedi_clienti == "GRUPPI") {
$utente_inserimento = risul_query($cognome,0,'utente_inserimento');
if ($vedi_clienti == "PROPRI" and $utente_inserimento != $id_utente) $mostra_cliente = "NO";
if ($vedi_clienti == "GRUPPI" and !$utenti_gruppi[$utente_inserimento]) $mostra_cliente = "NO";
} # fine if ($vedi_clienti == "PROPRI" or...
if ($mostra_cliente == "NO") $cognome = mex("Cliente",$pag)." $id_clienti";
else $cognome = risul_query($cognome,0,'cognome');
$appartamento = risul_query($prenotazioni,$num1,'idappartamenti');

if ($colonna_cognome and $colonna_ospite) {
$ospiti = esegui_query("select idclienti from $tablerclientiprenota where idprenota = '$numero' order by num_ordine ");
if (numlin_query($ospiti)) {
$id_ospite = risul_query($ospiti,0,'idclienti');
if ($id_ospite != $id_clienti) {
$cognome_ospite = esegui_query("select cognome,utente_inserimento from $tableclienti where idclienti = '$id_ospite' ");
$mostra_ospite = "SI";
if ($vedi_clienti == "NO") $mostra_ospite = "NO";
if ($vedi_clienti == "PROPRI" or $vedi_clienti == "GRUPPI") {
$utente_inserimento = risul_query($cognome_ospite,0,'utente_inserimento');
if ($vedi_clienti == "PROPRI" and $utente_inserimento != $id_utente) $mostra_ospite = "NO";
if ($vedi_clienti == "GRUPPI" and !$utenti_gruppi[$utente_inserimento]) $mostra_ospite = "NO";
} # fine if ($vedi_clienti == "PROPRI" or...
if ($mostra_ospite != "NO") {
$cognome_ospite = risul_query($cognome_ospite,0,'cognome');
if ($cognome_ospite != $cognome) $cognome .= "<br><span class=\"smallfont\">($cognome_ospite)</span>";
} # fine if ($mostra_ospite != "NO")
} # fine if ($id_ospite != $id_clienti)
} # fine if (numlin_query($ospiti))
} # fine if ($colonna_cognome and $colonna_ospite)

$id_data_fine = risul_query($prenotazioni,$num1,'iddatafine');
$data_fine = esegui_query("select * from $tableperiodi where idperiodi = $id_data_fine");
$data_fine = risul_query($data_fine,0,'datafine');
$data_fine_f = formatta_data($data_fine,$stile_data);
$id_data_inizio = risul_query($prenotazioni,$num1,'iddatainizio');
if ($id_data_inizio == 0) {
$data_inizio_f = "<".$data_inizio_assoluta_f;
$id_prenota_prec = risul_query($prenotazioni,$num1,'commento');
if ($id_prenota_prec and $anno_prec_esistente == "SI") {
$dati_prenota_prec = esegui_query("select * from $PHPR_TAB_PRE"."prenota".($anno - 1)." where idprenota = '$id_prenota_prec'");
if (numlin_query($dati_prenota_prec) == 1) {
$id_data_inizio_prec = risul_query($dati_prenota_prec,0,'iddatainizio');
$id_data_fine_prec = risul_query($dati_prenota_prec,0,'iddatafine');
$data_inizio = esegui_query("select * from $PHPR_TAB_PRE"."periodi".($anno - 1)." where idperiodi = $id_data_inizio_prec");
$data_inizio = risul_query($data_inizio,0,'datainizio');
$data_inizio_f = formatta_data($data_inizio,$stile_data);
$num1_orig = $num1;
$num1 = 0;
$prenotazioni_orig = $prenotazioni;
$prenotazioni = $dati_prenota_prec;
$numero_settimane = $id_data_fine_prec - $id_data_inizio_prec + 1;
} # fine if (numlin_query($dati_prenota_prec) == 1)
} # fine if ($id_prenota_prec and $anno_prec_esistente == "SI")
} # fine if ($id_data_inizio == 0)
else {
$data_inizio = esegui_query("select * from $tableperiodi where idperiodi = $id_data_inizio");
$data_inizio = risul_query($data_inizio,0,'datainizio');
$data_inizio_f = formatta_data($data_inizio,$stile_data);
$stile_checkin = "";
if ($colonna_orarioentrata == "SI" or $attiva_checkin == "SI") {
$checkin = risul_query($prenotazioni,$num1,'checkin');
$checkout = risul_query($prenotazioni,$num1,'checkout');
if ($checkin and !$checkout and $attiva_checkin == "SI") $stile_checkin = " style=\"background-image:url(img/fr_sx_checkin.gif); background-repeat:no-repeat; background-position: left center;\"";
if ($checkout and !$checkin and $colonna_orarioentrata == "SI") {
$stima_checkin = substr(str_replace(" ","&nbsp;",str_replace("$data_inizio_f ","",formatta_data($checkout))),0,-3);
if (strlen($stima_checkin) < 10) $stima_checkin = "&nbsp;<small><small>($stima_checkin)</small></small>";
else $stima_checkin = " <small><small>($stima_checkin)</small></small>";
$data_inizio_f .= $stima_checkin;
} # fine if ($checkout and !$checkin and...
} # fine if ($colonna_orarioentrata == "SI" or $attiva_checkin == "SI")
} # fine else if ($id_data_inizio == 0)
$mese = explode("-",$data_inizio);
$mese = $mese[1];
if ($id_data_inizio != 0) $numero_settimane = $id_data_fine - $id_data_inizio + 1;
else if (substr($data_inizio_f,0,1) == "<") $numero_settimane = "?";
if ($c_idinizioperiodo and $c_idinizioperiodo > $id_data_inizio) $id_data_inizio_cerca = $c_idinizioperiodo;
else $id_data_inizio_cerca = $id_data_inizio;
if ($c_idfineperiodo and $c_idfineperiodo < $id_data_fine) $id_data_fine_cerca = $c_idfineperiodo;
else $id_data_fine_cerca = $id_data_fine;
$numero_settimane_cerca = $id_data_fine_cerca - $id_data_inizio_cerca + 1;

$commento = risul_query($prenotazioni,$num1,"commento");
if (!$commento) { $commento = "&nbsp;"; }
$origine_prenota = risul_query($prenotazioni,$num1,"origine");
if (!$origine_prenota) $origine_prenota = "&nbsp;";
$datainserimento = risul_query($prenotazioni,$num1,"datainserimento");
$datainserimento_f =formatta_data($datainserimento,$stile_data);
$num_persone = risul_query($prenotazioni,$num1,"num_persone");
if (!$num_persone or $num_persone == 0) { $num_persone = "?"; }
$tariffesettimanali = risul_query($prenotazioni,$num1,"tariffesettimanali");

$nome_tariffa = risul_query($prenotazioni,$num1,'tariffa');
$nome_tariffa = explode("#@&",$nome_tariffa);
$costo_tariffa = $nome_tariffa[1];
$nome_tariffa = $nome_tariffa[0];
if (!$nome_tariffa) $nome_tariffa = "&nbsp;";
$caparra = risul_query($prenotazioni,$num1,'caparra');
if (!$caparra) $caparra = 0;
$caparra_p = punti_in_num($caparra,$stile_soldi);
$commissioni = risul_query($prenotazioni,$num1,'commissioni');
if (!$commissioni) $commissioni = 0;
$commissioni_p = punti_in_num($commissioni,$stile_soldi);
$pagato = risul_query($prenotazioni,$num1,'pagato');
if (!$pagato) $pagato = 0;
$pagato_p = punti_in_num($pagato,$stile_soldi);
$costo_tot = risul_query($prenotazioni,$num1,'tariffa_tot');
if (!$costo_tot) $costo_tot = 0;
$costo_tot_p = punti_in_num($costo_tot,$stile_soldi);
$da_pagare = $costo_tot - $pagato;
$da_pagare_p = punti_in_num($da_pagare,$stile_soldi);
$restocomm = $costo_tot - $commissioni;
$restocomm_p = punti_in_num($restocomm,$stile_soldi);
$sconto = risul_query($prenotazioni,$num1,'sconto');
$confermato = risul_query($prenotazioni,$num1,'conferma');
$confermato = substr($confermato,0,1);
$colore = "";
if ($pagato < $costo_tot) {
$colore = "#FFEE22"; #giallo
if ($pagato < $caparra) $colore = "#FF9900"; #arancione
if ($confermato != "S") $colore = "#CC0000"; # rosso
} # fine if ($pagato < $costo_tot)
if ($senza_colori) $colore = "";

$tasseperc = risul_query($prenotazioni,$num1,'tasseperc');
if ($tasseperc) {
$tasse = (($costo_tariffa - $sconto) / ($tasseperc + 100)) * $tasseperc;
$tasse = $tasse / $dati_tariffe['tasse_arrotond'];
$tasse = floor($tasse);
$tasse = $tasse * $dati_tariffe['tasse_arrotond'];
$tasse_TOT = $tasse_TOT + $tasse;
} # fine if ($tasseperc)

if ($colonna_docsalvati) {
$documenti_salvati = "";
if (@is_array($contratti_prenota[$numero])) {
reset($contratti_prenota[$numero]);
while (list($num_contr,$arr_num_doc) = each($contratti_prenota[$numero])) {
$contr_doc_num = $arr_num_doc;
while (list($num_doc,$file_doc) = each($contr_doc_num)) {
$documenti_salvati .= "<a href=\"./visualizza_contratto?id_sessione=$id_sessione&amp;anno=$anno&amp;id_transazione=tabdoc&amp;numero_contratto=$num_contr&amp;contr_corr=$file_doc\">".$nomi_contratti['salv'][$num_contr]." $num_doc</a>, ";
} # fine while (list($num_contr,$arr_num_doc) = each($contr_doc_num))
} # fine while (list($num_contr,$arr_num_doc) = each($contratti_prenota[$numero]))
$documenti_salvati = substr($documenti_salvati,0,-2);
} # fine if (@is_array($contratti_prenota[$numero]))
if (!$documenti_salvati) $documenti_salvati = "&nbsp;";
} # fine if ($colonna_docsalvati)

$dati_cap = dati_costi_agg_prenota($tablecostiprenota,$numero);
unset($num_letti_agg);
unset($cu_presente);
unset($cs_presente);
unset($settimane_costo);
unset($moltiplica_costo);
unset($num_sett_costo);
$costo_agg_tot = 0;
for ($numca = 0 ; $numca < $dati_cap['num'] ; $numca++) {
if ($dati_cap[$numca]['associasett'] == "s") {
if ($c_idinizioperiodo or $c_idfineperiodo) {
for ($num2 = $c_idinizioperiodo; $num2 < $c_idfineperiodo; $num2++) {
if ($dati_cap[$numca]['settimane'] != str_replace(",$num2,","",$dati_cap[$numca]['settimane'])) $settimane_costo[$numca] .= ",".$num2;
} # fine for $num2
if ($settimane_costo[$numca]) $settimane_costo[$numca] .= ",";
$settimane = explode(",",$dati_cap[$numca]['settimane']);
$moltiplica_sett = explode(",",$dati_cap[$numca]['moltiplica_costo']);
for ($num2 = 1 ; $num2 < (count($settimane) - 1) ; $num2++) if ($settimane_costo[$numca] != str_replace(",".$settimane[$num2].",","",$settimane_costo[$numca])) $moltiplica_costo[$numca] .= ",".$moltiplica_sett[$num2];
if ($moltiplica_costo[$numca]) $moltiplica_costo[$numca] .= ",";
} # fine if ($c_idinizioperiodo or $c_idfineperiodo)
else {
$settimane_costo[$numca] = $dati_cap[$numca]['settimane'];
$moltiplica_costo[$numca] = $dati_cap[$numca]['moltiplica_costo'];
} # fine else if ($c_idinizioperiodo or $c_idfineperiodo)
aggiorna_letti_agg_in_periodi($dati_cap,$numca,$num_letti_agg,$id_data_inizio,$id_data_fine,$settimane_costo[$numca],$moltiplica_costo[$numca],"","");
if ($settimane_costo[$numca]) $cs_presente[$dati_cap[$numca]['nome']] = (string) $numca;
$num_sett_costo[$numca] = explode(",",$settimane_costo[$numca]);
$num_sett_costo[$numca] = count($num_sett_costo[$numca]) - 2;
$molt_uguali = "SI";
$molt = explode(",",$moltiplica_costo[$numca]);
for ($num2 = 2 ; $num2 < (count($molt) - 1) ; $num2++) if ($molt[1] != $molt[$num2]) $molt_uguali = "NO";
if ($molt_uguali == "SI") $moltiplica_costo[$numca] = $molt[1];
else $moltiplica_costo[$numca] = "(".substr($moltiplica_costo[$numca],1,-1).")";
} # fine if ($dati_cap[$numca][associasett] == "s")
else {
if ($dati_cap[$numca]['tipo'] == "u") $cu_presente[$dati_cap[$numca]['nome']] = (string) $numca;
if ($dati_cap[$numca]['tipo'] == "s") {
$cs_presente[$dati_cap[$numca]['nome']] = (string) $numca;
$num_sett_costo[$numca] = $dati_cap[$numca]['settimane'];
} # fine if ($dati_cap[$numca][tipo] == "s")
$moltiplica_costo[$numca] = $dati_cap[$numca]['moltiplica_costo'];
aggiorna_letti_agg_in_periodi($dati_cap,$numca,$num_letti_agg,$id_data_inizio,$id_data_fine,$dati_cap[$numca]['settimane'],$dati_cap[$numca]['moltiplica_costo'],"","");
} # fine else if ($dati_cap[$numca][associasett] == "s")
$costo_agg_parziale = (double) calcola_prezzo_totale_costo($dati_cap,$numca,$id_data_inizio,$id_data_fine,$dati_cap[$numca]['settimane'],$dati_cap[$numca]['moltiplica_costo'],$costo_tariffa,$tariffesettimanali,($costo_tariffa + $costo_agg_tot - $sconto),$caparra);
$costo_agg_tot = (double) $costo_agg_tot + $costo_agg_parziale;
if ($dati_cap[$numca]['tasseperc']) {
$tasse = ($costo_agg_parziale / ($dati_cap[$numca]['tasseperc'] + 100)) * $dati_cap[$numca]['tasseperc'];
$tasse = $tasse / $dati_tariffe['tasse_arrotond'];
$tasse = floor($tasse);
$tasse = $tasse * $dati_tariffe['tasse_arrotond'];
$tasse_TOT = $tasse_TOT + $tasse;
} # fine if ($dati_cap[$numca]['tasseperc'])
} # fine for $numca
$n_letti_agg = $num_letti_agg['max'];

$link_modifica = "SI";
$utente_inserimento = risul_query($prenotazioni,$num1,'utente_inserimento');
$nome_utente_inserimento = $nome_utente_prenota[$utente_inserimento];
if ($priv_mod_prenotazioni == "n") $link_modifica = "NO";
if ($priv_mod_prenotazioni == "p" and $utente_inserimento != $id_utente) $link_modifica = "NO";
if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $link_modifica = "NO";
if ($priv_mod_prenota_iniziate != "s" and $id_periodo_corrente >= $id_data_inizio) $link_modifica = "NO";
if ($priv_mod_prenota_ore != "000") {
$adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600)));
$data_ins = risul_query($prenotazioni,$num1,'datainserimento');
$limite = date("YmdHis",mktime((substr($data_ins,11,2) + $priv_mod_prenota_ore),substr($data_ins,14,2),substr($data_ins,17,2),substr($data_ins,5,2),substr($data_ins,8,2),substr($data_ins,0,4)));
if ($adesso > $limite) $link_modifica = "NO";
} # fine if ($priv_mod_prenota_ore != "000")
if ($link_modifica == "SI") {
$link_modifica_inizio = "<a href=\"modifica_prenota.php?id_prenota=$numero&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php\">";
$link_modifica_fine = "</a>";
#$checkbox_modifica = "<input type=\"checkbox\" name=\"cambia$numero\" value=\"SI\">";
} # fine if ($link_modifica == "SI")
else {
unset($link_modifica_inizio);
unset($link_modifica_fine);
#$checkbox_modifica = "&nbsp;";
} # fine else if ($link_modifica == "SI")

if ($id_data_inizio == 0 and substr($data_inizio_f,0,1) != "<") {
$num1 = $num1_orig;
$prenotazioni = $prenotazioni_orig;
} # fine ($id_data_inizio == 0 and substr($data_inizio_f,0,1) != "<")

if ($tabella_unica_riassuntiva or (($num1+1) > (($pagina_prenota - 1)*$num_vedi_in_tab) and ($num1+1) <= (($pagina_prenota)*$num_vedi_in_tab)) ) {

if (@is_array($colonne_necessarie)) $mostra_riga = "NO";
else $mostra_riga = "SI";
unset($colonne_costi);
for ($num2 = 0 ; $num2 < $num_ca_tab ; $num2++) {
$costo_trovato = "NO";
$colonne_costi .= "<td style=\"font-size: x-small;\">";
if ($tipo_ca_tab[$num2] == "cu" and $cu_presente[$nome_ca_tab[$num2]] != "") $costo_trovato = $cu_presente[$nome_ca_tab[$num2]];
if ($tipo_ca_tab[$num2] == "cs" and $cs_presente[$nome_ca_tab[$num2]] != "") $costo_trovato = $cs_presente[$nome_ca_tab[$num2]];
if ($costo_trovato != "NO") {
if ($num_sett_costo[$costo_trovato] and $num_sett_costo[$costo_trovato] != $numero_settimane_cerca) $colonne_costi .= $num_sett_costo[$costo_trovato].mex($lettera_s,$pag);
else $colonne_costi .=  "SI";
if ($moltiplica_costo[$costo_trovato] != 1) $colonne_costi .= " x".$moltiplica_costo[$costo_trovato];
if ($mostra_riga == "NO") if ($colonne_necessarie['ca'][$num2] == "SI") $mostra_riga = "SI";
} # fine if ($costo_trovato != "NO")
if ($costo_trovato == "NO") $colonne_costi .= "&nbsp;";
$colonne_costi .= "</td>";
} # fine for $num2
for ($num2 = 0 ; $num2 < $num_gr_tab ; $num2++) {
$separatore = $separatore_gr_tab[$num2];
$spazio = "";
$colonne_costi .= "<td style=\"font-size: x-small;\">";
if ($col_gr_settimane[$num2] == "SI") { $colonne_costi .= "$numero_settimane"; $spazio = $separatore; }
if ($col_gr_caparra[$num2] == "SI") { $colonne_costi .= "$spazio$caparra_p"; $spazio = $separatore; }
if ($col_gr_commissioni[$num2] == "SI") { $colonne_costi .= "$spazio$commissioni_p"; $spazio = $separatore; }
if ($col_gr_restocomm[$num2] == "SI") { $colonne_costi .= "$spazio$restocomm_p"; $spazio = $separatore; }
if ($col_gr_pagato[$num2] == "SI") { $colonne_costi .= "$spazio$pagato_p"; $spazio = $separatore; }
if ($col_gr_dapagare[$num2] == "SI") { $colonne_costi .= "$spazio$da_pagare_p"; $spazio = $separatore; }
if ($col_gr_nometariffa[$num2] == "SI") { $colonne_costi .= "$spazio$nome_tariffa"; $spazio = $separatore; }
if ($col_gr_appartamento[$num2] == "SI") { $colonne_costi .= "$spazio$appartamento"; $spazio = $separatore; }
if ($col_gr_piano[$num2] == "SI") { $colonne_costi .= $spazio.$piano_app[$appartamento]; $spazio = $separatore; }
if ($col_gr_casa[$num2] == "SI") { $colonne_costi .= $spazio.$casa_app[$appartamento]; $spazio = $separatore; }
if ($col_gr_persone[$num2] == "SI") {
$colonne_costi .= "$spazio$num_persone";
if ($n_letti_agg != 0) { $colonne_costi .= "+$n_letti_agg"; }
$spazio = $separatore;
} # fine if ($col_gr_persone[$num2] == "SI")
if ($col_gr_commento[$num2] == "SI") { $colonne_costi .= "$spazio$commento"; $spazio = $separatore; }
if ($col_gr_origine_prenota[$num2] == "SI") { $colonne_costi .= "$spazio$origine_prenota"; $spazio = $separatore; }
if ($col_gr_docsalvati[$num2] == "SI") { $colonne_costi .= "$spazio$documenti_salvati"; $spazio = $separatore; }
if ($col_gr_datainserimento[$num2] == "SI") { $colonne_costi .= "$spazio$datainserimento_f"; $spazio = $separatore; }
if ($col_gr_utenteinserimento[$num2] == "SI") { $colonne_costi .= "$spazio$nome_utente_inserimento"; $spazio = $separatore; }
for ($num3 = 0 ; $num3 < $num_ca_col_gr[$num2] ; $num3++) {
$costo_trovato = "NO";
if ($tipo_ca_col_gr[$num2][$num3] == "cu" and $cu_presente[$nome_ca_col_gr[$num2][$num3]] != "") $costo_trovato = $cu_presente[$nome_ca_col_gr[$num2][$num3]];
if ($tipo_ca_col_gr[$num2][$num3] == "cs" and $cs_presente[$nome_ca_col_gr[$num2][$num3]] != "") $costo_trovato = $cs_presente[$nome_ca_col_gr[$num2][$num3]];
if ($costo_trovato != "NO") {
$colonne_costi .= $spazio;
if ($num_sett_costo[$costo_trovato] and $num_sett_costo[$costo_trovato] != $numero_settimane_cerca) $colonne_costi .= $num_sett_costo[$costo_trovato].mex($lettera_s,$pag);
else $colonne_costi .= "SI";
if ($moltiplica_costo[$costo_trovato] != 1) $colonne_costi .= "x".$moltiplica_costo[$costo_trovato];
$spazio = $separatore;
} # fine if ($costo_trovato != "NO")
} # fine for $num3
if (!$spazio) $colonne_costi .= "&nbsp;";
elseif ($mostra_riga == "NO") if ($colonne_necessarie['gr'][$num2] == "SI") $mostra_riga = "SI";
$colonne_costi .= "</td>";
} # fine for $num2

if ($mostra_riga == "SI") {

if ($link_modifica == "SI") $lista_prenota_mod .= ",".$numero;
echo "<tr>";
if ($colonna_numero) echo "<td$stile_checkin>$link_modifica_inizio$numero$link_modifica_fine</td>";
$num_cambia++;
echo "<td><input type=\"checkbox\" name=\"cambia$num_cambia\" value=\"$numero\"></td>";
if ($colonna_cognome) echo "<td>$cognome</td>";
if ($colonna_inizio) echo "<td style=\"white-space: nowrap;\">$data_inizio_f</td>";
if ($colonna_fine) echo "<td style=\"white-space: nowrap;\">$data_fine_f</td>";
if ($colonna_settimane) echo "<td>$numero_settimane</td>";
if ($colonna_tariffacompleta) echo "<td>$costo_tot_p</td>";
if ($colonna_caparra) echo "<td>$caparra_p</td>";
if ($colonna_commissioni) echo "<td>$commissioni_p</td>";
if ($colonna_restocomm) echo "<td>$restocomm_p</td>";
if ($colonna_pagato) {
echo "<td";
if ($colore) echo " style=\"background-color: $colore;\"";
echo ">$pagato_p</td>";
} # fine if ($colonna_pagato)
if ($colonna_dapagare) {
echo "<td";
if ($colore) echo " style=\"background-color: $colore;\"";
echo ">$da_pagare_p</td>";
} # fine if ($colonna_dapagare)
if ($colonna_nometariffa) {
if (num_caratteri_testo($nome_tariffa) > 10) $nome_tariffa_vedi = "<small><small>$nome_tariffa</small></small>";
else $nome_tariffa_vedi = $nome_tariffa;
echo "<td>$nome_tariffa_vedi</td>";
} # fine if ($colonna_nometariffa)
if ($colonna_appartamento) echo "<td>$appartamento</td>";
if ($colonna_piano) echo "<td>".$piano_app[$appartamento]."</td>";
if ($colonna_casa) echo "<td>".$casa_app[$appartamento]."</td>";
if ($colonna_persone) {
echo "<td>$num_persone";
if ($n_letti_agg != 0) echo "+$n_letti_agg";
echo "</td>";
} # fine if ($colonna_persone)
if ($colonna_commento) echo "<td style=\"font-size: x-small;\">$commento</td>";
if ($colonna_origine_prenota) echo "<td style=\"font-size: x-small;\">$origine_prenota</td>";
if ($colonna_docsalvati) echo "<td style=\"font-size: x-small;\">$documenti_salvati</td>";
if ($colonna_datainserimento) echo "<td style=\"font-size: x-small;\">$datainserimento_f</td>";
if ($colonna_utenteinserimento) echo "<td>$nome_utente_inserimento</td>";
echo "$colonne_costi
</tr>";

} # fine if ($mostra_riga == "SI")

} # fine if (($num1+1) > ($pagina_prenota*20) and ($num1+1) < ($pagina_prenota*(20+1)))

$costo_tot_TOT = $costo_tot_TOT + $costo_tot;
$caparra_TOT = $caparra_TOT + $caparra;
$commissioni_TOT = $commissioni_TOT + $commissioni;
$restocomm_TOT = $restocomm_TOT + $restocomm;
$pagato_TOT = $pagato_TOT + $pagato;
$num_persone_TOT = $num_persone_TOT + $num_persone + $n_letti_agg;
} # fine for $num1

if (!$tabella_unica_riassuntiva and $num_prenotazioni > $num_vedi_in_tab and $pagina_prenota != $num_pagine_prenota) {
$pag_successive = 1;
echo $stringa_puntini_tab;
} # fine if (!$tabella_unica_riassuntiva and $num_prenotazioni > $num_vedi_in_tab and...


if (!$tabella_unica_riassuntiva and $num_tab == 1 and $riga_prenotacanc) {
$soldi_prenota_cancellate = esegui_query("select * from $tablesoldi where idsoldi = 1");
$soldi_prenota_cancellate = risul_query($soldi_prenota_cancellate,0,'soldi_prima');
if ($soldi_prenota_cancellate != 0) {
$costo_tot_TOT = $costo_tot_TOT + $soldi_prenota_cancellate;
$restocomm_TOT = $restocomm_TOT + $soldi_prenota_cancellate;
$pagato_TOT = $pagato_TOT + $soldi_prenota_cancellate;
$col_soldi_cancellati = 1;
if ($colonna_numero) $col_soldi_cancellati++;
if ($colonna_cognome) $col_soldi_cancellati++;
if ($colonna_inizio) $col_soldi_cancellati++;
if ($colonna_fine) $col_soldi_cancellati++;
if ($colonna_settimane) $col_soldi_cancellati++;
$soldi_prenota_cancellate_p = punti_in_num($soldi_prenota_cancellate,$stile_soldi);
if (($colonna_tariffacompleta or $colonna_pagato) and !$pag_successive) {
echo "<tr><td colspan=\"$col_soldi_cancellati\"><i>".mex("Soldi di prenotazioni cancellate",$pag)."</i></td>";
if ($colonna_tariffacompleta) echo "<td>$soldi_prenota_cancellate_p</td>";
if ($colonna_caparra) echo "<td>&nbsp;</td>";
if ($colonna_commissioni) echo "<td>&nbsp;</td>";
if ($colonna_restocomm) echo "<td>$soldi_prenota_cancellate_p</td>";
if ($colonna_pagato) echo "<td>$soldi_prenota_cancellate_p</td>";
if ($colonna_dapagare) echo "<td>&nbsp;</td>";
if ($colonna_nometariffa) echo "<td>&nbsp;</td>";
if ($colonna_appartamento) echo "<td>&nbsp;</td>";
if ($colonna_piano) echo "<td>&nbsp;</td>";
if ($colonna_casa) echo "<td>&nbsp;</td>";
if ($colonna_persone)  echo "<td>&nbsp;</td>";
if ($colonna_commento) echo "<td>&nbsp;</td>";
if ($colonna_origine_prenota) echo "<td>&nbsp;</td>";
if ($colonna_docsalvati) echo "<td>&nbsp;</td>";
if ($colonna_datainserimento) echo "<td>&nbsp;</td>";
if ($colonna_utenteinserimento) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_ca_tab ; $num2++) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_gr_tab ; $num2++) echo "<td>&nbsp;</td>";
echo "</tr>";
} # fine if (($colonna_tariffacompleta or $colonna_pagato) and !$pag_successive)
} # fine if ($soldi_prenota_cancellate)
} # fine if (!$tabella_unica_riassuntiva and $num_tab == 1 and $riga_prenotacanc)

$costo_tot_TOT_p = punti_in_num($costo_tot_TOT,$stile_soldi);
$caparra_TOT_p = punti_in_num($caparra_TOT,$stile_soldi);
$commissioni_TOT_p = punti_in_num($commissioni_TOT,$stile_soldi);
$restocomm_TOT_p = punti_in_num($restocomm_TOT,$stile_soldi);
$pagato_TOT_p = punti_in_num($pagato_TOT,$stile_soldi);
$da_pagare_TOT = $costo_tot_TOT - $pagato_TOT;
$da_pagare_TOT_p = punti_in_num($da_pagare_TOT,$stile_soldi);
$num_persone_TOT_p = punti_in_num($num_persone_TOT,$stile_soldi);
$col_totale = 1;
if ($colonna_numero) $col_totale++;
if ($colonna_cognome) $col_totale++;
if ($colonna_inizio) $col_totale++;
if ($colonna_fine) $col_totale++;
if ($colonna_settimane) $col_totale++;
if ($colonna_numero) $col_totale_tot = $col_totale - 1;
else $col_totale_tot = $col_totale;
if ($riga_totale) {
if ($colonna_numero or $colonna_tariffacompleta or $colonna_caparra or $colonna_commissioni or $colonna_restocomm or $colonna_pagato or $colonna_dapagare) {
echo "<tr>";
if ($colonna_numero) echo "<td>$num_prenotazioni</td>";
if ($col_totale_tot > 1) {
$col_totale_tot--;
echo "<td>
<input id=\"cbox_tab$num_tab\" type=\"checkbox\" onclick=\"aggiorna_spunte('$num_tab')\"></td>";
} # fine if ($col_totale_tot > 1)
echo "<td colspan=\"$col_totale_tot\"><b><i>".mex("TOTALE",$pag)."</i></b></td>";
if ($colonna_tariffacompleta) echo "<td>$costo_tot_TOT_p</td>";
if ($colonna_caparra) echo "<td>$caparra_TOT_p</td>";
if ($colonna_commissioni) echo "<td>$commissioni_TOT_p</td>";
if ($colonna_restocomm) echo "<td>$restocomm_TOT_p</td>";
if ($colonna_pagato) echo "<td>$pagato_TOT_p</td>";
if ($colonna_dapagare) echo "<td>$da_pagare_TOT_p</td>";
if ($colonna_nometariffa) echo "<td>&nbsp;</td>";
if ($colonna_appartamento) echo "<td>&nbsp;</td>";
if ($colonna_piano) echo "<td>&nbsp;</td>";
if ($colonna_casa) echo "<td>&nbsp;</td>";
if ($colonna_persone)  echo "<td>$num_persone_TOT_p</td>";
if ($colonna_commento) echo "<td>&nbsp;</td>";
if ($colonna_origine_prenota) echo "<td>&nbsp;</td>";
if ($colonna_docsalvati) echo "<td>&nbsp;</td>";
if ($colonna_datainserimento) echo "<td>&nbsp;</td>";
if ($colonna_utenteinserimento) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_ca_tab ; $num2++) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_gr_tab ; $num2++) echo "<td>&nbsp;</td>";
echo "</tr>";
} # fine if ($colonna_numero or $colonna_tariffacompleta or $colonna_caparra or...
} # fine if ($riga_totale)

if ($riga_tasse and $tasse_TOT and ($colonna_tariffacompleta or $colonna_restocomm)) {
$tasse_TOT_p = punti_in_num($tasse_TOT,$stile_soldi);
$tasse_resto_tot_p = punti_in_num(($costo_tot_TOT - $tasse_TOT),$stile_soldi);
$tasse_resto_restocomm_p = punti_in_num(($restocomm_TOT - $tasse_TOT),$stile_soldi);
echo "<tr><td colspan=\"$col_totale\"><b><i>".mex("TASSE",$pag)."</i></b></td>";
if ($colonna_tariffacompleta) echo "<td>$tasse_TOT_p<small><small><br>(".mex("resto",$pag)." $tasse_resto_tot_p)</small></small></td>";
if ($colonna_caparra) echo "<td>&nbsp;</td>";
if ($colonna_commissioni) echo "<td>&nbsp;</td>";
if ($colonna_restocomm) echo "<td>$tasse_TOT_p<small><small><br>(".mex("resto",$pag)." $tasse_resto_restocomm_p)</small></small></td>";
if ($colonna_pagato) echo "<td>&nbsp;</td>";
if ($colonna_dapagare) echo "<td>&nbsp;</td>";
if ($colonna_nometariffa) echo "<td>&nbsp;</td>";
if ($colonna_appartamento) echo "<td>&nbsp;</td>";
if ($colonna_piano) echo "<td>&nbsp;</td>";
if ($colonna_casa) echo "<td>&nbsp;</td>";
if ($colonna_persone)  echo "<td>&nbsp;</td>";
if ($colonna_commento) echo "<td>&nbsp;</td>";
if ($colonna_origine_prenota) echo "<td>&nbsp;</td>";
if ($colonna_docsalvati) echo "<td>&nbsp;</td>";
if ($colonna_datainserimento) echo "<td>&nbsp;</td>";
if ($colonna_utenteinserimento) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_ca_tab ; $num2++) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_gr_tab ; $num2++) echo "<td>&nbsp;</td>";
echo "</tr>";
} # fine if ($riga_tasse and $tasse_TOT and ($colonna_tariffacompleta or $colonna_restocomm))

$costo_cassa = 0;
if ($riga_cassa and !$tabella_unica_riassuntiva and $priv_vedi_tab_costi != "n") {
if ($priv_vedi_tab_costi == "p" or $priv_vedi_tab_costi == "g") {
$condizione_costi_propri = "and ( utente_inserimento = '$id_utente'";
if ($priv_vedi_tab_costi == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_costi_propri .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_tab_costi == "g")
$condizione_costi_propri .= " )";
} # fine if ($priv_vedi_tab_costi == "p" or $priv_vedi_tab_costi == "g")
else $condizione_costi_propri = "";
if ($num_tab == 1) {
if (!$condizione_costi_propri) {
$costo_cassa = esegui_query("select * from $tablecosti where idcosti = 0");
$costo_cassa = risul_query($costo_cassa,0,'val_costo');
} # fine if (!$condizione_costi_propri)
else {
$data_lim = ($anno + 1)."-01-01 00:00:00";
$costi_cassa = esegui_query("select * from $tablecosti where tipo_costo = 'e' and provenienza_costo = 'p' and datainserimento < '$data_lim'$condizione_costi_propri ");
$num_costi_cassa = numlin_query($costi_cassa);
for ($num2 = 0 ; $num2 < $num_costi_cassa ; $num2++) $costo_cassa = $costo_cassa + risul_query($costi_cassa,$num2,'val_costo');
} # fine else if (!$condizione_costi_propri)
} # fine if ($num_tab == 1)
elseif ($tab_precedenti != "SI") {
$data_lim = ($anno + 1)."-01-01 00:00:00";
$costi_cassa = esegui_query("select * from $tablecosti where tipo_costo = 'e' and provenienza_costo = 'p' and datainserimento > '$data_lim'$condizione_costi_propri ");
$num_costi_cassa = numlin_query($costi_cassa);
for ($num2 = 0 ; $num2 < $num_costi_cassa ; $num2++) $costo_cassa = $costo_cassa + risul_query($costi_cassa,$num2,'val_costo');
} # fine elseif ($tab_precedenti != "SI")
} # fine if ($riga_cassa and !$tabella_unica_riassuntiva and $priv_vedi_tab_costi != "n")
if ($costo_cassa) {
$resto_tot = $costo_tot_TOT - $costo_cassa;
$resto_restocomm = $restocomm_TOT - $costo_cassa;
$resto_pagato = $pagato_TOT - $costo_cassa;
$costo_cassa_p = punti_in_num($costo_cassa,$stile_soldi);
$resto_pagato_p = punti_in_num($resto_pagato,$stile_soldi);
$resto_restocomm_p = punti_in_num($resto_restocomm,$stile_soldi);
$resto_tot_p = punti_in_num($resto_tot,$stile_soldi);
$col_costo_cassa = 0;
if ($colonna_tariffacompleta) $col_costo_cassa++;
if ($colonna_caparra) $col_costo_cassa++;
if ($colonna_commissioni) $col_costo_cassa++;
if ($colonna_restocomm) $col_costo_cassa++;
if ($colonna_pagato) $col_costo_cassa++;
if ($col_costo_cassa > 0) {
echo "<tr><td colspan=\"$col_totale\"><b><i>".mex("Trasferito in cassa",$pag).":</i></b></td>
<td colspan=\"$col_costo_cassa\">$costo_cassa_p</td>";
if ($colonna_dapagare) echo "<td>&nbsp;</td>";
if ($colonna_nometariffa) echo "<td>&nbsp;</td>";
if ($colonna_appartamento) echo "<td>&nbsp;</td>";
if ($colonna_piano) echo "<td>&nbsp;</td>";
if ($colonna_casa) echo "<td>&nbsp;</td>";
if ($colonna_persone)  echo "<td>&nbsp;</td>";
if ($colonna_commento) echo "<td>&nbsp;</td>";
if ($colonna_origine_prenota) echo "<td>&nbsp;</td>";
if ($colonna_docsalvati) echo "<td>&nbsp;</td>";
if ($colonna_datainserimento) echo "<td>&nbsp;</td>";
if ($colonna_utenteinserimento) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_ca_tab ; $num2++) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_gr_tab ; $num2++) echo "<td>&nbsp;</td>";
echo "</tr>
<tr><td colspan=\"$col_totale\"><b><i>".mex("RESTO",$pag)."</i></b></td>";
if ($colonna_tariffacompleta) echo "<td>$resto_tot_p</td>";
if ($colonna_caparra) echo "<td>&nbsp;</td>";
if ($colonna_commissioni) echo "<td>&nbsp;</td>";
if ($colonna_restocomm) echo "<td>$resto_restocomm_p</td>";
if ($colonna_pagato) echo "<td>$resto_pagato_p</td>";
if ($colonna_dapagare) echo "<td>&nbsp;</td>";
if ($colonna_nometariffa) echo "<td>&nbsp;</td>";
if ($colonna_appartamento) echo "<td>&nbsp;</td>";
if ($colonna_piano) echo "<td>&nbsp;</td>";
if ($colonna_casa) echo "<td>&nbsp;</td>";
if ($colonna_persone)  echo "<td>&nbsp;</td>";
if ($colonna_commento) echo "<td>&nbsp;</td>";
if ($colonna_origine_prenota) echo "<td>&nbsp;</td>";
if ($colonna_docsalvati) echo "<td>&nbsp;</td>";
if ($colonna_datainserimento) echo "<td>&nbsp;</td>";
if ($colonna_utenteinserimento) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_ca_tab ; $num2++) echo "<td>&nbsp;</td>";
for ($num2 = 0 ; $num2 < $num_gr_tab ; $num2++) echo "<td>&nbsp;</td>";
echo "</tr>";
} # fine if ($col_costo_cassa > 0)
} # fine if ($costo_cassa)

echo "</table>";
if (!$tabella_unica_riassuntiva and $num_prenotazioni > $num_vedi_in_tab) echo $stringa_pagine;

} # fine for $num_tab

if ($lista_prenota_contr) $lista_prenota_contr .= ",";
$lista_prenota_mod = substr($lista_prenota_mod,1);

if ($show_bar != "NO") {
echo "<br><div style=\"text-align: center;\">";
if ($priv_mod_pagato != "n") {
echo "".ucfirst(mex("porre per le prenotazioni selezionate",$pag))." <select name=\"somma_pagata\">";
if ($priv_mod_pagato == "s") echo "<option value=\"tutto\" selected>".mex("tutto pagato",$pag)."</option>
<option value=\"caparra\">".mex("caparra pagata",$pag)."</option>
<option value=\"niente\">".mex("pagato niente",$pag)."</option>";
if ($priv_mod_pagato != "n") echo "<option value=\"conferma\">".mex("la conferma",$pag)."</option>";
echo "</select>
 <input class=\"sbutton\" type=\"submit\" name=\"cambia_pagato\" value=\"".ucfirst(mex("cambia",$pag))."\">
<small><small><br><br></small></small>";
} # fine if ($priv_mod_pagato != "n")
echo "<input class=\"sbutton\" type=\"submit\" name=\"subtotale_selezionate\" value=\"".mex("Calcola il subtotale delle prenotazioni selezionate",$pag)."\">
</div>";
} # fine if ($show_bar != "NO")
echo "<input type=\"hidden\" name=\"num_cambia_pren\" value=\"$num_cambia\">
</div></form>";

if ($show_bar != "NO") {
echo "<br><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"modifica_prenota.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"origine\" value=\"visualizza_tabelle.php?tipo_tabella=prenotazioni&amp;id_utente_vedi=$id_utente_vedi&amp;senza_colori=$senza_colori&amp;mos_tut_dat=$mos_tut_dat&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=$ordine_prenota\">
<input id=\"lst_prenota_mod\" type=\"hidden\" name=\"id_prenota\" value=\"$lista_prenota_mod\">
<input id=\"fsl_prenota_mod\" type=\"hidden\" value=\"".mex("Modifica come gruppo le prenotazioni selezionate",$pag)."\">
<input id=\"fms_prenota_mod\" type=\"hidden\" value=\"".mex("Modifica come gruppo le prenotazioni mostrate in tabella",$pag)."\">
<input id=\"smt_prenota_mod\" class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica come gruppo le prenotazioni mostrate in tabella",$pag)."\">
</div></form></div>";
} # fine if ($show_bar != "NO")

$nomi_contratti = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'nomi_contratti' and idutente = '$id_utente'");
$nomi_contratti = risul_query($nomi_contratti,0,'valpersonalizza');
$nomi_contratti = explode("#@&",$nomi_contratti);
$num_nomi_contratti = count($nomi_contratti);
for ($num1 = 0 ; $num1 < $num_nomi_contratti ; $num1++) {
$dati_nome_contratto = explode("#?&",$nomi_contratti[$num1]);
$nome_contratto[$dati_nome_contratto[0]] = $dati_nome_contratto[1];
} # fine for $num1
$max_contr = esegui_query("select max(numero) from $tablecontratti where tipo $LIKE 'contr%'");
$max_contr = risul_query($max_contr,0,0);
$option_num_contr = "";
for ($num_contratto = 1 ; $num_contratto <= $max_contr ; $num_contratto++) {
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contratto] == "SI") {
if ($nome_contratto[$num_contratto]) $num_contratto_vedi = $nome_contratto[$num_contratto];
else $num_contratto_vedi = $num_contratto;
$option_num_contr .= "<option value=\"$num_contratto\">$num_contratto_vedi</option>";
} # fine if ($attiva_contratti_consentiti == "n" or...
} # fine for $num_contratto
if ($option_num_contr and $show_bar != "NO") {
echo "<br><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_contratto.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"origine\" value=\"visualizza_tabelle.php?tipo_tabella=prenotazioni&amp;id_utente_vedi=$id_utente_vedi&amp;senza_colori=$senza_colori&amp;mos_tut_dat=$mos_tut_dat&amp;pag_pren_corr=$pag_pren_corr&amp;pag_pren_prec=$pag_pren_prec&amp;pag_pren_succ=$pag_pren_succ&amp;ordine_prenota=$ordine_prenota\">
<input id=\"lst_prenota_contr\" type=\"hidden\" name=\"lista_prenota\" value=\"$lista_prenota_contr\">";
if ($cerca_prenota) {
echo "<input type=\"hidden\" name=\"data_inizio_selezione\" value=\"$cerca_ini\">
<input type=\"hidden\" name=\"data_fine_selezione\" value=\"$cerca_fine\">";
} # fine if ($cerca_prenota)
echo "".ucfirst(mex("documento di tipo",$pag))."
 <select name=\"numero_contratto\">$option_num_contr</select>
 <input class=\"sbutton\" type=\"submit\" name=\"vedi_contr\" value=\"".ucfirst(mex("visualizza",$pag))."\">
</div></form></div>";
} # fine if ($option_num_contr and $show_bar != "NO")

} # fine if ($mostra_tab_principale != "NO")

} # fine if ($tipo_tabella == "prenotazioni" and $priv_vedi_tab_prenotazioni != "n")





if ($tipo_tabella == "costi" and $priv_vedi_tab_costi != "n") {

if (defined("C_MASSIMO_NUM_COSTI") and C_MASSIMO_NUM_COSTI != 0) {
$num_costi_esistenti = esegui_query("select idcosti from $tablecosti");
$num_costi_esistenti = numlin_query($num_costi_esistenti);
if ($num_costi_esistenti >= (C_MASSIMO_NUM_COSTI + 1)) {
$priv_ins_spese = "n";
$priv_ins_entrate = "n";
} # fine if ($num_costi_esistenti >= (C_MASSIMO_NUM_COSTI + 1))
} # fine if (defined("C_MASSIMO_NUM_COSTI") and C_MASSIMO_NUM_COSTI != 0)

if ($idcosti and !$torna_alla_tab) {
$tabelle_lock = array("$tablecosti");
$tabelle_lock = lock_tabelle($tabelle_lock);
$idcosti = aggslashdb($idcosti);
$costo = esegui_query("select * from $tablecosti where idcosti = '$idcosti'");
if (numlin_query($costo) == 0) $continua = "NO";
else {
$utente_inserimento = risul_query($costo,0,"utente_inserimento");
if ($priv_vedi_tab_costi == "p" and $id_utente != $utente_inserimento) $continua = "NO";
if ($priv_vedi_tab_costi == "g" and !$utenti_gruppi[$utente_inserimento]) $continua = "NO";
} # fine else if (numlin_query($costo) == 0)
if ($continua != "NO") {
$nome_costo = risul_query($costo,0,'nome_costo');
$val_costo = risul_query($costo,0,'val_costo');
$tipo_costo = risul_query($costo,0,'tipo_costo');
$provenienza_costo = risul_query($costo,0,'provenienza_costo');
$datains_costo = risul_query($costo,0,'datainserimento');
if (!$cancella) {
if ($tipo_costo == "s") {
echo mex("Sei sicuro di voler cancellare la spesa",$pag)." \"$nome_costo\" ".mex("del valore di",$pag)." $val_costo $Euro?";
} # fine if ($tipo_costo == "s")
if ($tipo_costo == "e") {
echo mex("Sei sicuro di voler cancellare l'entrata",$pag)." \"$nome_costo\" ".mex("del valore di",$pag)." $val_costo $Euro?";
} # fine if ($tipo_costo == "e")
echo "<br><form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"idcosti\" value=\"$idcosti\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"provenienza_costo\" value=\"$provenienza_costo\">
<input type=\"hidden\" name=\"val_costo\" value=\"$val_costo\">
<input class=\"sbutton\" type=\"submit\" name=\"cancella\" value=\"".mex("SI",$pag)."\">
<input class=\"sbutton\" type=\"submit\" name=\"torna_alla_tab\" value=\"".mex("NO",$pag)."\">
</div></form>";
} # fine if (!$cancella)

else {
if ($provenienza_costo == "p" and $anno >= substr($datains_costo,0,4)) {
$costo0 = esegui_query("select * from $tablecosti where idcosti = 0");
$costo0 = risul_query($costo0,0,'val_costo');
$costo0 = $costo0 - $val_costo;
esegui_query("update $tablecosti set val_costo = '$costo0' where idcosti = 0 ");
} # fine if ($provenienza_costo == "p" and $anno >= substr($datains_costo,0,4))
esegui_query("delete from $tablecosti where idcosti = $idcosti");
echo mex("Entrata o spesa",$pag)." $idcosti ".mex("cacellata",$pag).".<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
} # fine else if (!$cancella)
} # fine if ($continua != "NO")
else {
echo mex("Costo o spesa già cancellati",$pag)."<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
} # fine else if (numlin_query($costo) != 0)
unlock_tabelle($tabelle_lock);
} # fine if ($idcosti and !$torna_alla_tab)

else {


echo "<h3>".mex("Tabella con tutte le spese del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Natura_spesa",$pag)."</td>
<td>".mex("Importo",$pag)."</td>
<td>".mex("Inserita_da",$pag)."</td>
<td>".mex("Data_di_inserimento",$pag)."</td>";
if ($priv_ins_spese == "s") echo "<td>".mex("Cancella",$pag)."</td>";
echo "</tr>";

if ($priv_vedi_tab_costi == "p" or $priv_vedi_tab_costi == "g") {
$condizione_costi_propri = "and ( utente_inserimento = '$id_utente'";
if ($priv_vedi_tab_costi == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_costi_propri .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_tab_costi == "g")
$condizione_costi_propri .= " )";
} # fine if ($priv_vedi_tab_costi == "p" or $priv_vedi_tab_costi == "g")
else $condizione_costi_propri = "";

$costi = esegui_query("select * from $tablecosti where tipo_costo = 's' $condizione_costi_propri order by idcosti");
$num_costi = numlin_query($costi);

for ($num1 = 0 ; $num1 < $num_costi ; $num1++) {
$idcosti = risul_query($costi,$num1,'idcosti');
$nome_costo = risul_query($costi,$num1,'nome_costo');
$val_costo = risul_query($costi,$num1,'val_costo');
$persona_costo =risul_query($costi,$num1,'persona_costo');
if (!$persona_costo) $persona_costo = "&nbsp;";
$datainserimento = risul_query($costi,$num1,'datainserimento');
$datainserimento = substr($datainserimento,0,10);
$datainserimento_f = formatta_data($datainserimento,$stile_data);
#$string = substr($datainserimento, 6, 9);
#$datainserimento = preg_replace("/$string/","",$datainserimento);
$val_costo_p = punti_in_num($val_costo,$stile_soldi);
echo "<tr><td>$nome_costo</td>
<td>$val_costo_p</td>
<td>$persona_costo</td>
<td>$datainserimento_f</td>";
if ($priv_ins_spese == "s") echo "<td><a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idcosti=$idcosti\">".mex("cancella",$pag)."</a></td>";
echo "</tr>";
$spese_TOT = $spese_TOT + $val_costo;
} # fine for $num1

$spese_TOT_p = punti_in_num($spese_TOT,$stile_soldi);
echo "<tr><td><b><i>".mex("TOTALE",$pag)."</i></b></td>
<td>$spese_TOT_p</td>
<td>&nbsp;</td>
<td>&nbsp;</td>";
if ($priv_ins_spese == "s") echo "<td>&nbsp;</td>";
echo "</tr></table><br><br>


<h3>".mex("Tabella con tutte le entrate del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Natura_entrata",$pag)."</td>
<td>".mex("Importo",$pag)."</td>
<td>".mex("Inserita_da",$pag)."</td>
<td>".mex("Data_di_inserimento",$pag)."</td>";
if ($priv_ins_entrate == "s") echo "<td>".mex("Cancella",$pag)."</td>";
echo "</tr>";

$costi = esegui_query("select * from $tablecosti where tipo_costo = 'e' $condizione_costi_propri order by idcosti");
$num_costi = numlin_query($costi);

for ($num1 = 0 ; $num1 < $num_costi ; $num1 = $num1 + 1) {
$idcosti = risul_query($costi,$num1,'idcosti');
$nome_costo = risul_query($costi,$num1,'nome_costo');
$val_costo = risul_query($costi,$num1,'val_costo');
$persona_costo =risul_query($costi,$num1,'persona_costo');
if (!$persona_costo) { $persona_costo = "&nbsp;"; }
$datainserimento = risul_query($costi,$num1,'datainserimento');
$datainserimento = substr($datainserimento, 0, 10);
$datainserimento_f = formatta_data($datainserimento,$stile_data);
#$string = substr($datainserimento, 6, 9);
#$datainserimento = preg_replace("/$string/","",$datainserimento);
$provenienza_costo = risul_query($costi,$num1,'provenienza_costo');
if ($provenienza_costo == "p") { $nome_costo = $nome_costo."(*)"; }
$val_costo_p = punti_in_num($val_costo,$stile_soldi);
echo "<tr><td>$nome_costo</td>
<td>$val_costo_p</td>
<td>$persona_costo</td>
<td>$datainserimento_f</td>";
if ($priv_ins_entrate == "s") echo "<td><a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idcosti=$idcosti\">".mex("cancella",$pag)."</a></td>";
echo "</tr>";
$entrate_TOT = $entrate_TOT + $val_costo;
} # fine for $num1

$cassa = $entrate_TOT - $spese_TOT;
$cassa_p = punti_in_num($cassa,$stile_soldi);
$entrate_TOT_p = punti_in_num($entrate_TOT,$stile_soldi);
echo "<tr><td><b><i>".mex("TOTALE",$pag)."</i></b></td>
<td>$entrate_TOT_p</td>
<td>&nbsp;</td>
<td>&nbsp;</td>";
if ($priv_ins_entrate == "s") echo "<td>&nbsp;</td>";
echo "</tr></table>
<div style=\"text-align: center;\">* ".mex("entrata presa dalle prenotazioni",$pag)."
<br><br><big><big>".mex("Totale in cassa",$pag).": <b>$cassa_p</b> $Euro.</big></big></div><br>

<table style=\"margin-left: auto; margin-right: auto;\"><tr>";
if ($priv_ins_spese == "s" or $priv_ins_entrate == "s") {
echo "<td><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"costi.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("Inserisci nuove spese o entrate",$pag)."\">
</div></form></div></td>";
} # fine if ($priv_ins_spese == "s" or $priv_ins_entrate == "s")
echo "<td><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"storia_soldi.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("Storia entrate-uscite prenotazioni",$pag)."\">
</div></form></div></td></tr></table>";

} # fine else if ($idcosti and !$torna_alla_tab)

} # fine if ($tipo_tabella == "costi" and $priv_vedi_tab_costi != "n")





if ($tipo_tabella == "periodi" and $priv_vedi_tab_periodi != "n") {

$attiva_tariffe_consentite_ut = $attiva_tariffe_consentite;
$tariffe_consentite_vett_ut = $tariffe_consentite_vett;
$attiva_costi_agg_consentiti_ut = $attiva_costi_agg_consentiti;
$costi_agg_consentiti_vett_ut = $costi_agg_consentiti_vett;
if ($priv_vedi_tab_periodi == "g") {
$priv_vedi_tab_periodi = "p";
while (list($idut_gr,$val) = each($attiva_tariffe_consentite_gr)) if ($val == "n") $attiva_tariffe_consentite = "n";
unset($tariffe_consentite_vett);
while (list($idut_gr,$val) = each($tariffe_consentite_vett_gr)) {
if (is_array($val)) {
$tar_cons_vett_tmp = $val;
while (list($tar,$val) = each($tar_cons_vett_tmp)) if ($val == "SI") $tariffe_consentite_vett[$tar] = "SI";
} # fine if (is_array($val))
} # fine (list($idut_gr,$val) = each($tariffe_consentite_vett_gr))
$attiva_costi_agg_consentiti = $attiva_costi_agg_consentiti_gr;
$costi_agg_consentiti_vett = $costi_agg_consentiti_vett_gr;
} # fine if ($priv_vedi_tab_periodi == "g")

if ((($idntariffe and $priv_canc_costi_agg != "n") or ($per_comm_canc and $priv_mod_tariffe != "n" and ($attiva_tariffe_consentite_ut == "n" or $tariffe_consentite_vett_ut[$numtariffa] == "SI")))  and !$torna_alla_tab) {

if ($idntariffe) {
$per_comm_canc = "";
$tabelle_lock = array($tablenometariffe);
$tabelle_lock = lock_tabelle($tabelle_lock);
$idntariffe = aggslashdb($idntariffe);
$costo_agg = esegui_query("select * from $tablenometariffe where idntariffe = '$idntariffe' ");
if (numlin_query($costo_agg) == 1) $nome_costo_agg = risul_query($costo_agg,0,"nomecostoagg");
else $nome_costo_agg = "";
if (!$cancella) {
echo mex("Sei sicuro di voler cancellare il costo aggiuntivo",$pag)." \"<b>$nome_costo_agg</b>\"?<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"idntariffe\" value=\"$idntariffe\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"d_nome_costo_agg\" value=\"".htmlspecialchars($nome_costo_agg)."\">
<input class=\"sbutton\" type=\"submit\" name=\"cancella\" value=\"".mex("SI",$pag)."\">
<input class=\"sbutton\" type=\"submit\" name=\"torna_alla_tab\" value=\"".mex("NO",$pag)."\">
</div></form>";
} # fine if (!$cancella)

else {
if (controlla_num_pos($idntariffe) == "NO" or $idntariffe <= 10) $cancella = "";
if ($attiva_costi_agg_consentiti_ut != "n" and $costi_agg_consentiti_vett_ut[$idntariffe] != "SI") $cancella = "";
if (!$nome_costo_agg or $nome_costo_agg != $d_nome_costo_agg) $cancella = "";
if (!$cancella) echo mex("Il costo aggiuntivo è cambiato nel frattempo, non è stato cancellato",$pag).".<br>";
else {
esegui_query("delete from $tablenometariffe where idntariffe = '$idntariffe'");
echo mex("Il costo aggiuntivo",$pag)." \"<b>$nome_costo_agg</b>\" ".mex("è stato cancellato",$pag).".<br>";
} # fine else if (!$cancella)
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
} # fine else if (!$cancella)
unlock_tabelle($tabelle_lock);

if ($cancella) {
$file_interconnessioni = "./dati/dati_interconnessioni.php";
if (@is_file($file_interconnessioni)) {
include($file_interconnessioni);
if (@is_array($ic_present)) {
$interconn_dir = opendir("./includes/interconnect/");
while ($mod_ext = readdir($interconn_dir)) {
if ($mod_ext != "." and $mod_ext != ".." and @is_dir("./includes/interconnect/$mod_ext")) {
include("./includes/interconnect/$mod_ext/name.php");
if ($ic_present[$interconnection_name] == "SI") {
$funz_update_rates = "update_rates_".$interconnection_name;
if (!function_exists($funz_update_rates)) include("./includes/interconnect/$mod_ext/functions.php");
$funz_update_rates($file_interconnessioni,$anno,$PHPR_TAB_PRE,1);
} # fine if ($ic_present[$interconnection_name] == "SI")
} # fine if ($modello_ext != "." and $modello_ext != ".." and...
} # fine while ($mod_ext = readdir($interconn_dir))
closedir($interconn_dir);
} # fine if (@is_array($ic_present))
} # fine if (@is_file($file_interconnessioni))
} # fine if ($cancella)
} # fine if ($idntariffe)

if ($per_comm_canc) {
$tabelle_lock = array($tableregole);
$altre_tab_lock = array($tableperiodi);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$numtariffa = aggslashdb($numtariffa);
$ini_comm = explode("-",$per_comm_canc);
$fine_comm = $ini_comm[1];
$ini_comm = $ini_comm[0];
if (!$numtariffa or controlla_num_pos($numtariffa) != "SI") $numtariffa = "-1";
if (!$ini_comm or controlla_num_pos($ini_comm) != "SI") $ini_comm = "-1";
if (!$fine_comm or controlla_num_pos($fine_comm) != "SI") $fine_comm = "-1";
$comm = esegui_query("select * from $tableregole where tariffa_commissioni = '$numtariffa' and iddatainizio = '$ini_comm' and iddatafine = '$fine_comm' ");
if (numlin_query($comm) != 1) $errore = 1;
if (!$cancella and !$errore) {
$ini_comm = esegui_query("select * from $tableperiodi where idperiodi = '$ini_comm' ");
$ini_comm = formatta_data(risul_query($ini_comm,0,'datainizio'),$stile_data);
$fine_comm = esegui_query("select * from $tableperiodi where idperiodi = '$fine_comm' ");
$fine_comm = formatta_data(risul_query($fine_comm,0,'datafine'),$stile_data);
echo mex("Sei sicuro di voler cancellare le commissioni dal",$pag)." $ini_comm ".mex("al",$pag)." $fine_comm ".mex("sulla tariffa",$pag)." <b>$numtariffa</b>?<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"idntariffe\" value=\"$idntariffe\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"numtariffa\" value=\"$numtariffa\">
<input type=\"hidden\" name=\"per_comm_canc\" value=\"$per_comm_canc\">
<input class=\"sbutton\" type=\"submit\" name=\"cancella\" value=\"".mex("SI",$pag)."\">
<input class=\"sbutton\" type=\"submit\" name=\"torna_alla_tab\" value=\"".mex("NO",$pag)."\">
</div></form>";
} # fine if (!$cancella and !$errore)

else {
if ($errore) echo mex("Le commissioni sono cambiate nel frattempo, non sono state cancellate",$pag).".<br>";
else {
$idreg = risul_query($comm,0,'idregole');
esegui_query("delete from $tableregole where idregole = '$idreg'");
echo mex("Le commissioni sono state cancellate",$pag).".<br>";
} # fine else if (!$cancella)
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
} # fine else if ($errore)
unlock_tabelle($tabelle_lock);
} # fine if ($per_comm_canc)

} # fine if ((($idntariffe and $priv_canc_costi_agg != "n") or...

else {



if ($aggiungi and $id_utente == 1) {
$tableperiodi_prec = "";
if ($importa_prezzi) {
$anno_prec_esist = esegui_query("select * from $tableanni where idanni = '".($anno - 1)."' ");
if (numlin_query($anno_prec_esist) == 1) {
$tipo_per_prec = risul_query($anno_prec_esist,0,'tipo_periodi');
if ($tipo_per_prec == $tipo_periodi) $tableperiodi_prec = $PHPR_TAB_PRE."periodi".($anno - 1);
} # fine if (numlin_query($anno_prec_esist) == 1)
} # fine if ($importa_prezzi)
$tabelle_lock = array($tableperiodi);
$altre_tab_lock = array($tablenometariffe,$tableutenti,$tableprivilegi);
if ($tableperiodi_prec) $altre_tab_lock = array($tablenometariffe,$tableperiodi_prec,$tableutenti,$tableprivilegi);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
if ($tipo_periodi == "g") $aggiungi_giorni = 1;
else $aggiungi_giorni = 7;
$data_fine_periodi = esegui_query("select max(idperiodi) from $tableperiodi");
$data_fine_periodi = risul_query($data_fine_periodi,0,0);
$idperiodi = $data_fine_periodi + 1;
$data_fine_periodi = esegui_query("select * from $tableperiodi where idperiodi = $data_fine_periodi");
$data_fine_periodi = risul_query($data_fine_periodi,0,'datafine');
$data_fine_periodi = explode("-",$data_fine_periodi);
$numgiorno = $data_fine_periodi[2];
$mese_cont = $data_fine_periodi[1];
$anno_cont = $data_fine_periodi[0];
if ($importa_prezzi) {
$rigatariffe = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
if ($tipo_importa != "giorn") $tipo_importa = "sett";
if ($tipo_periodi == "s") $tipo_importa = "sett";
} # fine if ($importa_prezzi)
if ($mese_fine <= 48 and $mese_fine >= $mese_cont) {

$date_option_agg = "";
$n_date_menu_agg = 0;
while ($mesecreato <= $mese_fine) {
$datainizio = date("Y-m-d" , mktime(0,0,0,$mese_cont,$numgiorno,$anno_cont));
$numgiorno = $numgiorno + $aggiungi_giorni;
$datafine = date("Y-m-d" , mktime(0,0,0,$mese_cont,$numgiorno,$anno_cont));
$annocreato = date("Y" , mktime(0,0,0,$mese_cont,$numgiorno,$anno_cont));
$mesecreato = date("n" , mktime(0,0,0,$mese_cont,$numgiorno,$anno_cont));
if ($annocreato > $anno) {
$diff = $annocreato - $anno;
$mesecreato = ($diff * 12) + $mesecreato;
} # fine if ($annocreato > $anno)
esegui_query("insert into $tableperiodi (idperiodi,datainizio,datafine) values ($idperiodi,'$datainizio','$datafine')");

if ($importa_prezzi) {
$anno_datainizio = substr($datainizio,0,4);
$datainizio_prec = "";
if ($tipo_importa == "giorn") $datainizio_prec = date("Y-m-d", mktime(0,0,0,substr($datainizio,5,2),substr($datainizio,8,2),($anno_datainizio - 1)));
if ($tipo_importa == "sett") {
$g_sett_dataini = date("D", mktime(0,0,0,substr($datainizio,5,2),substr($datainizio,8,2),$anno_datainizio));
for ($num1 = 0 ; $num1 < 7 ; $num1++) {
$g_sett_dataini_prec = date("D", mktime(0,0,0,substr($datainizio,5,2),(substr($datainizio,8,2) + $num1),($anno_datainizio - 1)));
if ($g_sett_dataini_prec == $g_sett_dataini) $datainizio_prec = date("Y-m-d", mktime(0,0,0,substr($datainizio,5,2),(substr($datainizio,8,2) + $num1),($anno_datainizio - 1)));
} # fine for $num1
} # fine if ($tipo_importa == "sett")
if ($anno_datainizio > $anno) $tableperiodi_corr = $tableperiodi;
else $tableperiodi_corr = $tableperiodi_prec;
if ($tableperiodi_corr and $datainizio_prec) {
$prezzi_prec = esegui_query("select * from $tableperiodi_corr where datainizio = '$datainizio_prec' ");
if (numlin_query($prezzi_prec) == 1) {
for ($num1 = 1 ; $num1 <= $numero_tariffe ; $num1++) {
$prezzo_prec = @risul_query($prezzi_prec,0,"tariffa$num1");
if ((string) $prezzo_prec != "") esegui_query("update $tableperiodi set tariffa$num1 = '$prezzo_prec' where idperiodi = '$idperiodi' ");
} # fine for $num1
} # fine if (numlin_query($prezzi_prec) == 1)
} # fine if ($tableperiodi_corr and...
} # fine if ($importa_prezzi)

$nome_giorno = date("D",mktime(0,0,0,$mese_cont,$numgiorno,$anno_cont));
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>
";

$idperiodi = $idperiodi + 1;
} # fine while ($mesecreato <= $mese_fine)


$periodi = esegui_query("select * from $tableperiodi order by idperiodi");
$num_periodi = numlin_query($periodi);
$utenti = esegui_query("select * from $tableutenti order by idutenti");
$num_utenti = numlin_query($utenti);
include("./dati/lingua.php");
$lingua_mex2 = $lingua_mex;

for ($num_utente = 0 ; $num_utente < $num_utenti ; $num_utente++) {
$id_utente_cambia = risul_query($utenti,$num_utente,'idutenti');
if ($id_utente_cambia != 1) {
$anno_attivato = esegui_query("select anno from $tableprivilegi where idutente = '$id_utente_cambia' and anno = '$anno' ");
$anno_attivato = numlin_query($anno_attivato);
} # fine if ($id_utente_cambia != 1)
if ($id_utente_cambia == 1 or $anno_attivato) {

$lingua_mex = $lingua[$id_utente_cambia];
$numgiorno = risul_query($periodi,0,'datainizio');
$numgiorno = explode("-",$numgiorno);
$mese_ini = $numgiorno[1];
$numgiorno = $numgiorno[2];
$selectperiodi_vecchio = implode("",file("./dati/selectperiodi$anno.$id_utente_cambia.php"));
$fileaperto = fopen("./dati/selectperiodi$anno.$id_utente_cambia.php","w+");
flock($fileaperto,2);
$date_option = "";
$n_date_menu = 0;
for ($num1 = 0 ; $num1 < $num_periodi ; $num1++) {
$datainizio = date("Y-m-d" , mktime(0,0,0,$mese_ini,$numgiorno,$anno));
$nome_giorno = date("D" , mktime(0,0,0,$mese_ini,$numgiorno,$anno));
$numgiorno = $numgiorno + $aggiungi_giorni;
if ($tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex(" Do","inizio.php");
if ($nome_giorno == "Mon") $nome_giorno = mex(" Lu","inizio.php");
if ($nome_giorno == "Tue") $nome_giorno = mex(" Ma","inizio.php");
if ($nome_giorno == "Wed") $nome_giorno = mex(" Me","inizio.php");
if ($nome_giorno == "Thu") $nome_giorno = mex(" Gi","inizio.php");
if ($nome_giorno == "Fri") $nome_giorno = mex(" Ve","inizio.php");
if ($nome_giorno == "Sat") $nome_giorno = mex(" Sa","inizio.php");
} # fine if ($tipo_periodi == "g")
else $nome_giorno = "";
$nome_mese = substr($datainizio,5,2);
if ($nome_mese == "01") $nome_mese = mex("Gen","inizio.php");
if ($nome_mese == "02") $nome_mese = mex("Feb","inizio.php");
if ($nome_mese == "03") $nome_mese = mex("Mar","inizio.php");
if ($nome_mese == "04") $nome_mese = mex("Apr","inizio.php");
if ($nome_mese == "05") $nome_mese = mex("Mag","inizio.php");
if ($nome_mese == "06") $nome_mese = mex("Giu","inizio.php");
if ($nome_mese == "07") $nome_mese = mex("Lug","inizio.php");
if ($nome_mese == "08") $nome_mese = mex("Ago","inizio.php");
if ($nome_mese == "09") $nome_mese = mex("Set","inizio.php");
if ($nome_mese == "10") $nome_mese = mex("Ott","inizio.php");
if ($nome_mese == "11") $nome_mese = mex("Nov","inizio.php");
if ($nome_mese == "12") $nome_mese = mex("Dic","inizio.php");
$numero_giorno = substr($datainizio,8,2);
$numero_anno = substr($datainizio,0,4);
if (!$date_option) {
$a_ini_menu = substr($datainizio,0,4);
$m_ini_menu = (substr($datainizio,5,2) - 1);
$g_ini_menu = substr($datainizio,8,2);
} # fine if (!$date_option)
$n_date_menu++;
$date_option .= "<option value=\\\"$datainizio\\\">$nome_mese $numero_giorno$nome_giorno, $numero_anno</option>
";
} # fine for $num1

$datafine = date("Y-m-d",mktime(0,0,0,$mese_ini,$numgiorno,$anno));
$nome_giorno = date("D",mktime(0,0,0,$mese_ini,$numgiorno,$anno));
if ($tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex(" Do","inizio.php");
if ($nome_giorno == "Mon") $nome_giorno = mex(" Lu","inizio.php");
if ($nome_giorno == "Tue") $nome_giorno = mex(" Ma","inizio.php");
if ($nome_giorno == "Wed") $nome_giorno = mex(" Me","inizio.php");
if ($nome_giorno == "Thu") $nome_giorno = mex(" Gi","inizio.php");
if ($nome_giorno == "Fri") $nome_giorno = mex(" Ve","inizio.php");
if ($nome_giorno == "Sat") $nome_giorno = mex(" Sa","inizio.php");
} # fine if ($tipo_periodi == "g")
else $nome_giorno = "";
$nome_mese = substr($datafine,5,2);
if ($nome_mese == "01") $nome_mese = mex("Gen","inizio.php");
if ($nome_mese == "02") $nome_mese = mex("Feb","inizio.php");
if ($nome_mese == "03") $nome_mese = mex("Mar","inizio.php");
if ($nome_mese == "04") $nome_mese = mex("Apr","inizio.php");
if ($nome_mese == "05") $nome_mese = mex("Mag","inizio.php");
if ($nome_mese == "06") $nome_mese = mex("Giu","inizio.php");
if ($nome_mese == "07") $nome_mese = mex("Lug","inizio.php");
if ($nome_mese == "08") $nome_mese = mex("Ago","inizio.php");
if ($nome_mese == "09") $nome_mese = mex("Set","inizio.php");
if ($nome_mese == "10") $nome_mese = mex("Ott","inizio.php");
if ($nome_mese == "11") $nome_mese = mex("Nov","inizio.php");
if ($nome_mese == "12") $nome_mese = mex("Dic","inizio.php");
$numero_giorno = substr($datafine,8,2);
$numero_anno = substr($datafine,0,4);
$n_date_menu++;
$date_option .= "<option value=\\\"$datafine\\\">$nome_mese $numero_giorno$nome_giorno, $numero_anno</option>
";
fwrite($fileaperto,"<?php 

\$y_ini_menu[0] = \"$a_ini_menu\";
\$m_ini_menu[0] = \"$m_ini_menu\";
\$d_ini_menu[0] = \"$g_ini_menu\";
\$n_dates_menu[0] = \"$n_date_menu\";
\$d_increment[0] = \"$aggiungi_giorni\";
\$d_names = \"\\\"".mex(" Do","inizio.php")."\\\",\\\"".mex(" Lu","inizio.php")."\\\",\\\"".mex(" Ma","inizio.php")."\\\",\\\"".mex(" Me","inizio.php")."\\\",\\\"".mex(" Gi","inizio.php")."\\\",\\\"".mex(" Ve","inizio.php")."\\\",\\\"".mex(" Sa","inizio.php")."\\\"\";
\$m_names = \"\\\"".mex("Gen","inizio.php")."\\\",\\\"".mex("Feb","inizio.php")."\\\",\\\"".mex("Mar","inizio.php")."\\\",\\\"".mex("Apr","inizio.php")."\\\",\\\"".mex("Mag","inizio.php")."\\\",\\\"".mex("Giu","inizio.php")."\\\",\\\"".mex("Lug","inizio.php")."\\\",\\\"".mex("Ago","inizio.php")."\\\",\\\"".mex("Set","inizio.php")."\\\",\\\"".mex("Ott","inizio.php")."\\\",\\\"".mex("Nov","inizio.php")."\\\",\\\"".mex("Dic","inizio.php")."\\\"\";

\$dates_options_list = \"

$date_option
\";

?>");
flock($fileaperto,3);
fclose($fileaperto);

$selperiodimenu_vecchio = implode("",file("./dati/selperiodimenu$anno.$id_utente_cambia.php"));
if ($selperiodimenu_vecchio == $selectperiodi_vecchio) copy ("./dati/selectperiodi$anno.$id_utente_cambia.php","./dati/selperiodimenu$anno.$id_utente_cambia.php");
else {
$date_option_agg_ut = $date_option_agg;
if ($tipo_periodi == "g") {
$date_option_agg_ut = str_replace("[Sun]",mex(" Do","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[Mon]",mex(" Lu","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[Tue]",mex(" Ma","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[Wed]",mex(" Me","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[Thu]",mex(" Gi","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[Fri]",mex(" Ve","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[Sat]",mex(" Sa","inizio.php"),$date_option_agg_ut);
} # fine if ($tipo_periodi == "g")
$date_option_agg_ut = str_replace("[01]",mex("Gen","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[02]",mex("Feb","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[03]",mex("Mar","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[04]",mex("Apr","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[05]",mex("Mag","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[06]",mex("Giu","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[07]",mex("Lug","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[08]",mex("Ago","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[09]",mex("Set","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[10]",mex("Ott","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[11]",mex("Nov","inizio.php"),$date_option_agg_ut);
$date_option_agg_ut = str_replace("[12]",mex("Dic","inizio.php"),$date_option_agg_ut);
unset($y_ini_menu);
unset($m_ini_menu);
unset($d_ini_menu);
unset($n_dates_menu);
unset($d_increment);
include("./dati/selperiodimenu$anno.$id_utente_cambia.php");
$num_periodi_vecchi = count($y_ini_menu);
$fileaperto = fopen("./dati/selperiodimenu$anno.$id_utente_cambia.php","w+");
flock($fileaperto,2);
fwrite($fileaperto,"<?php 

");
for ($num1 = 0 ; $num1 < $num_periodi_vecchi ; $num1++) {
fwrite($fileaperto,"\$y_ini_menu[$num1] = \"".$y_ini_menu[$num1]."\";
\$m_ini_menu[$num1] = \"".$m_ini_menu[$num1]."\";
\$d_ini_menu[$num1] = \"".$d_ini_menu[$num1]."\";
\$n_dates_menu[$num1] = \"".$n_dates_menu[$num1]."\";
\$d_increment[$num1] = \"".$d_increment[$num1]."\";
");
} # fine for $num1
fwrite($fileaperto,"\$y_ini_menu[$num_periodi_vecchi] = \"$a_ini_menu_agg\";
\$m_ini_menu[$num_periodi_vecchi] = \"$m_ini_menu_agg\";
\$d_ini_menu[$num_periodi_vecchi] = \"$g_ini_menu_agg\";
\$n_dates_menu[$num_periodi_vecchi] = \"$n_date_menu_agg\";
\$d_increment[$num_periodi_vecchi] = \"$aggiungi_giorni\";
\$partial_dates = 1;
\$d_names = \"\\\"".mex(" Do","inizio.php")."\\\",\\\"".mex(" Lu","inizio.php")."\\\",\\\"".mex(" Ma","inizio.php")."\\\",\\\"".mex(" Me","inizio.php")."\\\",\\\"".mex(" Gi","inizio.php")."\\\",\\\"".mex(" Ve","inizio.php")."\\\",\\\"".mex(" Sa","inizio.php")."\\\"\";
\$m_names = \"\\\"".mex("Gen","inizio.php")."\\\",\\\"".mex("Feb","inizio.php")."\\\",\\\"".mex("Mar","inizio.php")."\\\",\\\"".mex("Apr","inizio.php")."\\\",\\\"".mex("Mag","inizio.php")."\\\",\\\"".mex("Giu","inizio.php")."\\\",\\\"".mex("Lug","inizio.php")."\\\",\\\"".mex("Ago","inizio.php")."\\\",\\\"".mex("Set","inizio.php")."\\\",\\\"".mex("Ott","inizio.php")."\\\",\\\"".mex("Nov","inizio.php")."\\\",\\\"".mex("Dic","inizio.php")."\\\"\";

\$dates_options_list = \"

".trim(addslashes($dates_options_list))."
$date_option_agg_ut
\";

?>");
flock($fileaperto,3);
fclose($fileaperto);
} # fine else if ($selperiodimenu_vecchio == $selectperiodi_vecchio)

} # fine if ($id_utente_cambia == 1 or $anno_attivato)
} # fine for $num_utente
$lingua_mex = $lingua_mex2;

if ($importa_prezzi) {
$file_interconnessioni = "./dati/dati_interconnessioni.php";
if (@is_file($file_interconnessioni)) {
include($file_interconnessioni);
if (@is_array($ic_present)) {
$interconn_dir = opendir("./includes/interconnect/");
while ($mod_ext = readdir($interconn_dir)) {
if ($mod_ext != "." and $mod_ext != ".." and @is_dir("./includes/interconnect/$mod_ext")) {
include("./includes/interconnect/$mod_ext/name.php");
if ($ic_present[$interconnection_name] == "SI") {
include("./includes/interconnect/$mod_ext/functions.php");
$funz_update_rates = "update_rates_".$interconnection_name;
$funz_update_rates($file_interconnessioni,$anno,$PHPR_TAB_PRE,1);
} # fine if ($ic_present[$interconnection_name] == "SI")
} # fine if ($modello_ext != "." and $modello_ext != ".." and...
} # fine while ($mod_ext = readdir($interconn_dir))
closedir($interconn_dir);
} # fine if (@is_array($ic_present))
} # fine if (@is_file($file_interconnessioni))
} # fine if ($importa_prezzi)

} # fine if ($mese_fine <= 48 and $mese_fine >= $mese_cont)

$datafine_f = formatta_data($datafine,$stile_data);
echo mex("I periodi sono stati aggiunti fino al",$pag)." $datafine_f.<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
unlock_tabelle($tabelle_lock);
} # fine if ($aggiungi and $id_utente == 1)


else {



$anno_attuale = date("Y",(time() + (C_DIFF_ORE * 3600)));
if (C_CANCELLA_ANNO_ATTUALE == "NO" and $anno != $anno_attuale) {
$anno_attuale_esistente = esegui_query("select * from $tableanni where idanni = $anno_attuale");
if (numlin_query($anno_attuale_esistente) == 0) $anno_attuale = $anno;
} # fine if (C_CANCELLA_ANNO_ATTUALE == "NO" and $anno != $anno_attuale)
if ($cancella_anno and $id_utente == 1 and (C_CANCELLA_ANNO_ATTUALE != "NO" or $anno != $anno_attuale)) {
if (!$continua) {
$tabelle_lock = array("$tableanni");
$tabelle_lock = lock_tabelle($tabelle_lock);
echo "<br><big>".mex("<b style=\"color: red;\">ATTENZIONE</b>: premendo su <b>\"<i>Continua</i>\"</b>, tutti i dati riguardanti l'anno",$pag)." <b><i>$anno</i></b> ".mex("verranno <b>cancellati</b>",$pag)."!</big><br><br>
<div style=\"text-align: center;\"><form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"cancella_anno\" value=\"$cancella_anno\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"continua\" value=\"".mex("Continua",$pag)."\">
</div></form><br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"".mex("Torna indietro",$pag)."\">
</div></form></div><br>";
unlock_tabelle($tabelle_lock);
} # fine if (!$continua)

else {
$filelock = fopen("./dati/anni.lock","w+");
flock($filelock,2);
$tabelle_lock = array($tableanni,$tableprenota,$tablenometariffe,$tableperiodi,$tablecosti,$tableregole,$tablesoldi,$tableinterconnessioni,$tablepersonalizza,$tableprivilegi);
$tabelle_lock = lock_tabelle($tabelle_lock);
$anno_esiste = esegui_query("select * from $tableanni where idanni = $anno");
if (numlin_query($anno_esiste) > 0) {
if (@unlink("./dati/selectperiodi$anno.$id_utente.php")) {
unlink("./dati/selperiodimenu$anno.$id_utente.php");
esegui_query("drop table $tableprenota");
esegui_query("drop table $tablecostiprenota");
esegui_query("drop table $tablerclientiprenota");
esegui_query("drop table $tablenometariffe");
esegui_query("drop table $tableperiodi");
esegui_query("drop table $tablecosti");
esegui_query("drop table $tableregole");
esegui_query("drop table $tablesoldi");
esegui_query("delete from $tablepersonalizza where idpersonalizza = 'giorno_vedi_ini_sett$anno'");
esegui_query("delete from $tableanni where idanni = '$anno'");
esegui_query("delete from $tableinterconnessioni where anno = '$anno'");
$utenti_privilegi = esegui_query("select idutente from $tableprivilegi where anno = '$anno' ");
for ($num1 = 0 ; $num1 < numlin_query($utenti_privilegi) ; $num1++) {
$idutente_priv = risul_query($utenti_privilegi,$num1,'idutente');
unlink("./dati/selectperiodi$anno.$idutente_priv.php");
unlink("./dati/selperiodimenu$anno.$idutente_priv.php");
} # fine for $num1
esegui_query("delete from $tableprivilegi where anno = '$anno'");
echo mex("L'anno",$pag)." $anno ".mex("è stato cancellato dal batabase",$pag).".<br>";
} # fine if (unlink("./dati/selectperiodi$anno.$id_utente.php"))
else $cancellato = "NO";
} # fine if (numlin_query($anno_esiste) > 0)
else $cancellato = "NO";
if ($cancellato == "NO") {
echo mex("Non è stato possibile cancellare l'anno",$pag)." $anno ".mex("dal database, controllare i permessi sulla cartella dati",$pag).".<br>";
} # fine if ($cancellato == "NO")
unlock_tabelle($tabelle_lock);
flock($filelock,3);
fclose($filelock);
unlink("./dati/anni.lock");
} # fine else if (!$continua)
} # fine if ($cancella_anno and $id_utente == 1 and (C_CANCELLA_ANNO_ATTUALE != "NO" or $anno != $anno_attuale))

else {


if ($ins_form_tabella == "SI" and $priv_mod_tariffe != "n") {
$mostra_pag_principale = "NO";
$tabelle_lock = array("$tableperiodi");
$altre_tab_lock = array("$tablenometariffe");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$rigatariffe = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
$lista_periodi = explode(",",aggslashdb($lista_periodi));
$lista_sett_in_per = explode(",",aggslashdb($lista_sett_in_per));
$num_periodi = count($lista_periodi);
$casella_sbagliata = "NO";
for ($num1 = 0 ; $num1 < $num_periodi ; $num1++) {
$periodo = $lista_periodi[$num1];
if (str_replace("-","",$periodo) != $periodo) {
$periodo = explode("-",$periodo);
$iniperiodo = $periodo[0];
$fineperiodo = $periodo[1];
} # fine if (str_replace("-","",$periodo) != $periodo)
else {
$iniperiodo = $periodo;
$fineperiodo = $periodo;
} # fine else if (str_replace("-","",$periodo) != $periodo)
$prezzo_esist = esegui_query("select * from $tableperiodi where idperiodi = '$iniperiodo' ");
for ($num2 = 1 ; $num2 <= $numero_tariffe ; $num2++) {
if ($attiva_tariffe_consentite_ut == "n" or $tariffe_consentite_vett_ut[$num2] == "SI") {
if (!$tariffe_sel or ${"tariffa_sel".$num2}) {
$prezzo = formatta_soldi(${"per".$iniperiodo."tar".$num2});
if (controlla_soldi($prezzo) != "NO") {
if ((string) $prezzo != (string) risul_query($prezzo_esist,0,"tariffa$num2") or $lista_sett_in_per[$num1] > 1) {
if (strcmp($prezzo,"")) {
if ($lista_sett_in_per[$num1] == 1) esegui_query("update $tableperiodi set tariffa$num2 = '$prezzo' where idperiodi >= '$iniperiodo' and idperiodi <= '$fineperiodo' ");
else {

unset($prezzo_vett);
$num_sett = $lista_sett_in_per[$num1];
$prezzo_int = floor($prezzo);
$resto_int = $prezzo - (double) $prezzo_int;
$prezzo_sett = floor($prezzo_int / (double) $num_sett);
for ($num3 = 1 ; $num3 <= $num_sett ; $num3++) $prezzo_vett[$num3] = $prezzo_sett;
$resto = $prezzo_int - ($prezzo_sett * $num_sett);
if ($resto >= 1) {
$prezzo_vett[1]++;
$resto--;
} # fine if ($resto >= 1)
for ($num3 = $num_sett ; $num3 > ($num_sett - $resto) ; $num3--) $prezzo_vett[$num3]++;
$prezzo_vett[1] += $resto_int;
for ($num3 = $iniperiodo ; $num3 <= $fineperiodo ; $num3++) {
for ($num4 = 1 ; $num4 <= $num_sett ; $num4++) {
if ($num4 != 1) $num3++;
if ($num3 <= $fineperiodo) esegui_query("update $tableperiodi set tariffa$num2 = '".$prezzo_vett[$num4]."' where idperiodi = '$num3' ");
} # fine for $num4
} # fine for $num3

} # fine else if ($lista_sett_in_per[$num1] == 1)
} # fine if (strcmp($prezzo,""))
else esegui_query("update $tableperiodi set tariffa$num2 = NULL where idperiodi >= '$iniperiodo' and idperiodi <= '$fineperiodo' ");
} # fine if ((string) $prezzo != (string) risul_query($prezzo_esist,0,"tariffa$num2") or...
} # fine if (controlla_soldi($prezzo) != "NO")
else $casella_sbagliata = "SI";
} # fine if (!$tariffe_sel or ${"tariffa_sel".$num2})
} # fine if ($attiva_tariffe_consentite_ut == "n" or...
} # fine for $num2
} # fine for $num1
unlock_tabelle($tabelle_lock);

$file_interconnessioni = "./dati/dati_interconnessioni.php";
if (@is_file($file_interconnessioni)) {
include($file_interconnessioni);
if (@is_array($ic_present)) {
$interconn_dir = opendir("./includes/interconnect/");
while ($mod_ext = readdir($interconn_dir)) {
if ($mod_ext != "." and $mod_ext != ".." and @is_dir("./includes/interconnect/$mod_ext")) {
include("./includes/interconnect/$mod_ext/name.php");
if ($ic_present[$interconnection_name] == "SI") {
include("./includes/interconnect/$mod_ext/functions.php");
$funz_update_rates = "update_rates_".$interconnection_name;
$funz_update_rates($file_interconnessioni,$anno,$PHPR_TAB_PRE,1);
} # fine if ($ic_present[$interconnection_name] == "SI")
} # fine if ($modello_ext != "." and $modello_ext != ".." and...
} # fine while ($mod_ext = readdir($interconn_dir))
closedir($interconn_dir);
} # fine if (@is_array($ic_present))
} # fine if (@is_file($file_interconnessioni))

if ($casella_sbagliata == "SI") echo "".mex("<div style=\"display: inline; color: red;\">Non</div> è stato possibile inserire alcuni prezzi",$pag).".<br>";
echo "".mex("I prezzi sono stati aggiornati",$pag).".<br><br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Torna indietro",$pag)."\">
</div></form>";
} # fine if ($ins_form_tabella == "SI" and...


if ($mostra_pag_principale != "NO") {

include("./includes/funzioni_tariffe.php");
include("./includes/funzioni_costi_agg.php");
$dati_tariffe = dati_tariffe($tablenometariffe,"","",$tableregole);

echo "<h3>".mex("Tabella con periodi e relative tariffe del",$pag)." $anno.</h3>";
if ($form_tabella) {
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">
<input type=\"hidden\" name=\"ins_form_tabella\" value=\"SI\">
<input type=\"hidden\" name=\"tariffe_sel\" value=\"$tariffe_sel\">";
if ($tariffe_sel) {
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa++) {
if (${"tariffa_sel".$numtariffa}) echo "<input type=\"hidden\" name=\"tariffa_sel$numtariffa\" value=\"".${"tariffa_sel".$numtariffa}."\">";
} # fine for $numtariffa
} # fine if ($tariffe_sel)
} # fine if ($form_tabella)
elseif (!$tariffe_sel) {
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">
<input type=\"hidden\" name=\"tariffe_sel\" value=\"SI\">";
} # fine elseif (!$tariffe_sel)
if ($tariffe_sel) {
$lista_tariffe_sel = "tariffe_sel=$tariffe_sel";
for ($num1 = 1 ; $num1 <= $dati_tariffe['num'] ; $num1++) if (${"tariffa_sel".$num1}) $lista_tariffe_sel .= "&amp;tariffa_sel$num1=".${"tariffa_sel".$num1};
} # fine ($tariffe_sel)
else $lista_tariffe_sel = "";

echo "<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">";
$riga_tariffe_tab = "<tr><td><a href=\"./visualizza_tabelle.php?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=periodi&amp;mos_tutti_per=SI&amp;form_tabella=$form_tabella&amp;$lista_tariffe_sel\">N°</a></td>
<td>".mex("Inizio_$parola_settimana",$pag)."</td>
<td>".mex("Fine_$parola_settimana",$pag)."</td>";
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa = $numtariffa + 1) {
if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$numtariffa] == "SI") {
if (!$tariffe_sel or ${"tariffa_sel".$numtariffa}) {
$tariffa = "tariffa".$numtariffa;
$nometariffa = $dati_tariffe[$tariffa]['nome'];
$nometariffa_vedi = "<a href=\"./tab_tariffe.php?anno=$anno&amp;id_sessione=$id_sessione&amp;numtariffa1=$numtariffa\">";
if ($nometariffa == "") {
$nometariffa = $tariffa;
$nometariffa_vedi .= mex("tariffa",$pag).$numtariffa."</a>";
} # fine if ($nometariffa == "")
else {
#$nometariffa = str_replace(" ","&nbsp;",$nometariffa);
if (num_caratteri_testo($nometariffa) > 10) $nometariffa_vedi .= mex("tariffa",$pag).$numtariffa."</a><br><small><small>$nometariffa</small></small>";
else $nometariffa_vedi .= mex("tariffa",$pag).$numtariffa."</a><br>".$nometariffa;
} # fine else if ($nometariffa == "")
if ($dati_tariffe[$tariffa]['moltiplica'] == "p") $nometariffa_vedi .= "<br><small><small>(".mex("per persona",$pag).")</small></small>";
$riga_tariffe_tab .= "<td valign=\"top\">$nometariffa_vedi</td>";
} # fine if (!$tariffe_sel or ${"tariffa_sel".$numtariffa})
} # fine if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or...
} # fine for $numtariffa
$riga_tariffe_tab .= "</tr>";
echo $riga_tariffe_tab;

if (!$form_tabella and !$tariffe_sel) {
echo "<tr><td colspan=\"3\">
<input class=\"smallsbutton\" type=\"submit\" value=\"".mex("Mostra solo tariffe selezionate",$pag)."\">
</td>";
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa++) {
if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$numtariffa] == "SI") {
echo "<td><input type=\"checkbox\" name=\"tariffa_sel$numtariffa\" value=\"SI\" style=\"width: 14px; height: 12px;\"></td>";
} # fine if ($priv_vedi_tab_periodi != "p" or...
} # fine for $numtariffa
echo "</tr>";
} # fine if (!$form_tabella and !$tariffe_sel)

if ($mos_tutti_per == "SI") $periodi = esegui_query("select * from $tableperiodi order by idperiodi");
else {
$oggi = date("Y-m-d",(time() + (C_DIFF_ORE * 3600)));
$periodi = esegui_query("select * from $tableperiodi where datafine >= '$oggi' order by idperiodi");
if (!numlin_query($periodi) or $oggi > ($anno + 1)."-01-10") $periodi = esegui_query("select * from $tableperiodi order by idperiodi");
} # fine else if ($mos_tutti_per == "SI")
$num_periodi = numlin_query($periodi);

include("./dati/selperiodimenu$anno.$id_utente.php");
$raggr_per = 0;
$date_menu = array();
for ($num1 = 0 ; $num1 <  count($d_increment) ; $num1++) if ($d_increment[$num1] != 1) $raggr_per = 1;
if ($raggr_per = 1 and $mos_per_sing != "SI") {
$datafine_periodi = explode("<option value=\"",$dates_options_list);
$num_dp = count($datafine_periodi);
for ($num1 = 1 ; $num1 < $num_dp ; $num1++) $date_menu[substr($datafine_periodi[$num1],0,10)] = 1;
$datafine_periodi = substr($datafine_periodi[($num_dp - 1)],0,10);
} # fine if ($raggr_per = 1 and $mos_per_sing != "SI")
else $datafine_periodi = "1970-01-01";

$n_righe = 0;
$riga_prezzi_prec = "";
$riga_prezzi_prec_r = "";
$lista_periodi = "";
$lista_sett_in_per = "";
for ($num1 = 0 ; $num1 < $num_periodi  ; $num1++) {
$idperiodi = risul_query($periodi,$num1,'idperiodi');
$idperiodi1 = $idperiodi;
$datainizio = risul_query($periodi,$num1,'datainizio');
$datainizio_f = formatta_data($datainizio,$stile_data);
$datafine = risul_query($periodi,$num1,'datafine');
$datafine_f = formatta_data($datafine,$stile_data);
$sett_in_per = 0;
while ($sett_in_per == 0 or ($datafine <= $datafine_periodi and !$date_menu[$datafine])) {
$sett_in_per++;
if ($sett_in_per > 1) {
$num1++;
$idperiodi = risul_query($periodi,$num1,'idperiodi');
$datafine = risul_query($periodi,$num1,'datafine');
$datafine_f = formatta_data($datafine,$stile_data);
} # fine if ($sett_in_per > 1)
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa++) {
$tariffa = "tariffa".$numtariffa;
$tar_corr = (string) risul_query($periodi,$num1,$tariffa);
if ($sett_in_per == 1 or !strcmp($tar_corr,"")) $$tariffa = $tar_corr;
elseif (strcmp($$tariffa,"")) $$tariffa += (double) $tar_corr;
} # fine for $numtariffa
} # fine while ($sett_in_per == 0 or...
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa++) {
$tariffa = "tariffa".$numtariffa;
if (!strcmp($$tariffa,"")) {
if (!$form_tabella) $$tariffa = "&nbsp;";
} # fine if (!strcmp($$tariffa,""))
elseif (!$form_tabella) $$tariffa = punti_in_num($$tariffa,$stile_soldi);
} # fine for $numtariffa
$riga_prezzi = "";
$riga_prezzi_r = "";
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa = $numtariffa + 1) {
if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$numtariffa] == "SI") {
if (!$tariffe_sel or ${"tariffa_sel".$numtariffa}) {
$tariffa = "tariffa".$numtariffa;
$tariffa = $$tariffa;
$riga_prezzi .= "<td>$tariffa</td>";
if (!$form_tabella or ($attiva_tariffe_consentite_ut != "n" and $tariffe_consentite_vett_ut[$numtariffa] != "SI")) $riga_prezzi_r .= "<td>$tariffa</td>";
else $riga_prezzi_r .= "<td><input type=\"text\" name=\"pertar$numtariffa\" value=\"$tariffa\" size=\"8\"></td>";
} # fine if (!$tariffe_sel or ${"tariffa_sel".$numtariffa})
} # fine if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or...
} # fine for $numtariffa
if ($riga_prezzi_prec != $riga_prezzi or $mos_tutti_per == "SI" or $sett_in_per_prec != $sett_in_per) {
if ($riga_prezzi_prec) {
if ($idperiodi_ini != $idperiodi_prec) $idperiodi_vedi = $idperiodi_ini."-".$idperiodi_prec;
else $idperiodi_vedi = $idperiodi_ini;
$lista_periodi .= "$idperiodi_vedi,";
$lista_sett_in_per .= "$sett_in_per_prec,";
if ($sett_in_per_prec > 1) $idperiodi_vedi .= "<a href=\"./$pag?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=periodi&amp;mos_per_sing=SI&amp;form_tabella=$form_tabella&amp;$lista_tariffe_sel\" STYLE=\"TEXT-DECORATION: NONE\" title=\"".mex("mostra prezzi $parola_settimanali",$pag)."\"><b style=\"font-weight: normal; color: #666666;\">&prime;</b></a><br>
<small><small>".str_replace(" ","&nbsp;","(".mex("periodi di",$pag)." $sett_in_per_prec ".mex("$parola_settimane",$pag).")")."</small></small>";
echo "<tr><td>$idperiodi_vedi</td>
<td>$datainizio_f_ini</td>
<td>$datafine_f_prec</td>";
if ($form_tabella) echo str_replace("name=\"pertar","name=\"per$idperiodi_ini"."tar",$riga_prezzi_prec_r);
else echo $riga_prezzi_prec_r;
echo "</tr>";
$n_righe++;
if ($form_tabella and $n_righe == 25) {
echo $riga_tariffe_tab;
$n_righe = 0;
} # fine if ($form_tabella and $n_righe == 25)
} # fine if ($riga_prezzi_prec)
$idperiodi_ini = $idperiodi1;
$datainizio_f_ini = $datainizio_f;
} # fine if ($riga_prezzi_prec != $riga_prezzi or...
$riga_prezzi_prec = $riga_prezzi;
$riga_prezzi_prec_r = $riga_prezzi_r;
$idperiodi_prec = $idperiodi;
$datafine_f_prec = $datafine_f;
$sett_in_per_prec = $sett_in_per;
} # fine for $num1
if ($idperiodi_ini != $idperiodi_prec) $idperiodi_vedi = $idperiodi_ini."-".$idperiodi_prec;
else $idperiodi_vedi = $idperiodi_ini;
if ($sett_in_per_prec > 1) $idperiodi_vedi .= "<br><small><small>$sett_in_per_prec $parola_settimane</small></small>";
$lista_periodi .= "$idperiodi_vedi,";
$lista_sett_in_per .= "$sett_in_per_prec,";
echo "<tr><td>$idperiodi_vedi</td>
<td>$datainizio_f_ini</td>
<td>$datafine_f_prec</td>
".str_replace("name=\"pertar","name=\"per$idperiodi_ini"."tar",$riga_prezzi_prec_r)."
</tr>";
echo "</table>";

if (!$form_tabella and !$tariffe_sel) echo "</div></form>";
if ($priv_mod_tariffe != "n") {
echo "<table><tr><td style=\"height: 2px;\"></td></tr></table><div style=\"text-align: center;\">";
if (!$form_tabella) {
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">
<input type=\"hidden\" name=\"mos_tutti_per\" value=\"$mos_tutti_per\">
<input type=\"hidden\" name=\"form_tabella\" value=\"SI\">
<input type=\"hidden\" name=\"mos_per_sing\" value=\"$mos_per_sing\">
<input type=\"hidden\" name=\"tariffe_sel\" value=\"$tariffe_sel\">";
if ($tariffe_sel) {
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa++) {
if (${"tariffa_sel".$numtariffa}) echo "<input type=\"hidden\" name=\"tariffa_sel$numtariffa\" value=\"".${"tariffa_sel".$numtariffa}."\">";
} # fine for $numtariffa
} # fine if ($tariffe_sel)
echo "<input class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica i campi della tabella",$pag)."\">
</div></form><br>";
if ($id_utente == 1) {
$data_fine_periodi = esegui_query("select max(idperiodi) from $tableperiodi");
$data_fine_periodi = risul_query($data_fine_periodi,0,0);
$data_fine_periodi = esegui_query("select * from $tableperiodi where idperiodi = $data_fine_periodi");
$data_fine_periodi = risul_query($data_fine_periodi,0,'datainizio');
$data_fine_periodi = explode("-",$data_fine_periodi);
$mese_fine_periodi = $data_fine_periodi[1] + (($data_fine_periodi[0] - $anno) * 12) + 1;
if ($mese_fine_periodi < 49) {
echo "<a name=\"agg_per\"></a>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">
<input class=\"sbutton\" type=\"submit\" name=\"aggiungi\" value=\"".mex("Aggiungi periodi",$pag)."\">
 ".mex("fino al mese",$pag)."
 <select name=\"mese_fine\">";
for ($num1 = $mese_fine_periodi ; $num1 <= 48 ; $num1 = $num1 + 1) {
$anno_ag = $anno;
if ($num1 > 12) $anno_ag = $anno + 1;
if ($num1 > 24) $anno_ag = $anno + 2;
if ($num1 > 36) $anno_ag = $anno + 3;
if ($num1 > 48) $anno_ag = $anno + 4;
$mese_ag = $num1 - (($anno_ag - $anno) * 12);
echo "<option value=\"$num1\">$mese_ag - $anno_ag</option>";
} # fine for $num1
echo "</select><br>
<small>(<input type=\"checkbox\" name=\"importa_prezzi\" value=\"SI\" style=\"width: 14px; height: 12px;\" checked>".mex("prova ad importare i prezzi",$pag);
if ($tipo_periodi == "g") {
echo ":<input type=\"radio\" name=\"tipo_importa\" value=\"giorn\" style=\"width: 14px; height: 12px;\" checked>".mex("giornalmente",$pag)."
<input type=\"radio\" name=\"tipo_importa\" value=\"sett\" style=\"width: 14px; height: 12px;\">".mex("settimanalmente",$pag)."";
} # fine if ($tipo_periodi == "g")
echo ")</small>.</div></form>
<table><tr><td style=\"height: 8px;\"></td></tr></table>";
} # fine if ($mese_fine_periodi < 49)
$anno_attuale = date("Y",(time() + (C_DIFF_ORE * 3600)));
if (C_CANCELLA_ANNO_ATTUALE == "NO" and $anno != $anno_attuale) {
$anno_attuale_esistente = esegui_query("select * from $tableanni where idanni = $anno_attuale");
if (numlin_query($anno_attuale_esistente) == 0) $anno_attuale = $anno;
} # fine if (C_CANCELLA_ANNO_ATTUALE == "NO" and $anno != $anno_attuale)
if (C_CANCELLA_ANNO_ATTUALE != "NO" or $anno != $anno_attuale) {
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"./visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">
<input class=\"sbutton\" type=\"submit\" name=\"cancella_anno\" value=\"".mex("Cancella",$pag)."\">
 ".mex("l'anno",$pag)." <b>$anno</b> ".mex("dal database",$pag).".
</div></form>";
} # fine if (C_CANCELLA_ANNO_ATTUALE != "NO" or $anno != $anno_attuale)
} # fine if ($id_utente == 1)
echo "</div>";
} # fine if (!$form_tabella)
else {
echo "<input type=\"hidden\" name=\"lista_periodi\" value=\"".substr($lista_periodi,0,-1)."\">
<input type=\"hidden\" name=\"lista_sett_in_per\" value=\"".substr($lista_sett_in_per,0,-1)."\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica i prezzi",$pag)."\">
</div></form><br>";
} # fine else if (!$form_tabella)
} # fine if ($priv_mod_tariffe != "n")

echo "<br><a name=\"tab_costi_agg\"></a><br><h3>".mex("Tabella con i costi aggiuntivi del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Nome",$pag)."</td>
<td>".mex("Tipo",$pag)."</td>
<td>".mex("Prezzo",$pag)."</td>
<td>".mex("Regole",$pag)."</td>
<td style=\"font-size: small;\">".mex("Tariffe abbinate",$pag)."</td>
<td style=\"font-size: x-small;\">".mex("Incompatibilità",$pag)."</td>";
$beni_inv_esist = esegui_query("select idbeniinventario from $tablebeniinventario limit 1");
$beni_inv_esist = numlin_query($beni_inv_esist);
if ($beni_inv_esist) echo "<td style=\"font-size: x-small;\">".mex("Beni inventario",$pag)."</td>";
echo "<td style=\"font-size: small;\">".mex("Periodi_permessi",$pag)."</td>";
if ($priv_mod_costi_agg != "n" or $priv_canc_costi_agg != "n") echo "<td>".mex("Modifica",$pag)."</td>";
echo "</tr>";
$dati_ca = dati_costi_agg_ntariffe($tablenometariffe,$dati_tariffe['num']);

for ($num1 = 0 ; $num1 < $num_periodi  ; $num1++) {
$idperiodi = risul_query($periodi,$num1,'idperiodi');
$datainizio_f_idperiodo[$idperiodi] = formatta_data(risul_query($periodi,$num1,'datainizio'),$stile_data);
$datafine_f_idperiodo[$idperiodi] = formatta_data(risul_query($periodi,$num1,'datafine'),$stile_data);
} # fine for $num1

for ($num1 = 0 ; $num1 < $dati_ca['num'] ; $num1++) {
if ($priv_vedi_tab_periodi != "p" or $attiva_costi_agg_consentiti == "n" or $costi_agg_consentiti_vett[$dati_ca[$num1]['id']] == "SI") {
$tariffe_abbinate = "";
$tariffe_incomp = "";
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa = $numtariffa + 1) {
if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$numtariffa] == "SI") {
$tariffa = "tariffa".$numtariffa;
$tariffa_abb = $dati_ca[$num1][$tariffa];
if ($tariffa_abb != "") {
$tariffe_abbinate .= "$numtariffa";
if (substr($tariffa_abb,0,1) == "|") $tariffa_abb = ">".substr($tariffa_abb,1);
if ($tariffa_abb != "s") $tariffe_abbinate .= "($tariffa_abb".mex("$lettera_s",$pag).")";
$tariffe_abbinate .= ", ";
} # fine if ($tariffa_abb != "")
if ($dati_ca[$num1]["incomp_".$tariffa] == "i") $tariffe_incomp .= $numtariffa.", ";
} # fine if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or...
} # fine for $numtariffa
if ($tariffe_abbinate == "") $tariffe_abbinate = "&nbsp;";
else {
$tariffe_abbinate = substr($tariffe_abbinate,0,-2);
if ($dati_ca[$num1]['var_tariffea'] == "s") $tariffe_abbinate .= "<small> (".mex("modifica con prenotazione",$pag).")</small>";
} # fine else if ($tariffe_abbinate == "")
$incomp = "";
if ($tariffe_incomp) {
$incomp .= "<small>".mex("Tariffe",$pag).":</small> ".substr($tariffe_incomp,0,-2);
if ($dati_ca[$num1]['var_tariffei'] == "s") $incomp .= "<small> (".mex("modifica con prenotazione",$pag).")</small>";
} # fine if ($tariffe_incomp)
$app_incomp = $dati_ca[$num1]['appincompatibili'];
if ($app_incomp) {
if ($incomp) $incomp .= " ";
$incomp .= "<small>".mex("Appartamenti",$pag).":</small> ".str_replace(",",", ",$app_incomp);
if ($dati_ca[$num1]['var_appi'] == "s") $incomp .= "<small> (".mex("modifica con prenotazione",$pag).")</small>";
} # fine if $app_incomp
if (!$incomp) $incomp = "&nbsp;";
if ($dati_ca[$num1]['tipo'] == "u") $tipo = mex("unico",$pag);
if ($dati_ca[$num1]['tipo'] == "s") $tipo = mex("$parola_settimanale",$pag);
if ($dati_ca[$num1]['tipo_val'] == "f") $tipo .= ", ".mex("fisso",$pag);
if ($dati_ca[$num1]['tipo_val'] == "p") $tipo .= ", ".mex("percentuale su tariffa",$pag);
if ($dati_ca[$num1]['tipo_val'] == "t") $tipo .= ", ".mex("percentuale su totale",$pag);
if ($dati_ca[$num1]['tipo_val'] == "c") $tipo .= ", ".mex("percentuale su caparra",$pag);
if ($dati_ca[$num1]['tipo_val'] == "r") $tipo .= ", ".mex("percentuale su resto caparra",$pag);
if ($dati_ca[$num1]['var_percentuale'] == "s") $tipo .= "<small> (".mex("modifica con prenotazione",$pag).")</small>";
$prezzo = $dati_ca[$num1]['valore'];
if ($dati_ca[$num1]['mostra'] == "n") $regole = mex("Non_mostrare",$pag);
if ($dati_ca[$num1]['mostra'] == "s") $regole = mex("Mostra",$pag);
if ($dati_ca[$num1]['raggruppa'] == "s") {
$regole .= "; ".mex("raggruppa",$pag);
if (strcmp($dati_ca[$num1]['categoria'],"")) $regole .= " (<em>".$dati_ca[$num1]['categoria']."</em>)";
} # fine if ($dati_ca[$num1]['raggruppa'] == "s")
if ($dati_ca[$num1]['associasett'] == "s") $regole .= "; ".mex("associato_a_$parola_settimane"."_specifi$sillaba_che",$pag);
if ($dati_ca[$num1]['associasett'] == "n") $regole .= "; ".mex("non_associato_a_$parola_settimane"."_specifi$sillaba_che",$pag);
if ($dati_ca[$num1]['numsett'] == "t") $regole .= "; ".mex("tutt$lettera_e",$pag).mex("_$parola_le",$pag).mex("_$parola_settimane",$pag);
if ($dati_ca[$num1]['numsett'] == "m") $regole .= "; ".mex("tutt$lettera_e",$pag).mex("_$parola_le",$pag).mex("_$parola_settimane",$pag);
if ($dati_ca[$num1]['sett_meno_una'] == "u") $regole .= mex("_meno_l'ultim$lettera_a",$pag);
if ($dati_ca[$num1]['sett_meno_una'] == "p") $regole .= mex("_meno_$parola_la"."_prim$lettera_a",$pag);
if ($dati_ca[$num1]['numsett'] == "c") $regole .= "; ".mex("con_n°_di_$parola_settimane",$pag).mex("_da_chiedere",$pag);
if ($dati_ca[$num1]['numsett'] == "s") $regole .= "; ".$dati_ca[$num1]['num_sett_prime'].mex("_$parola_settimane",$pag).mex("_si",$pag).mex("_e_",$pag).$dati_ca[$num1]['num_sett_seconde'].mex("_$parola_settimane",$pag).mex("_no",$pag);
if ($dati_ca[$num1]['numsett'] == "n") $regole .= "; ".$dati_ca[$num1]['num_sett_prime'].mex("_$parola_settimane",$pag).mex("_no",$pag).mex("_e_",$pag).$dati_ca[$num1]['num_sett_seconde'].mex("_$parola_settimane",$pag).mex("_si",$pag);
if ($dati_ca[$num1]['numsett'] == "g") {
$regole .= "; ".mex("giorni",$pag).":";
if (str_replace("1","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Lu","giorni_mesi.php"));
if (str_replace("2","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Ma","giorni_mesi.php"));
if (str_replace("3","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Me","giorni_mesi.php"));
if (str_replace("4","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Gi","giorni_mesi.php"));
if (str_replace("5","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Ve","giorni_mesi.php"));
if (str_replace("6","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Sa","giorni_mesi.php"));
if (str_replace("7","",$dati_ca[$num1]['giornisett']) != $dati_ca[$num1]['giornisett']) $regole .= str_replace(" ","_",mex(" Do","giorni_mesi.php"));
} # fine if ($dati_ca[$num1][numsett] == "g")
if ($dati_ca[$num1]['var_numsett'] == "s") $regole .= " (".mex("modifica con prenotazione",$pag).")";
if ($dati_ca[$num1]['moltiplica'] == "c") $regole .= "; ".mex("chidere_per_quanto_moltiplicare",$pag);
if ($dati_ca[$num1]['moltiplica'] == "p") $regole .= "; ".mex("moltiplicare_per_persone",$pag);
if ($dati_ca[$num1]['moltiplica'] == "t") $regole .= "; ".mex("moltiplicare_per_persone_totali",$pag);
if ($dati_ca[$num1]['var_moltiplica'] == "s") {
if ($dati_ca[$num1]['moltiplica'] == "1") $regole .= "; ".mex("moltiplicare_per_1",$pag);
$regole .= " (".mex("modifica con prenotazione",$pag).")";
} # fine if ($dati_ca[$num1]['var_moltiplica'] == "s")
if ($dati_ca[$num1]['letto'] == "s") $regole .= "; ".mex("cosiderare_come_letti_aggiuntivi",$pag);
if ($dati_ca[$num1]['numlimite']) $regole .= "; ".mex("massimo_",$pag).$dati_ca[$num1]['numlimite'].mex("_nell$lettera_a"."_stess$lettera_a"."_$parola_settimana",$pag);
if ($dati_ca[$num1]['assegna_da_ini_prenota']) {
$regole .= "; ".mex("assegna_se_",$pag);
if (substr($dati_ca[$num1]['assegna_da_ini_prenota'],0,1) == ">") $regole .= mex("più_di_",$pag);
else $regole .= mex("meno_di_",$pag);
$regole .= substr($dati_ca[$num1]['assegna_da_ini_prenota'],1).mex("_giorni_da_inizio",$pag);
} # fine if ($dati_ca[$num1][var_moltiplica] == "s")
if ($dati_ca[$num1]['assegna_con_num_prenota']) $regole .= "; ".mex("assegna_con_",$pag).$dati_ca[$num1]["assegna_con_num_prenota"].mex("_o_più_prenotazioni",$pag);
if ($dati_ca[$num1]['num_beniinv']) {
$beni_inv_elimina = "<small><small>";
for ($num2 = 0 ; $num2 < $dati_ca[$num1]['num_beniinv'] ; $num2++) {
$nome_bene = esegui_query("select * from $tablebeniinventario where idbeniinventario = '".$dati_ca[$num1]['id_beneinv'][$num2]."' ");
if (numlin_query($nome_bene)) $nome_bene = risul_query($nome_bene,0,'nome_bene');
else $nome_bene = "?";
$beni_inv_elimina .= $nome_bene." x ".$dati_ca[$num1]['molt_beneinv'][$num2].", ";
} # fine for $num2
$beni_inv_elimina = substr($beni_inv_elimina,0,-2);
if ($dati_ca[$num1]['tipo_beniinv'] == "mag") {
$nome_mag = esegui_query("select * from $tablemagazzini where idmagazzini = '".$dati_ca[$num1]['mag_beniinv']."' ");
if (numlin_query($nome_mag)) $nome_mag = risul_query($nome_mag,0,'nome_magazzino');
else $nome_mag = "?";
$beni_inv_elimina .= " ".mex("dal magazzino",$pag)." $nome_mag";
} # fine if ($dati_ca[$num1]['tipo_beniinv'] == "mag")
if ($dati_ca[$num1]['tipo_beniinv'] == "app") $beni_inv_elimina .= " ".mex("dall'appartamento",$pag)."";
if ($dati_ca[$num1]['var_beniinv'] == "s") $beni_inv_elimina .= " (".mex("modifica con prenotazione",$pag).")";
$beni_inv_elimina .= "</small></small>";
} # fine if ($dati_ca[$num1]['num_beniinv'])
else $beni_inv_elimina = "&nbsp;";
if ($dati_ca[$num1]['periodipermessi']) {
if ($dati_ca[$num1]['periodipermessi'] == "t") $periodi_permessi = "<small>".mex("Prenotazione intera in",$pag).":<br>";
if ($dati_ca[$num1]['periodipermessi'] == "u") $periodi_permessi = "<small>".mex("Parte della prentoazione in",$pag).":<br>";
if ($dati_ca[$num1]['periodipermessi'] == "p") $periodi_permessi = "<small>".mex("Solo $parola_settimane della prenotazione in",$pag).":<br>";
for ($num2 = 0 ; $num2 < count($dati_ca[$num1]['sett_periodipermessi_ini']) ; $num2++) {
if ($num2 > 0) $periodi_permessi .= mex(" o ",$pag);
$periodi_permessi .= $datainizio_f_idperiodo[$dati_ca[$num1]['sett_periodipermessi_ini'][$num2]].mex(" a ",$pag).$datafine_f_idperiodo[$dati_ca[$num1]['sett_periodipermessi_fine'][$num2]]."<br>";
} # fine for $num2
if ($dati_ca[$num1]['var_periodip'] == "s") $periodi_permessi .= " (".mex("modifica con prenotazione",$pag).")";
$periodi_permessi .= "</small>";
} # fine if ($dati_ca[$num1]['periodipermessi'])
else $periodi_permessi = mex("tutti",$pag);
if ($dati_ca[$num1]['tipo_val'] != "f") $prezzo_p = $prezzo."<small>".str_replace("_","&nbsp;",mex("% arrotondato_a_",$pag)).$dati_ca[$num1]['arrotonda']."</small>";
else $prezzo_p = punti_in_num($prezzo,$stile_soldi);
if ($dati_ca[$num1]['tasseperc']) $prezzo_p .= "<br><small>(".strtolower(mex("Tasse",$pag))."&nbsp;".$dati_ca[$num1]['tasseperc']."%)</small>";
echo "<tr><td>".$dati_ca[$num1]['nome']."</td>
<td>$tipo</td>
<td>$prezzo_p</td>
<td style=\"font-size: small;\">".str_replace("_","&nbsp;",$regole)."</td>
<td>$tariffe_abbinate</td>
<td>$incomp</td>";
if ($beni_inv_esist) echo "<td>$beni_inv_elimina</td>";
echo "<td>$periodi_permessi</td>";
if ($priv_mod_costi_agg != "n" or $priv_canc_costi_agg != "n") {
echo "<td>";
if ($attiva_costi_agg_consentiti_ut == "n" or $costi_agg_consentiti_vett_ut[$dati_ca[$num1]['id']] == "SI") {
if ($priv_mod_costi_agg != "n") echo "<a href=\"modifica_costi.php?anno=$anno&amp;id_sessione=$id_sessione&amp;idntariffe=".$dati_ca[$num1]['id']."\">".mex("modifica",$pag)."</a><br>";
if ($priv_canc_costi_agg != "n") echo "<a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idntariffe=".$dati_ca[$num1]['id']."\">".mex("cancella",$pag)."</a>";
} # fine if ($attiva_costi_agg_consentiti_ut == "n" or...
echo "</td>";
} # fine if ($priv_mod_costi_agg != "n" or $priv_canc_costi_agg != "n")
echo "</tr>";
} # fine if ($priv_vedi_tab_periodi != "p" or $attiva_costi_agg_consentiti == "n" or...
} # fine for $num1
echo "</table><br><br>";


echo "<h3>".mex("Caparre, commissioni e tasse del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">";
echo "<tr><td rowspan=\"2\">".mex("Tariffa",$pag)."</td>
<td colspan=\"2\">&nbsp;".mex("Caparra",$pag)."&nbsp;</td>
<td colspan=\"2\">&nbsp;".mex("Commissioni",$pag)."&nbsp;</td>
<td rowspan=\"2\">&nbsp;".mex("Tasse",$pag)."&nbsp;</td></tr>
<tr><td>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;".mex("Valore",$pag)."&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
<td>".str_replace("_","&nbsp;",mex("Arrotondato_a",$pag))."</td>
<td>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;".mex("Valore",$pag)."&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
<td>".str_replace("_","&nbsp;",mex("Arrotondato_a",$pag));
if ($priv_mod_tariffe != "n") echo "<br><small>(".str_replace("_","&nbsp;",mex("cancella_periodi",$pag)).")</small>";
echo "</td></tr>";
for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa = $numtariffa + 1) {
if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$numtariffa] == "SI") {
$tariffa = "tariffa".$numtariffa;
$nometariffa = $dati_tariffe[$tariffa]['nome'];
if ($nometariffa == "") $nometariffa_vedi = $numtariffa;
else {
if (num_caratteri_testo($nometariffa) > 10) $nometariffa_vedi = "$numtariffa <small><small>($nometariffa)</small></small>";
else $nometariffa_vedi = "$numtariffa ($nometariffa)";
} # fine else if ($nometariffa == "")

$caparra_percent = $dati_tariffe[$tariffa]['caparra_percent'];
if (!$caparra_percent) $caparra_percent = "&nbsp;";
else $caparra_percent = punti_in_num($caparra_percent,$stile_soldi);
$caparra_arrotond = $dati_tariffe[$tariffa]['caparra_arrotond'];
if ($caparra_arrotond == "val" or $caparra_arrotond == "gio") {
if ($caparra_arrotond == "val") {
$caparra_arrotond = "";
if ($caparra_percent != "&nbsp;") $caparra_percent .= " $Euro";
} # fine if ($caparra_arrotond == "val")
if ($caparra_arrotond == "gio") {
$caparra_arrotond = "";
if ($caparra_percent != "&nbsp;") {
if ($caparra_percent == 1) $caparra_percent .= " ".mex("$parola_settimana",$pag);
else $caparra_percent .= " ".mex("$parola_settimane",$pag);
} # fine if ($caparra_percent != "&nbsp;")
} # fine if ($caparra_arrotond == "gio")
} # fine if ($caparra_arrotond == "val" or $caparra_arrotond == "gio")
elseif ($caparra_percent != "&nbsp;") $caparra_percent .= "% ".mex("della tariffa",$pag)."";
$caparra_arrotond_p = punti_in_num($caparra_arrotond,$stile_soldi);
if (!$caparra_arrotond_p) $caparra_arrotond_p = "&nbsp;";
else $caparra_arrotond_p .= " $Euro";

$commissioni_percent = $dati_tariffe[$tariffa]['commissioni_percent']['def'];
if (!$commissioni_percent) $commissioni_percent = "&nbsp;";
else $commissioni_percent = punti_in_num($commissioni_percent,$stile_soldi);
$commissioni_arrotond = $dati_tariffe[$tariffa]['commissioni_arrotond']['def'];
if ($commissioni_arrotond == "val") {
$commissioni_arrotond = "";
if ($commissioni_percent != "&nbsp;") $commissioni_percent .= " $Euro";
} # fine if ($commissioni_arrotond == "val")
elseif ($commissioni_percent != "&nbsp;") {
if ($dati_tariffe[$tariffa]['commissioni_base']['def'] == "t") $commissioni_percent .= "% ".mex("della tariffa",$pag)."";
if ($dati_tariffe[$tariffa]['commissioni_base']['def'] == "s") $commissioni_percent .= "% ".mex("della tariffa",$pag)." + ".mex("sconto",$pag)."";
if ($dati_tariffe[$tariffa]['commissioni_base']['def'] == "c") $commissioni_percent .= "% ".mex("della tariffa",$pag)." + ".mex("sconto",$pag)." + ".mex("costi agg.",$pag)."";
} # fine elseif ($commissioni_percent != "&nbsp;")
$commissioni_arrotond_p = punti_in_num($commissioni_arrotond,$stile_soldi);
if (!$commissioni_arrotond_p) $commissioni_arrotond_p = "&nbsp;";
else $commissioni_arrotond_p .= " $Euro";
if (@is_array($dati_tariffe[$tariffa]['commissioni_percent'])) {
$commissioni_periodi = "";
$arrotond_periodi = "";
reset($dati_tariffe[$tariffa]['commissioni_percent']);
while (list($per_comm,$val_comm) = each($dati_tariffe[$tariffa]['commissioni_percent'])) {
if ($per_comm != "def") {
$ini_comm = explode("-",$per_comm);
$fine_comm = $ini_comm[1];
$ini_comm = $ini_comm[0];
$ini_comm = esegui_query("select * from $tableperiodi where idperiodi = '$ini_comm' ");
$ini_comm = formatta_data(risul_query($ini_comm,0,'datainizio'),$stile_data);
$fine_comm = esegui_query("select * from $tableperiodi where idperiodi = '$fine_comm' ");
$fine_comm = formatta_data(risul_query($fine_comm,0,'datafine'),$stile_data);
$commissioni_periodi .= "<br>".punti_in_num($val_comm,$stile_soldi);
$comm_arr = $dati_tariffe[$tariffa]['commissioni_arrotond'][$per_comm];
if ($priv_mod_tariffe == "n" or ($attiva_tariffe_consentite_ut != "n" and $tariffe_consentite_vett_ut[$numtariffa] != "SI")) $link_cancella = "&nbsp;";
else $link_cancella = "<a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;per_comm_canc=$per_comm&amp;numtariffa=$numtariffa\">".mex("cancella",$pag)."</a>";
if ($comm_arr == "val") {
$commissioni_periodi .= "&nbsp;$Euro";
$arrotond_periodi .= "<br>$link_cancella<br>&nbsp;";
} # fine if ($comm_arr == "val")
else {
if ($dati_tariffe[$tariffa]['commissioni_base'][$per_comm] == "t") $commissioni_periodi .= "% ".mex("della tariffa",$pag)."";
if ($dati_tariffe[$tariffa]['commissioni_base'][$per_comm] == "s") $commissioni_periodi .= "<span class=\"wsnowrap\">% ".mex("della tariffa",$pag)." + ".mex("sconto",$pag)."</span>";
if ($dati_tariffe[$tariffa]['commissioni_base'][$per_comm] == "c") $commissioni_periodi .= "<span class=\"wsnowrap\">% ".mex("della tariffa",$pag)." + ".mex("sconto",$pag)."</span> + ".mex("costi agg.",$pag)."";
$arrotond_periodi .= "<br>".punti_in_num($comm_arr,$stile_soldi)."&nbsp;$Euro&nbsp;$link_cancella<br>&nbsp;";
} # fine else if ($comm_arr == "val")
$commissioni_periodi .= " ".mex("dal",$pag)."&nbsp;$ini_comm<br>".mex("al",$pag)."&nbsp;$fine_comm";
} # fine if ($per_comm != "def")
} # fine while (list($per_comm,$val_comm) = each($dati_tariffe[$tariffa]['commissioni_percent']))
if ($commissioni_periodi) {
$commissioni_percent .= "<small>$commissioni_periodi</small>";
$commissioni_arrotond_p .= "<small>$arrotond_periodi</small>";
} # fine if ($commissioni_periodi)
} # fine if (@is_array($dati_tariffe[$tariffa]['commissioni_percent']))

if ($dati_tariffe[$tariffa]['tasse_percent']) $tasse_percent = punti_in_num($dati_tariffe[$tariffa]['tasse_percent'],$stile_soldi)."%";
else $tasse_percent = "&nbsp;";
echo "<tr><td>$nometariffa_vedi</td>
<td>$caparra_percent</td>
<td>$caparra_arrotond_p</td>
<td>$commissioni_percent</td>
<td>$commissioni_arrotond_p</td>
<td>$tasse_percent</td></tr>";
} # fine if ($priv_vedi_tab_periodi != "p" or $attiva_tariffe_consentite == "n" or...
} # fine for $numtariffa
echo "</table>";


if ($priv_mod_tariffe != "n" or $priv_ins_costi_agg != "n") {
echo "<br><br><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"creaprezzi.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input class=\"sbutton\" type=\"submit\" name=\"insprezzi\" value=\"".mex("Vai alla pagina di inserzione prezzi",$pag)."\">
</div></form></div><br>";
} # fine if ($priv_mod_tariffe != "n" or $priv_ins_costi_agg != "n")

} # fine if ($mostra_pag_principale != "NO")
} # fine else if ($cancella_anno and $id_utente == 1)
} # fine else if ($aggiungi and $id_utente == 1)
} # fine else if ((($idntariffe and $priv_canc_costi_agg != "n") or...
} # fine if ($tipo_tabella == "periodi" and $priv_vedi_tab_periodi != "n")




if ($tipo_tabella == "clienti" and $vedi_clienti != "NO") {

if ($vedi_clienti == "PROPRI" or $vedi_clienti == "GRUPPI") {
$condizione_utente = "and ( utente_inserimento = '$id_utente'";
if ($vedi_clienti == "GRUPPI") {
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_utente .= " or utente_inserimento = '$idut_gr'";
} # fine if ($vedi_clienti == "GRUPPI")
$condizione_utente .= " )";
} # fine if ($vedi_clienti == "PROPRI" or $vedi_clienti == "GRUPPI")
else $condizione_utente = "";


if ($cancella_clienti == "SI" and $modifica_clienti != "NO") {
if ($modifica_clienti == "PROPRI" or $modifica_clienti == "GRUPPI") {
$condizione_utente_canc = "where ( utente_inserimento = '$id_utente'";
if ($modifica_clienti == "GRUPPI") {
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_utente_canc .= " or utente_inserimento = '$idut_gr'";
} # fine if ($modifica_clienti == "GRUPPI")
$condizione_utente_canc .= " )";
} # fine if ($modifica_clienti == "PROPRI" or $modifica_clienti == "GRUPPI")
else $condizione_utente_canc = "";
unset($cancella_cliente_id);
$anni = esegui_query("select * from $tableanni order by idanni");
$num_anni = numlin_query($anni);
$altre_tab_lock = array("$tableanni");
$num_lock = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
$altre_tab_lock[$num_lock] = $PHPR_TAB_PRE."prenota".risul_query($anni,$num1,'idanni');
$num_lock++;
} # fine for $num1
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
$altre_tab_lock[$num_lock] = $PHPR_TAB_PRE."rclientiprenota".risul_query($anni,$num1,'idanni');
$num_lock++;
} # fine for $num1
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
$altre_tab_lock[$num_lock] = $PHPR_TAB_PRE."soldi".risul_query($anni,$num1,'idanni');
$num_lock++;
} # fine for $num1
$tabelle_lock = array("$tableclienti");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$clienti = esegui_query("select * from $tableclienti $condizione_utente_canc");
$num_clienti = numlin_query($clienti);
for ($num1 = 0; $num1 < $num_clienti; $num1++) {
$idclienti = risul_query($clienti,$num1,'idclienti');
$prenota_cliente_esistente = "NO";
for ($num2 = 0 ; $num2 < $num_anni ; $num2++) {
$anno_mostra = risul_query($anni,$num2,'idanni');
$tableprenota_mostra = $PHPR_TAB_PRE."prenota".$anno_mostra;
$tablerclientiprenota_mostra = $PHPR_TAB_PRE."rclientiprenota".$anno_mostra;
$tablesoldi_mostra = $PHPR_TAB_PRE."soldi".$anno_mostra;
$prenotazioni = esegui_query("select * from $tableprenota_mostra where idclienti = '$idclienti'");
$ospiti = esegui_query("select * from $tablerclientiprenota_mostra where idclienti = '$idclienti'");
$soldi = esegui_query("select * from $tablesoldi_mostra where motivazione $LIKE '$idclienti".";%'");
if (numlin_query($prenotazioni) != 0 or numlin_query($ospiti) != 0 or numlin_query($soldi) != 0) {
$prenota_cliente_esistente = "SI";
break;
} # fine if (numlin_query($prenotazioni) != 0 or...
} # fine for $num2
if ($prenota_cliente_esistente == "NO") $cancella_cliente_id[$idclienti] = "SI";
} # fine for $num1
if (!$continua) {
echo "
".mex("Si è sicuri di voler <div style=\"display: inline; color: red;\"><b>cancellare",$pag)." ".count($cancella_cliente_id)." ".mex("clienti</b></div> che non sono associati a nessuna prenotazione e nessun pagamento",$pag)."?<br>
<table><tr><td style=\"height: 2px;\"></td></tr><tr><td>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"cancella_clienti\" value=\"SI\">
<input type=\"hidden\" name=\"continua\" value=\"SI\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("SI",$pag)."\">
</div></form></td><td>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("NO",$pag)."\">
</div></form></td></tr></table><br>";
} # fine if (!$continua)
else {
for ($num1 = 0; $num1 < $num_clienti; $num1++) {
$idclienti = risul_query($clienti,$num1,'idclienti');
if ($cancella_cliente_id[$idclienti] == "SI") {
$clienti_compagni = substr(risul_query($clienti,$num1,'idclienti_compagni'),1,-1);
if ($clienti_compagni) {
$clienti_compagni = esegui_query("select idclienti_compagni from $tableclienti where idclienti = '$idclienti' ");
$clienti_compagni = substr(risul_query($clienti_compagni,0,"idclienti_compagni"),1,-1);
if ($clienti_compagni) {
$clienti_compagni = explode(",",$clienti_compagni);
for ($num2 = 0 ; $num2 < count($clienti_compagni) ; $num2++) {
$idclienti_compagni = esegui_query("select idclienti_compagni from $tableclienti where idclienti = '".$clienti_compagni[$num2]."' ");
$idclienti_compagni = str_replace(",".$idclienti.",",",",risul_query($idclienti_compagni,0,'idclienti_compagni'));
esegui_query("update $tableclienti set idclienti_compagni = '$idclienti_compagni' where idclienti = '".$clienti_compagni[$num2]."' ");
} # fine for $num2
} # fine if ($clienti_compagni)
} # fine if ($clienti_compagni)
esegui_query("delete from $tableclienti where idclienti = '$idclienti'");
} # fine if ($cancella_cliente_id[$idclienti] == "SI")
} # fine for $num1
echo mex("Cancellati",$pag)." ".count($cancella_cliente_id)." ".mex("clienti",$pag).".<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("OK",$pag)."\">
</div></form>";
} # fine else if (!$continua)
unlock_tabelle($tabelle_lock);
} # fine if ($cancella_clienti == "SI" and..

else {


if (get_magic_quotes_gpc()) $cognome_cerca = stripslashes($cognome_cerca);
$cognome_cerca = htmlspecialchars($cognome_cerca);
if ($cognome_cerca) {
if (str_replace("@","",$cognome_cerca) == $cognome_cerca) $chiamati = " ".mex("chiamati",$pag)." $cognome_cerca";
else $chiamati = " ".mex("con email",$pag)." $cognome_cerca";
} # fine if ($cognome_cerca)
echo "<table class=\"buttonbar\"><tr><td>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
".mex("Cerca i clienti con cognome o email",$pag)."
<input type=\"text\" name=\"cognome_cerca\" size=\"15\">
</div></form></td><td style=\"width: 50px;\"></td>";
if ($modifica_clienti != "NO") {
echo "<td align=\"right\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"cancella_clienti\" value=\"SI\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Cancella i clienti senza prenotazioni",$pag)."\">
</div></form></td>";
} # fine if ($modifica_clienti != "NO")
echo "</tr></table>
<h3>".mex("Tabella con tutti i clienti",$pag)."$chiamati.</h3><br>";

if ($cognome_cerca) {
$cognome_cerca = aggslashdb($cognome_cerca);
if (str_replace("@","",$cognome_cerca) == $cognome_cerca) $clienti = esegui_query("select * from $tableclienti where cognome $ILIKE '%$cognome_cerca%' $condizione_utente order by cognome ");
else $clienti = esegui_query("select * from $tableclienti where email $ILIKE '%$cognome_cerca%' $condizione_utente order by cognome ");
if ($priv_mod_prenota_iniziate != "s") $id_periodo_corrente = calcola_id_periodo_corrente($anno);
} # fine if ($cognome_cerca)
else $clienti = esegui_query("select * from $tableclienti where max_num_ordine = 1 $condizione_utente order by cognome");
$num_clienti = numlin_query($clienti);

$num_clienti_mostra = esegui_query("select valpersonalizza_num from $tablepersonalizza where idpersonalizza = 'num_righe_tab_tutti_clienti' and idutente = '$id_utente'");
$num_clienti_mostra = risul_query($num_clienti_mostra,0,'valpersonalizza_num');
$num_pagine = ceil($num_clienti/$num_clienti_mostra);
$pagina_clienti = $pagina_clienti + 1;
$cliente_inizio = 0 + ($pagina_clienti -1)*$num_clienti_mostra;
$cliente_fine = $num_clienti_mostra + ($pagina_clienti -1)*$num_clienti_mostra;
if ($cliente_fine > $num_clienti) { $cliente_fine = $num_clienti; }
if ($num_clienti > $num_clienti_mostra) {
echo "<div style=\"text-align: center;\">";
if ($pagina_clienti > 1) { 
echo "<a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;pagina_clienti=".($pagina_clienti-2)."&amp;cognome_cerca=$cognome_cerca\"><small>&lt;- ".mex("pag. prec.",$pag)."</small></a>";
} # fine if ($pagina_clienti > 1)
echo "&nbsp;(".mex("pagina",$pag)." $pagina_clienti ".mex("di",$pag)." $num_pagine)&nbsp;";
if ($pagina_clienti < $num_pagine) { 
echo "<a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;pagina_clienti=$pagina_clienti&amp;cognome_cerca=$cognome_cerca\"><small>".mex("pag. succ.",$pag)." -&gt;</small></a>";
} # fine if 
echo "</div>";
} # fine if ($num_clienti > $num_clienti_mostra)

echo "<table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>N°</td>
<td>".mex("Cognome",$pag)."</td>
<td>".mex("Nome",$pag)."</td>
<td>".mex("Nazione",$pag)."</td>
<td>".mex("Città",$pag)."</td>
<td>".mex("Telefono",$pag)."</td>
<td>".mex("Email",$pag)."</td>
<td>".mex("CAP",$pag)."</td>
<td>".mex("Indirizzo",$pag)."</td>";
/*echo "<td>".mex("Fax",$pag)."</td>
<td class=\"smallfont\">".mex("Data_di_nascita",$pag)."</td>
<td>".mex("2°telefono",$pag)."</td>";*/
echo "<td>".mex("Commento",$pag)."</td>";
if ($cognome_cerca) echo "<td class=\"xsmallfont\">".mex("Prenotazioni anno corrente",$pag)."</td>";
echo "</tr>";

for ($num1 = 0 ; $num1 < $num_clienti ; $num1++) {
$idclienti = risul_query($clienti,$num1,'idclienti');
$lista_clienti_contr .= ",".$idclienti;
if ($num1 >= $cliente_inizio and $num1 < $cliente_fine) {
$cognome = risul_query($clienti,$num1,'cognome');
$nome = risul_query($clienti,$num1,'nome');
if (!$nome) $nome = "&nbsp;";
$telefono = risul_query($clienti,$num1,'telefono');
if (!$telefono) $telefono = "&nbsp;";
$via = risul_query($clienti,$num1,'via');
$numcivico = risul_query($clienti,$num1,'numcivico');
$indirizzo = $via ." ". $numcivico;
if ($indirizzo == " ") $indirizzo = "&nbsp;";
$citta = risul_query($clienti,$num1,'citta');
if (!$citta) $citta = "&nbsp;";
$nazione = risul_query($clienti,$num1,'nazione');
if (!$nazione) $nazione = "&nbsp;";
$cap = risul_query($clienti,$num1,'cap');
if (!$cap) $cap = "&nbsp;";
$fax = risul_query($clienti,$num1,'fax');
if (!$fax) $fax = "&nbsp;";
$email = risul_query($clienti,$num1,'email');
if (num_caratteri_testo($email) > 22) $email_vedi = "<small><small>".str_replace(",",", ",$email)."</small></small>";
else $email_vedi = $email;
$datanascita = risul_query($clienti,$num1,'datanascita');
if (!$datanascita) $datanascita_f = "&nbsp;";
else $datanascita_f = formatta_data($datanascita,$stile_data);
$telefono2 = risul_query($clienti,$num1,'telefono2');
if (!$telefono2) $telefono2 = "&nbsp;";
$telefono3 = risul_query($clienti,$num1,'telefono3');
if (!$telefono3) $telefono3 = "&nbsp;";
$commento = risul_query($clienti,$num1,'commento');
if (!$commento) $commento = "&nbsp;";

if ($cognome_cerca) {
$prenota_anno_corr = "";
$tutte_prenota_mod = "";
$prenotazioni = esegui_query("select distinct $tableprenota.idprenota,$tableprenota.idclienti,$tableprenota.utente_inserimento,$tableprenota.idappartamenti,$tableprenota.commento,$tableprenota.iddatainizio,$tableprenota.iddatafine,$tableprenota.num_persone,$tableprenota.caparra,$tableprenota.pagato,$tableprenota.tariffa_tot,$tableprenota.datainserimento from $tableprenota left outer join $tablerclientiprenota on $tableprenota.idprenota = $tablerclientiprenota.idprenota where $tableprenota.idclienti = '$idclienti' or $tablerclientiprenota.idclienti = '$idclienti' order by $tableprenota.idprenota ");
$num_prenotazioni = numlin_query($prenotazioni);
if ($num_prenotazioni) {
for ($num2 = 0 ; $num2 < $num_prenotazioni ; $num2++) {
$utente_inserimento_prenota = risul_query($prenotazioni,$num2,'utente_inserimento',$tableprenota);
if ($priv_vedi_tab_prenotazioni == "s" or ($priv_vedi_tab_prenotazioni == "p" and $utente_inserimento_prenota == $id_utente) or ($priv_vedi_tab_prenotazioni == "g" and $utenti_gruppi[$utente_inserimento_prenota])) {
$numero = risul_query($prenotazioni,$num2,'idprenota',$tableprenota);
$id_data_inizio = risul_query($prenotazioni,$num2,'iddatainizio',$tableprenota);
$link_modifica = "SI";
if ($priv_mod_prenotazioni == "n") $link_modifica = "NO";
if ($priv_mod_prenotazioni == "p" and $utente_inserimento_prenota != $id_utente) $link_modifica = "NO";
if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento_prenota]) $link_modifica = "NO";
if ($priv_mod_prenota_iniziate != "s" and $id_periodo_corrente >= $id_data_inizio) $link_modifica = "NO";
if ($priv_mod_prenota_ore != "000") {
$adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600)));
$data_ins = risul_query($prenotazioni,$num2,'datainserimento',$tableprenota);
$limite = date("YmdHis",mktime((substr($data_ins,11,2) + $priv_mod_prenota_ore),substr($data_ins,14,2),substr($data_ins,17,2),substr($data_ins,5,2),substr($data_ins,8,2),substr($data_ins,0,4)));
if ($adesso > $limite) $link_modifica = "NO";
} # fine if ($priv_mod_prenota_ore != "000")
if ($prenota_anno_corr) $prenota_anno_corr .= " ";
if ($link_modifica != "SI") $prenota_anno_corr .= $numero;
else {
$prenota_anno_corr .= "<a href=\"modifica_prenota.php?id_prenota=$numero&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=clienti\">$numero</a>";
$tutte_prenota_mod .= ",$numero";
} # fine else if ($link_modifica != "SI")
} # fine if ($priv_vedi_tab_prenotazioni == "s" or ($priv_vedi_tab_prenotazioni == "p" and...
} # fine for $num2
$tutte_prenota_mod = substr($tutte_prenota_mod,1);
if (str_replace(",","",$tutte_prenota_mod) != $tutte_prenota_mod) $prenota_anno_corr .= " <a href=\"modifica_prenota.php?id_prenota=$tutte_prenota_mod&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=clienti\">".mex("tutte",$pag)."</a>";
} # fine if ($num_prenotazioni)
if (!strcmp($prenota_anno_corr,"")) $prenota_anno_corr = "&nbsp;";
} # fine if ($cognome_cerca)

$mostra_link = "SI";
if ($modifica_clienti == "NO") $mostra_link = "NO";
if (($modifica_clienti == "PROPRI" and $vedi_clienti != "PROPRI") or ($modifica_clienti == "GRUPPI" and $vedi_clienti != "GRUPPI")) {
$utente_inserimento = risul_query($clienti,$num1,'utente_inserimento');
if ($modifica_clienti == "PROPRI" and $utente_inserimento != $id_utente) $mostra_link = "NO";
if ($modifica_clienti == "GRUPPI" and !$utenti_gruppi[$utente_inserimento]) $mostra_link = "NO";
} # fine if (($modifica_clienti == "PROPRI" and $vedi_clienti != "PROPRI") or...

echo "<tr><td>";
if ($mostra_link == "SI") echo "<a href=\"modifica_cliente.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idclienti=$idclienti\">";
echo $idclienti;
if ($mostra_link == "SI") echo "</a>";
echo "</td>
<td>$cognome</td>
<td>$nome</td>
<td>$nazione</td>
<td>$citta</td>
<td>$telefono</td>
<td>";
if ($email) { echo "<a style=\"color: #222222;\" href=\"mailto:$email\">$email_vedi</a>"; }
else { echo "&nbsp;"; }
echo "</td>
<td>$cap</td>
<td>$indirizzo</td>";
/*echo "<td>$fax</td>
<td>$datanascita_f</td>
<td>$telefono2</td>";*/
echo "<td style=\"font-size: x-small;\">$commento</td>";
if ($cognome_cerca) echo "<td>$prenota_anno_corr</td>";
echo "</tr>";
} # fine if ($num1 >= $cliente_inizio and $num1 < $cliente_fine)
} # fine for $num1

echo "</table>";

if ($num_clienti > $num_clienti_mostra) {
echo "<div style=\"text-align: center;\">";
if ($pagina_clienti > 1) { 
echo "<a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;pagina_clienti=".($pagina_clienti-2)."&amp;cognome_cerca=$cognome_cerca\"><small>&lt;- ".mex("pag. prec.",$pag)."</small></a>";
} # fine if ($pagina_clienti > 1)
echo "&nbsp;(".mex("pagina",$pag)." $pagina_clienti ".mex("di",$pag)." $num_pagine)&nbsp;";
if ($pagina_clienti < $num_pagine) { 
echo "<a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;pagina_clienti=$pagina_clienti&amp;cognome_cerca=$cognome_cerca\"><small>".mex("pag. succ.",$pag)." -&gt;</small></a>";
} # fine if 
echo "</div>";
} # fine if ($num_clienti > $num_clienti_mostra)

if ($lista_clienti_contr) {
$lista_clienti_contr .= ",";
$nomi_contratti = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'nomi_contratti' and idutente = '$id_utente'");
$nomi_contratti = risul_query($nomi_contratti,0,'valpersonalizza');
$nomi_contratti = explode("#@&",$nomi_contratti);
$num_nomi_contratti = count($nomi_contratti);
for ($num1 = 0 ; $num1 < $num_nomi_contratti ; $num1++) {
$dati_nome_contratto = explode("#?&",$nomi_contratti[$num1]);
$nome_contratto[$dati_nome_contratto[0]] = $dati_nome_contratto[1];
} # fine for $num1
$max_contr = esegui_query("select max(numero) from $tablecontratti where tipo $LIKE 'contr%'");
$max_contr = risul_query($max_contr,0,0);
$option_num_contr = "";
for ($num_contratto = 1 ; $num_contratto <= $max_contr ; $num_contratto++) {
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contratto] == "SI") {
if ($nome_contratto[$num_contratto]) $num_contratto_vedi = $nome_contratto[$num_contratto];
else $num_contratto_vedi = $num_contratto;
$option_num_contr .= "<option value=\"$num_contratto\">$num_contratto_vedi</option>";
} # fine if ($attiva_contratti_consentiti == "n" or...
} # fine for $num_contratto
if ($option_num_contr and $show_bar != "NO") {
echo "<br><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_contratto.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"origine\" value=\"visualizza_tabelle.php?tipo_tabella=clienti&amp;pagina_clienti=".($pagina_clienti - 1)."&amp;cognome_cerca=$cognome_cerca\">
<input id=\"lst_clienti_contr\" type=\"hidden\" name=\"lista_clienti\" value=\"$lista_clienti_contr\">";
echo "".ucfirst(mex("documento di tipo",$pag))."
 <select name=\"numero_contratto\">$option_num_contr</select>
 <input class=\"sbutton\" type=\"submit\" name=\"vedi_contr\" value=\"".ucfirst(mex("visualizza",$pag))."\">
</div></form></div>";
} # fine if ($option_num_contr and $show_bar != "NO")
} # fine if ($lista_clienti_contr) 

} # fine else if ($cancella_clienti == "SI")

} # fine if ($tipo_tabella == "clienti" and $vedi_clienti != "NO")





if ($tipo_tabella == "regole" and $priv_vedi_tab_regole != "n") {

if ($idregole and !$torna_alla_tab and $id_utente == 1) {
$tabelle_lock = array("$tableregole");
$altre_tab_lock = array("$tablenometariffe");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$idregole = aggslashdb($idregole);
$regola = esegui_query("select * from $tableregole where idregole = '$idregole'");
if (numlin_query($regola) != 0) {
if (!$cancella) {
$app_agenzia = risul_query($regola,0,'app_agenzia');
if ($app_agenzia) {
echo mex("Sei sicuro di voler <b>cancellare</b> la regola di assegnazione 1 dell'appartamento",$pag)." $app_agenzia?<br>";
} # fine if ($app_agenzia)
$tariffa_per_app = risul_query($regola,0,'tariffa_per_app');
if ($tariffa_per_app) {
$rigatariffe = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa = $numtariffa + 1) {
$tariffa_cerca = "tariffa".$numtariffa;
if ($tariffa_cerca == $tariffa_per_app) $tariffa_vedi = mex("tariffa","prenota.php").$numtariffa;
} # fine for $numtariffa
echo mex("Sei sicuro di voler <b>cancellare</b> la regola di assegnazione 2 per la",$pag)." $tariffa_vedi?<br>";
} # fine if ($tariffa_per_app)
$tariffa_per_utente = risul_query($regola,0,'tariffa_per_utente');
if ($tariffa_per_utente) {
$rigatariffe = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa = $numtariffa + 1) {
$tariffa_cerca = "tariffa".$numtariffa;
if ($tariffa_cerca == $tariffa_per_utente) $tariffa_vedi = mex("tariffa","prenota.php").$numtariffa;
} # fine for $numtariffa
echo mex("Sei sicuro di voler <b>cancellare</b> la regola di assegnazione 3 per la",$pag)." $tariffa_vedi?<br>";
} # fine if ($tariffa_per_utente)
$tariffa_per_persone = risul_query($regola,0,'tariffa_per_persone');
if ($tariffa_per_persone) {
$rigatariffe = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa = $numtariffa + 1) {
$tariffa_cerca = "tariffa".$numtariffa;
if ($tariffa_cerca == $tariffa_per_persone) $tariffa_vedi = mex("tariffa","prenota.php").$numtariffa;
} # fine for $numtariffa
echo mex("Sei sicuro di voler <b>cancellare</b> la regola di assegnazione 4 per la",$pag)." $tariffa_vedi?<br>";
} # fine if ($tariffa_per_persone)
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"idregole\" value=\"$idregole\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"cancella\" value=\"".mex("SI",$pag)."\">
<input class=\"sbutton\" type=\"submit\" name=\"torna_alla_tab\" value=\"".mex("NO",$pag)."\">
</div></form>";
} # fine if (!$cancella)

else {
esegui_query("delete from $tableregole where idregole = '$idregole'");
echo mex("La regola di assegnazione è stata cancellata",$pag).".<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
} # fine else if (!$cancella)
} # fine if (numlin_query($regola) != 0)
else {
echo mex("La regola di assegnazione è già stata cancellata",$pag).".<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input class=\"sbutton\" type=\"submit\" name=\"ok\" value=\"OK\">
</div></form>";
} # fine else if (numlin_query($regola) != 0)
unlock_tabelle($tabelle_lock);
} # fine if ($idcosti and !$torna_alla_tab and $id_utente == 1)

else {


echo "<h3>".mex("Tabella con le regole di assegnazione 1 del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Appartamento",$pag)."</td>
<td>".mex("Inizio_$parola_settimana",$pag)."</td>
<td>".mex("Fine_$parola_settimana",$pag)."</td>
<td>".mex("Motivazione",$pag)."</td>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "<td>".mex("Cancella",$pag)."</td>";
echo "</tr>";

$regole = esegui_query("select * from $tableregole where app_agenzia != '' order by app_agenzia");
$num_regole = numlin_query($regole);

for ($num1 = 0 ; $num1 < $num_regole ; $num1 = $num1 + 1) {
$motivazione = risul_query($regole,$num1,'motivazione');
$mostra_regola = "SI";
if ($priv_vedi_tab_regole == "p") {
if ($applica_regole1 != "s") $mostra_regola = "NO";
if (!$motivazione) $motivazione2 = " ";
else $motivazione2 = $motivazione;
$motivazione_selezionata = "NO";
for ($num2 = 0 ; $num2 < count($regole1_consentite) ; $num2++) if ($regole1_consentite[$num2] == $motivazione2) $motivazione_selezionata = "SI";
if ($applica_regole1 == "n" and $motivazione_selezionata == "NO") $mostra_regola = "SI";
if ($attiva_regole1_consentite == "s" and $motivazione_selezionata == "SI") $mostra_regola = "SI";
} # fine if ($priv_vedi_tab_regole == "p")
if ($mostra_regola == "SI") {
$idregole = risul_query($regole,$num1,'idregole');
$app_agenzia = risul_query($regole,$num1,'app_agenzia');
$id_data_inizio = risul_query($regole,$num1,'iddatainizio');
$data_inizio = esegui_query("select * from $tableperiodi where idperiodi = $id_data_inizio");
$data_inizio = risul_query($data_inizio,0,'datainizio');
$data_inizio_f = formatta_data($data_inizio,$stile_data);
$id_data_fine = risul_query($regole,$num1,'iddatafine');
$data_fine = esegui_query("select * from $tableperiodi where idperiodi = $id_data_fine");
$data_fine = risul_query($data_fine,0,'datafine');
$data_fine_f = formatta_data($data_fine,$stile_data);
$motivazione = risul_query($regole,$num1,'motivazione');
if (!$motivazione) $motivazione = "&nbsp;";
echo "<tr><td>$app_agenzia</td>
<td>$data_inizio_f</td>
<td>$data_fine_f</td>
<td>$motivazione</td>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "<td><a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idregole=$idregole\">".mex("cancella",$pag)."</a></td>";
echo "</tr>";
} # fine if ($mostra_regola == "SI")
} # fine for $num1
echo "</table>";

echo "<br><br><h3>".mex("Tabella con le regole di assegnazione 2 del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Tariffa",$pag)."</td>
<td>".mex("Appartamenti",$pag)."</td>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "<td>".mex("Cancella",$pag)."</td>";
echo "</tr>";

$rigatariffe = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
$regole = esegui_query("select * from $tableregole where tariffa_per_app != '' order by tariffa_per_app ");
$num_regole = numlin_query($regole);

unset($html_tab);
for ($num1 = 0 ; $num1 < $num_regole ; $num1++) {
$idregole = risul_query($regole,$num1,'idregole');
$tariffa = risul_query($regole,$num1,'tariffa_per_app');
$lung = strlen($tariffa);
if ($priv_vedi_tab_regole != "p" or $attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[substr($tariffa,7)] == "SI") {
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa = $numtariffa + 1) {
$tariffa_cerca = "tariffa".$numtariffa;
if ($tariffa_cerca == $tariffa) {
$tariffa_vedi = mex("tariffa","prenota.php").$numtariffa;
$nometariffa = risul_query($rigatariffe,0,$tariffa);
if ($nometariffa != "") $nometariffa_vedi = " ($nometariffa)";
else $nometariffa_vedi = "";
} # fine if ($tariffa_cerca == $tariffa)
} # fine for $numtariffa
$lista_app = risul_query($regole,$num1,'motivazione');
$vett_app = explode(",",$lista_app);
$num_app = count($vett_app);
$lista_app_spazi = "";
for ($num2 = 0 ; $num2 < $num_app ; $num2 = $num2 + 1) {
if (!$lista_app_spazi) $lista_app_spazi = $vett_app[$num2];
else $lista_app_spazi .= ", ".$vett_app[$num2];
} # fine for $num2
$lista_appb = risul_query($regole,$num1,'motivazione2');
if (strcmp($lista_appb,"")) {
$num_giorni_ini = risul_query($regole,$num1,'iddatainizio');
$num_giorni_fine = risul_query($regole,$num1,'iddatafine');
$vett_appb = explode(",",$lista_appb);
$num_appb = count($vett_appb);
$lista_app_spazib = "";
for ($num2 = 0 ; $num2 < $num_appb ; $num2++) {
if (!$lista_app_spazib) $lista_app_spazib = $vett_appb[$num2];
else $lista_app_spazib .= ", ".$vett_appb[$num2];
} # fine for $num2
if ($num_giorni_ini) {
$num_giorni = $num_giorni_ini;
$dall_inizio = mex("dall'inizio",$pag);
} # fine if ($num_giorni_ini)
else {
$num_giorni = $num_giorni_fine;
$dall_inizio = mex("dalla fine",$pag);
} # fine else if ($num_giorni_ini)
$lista_app_spazi .= " <small><small>(".mex("con meno di",$pag)." $num_giorni ".mex("giorni",$pag)." $dall_inizio: $lista_app_spazib)</small></small>";
} # fine if (strcmp($lista_appb,""))
$html_tab[$lung] .= "<tr><td>$tariffa_vedi$nometariffa_vedi</td>
<td>$lista_app_spazi</td>";
if ($id_utente == 1 and $installazione_subordinata != "SI") $html_tab[$lung] .= "<td><a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idregole=$idregole\">".mex("cancella",$pag)."</a></td>";
$html_tab[$lung] .= "</tr>";
} # fine if ($priv_vedi_tab_regole != "p" or $attiva_tariffe_consentite == "n" or...
} # fine for $num1
if ($html_tab) {
ksort($html_tab);
while (list($key, $val) = each($html_tab)) echo $val;
} # fine if ($html_tab)
echo "</table>";

if ($id_utente == 1) {

echo "<br><br><h3>".mex("Tabella con le regole di assegnazione 3 del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Tariffa",$pag)."</td>
<td>".mex("Utente",$pag)."</td>";
if ($installazione_subordinata != "SI") echo "<td>".mex("Cancella",$pag)."</td>";
echo "</tr>";

$utenti = esegui_query("select * from $tablenometariffe where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
$regole = esegui_query("select * from $tableregole where tariffa_per_utente != '' order by tariffa_per_utente");
$num_regole = numlin_query($regole);

unset($html_tab);
for ($num1 = 0 ; $num1 < $num_regole ; $num1++) {
$idregole = risul_query($regole,$num1,'idregole');
$tariffa = risul_query($regole,$num1,'tariffa_per_utente');
$lung = strlen($tariffa);
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa = $numtariffa + 1) {
$tariffa_cerca = "tariffa".$numtariffa;
if ($tariffa_cerca == $tariffa) {
$tariffa_vedi = mex("tariffa","prenota.php").$numtariffa;
$nometariffa = risul_query($rigatariffe,0,$tariffa);
if ($nometariffa != "") $nometariffa_vedi = " ($nometariffa)";
else $nometariffa_vedi = "";
} # fine if ($tariffa_cerca == $tariffa)
} # fine for $numtariffa
$id_utente_regola3 = risul_query($regole,$num1,'iddatainizio');
$nome_utente_regola3 = esegui_query("select nome_utente from $tableutenti where idutenti = '$id_utente_regola3'");
$nome_utente_regola3 = risul_query($nome_utente_regola3,0,'nome_utente');
$html_tab[$lung] .= "<tr><td>$tariffa_vedi$nometariffa_vedi</td>
<td>$nome_utente_regola3</td>";
if ($installazione_subordinata != "SI") $html_tab[$lung] .= "<td><a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idregole=$idregole\">".mex("cancella",$pag)."</a></td>";
$html_tab[$lung] .= "</tr>";
} # fine for $num1
if ($html_tab) {
ksort($html_tab);
while (list($key, $val) = each($html_tab)) echo $val;
} # fine if ($html_tab)
echo "</table>";

echo "<br><br><h3>".mex("Tabella con le regole di assegnazione 4 del",$pag)." $anno.</h3>
<br><table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Tariffa",$pag)."</td>
<td><small>".str_replace(" ","&nbsp;",mex("Numero di persone",$pag))."</small></td>";
if ($installazione_subordinata != "SI") echo "<td>".mex("Cancella",$pag)."</td>";
echo "</tr>";

$regole = esegui_query("select * from $tableregole where tariffa_per_persone != '' order by tariffa_per_persone");
$num_regole = numlin_query($regole);

unset($html_tab);
for ($num1 = 0 ; $num1 < $num_regole ; $num1++) {
$idregole = risul_query($regole,$num1,'idregole');
$tariffa = risul_query($regole,$num1,'tariffa_per_persone');
$lung = strlen($tariffa);
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa = $numtariffa + 1) {
$tariffa_cerca = "tariffa".$numtariffa;
if ($tariffa_cerca == $tariffa) {
$tariffa_vedi = mex("tariffa","prenota.php").$numtariffa;
$nometariffa = risul_query($rigatariffe,0,$tariffa);
if ($nometariffa != "") $nometariffa_vedi = " ($nometariffa)";
else $nometariffa_vedi = "";
} # fine if ($tariffa_cerca == $tariffa)
} # fine for $numtariffa
$num_persone_regola4 = risul_query($regole,$num1,'iddatainizio');
$html_tab[$lung] .= "<tr><td>$tariffa_vedi$nometariffa_vedi</td>
<td>$num_persone_regola4</td>";
if ($installazione_subordinata != "SI") $html_tab[$lung] .= "<td><a href=\"visualizza_tabelle.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idregole=$idregole\">".mex("cancella",$pag)."</a></td>";
$html_tab[$lung] .= "</tr>";
} # fine for $num1
if ($html_tab) {
ksort($html_tab);
while (list($key, $val) = each($html_tab)) echo $val;
} # fine if ($html_tab)
echo "</table>";

if ($installazione_subordinata != "SI") {
echo "<br><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"crearegole.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input class=\"sbutton\" type=\"submit\" name=\"vai\" value=\"".mex("Inserisci nuove regole",$pag)."\">
</div></form></div>";
} # fine if ($installazione_subordinata != "SI")

} # fine if ($id_utente == 1)

} # fine else if ($idcosti and !$torna_alla_tab)
} # fine if ($tipo_tabella == "regole" and $priv_vedi_tab_regole != "n")





if ($tipo_tabella == "appartamenti" and $priv_vedi_tab_appartamenti != "n") {

if ($priv_vedi_tab_appartamenti == "g") {
$priv_vedi_tab_appartamenti = "p";
$app_gruppi = "SI";
} # fine if ($priv_vedi_tab_appartamenti == "g")
else $app_gruppi = "NO";

if ($crea_app and $id_utente == 1 and C_CREA_NUOVI_APP != "NO") {
if (get_magic_quotes_gpc()) $n_app = stripslashes($n_app);
$n_app = str_replace (",","",$n_app);
if (str_replace (" ","",$n_app) == "") $n_app = str_replace (" ","_",$n_app);
$n_app = elimina_caratteri_slash($n_app);
$n_app = htmlspecialchars($n_app);
$tabelle_lock = array("$tableappartamenti");
$tabelle_lock = lock_tabelle($tabelle_lock);
if (defined("C_MASSIMO_NUM_APP") and C_MASSIMO_NUM_APP != 0) {
$app_esistenti = esegui_query("select * from $tableappartamenti ");
if (numlin_query($app_esistenti) >= C_MASSIMO_NUM_APP) $inserire = "NO";
} # fine if (defined("C_MASSIMO_NUM_APP") and C_MASSIMO_NUM_APP != 0)
if (!$n_app) {
echo mex("Si deve inserire il numero del nuovo appartamento",$pag).".<br>";
$inserire = "NO";
} # fine if (!$n_app)
$app_esistente = esegui_query("select * from $tableappartamenti where idappartamenti = '".aggslashdb($n_app)."' ");
$app_esistente = numlin_query($app_esistente);
if ($app_esistente) {
echo mex("Il numero inserito esiste già",$pag).".<br>";
$inserire = "NO";
} # fine if ($app_esistente)
if ($crea_app != "SI") {
if ($inserire != "NO") {
echo mex("L'appatramento",$pag)." <b>$n_app</b> ".mex("verrà aggiunto",$pag).".<br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"n_app\" value=\"$n_app\">
<input type=\"hidden\" name=\"crea_app\" value=\"SI\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"appartamenti\">
<input class=\"sbutton\" type=\"submit\" name=\"continua\" value=\"".mex("Continua",$pag)."\">
</div></form><br><br>";
} # fine if ($inserire != "NO")
} # fine if ($crea_app != "SI")

else {

if ($inserire != "NO") {
esegui_query("insert into $tableappartamenti (idappartamenti) values ('$n_app') ");
$id_appartamenti = esegui_query("select idappartamenti from $tableappartamenti order by idappartamenti ");
$num_appartamenti = numlin_query($id_appartamenti);
$fileaperto = fopen("./dati/selectappartamenti.php","w+");
flock($fileaperto,2);
fwrite($fileaperto,"<?php \necho \"\n");
for ( $num = 0; $num < $num_appartamenti; $num = $num + 1) {
$numapp = risul_query($id_appartamenti,$num,'idappartamenti');
fwrite($fileaperto,"<option value=\\\"$numapp\\\">$numapp</option>
");
} # fine for $num
fwrite($fileaperto,"\"; \n?>");
flock($fileaperto,3);
fclose($fileaperto);
echo mex("L'appatramento",$pag)." <b>$n_app</b> ".mex("è stato aggiunto",$pag).".<br>";
} # fine if ($inserire != "NO")
} # fine else if ($crea_app != "SI")
unlock_tabelle($tabelle_lock);

echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"appartamenti\">
<input class=\"sbutton\" type=\"submit\" name=\"continua\" value=\"".mex("Torna indietro",$pag)."\">
<hr style=\"width: 95%\">
</div></form>";
} # fine if ($crea_app and $id_utente == 1 and C_CREA_NUOVI_APP != "NO")


else {



echo "<h3>".mex("Tabella con tutti gli appartamenti",$pag).".</h3><br>";

if ($id_utente != 1 or $installazione_subordinata == "SI") $form_tabella = "";
if ($form_tabella) echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"modifica_app.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"modificaappartamento\" value=\"SI\">
<input type=\"hidden\" name=\"form_tabella\" value=\"SI\">";

echo "<table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Appartamento",$pag)."</td>
<td>".mex("Casa",$pag)."</td>
<td>".mex("Piano",$pag)."</td>
<td style=\"font-size: small;\">".str_replace("_","&nbsp;",mex("Capienza_massima",$pag))."</td>
<td>".mex("Priorità",$pag)."</td>";
if (!$form_tabella) {
if ($priv_vedi_inv_app != "n") echo "<td>".ucwords(mex("inventario",$pag))."</td>";
echo "<td>".mex("Commento",$pag)."</td>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "<td>".mex("Modifica",$pag)."</td>";
} # fine if (!$form_tabella)
echo "</tr>";

$attiva_checkin = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'attiva_checkin' and idutente = '$id_utente'");
$attiva_checkin = risul_query($attiva_checkin,0,'valpersonalizza');
$appartamenti = esegui_query("select * from $tableappartamenti order by idappartamenti");
$num_appartamenti = numlin_query($appartamenti);

if ($priv_vedi_tab_appartamenti == "p") {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
if ($app_gruppi != "SI") $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
} # fine if ($priv_vedi_tab_appartamenti == "p")

if ($priv_vedi_inv_app != "n" and !$form_tabella) {
if ($priv_vedi_beni_inv != "n") {
if ($priv_vedi_beni_inv == "p" or $priv_vedi_beni_inv == "g") {
$condizione_beni_propri = "and ( $tablebeniinventario.utente_inserimento = '$id_utente'";
if ($priv_vedi_beni_inv == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_beni_propri .= " or $tablebeniinventario.utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_beni_inv == "g")
$condizione_beni_propri .= " )";
} # fine if ($priv_vedi_beni_inv == "p" or $priv_vedi_beni_inv == "g")
else $condizione_beni_propri = "";
} # fine if ($priv_vedi_beni_inv != "n")
else $condizione_beni_propri = "where utente_inserimento = '-1'";
if ($priv_vedi_inv_app != "s") {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
if ($priv_vedi_inv_app != "g") $app_consentiti_inv = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $app_consentiti_inv = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
} # fine if ($priv_vedi_inv_app != "s")
} # fine if ($priv_vedi_inv_app != "n" and !$form_tabella)
else unset($app_consentiti_inv);

for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idappartamenti = risul_query($appartamenti,$num1,'idappartamenti');
if ($priv_vedi_tab_appartamenti != "p" or $appartamenti_consentiti[$idappartamenti] != "NO") {
$numcasa = risul_query($appartamenti,$num1,'numcasa');
$numpiano = risul_query($appartamenti,$num1,'numpiano');
$maxoccupanti = risul_query($appartamenti,$num1,'maxoccupanti');
$priorita = risul_query($appartamenti,$num1,'priorita');
if (!$form_tabella) {
$commento = risul_query($appartamenti,$num1,'commento');
if (!$numcasa) $numcasa = "&nbsp;";
if (!$numpiano) $numpiano = "&nbsp;";
if (!$maxoccupanti) $maxoccupanti = "&nbsp;";
else $maxoccupanti = $maxoccupanti ." ".mex("persone",$pag);
if (!$priorita) $priorita = "&nbsp;";
if (!$commento) $commento = "&nbsp;";
$stile_checkin = "";
if ($attiva_checkin == "SI") {
$checkin_presente = esegui_query("select idprenota from $tableprenota where idappartamenti = '".aggslashdb($idappartamenti)."' and checkin is not NULL and checkout is NULL");
if (numlin_query($checkin_presente) == 1) $stile_checkin = " style=\"background-image:url(img/fr_sx_checkin.gif); background-repeat:no-repeat; background-position: left center;\"";
} # fine if ($attiva_checkin == "SI")
$inv = "&nbsp;";
$stile_inv = "";
if ($priv_vedi_inv_app == "s" or $app_consentiti_inv[$idappartamenti] != "NO") {
$inv_mancante = esegui_query("select distinct $tablerelinventario.quantita from $tablerelinventario inner join $tablebeniinventario on $tablerelinventario.idbeneinventario = $tablebeniinventario.idbeniinventario where $tablerelinventario.idappartamento = '".aggslashdb($idappartamenti)."' and $tablerelinventario.quantita < $tablerelinventario.quantita_min_predef $condizione_beni_propri ");
if (numlin_query($inv_mancante)) $stile_inv = " style=\"background-image:url(img/fr_sx_rossa.gif); background-repeat:no-repeat; background-position: left center;\"";
$inv = "<a href=\"inventario.php?anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=$tipo_tabella&amp;idmag=a".htmlspecialchars($idappartamenti)."\">".mex("inventario",$pag)."</a>";
} # fine if ($priv_vedi_inv_app == "s" or $app_consentiti_inv[$idappartamenti] != "NO")
echo "<tr><td$stile_checkin>$idappartamenti</td>
<td>$numcasa</td>
<td>$numpiano</td>
<td>$maxoccupanti</td>
<td>$priorita</td>";
if ($priv_vedi_inv_app != "n") echo "<td$stile_inv>$inv</td>";
echo "<td style=\"font-size: x-small;\">$commento</td>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "<td><a href=\"modifica_app.php?tipo_tabella=$tipo_tabella&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;idappartamenti=".urlencode($idappartamenti)."\">".mex("modifica",$pag)."</a></td>";
echo "</tr>";
} # fine if (!$form_tabella)
else {
echo "<tr><td>
<input type=\"hidden\" name=\"idappartamenti$num1\" value=\"$idappartamenti\">
<input type=\"hidden\" name=\"d_numcasa$num1\" value=\"$numcasa\">
<input type=\"hidden\" name=\"d_numpiano$num1\" value=\"$numpiano\">
<input type=\"hidden\" name=\"d_maxoccupanti$num1\" value=\"$maxoccupanti\">
<input type=\"hidden\" name=\"d_priorita$num1\" value=\"$priorita\">
<input type=\"text\" name=\"n_nome_app$num1\" value=\"$idappartamenti\" size=\"12\"></td>
<td><input type=\"text\" name=\"n_numcasa$num1\" value=\"$numcasa\" size=\"12\"></td>
<td><input type=\"text\" name=\"n_numpiano$num1\" value=\"$numpiano\" size=\"12\"></td>
<td><input type=\"text\" name=\"n_maxoccupanti$num1\" value=\"$maxoccupanti\" size=\"8\"></td>
<td><input type=\"text\" name=\"n_priorita$num1\" value=\"$priorita\" size=\"8\"></td>";
} # fine else if (!$form_tabella)
} # fine if ($priv_vedi_tab_appartamenti != "p" or $appartamenti_consentiti[$idappartamenti] != "NO")
} # fine for $num1
echo "</table>";

if ($id_utente == 1 and $installazione_subordinata != "SI" and !$form_tabella) {
echo "<table><tr><td style=\"height: 2px;\"></td></tr></table><div style=\"text-align: center;\">
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"appartamenti\">
<input type=\"hidden\" name=\"form_tabella\" value=\"SI\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica tutti i campi della tabella",$pag)."\">
</div></form><br>";
if (C_CREA_NUOVI_APP != "NO") {
echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"appartamenti\">
<input class=\"sbutton\" type=\"submit\" name=\"crea_app\" value=\"".mex("Crea un nuovo appartamento",$pag)."\">
 n° <input type=\"text\" name=\"n_app\" size=\"7\" maxlength=\"45\">
</div></form><br>";
} # fine if (C_CREA_NUOVI_APP != "NO")
echo "</div>";
} # fine if ($id_utente == 1 and $beni_inv$installazione_subordinata != "SI" and !$form_tabella)
elseif (!$form_tabella) echo "<br>";

if ($form_tabella) echo "<table><tr><td style=\"height: 2px;\"></td></tr></table><div style=\"text-align: center;\">
<input type=\"hidden\" name=\"num_app_modifica\" value=\"$num_appartamenti\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Applica i cambiamenti",$pag)."\">
</div></div></form><br>";


if (!$form_tabella and $num_appartamenti > 2) {

if ($modifica_app_vicini and $id_utente == 1) {
$tabelle_lock = array("$tableappartamenti");
$tabelle_lock = lock_tabelle($tabelle_lock);
unset($app_vicini);
$app_vicini["vett"] = "SI";
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) ${"idappartamenti".$num1} = htmlspecialchars(${"idappartamenti".$num1});
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idappartamenti = risul_query($appartamenti,$num1,'idappartamenti');
if (${"idappartamenti".$num1} == $idappartamenti) {
for ($num2 = ($num_appartamenti - 1) ; $num2 > $num1 ; $num2--) {
$idappartamenti2 = risul_query($appartamenti,$num2,'idappartamenti');
if (${"idappartamenti".$num2} == $idappartamenti2) {
if (${"v".$num1."_".$num2} == "SI") {
if ((string) $app_vicini[$num1] == "") $app_vicini[$num1] = $idappartamenti2;
else $app_vicini[$num1] = $app_vicini[$num1].",".$idappartamenti2;
if ((string) $app_vicini[$num2] == "") $app_vicini[$num2] = $idappartamenti;
else $app_vicini[$num2] = $app_vicini[$num2].",".$idappartamenti;
} # fine if (${"v".$num1."_".$num2} == "SI")
} # fine if (${"idappartamenti".$num2} == $idappartamenti2)
} # fine for $num2
} # fine if (${"idappartamenti".$num1} == $idappartamenti)
} # fine for $num1
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idappartamenti = risul_query($appartamenti,$num1,'idappartamenti');
$d_app_vicini = risul_query($appartamenti,$num1,'app_vicini');
$n_app_vicini = "";
if ((string) $app_vicini[$num1] != "") {
$app_vic = explode(",",$app_vicini[$num1]);
sort($app_vic);
reset ($app_vic);
while (list($key, $val) = each($app_vic)) $n_app_vicini .= ",".$val;
$n_app_vicini = substr($n_app_vicini,1);
} # fine if ((string) $app_vicini[$num1] != "")
if ($n_app_vicini != $d_app_vicini) esegui_query("update $tableappartamenti set app_vicini = '".aggslashdb($n_app_vicini)."' where idappartamenti = '".aggslashdb($idappartamenti)."' ");
} # fine for $num1
$appartamenti = esegui_query("select * from $tableappartamenti order by idappartamenti");
$num_appartamenti = numlin_query($appartamenti);
unlock_tabelle($tabelle_lock);
} # fine if ($modifica_app_vicini and $id_utente == 1)

echo "<a name=\"g_app_vicini\"></a><h3>".mex("Griglia appartamenti vicini",$pag).".</h3><br>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php#g_app_vicini\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"appartamenti\">
<input type=\"hidden\" name=\"modifica_app_vicini\" value=\"appartamenti\">";
echo "<table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto; text-align: center; font-size: 75%;\" width=3 border=\"$t1border\" cellspacing=\"0\" cellpadding=\"1\">";
$linea_app = "<td>&nbsp;</td></tr>";
unset($app_vicini_vett);
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idappartamenti = risul_query($appartamenti,$num1,'idappartamenti');
if ($priv_vedi_tab_appartamenti != "p" or $appartamenti_consentiti[$idappartamenti] != "NO") $linea_app = "<td>$idappartamenti</td>".$linea_app;
$app_vicini = risul_query($appartamenti,$num1,'app_vicini');
if ($app_vicini) {
$app_vicini = explode(",",$app_vicini);
for ($num2 = 0 ; $num2 < count($app_vicini) ; $num2++) $app_vicini_vett[$app_vicini[$num2]][$num1] = 1;
} # fine if ($app_vicini)
} # fine for $num1
$linea_app = "<tr><td>&nbsp;</td>".$linea_app;
echo $linea_app;
$num_linea_app = -1;

for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$num_linea_app++;
if ($num_linea_app == 30) {
echo $linea_app;
$num_linea_app = 0;
} # fine if ($num_linea_app == 30)
$idappartamenti = risul_query($appartamenti,$num1,'idappartamenti');
if ($priv_vedi_tab_appartamenti != "p" or $appartamenti_consentiti[$idappartamenti] != "NO") {
echo "<tr><td><input type=\"hidden\" name=\"idappartamenti$num1\" value=\"$idappartamenti\">
$idappartamenti</td>";
for ($num2 = ($num_appartamenti - 1) ; $num2 >= 0 ; $num2--) {
$idappartamenti2 = risul_query($appartamenti,$num2,'idappartamenti');
if ($priv_vedi_tab_appartamenti != "p" or $appartamenti_consentiti[$idappartamenti2] != "NO") {
if ($app_vicini_vett[$idappartamenti][$num2]) $bgcolor = " style=\"background-color: #6b91a0;\"";
else $bgcolor = "";
if ($num2 > $num1 and $id_utente == 1 and $installazione_subordinata != "SI") {
if ($app_vicini_vett[$idappartamenti][$num2]) $checked = " checked";
else $checked = "";
$val = "<input type=\"checkbox\" name=\"v$num1"."_$num2\" value=\"SI\"$checked>";
} # fine if ($num2 > $num1 and...
else $val = "&nbsp;";
echo "<td$bgcolor>$val</td>";
} # fine if ($priv_vedi_tab_appartamenti != "p" or...
} # fine for $num2
echo "<td>$idappartamenti</td></tr>";
} # fine if ($priv_vedi_tab_appartamenti != "p" or...
} # fine for $num1
if ($num_linea_app > 5 or $num_appartamenti < 30) echo $linea_app;
echo "</table>
<table><tr><td style=\"height: 2px;\"></td></tr></table>";
if ($id_utente == 1 and $installazione_subordinata != "SI") echo "<div style=\"text-align: center;\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("Applica i cambiamenti",$pag)."\">
</div></div></form>";
echo "<br><br>";
} # fine if (!$form_tabella and $num_appartamenti > 2)

} # fine else if ($crea_app)
} # fine if ($tipo_tabella == "appartamenti" and $priv_vedi_tab_appartamenti != "n")





if ($tipo_tabella == "inventario" and ($priv_vedi_beni_inv != "n" or $priv_vedi_inv_mag != "n" or $priv_vedi_inv_app != "n")) {
$frase_tab_beni_inv = "";

if ($manda_form_beni and $priv_vedi_beni_inv != "n" and $priv_ins_beni_inv != "n") {

if ($aggiungi_bene and $n_nome_bene) {
if (get_magic_quotes_gpc()) {
$n_nome_bene = stripslashes($n_nome_bene);
$n_codice_bene = stripslashes($n_codice_bene);
$n_descrizione_bene = stripslashes($n_descrizione_bene);
} # fine if (get_magic_quotes_gpc())
$n_nome_bene = htmlspecialchars($n_nome_bene);
$n_codice_bene = htmlspecialchars($n_codice_bene);
$n_descrizione_bene = htmlspecialchars($n_descrizione_bene);
$tabelle_lock = array("$tablebeniinventario");
$altre_tab_lock = array("$tableutenti");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
if ($id_utente != 1 or !$n_utente_ins_bene) $n_utente_ins_bene = $id_utente;
$utente_esist = esegui_query("select idutenti from $tableutenti where idutenti = '".aggslashdb($n_utente_ins_bene)."' ");
if (numlin_query($utente_esist) != 1) $continua = "NO";
if ($continua != "NO") {
$idinv = esegui_query("select max(idbeniinventario) from $tablebeniinventario");
$idinv = risul_query($idinv,0,0) + 1;
$datainserimento = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600)));
esegui_query("insert into $tablebeniinventario (idbeniinventario,nome_bene,codice_bene,descrizione_bene,datainserimento,hostinserimento,utente_inserimento) values ('$idinv','".aggslashdb($n_nome_bene)."','".aggslashdb($n_codice_bene)."','".aggslashdb($n_descrizione_bene)."','$datainserimento','$HOSTNAME','$n_utente_ins_bene') ");
$frase_tab_beni_inv = "<b>".mex("bene aggiunto",$pag)."</b>.<br>";
} # fine if ($continua != "NO")
unlock_tabelle($tabelle_lock);
} # fine if ($aggiungi_bene and $n_nome_bene)

if ($elimina_bene == "SI" and $idinv and controlla_num_pos($idinv) == "SI") {
$idinv = aggslashdb($idinv);
$tabelle_lock = array("$tablebeniinventario");
$altre_tab_lock = array("$tablerelinventario");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$bene_in_mag = esegui_query("select idbeneinventario from $tablerelinventario where idbeneinventario = '$idinv' limit 1");
if (numlin_query($bene_in_mag)) $continua = "NO";
$bene_esist = esegui_query("select utente_inserimento from $tablebeniinventario where idbeniinventario = '$idinv'");
if (numlin_query($bene_esist)) if ($id_utente != 1 and $id_utente != risul_query($bene_esist,0,'utente_inserimento')) $continua = "NO";
if ($continua != "NO") {
esegui_query("delete from $tablebeniinventario where idbeniinventario = '$idinv' ");
$frase_tab_beni_inv = "<b>".mex("bene eliminato",$pag)."</b>.<br>";
} # fine if ($continua != "NO")
unlock_tabelle($tabelle_lock);
} # fine if ($elimina_bene == "SI" and $idinv and...

} # fine if ($manda_form_beni and $priv_vedi_beni_inv != "n" and $priv_ins_beni_inv != "n")


if ($manda_form_mag and $priv_vedi_inv_mag != "n" and $priv_ins_mag != "n") {

if ($aggiungi_mag and $n_nome_mag) {
if (get_magic_quotes_gpc()) {
$n_nome_mag = stripslashes($n_nome_mag);
$n_descrizione_mag = stripslashes($n_descrizione_mag);
} # fine if (get_magic_quotes_gpc())
$n_nome_mag = htmlspecialchars($n_nome_mag);
$n_descrizione_mag = htmlspecialchars($n_descrizione_mag);
$tabelle_lock = array("$tablemagazzini");
$altre_tab_lock = array("$tableutenti");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
if ($id_utente != 1) $n_utente_ins_mag = $id_utente;
$utente_esist = esegui_query("select idutenti from $tableutenti where idutenti = '".aggslashdb($n_utente_ins_mag)."' ");
if (numlin_query($utente_esist) != 1) $continua = "NO";
if (str_replace(" ","",$n_nome_mag) == "") $continua = "NO";
if ($continua != "NO") {
$idmag = esegui_query("select max(idmagazzini) from $tablemagazzini");
$idmag = risul_query($idmag,0,0) + 1;
$datainserimento = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600)));
esegui_query("insert into $tablemagazzini (idmagazzini,nome_magazzino,codice_magazzino,descrizione_magazzino,datainserimento,hostinserimento,utente_inserimento) values ('$idmag','".aggslashdb($n_nome_mag)."','','".aggslashdb($n_descrizione_mag)."','$datainserimento','$HOSTNAME','$n_utente_ins_mag') ");
echo "<b>".mex("magazzino aggiunto",$pag)."</b>.<br>";
} # fine if ($continua != "NO")
unlock_tabelle($tabelle_lock);
} # fine if ($aggiungi_mag and $n_nome_mag)

if ($elimina_mag == "SI" and $idmag and controlla_num_pos($idmag) == "SI") {
$idmag = aggslashdb($idmag);
$tabelle_lock = array("$tablemagazzini");
$altre_tab_lock = array("$tablerelinventario");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$bene_in_mag = esegui_query("select idmagazzino from $tablerelinventario where idmagazzino = '$idmag' limit 1");
if (numlin_query($bene_in_mag)) $continua = "NO";
$mag_esist = esegui_query("select utente_inserimento from $tablemagazzini where idmagazzini = '$idmag'");
if (numlin_query($mag_esist)) if ($id_utente != 1 and $id_utente != risul_query($mag_esist,0,'utente_inserimento')) $continua = "NO";
if ($continua != "NO") {
esegui_query("delete from $tablemagazzini where idmagazzini = '$idmag' ");
echo "<b>".mex("magazzino eliminato",$pag)."</b>.<br>";
} # fine if ($continua != "NO")
unlock_tabelle($tabelle_lock);
} # fine if ($elimina_mag == "SI" and $idmag and...

} # fine if ($manda_form_mag and $priv_vedi_inv_mag != "n" and $priv_ins_mag != "n")


if ($importa_inv_app and $priv_vedi_inv_app != "n" and $priv_ins_beni_in_app != "n" and $priv_vedi_beni_inv != "n") {
if (get_magic_quotes_gpc()) {
$app_da = stripslashes($app_da);
$app_a = stripslashes($app_a);
} # fine if (get_magic_quotes_gpc())
$tabelle_lock = array("$tablerelinventario");
$altre_tab_lock = array("$tablenometariffe","$tableappartamenti","$tableregole","$tablebeniinventario");
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$appartamenti = esegui_query("select idappartamenti from $tableappartamenti order by idappartamenti");
$num_appartamenti = numlin_query($appartamenti);
if ($priv_vedi_inv_app != "s") {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
if ($priv_vedi_inv_app != "g") $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
} # fine if ($priv_vedi_inv_app != "s")
if ($priv_ins_beni_in_app != "s") {
if ($priv_vedi_inv_app == $priv_ins_beni_in_app) $app_cons_ins_beni = $appartamenti_consentiti;
else {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
if ($priv_ins_beni_in_app != "g") $app_cons_ins_beni = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $app_cons_ins_beni = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
} # fine else if ($priv_vedi_inv_app == $priv_ins_beni_in_app)
} # fine if ($priv_ins_beni_in_app != "s")
if (substr($app_a,0,1) != "a" and substr($app_a,0,7) != "tariffa") $continua = "NO";
$app_da_esist = esegui_query("select idappartamenti from $tableappartamenti where idappartamenti = '".aggslashdb($app_da)."' ");
if (numlin_query($app_da_esist) != 1) $continua = "NO";
if ($priv_vedi_inv_app != "s" and $appartamenti_consentiti[$app_da] == "NO") $continua = "NO";

if ($continua != "NO") {
unset($app_a_vett);
if (substr($app_a,0,1) == "a") {
$app_a_esist = esegui_query("select idappartamenti from $tableappartamenti where idappartamenti = '".aggslashdb(substr($app_a,1))."' ");
if (numlin_query($app_a_esist) == 1) $app_a_vett[substr($app_a,1)] = 1;
} # fine if (substr($app_a,0,1) == "a")
else {
$regola2 = esegui_query("select * from $tableregole where tariffa_per_app = '".aggslashdb($app_a)."' ");
if (numlin_query($regola2) == 1) {
$lista_app = explode(",",risul_query($regola2,0,'motivazione'));
for ($num1 = 0 ; $num1 < count($lista_app) ; $num1++) $app_a_vett[$lista_app[$num1]] = 1;
} # fine if (numlin_query($regola2) == 1)
} # fine else if (substr($app_a,0,1) == "a")

if ($priv_vedi_beni_inv == "p" or $priv_vedi_beni_inv == "g") {
$condizione_beni_propri = "where ( utente_inserimento = '$id_utente'";
if ($priv_vedi_beni_inv == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_beni_propri .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_beni_inv == "g")
$condizione_beni_propri .= " )";
} # fine if ($priv_vedi_beni_inv == "p" or $priv_vedi_beni_inv == "g")
else $condizione_beni_propri = "";
$beni_inv = esegui_query("select * from $tablebeniinventario $condizione_beni_propri order by idbeniinventario");
$num_beni_inv = numlin_query($beni_inv);

unset($beni_importa_vett);
$beni_importa = esegui_query("select * from $tablerelinventario where idappartamento = '".aggslashdb($app_da)."' ");
$num_beni_importa = numlin_query($beni_importa);
for ($num1 = 1 ; $num1 <= $num_beni_importa ; $num1++) $beni_importa_vett[risul_query($beni_importa,($num1 - 1),'idbeneinventario')] = $num1;

for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idapp = risul_query($appartamenti,$num1,'idappartamenti');
if ($app_a_vett[$idapp] and $idapp != $app_da) {
if ($priv_vedi_inv_app == "s" or $appartamenti_consentiti[$idapp] != "NO") {
if ($priv_ins_beni_in_app == "s" or $app_cons_ins_beni[$idapp] != "NO") {
$datainserimento = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600)));
for ($num2 = 0 ; $num2 < $num_beni_inv ; $num2++) {
$idinv = risul_query($beni_inv,$num2,'idbeniinventario');
esegui_query("delete from $tablerelinventario where idappartamento = '".aggslashdb($idapp)."' and idbeneinventario = '$idinv' ");
if ($beni_importa_vett[$idinv]) {
$num_b = ($beni_importa_vett[$idinv] - 1);
$quantita = risul_query($beni_importa,$num_b,'quantita');
$quantita_min_predef = risul_query($beni_importa,$num_b,'quantita_min_predef');
$richiesto_checkin = risul_query($beni_importa,$num_b,'richiesto_checkin');
if ($id_utente == 1) $utente_ins_bene = risul_query($beni_importa,$num_b,'utente_inserimento');
else $utente_ins_bene = $id_utente;
esegui_query("insert into $tablerelinventario (idbeneinventario,idappartamento,quantita,quantita_min_predef,richiesto_checkin,datainserimento,hostinserimento,utente_inserimento) values ('$idinv','$idapp','$quantita','$quantita_min_predef','$richiesto_checkin','$datainserimento','$HOSTNAME','$utente_ins_bene') ");
} # fine if ($beni_importa_vett[$idinv])
$inv_importato = "SI";
} # fine for $num2
} # fine if $priv_ins_beni_in_app == "s" or $app_cons_ins_beni[$idapp] != "NO")
} # fine if $priv_vedi_inv_app == "s" or $appartamenti_consentiti[$idapp] != "NO")
} # fine if ($app_a_vett[$idapp] and $idapp != $app_da)
} # fine for $num1

if ($inv_importato == "SI") echo "<b>".mex("Inventario importato",$pag)."</b>.<br>";
} # fine if ($continua != "NO")

unlock_tabelle($tabelle_lock);
} # fine if ($importa_inv_app and $priv_vedi_inv_app != "n" and $priv_ins_beni_in_app != "n" and $priv_vedi_beni_inv != "n")



if ($mostra_form_inventario != "NO") {


$tutti_utenti = esegui_query("select * from $tableutenti order by idutenti");
$num_tutti_utenti = numlin_query($tutti_utenti);
$option_utenti = "";
for ($num1 = 0 ; $num1 < $num_tutti_utenti ; $num1++) {
$idutenti = risul_query($tutti_utenti,$num1,'idutenti');
$nome_utente = risul_query($tutti_utenti,$num1,'nome_utente');
$option_utenti .= "<option value=\"$idutenti\">$nome_utente</option>";
$nomi_utenti[$idutenti] = $nome_utente;
} # fine for $num1

if ($priv_vedi_beni_inv != "n") {
if ($priv_vedi_beni_inv == "p" or $priv_vedi_beni_inv == "g") {
$condizione_beni_propri = "where ( utente_inserimento = '$id_utente'";
if ($priv_vedi_beni_inv == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_beni_propri .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_beni_inv == "g")
$condizione_beni_propri .= " )";
} # fine if ($priv_vedi_beni_inv == "p" or $priv_vedi_beni_inv == "g")
else $condizione_beni_propri = "";
} # fine if ($priv_vedi_beni_inv != "n")
else $condizione_beni_propri = "where utente_inserimento = '-1'";

$opt_app = "";
if ($priv_vedi_inv_mag != "n" or $priv_vedi_inv_app != "n") {

$condizione_beni_propri_rel = str_replace("where","and",$condizione_beni_propri);
$condizione_beni_propri_rel = str_replace("utente_inserimento","$tablebeniinventario.utente_inserimento",$condizione_beni_propri_rel);

echo "<a name=\"tab_magazzini\"></a>
<h3>".mex("Magazzini ed appartamenti",$pag).".</h3><br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#tab_magazzini\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"inventario\">
<input type=\"hidden\" name=\"manda_form_mag\" value=\"SI\">
<table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Nome",$pag)."</td>
<td>".mex("Tipo",$pag)."</td>
<td>".mex("Descrizione",$pag)."</td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td>".mex("Utente",$pag)."</td>";
echo "<td>".mex("Modifica",$pag)."</td></tr>";

if ($priv_vedi_inv_mag != "n") {
if ($priv_vedi_inv_mag == "p" or $priv_vedi_inv_mag == "g") {
$condizione_mag_propri = "where ( utente_inserimento = '$id_utente'";
if ($priv_vedi_inv_mag == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_mag_propri .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_inv_mag == "g")
$condizione_mag_propri .= " )";
} # fine if ($priv_vedi_inv_mag == "p" or $priv_vedi_inv_mag == "g")
else $condizione_mag_propri = "";

$magazzini = esegui_query("select * from $tablemagazzini $condizione_mag_propri order by idmagazzini");
$num_mag = numlin_query($magazzini);
for ($num1 = 0 ; $num1 < $num_mag ; $num1++) {
$idmag = risul_query($magazzini,$num1,'idmagazzini');
$nome_mag = risul_query($magazzini,$num1,'nome_magazzino');
$utente_ins_mag = risul_query($magazzini,$num1,'utente_inserimento');
$descrizione_mag = risul_query($magazzini,$num1,'descrizione_magazzino');
$descrizione_mag_len = strlen($descrizione_mag);
if ($descrizione_mag_len > 35) $descrizione_mag = "<small>$descrizione_mag</small>";
if ($descrizione_mag_len > 70) $descrizione_mag = "<small>$descrizione_mag</small>";
$freccia_rossa = "";
$beni_in_mag = esegui_query("select distinct $tablerelinventario.quantita,$tablerelinventario.quantita_min_predef from $tablerelinventario inner join $tablebeniinventario on $tablerelinventario.idbeneinventario = $tablebeniinventario.idbeniinventario where $tablerelinventario.idmagazzino = '$idmag' $condizione_beni_propri_rel");
$num_beni_in_mag = numlin_query($beni_in_mag);
$cancella = "";
if ($num_beni_in_mag) {
for ($num2 = 0 ; $num2 < $num_beni_in_mag ; $num2++) {
$quantita = risul_query($beni_in_mag,$num2,'quantita',$tablerelinventario);
$quantita_min_predef = risul_query($beni_in_mag,$num2,'quantita_min_predef',$tablerelinventario);
if ($quantita_min_predef > $quantita) {
$freccia_rossa = " style=\"background-image:url(img/fr_sx_rossa.gif); background-repeat:no-repeat; background-position: left center;\"";
break;
} # fine if ($quantita_min_predef > $quantita) 
} # fine for $num2
} # fine if ($num_beni_in_mag)
elseif ($priv_ins_mag != "n" and ($id_utente == 1 or $id_utente == $utente_ins_mag)) $cancella = "<br><a href=\"$pag?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=$tipo_tabella&amp;manda_form_mag=SI&amp;elimina_mag=SI&amp;idmag=$idmag#tab_magazzini\">".mex("cancella",$pag)."</a>";
echo "<tr><td$freccia_rossa>$nome_mag</td>
<td><i>".mex("magazzino",$pag)."</i></td>
<td>$descrizione_mag</td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td>".$nomi_utenti[$utente_ins_mag]."</td>";
echo "<td><a href=\"inventario.php?anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=inventario&amp;idmag=$idmag\">".mex("inventario",$pag)."</a>
$cancella</td></tr>";
} # fine for $num1
} # fine if ($priv_vedi_inv_mag != "n")

if ($priv_vedi_inv_app != "n") {
$appartamenti = esegui_query("select idappartamenti from $tableappartamenti order by idappartamenti");
$num_appartamenti = numlin_query($appartamenti);

if ($priv_vedi_inv_app != "s") {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
if ($priv_vedi_inv_app != "g") $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
} # fine if ($priv_vedi_inv_app != "s")

for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idapp = risul_query($appartamenti,$num1,'idappartamenti');
if ($priv_vedi_inv_app == "s" or $appartamenti_consentiti[$idapp] != "NO") {
$freccia_rossa = "";
$beni_in_mag = esegui_query("select distinct $tablerelinventario.quantita,$tablerelinventario.quantita_min_predef from $tablerelinventario inner join $tablebeniinventario on $tablerelinventario.idbeneinventario = $tablebeniinventario.idbeniinventario where $tablerelinventario.idappartamento = '$idapp' $condizione_beni_propri_rel");
$num_beni_in_mag = numlin_query($beni_in_mag);
for ($num2 = 0 ; $num2 < $num_beni_in_mag ; $num2++) {
$quantita = risul_query($beni_in_mag,$num2,'quantita',$tablerelinventario);
$quantita_min_predef = risul_query($beni_in_mag,$num2,'quantita_min_predef',$tablerelinventario);
if ($quantita_min_predef > $quantita) {
$freccia_rossa = " style=\"background-image:url(img/fr_sx_rossa.gif); background-repeat:no-repeat; background-position: left center;\"";
break;
} # fine if ($quantita_min_predef > $quantita) 
} # fine for $num2
echo "<tr><td$freccia_rossa>$idapp</td>
<td><i>".mex("appartamento",$pag)."</i></td>
<td>&nbsp;</td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td>&nbsp;</td>";
echo "<td><a href=\"inventario.php?anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=inventario&amp;idmag=a".htmlspecialchars($idapp)."\">".mex("inventario",$pag)."</a></td>";
$opt_app .= "<option value=\"$idapp\">$idapp</option>";
} # fine if ($priv_vedi_inv_app == "s" or...
} # fine for $num1
} # fine if ($priv_vedi_inv_app != "n")

if ($priv_vedi_inv_mag != "n" and $priv_ins_mag != "n") {
echo "<tr><td><input type=\"text\" name=\"n_nome_mag\" size=\"18\"></td>
<td><i>".mex("magazzino",$pag)."</i></td>
<td><textarea name=\"n_descrizione_mag\" rows=2 cols=35 style=\"white-space: pre; overflow: auto;\"></textarea></td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td><select name=\"n_utente_ins_mag\">$option_utenti</select></td>";
echo "<td><input class=\"sbutton\" type=\"submit\" name=\"aggiungi_mag\" value=\"".mex("aggiungi",$pag)."\"></td></tr>";
} # fine if ($priv_vedi_inv_mag != "n" and $priv_ins_mag != "n")

echo "</table></div></form><br><br>";
} # fine if ($priv_vedi_inv_mag != "n" or $priv_vedi_inv_app != "n")

if ($priv_vedi_beni_inv != "n") {

echo "<a name=\"tab_beni_inv\"></a>
$frase_tab_beni_inv
<h3>".mex("Beni inventario",$pag).".</h3><br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#tab_beni_inv\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"inventario\">
<input type=\"hidden\" name=\"manda_form_beni\" value=\"SI\">
<table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".mex("Nome",$pag)."</td>
<td>".mex("Codice",$pag)."</td>
<td>".mex("Descrizione",$pag)."</td>
<td>".mex("Mancanti",$pag)."</td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td>".mex("Utente",$pag)."</td>";
echo "<td>".mex("Modifica",$pag)."</td></tr>";

$beni_inv = esegui_query("select * from $tablebeniinventario $condizione_beni_propri order by idbeniinventario");
$num_beni_inv = numlin_query($beni_inv);
for ($num1 = 0 ; $num1 < $num_beni_inv ; $num1++) {
$idinv = risul_query($beni_inv,$num1,'idbeniinventario');
$nome_bene = risul_query($beni_inv,$num1,'nome_bene');
$codice_bene = risul_query($beni_inv,$num1,'codice_bene');
$descrizione_bene = risul_query($beni_inv,$num1,'descrizione_bene');
$utente_ins_bene = risul_query($beni_inv,$num1,'utente_inserimento');
$descrizione_bene_len = strlen($descrizione_bene);
if ($descrizione_bene_len > 35) $descrizione_bene = "<small>$descrizione_bene</small>";
if ($descrizione_bene_len > 70) $descrizione_bene = "<small>$descrizione_bene</small>";
$mancanti = 0;
$beni_in_mag = esegui_query("select quantita,quantita_min_predef from $tablerelinventario where idbeneinventario = '$idinv' ");
$num_beni_in_mag = numlin_query($beni_in_mag);
if ($num_beni_in_mag) {
$cancella = "&nbsp;";
$quantita_tot = 0;
$quantita_min_predef_tot = 0;
for ($num2 = 0 ; $num2 < $num_beni_in_mag ; $num2++) {
$quantita = risul_query($beni_in_mag,$num2,'quantita');
$quantita_min_predef = risul_query($beni_in_mag,$num2,'quantita_min_predef');
$quantita_tot = $quantita_tot + $quantita;
$quantita_min_predef_tot = $quantita_min_predef_tot + $quantita_min_predef;
} # fine for $num2
if ($quantita_min_predef_tot > $quantita_tot) $mancanti = $quantita_min_predef_tot - $quantita_tot;
} # fine if ($num_beni_in_mag)
elseif ($priv_ins_beni_inv != "n" and ($id_utente == 1 or $id_utente == $utente_ins_bene)) $cancella = "<a href=\"$pag?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=$tipo_tabella&amp;manda_form_beni=SI&amp;elimina_bene=SI&amp;idinv=$idinv#tab_beni_inv\">".mex("cancella",$pag)."</a>";
if ($mancanti <= 0) $colore = "";
else $colore = " style=\"background-color: #CC0000;\"";
echo "<tr><td>$nome_bene</td>
<td>$codice_bene</td>
<td>$descrizione_bene</td>
<td$colore>$mancanti</td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td>".$nomi_utenti[$utente_ins_bene]."</td>";
echo "<td>$cancella</td></tr>";
} # fine for $num1

if ($priv_ins_beni_inv != "n") {
echo "<tr><td><input type=\"text\" name=\"n_nome_bene\" size=\"18\"></td>
<td><input type=\"text\" name=\"n_codice_bene\" size=\"12\"></td>
<td><textarea name=\"n_descrizione_bene\" rows=2 cols=35 style=\"white-space: pre; overflow: auto;\"></textarea></td>
<td>&nbsp;</td>";
if ($id_utente == 1 and $num_tutti_utenti > 1) echo "<td><select name=\"n_utente_ins_bene\">$option_utenti</select></td>";
echo "<td>".mex("<input class=\"sbutton\" type=\"submit\" name=\"aggiungi_bene\" value=\"".mex("aggiungi",$pag)."\">",$pag)."</td></tr>";
} # fine if ($priv_ins_beni_inv != "n")

echo "</table></div></form>";
} # fine if ($priv_vedi_beni_inv != "n")


if ($opt_app and $priv_ins_beni_in_app != "n" and $priv_vedi_beni_inv != "n") {
if ($priv_ins_beni_in_app != "s") {
if ($priv_vedi_inv_app == $priv_ins_beni_in_app) $app_cons_ins_beni = $appartamenti_consentiti;
else {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
if ($priv_ins_beni_in_app != "g") $app_cons_ins_beni = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $app_cons_ins_beni = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
} # fine else if ($priv_vedi_inv_app == $priv_ins_beni_in_app)
} # fine if ($priv_ins_beni_in_app != "s")
$opt_app_a = "";
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idapp = risul_query($appartamenti,$num1,'idappartamenti');
if ($priv_vedi_inv_app == "s" or $appartamenti_consentiti[$idapp] != "NO") {
if ($priv_ins_beni_in_app == "s" or $app_cons_ins_beni[$idapp] != "NO") {
$opt_app_a .= "<option value=\"a$idapp\">".mex("dell'appartamento",$pag)." $idapp</option>";
} # fine if ($priv_ins_beni_in_app == "s" or...
} # fine if ($priv_vedi_inv_app == "s" or...
} # fine for $num1
if ($opt_app_a) {
echo "<br><br>
<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"inventario\">
<input type=\"hidden\" name=\"importa_inv_app\" value=\"SI\">
".mex("Importa l'invetario",$pag)." <select name=\"app_a\">";
$nomi_tariffe = esegui_query("select * from $tablenometariffe where idntariffe = '1' ");
$regole2 = esegui_query("select * from $tableregole where tariffa_per_app != '' order by tariffa_per_app");
$num_regole2 = numlin_query($regole2);
unset($html_opt);
for ($num1 = 0 ; $num1 < $num_regole2 ; $num1++) {
$tariffa_regola2 = risul_query($regole2,$num1,'tariffa_per_app');
$num_tariffa = substr($tariffa_regola2,7);
if ($attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$num_tariffa] == "SI") {
$nome_tariffa = risul_query($nomi_tariffe,0,$tariffa_regola2);
if (!$nome_tariffa) $nome_tariffa = mex("tariffa",$pag).substr($tariffa_regola2,7);
$html_opt[$num_tariffa] = "<option value=\"$tariffa_regola2\">".mex("degli appartamenti della tariffa",$pag)." $nome_tariffa</option>";
} # fine if ($attiva_tariffe_consentite == "n" or...
} # fine for $num1
if ($html_opt) {
ksort($html_opt);
while (list($key, $val) = each($html_opt)) echo $val;
} # fine if ($html_opt)
echo "$opt_app_a</select>
 ".mex("dall'appartamento",$pag)." <select name=\"app_da\">$opt_app</select>
 <input class=\"sbutton\" type=\"submit\" value=\"".mex("Importa",$pag)."\">
</div></form><br>";
} # fine if ($opt_app_a)
} # fine if ($opt_app and $priv_ins_beni_in_app != "n" and $priv_vedi_beni_inv != "n")


} # fine if ($mostra_form_inventario != "NO")

} # fine if ($tipo_tabella == "inventario" and ($priv_vedi_beni_inv != "n" or $priv_vedi_inv_mag != "n" or $priv_vedi_inv_app))





if ($tipo_tabella == "documenti" and $priv_vedi_tab_doc != "n") {

include("./includes/funzioni_contratti.php");
$nomi_contratti = trova_nomi_contratti($max_contr,$id_utente,$tablecontratti,$tablepersonalizza,$LIKE,$pag);

function trova_max_contr_salv ($num_contr,$anno_doc,&$dir_salva,&$nome_max_contr,&$suff_file,$nomi_contratti,$tablecontratti) {
global $LIKE;

$max_contr = 0;
$nome_max_contr = "";
$suff_file = "";
if (!$dir_salva) {
$contr_salva = esegui_query("select * from $tablecontratti where tipo = 'dir' and numero = '$num_contr' ");
if (numlin_query($contr_salva)) $dir_salva = formatta_dir_salva_doc(risul_query($contr_salva,0,'testo'));
} # fine if (!$dir_salva)
if ($dir_salva) {
$nome_contr = $nomi_contratti['salv'][$num_contr];
$dati_contr = esegui_query("select * from $tablecontratti where numero = '$num_contr' and tipo $LIKE 'contr%' ");
$tipo_contratto = risul_query($dati_contr,0,'tipo');
if ($tipo_contratto == "contrrtf") $suff_file = "rtf";
if ($tipo_contratto == "contrhtm") $suff_file = "html";
if ($tipo_contratto == "contrtxt") $suff_file = "txt";
$contr_dir = opendir($dir_salva."/");
while ($contr_corr = readdir($contr_dir)) {
if ($contr_corr != "." and $contr_corr != ".." and is_file($dir_salva."/".$contr_corr)) {
if (substr($contr_corr,0,strlen($nome_contr)) == $nome_contr) {
$suff_file_corr = "";
if (substr($contr_corr,-4) == ".rtf") $suff_file_corr = "rtf";
if (substr($contr_corr,-5) == ".html") $suff_file_corr = "html";
if (substr($contr_corr,-4) == ".txt") $suff_file_corr = "txt";
if ($suff_file_corr) {
$resto_nome_contr = substr($contr_corr,strlen($nome_contr));
if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}(_[0-9]+(-[0-9]+)?)*\.$suff_file_corr/","",$resto_nome_contr) == "") {
$anno_doc_corr = substr($resto_nome_contr,1,4);
$n_contr_corr = substr($resto_nome_contr,6,5);
if ($anno_doc_corr == $anno_doc and $n_contr_corr > $max_contr) {
$max_contr = $n_contr_corr;
$nome_max_contr = $contr_corr;
} # fine if ($anno_doc_corr == $anno_doc and $n_contr_corr > $max_contr)
} # fine if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}\.$suff_file_corr/","",$resto_nome_contr) == "")
} # fine if ($suff_file_corr)
} # fine if (substr($contr_corr,0,strlen($nome_contr)) == $nome_contr)
} # fine if ($contr_corr != "." and $contr_corr != ".." and...
} # fine while ($fattura_corr = readdir($fatture_dir))
closedir($contr_dir);
if (@is_array($nomi_contratti['num_prog'])) {
$altri_contr_np = $nomi_contratti['num_prog'][$dir_salva."/".$nome_contr];
if (@is_array($altri_contr_np)) {
reset($altri_contr_np);
while (list($contr_np,$val_contr) = each($altri_contr_np)) {
$nome_contratto_np = explode("/",$contr_np);
$nome_contratto_np = $nome_contratto_np[(count($nome_contratto_np) - 1)];
$dir_salva_np = substr($contr_np,0,(-1 * (strlen($nome_contratto_np) + 1)));
$contr_dir = opendir($dir_salva_np."/");
while ($contr_corr = readdir($contr_dir)) {
if ($contr_corr != "." and $contr_corr != ".." and is_file($dir_salva_np."/".$contr_corr)) {
if (substr($contr_corr,0,strlen($nome_contratto_np)) == $nome_contratto_np) {
$suff_file_corr = "";
if (substr($contr_corr,-4) == ".rtf") $suff_file_corr = "rtf";
if (substr($contr_corr,-5) == ".html") $suff_file_corr = "html";
if (substr($contr_corr,-4) == ".txt") $suff_file_corr = "txt";
if ($suff_file_corr) {
$resto_nome_contr = substr($contr_corr,strlen($nome_contratto_np));
if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}(_[0-9]+(-[0-9]+)?)*\.$suff_file_corr/","",$resto_nome_contr) == "") {
$anno_contr = substr($resto_nome_contr,1,4);
$n_contr_corr = substr($resto_nome_contr,6,5);
if ($anno_contr == $anno_doc and $n_contr_corr > $max_contr) {
$max_contr = $n_contr_corr;
$nome_max_contr = $contr_corr;
} # fine if ($anno_doc_corr == $anno_doc and $n_contr_corr > $max_contr)
} # fine if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}\.$suff_file_corr/","",$resto_nome_contr) == "")
} # fine if ($suff_file_corr)
} # fine if (substr($contr_corr,0,strlen($nome_contratto_np)) == $nome_contratto_np)
} # fine if ($contr_corr != "." and $contr_corr != ".." and...
} # fine while ($fattura_corr = readdir($fatture_dir))
closedir($contr_dir);
} # fine while (list($contr_np,$val_contr) = each($altri_contr_np))
} # fine if (@is_array($altri_contr_np))
} # fine if (@is_array($nomi_contratti['num_prog']))
} # fine if ($dir_salva)

return $max_contr;

} # fine function trova_max_contr_salv


if ($canc_doc) {
if (controlla_num_pos($num_contr) == "SI" and $num_doc_canc and controlla_num_pos($num_doc_canc) == "SI" and controlla_anno($anno_doc_canc) == "SI") {
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") {
if ($anno_doc_canc == $anno or ($anno_doc_canc == $anno_corrente and !@is_file("./dati/selectperiodi$anno_corrente.1.php"))) {
$dir_salva = "";
$max_contr_esist = trova_max_contr_salv($num_contr,$anno_doc_canc,$dir_salva,$nome_max_contr,$suff_file,$nomi_contratti,$tablecontratti);
if ($max_contr_esist == $num_doc_canc) {
if (!$continua) {
$mostra_tab_doc_salvati = "NO";
echo "
".ucfirst(mex("si è sicuri di voler <b class=\"colred\">cancellare</b> il documento",$pag))." $dir_salva/$nome_max_contr?<br>
<table><tr><td style=\"height: 2px;\"></td></tr><tr><td>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pagina_prenota\" value=\"$pagina_prenota\">
<input type=\"hidden\" name=\"canc_doc\" value=\"SI\">
<input type=\"hidden\" name=\"num_contr\" value=\"$num_contr\">
<input type=\"hidden\" name=\"anno_doc_canc\" value=\"$anno_doc_canc\">
<input type=\"hidden\" name=\"num_doc_canc\" value=\"$num_doc_canc\">
<input type=\"hidden\" name=\"continua\" value=\"SI\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("SI",$pag)."\">
</div></form></td><td>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pagina_prenota\" value=\"$pagina_prenota\">
<input class=\"sbutton\" type=\"submit\" value=\"".mex("NO",$pag)."\">
</div></form></td></tr></table><br>";
} # fine if (!$continua)
else {
if (unlink("$dir_salva/$nome_max_contr")) echo "<small><b>".ucfirst(mex("documento",$pag))." $num_doc_canc ".mex("cancellato",$pag).".</b><br><br></small>";
} # fine else if (!$continua)
} # fine if ($max_contr_esist == $num_doc_canc)

} # fine if ($anno_doc_canc == $anno or...
} # fine if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI")
} # fine if (controlla_num_pos($num_contr) == "SI" and...
} # fine if ($canc_doc)


if ($upload_doc) {
if (controlla_num_pos($num_contr) == "SI" and controlla_anno($anno_doc_upload) == "SI") {
if ($anno_doc_upload == $anno or ($anno_doc_upload == $anno_corrente and !@is_file("./dati/selectperiodi$anno_corrente.1.php"))) {
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") {
if (!$file_doc_upload) {
if ($HTTP_POST_FILES['file_doc_upload']['tmp_name']) $file_doc_upload = $HTTP_POST_FILES['file_doc_upload']['tmp_name'];
else if ($_FILES['file_backup_upload']['tmp_name']) $file_doc_upload = $_FILES['file_doc_upload']['tmp_name'];
} # fine if (!$file_doc_upload)
if ($file_doc_upload) {
$dir_salva = "";
$max_contr_esist = trova_max_contr_salv($num_contr,$anno_doc_upload,$dir_salva,$nome_max_contr,$suff_file,$nomi_contratti,$tablecontratti);
if ($dir_salva) {
if ($suff_upload == "html" or $suff_upload == "rtf" or $suff_upload == "txt") $suff_file = $suff_upload;
$file_tmp = "doc_upload.tmp";
if (move_uploaded_file($file_doc_upload,"$dir_salva/$file_tmp")) {
if (!defined('C_MASSIMO_NUM_BYTE_UPLOAD') or C_MASSIMO_NUM_BYTE_UPLOAD == 0 or filesize("$dir_salva/$file_tmp") <= C_MASSIMO_NUM_BYTE_UPLOAD) {
$n_max_contr = $max_contr_esist + 1;
for ($num1 = strlen($n_max_contr) ; $num1 < 5 ; $num1++) $n_max_contr = "0".$n_max_contr;
if (rename("$dir_salva/$file_tmp","$dir_salva/".$nomi_contratti['salv'][$num_contr]."_$anno_doc_upload"."_$n_max_contr.$suff_file")) echo "<small><b>".ucfirst(mex("documento",$pag))." $n_max_contr ".mex("inviato",$pag).".</b><br><br></small>";
else unlink("$dir_salva/$file_tmp");
} # fine if (!defined("C_MASSIMO_NUM_BYTE_UPLOAD") or...
else unlink("$dir_salva/$file_tmp");
} # fine if (move_uploaded_file($file_doc_upload,"$dir_salva/$file_tmp"))
} # fine if ($dir_salva)
} # fine if ($file_doc_upload)
} # fine if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI")
} # fine if ($anno_doc_upload == $anno or...
} # fine if (controlla_num_pos($num_contr) == "SI" and...
} # fine if ($upload_doc)


if ($mostra_tab_doc_salvati != "NO") {

echo "<h3>".ucfirst(mex("documenti salvati",$pag)).".</h3>";

$num_vedi_in_tab = esegui_query("select valpersonalizza_num from $tablepersonalizza where idpersonalizza = 'num_righe_tab_doc_salvati' and idutente = '$id_utente'");
$num_vedi_in_tab = risul_query($num_vedi_in_tab,0,'valpersonalizza_num');

$contr_salva = esegui_query("select * from $tablecontratti where tipo = 'dir'");
$num_contr_salva = numlin_query($contr_salva);
if ($priv_mod_prenota_iniziate != "s") $id_periodo_corrente = calcola_id_periodo_corrente($anno);
unset($contratti_visti);

for ($num_c = 0 ; $num_c < $num_contr_salva ; $num_c++) {
$num_contr = risul_query($contr_salva,$num_c,'numero');
$nome_contr = $nomi_contratti['salv'][$num_contr];
$dir_salva = formatta_dir_salva_doc(risul_query($contr_salva,$num_c,'testo'));

if ($dir_salva and ($priv_vedi_tab_doc == "s" or $attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI")) {
if (!$contratti_visti[$dir_salva."/".$nome_contr]) {
$contratti_visti[$dir_salva."/".$nome_contr] = 1;
$dati_contr = esegui_query("select * from $tablecontratti where numero = '$num_contr' and tipo $LIKE 'contr%' ");
$tipo_contratto = risul_query($dati_contr,0,'tipo');
if ($tipo_contratto == "contrrtf") $suff_file = "rtf";
if ($tipo_contratto == "contrhtm") $suff_file = "html";
if ($tipo_contratto == "contrtxt") $suff_file = "txt";

unset($contratti_salvati);
$num_doc_salvati = 0;
$ultimo_anno = 0;
$contr_dir = opendir($dir_salva."/");
while ($contr_corr = readdir($contr_dir)) {
if ($contr_corr != "." and $contr_corr != ".." and is_file($dir_salva."/".$contr_corr)) {
if (substr($contr_corr,0,strlen($nome_contr)) == $nome_contr) {
$suff_file_corr = "";
if (substr($contr_corr,-4) == ".rtf") $suff_file_corr = "rtf";
if (substr($contr_corr,-5) == ".html") $suff_file_corr = "html";
if (substr($contr_corr,-4) == ".txt") $suff_file_corr = "txt";
if ($suff_file_corr) {
$resto_nome_contr = substr($contr_corr,strlen($nome_contr));
if (substr($resto_nome_contr,0,1) != "_" or substr($resto_nome_contr,5,1) != "_") $anno_doc = "";
else $anno_doc = substr($resto_nome_contr,1,4);
if ($anno_doc == $anno or ($anno_doc == $anno_corrente and !@is_file("./dati/selectperiodi$anno_corrente.1.php"))) {
if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}(_[0-9]+(-[0-9]+)?)*\.$suff_file_corr/","",$resto_nome_contr) == "") {
$n_contr_corr = substr($resto_nome_contr,6,5);
$contratti_salvati[$anno_doc][$n_contr_corr] = $contr_corr;
$num_doc_salvati++;
if ($anno_doc > $ultimo_anno) $ultimo_anno = $anno_doc;
} # fine if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}\.$suff_file_corr/","",$resto_nome_contr) == "")
} # fine if (substr($resto_nome_contr,0,6) == $anno or...
} # fine if ($suff_file_corr)
} # fine if (substr($contr_corr,0,strlen($nome_contr)) == $nome_contr)
} # fine if ($contr_corr != "." and $contr_corr != ".." and...
} # fine while ($fattura_corr = readdir($fatture_dir))
closedir($contr_dir);

$stringa_pagine = "";
$stringa_puntini_tab = "";
if ($num_doc_salvati > $num_vedi_in_tab) {
$num_pagine_prenota = ceil($num_doc_salvati/$num_vedi_in_tab);
$stringa_pagine = "<div style=\"text-align: center;\"><small>".mex("pagine",$pag)."</small>:";
if (!$pagina_prenota) $pagina_prenota = $num_pagine_prenota;
for ($num1 = 1 ; $num1 <= $num_pagine_prenota ; $num1++) {
$stringa_pagine .= " ";
if ($num1 != $pagina_prenota) {
$stringa_pagine .= "<a href=\"./$pag?anno=$anno&amp;id_sessione=$id_sessione&amp;tipo_tabella=$tipo_tabella&amp;pagina_prenota=$num1\">";
} # fine if ($num1 != $pagina_prenota)
else $stringa_pagine .= "<b>";
$stringa_pagine .= $num1;
if ($num1 != $pagina_prenota) $stringa_pagine .= "</a>";
else $stringa_pagine .= "</b>";
} # fine for $num1
$stringa_pagine .= "</div>";
$stringa_puntini_tab = "<tr><td colspan=\"4\">...</td></tr>";
} # fine if ($num_doc_salvati > $num_vedi_in_tab)
else $pagina_prenota = 1;

echo "<br><h4>$nome_contr ".mex("in",$pag)." $dir_salva</h4>
$stringa_pagine
<table class=\"t1\" style=\"background-color: $t1color; margin-left: auto; margin-right: auto;\" width=3 border=\"$t1border\" cellspacing=\"$t1cellspacing\" cellpadding=\"$t1cellpadding\">
<tr><td>".ucfirst(mex("numero",$pag))."</td>
<td>".ucfirst(mex("nome file",$pag))."</td>
<td>".ucfirst(mex("prenotazioni",$pag))."</td>
<td>".ucfirst(mex("azione",$pag))."</td></tr>";
if ($stringa_pagine and $pagina_prenota != 1) echo $stringa_puntini_tab;

if (@is_array($contratti_salvati)) {
$num_doc_in_tab = 0;
ksort($contratti_salvati);
reset($contratti_salvati);
while (list($anno_doc,$val) = each($contratti_salvati)) {
$contratti_salvati_anno = $contratti_salvati[$anno_doc];
ksort($contratti_salvati_anno);
reset($contratti_salvati_anno);
if ($anno_doc != $anno and ($num_doc_in_tab + 1) > ($num_doc_salvati - (($num_pagine_prenota - $pagina_prenota + 1) * $num_vedi_in_tab)) and ($num_doc_in_tab + 1) <= ($num_doc_salvati - (($num_pagine_prenota - $pagina_prenota) * $num_vedi_in_tab))) echo "<tr><td colspan=\"4\">".ucfirst(mex("anno",$pag))." $anno_doc</td></tr>";
$tab_contr = "";
while (list($n_contr_corr,$contr_corr) = each($contratti_salvati_anno)) {
$num_doc_in_tab++;
if ($pagina_prenota == 1 or ($num_doc_in_tab > ($num_doc_salvati - (($num_pagine_prenota - $pagina_prenota + 1) * $num_vedi_in_tab)) and $num_doc_in_tab <= ($num_doc_salvati - (($num_pagine_prenota - $pagina_prenota) * $num_vedi_in_tab)))) {

$resto_nome_contr = substr($contr_corr,strlen($nome_contr));
if (substr($contr_corr,-4) == ".rtf") $suff_file_corr = "rtf";
if (substr($contr_corr,-5) == ".html") $suff_file_corr = "html";
if (substr($contr_corr,-4) == ".txt") $suff_file_corr = "txt";
$lista_pren = "";
$tutte_pren = "";
$num_pren_esist = substr($resto_nome_contr,12);
$num_pren_esist = substr($num_pren_esist,0,(-1 * (strlen($suff_file_corr) + 1)));
if ($num_pren_esist) {
$num_pren_esist = explode("_",$num_pren_esist);
for ($num1 = 0 ; $num1 < count($num_pren_esist) ; $num1++) {
$num_pren_esist2 = explode("-",$num_pren_esist[$num1]);
$fine_for = $num_pren_esist2[(count($num_pren_esist2) - 1)];
for ($num2 = $num_pren_esist2[0] ; $num2 <= $fine_for ; $num2++) {
$link_modifica = "SI";
$prenotazione = esegui_query("select * from $tableprenota where idprenota = '".aggslashdb($num2)."' ");
if (!numlin_query($prenotazione)) $link_modifica = "NO";
else {
$utente_inserimento = risul_query($prenotazione,0,'utente_inserimento');
if ($priv_mod_prenotazioni == "n") $link_modifica = "NO";
if ($priv_mod_prenotazioni == "p" and $utente_inserimento != $id_utente) $link_modifica = "NO";
if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $link_modifica = "NO";
if ($priv_mod_prenota_iniziate != "s") {
$id_data_inizio = risul_query($prenotazione,0,'iddatainizio');
if ($id_periodo_corrente >= $id_data_inizio) $link_modifica = "NO";
} # fine if ($priv_mod_prenota_iniziate != "s")
if ($priv_mod_prenota_ore != "000") {
$adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600)));
$data_ins = risul_query($prenotazione,0,'datainserimento');
$limite = date("YmdHis",mktime((substr($data_ins,11,2) + $priv_mod_prenota_ore),substr($data_ins,14,2),substr($data_ins,17,2),substr($data_ins,5,2),substr($data_ins,8,2),substr($data_ins,0,4)));
if ($adesso > $limite) $link_modifica = "NO";
} # fine if ($priv_mod_prenota_ore != "000")
} # fine else if (!numlin_query($prenotazione))
if ($link_modifica == "SI") {
$link_modifica_inizio = "<a href=\"modifica_prenota.php?id_prenota=$num2&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=documenti\">";
$link_modifica_fine = "</a>";
} # fine if ($link_modifica == "SI")
else {
unset($link_modifica_inizio);
unset($link_modifica_fine);
#$checkbox_modifica = "&nbsp;";
} # fine else if ($link_modifica == "SI")
$lista_pren .= "$link_modifica_inizio$num2$link_modifica_fine, ";
if ($link_modifica_inizio) $tutte_pren .= "$num2,";
} # fine for $num2
} # fine for $num1
$lista_pren = substr($lista_pren,0,-2);
$tutte_pren = substr($tutte_pren,0,-1);
if (str_replace(",","",$tutte_pren) != $tutte_pren) {
$lista_pren .= ", <a href=\"modifica_prenota.php?id_prenota=$tutte_pren&amp;anno=$anno&amp;id_sessione=$id_sessione&amp;origine=visualizza_tabelle.php&amp;tipo_tabella=documenti\">".mex("tutte",$pag)."</a>";
} # fine if (str_replace(",","",$tutte_pren) != $tutte_pren)
} # fine if ($num_pren_esist)

$nome_file_contr = $contr_corr;
if (strlen($contr_corr) > 30) $nome_file_contr = "<small>$nome_file_contr</small>";
if (strlen($contr_corr) > 38) $nome_file_contr = "<small>$nome_file_contr</small>";
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") $nome_file_contr = "<a href=\"./visualizza_contratto?id_sessione=$id_sessione&amp;anno=$anno&amp;id_transazione=tabdoc&amp;numero_contratto=$num_contr&amp;contr_corr=$contr_corr\">$nome_file_contr</a>";

if ($tab_contr) $tab_contr .= "<td>&nbsp;</td></tr>";
$tab_contr .= "<tr><td>$n_contr_corr</td>
<td>$nome_file_contr</a></td>
<td>$lista_pren</td>";

} # fine if ($pagina_prenota == 1 or...
$ultimo_n_contr = $n_contr_corr;
} # fine while (list($n_contr_corr,$contr_corr) = each($contratti_salvati_anno))

$max_contr_esist = trova_max_contr_salv($num_contr,$anno_doc,$dir_salva,$nome_max_contr,$suff_file,$nomi_contratti,$tablecontratti);

if ($tab_contr) {
if ((!$num_pagine_prenota or $pagina_prenota == $num_pagine_prenota) and ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") and $ultimo_n_contr == $max_contr_esist) {
$tab_contr .= "<td><form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pagina_prenota\" value=\"$pagina_prenota\">
<input type=\"hidden\" name=\"canc_doc\" value=\"SI\">
<input type=\"hidden\" name=\"num_contr\" value=\"$num_contr\">
<input type=\"hidden\" name=\"anno_doc_canc\" value=\"$anno_doc\">
<input type=\"hidden\" name=\"num_doc_canc\" value=\"$ultimo_n_contr\">
<input class=\"sbutton\" type=\"submit\" value=\"".ucfirst(mex("elimina",$pag))."\">
</div></form></td></tr>";
} # fine if ((!$num_pagine_prenota or $pagina_prenota == $num_pagine_prenota) and...
else $tab_contr .= "<td>&nbsp;</td></tr>";
} # fine if ($tab_contr)

echo $tab_contr;
if ($stringa_pagine and $pagina_prenota != $num_pagine_prenota and $anno_doc == $ultimo_anno) echo $stringa_puntini_tab;
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") {
$nuovo_n_contr = $max_contr_esist + 1;
echo "<tr><td colspan=\"4\">
<form accept-charset=\"utf-8\" enctype=\"multipart/form-data\" method=\"post\" action=\"$pag\"><div>
<input type=\"hidden\" name=\"MAX_FILE_SIZE\" value=\"900000000\">
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pagina_prenota\" value=\"$pagina_prenota\">
<input type=\"hidden\" name=\"upload_doc\" value=\"SI\">
<input type=\"hidden\" name=\"num_contr\" value=\"$num_contr\">
<input type=\"hidden\" name=\"anno_doc_upload\" value=\"$anno_doc\">
".ucfirst(mex("fai l'upload del documento numero",$pag))." $nuovo_n_contr ";
if ($anno != $anno_doc) echo "($anno_doc) ";
${"sel_".$suff_file} = " selected";
echo "<input name=\"file_doc_upload\" type=\"file\">
<select name=\"suff_upload\">
<option value=\"html\"$sel_html>HTML</option>
<option value=\"rtf\"$sel_rtf>RTF</option>
<option value=\"txt\"$sel_txt>TXT</option>
</select>
<input class=\"sbutton\" type=\"submit\" name=\"upload_backup\" value=\"".ucfirst(mex("fai l'upload",$pag))."\">
</div></form></td></tr>";
} # fine if ($attiva_contratti_consentiti == "n" or...
} # fine while (list($anno_doc,$val) = each($contratti_salvati))
} # fine if (@is_array($contratti_salvati))

else {
if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") {
$anno_doc = $anno;
$max_contr_esist = trova_max_contr_salv($num_contr,$anno_doc,$dir_salva,$nome_max_contr,$suff_file,$nomi_contratti,$tablecontratti);
$nuovo_n_contr = $max_contr_esist + 1;
if ($anno_doc != $anno_corrente and !@is_file("./dati/selectperiodi$anno_corrente.1.php")) $anno_doc = $anno_corrente;
echo "<tr><td colspan=\"4\">
<form accept-charset=\"utf-8\" enctype=\"multipart/form-data\" method=\"post\" action=\"$pag\"><div>
<input type=\"hidden\" name=\"MAX_FILE_SIZE\" value=\"900000000\">
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"pagina_prenota\" value=\"$pagina_prenota\">
<input type=\"hidden\" name=\"upload_doc\" value=\"SI\">
<input type=\"hidden\" name=\"num_contr\" value=\"$num_contr\">
<input type=\"hidden\" name=\"anno_doc_upload\" value=\"$anno_doc\">
".ucfirst(mex("fai l'upload del documento numero",$pag))." $nuovo_n_contr ";
if ($anno != $anno_doc) echo "($anno_doc) ";
${"sel_".$suff_file} = " selected";
echo "<div class=\"wsnowrap\">
<input name=\"file_doc_upload\" type=\"file\">
<select name=\"suff_upload\">
<option value=\"html\"$sel_html>HTML</option>
<option value=\"rtf\"$sel_rtf>RTF</option>
<option value=\"txt\"$sel_txt>TXT</option>
</select>
<input class=\"sbutton\" type=\"submit\" name=\"upload_backup\" value=\"".ucfirst(mex("fai l'upload",$pag))."\">
</div></div></form></td></tr>";
} # fine if ($attiva_contratti_consentiti == "n" or...
} # fine else if (@is_array($contratti_salvati))

echo "</table>
$stringa_pagine";
} # fine if (!$contratti_visti[$dir_salva."/".$nome_contr])
} # fine if ($dir_salva and...

} # fine for $num_c

} # fine if ($mostra_tab_doc_salvati != "NO")


} # fine if ($tipo_tabella == "documenti" and $priv_vedi_tab_doc != "n")





if ($tipo_tabella == "statistiche" and $priv_vedi_tab_stat != "n") {

function genera_istogramma ($x,$nome_x,$y1,$y2,$y3,$y4,$y5,$titolo,$titolo_serie,$titolo_col,$commento_col,$colore_col,$colore,$colore_riga,$simbolo_val,$stile_soldi) {

$num_x = count($x);
$num_col = 0;
for ($num1 = 1 ; $num1 <= 5 ; $num1++) {
if (@is_array(${"y".$num1})) $num_col = $num1;
} # fine for $num1
$max = 0;
for ($num1 = 1 ; $num1 <= $num_col ; $num1++) {
for ($num2 = 0 ; $num2 < $num_x ; $num2++) if (${"y".$num1}[$x[$num2]] > $max) $max = ${"y".$num1}[$x[$num2]];
} # fine for $num1
$num_col_tot = ($num_x * $num_col);
$width_cols = (($num_col * 20) - 4);
if ($num_x < 3) $width_cols = $width_cols + ($num_col * 10);
if ($num_x < 2) $width_cols = $width_cols + ($num_col * 20);

$istogramma = "<h5>$titolo</h5>
<table cellspacing=\"0\" cellpadding=\"0\" style=\"margin-left: auto; margin-right: auto; background-color: $colore; border: 1px solid #000000;\">
<tr><td colspan=\"$num_col_tot\" align=\"center\">
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" style=\"margin-left: auto; margin-right: auto;\">
<tr>";
$linea_tot = "NO";
for ($num1 = 1 ; $num1 <= $num_col ; $num1++) {
$istogramma .= "<td valign=\"middle\" align=\"center\">
<table style=\"width: 15px; height: 9px; border: 1px solid #000000; background-color: ".$colore_col[$num1].";\"><tr><td></td></tr></table>
</td>
<td valign=\"bottom\"><small style=\"padding: 0px;\"><b>&nbsp;".$titolo_serie[$num1]."</b></small></td>";
if ($num1 != $num_col) $istogramma .= "<td style=\"width: 20px;\"></td>";
if ($titolo_serie['TOT'][$num1]) $linea_tot = "SI";
} # fine for $num1
if ($linea_tot == "SI") {
$istogramma .= "</tr><tr>";
for ($num1 = 1 ; $num1 <= $num_col ; $num1++) {
$istogramma .= "<td colspan=\"2\" valign=\"top\" align=\"center\" style=\"line-height: 0.60em;\">";
if ($titolo_serie['TOT'][$num1]) $istogramma .= "<small><small>(".$titolo_serie["TOT"][$num1]."$simbolo_val)</small></small>";
$istogramma .= "</td>";
$linea_tot = "SI";
if ($num1 != $num_col) $istogramma .= "<td style=\"width: 20px;\"></td>";
} # fine for $num1
} # fine if ($linea_tot == "SI")
$istogramma .= "</tr></table></td></tr>
<tr><td colspan=\"$num_col_tot\" style=\"height: 4px;\"></td></tr><tr>";

for ($num1 = 0 ; $num1 < $num_x ; $num1++) {
for ($num2 = 1 ; $num2 <= $num_col ; $num2++) {
$y = ${"y".$num2};
if (($num2 + 1) > $num_col) {
$y_prox = $y1;
$num1_prox = $num1 + 1;
} # fine if (($num2 + 1) > $num_col)
else {
$y_prox = ${"y".($num2 + 1)};
$num1_prox = $num1;
} # fine else if (($num2 + 1) > $num_col)
if ($max > 0) $altezza = round(200 / $max * $y[$x[$num1]]);
else $altezza = 0;
if ($altezza < 0) $altezza = 2;
$resto_alt = 200 - $altezza;
$cifra_vedi = $y[$x[$num1]];
if (substr($cifra_vedi,0,1) == "-") $cifra_vedi = substr($cifra_vedi,1);
if ($cifra_vedi == 0) $cifra_vedi = "";
else {
if (strlen($cifra_vedi) > 3) {
$cifra_vedi = (double) round($cifra_vedi,1);
if (strlen($cifra_vedi) > 3) {
$cifra_vedi = (double) floor($cifra_vedi);
if (strlen($cifra_vedi) > 3) {
$cifra_vedi = (double) $cifra_vedi / 1000;
$cifra_vedi = (floor($cifra_vedi * 10) / 10);
if (strlen($cifra_vedi) > 3) $cifra_vedi = floor($cifra_vedi);
if (strlen($cifra_vedi) > 3) {
$cifra_vedi = (double) $cifra_vedi / 1000;
$cifra_vedi = (floor($cifra_vedi * 10) / 10);
if (strlen($cifra_vedi) > 3) $cifra_vedi = floor($cifra_vedi);
$cifra_vedi .= "M";
} # fine if (strlen($cifra_vedi) > 3)
else $cifra_vedi .= "k";
} # fine if (strlen($cifra_vedi) > 3)
} # fine if (strlen($cifra_vedi) > 3)
} # fine if (strlen($cifra_vedi) > 3)
} # fine else if ($cifra_vedi == 0)
if (substr($y[$x[$num1]],0,1) == "-") $cifra_vedi = "-".$cifra_vedi;
$cifra_vedi = virgola_in_num($cifra_vedi,$stile_soldi);
if (@is_array($commento_col)) $commento_int = $commento_col[$titolo_serie[$num2]][$x[$num1]];
$titolo_int = $titolo_col[$x[$num1]]." ".$titolo_serie[$num2]."$commento_int: ".punti_in_num($y[$x[$num1]],$stile_soldi).$simbolo_val;
$istogramma .= "<td valign=\"bottom\"><table cellspacing=\"0\" cellpadding=\"0\" style=\"width: 100%; border: none;\">
<tr><td valign=\"bottom\" align=\"center\" style=\"height: $resto_alt"."px;\"><small><small>".$cifra_vedi."</small></small></td></tr>
<tr><td title=\"$titolo_int\" style=\"width: 20px; height: $altezza"."px; background-color: ".$colore_col[$num2]."; border: 1px solid #000000;";
if ($num1_prox == ($num_x) or $y_prox[$x[($num1_prox)]] >= $y[$x[$num1]]) {
$istogramma .= " border-right: none;";
if ($num2 == $num_col) $bordo_des[$num1] = "NO";
} # fine if ($num1_prox == ($num_x) or...
if (($num1 == 0 and $num2 == 1) or $ultima_y > $y[$x[$num1]]) {
$istogramma .= " border-left: none;";
if ($num2 == 1) $bordo_sin[$num1] = "NO";
} # fine if (($num1 == 0 and $num2 == 1) or...
if ($altezza == 0) $istogramma .= " border-top: none;";
$istogramma .= "\"></td></tr>
</table></td>";
$ultima_y = $y[$x[$num1]];
} # fine for $num2
} # fine for $num1

$istogramma .= "</tr><tr style=\"text-align: center; background-color: $colore_riga;\">";
for ($num1 = 0 ; $num1 < $num_x ; $num1++) {
$istogramma .= "<td colspan=\"$num_col\" valign=\"middle\" style=\"width: $width_cols"."px; padding: 2px; line-height: 0.75em;";
if ($bordo_sin[$num1] != "NO" or $bordo_des[$num1] != "NO") {
if ($bordo_sin[$num1] != "NO") $istogramma .= " border-left: 1px solid #000000;";
if ($bordo_des[$num1] != "NO") $istogramma .= " border-right: 1px solid #000000;";
} # fine if ($bordo_sin[$num1] != "NO" or...
$tag_aper = "<small><b>";
$tag_chiu = "</b></small>";
if (strlen($x[$num1]) > 5) {
$tag_aper = "<small><small><b>";
$tag_chiu = "</b></small></small>";
} # fine if (strlen($x[$num1]) > 5)
if (strlen($x[$num1]) > 10) {
$tag_aper = "<small><small>";
$tag_chiu = "</small></small>";
} # fine if (strlen($x[$num1]) > 10)
$istogramma .= "\">$tag_aper".$nome_x[$num1]."$tag_chiu</td>";
} # fine for $num1
$istogramma .= "</tr></table>";

return $istogramma;

} # fine function genera_istogramma


function genera_statistiche (&$entrate_ins_mese,&$num_prenota_ins_mese,&$entrate_prog_ins_mese,&$num_prenota_prog_ins_mese,&$percent_occupazione,&$entrate_mese,&$num_prenota_mese,&$num_origine,&$entrate_origine,&$percent_num_origine,&$percent_entrate_origine,&$num_nazionalita,&$entrate_nazionalita,&$percent_num_nazionalita,&$percent_entrate_nazionalita,&$app_occupati,&$prezzo_medio_prenota,&$revpar,&$revpar_ca,&$pagamenti,&$nazionalita_mese,&$num_giorni_mese,$anno_stat,$mesi,$prezzi,$appartamenti_sel,$condizione_prenota_proprie,$PHPR_TAB_PRE) {
global $LIKE,$ILIKE;

$tableprenota_stat = $PHPR_TAB_PRE."prenota".$anno_stat;
$tablecostiprenota_stat = $PHPR_TAB_PRE."costiprenota".$anno_stat;
$tableperiodi_stat = $PHPR_TAB_PRE."periodi".$anno_stat;
$tablesoldi_stat = $PHPR_TAB_PRE."soldi".$anno_stat;
$tableclienti = $PHPR_TAB_PRE."clienti";
$tableappartamenti = $PHPR_TAB_PRE."appartamenti";

$num_giorni_mese[$anno_stat][1] = 31;
if (date("n",mktime(0,0,0,2,29,$anno_stat)) == "2") $num_giorni_mese[$anno_stat][2] = 29;
else $num_giorni_mese[$anno_stat][2] = 28;
$num_giorni_mese[$anno_stat][3] = 31;
$num_giorni_mese[$anno_stat][4] = 30;
$num_giorni_mese[$anno_stat][5] = 31;
$num_giorni_mese[$anno_stat][6] = 30;
$num_giorni_mese[$anno_stat][7] = 31;
$num_giorni_mese[$anno_stat][8] = 31;
$num_giorni_mese[$anno_stat][9] = 30;
$num_giorni_mese[$anno_stat][10] = 31;
$num_giorni_mese[$anno_stat][11] = 30;
$num_giorni_mese[$anno_stat][12] = 31;

if (strcmp($appartamenti_sel,"")) {
$appartamenti_sel = explode(",",$appartamenti_sel);
$num_appartamenti_sel = count($appartamenti_sel);
for ($num1 = 0 ; $num1 < $num_appartamenti_sel ; $num1++) {
if ($num1 == 0) $cond_app = " where ";
else $cond_app .= " or ";
$cond_app .= "$tableprenota_stat.idappartamenti = '".aggslashdb($appartamenti_sel[$num1])."'";
} # fine for $num1
} # fine if (strcmp($appartamenti_sel,""))
else $cond_app = "";

if ($condizione_prenota_proprie) {
$condizione_prenota_proprie = str_replace("utente_inserimento","$tableprenota_stat.utente_inserimento",$condizione_prenota_proprie);
if ($cond_app) $condizione_prenota_proprie = " and".$condizione_prenota_proprie;
else $condizione_prenota_proprie = " where".$condizione_prenota_proprie;
} # fine if ($condizione_prenota_proprie)

$appartamenti = esegui_query("select idappartamenti from $tableappartamenti$cond_app order by idappartamenti");
$num_appartamenti = numlin_query($appartamenti);
$periodi = esegui_query("select idperiodi,datainizio,datafine from $tableperiodi_stat order by idperiodi ");
$num_periodi = numlin_query($periodi);
for ($num1 = 0 ; $num1 < $num_periodi ; $num1++) {
$idper = risul_query($periodi,$num1,'idperiodi');
$datainizio[$idper] = risul_query($periodi,$num1,'datainizio');
$datafine[$idper] = risul_query($periodi,$num1,'datafine');
$anno_inizio = (integer) substr($datainizio[$idper],0,4);
$mese_inizio = (integer) substr($datainizio[$idper],5,2);
$num_periodi_mese[$anno_inizio][$mese_inizio]++;
} # fine for $num1
$tutte_prenota = esegui_query("select distinct $tableprenota_stat.idprenota,$tableprenota_stat.iddatainizio,$tableprenota_stat.iddatafine,$tableprenota_stat.datainserimento,$tableprenota_stat.tariffa,$tableprenota_stat.sconto,$tableprenota_stat.tariffa_tot,$tableprenota_stat.tariffesettimanali,$tableprenota_stat.caparra,$tableprenota_stat.commissioni,$tableprenota_stat.tasseperc,$tableprenota_stat.origine,$tableclienti.nazionalita from $tableprenota_stat inner join $tableclienti on $tableprenota_stat.idclienti = $tableclienti.idclienti$cond_app$condizione_prenota_proprie");
$num_tutte_prenota = numlin_query($tutte_prenota);
$entrate_mese[$anno_stat][1] = 0;
$num_prenota_mese[$anno_stat][1] = 0;
for ($num1 = 0 ; $num1 < $num_tutte_prenota ; $num1++) {
$id_prenota = risul_query($tutte_prenota,$num1,"$tableprenota_stat.idprenota");
$id_data_inizio = risul_query($tutte_prenota,$num1,"$tableprenota_stat.iddatainizio");
$id_data_fine = risul_query($tutte_prenota,$num1,"$tableprenota_stat.iddatafine");
$num_sett = $id_data_fine - $id_data_inizio + 1;
$data_inserimento = risul_query($tutte_prenota,$num1,"$tableprenota_stat.datainserimento");
$tariffa = explode("#@&",risul_query($tutte_prenota,$num1,"$tableprenota_stat.tariffa"));
$sconto = risul_query($tutte_prenota,$num1,"$tableprenota_stat.sconto");
if ((double) $sconto > (double) $tariffa[1]) $sconto = $tariffa[1];
$tariffa_tot = risul_query($tutte_prenota,$num1,"$tableprenota_stat.tariffa_tot");
$tariffe_settimanali_int = risul_query($tutte_prenota,$num1,"$tableprenota_stat.tariffesettimanali");
$tariffe_settimanali = explode(",",$tariffe_settimanali_int);

if (!$prezzi['commissioni']) {
$commissioni = risul_query($tutte_prenota,$num1,"$tableprenota_stat.commissioni");
$tariffa_tot = (double) $tariffa_tot - (double) $commissioni;
$commissioni_sett = round(((double) $commissioni / ($id_data_fine - $id_data_inizio + 1)),2);
for ($num2 = 0 ; $num2 < count($tariffe_settimanali) ; $num2++) $tariffe_settimanali[$num2] = (double) $tariffe_settimanali[$num2] - (double) $commissioni_sett;
$resto_arr = (double) $commissioni - ((double) $commissioni_sett * ($id_data_fine - $id_data_inizio + 1));
$tariffe_settimanali[0] = (double) $tariffe_settimanali[0] - (double) $resto_arr;
} # fine if (!$prezzi['commissioni'])
if (!$prezzi['tasse']) {
$tasse_tot = 0;
$tasse_perc = (double) risul_query($tutte_prenota,$num1,"$tableprenota_stat.tasseperc");
$caparra = (double) risul_query($tutte_prenota,$num1,"$tableprenota_stat.caparra");
if ($tasse_perc) {
$tasse = (((double) $tariffa[1] - (double) $sconto) / ($tasse_perc + 100)) * $tasse_perc;
$tasse = $tasse / (double) $prezzi['tasse_arrotond'];
$tasse = floor($tasse);
$tasse = $tasse * (double) $prezzi['tasse_arrotond'];
$tasse_tot = (double) $tasse_tot + $tasse;
} # fine if ($tasse_perc)
$dati_cap = dati_costi_agg_prenota($tablecostiprenota_stat,$id_prenota);
$costo_agg_tot = 0;
for ($numca = 0 ; $numca < $dati_cap['num'] ; $numca++) {
$costo_agg_parziale = (double) calcola_prezzo_totale_costo($dati_cap,$numca,$id_data_inizio,$id_data_fine,$dati_cap[$numca]['settimane'],$dati_cap[$numca]['moltiplica_costo'],$tariffa[1],$tariffe_settimanali_int,((double) $tariffa[1] + $costo_agg_tot - (double) $sconto),$d_caparra_vett[$id_prenota]);
$costo_agg_tot = (double) $costo_agg_tot + $costo_agg_parziale;
if ($dati_cap[$numca]['tasseperc']) {
$tasse_ca = ($costo_agg_parziale / (double) ($dati_cap[$numca]['tasseperc'] + 100)) * (double) $dati_cap[$numca]['tasseperc'];
$tasse_ca = $tasse_ca / $prezzi['tasse_arrotond'];
$tasse_ca = floor($tasse_ca);
$tasse_ca = $tasse_ca * (double) $prezzi['tasse_arrotond'];
$tasse_tot = (double) $tasse_tot + (double) $tasse_ca;
} # fine if ($dati_cap[$numca]['tasseperc'])
} # fine for $numca
$tariffa_tot = (double) $tariffa_tot - (double) $tasse_tot;
$tasse_sett = round(((double) $tasse_tot / ($id_data_fine - $id_data_inizio + 1)),2);
for ($num2 = 0 ; $num2 < count($tariffe_settimanali) ; $num2++) $tariffe_settimanali[$num2] = (double) $tariffe_settimanali[$num2] - (double) $tasse_sett;
$resto_arr = (double) $tasse_tot - ((double) $tasse_sett * ($id_data_fine - $id_data_inizio + 1));
$tariffe_settimanali[0] = (double) $tariffe_settimanali[0] - (double) $resto_arr;
} # fine if (!$prezzi['tasse'])

$val_medio_costi_agg_e_sconto_per_sett = round((((double) $tariffa_tot - (double) $tariffa[1]) / (double) $num_sett),2);
$val_medio_sconto_per_sett = round(((double) $sconto  / (double) $num_sett),2);
$origine = risul_query($tutte_prenota,$num1,"$tableprenota_stat.origine");
$nazionalita = risul_query($tutte_prenota,$num1,"$tableclienti.nazionalita");
$anno_ins = (integer) substr($data_inserimento,0,4);
$mese_ins = (integer) substr($data_inserimento,5,2);
if (substr($datainizio[$id_data_inizio],0,4) == $anno_stat) {
if ($anno_ins < $anno_stat) {
$anno_ins = (integer) $anno_stat;
$mese_ins = (integer) 1;
} # fine if ($anno_ins < $anno_stat)
$entrate_ins_mese[$anno_ins][$mese_ins] = (double) $entrate_ins_mese[$anno_ins][$mese_ins] + (double) $tariffa_tot;
$num_prenota_ins_mese[$anno_ins][$mese_ins]++;
} # fine if (substr($datainizio[$id_data_inizio],0,4) == $anno_stat)
$ultimo_mese_inizio = "";
for ($num2 = $id_data_inizio ; $num2 <= $id_data_fine ; $num2++) {
$anno_inizio = (integer) substr($datainizio[$num2],0,4);
$mese_inizio = (integer) substr($datainizio[$num2],5,2);
$app_occupati[$anno_inizio][$mese_inizio]++;
$entrate_mese[$anno_inizio][$mese_inizio] = (double) $entrate_mese[$anno_inizio][$mese_inizio] + (double) $tariffe_settimanali[($num2 - $id_data_inizio)] + (double) $val_medio_costi_agg_e_sconto_per_sett;
$entrate_mese_no_ca[$anno_inizio][$mese_inizio] = (double) $entrate_mese_no_ca[$anno_inizio][$mese_inizio] + (double) $tariffe_settimanali[($num2 - $id_data_inizio)] - (double) $val_medio_sconto_per_sett;
if ($mese_inizio != $ultimo_mese_inizio) $num_prenota_mese[$anno_inizio][$mese_inizio]++;
$ultimo_mese_inizio = $mese_inizio;
} # fine for $num2
$anno_inizio = (integer) substr($datainizio[$id_data_inizio],0,4);
$mese_inizio = (integer) substr($datainizio[$id_data_inizio],5,2);
if ($mesi[$mese_inizio]) {
$num_prenota_mese[$anno_inizio]['TOT']++;
if ($origine != "") {
$num_origine[$anno_inizio][$origine]++;
$entrate_origine[$anno_inizio][$origine] = (double) $entrate_origine[$anno_inizio][$origine] + (double) $tariffa_tot;
} # fine if ($origine != "")
if ($nazionalita != "") {
$num_nazionalita[$anno_inizio][$nazionalita]++;
$entrate_nazionalita[$anno_inizio][$nazionalita] = (double) $entrate_nazionalita[$anno_inizio][$nazionalita] + (double) $tariffa_tot;
} # fine if ($nazionalita != "")
$pagamenti_p = esegui_query("select metodo_pagamento,saldo_prenota from $tablesoldi_stat where saldo_prenota is not NULL and motivazione $LIKE '%;$id_prenota' order by data_inserimento");
$num_pagamenti_p = numlin_query($pagamenti_p);
for ($num2 = 0 ; $num2 < $num_pagamenti_p ; $num2++) {
$metodo_pagamento = risul_query($pagamenti_p,$num2,'metodo_pagamento');
$saldo_prenota = risul_query($pagamenti_p,$num2,'saldo_prenota');
if ($metodo_pagamento) $pagamenti[$anno_inizio][$metodo_pagamento] = (double) $pagamenti[$anno_inizio][$metodo_pagamento] + (double) $saldo_prenota;
} # fine for $num2
} # fine if ($mesi[$mese_inizio])
} # fine for $num1

$percent_occupazione[$anno_stat]['TOT'] = 0;
$revpar[$anno_stat]['TOT'] = 0;
$revpar_ca[$anno_stat]['TOT'] = 0;
$num_mesi_media = 0;
$num_giorni_revpar = 0;
$num_giorni_revpar_ca = 0;
for ($num1 = 1 ; $num1 <= 12 ; $num1++) {
$entrate_prog_ins_mese[$anno_stat][$num1] = (double) $entrate_prog_ins_mese[$anno_stat][($num1 - 1)] + (double) $entrate_ins_mese[$anno_stat][$num1];
$num_prenota_prog_ins_mese[$anno_stat][$num1] = $num_prenota_prog_ins_mese[$anno_stat][($num1 - 1)] + $num_prenota_prog_ins_mese[$anno_stat][$num1];
if (!$app_occupati[$anno_stat][$num1] or !$num_periodi_mese[$anno_stat][$num1] or !$num_appartamenti) $percent_occupazione[$anno_stat][$num1] = 0;
else $percent_occupazione[$anno_stat][$num1] = round(($app_occupati[$anno_stat][$num1] / ($num_appartamenti * $num_periodi_mese[$anno_stat][$num1]) * 100),1);
if ($mesi[$num1]) {
$percent_occupazione[$anno_stat]['TOT'] = (double) $percent_occupazione[$anno_stat]['TOT'] + (double) $percent_occupazione[$anno_stat][$num1];
$num_mesi_media++;
if ($num_appartamenti) {
$revpar[$anno_stat][$num1] = round(((double) $entrate_mese_no_ca[$anno_stat][$num1] / ((double) $num_appartamenti * (double) $num_giorni_mese[$anno_stat][$num1])),2);
$revpar_ca[$anno_stat][$num1] = round(((double) $entrate_mese[$anno_stat][$num1] / ((double) $num_appartamenti * (double) $num_giorni_mese[$anno_stat][$num1])),2);
} # fine if ($num_appartamenti)
$entrate_mese[$anno_stat]['TOT'] = (double) $entrate_mese[$anno_stat]['TOT'] + (double) $entrate_mese[$anno_stat][$num1];
$entrate_mese_no_ca[$anno_stat]['TOT'] = (double) $entrate_mese_no_ca[$anno_stat]['TOT'] + (double) $entrate_mese_no_ca[$anno_stat][$num1];
$app_occupati[$anno_stat]['TOT'] = (double) $app_occupati[$anno_stat]['TOT'] + (double) $app_occupati[$anno_stat][$num1];
$num_giorni_revpar = $num_giorni_revpar + $num_giorni_mese[$anno_stat][$num1];
$num_giorni_revpar_ca = $num_giorni_revpar_ca + $num_giorni_mese[$anno_stat][$num1];
if ($app_occupati[$anno_stat][$num1]) $prezzo_medio_prenota[$anno_stat][$num1] = (double) $entrate_mese[$anno_stat][$num1] / (double) $app_occupati[$anno_stat][$num1];
else $prezzo_medio_prenota[$anno_stat][$num1] = (double) 0;
} # fine if ($mesi[$num1])
} # fine for $num1
if ($num_mesi_media) $percent_occupazione[$anno_stat]['TOT'] = round(((double) $percent_occupazione[$anno_stat]['TOT'] / (double) $num_mesi_media),1);
if ($num_giorni_revpar and $num_appartamenti) $revpar[$anno_stat]['TOT'] = round(((double) $entrate_mese_no_ca[$anno_stat]['TOT'] / ((double) $num_appartamenti * (double) $num_giorni_revpar)),2);
if ($num_giorni_revpar_ca and $num_appartamenti) $revpar_ca[$anno_stat]['TOT'] = round(((double) $entrate_mese[$anno_stat]['TOT'] / ((double) $num_appartamenti * (double) $num_giorni_revpar_ca)),2);
if ($app_occupati[$anno_stat]['TOT']) $prezzo_medio_prenota[$anno_stat]['TOT'] = (double) $entrate_mese[$anno_stat]['TOT'] / (double) $app_occupati[$anno_stat]['TOT'];

if (@is_array($num_origine)) {
$num_origine_anno = $num_origine[$anno_stat];
if (@is_array($num_origine_anno)) {
reset($num_origine_anno);
while (list($orig,$val) = each($num_origine_anno)) {
if (!$val or !$num_prenota_mese[$anno_stat]['TOT']) $percent_num_origine[$anno_stat][$orig] = 0;
else $percent_num_origine[$anno_stat][$orig] = round(((double) $val / (double) $num_prenota_mese[$anno_stat]['TOT'] * 100),1);
if (!$entrate_origine[$anno_stat][$orig] or !$entrate_mese[$anno_stat]['TOT']) $percent_entrate_origine[$anno_stat][$orig] = 0;
else $percent_entrate_origine[$anno_stat][$orig] = round(((double) $entrate_origine[$anno_stat][$orig] / (double) $entrate_mese[$anno_stat]['TOT'] * 100),1);
} # fine while (list($orig,$val) = each($num_origine_anno))
} # fine if (@is_array($num_origine_anno))
} # fine if (@is_array($num_origine))

if (@is_array($num_nazionalita)) {
$num_nazionalita_anno = $num_nazionalita[$anno_stat];
reset($num_nazionalita_anno);
while (list($nazion,$val) = each($num_nazionalita_anno)) {
if (!$val or !$num_prenota_mese[$anno_stat]['TOT']) $percent_num_nazionalita[$anno_stat][$nazion] = 0;
else $percent_num_nazionalita[$anno_stat][$nazion] = round(((double) $val / (double) $num_prenota_mese[$anno_stat]['TOT'] * 100),1);
if (!$entrate_nazionalita[$anno_stat][$nazion] or !$entrate_mese[$anno_stat]['TOT']) $percent_entrate_nazionalita[$anno_stat][$nazion] = 0;
else $percent_entrate_nazionalita[$anno_stat][$nazion] = round(((double) $entrate_nazionalita[$anno_stat][$nazion] / (double) $entrate_mese[$anno_stat]['TOT'] * 100),1);
} # fine while (list($nazion,$val) = each($num_nazionalita_anno))
} # fine if (@is_array($num_nazionalita))

} # fine function genera_statistiche


unset($option_tariffe);
unset($option_tariffe_vett);
unset($appartamenti_sel);
$nomi_tariffe = esegui_query("select * from $tablenometariffe where idntariffe = '1' ");
$regole2 = esegui_query("select * from $tableregole where tariffa_per_app != '' order by tariffa_per_app");
$num_regole2 = numlin_query($regole2);
for ($num1 = 0 ; $num1 < $num_regole2 ; $num1++) {
$tariffa_regola2 = risul_query($regole2,$num1,'tariffa_per_app');
$num_tariffa = substr($tariffa_regola2,7);
if ($attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$num_tariffa] == "SI") {
$nome_tariffa = risul_query($nomi_tariffe,0,$tariffa_regola2);
if (!$nome_tariffa) $nome_tariffa = mex("tariffa",$pag).substr($tariffa_regola2,7);
if ($tariffa_per_app == $tariffa_regola2) {
$nome_tariffa_trovata = $nome_tariffa;
$appartamenti_sel = risul_query($regole2,$num1,'motivazione');
$sel = " selected";
} # fine if ($tariffa_per_app == $tariffa_regola2)
else $sel = "";
$option_tariffe_vett[$num_tariffa] = "<option value=\"$tariffa_regola2\"$sel>".mex("appartamenti della tariffa",$pag)." $nome_tariffa</option>";
} # fine if ($attiva_tariffe_consentite == "n" or...
} # fine for $num1
if ($option_tariffe_vett) {
ksort($option_tariffe_vett);
while (list($key, $val) = each($option_tariffe_vett)) $option_tariffe .= $val;
} # fine if ($option_tariffe_vett)

if ($priv_vedi_tab_stat != "s") {
if (!function_exists("trova_app_consentiti")) include("./includes/funzioni_appartamenti.php");
$appartamenti = esegui_query("select idappartamenti from $tableappartamenti order by idappartamenti");
$num_appartamenti = numlin_query($appartamenti);
if ($priv_vedi_tab_stat != "r" and $priv_vedi_tab_stat != "g") $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite,$regole1_consentite,$priv_mod_assegnazione_app,$priv_mod_prenotazioni,$priv_ins_assegnazione_app,$priv_ins_nuove_prenota,$attiva_tariffe_consentite,$tariffe_consentite_vett,$id_utente,$tableregole,$tablenometariffe);
else $appartamenti_consentiti = trova_app_consentiti($appartamenti,$num_appartamenti,$attiva_regole1_consentite_gr,$regole1_consentite_gr,$priv_mod_assegnazione_app_gr,$priv_mod_prenotazioni_gr,$priv_ins_assegnazione_app_gr,$priv_ins_nuove_prenota_gr,$attiva_tariffe_consentite_gr,$tariffe_consentite_vett_gr,$id_utente,$tableregole,$tablenometariffe);
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1 = $num1 + 1) {
$idappartamenti = risul_query($appartamenti,$num1,'idappartamenti');
if ($appartamenti_consentiti[$idappartamenti] != "NO") {
$lista_tutti_app_cons .= $idappartamenti.",";
if (!$appartamenti_sel or str_replace(",$idappartamenti,","",",$appartamenti_sel,") != ",$appartamenti_sel,") $lista_app_cons .= $idappartamenti.",";
} # fine if ($appartamenti_consentiti[$idappartamenti] != "NO")
} # fine for $num1
$lista_tutti_app_cons = substr($lista_tutti_app_cons,0,-1);
$lista_app_cons = substr($lista_app_cons,0,-1);
if ($lista_app_cons) $appartamenti_sel = $lista_app_cons;
else {
$tariffa_per_app = "";
$appartamenti_sel = $lista_tutti_app_cons;
$option_tariffe = str_replace(" selected>",">",$option_tariffe);
$nome_tariffa_trovata = "";
} # fine else if ($lista_app_cons)
if (!$appartamenti_sel) $appartamenti_sel = ",";
} # fine if ($priv_vedi_tab_stat != "s")

unset($anni_attivati);
if ($id_utente != 1) {
$privilegi_annuali_ut = esegui_query("select * from $tableprivilegi where idutente = '$id_utente' and anno != '1' ");
$num_priv_annuali_ut = numlin_query($privilegi_annuali_ut);
for ($num1 = 0 ; $num1 < $num_priv_annuali_ut ; $num1++) {
$anno_corr = risul_query($privilegi_annuali_ut,$num1,'anno');
$priv_vedi_tab_corr = risul_query($privilegi_annuali_ut,$num1,'priv_vedi_tab');
$priv_vedi_tab_stat_corr = substr($priv_vedi_tab_corr,6,1);
if ($priv_vedi_tab_stat_corr == "s" or $priv_vedi_tab_stat_corr == $priv_vedi_tab_stat or ($priv_vedi_tab_stat_corr == "g" and $priv_vedi_tab_stat != "s") or ($priv_vedi_tab_stat == "p" and $priv_vedi_tab_stat_corr != "n")) $anni_attivati[$anno_corr] = 1;
} # fine for $num1
} # fine if ($id_utente != 1)

unset($anni);
$anni_q = esegui_query("select * from $tableanni order by idanni");
$num_anni = numlin_query($anni_q);
$anno_sel = "NO";
$num_a = 0;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
$anno_corr = risul_query($anni_q,$num1,'idanni');
if ($id_utente == 1 or $anni_attivati[$anno_corr]) {
$anni[$num_a] = $anno_corr;
if (${"anno_sel".$anni[$num_a]}) $anno_sel = "SI";
$num_a++;
} # fine if ($id_utente == 1 or $anni_attivati[$anno_corr])
} # fine for $num1
$num_anni = $num_a;
if ($anno_sel != "SI") {
${"anno_sel".$anni[($num_anni - 1)]} = "SI";
if ($num_a > 1) ${"anno_sel".$anni[($num_anni - 2)]} = "SI";
} # fine if ($anno_sel != "SI")

unset($mesi);
$mese_sel = "NO";
for ($num1 = 1 ; $num1 <= 12 ; $num1++) if (${"mese_sel".$num1}) $mese_sel = "SI";
if ($mese_sel != "SI") {
for ($num1 = 1 ; $num1 <= 12 ; $num1++) ${"mese_sel".$num1} = "SI";
} # fine if ($mese_sel != "SI")
for ($num1 = 1 ; $num1 <= 12 ; $num1++) if (${"mese_sel".$num1}) $mesi[$num1] = "SI";
$nome_mese = array("",mex("Gen","inizio.php"),mex("Feb","inizio.php"),mex("Mar","inizio.php"),mex("Apr","inizio.php"),mex("Mag","inizio.php"),mex("Giu","inizio.php"),mex("Lug","inizio.php"),mex("Ago","inizio.php"),mex("Set","inizio.php"),mex("Ott","inizio.php"),mex("Nov","inizio.php"),mex("Dic","inizio.php"));

unset($prezzi);
if ($anno_sel != "SI" and $mese_sel != "SI") {
$prezzo_comm_sel = 1;
$prezzo_tasse_sel = 1;
} # fine if ($anno_sel != "SI" and $mese_sel != "SI")
if ($prezzo_comm_sel) $prezzi['commissioni'] = 1;
else $prezzi['commissioni'] = 0;
if ($prezzo_tasse_sel) $prezzi['tasse'] = 1;
else $prezzi['tasse'] = 0;
if (!$prezzi['tasse']) {
$arrotond_tasse = esegui_query("select * from $tablepersonalizza where idpersonalizza = 'arrotond_tasse' and idutente = '$id_utente'");
$prezzi['tasse_arrotond'] = (double) risul_query($arrotond_tasse,0,'valpersonalizza');
include("./includes/funzioni_costi_agg.php");
} # fine if (!$prezzi['tasse'])


if ($priv_vedi_tab_stat != "s") {
$condizione_prenota_proprie = " ( utente_inserimento = '$id_utente'";
if ($priv_vedi_tab_stat == "q" or $priv_vedi_tab_stat == "g") {
reset($utenti_gruppi);
while (list($idut_gr,$val) = each($utenti_gruppi)) if ($idut_gr != $id_utente) $condizione_prenota_proprie .= " or utente_inserimento = '$idut_gr'";
} # fine if ($priv_vedi_tab_stat == "q" or ...
$condizione_prenota_proprie .= " )";
} # fine if ($priv_vedi_tab_stat != "s")
else $condizione_prenota_proprie = "";

unset($num_giorni_mese);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
$entrate_ins_mese = "entrate_ins_mese".$anno_stat;
$num_prenota_ins_mese = "num_prenota_ins_mese".$anno_stat;
$entrate_prog_ins_mese = "entrate_prog_ins_mese".$anno_stat;
$num_prenota_prog_ins_mese = "num_prenota_prog_ins_mese".$anno_stat;
$percent_occupazione = "percent_occupazione".$anno_stat;
$entrate_mese = "entrate_mese".$anno_stat;
$num_prenota_mese = "num_prenota_mese".$anno_stat;
$num_origine = "num_origine".$anno_stat;
$entrate_origine = "entrate_origine".$anno_stat;
$percent_num_origine = "percent_num_origine".$anno_stat;
$percent_entrate_origine = "percent_entrate_origine".$anno_stat;
$num_nazionalita = "num_nazionalita".$anno_stat;
$entrate_nazionalita = "entrate_nazionalita".$anno_stat;
$percent_num_nazionalita = "percent_num_nazionalita".$anno_stat;
$percent_entrate_nazionalita = "percent_entrate_nazionalita".$anno_stat;
$app_occupati = "app_occupati".$anno_stat;
$prezzo_medio_prenota = "prezzo_medio_prenota".$anno_stat;
$revpar = "revpar".$anno_stat;
$revpar_ca = "revpar_ca".$anno_stat;
$pagamenti = "pagamenti".$anno_stat;
$nazionalita_mese = "nazionalita_mese".$anno_stat;
unset($$entrate_ins_mese);
unset($$num_prenota_ins_mese);
unset($$entrate_prog_ins_mese);
unset($$num_prenota_prog_ins_mese);
unset($$percent_occupazione);
unset($$entrate_mese);
unset($$num_prenota_mese);
unset($$num_origine);
unset($$entrate_origine);
unset($$percent_num_origine);
unset($$percent_entrate_origine);
unset($$num_nazionalita);
unset($$entrate_nazionalita);
unset($$percent_num_nazionalita);
unset($$percent_entrate_nazionalita);
unset($$app_occupati);
unset($$prezzo_medio_prenota);
unset($$revpar);
unset($$revpar_ca);
unset($$pagamenti);
unset($$nazionalita_mese);
genera_statistiche($$entrate_ins_mese,$$num_prenota_ins_mese,$$entrate_prog_ins_mese,$$num_prenota_prog_ins_mese,$$percent_occupazione,$$entrate_mese,$$num_prenota_mese,$$num_origine,$$entrate_origine,$$percent_num_origine,$$percent_entrate_origine,$$num_nazionalita,$$entrate_nazionalita,$$percent_num_nazionalita,$$percent_entrate_nazionalita,$$app_occupati,$$prezzo_medio_prenota,$$revpar,$$revpar_ca,$$pagamenti,$$nazionalita_mese,$num_giorni_mese,$anno_stat,$mesi,$prezzi,$appartamenti_sel,$condizione_prenota_proprie,$PHPR_TAB_PRE);
} # fine if (${"anno_sel".$anni[$num1]})
} # fine for $num1


echo "<h3>".mex("Statistiche",$pag).".</h3>";
if ($nome_tariffa_trovata) echo "<h5>(".mex("appartamenti della tariffa",$pag)." $nome_tariffa_trovata)</h5>";

echo "<table><tr><td style=\"height: 4px;\"></td></tr></table>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">";
for ($num1 = 1 ; $num1 <= 12 ; $num1++) {
if (${"mese_sel".$num1}) echo "<input type=\"hidden\" name=\"mese_sel$num1\" value=\"SI\">";
} # fine for $num1
echo "<input type=\"hidden\" name=\"prezzo_comm_sel\" value=\"$prezzo_comm_sel\">
<input type=\"hidden\" name=\"prezzo_tasse_sel\" value=\"$prezzo_tasse_sel\">
<input type=\"hidden\" name=\"tariffa_per_app\" value=\"$tariffa_per_app\">
".mex("Anni",$pag).": ";
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (!${"anno_sel".$anni[$num1]}) { $checked = ""; $b = ""; $slash_b = ""; }
else { $checked = " checked"; $b = "<b>"; $slash_b = "</b>"; }
echo "<input type=\"checkbox\" name=\"anno_sel".$anni[$num1]."\" value=\"SI\"$checked>$b".$anni[$num1]."$slash_b";
if ($num1 != ($num_anni - 1)) echo "; ";
} # fine for $num1
echo " <input class=\"sbutton\" type=\"submit\" value=\"".mex("Cambia",$pag)."\">
</div></form>";

echo "<table><tr><td style=\"height: 4px;\"></td></tr></table>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">";
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) echo "<input type=\"hidden\" name=\"anno_sel".$anni[$num1]."\" value=\"SI\">";
} # fine for $num1
echo "<input type=\"hidden\" name=\"prezzo_comm_sel\" value=\"$prezzo_comm_sel\">
<input type=\"hidden\" name=\"prezzo_tasse_sel\" value=\"$prezzo_tasse_sel\">
<input type=\"hidden\" name=\"tariffa_per_app\" value=\"$tariffa_per_app\">
".mex("Mesi",$pag).": ";
for ($num1 = 1 ; $num1 <= 12 ; $num1++) {
if (!${"mese_sel".$num1}) { $checked = ""; $b = ""; $slash_b = ""; }
else { $checked = " checked"; $b = "<b>"; $slash_b = "</b>"; }
echo "<input type=\"checkbox\" name=\"mese_sel$num1\" value=\"SI\"$checked>$b".$nome_mese[$num1]."$slash_b";
if ($num1 != 12) echo "; ";
} # fine for $num1
echo " <input class=\"sbutton\" type=\"submit\" value=\"".mex("Cambia",$pag)."\">
</div></form>";

echo "<table><tr><td style=\"height: 4px;\"></td></tr></table>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">";
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) echo "<input type=\"hidden\" name=\"anno_sel".$anni[$num1]."\" value=\"SI\">";
} # fine for $num1
for ($num1 = 1 ; $num1 <= 12 ; $num1++) {
if (${"mese_sel".$num1}) echo "<input type=\"hidden\" name=\"mese_sel$num1\" value=\"SI\">";
} # fine for $num1
echo "<input type=\"hidden\" name=\"tariffa_per_app\" value=\"$tariffa_per_app\">
".mex("Prezzi con",$pag).": ";
if (!$prezzo_comm_sel) { $checked = ""; $b = ""; $slash_b = ""; }
else { $checked = " checked"; $b = "<b>"; $slash_b = "</b>"; }
echo "<input type=\"checkbox\" name=\"prezzo_comm_sel\" value=\"1\"$checked>$b".strtolower(mex("Commissioni",$pag))."$slash_b; ";
if (!$prezzo_tasse_sel) { $checked = ""; $b = ""; $slash_b = ""; }
else { $checked = " checked"; $b = "<b>"; $slash_b = "</b>"; }
echo "<input type=\"checkbox\" name=\"prezzo_tasse_sel\" value=\"1\"$checked>$b".strtolower(mex("Tasse",$pag))."$slash_b ";
echo "<input class=\"sbutton\" type=\"submit\" value=\"".mex("Cambia",$pag)."\">
</div></form>";

if ($option_tariffe) {
echo "<table><tr><td style=\"height: 4px;\"></td></tr></table>
<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
<input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\">
<input type=\"hidden\" name=\"tipo_tabella\" value=\"$tipo_tabella\">
<input type=\"hidden\" name=\"prezzo_comm_sel\" value=\"$prezzo_comm_sel\">
<input type=\"hidden\" name=\"prezzo_tasse_sel\" value=\"$prezzo_tasse_sel\">";
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) echo "<input type=\"hidden\" name=\"anno_sel".$anni[$num1]."\" value=\"SI\">";
} # fine for $num1
for ($num1 = 1 ; $num1 <= 12 ; $num1++) {
if (${"mese_sel".$num1}) echo "<input type=\"hidden\" name=\"mese_sel$num1\" value=\"SI\">";
} # fine for $num1
echo "".mex("Appartamenti",$pag).": 
<select name=\"tariffa_per_app\">
<option value=\"\">".mex("tutti gli appartamenti",$pag)."</option>
$option_tariffe
</select>";
echo "<input class=\"sbutton\" type=\"submit\" value=\"".mex("Cambia",$pag)."\">
</div></form>";
} # fine if ($option_tariffe)

echo "<br>";

unset($x);
$num_x = 0;
for ($num1 = 1 ; $num1 <= 12 ; $num1++) {
if (${"mese_sel".$num1}) {
$x[$num_x] = $num1;
#$nome_x[$num_x] = $num1."<br><small>(".$num_giorni_mese[$anno_stat][$num1].mex("g",$pag).")</small>";
$num_x++;
} # fine if (${"mese_sel".$num1})
} # fine for $num1
$titolo_col = $nome_mese;
$num_anni_sel = 0;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
$num_anni_sel++;
for ($num2 = 1 ; $num2 <= 12 ; $num2++) {
$commento_col[$anno_stat][$num2] = " (".$num_giorni_mese[$anno_stat][$num2].mex("g",$pag).")";
} # fine for $num2
} # fine if (${"anno_sel".$anni[$num1]})
} # fine for $num1
unset($colore_col);
$num_colore = 0;
for ($num1 = $num_anni_sel ; $num1 > 0 ; $num1--) {
$num_colore++;
if ($num_colore == 1) $colore_col[$num1] = "#40882a";
if ($num_colore == 2) $colore_col[$num1] = "#b9ccd4";
if ($num_colore == 3) $colore_col[$num1] = "#e6e1c3";
if ($num_colore == 4) $colore_col[$num1] = "#696fbf";
if ($num_colore == 5) $colore_col[$num1] = "#a9319c";
} # fine for $num1
unset($titolo_serie);

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"percent_occupazione".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie['TOT'][$num_y] = ${"percent_occupazione".$anno_stat}[$anno_stat]['TOT'];
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Percentuale di occupazione degli appartamenti",$pag),$titolo_serie,$titolo_col,"",$colore_col,"#f7f7f7","#dddddd","%",$stile_soldi);
echo "<br>$istogramma<br><br>";

/*for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"app_occupati".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie["TOT"][$num_y] = ${"app_occupati".$anno_stat}[$anno_stat]["TOT"];
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Giorni occupati per mese",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd",mex("g",$pag),$stile_soldi);
echo "<br>$istogramma<br><br>";*/

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
unset($titolo_serie);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"num_prenota_mese".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie['TOT'][$num_y] = ${"num_prenota_mese".$anno_stat}[$anno_stat]["TOT"];
/*for ($num2 = 0 ; $num2 < 12 ; $num2++) {
$commento_col[$anno_stat][$x[$num2]] = " (".${"app_occupati".$anno_stat}[$anno_stat][$x[$num2]].mex("g",$pag).")";
} # fine for $num2*/
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Numero di prenotazioni per mese",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd","",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
unset($titolo_serie);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"entrate_mese".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie['TOT'][$num_y] = punti_in_num(${"entrate_mese".$anno_stat}[$anno_stat]["TOT"],$stile_soldi);
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate dalle prenotazioni per mese",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
unset($titolo_serie);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"prezzo_medio_prenota".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie['TOT'][$num_y] = punti_in_num(${"prezzo_medio_prenota".$anno_stat}[$anno_stat]["TOT"],$stile_soldi);
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Prezzo medio giornaliero per appartamento occupato",$pag),$titolo_serie,$titolo_col,"",$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
unset($titolo_serie);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"revpar".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie['TOT'][$num_y] = punti_in_num(${"revpar".$anno_stat}[$anno_stat]['TOT'],$stile_soldi);
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate giornaliere per appartamento disponibile (RevPAR)",$pag),$titolo_serie,$titolo_col,"",$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
unset($titolo_serie);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"revpar_ca".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$titolo_serie['TOT'][$num_y] = punti_in_num(${"revpar_ca".$anno_stat}[$anno_stat]['TOT'],$stile_soldi);
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate giornaliere per appartamento disponibile con costi aggiuntivi",$pag),$titolo_serie,$titolo_col,"",$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
unset($titolo_serie);
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"entrate_prog_ins_mese".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate progressive dalle prenotazioni",$pag),$titolo_serie,$titolo_col,"",$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

unset($x);
unset($titolo_col);
unset($commento_col);
unset($titolo_serie);
unset($origini);
$num_x = 0;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
if (@is_array(${"num_origine".$anno_stat})) {
$num_origine = ${"num_origine".$anno_stat}[$anno_stat];
if (@is_array($num_origine)) {
reset($num_origine);
while (list($orig,$val) = each($num_origine)) {
if ($origini[$orig] != "SI") {
$origini[$orig] = "SI";
$x[$num_x] = $orig;
$titolo_col[$orig] = $orig;
$num_x++;
} # fine if ($origini($orig) != "SI")
} # fine while (list($orig,$val) = each($num_origine))
} # fine if (@is_array($num_origine))
} # fine if (@is_array(${"num_origine".$anno_stat}))
} # fine if (${"anno_sel".$anni[$num1]})
} # fine for $num1

if (@is_array($x)) {

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"num_origine".$anno_stat}[$anno_stat];
for ($num2 = 0 ; $num2 < $num_x ; $num2++) {
if (!${"y".$num_y}[$x[$num2]]) ${"y".$num_y}[$x[$num2]] = 0;
$commento_col[$anno_stat][$x[$num2]] = " (".${"percent_num_origine".$anno_stat}[$anno_stat][$x[$num2]]."%)";
} # fine for $num2
$titolo_serie[$num_y] = $anno_stat;
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Numero di prenotazioni per origine",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd","",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"entrate_origine".$anno_stat}[$anno_stat];
for ($num2 = 0 ; $num2 < $num_x ; $num2++) {
if (!${"y".$num_y}[$x[$num2]]) ${"y".$num_y}[$x[$num2]] = 0;
$commento_col[$anno_stat][$x[$num2]] = " (".${"percent_entrate_origine".$anno_stat}[$anno_stat][$x[$num2]]."%)";
} # fine for $num2
$titolo_serie[$num_y] = $anno_stat;
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate dalle prenotazioni per origine",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

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

unset($x);
unset($titolo_col);
unset($commento_col);
unset($titolo_serie);
unset($origini);
$num_x = 0;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
if (@is_array(${"pagamenti".$anno_stat})) {
$pagamenti_anno = ${"pagamenti".$anno_stat}[$anno_stat];
reset($pagamenti_anno);
while (list($metodo,$val) = each($pagamenti_anno)) {
if ($metodo_pres[$metodo] != "SI") {
$metodo_pres[$metodo] = "SI";
$x[$num_x] = $metodo;
$titolo_col[$metodo] = $metodo;
$num_x++;
} # fine if ($origini($orig) != "SI")
} # fine while (list($metodo,$val) = each($pagamenti_anno))
} # fine if (@is_array(${"pagamenti".$anno_stat}))
} # fine if (${"anno_sel".$anni[$num1]})
} # fine for $num1

if (@is_array($x)) {

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"pagamenti".$anno_stat}[$anno_stat];
$titolo_serie[$num_y] = $anno_stat;
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate per metodo di pagamento",$pag),$titolo_serie,$titolo_col,"",$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
echo "$istogramma<br><br>";

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

unset($x);
unset($titolo_col);
unset($commento_col);
unset($titolo_serie);
unset($nazionini);
$num_x = 0;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
if (@is_array(${"num_nazionalita".$anno_stat})) {
$num_nazionalita = ${"num_nazionalita".$anno_stat}[$anno_stat];
reset($num_nazionalita);
while (list($nazion,$val) = each($num_nazionalita)) {
if ($nazionini[$nazion] != "SI") {
$nazionini[$nazion] = "SI";
$x[$num_x] = $nazion;
$titolo_col[$nazion] = $nazion;
$num_x++;
} # fine if ($nazionini($nazion) != "SI")
} # fine while (list($nazion,$val) = each($num_nazionalita))
} # fine if (@is_array(${"num_nazionalita".$anno_stat}))
} # fine if (${"anno_sel".$anni[$num1]})
} # fine for $num1

if (@is_array($x)) {

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"num_nazionalita".$anno_stat}[$anno_stat];
for ($num2 = 0 ; $num2 < $num_x ; $num2++) {
if (!${"y".$num_y}[$x[$num2]]) ${"y".$num_y}[$x[$num2]] = 0;
$commento_col[$anno_stat][$x[$num2]] = " (".${"percent_num_nazionalita".$anno_stat}[$anno_stat][$x[$num2]]."%)";
} # fine for $num2
$titolo_serie[$num_y] = $anno_stat;
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Numero di prenotazioni per nazionalità del cliente titolare",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd","",$stile_soldi);
echo "$istogramma<br><br>";

for ($num_y = 1 ; $num_y <= 5 ; $num_y++) unset(${"y".$num_y});
$num_y = 1;
for ($num1 = 0 ; $num1 < $num_anni ; $num1++) {
if (${"anno_sel".$anni[$num1]}) {
$anno_stat = $anni[$num1];
${"y".$num_y} = ${"entrate_nazionalita".$anno_stat}[$anno_stat];
for ($num2 = 0 ; $num2 < $num_x ; $num2++) {
if (!${"y".$num_y}[$x[$num2]]) ${"y".$num_y}[$x[$num2]] = 0;
$commento_col[$anno_stat][$x[$num2]] = " (".${"percent_entrate_nazionalita".$anno_stat}[$anno_stat][$x[$num2]]."%)";
} # fine for $num2
$titolo_serie[$num_y] = $anno_stat;
$num_y++;
if ($num_y > 5) break;
} # fine (${"anno_sel".$anni[$num1]})
} # fine for $num1
$istogramma = genera_istogramma($x,$x,$y1,$y2,$y3,$y4,$y5,mex("Entrate dalle prenotazioni per nazionalità del cliente titolare",$pag),$titolo_serie,$titolo_col,$commento_col,$colore_col,"#f7f7f7","#dddddd"," $Euro",$stile_soldi);
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)



?>

