function trasforma_id_in_date($stringa_date, &$date_id, $tableperiodi)
{
if ($stringa_date) {
$stringa_date_vett = explode(",", $stringa_date);
$n_date = count($stringa_date_vett);
for ($num1 = 0; $num1 < $n_date; $num1++) {
if ($stringa_date_vett[$num1]) {
if (!$date_id[$stringa_date_vett[$num1]] and controlla_num_pos($stringa_date_vett[$num1]) == "SI") {
$data = esegui_query("select datainizio from {$tableperiodi} where idperiodi = '" . $stringa_date_vett[$num1] . "' ");
if (numlin_query($data)) {
$date_id[$stringa_date_vett[$num1]] = risul_query($data, 0, 'datainizio');
}
}
# fine if (!$date_id[$stringa_date_vett[$num1]] and controlla_num_pos($stringa_date_vett[$num1]) == "SI")
if ($date_id[$stringa_date_vett[$num1]]) {
$stringa_date_vett[$num1] = $date_id[$stringa_date_vett[$num1]];
}
}
# fine if ($stringa_date_vett[$num1])
}
# fine for $num1
$stringa_date = implode(",", $stringa_date_vett);
}
# fine if ($stringa_date)
return $stringa_date;
}
$num_campi_doc_condizioni = count($campi_form_doc_condizioni);
if (!function_exists('crea_contratto')) $num_campi_doc_condizioni = 0;
if ($num_campi_doc_condizioni) {
$nome_contratto = "";
$nomi_contratti = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'nomi_contratti' and idutente = '$utente_liste' ");
if (numlin_query($nomi_contratti)) {
$nomi_contratti = explode("#@&",risul_query($nomi_contratti,0,'valpersonalizza'));
$num_nomi_contratti = count($nomi_contratti);
for ($num1 = 0 ; $num1 < $num_nomi_contratti ; $num1++) {
$dati_nome_contratto = explode("#?&",$nomi_contratti[$num1]);
if (strcmp($dati_nome_contratto[1],"")) $nome_contratto[$dati_nome_contratto[0]] = $dati_nome_contratto[1];
} # fine for $num1
} # fine if (numlin_query($nomi_contratti))
for ($num1 = 1 ; $num1 <= $num_campi_doc_condizioni ; $num1++) {
$num_doc = $campi_form_doc_condizioni[$num1];
if (controlla_num_pos($num_doc) == "SI") {
$contr_txt = esegui_query("select * from $tablecontratti where (tipo = 'contrtxt' or tipo = 'contrhtm') and numero = '$num_doc' ");
if (numlin_query($contr_txt)) {
$salva_contr = esegui_query("select numero from $tablecontratti where numero = '$num_doc' and tipo = 'dir' ");
if (!numlin_query($salva_contr)) {
$num_campi_doc_cond++;
$campi_form_doc_cond[$num_campi_doc_cond] = $num_doc;
$chiedi_campi_form_doc_cond[$num_campi_doc_cond] = $chiedi_campi_form_doc_condizioni[$num1];
$campi_form_doc_cond['tipo'][$num_campi_doc_cond] = substr(risul_query($contr_txt,0,'tipo'),5);
} # fine if (!numlin_query($salva_contr))
} # fine if (numlin_query($contr_txt))
} # fine if (controlla_num_pos($num_doc) == "SI")
} # fine for $num1
} # fine if ($num_campi_doc_condizioni)
} # fine for $num1
$dati_xml .= "<col num=\"$idg_agg\">
<dini>$d_inizio_settimana</dini>
<dfine>$d_fine_settimana</dfine>
<djs>$djs</djs>
$dati_prenota
</col>
";
} # fine if ($d_inizio_settimana)
} # fine for $ncol
unlock_tabelle($tabelle_lock);
} # fine if ($idg_agg and controlla_num_pos(substr($idg_agg,2)) == "SI")
if ($dati_prn and substr($dati_prn,0,3) == "prn" and controlla_num_pos(substr($dati_prn,3)) == "SI" and !$manda_xml) {
$manda_xml = 1;
$id_prn = substr($dati_prn,3);
$tabelle_lock = array();
$altre_tab_lock = array($tableprenota,$tablecostiprenota,$tableperiodi,$tableclienti,$tablepersonalizza);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
$dati_prn = esegui_query("select * from $tableprenota where idprenota = '$id_prn' ");
if (numlin_query($dati_prn)) {
$utente_inserimento = risul_query($dati_prn,0,'utente_inserimento');
$iddatainizio = risul_query($dati_prn,0,'iddatainizio');
$link_modifica = 1;
if ($priv_mod_prenotazioni == "n") $link_modifica = 0;
if ($priv_mod_prenotazioni == "p" and $utente_inserimento != $id_utente) $link_modifica = 0;
if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $link_modifica = 0;
if ($priv_mod_prenota_iniziate != "s") {
$id_periodo_corrente = calcola_id_periodo_corrente($anno);
function crea_modello_rat ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) {
global $num_periodi_date,$M_PHPR_DB_TYPE,$M_PHPR_DB_NAME,$M_PHPR_DB_HOST,$M_PHPR_DB_PORT,$M_PHPR_DB_USER,$M_PHPR_DB_PASS,$M_PHPR_LOAD_EXT,$M_PHPR_TAB_PRE,$estendi_ultima_data;
global $m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$mostra_caparra,$modello_esistente,$cambia_frasi,$template_data_dir,$template_file_name,$parola_settimane;
global $apertura_tag_font,$chiusura_tag_font,$stile_tabella_tariffe,$m_valuta_sing,$m_valuta_plur,$prima_parte_html,$ultima_parte_html,$file_css_frame,$tema_modello;
$tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello;
$tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello;
$tableanni = $PHPR_TAB_PRE."anni";
if (controlla_anno($anno_modello) != "SI") {
$continua = "NO";
$anno_modello = "";
} # fine if (controlla_anno($anno_modello) != "SI")
else {
$anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'");
if (numlin_query($anno_esistente) != 1) $continua = "NO";
} # fine else if (controlla_anno($anno_modello) != "SI")
if ($continua != "NO") {
if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO";
$date_in_menu = "";
$idfineperiodo_prec = -10;
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1};
$inizioperiodo = aggslashdb(${"inizioperiodo".$num1});
$fineperiodo = aggslashdb(${"fineperiodo".$num1});
$idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; }
else { $idinizioperiodo = risul_query($idinizioperiodo,0,idperiodi); }
$inizioperiodo = $idinizioperiodo;
if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) {
$idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello");
$idfineperiodo = risul_query($idfineperiodo,0,0);
} # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
else {
$idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) { $idfineperiodo = -1; }
else { $idfineperiodo = risul_query($idfineperiodo,0,idperiodi); }
} # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
$fineperiodo = $idfineperiodo ;
${"inizioperiodo".$num1} = $inizioperiodo;
${"fineperiodo".$num1} = $fineperiodo;
if ($idfineperiodo < $idinizioperiodo) $continua = "NO";
if (($idfineperiodo_prec + 1) > $idinizioperiodo) $continua = "NO";
$idfineperiodo_prec = $idfineperiodo;
${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1});
if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO";
} # fine for $num1
if ($continua == "NO") {
if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>";
} # fine if ($continua == "NO")
else {
$file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php");
$num_linee_file_intero = count($file_intero);
$pag_gm = "giorni_mesi.php";
$m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'");
$m_tipo_periodi = risul_query($m_tipo_periodi,0,0);
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
$inizioperiodo = ${"inizioperiodo".$num1};
$fineperiodo = ${"fineperiodo".$num1};
$num_intervallo = 1;
for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) {
if (substr($file_intero[$num2],0,7) == "<option") {
$data_option = substr($file_intero[$num2],16,10);
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' ");
$esiste_data_option = numlin_query($id_data_option);
if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,idperiodi);
else {
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' ");
$id_data_option = risul_query($id_data_option,0,idperiodi);
} # fine else if ($esiste_data_option == 1)
if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) {
if ($num_intervallo == 1) {
$giorno_option = substr($data_option,8,2);
$mese_option = substr($data_option,5,2);
$anno_option = substr($data_option,0,4);
$nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
$nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
if ($m_tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello);
if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello);
if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello);
if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello);
if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello);
if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello);
if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello);
} # fine if ($m_tipo_periodi == "g")
else $nome_giorno = "";
if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello);
if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello);
if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello);
if ($nome_mese == "Apr") $nome_mese = mex2("Apr",$pag_gm,$lingua_modello);
if ($nome_mese == "May") $nome_mese = mex2("Mag",$pag_gm,$lingua_modello);
if ($nome_mese == "Jun") $nome_mese = mex2("Giu",$pag_gm,$lingua_modello);
if ($nome_mese == "Jul") $nome_mese = mex2("Lug",$pag_gm,$lingua_modello);
if ($nome_mese == "Aug") $nome_mese = mex2("Ago",$pag_gm,$lingua_modello);
if ($nome_mese == "Sep") $nome_mese = mex2("Set",$pag_gm,$lingua_modello);
if ($nome_mese == "Oct") $nome_mese = mex2("Ott",$pag_gm,$lingua_modello);
if ($nome_mese == "Nov") $nome_mese = mex2("Nov",$pag_gm,$lingua_modello);
if ($nome_mese == "Dec") $nome_mese = mex2("Dic",$pag_gm,$lingua_modello);
$date_in_menu .= "<option value=\\\"$data_option\\\">$nome_mese $giorno_option$nome_giorno, $anno_option</option>
";
} # fine if ($num_intervallo == 1)
if ($num_intervallo == ${"intervalloperiodo".$num1}) $num_intervallo = 1;
else $num_intervallo++;
} # fine if ($id_data_option > $inizioperiodo and...
} # fine if (substr($file_intero[$num2],0,7) == "<option")
} # fine for $num2
} # fine for $num1
} # fine else if ($continua == "NO")
$dati_ca = dati_costi_agg_ntariffe($tablenometariffe_modello,"NO");
} # fine if ($continua != "NO")
if ($continua != "NO") {
$rigatariffe = esegui_query("select * from $tablenometariffe_modello where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,nomecostoagg);
$tariffe_mostra = "";
$nomi_tariffe_imposte = "";
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa++) {
$tariffa = "tariffa".$numtariffa;
global $$tariffa;
if ($$tariffa == "SI") $tariffe_mostra .= " $numtariffa => \"".mex("SI",$pag)."\",";
$nome_tariffa_imposto = "nome_tariffa_imposto".$numtariffa;
global $$nome_tariffa_imposto;
$$nome_tariffa_imposto = formatta_input_var_x_file($$nome_tariffa_imposto);
if ($$nome_tariffa_imposto) $nomi_tariffe_imposte .= "$numtariffa => \"".$$nome_tariffa_imposto."\",";
} # fine for $numtariffa
if ($tariffe_mostra) $tariffe_mostra = substr($tariffe_mostra,0,-1);
if ($nomi_tariffe_imposte) $nomi_tariffe_imposte = substr($nomi_tariffe_imposte,0,-1);
unset($nomi_costi_imposti);
unset($costi_attivati);
for ($numca = 0 ; $numca < $dati_ca[num] ; $numca++) {
global ${"attiva_costo".$dati_ca[$numca][id]};
if (${"attiva_costo".$dati_ca[$numca][id]} == "SI") {
$costi_attivati .= " ".$dati_ca[$numca][id]." => \"".mex("SI",$pag)."\",";
$nome_costo_imposto = "nome_costo_imposto".$dati_ca[$numca][id];
global $$nome_costo_imposto;
$$nome_costo_imposto = formatta_input_var_x_file($$nome_costo_imposto);
if ($$nome_costo_imposto) $nomi_costi_imposti .= $dati_ca[$numca][id]." => \"".$$nome_costo_imposto."\",";
} # fine if (${"attiva_costo".$dati_ca[$numca][id]} == "SI")
} # fine for $num1
if ($nomi_costi_imposti) $nomi_costi_imposti = substr($nomi_costi_imposti,0,-1);
if ($costi_attivati) $costi_attivati = substr($costi_attivati,0,-1);
if ($file_css_frame == "http://") $file_css_frame = "";
$num_colori = 0;
$extra_head_frame = "";
if (strcmp($tema_modello,"")) {
include("./includes/templates/$template_data_dir/themes.php");
$num_temi = count($template_theme_name);
for ($num1 = 1 ; $num1 <= $num_temi ; $num1++) {
if ($tema_modello == $template_theme_name[$num1]) {
$tema_trovato = 1;
$tema_sel = $num1;
} # fine if ($tema_modello == $template_theme_name[$num1])
} # fine for $num1
if ($tema_trovato) {
$prima_parte_html = $template_theme_html_pre[$tema_sel];
$ultima_parte_html = $template_theme_html_post[$tema_sel];
$extra_head_frame = $framed_mode_extra_head[$tema_sel];
$valori_tema = $template_theme_values[$tema_sel];
$num_valori = count($valori_tema);
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) {
global ${"valore_tema_".$num1};
${"valore_tema_".$num1} = formatta_input_var_x_file(${"valore_tema_".$num1});
$valore_sost = ${"valore_tema_".$num1};
if (!strcmp($valore_sost,"")) $valore_sost = $valori_tema[$num1]['null'];
elseif (strcmp($valori_tema[$num1]['replace'],"")) $valore_sost = str_replace("[theme_value_$num1]",$valore_sost,$valori_tema[$num1]['replace']);
$prima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$prima_parte_html);
$ultima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$ultima_parte_html);
$extra_head_frame = str_replace("[theme_value_$num1]",$valore_sost,$extra_head_frame);
} # fine for $num1
$colori_tema = $template_theme_colors[$tema_sel];
$num_colori = count($colori_tema);
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) {
global ${"colore_tema_".$num1};
if (!preg_match("/^#[0-9a-f]{3,3}$/i",${"colore_tema_".$num1}) and !preg_match("/^#[0-9a-f]{6,6}$/i",${"colore_tema_".$num1})) ${"colore_tema_".$num1} = $colori_tema[$num1]['default'];
$prima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$prima_parte_html);
$ultima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$ultima_parte_html);
$extra_head_frame = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$extra_head_frame);
} # fine for $num1
} # fine if ($tema_trovato)
else $tema_modello = "";
} # fine if (strcmp($tema_modello,""))
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
$HOTELD_DB_TYPE = "";
$HOTELD_DB_NAME = "";
$HOTELD_DB_HOST = "";
$HOTELD_DB_PORT = "";
$HOTELD_DB_USER = "";
$HOTELD_DB_PASS = "";
$HOTELD_TAB_PRE = "";
include(C_EXT_DB_DATA_PATH);
if ($HOTELD_DB_TYPE) $M_PHPR_DB_TYPE = "";
if ($HOTELD_DB_NAME) $M_PHPR_DB_NAME = "";
if ($HOTELD_DB_HOST) $M_PHPR_DB_HOST = "";
if (strcmp($HOTELD_DB_PORT,"")) $M_PHPR_DB_PORT = "";
if ($HOTELD_DB_USER) $M_PHPR_DB_USER = "";
if (strcmp($HOTELD_DB_PASS,"")) $M_PHPR_DB_PASS = "";
if ($HOTELD_TAB_PRE) $M_PHPR_TAB_PRE = "";
} # fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
$M_PHPR_DB_TYPE = formatta_input_var_x_file($M_PHPR_DB_TYPE);
$M_PHPR_DB_NAME = formatta_input_var_x_file($M_PHPR_DB_NAME);
$M_PHPR_DB_HOST = formatta_input_var_x_file($M_PHPR_DB_HOST);
$M_PHPR_DB_PORT = formatta_input_var_x_file($M_PHPR_DB_PORT);
$M_PHPR_DB_USER = formatta_input_var_x_file($M_PHPR_DB_USER);
$M_PHPR_DB_PASS = formatta_input_var_x_file($M_PHPR_DB_PASS);
$M_PHPR_LOAD_EXT = formatta_input_var_x_file($M_PHPR_LOAD_EXT);
$M_PHPR_TAB_PRE = formatta_input_var_x_file($M_PHPR_TAB_PRE);
$m_stile_soldi = formatta_input_var_x_file($m_stile_soldi);
$m_stile_data = formatta_input_var_x_file($m_stile_data);
$anteponi_nome_valuta = formatta_input_var_x_file($anteponi_nome_valuta);
$mostra_caparra = formatta_input_var_x_file($mostra_caparra);
$apertura_tag_font = formatta_input_var_x_file($apertura_tag_font);
$chiusura_tag_font = formatta_input_var_x_file($chiusura_tag_font);
$stile_tabella_tariffe = formatta_input_var_x_file($stile_tabella_tariffe);
$m_valuta_sing = formatta_input_var_x_file($m_valuta_sing);
$m_valuta_plur = formatta_input_var_x_file($m_valuta_plur);
$file_css_frame = formatta_input_var_x_file($file_css_frame);
$extra_head_frame = formatta_input_var_x_file($extra_head_frame);
if (get_magic_quotes_gpc()) $prima_parte_html = stripslashes($prima_parte_html);
$prima_parte_html = str_replace("<?","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("?>","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("<%","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("%>","ERROR",$prima_parte_html);
$prima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$prima_parte_html);
if (get_magic_quotes_gpc()) $ultima_parte_html = stripslashes($ultima_parte_html);
$ultima_parte_html = str_replace("<?","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("?>","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("<%","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("%>","ERROR",$ultima_parte_html);
$ultima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$ultima_parte_html);
# FRASI
if ($cambia_frasi == "SI" or $modello_esistente == "SI") {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) {
global ${$fr_frase[$num_fr]};
${$fr_frase[$num_fr]} = formatta_input_var_x_file(${$fr_frase[$num_fr]});
} # fine for $num_fr
} # fine if ($cambia_frasi == "SI" or $modello_esistente == "SI")
else {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) ${$fr_frase[$num_fr]} = mext_rat($frase[$num_fr],$pag,$lingua_modello);
} # fine else if ($cambia_frasi == "SI" or $modello_esistente == "SI")
$cost_percorso_a_dati = "";
if (function_exists("realpath")) {
if (realpath(C_DATA_PATH."/")) $cost_percorso_a_dati = realpath(C_DATA_PATH."/")."/";
} # fine if (function_exists("realpath"))
if ((string) $cost_percorso_a_dati == "") {
if (substr(C_DATA_PATH,0,1) == "/") $cost_percorso_a_dati = C_DATA_PATH;
else {
$dati_path = C_DATA_PATH;
if (substr($dati_path,0,2) == "./") $dati_path = substr($dati_path,1);
else $dati_path = "/".$dati_path;
if ($_SERVER["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($_SERVER["SCRIPT_FILENAME"]).$dati_path;
else {
if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($HTTP_SERVER_VARS["SCRIPT_FILENAME"]).$dati_path;
else {
if ($SCRIPT_FILENAME) $cost_percorso_a_dati = dirname($SCRIPT_FILENAME).$dati_path;
else $cost_percorso_a_dati = "./";
} # fine else if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"])
} # fine else if ($_SERVER["SCRIPT_FILENAME"])
} # fine else if (substr(C_DATI_PATH,0,1) == "/")
} # fine if ((string) $cost_percorso_a_dati == "")
if ($template_file_name[$lingua_modello]) $nome_file = $template_file_name[$lingua_modello];
else {
$template_file_name_m = mext_rat($template_file_name['ita'],$pag,$lingua_modello);
if ($template_file_name_m != $template_file_name['ita'] and $template_file_name_m != $template_file_name['en'] and $template_file_name_m != $template_file_name['es']) $nome_file = $template_file_name_m;
else $nome_file = $lingua_modello."_".$template_file_name['en'];
} # fine else if ($template_file_name[$lingua_modello])
$file = @fopen("$percorso_cartella_modello/$nome_file","w+");
if ($file) {
flock($file,2);
fwrite($file,"<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>$prima_parte_html
<!-- ".mex("FINE DELLA PRIMA PARTE DELL'HTML PERSONALE",$pag)." -->
<?php
} # fine if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed'])
# ".mex("INIZIO VARIABILI MODIFICABILI",$pag)." (".mex("modificare il valore sulla destra",$pag).")
# ".mex("Inserire in questa variabile il nome della pagina se \$PHP_SELF non è definita",$pag)."
\$".mex("var_nome_pagina",$pag)." = \"\";
\$".mex("var_anno",$pag)." = $anno_modello;
\$".mex("var_tipo_db",$pag)." = \"$M_PHPR_DB_TYPE\";
\$".mex("var_nome_db",$pag)." = \"$M_PHPR_DB_NAME\";
\$".mex("var_computer_db",$pag)." = \"$M_PHPR_DB_HOST\";
\$".mex("var_porta_db",$pag)." = \"$M_PHPR_DB_PORT\";
\$".mex("var_utente_db",$pag)." = \"$M_PHPR_DB_USER\";
\$".mex("var_password_db",$pag)." = \"$M_PHPR_DB_PASS\";
\$".mex("var_carica_estensione_db",$pag)." = \"".mex("$M_PHPR_LOAD_EXT",$pag)."\";
\$".mex("var_prefisso_tabelle_db",$pag)." = \"$M_PHPR_TAB_PRE\";
\$".mex("var_lingua_modello",$pag)." = \"$lingua_modello\";
\$".mex("var_stile_soldi",$pag)." = \"".mex("$m_stile_soldi",$pag)."\";
\$".mex("var_stile_data",$pag)." = \"".mex("$m_stile_data",$pag)."\";
\$".mex("var_anteponi_nome_valuta",$pag)." = \"".mex("$anteponi_nome_valuta",$pag)."\";
\$".mex("var_estendi_ultima_data",$pag)." = \"".mex("$estendi_ultima_data",$pag)."\";
\$".mex("var_tariffe_mostra",$pag)." = array($tariffe_mostra);
\$".mex("var_nomi_tariffe_imposte",$pag)." = array($nomi_tariffe_imposte);
\$".mex("var_costi_aggiuntivi_mostra",$pag)." = array($costi_attivati);
\$".mex("var_nomi_costi_agg_imposti",$pag)." = array($nomi_costi_imposti);
\$".mex("var_mostra_caparra",$pag)." = \"".mex("$mostra_caparra",$pag)."\";
\$".mex("var_apertura_tag_font",$pag)." = \"$apertura_tag_font\";
\$".mex("var_chiusura_tag_font",$pag)." = \"$chiusura_tag_font\";
\$".mext_rat("var_stile_tabella_tariffe",$pag)." = \"$stile_tabella_tariffe\";
\$".mex("var_file_css_frame",$pag)." = \"$file_css_frame\";
\$".mex("var_tema_modello",$pag)." = \"$tema_modello\";
");
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) fwrite($file,"\$".mex("var_colore_tema",$pag)."_$num1 = \"".${"colore_tema_".$num1}."\";
");
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) fwrite($file,"\$".mex("var_valore_tema",$pag)."_$num1 = \"".${"valore_tema_".$num1}."\";
");
fwrite($file,"
# ".mex("FRASI",$pag)."
\$".mex("var_fr_Valuta_sing",$pag)." = \"".$m_valuta_sing."\";
\$".mex("var_fr_Valuta_plur",$pag)." = \"".$m_valuta_plur."\";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".mext_rat("var_".$fr_frase[$num_fr],$pag)." = \"".${$fr_frase[$num_fr]}."\";
");
fwrite($file,"
# ".mex("PERIODI NEI MENU",$pag)."
\$".mex("var_periodi_menu",$pag)." = \"$date_in_menu\";
# ".mex("FINE VARIABILI MODIFICABILI",$pag)."
############################################################################
### ".mex("NON MODIFICARE NIENTE A PARTIRE DA QUI",$pag)."
############################################################################
error_reporting(E_ALL ^ E_NOTICE);
\$PHPR_LOG = \"NO\";
\$pag = \$".mex("var_nome_pagina",$pag).";
if (!\$pag) {
if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or @\$HTTP_SERVER_VARS[\"PHP_SELF\"]) {
if (@\$_SERVER[\"PHP_SELF\"]) \$PHP_SELF = \$_SERVER[\"PHP_SELF\"];
else if (@\$HTTP_SERVER_VARS[\"PHP_SELF\"]) \$PHP_SELF = \$HTTP_SERVER_VARS[\"PHP_SELF\"];
\$pag = explode(\"/\",\$PHP_SELF);
\$pag = \$pag[(count(\$pag)-1)];
} # fine if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or...
else echo \"".mex("La variabile \\\$PHP_SELF non è definita, si dovrà editare a mano questa pagina per inserirne il nome",$pag).".<br>\";
} # fine if (!\$pag)
define(C_PERCORSO_A_DATI,\"$cost_percorso_a_dati\");
\$anno = \$".mex("var_anno",$pag).";
\$PHPR_DB_TYPE = \$".mex("var_tipo_db",$pag).";
\$PHPR_DB_NAME = \$".mex("var_nome_db",$pag).";
\$PHPR_DB_HOST = \$".mex("var_computer_db",$pag).";
\$PHPR_DB_PORT = \$".mex("var_porta_db",$pag).";
\$PHPR_DB_USER = \$".mex("var_utente_db",$pag).";
\$PHPR_DB_PASS = \$".mex("var_password_db",$pag).";
if (strtoupper(\$".mex("var_carica_estensione_db",$pag).") == \"".mex("SI",$pag)."\") \$PHPR_LOAD_EXT = \"SI\";
else \$PHPR_LOAD_EXT = \"NO\";
\$PHPR_TAB_PRE = \$".mex("var_prefisso_tabelle_db",$pag).";
");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) fwrite($file,"\$HOTELD_DB_TYPE = \"\";
\$HOTELD_DB_NAME = \"\";
\$HOTELD_DB_HOST = \"\";
\$HOTELD_DB_PORT = \"\";
\$HOTELD_DB_USER = \"\";
\$HOTELD_DB_PASS = \"\";
\$HOTELD_TAB_PRE = \"\";
require('".C_EXT_DB_DATA_PATH."');
if (\$HOTELD_DB_TYPE) \$PHPR_DB_TYPE = \$HOTELD_DB_TYPE;
if (\$HOTELD_DB_NAME) \$PHPR_DB_NAME = \$HOTELD_DB_NAME;
if (\$HOTELD_DB_HOST) \$PHPR_DB_HOST = \$HOTELD_DB_HOST;
if (strcmp(\$HOTELD_DB_PORT,\"\")) \$PHPR_DB_PORT = \$HOTELD_DB_PORT;
if (\$HOTELD_DB_USER) \$PHPR_DB_USER = \$HOTELD_DB_USER;
if (strcmp(\$HOTELD_DB_PASS,\"\")) \$PHPR_DB_PASS = \$HOTELD_DB_PASS;
if (\$HOTELD_TAB_PRE) \$PHPR_TAB_PRE = \$HOTELD_TAB_PRE;
");
fwrite($file,"\$lingua_modello = \$".mex("var_lingua_modello",$pag).";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("europa",$pag)."\") \$stile_soldi = \"europa\";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("usa",$pag)."\") \$stile_soldi = \"usa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("europa",$pag)."\") \$stile_data = \"europa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("usa",$pag)."\") \$stile_data = \"usa\";
if (strtoupper(\$".mex("var_anteponi_nome_valuta",$pag).") == \"".mex("SI",$pag)."\") \$anteponi_nome_valuta = \"SI\";
else \$anteponi_nome_valuta = \"NO\";
if (strtoupper(\$".mex("var_estendi_ultima_data",$pag).") == \"".mex("SI",$pag)."\") \$estendi_ultima_data = \"SI\";
else \$estendi_ultima_data = \"NO\";
unset(\$tariffe_mostra);
reset (\$".mex("var_tariffe_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_tariffe_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$tariffe_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$tariffe_mostra[\$key] = \"NO\";
} # fine while
\$n_tariffe_imposte = \$".mex("var_nomi_tariffe_imposte",$pag).";
unset(\$costi_agg_mostra);
reset (\$".mex("var_costi_aggiuntivi_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_costi_aggiuntivi_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$costi_agg_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$costi_agg_mostra[\$key] = \"NO\";
} # fine while
\$n_costi_agg_imposti = \$".mex("var_nomi_costi_agg_imposti",$pag).";
if (strtoupper(\$".mex("var_mostra_caparra",$pag).") == \"".mex("SI",$pag)."\") \$mostra_caparra = \"SI\";
else \$mostra_caparra = \"NO\";
\$apertura_tag_font = \$".mex("var_apertura_tag_font",$pag).";
\$chiusura_tag_font = \$".mex("var_chiusura_tag_font",$pag).";
\$stile_tabella_tariffe = \$".mext_rat("var_stile_tabella_tariffe",$pag).";
\$file_css_frame = \$".mex("var_file_css_frame",$pag).";
\$extra_head_frame = \"$extra_head_frame\";
\$tipo_periodi = \"$m_tipo_periodi\";
# FRASI
\$fr_Euro = \$".mex("var_fr_Valuta_sing",$pag).";
\$fr_Euros = \$".mex("var_fr_Valuta_plur",$pag).";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".$fr_frase[$num_fr]." = \$".mext_rat("var_".$fr_frase[$num_fr],$pag).";
");
fwrite($file,"
# PERIODI NEI MENU
\$menu_periodi = \$".mex("var_periodi_menu",$pag).";
function mex_data(\$messaggio) {
");
if ($lingua_modello != "ita") {
if (@is_file("./includes/lang/$lingua_modello/giorni_mesi.php")) includi_file("./includes/lang/$lingua_modello/giorni_mesi.php",$file);
else if (@is_file("./includes/lang/en/giorni_mesi.php")) includi_file("./includes/lang/en/giorni_mesi.php",$file);
} # fine if ($lingua_modello != "ita")
fwrite($file,"
return \$messaggio;
} # fine function mex_data
");
includi_file("./includes/funzioni_".$M_PHPR_DB_TYPE.".php",$file);
fwrite($file,"
\$numconnessione = connetti_db(\$PHPR_DB_NAME,\$PHPR_DB_HOST,\$PHPR_DB_PORT,\$PHPR_DB_USER,\$PHPR_DB_PASS,\$PHPR_LOAD_EXT);
");
includi_file("./includes/funzioni.php",$file);
includi_file(C_DATA_PATH."/versione.php",$file);
includi_file("./includes/funzioni_testo.php",$file);
includi_file("./includes/funzioni_tariffe.php",$file);
includi_file("./includes/funzioni_costi_agg.php",$file);
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") {
$f_scad_acc = explode("/",$percorso_cartella_modello);
$num_f_scad_acc = count($f_scad_acc);
$file_scad_acc = "";
for ($num1 = 0 ; $num1 < $num_f_scad_acc ; $num1++) if ($f_scad_acc[$num1] != ".") $file_scad_acc .= "../";
$file_scad_acc .= C_FILE_SCADENZA_ACCOUNT;
fwrite($file,"
\$disattivato = \"\";
\$scadenza = trim(@implode(@file(\"$file_scad_acc\")));
\$adesso = date(\"YmdHis\");
if (!\$scadenza or \$scadenza < \$adesso) {
\$disattivato = \"SI\";
echo \"Expired account.<br>\";
} # fine (!\$scadenza or \$scadenza < \$adesso)
if (!\$disattivato) {
");
} # fine if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "")
includi_file("./includes/templates/$template_data_dir/template.php",$file);
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") fwrite($file,"
} # fine if (!\$disattivato)
");
fwrite($file,"
if (!\$framed) {
?>
<!-- ".mex("INIZIO DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->
$ultima_parte_html
<!-- ".mex("FINE DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." --><?php } # fine if (!\$framed) ?>");
flock($file,3);
fclose($file);
$exec_crea_mod = substr(decoct(@fileperms('./crea_modelli.php')),-3,1);
if ((defined('C_CHMOD_EXEC_MODELLI') and C_CHMOD_EXEC_MODELLI == "SI") or $exec_crea_mod == "7" or $exec_crea_mod == "5") @chmod("$percorso_cartella_modello/$nome_file", 0750);
else @chmod("$percorso_cartella_modello/$nome_file", 0640);
$url_pagina = "";
if ($silenzio != "totale") {
$url_pagina = trova_url_pagina($nome_file,$percorso_cartella_modello,$pag);
if ($url_pagina) $url_pagina_link = $url_pagina;
else $url_pagina_link = "$percorso_cartella_modello/$nome_file";
} # fine if ($silenzio != "totale")
if ($silenzio == "NO") echo "<br>";
if ($silenzio != "totale") echo mex("Una pagina chiamata",$pag)." <b><a href=\"$url_pagina_link\" target=\"_blank\">$nome_file</a></b> ".mex("è stata creata nella directory",$pag)." \"$percorso_cartella_modello\".<br>";
if (defined("C_CARTELLA_CREA_MODELLI") and $silenzio == "NO") echo mex("Si può creare un link verso questa pagina dal proprio sito internet",$pag).".<br>";
else if ($silenzio == "NO") echo mex("Si può cambiare la directory dove vengono create le pagine da \"configura e personalizza\"",$pag).".<br>";
} # fine if ($file)
else if ($silenzio == "NO") echo mex("Non ho il permesso di scrittura nella cartella",$pag)." $percorso_cartella_modello.<br>";
} # fine if ($continua != "NO")
} # fine function crea_modello_rat
if ($dati_ca[$numca]['combina'] == "s") {
$continuare_comb = "NO";
} else {
$continuare = "NO";
}
}
# fine if ($dati_ca[$numca]["incomp_".$tariffa] == "i")
if (!${$numsettimane} and $dati_ca[$numca]['numsett'] == "c" and $dati_ca[$numca]['associasett'] != "s") {
$continuare = "NO";
}
$numsettimane_aux = ${$numsettimane};
$nummoltiplica_ca_aux = ${$nummoltiplica_ca};
if (${$numsettimane} and (${$numsettimane} > $lunghezza_periodo or controlla_num_pos($numsettimane_aux) == "NO")) {
$continuare = "NO";
}
if (${$nummoltiplica_ca} and controlla_num_pos($nummoltiplica_ca_aux) == "NO") {
$continuare = "NO";
}
if (trova_periodo_permesso_costo($dati_ca, $numca, $idinizioperiodo, $idfineperiodo, "") == "NO") {
if ($dati_ca[$numca]['combina'] == "s") {
$continuare_comb = "NO";
} else {
$continuare = "NO";
}
}
# fine if (trova_periodo_permesso_costo($dati_ca,$numca,$idinizioperiodo,$idfineperiodo,"") == "NO")
if (${$id_periodi_costo} == "inserire") {
${$id_periodi_costo} = "";
for ($num1 = $idinizioperiodo; $num1 <= $idfineperiodo; $num1++) {
if (${"sett" . $num1 . "costo" . $numcostoagg} == "SI") {
${$id_periodi_costo} .= "," . $num1;
function ripristina_backup($file, $silenzio, $pag, &$numconnessione, $database_esistente, $tempdatabase, $PHPR_DB_TYPE, $PHPR_DB_NAME, $PHPR_DB_HOST, $PHPR_DB_PORT, $PHPR_DB_USER, $PHPR_DB_PASS, $PHPR_LOAD_EXT, $PHPR_TAB_PRE, $N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE, $ext_pgsql_caricata, $ext_mysql_caricata, $mantieni_anni = "")
{
$tableanni = $PHPR_TAB_PRE . "anni";
$tableutenti = $PHPR_TAB_PRE . "utenti";
include "./includes/variabili_contratto.php";
unset($var_predef);
allunga_tempo_limite();
global $LIKE, $MEDIUMTEXT, $ext_sqlite_caricata;
$fatto = "NO";
if (C_CREA_NUOVI_APP == "NO") {
$num_appartamenti_prec = esegui_query("select idappartamenti from " . $PHPR_TAB_PRE . "appartamenti");
$num_appartamenti_prec = numlin_query($num_appartamenti_prec);
} elseif (defined("C_MASSIMO_NUM_APP") and C_MASSIMO_NUM_APP != 0) {
$num_appartamenti_prec = C_MASSIMO_NUM_APP;
}
if (C_CAMBIA_TIPO_PERIODI == "NO") {
unset($tipo_periodi_prec);
$anni = esegui_query("select * from {$tableanni} order by idanni");
for ($num1 = 0; $num1 < numlin_query($anni); $num1++) {
$ultimo_anno_prec = risul_query($anni, $num1, 'idanni');
$tipo_periodi_prec[$ultimo_anno_prec] = risul_query($anni, $num1, 'tipo_periodi');
}
# fine for $num1
}
# fine if (C_CAMBIA_TIPO_PERIODI == "NO")
# Prima lettura di controllo del file
$file_coerente = "SI";
$num_err = "";
$ultima_linea = "";
$fbackup = fopen($file, "r");
if ($fbackup) {
$leggendo_righe = "NO";
while (!feof($fbackup)) {
unset($linee_backup);
$linee_backup = fread($fbackup, 524288);
$linee_backup = explode("\n", $linee_backup);
$num_linee_backup = count($linee_backup) - 1;
$linee_backup[0] = $ultima_linea . $linee_backup[0];
if (!feof($fbackup)) {
$ultima_linea = $linee_backup[$num_linee_backup];
} else {
$num_linee_backup++;
}
for ($num1 = 0; $num1 < $num_linee_backup; $num1++) {
$linea = togli_acapo($linee_backup[$num1]);
if ($linea == "</backup>" and $leggendo_righe != "SI") {
$leggendo_backup = "NO";
}
if ($leggendo_backup == "SI") {
if (substr($linea, 0, 5) == "<log>" and substr($linea, -6) == "</log>") {
$phpr_log = substr($linea, 5, -6);
}
if ($linea == "</database>" and $leggendo_righe != "SI") {
$leggendo_database = "NO";
}
if ($leggendo_database == "SI") {
if ($linea == "</tabella>" and $leggendo_righe != "SI") {
$leggendo_tabella = "NO";
}
if ($leggendo_tabella == "SI") {
if (substr($linea, 0, 13) == "<nometabella>") {
$nome_tabella = substr($linea, 13);
$nome_tabella = substr($nome_tabella, 0, -14);
}
# fine if (substr($linea,0,13) == "<nometabella>")
if ($linea == "</colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne == "NO";
$anno_ins = "";
if ($nome_tabella == "clienti") {
$tab_presente['clienti'] = "SI";
}
if ($nome_tabella == "relclienti") {
$tab_presente['relclienti'] = "SI";
}
if ($nome_tabella == "anni") {
$tab_presente['anni'] = "SI";
}
if ($nome_tabella == "versioni") {
$tab_presente['versioni'] = "SI";
}
if ($nome_tabella == "nazioni") {
$tab_presente['nazioni'] = "SI";
}
if ($nome_tabella == "regioni") {
$tab_presente['regioni'] = "SI";
}
if ($nome_tabella == "citta") {
$tab_presente['citta'] = "SI";
}
if ($nome_tabella == "documentiid") {
$tab_presente['documentiid'] = "SI";
}
if ($nome_tabella == "parentele") {
$tab_presente['parentele'] = "SI";
}
if ($nome_tabella == "personalizza") {
$tab_presente['personalizza'] = "SI";
}
if ($nome_tabella == "appartamenti") {
$tab_presente['appartamenti'] = "SI";
}
if ($nome_tabella == "utenti") {
$tab_presente['utenti'] = "SI";
}
if ($nome_tabella == "gruppi") {
$tab_presente['gruppi'] = "SI";
}
if ($nome_tabella == "privilegi") {
$tab_presente['privilegi'] = "SI";
}
if ($nome_tabella == "relutenti") {
$tab_presente['relutenti'] = "SI";
}
if ($nome_tabella == "relgruppi") {
$tab_presente['relgruppi'] = "SI";
}
if ($nome_tabella == "sessioni") {
$tab_presente['sessioni'] = "SI";
}
if ($nome_tabella == "transazioni") {
$tab_presente['transazioni'] = "SI";
}
if ($nome_tabella == "transazioniweb") {
$tab_presente['transazioniweb'] = "SI";
}
if ($nome_tabella == "descrizioni") {
$tab_presente['descrizioni'] = "SI";
}
if ($nome_tabella == "beniinventario") {
$tab_presente['beniinventario'] = "SI";
}
if ($nome_tabella == "magazzini") {
$tab_presente['magazzini'] = "SI";
}
if ($nome_tabella == "relinventario") {
$tab_presente['relinventario'] = "SI";
}
if ($nome_tabella == "casse") {
$tab_presente['casse'] = "SI";
}
if ($nome_tabella == "contratti") {
$tab_presente['contratti'] = "SI";
}
if ($nome_tabella == "interconnessioni") {
$tab_presente['interconnessioni'] = "SI";
}
if ($nome_tabella == "messaggi") {
$tab_presente['messaggi'] = "SI";
}
if (substr($nome_tabella, 0, 7) == "prenota") {
$anno_ins = substr($nome_tabella, 7);
$tab_presente[$anno_ins]['prenota'] = "SI";
}
if (substr($nome_tabella, 0, 12) == "costiprenota") {
$anno_ins = substr($nome_tabella, 12);
$tab_presente[$anno_ins]['costiprenota'] = "SI";
} else {
if (substr($nome_tabella, 0, 5) == "costi") {
$anno_ins = substr($nome_tabella, 5);
$tab_presente[$anno_ins]['costi'] = "SI";
}
}
if (substr($nome_tabella, 0, 15) == "rclientiprenota") {
$anno_ins = substr($nome_tabella, 15);
$tab_presente[$anno_ins]['rclientiprenota'] = "SI";
}
if (substr($nome_tabella, 0, 6) == "regole") {
$anno_ins = substr($nome_tabella, 6);
$tab_presente[$anno_ins]['regole'] = "SI";
}
if (substr($nome_tabella, 0, 5) == "soldi") {
$anno_ins = substr($nome_tabella, 5);
$tab_presente[$anno_ins]['soldi'] = "SI";
}
if (substr($nome_tabella, 0, 7) == "periodi") {
$anno_ins = substr($nome_tabella, 7);
$tab_presente[$anno_ins]['periodi'] = "SI";
}
if (substr($nome_tabella, 0, 8) == "ntariffe") {
$anno_ins = substr($nome_tabella, 8);
$tab_presente[$anno_ins]['ntariffe'] = "SI";
}
if ($anno_ins and controlla_anno($anno_ins) == "NO") {
$file_coerente = "NO";
$num_err .= "#1";
}
if ($anno_ins and $tab_anno_esistente[$anno_ins] != "SI") {
$tab_anno_esistente[$anno_ins] = "SI";
}
}
# fine if ($linea == "</colonnetabella>" and $leggendo_righe != "SI")
if ($leggendo_colonne == "SI") {
if (substr($linea, 0, 13) == "<nomecolonna>") {
$num_colonne++;
$nome_colonna[$num_colonne] = substr($linea, 13);
$nome_colonna[$num_colonne] = substr($nome_colonna[$num_colonne], 0, -14);
$num_colonna[$nome_colonna[$num_colonne]] = $num_colonne - 1;
if (substr($nome_tabella, 0, 7) == "periodi" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe++;
}
if (substr($nome_tabella, 0, 8) == "ntariffe" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe++;
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $lista_tariffe > max(C_MASSIMO_NUM_TARIFFE, 10) * 3) {
$file_coerente = "NO";
$num_err .= "#2";
}
}
# fine if (substr($linea,0,13) == "<nomecolonna>")
if (substr($linea, 0, 13) == "<tipocolonna>") {
$tipo_colonna[$num_colonne] = substr($linea, 13);
$tipo_colonna[$num_colonne] = substr($tipo_colonna[$num_colonne], 0, -14);
}
# fine if (substr($linea,0,13) == "<tipocolonna>")
}
# fine if ($leggendo_colonne == "SI")
if ($linea == "<colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne = "SI";
$num_colonne = 0;
$lista_tariffe = 0;
}
# fine if ($linea == "<colonnetabella>" and $leggendo_righe != "SI")
if ($linea == "</righetabella>") {
$leggendo_righe = "NO";
}
if ($leggendo_righe == "SI") {
if (substr($linea, 0, 6) == "<riga>") {
$riga = substr($linea, 11);
} else {
$riga .= "\n" . $linea;
}
# fine else if (substr($linea,0,6) == "<riga>")
if (substr($linea, -7) == "</riga>") {
$riga = substr($riga, 0, -13);
$riga = explode("</cmp><cmp>", $riga);
if ($nome_tabella == "contratti") {
$tipo_contr = $riga[$num_colonna['tipo']];
if (substr($tipo_contr, 0, 3) == "var") {
$nome = $riga[$num_colonna['testo']];
if ($var_riserv[$nome]) {
$file_coerente = "NO";
$num_err .= "#3";
}
}
# fine if (substr($tipo_contr,0,3) == "var")
if (substr($tipo_contr, 0, 4) == "vett") {
$nome = explode(";", $riga[$num_colonna['testo']]);
if ($var_riserv[$nome[0]]) {
$file_coerente = "NO";
$num_err .= "#4";
}
if ($var_riserv[$nome[1]]) {
$file_coerente = "NO";
$num_err .= "#5";
}
}
# fine if (substr($tipo_contr,0,4) == "vett")
}
# fine if ($nome_tabella == "contratti")
unset($valore_colonna);
for ($num2 = 0; $num2 < count($riga); $num2++) {
$valore = aggslashdb($riga[$num2]);
if ($valore != "") {
$valore = str_replace("</righetabella@%&@>", "</righetabella>", $valore);
$valore = str_replace("</riga@%&@>", "</riga>", $valore);
$valore = str_replace("<riga@%&@>", "<riga>", $valore);
$valore = str_replace("</cmp@%&@>", "</cmp>", $valore);
$valore = str_replace("@%&@@%&@", "@%&@", $valore);
$valore_colonna[$nome_colonna[$num2 + 1]] = $valore;
}
# fine if ($valore != "")
}
# fine for $num2
if ((C_CREA_NUOVI_APP == "NO" or defined("C_MASSIMO_NUM_APP") and C_MASSIMO_NUM_APP != 0) and $nome_tabella == "appartamenti" and $linee_inserite_in_tabella[$nome_tabella] >= $num_appartamenti_prec) {
$file_coerente = "NO";
$num_err .= "#6";
}
if ($nome_tabella == "anni") {
$campo_anno_esistente[$valore_colonna['idanni']] = $valore_colonna['tipo_periodi'];
}
if (C_CREA_ANNO_NON_ATTUALE == "NO" and $nome_tabella == "anni" and $valore_colonna['idanni'] < C_PRIMO_ANNO_CREATO) {
$file_coerente = "NO";
$num_err .= "#7";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "utenti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI) {
$file_coerente = "NO";
$num_err .= "#8";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "gruppi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI) {
$file_coerente = "NO";
$num_err .= "#9";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and ($nome_tabella == "sessioni" or $nome_tabella == "transazioni") and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI * 25) {
$file_coerente = "NO";
$num_err .= "#10";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "privilegi" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 20) {
$file_coerente = "NO";
$num_err .= "#11";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "personalizza" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI * 50) {
$file_coerente = "NO";
$num_err .= "#12";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "nazioni" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 3000) {
$file_coerente = "NO";
$num_err .= "#13";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "regioni" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 3000) {
$file_coerente = "NO";
$num_err .= "#14";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "citta" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 30000) {
$file_coerente = "NO";
$num_err .= "#15";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "documentiid" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 2000) {
$file_coerente = "NO";
$num_err .= "#16";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "parentele" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 1000) {
$file_coerente = "NO";
$num_err .= "#17";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "relutenti" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 80000) {
$file_coerente = "NO";
$num_err .= "#18";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "relgruppi" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 8000) {
$file_coerente = "NO";
$num_err .= "#19";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "clienti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI) {
$file_coerente = "NO";
$num_err .= "#20";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "relclienti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI * 10) {
$file_coerente = "NO";
$num_err .= "#21";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "transazioniweb" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI) {
$file_coerente = "NO";
$num_err .= "#22";
}
if (defined("C_MASSIMO_NUM_COSTI_AGG") and C_MASSIMO_NUM_COSTI_AGG != 0 and substr($nome_tabella, 0, 8) == "ntariffe" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_COSTI_AGG + 4) {
$file_coerente = "NO";
$num_err .= "#23";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "descrizioni" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 50 + 40) {
$file_coerente = "NO";
$num_err .= "#24";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "beniinventario" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 10000) {
$file_coerente = "NO";
$num_err .= "#25";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "magazzini" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 1000) {
$file_coerente = "NO";
$num_err .= "#26";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "relinventario" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 100000) {
$file_coerente = "NO";
$num_err .= "#27";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "casse" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 1000) {
$file_coerente = "NO";
$num_err .= "#27.1";
}
if (defined("C_MASSIMO_NUM_CONTRATTI") and C_MASSIMO_NUM_CONTRATTI != 0 and $nome_tabella == "contratti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CONTRATTI * 200 + 100) {
$file_coerente = "NO";
$num_err .= "#28";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "interconnessioni" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI * 10) {
$file_coerente = "NO";
$num_err .= "#29";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "messaggi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI) {
$file_coerente = "NO";
$num_err .= "#30";
}
if (defined("C_MASSIMO_NUM_STORIA_SOLDI") and C_MASSIMO_NUM_STORIA_SOLDI != 0 and substr($nome_tabella, 0, 5) == "soldi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_STORIA_SOLDI + 1) {
$file_coerente = "NO";
$num_err .= "#31";
}
if (defined("C_MASSIMO_NUM_COSTI") and C_MASSIMO_NUM_COSTI != 0 and substr($nome_tabella, 0, 5) == "costi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_COSTI) {
$file_coerente = "NO";
$num_err .= "#32";
}
if (substr($nome_tabella, 0, 8) == "ntariffe" and $valore_colonna['idntariffe'] == 1) {
$numero_tariffe[substr($nome_tabella, 8)] = $valore_colonna['nomecostoagg'];
}
if ($nome_tabella == "versioni" and $linee_inserite_in_tabella[$nome_tabella] >= 2) {
$file_coerente = "NO";
$num_err .= "#33";
}
$linee_inserite_in_tabella[$nome_tabella]++;
}
# fine if (substr($linea,-7) == "</riga>")
}
# fine if ($leggendo_righe == "SI")
if ($linea == "<righetabella>") {
$leggendo_righe = "SI";
$linee_inserite_in_tabella[$nome_tabella] = 0;
}
# fine if ($linea == "<righetabella>")
}
# fine if ($leggendo_tabella == "SI")
if ($linea == "<tabella>") {
$leggendo_tabella = "SI";
}
} else {
if ($linea == "</file>") {
$leggendo_file = "NO";
}
if ($leggendo_file == "SI") {
if ($nome_file) {
if ($leggendo_contenuto == "SI") {
if (substr($linea, -12) == "</contenuto>") {
$leggendo_contenuto = "NO";
$leggendo_cont_file_sel = "NO";
$linea = substr($linea, 0, -12);
}
# fine if (substr($linea,-12) == "</contenuto>")
$linea = trim($linea);
if ($leggendo_prima_linea == "SI") {
$prima_linea = $linea;
$leggendo_prima_linea = "NO";
}
# fine if ($leggendo_prima_linea == "SI")
if ($nome_file == "./data/versione.php") {
if ($linea != "" and $linea != "<?php" and $linea != "define(C_VERSIONE_ATTUALE," . C_PHP_VERSION_NUM . ");" and preg_replace("/define\\(C_DIFF_ORE,-?[0-9]{1,2}\\);/", "", $linea) != "" and $linea != "?>") {
$file_coerente = "NO";
$num_err .= "#34";
}
}
# fine if ($nome_file == "./data/versione.php")
if ($nome_file == "./data/selectappartamenti.php") {
if ($linea == "\";") {
$leggendo_cont_file_sel = "NO";
}
if ($leggendo_cont_file_sel != "SI" and $linea != "" and $linea != "<?php" and $linea != "?>" and $linea != "\";" and $linea != "echo \"") {
$file_coerente = "NO";
$num_err .= "#35";
}
if ($leggendo_cont_file_sel == "SI") {
if (str_replace("\\\\", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#36";
}
$linea = str_replace("\\\"", "", $linea);
if (str_replace("\"", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#37";
}
}
# fine if ($leggendo_cont_file_sel == "SI")
if ($linea == "echo \"") {
$leggendo_cont_file_sel = "SI";
}
}
# fine if ($nome_file == "./data/selectappartamenti.php")
if (substr($nome_file, 0, 20) == "./data/selectperiodi" or substr($nome_file, 0, 21) == "./data/selperiodimenu") {
if ($linea == "\";") {
$leggendo_cont_file_sel = "NO";
}
if ($leggendo_cont_file_sel != "SI") {
$linea_trovata = "NO";
if ($linea == "") {
$linea_trovata = "SI";
}
if ($linea == "<?php") {
$linea_trovata = "SI";
}
if ($linea == "?>") {
$linea_trovata = "SI";
}
if ($linea == "\";") {
$linea_trovata = "SI";
}
if ($linea == "\$dates_options_list = \"") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$y_ini_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,4}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$m_ini_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,2}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$d_ini_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,2}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$n_dates_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,4}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$d_increment\\[[0-9]{1,2}\\] = \"[0-9]{1,2}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea == "\$partial_dates = 1;") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$d_names = \"\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\"\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$m_names = \"\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\"\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea_trovata != "SI") {
$file_coerente = "NO";
$num_err .= "#38";
}
}
# fine if ($leggendo_cont_file_sel != "SI")
if ($leggendo_cont_file_sel == "SI") {
if (str_replace("\\\\", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#39";
}
$linea = str_replace("\\\"", "", $linea);
if (str_replace("\"", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#40";
}
}
# fine if ($leggendo_cont_file_sel == "SI")
if ($linea == "\$dates_options_list = \"") {
$leggendo_cont_file_sel = "SI";
}
}
# fine if (substr($nome_file,0,20) == "./data/selectperiodi" or...
if ($nome_file == "./data/abilita_login" and $linea != "") {
$file_coerente = "NO";
$num_err .= "#41";
}
if ($nome_file == "./data/lingua.php" and $linea != "" and $linea != "<?php" and $linea != "?>" and preg_replace("/\\\$lingua\\[[0-9]{1,8}\\] = \"[a-z]{1,3}\";/", "", $linea) != "") {
$file_coerente = "NO";
$num_err .= "#42";
}
if ($nome_file == "./data/unit.php" or $nome_file == "./data/unit_single.php") {
$linea_trovata = "NO";
if ($linea == "") {
$linea_trovata = "SI";
}
if ($linea == "<?php") {
$linea_trovata = "SI";
}
if ($linea == "?>") {
$linea_trovata = "SI";
}
if (preg_replace("/^\\\$unit\\['(p_n|s_n|gender)'\\] = \\\$trad_var\\['[a-z_]*'\\];/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/^\\\$unit\\['lang'\\]\\['[a-z]{2,3}'\\]\\['(p_n|s_n|gender)'\\] = '[^']*';/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['s_n'] = \$unit['lang'][\$lingua_mex]['s_n'];") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['p_n'] = \$unit['lang'][\$lingua_mex]['p_n'];") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['gender'] = \$unit['lang'][\$lingua_mex]['gender'];") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['special'] = 0;") {
$linea_trovata = "SI";
}
if ($linea == "\$car_spec = explode(\",\",\$trad_var['special_characters']);") {
$linea_trovata = "SI";
}
if ($linea == "for (\$num1 = 0 ; \$num1 < count(\$car_spec) ; \$num1++) if (substr(\$unit['p_n'],0,strlen(\$car_spec[\$num1])) == \$car_spec[\$num1]) \$unit['special'] = 1;") {
$linea_trovata = "SI";
}
if ($linea_trovata != "SI") {
$file_coerente = "NO";
$num_err .= "#42.1";
}
}
# fine if ($nome_file == "./data/unit.php" or $nome_file == "./data/unit_single.php")
if ($nome_file == "./data/tema.php" and $linea != "" and $linea != "<?php" and $linea != "?>" and preg_replace("/\\\$tema\\[[0-9]{1,8}\\] = \"[a-z]{1,4}\";/", "", $linea) != "" and preg_replace("/\\\$parole_sost = [01];/", "", $linea) != "") {
$file_coerente = "NO";
$num_err .= "#43";
}
if ($nome_file == "./data/parole_sost.php" and $linea != "" and $linea != "<?php" and $linea != "?>" and preg_replace("/\\\$messaggio = str_replace\\(\"[^\"]*\",\"[^\"]*\",\\\$messaggio\\);/", "", $linea) != "") {
$file_coerente = "NO";
$num_err .= "#44";
}
if ($nome_file == "./data/dati_interconnessioni.php") {
$linea_trovata = "NO";
if ($linea == "") {
$linea_trovata = "SI";
}
if ($linea == "<?php") {
$linea_trovata = "SI";
}
if ($linea == "?>") {
$linea_trovata = "SI";
}
if (preg_replace("/^#[0-9a-zA-Z _]*/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/^unset\\(\\\$ic_[a-z_]+[0-9a-z_]*\\);/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$ic_[a-z_]+[0-9a-z_]*\\[?\"?[0-9a-zA-Z_]*\"?\\]?\\[?\"?[0-9a-zA-Z_]*\"?\\]?\\[?\"?[0-9a-zA-Z_]*\"?\\]? = \"[^\"]*\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$ic_org[a-z_]+[0-9a-z_]*_ic = C_[A-Z][A-Z_]*[A-Z]_IC;/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea_trovata != "SI") {
$file_coerente = "NO";
$num_err .= "#45";
}
}
# fine if ($nome_file == "./data/dati_interconnessioni.php")
if ($nome_file == "./data/log_utenti.php" and ($prima_linea != "<?php exit(); ?>" or $linea != "<?php exit(); ?>" and preg_replace("/^[0-9]+>[0-9]{4,4}-[0-9]{2,2}-[0-9]{2,2} [0-9]{2,2}:[0-9]{2,2}:[0-9]{2,2}>[a-zA-Z]?.*/", "", $linea) != "")) {
$file_coerente = "NO";
$num_err .= "#46";
}
if ($leggendo_contenuto == "NO") {
$nome_file = "";
}
}
# fine if ($leggendo_contenuto == "SI")
if ($linea == "<contenuto>") {
$leggendo_contenuto = "SI";
$leggendo_prima_linea = "SI";
}
# fine if ($linea == "<contenuto>")
}
# fine if ($nome_file)
if (substr($linea, 0, 10) == "<nomefile>") {
$nome_file = substr($linea, 10);
$nome_file = substr($nome_file, 0, -11);
if (C_CREA_SUBORDINAZIONI == "NO" and str_replace("dati_subordinazione", "", $nome_file) != $nome_file) {
$file_coerente = "NO";
$num_err .= "#47";
}
if (substr($nome_file, 0, 7) != "./data/") {
$file_coerente = "NO";
$num_err .= "#48";
}
$nome_file_vett = explode("/", $nome_file);
if (count($nome_file_vett) > 3) {
$file_coerente = "NO";
$num_err .= "#49";
}
$nome_file_trovato = "NO";
if ($nome_file == "./data/selectappartamenti.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/abilita_login") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/lingua.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/unit.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/unit_single.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/tema.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/parole_sost.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/dati_interconnessioni.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/log_utenti.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/versione.php") {
$nome_file_trovato = "SI";
}
if (substr($nome_file, 0, 20) == "./data/selectperiodi") {
$nome_file_trovato = "SI";
}
if (substr($nome_file, 0, 21) == "./data/selperiodimenu") {
$nome_file_trovato = "SI";
}
if ($nome_file_trovato == "NO") {
$file_coerente = "NO";
$num_err .= "#50";
}
}
# fine if (substr($linea,0,9) == "<nomefile>")
}
# fine if ($leggendo_file == "SI")
if ($linea == "<file>" and $leggendo_modello != "SI") {
$leggendo_file = "SI";
}
}
# fine else if ($leggendo_database == "SI")
if ($linea == "<database>" and $leggendo_modello != "SI") {
$leggendo_database = "SI";
}
if ($linea == "</modello>") {
$leggendo_modello = "NO";
}
if ($linea == "<modello>" and $leggendo_database != "SI" and $leggendo_file != "SI") {
$leggendo_modello = "SI";
}
}
# fine if ($leggendo_backup == "SI")
if ($linea == "<backup>") {
$leggendo_backup = "SI";
}
}
# fine for $num1
}
# fine while (!feof($fbackup))
fclose($fbackup);
} else {
$file_coerente = "NO";
$num_err .= "#51";
}
if (preg_replace("/SI[0-9,]*/", "", $phpr_log) != "") {
$phpr_log = "NO";
}
if (!@is_array($campo_anno_esistente) or !@is_array($tab_anno_esistente)) {
$file_coerente = "NO";
$num_err .= "#52";
} else {
if (count($campo_anno_esistente) != count($tab_anno_esistente)) {
$file_coerente = "NO";
$num_err .= "#53";
}
reset($campo_anno_esistente);
while (list($key, $val) = each($campo_anno_esistente)) {
if ($tab_anno_esistente[$key] != "SI") {
$file_coerente = "NO";
$num_err .= "#54";
}
if ($tab_presente[$key]['prenota'] != "SI") {
$file_coerente = "NO";
$num_err .= "#55";
}
if ($tab_presente[$key]['costiprenota'] != "SI") {
$file_coerente = "NO";
$num_err .= "#56";
}
if ($tab_presente[$key]['rclientiprenota'] != "SI") {
$file_coerente = "NO";
$num_err .= "#57";
}
if ($tab_presente[$key]['costi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#58";
}
if ($tab_presente[$key]['regole'] != "SI") {
$file_coerente = "NO";
$num_err .= "#59";
}
if ($tab_presente[$key]['soldi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#60";
}
if ($tab_presente[$key]['periodi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#61";
}
if ($tab_presente[$key]['ntariffe'] != "SI") {
$file_coerente = "NO";
$num_err .= "#62";
}
if (defined("C_PRIMO_ANNO_CREATO") and C_CREA_ANNO_NON_ATTUALE == "NO" and $key < C_PRIMO_ANNO_CREATO) {
$file_coerente = "NO";
$num_err .= "#63";
}
if (C_CREA_ANNO_NON_ATTUALE == "NO" and $key > date("Y", time() + C_DIFF_ORE * 3600)) {
$file_coerente = "NO";
$num_err .= "#64";
}
if (!$anno_max or $key > $anno_max) {
$anno_max = $key;
$ultimo_tipo_periodi = $val;
}
# fine if (!$anno_max or $key > $anno_max)
if (!$numero_tariffe[$key] or controlla_num_pos($numero_tariffe[$key]) == "NO") {
$file_coerente = "NO";
$num_err .= "#65";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $numero_tariffe[$key] > C_MASSIMO_NUM_TARIFFE) {
$file_coerente = "NO";
$num_err .= "#66";
}
if ($val != "g" and $val != "s") {
$file_coerente = "NO";
$num_err .= "#67";
}
if ($val == "g" and $linee_inserite_in_tabella["periodi" . $key] > 1825 or $val == "s" and $linee_inserite_in_tabella["periodi" . $key] > 260) {
$file_coerente = "NO";
$num_err .= "#68";
}
$prenotazioni_max = $linee_inserite_in_tabella["periodi" . $key] * ($linee_inserite_in_tabella["appartamenti"] + 2);
if (defined("C_MASSIMO_NUM_COSTI_AGG_IN_PRENOTA") and C_MASSIMO_NUM_COSTI_AGG_IN_PRENOTA != 0 and $linee_inserite_in_tabella["costiprenota" . $key] > C_MASSIMO_NUM_COSTI_AGG_IN_PRENOTA * $prenotazioni_max) {
$file_coerente = "NO";
$num_err .= "#69";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $linee_inserite_in_tabella["rclientiprenota" . $key] > C_MASSIMO_NUM_CLIENTI * $prenotazioni_max) {
$file_coerente = "NO";
$num_err .= "#70";
}
if ($linee_inserite_in_tabella["prenota" . $key] > $prenotazioni_max) {
$file_coerente = "NO";
$num_err .= "#71";
}
if ($linee_inserite_in_tabella["regole" . $key] > $prenotazioni_max + $numero_tariffe[$key] * 2) {
$file_coerente = "NO";
$num_err .= "#72";
}
}
# fine while (list($key,$val) = each($campo_anno_esistente))
}
# fine else if (!@is_array($campo_anno_esistente) or...
if (C_CAMBIA_TIPO_PERIODI == "NO" and $tipo_periodi_prec[$ultimo_anno_prec] != $ultimo_tipo_periodi) {
$file_coerente = "NO";
$num_err .= "#73";
}
if ($tab_presente['clienti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#74";
}
if ($tab_presente['relclienti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#75";
}
if ($tab_presente['anni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#76";
}
if ($tab_presente['versioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#77";
}
if ($tab_presente['nazioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#78";
}
if ($tab_presente['regioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#79";
}
if ($tab_presente['citta'] != "SI") {
$file_coerente = "NO";
$num_err .= "#80";
}
if ($tab_presente['documentiid'] != "SI") {
$file_coerente = "NO";
$num_err .= "#81";
}
if ($tab_presente['parentele'] != "SI") {
$file_coerente = "NO";
$num_err .= "#82";
}
if ($tab_presente['personalizza'] != "SI") {
$file_coerente = "NO";
$num_err .= "#83";
}
if ($tab_presente['appartamenti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#84";
}
if ($tab_presente['utenti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#85";
}
if ($tab_presente['gruppi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#86";
}
if ($tab_presente['privilegi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#87";
}
if ($tab_presente['relutenti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#88";
}
if ($tab_presente['relgruppi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#89";
}
if ($tab_presente['sessioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#90";
}
if ($tab_presente['transazioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#91";
}
if ($tab_presente['transazioniweb'] != "SI") {
$file_coerente = "NO";
$num_err .= "#92";
}
if ($tab_presente['descrizioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#93";
}
if ($tab_presente['beniinventario'] != "SI") {
$file_coerente = "NO";
$num_err .= "#94";
}
if ($tab_presente['magazzini'] != "SI") {
$file_coerente = "NO";
$num_err .= "#95";
}
if ($tab_presente['relinventario'] != "SI") {
$file_coerente = "NO";
$num_err .= "#96";
}
if ($tab_presente['casse'] != "SI") {
$file_coerente = "NO";
$num_err .= "#96.1";
}
if ($tab_presente['contratti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#97";
}
if ($tab_presente['interconnessioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#98";
}
if ($tab_presente['messaggi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#99";
}
unset($tab_presente);
unset($var_riserv);
if ($file_coerente == "NO") {
if ($silenzio != "SI") {
echo mex("Il formato del file è errato", $pag) . ".<br>";
}
# debug backup COMPLETO
#if ($num_err) echo mex("Errori",$pag).": $num_err.<br>";
} else {
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
$HOTELD_DB_TYPE = "";
$HOTELD_DB_NAME = "";
$HOTELD_DB_HOST = "";
$HOTELD_DB_PORT = "";
$HOTELD_DB_USER = "";
$HOTELD_DB_PASS = "";
$HOTELD_TAB_PRE = "";
include C_EXT_DB_DATA_PATH;
if ($HOTELD_DB_TYPE) {
$N_PHPR_DB_TYPE = $HOTELD_DB_TYPE;
}
if ($HOTELD_DB_NAME) {
$N_PHPR_DB_NAME = $HOTELD_DB_NAME;
}
if ($HOTELD_DB_HOST) {
$N_PHPR_DB_HOST = $HOTELD_DB_HOST;
}
if (strcmp($HOTELD_DB_PORT, "")) {
$N_PHPR_DB_PORT = $HOTELD_DB_PORT;
}
if ($HOTELD_DB_USER) {
$N_PHPR_DB_USER = $HOTELD_DB_USER;
}
if (strcmp($HOTELD_DB_PASS, "")) {
$N_PHPR_DB_PASS = $HOTELD_DB_PASS;
}
if ($HOTELD_TAB_PRE) {
$N_PHPR_TAB_PRE = $HOTELD_TAB_PRE;
}
}
# fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
if ($N_PHPR_DB_TYPE == "mysql" and @function_exists('mysqli_connect')) {
$N_PHPR_DB_TYPE = "mysqli";
}
if ($N_PHPR_DB_NAME != $PHPR_DB_NAME or $N_PHPR_DB_HOST != $PHPR_DB_HOST or $N_PHPR_DB_PORT != $PHPR_DB_PORT or $N_PHPR_DB_TYPE != $PHPR_DB_TYPE) {
$nuovo_db = "SI";
if ($N_PHPR_DB_NAME == $PHPR_DB_NAME and $N_PHPR_DB_HOST == $PHPR_DB_HOST and $N_PHPR_DB_PORT == $PHPR_DB_PORT and substr($N_PHPR_DB_TYPE, 0, 5) == "mysql" and substr($PHPR_DB_TYPE, 0, 5) == "mysql") {
$database_esistente = "SI";
}
}
# fine if ($N_PHPR_DB_NAME != $PHPR_DB_NAME or $N_PHPR_DB_HOST != $PHPR_DB_HOST or...
if ($nuovo_db == "SI" or $N_PHPR_TAB_PRE != $PHPR_TAB_PRE) {
$mantieni_anni = "";
}
unset($anno_mantieni);
$tabelle_lock = array($tableanni, $tableutenti);
$altre_tab_lock = array($PHPR_TAB_PRE . "clienti", $PHPR_TAB_PRE . "personalizza", $PHPR_TAB_PRE . "privilegi");
$tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock);
$anni_vecchi = esegui_query("select * from {$tableanni} order by idanni");
$num_anni_vecchi = numlin_query($anni_vecchi);
$utenti_vecchi = esegui_query("select * from {$tableutenti} order by idutenti");
unlink(C_DATA_PATH . "/dati_connessione.php");
unlink(C_DATA_PATH . "/selectappartamenti.php");
unlink(C_DATA_PATH . "/versione.php");
unlink(C_DATA_PATH . "/tema.php");
if (@is_file(C_DATA_PATH . "/parole_sost.php")) {
unlink(C_DATA_PATH . "/parole_sost.php");
}
if (@is_file(C_DATA_PATH . "/dati_interconnessioni.php")) {
unlink(C_DATA_PATH . "/dati_interconnessioni.php");
}
if (@is_file(C_DATA_PATH . "/abilita_login")) {
unlink(C_DATA_PATH . "/abilita_login");
}
if (@is_file(C_DATA_PATH . "/log_utenti.php")) {
unlink(C_DATA_PATH . "/log_utenti.php");
}
#if (@is_file(C_DATI_PATH."/ultimo_accesso")) unlink(C_DATI_PATH."/ultimo_accesso");
esegui_query("drop table " . $PHPR_TAB_PRE . "anni");
esegui_query("drop table " . $PHPR_TAB_PRE . "utenti");
unlock_tabelle($tabelle_lock);
for ($num1 = 0; $num1 < $num_anni_vecchi; $num1 = $num1 + 1) {
$anno_cancella = risul_query($anni_vecchi, $num1, 'idanni');
if (!$mantieni_anni or $campo_anno_esistente[$anno_cancella]) {
esegui_query("drop table " . $PHPR_TAB_PRE . "prenota{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "costiprenota{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "rclientiprenota{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "periodi{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "ntariffe{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "regole{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "soldi{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "costi{$anno_cancella}");
for ($num2 = 0; $num2 < numlin_query($utenti_vecchi); $num2++) {
$idutente_canc = risul_query($utenti_vecchi, $num2, 'idutenti');
if (@is_file(C_DATA_PATH . "/selectperiodi{$anno_cancella}.{$idutente_canc}.php")) {
unlink(C_DATA_PATH . "/selectperiodi{$anno_cancella}.{$idutente_canc}.php");
}
if (@is_file(C_DATA_PATH . "/selperiodimenu{$anno_cancella}.{$idutente_canc}.php")) {
unlink(C_DATA_PATH . "/selperiodimenu{$anno_cancella}.{$idutente_canc}.php");
}
}
# fine for $num2
} elseif ($mantieni_anni) {
$anno_mantieni[$anno_cancella] = 1;
}
}
# fine for $num1
if ($mantieni_anni and @is_array($anno_mantieni)) {
$clienti_vecchi = esegui_query("select * from " . $PHPR_TAB_PRE . "clienti order by idclienti");
$max_clienti_vecchi = esegui_query("select max(idclienti) from " . $PHPR_TAB_PRE . "clienti");
$max_clienti_vecchi = risul_query($max_clienti_vecchi, 0, 0);
$privilegi_vecchi = esegui_query("select * from " . $PHPR_TAB_PRE . "privilegi order by idutente");
$personalizza_vecchi = esegui_query("select * from " . $PHPR_TAB_PRE . "personalizza where idpersonalizza {$LIKE} 'giorno_vedi_ini_sett%' ");
}
# fine if ($mantieni_anni and @is_array($anno_mantieni))
esegui_query("drop table " . $PHPR_TAB_PRE . "appartamenti");
esegui_query("drop table " . $PHPR_TAB_PRE . "clienti");
esegui_query("drop table " . $PHPR_TAB_PRE . "relclienti");
esegui_query("drop table " . $PHPR_TAB_PRE . "personalizza");
esegui_query("drop table " . $PHPR_TAB_PRE . "versioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "nazioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "regioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "citta");
esegui_query("drop table " . $PHPR_TAB_PRE . "documentiid");
esegui_query("drop table " . $PHPR_TAB_PRE . "parentele");
esegui_query("drop table " . $PHPR_TAB_PRE . "gruppi");
esegui_query("drop table " . $PHPR_TAB_PRE . "privilegi");
esegui_query("drop table " . $PHPR_TAB_PRE . "relutenti");
esegui_query("drop table " . $PHPR_TAB_PRE . "relgruppi");
esegui_query("drop table " . $PHPR_TAB_PRE . "sessioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "transazioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "transazioniweb");
esegui_query("drop table " . $PHPR_TAB_PRE . "descrizioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "beniinventario");
esegui_query("drop table " . $PHPR_TAB_PRE . "magazzini");
esegui_query("drop table " . $PHPR_TAB_PRE . "relinventario");
esegui_query("drop table " . $PHPR_TAB_PRE . "casse");
esegui_query("drop table " . $PHPR_TAB_PRE . "contratti");
esegui_query("drop table " . $PHPR_TAB_PRE . "cache");
esegui_query("drop table " . $PHPR_TAB_PRE . "interconnessioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "messaggi");
disconnetti_db($numconnessione);
if ($nuovo_db == "SI") {
if ($silenzio != "SI") {
echo "<br>" . mex("Vecchio database svuotato, per rimuoverlo del tutto procedere manualmente", $pag) . ".<br><br>";
}
if ($database_esistente != "SI") {
if ($N_PHPR_DB_TYPE == "postgresql") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI") {
dl("pgsql.so");
$ext_pgsql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI")
$numconnessione = pg_connect("dbname={$tempdatabase} host={$N_PHPR_DB_HOST} port={$N_PHPR_DB_PORT} user={$N_PHPR_DB_USER} password={$N_PHPR_DB_PASS} ");
$encoding = " with encoding = 'SQL_ASCII'";
$encoding = "";
pg_exec("set datestyle to 'iso'");
}
# fine if ($N_PHPR_DB_TYPE == "postgresql")
if ($N_PHPR_DB_TYPE == "mysql") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysql.so");
$ext_mysql_caricata = "SI";
}
# fine if ($PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = mysql_connect("{$N_PHPR_DB_HOST}:{$N_PHPR_DB_PORT}", "{$N_PHPR_DB_USER}", "{$N_PHPR_DB_PASS}");
@mysql_query("SET NAMES 'utf8'");
@mysql_query("SET default_storage_engine=MYISAM");
$encoding = "";
}
# fine if ($N_PHPR_DB_TYPE == "mysql")
if ($N_PHPR_DB_TYPE == "mysqli") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysqli.so");
$ext_mysql_caricata = "SI";
}
# fine if ($PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = mysqli_connect($N_PHPR_DB_HOST, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, "", $N_PHPR_DB_PORT);
@mysqli_query($numconnessione, "SET NAMES 'utf8'");
@mysqli_query($numconnessione, "SET default_storage_engine=MYISAM");
$encoding = "";
}
# fine if ($N_PHPR_DB_TYPE == "mysqli")
if ($N_PHPR_DB_TYPE == "sqlite") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_sqlite_caricata != "SI") {
dl("sqlite.so");
$ext_sqlite_caricata = "SI";
}
# fine if ($PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = new SQLite3(C_DATA_PATH . "/db_" . $N_PHPR_DB_NAME);
$query = $numconnessione;
$database_esistente = "SI";
}
# fine if ($N_PHPR_DB_TYPE == "sqlite")
if ($database_esistente != "SI") {
$query = esegui_query2("create database {$N_PHPR_DB_NAME} {$encoding}", $N_PHPR_DB_TYPE);
}
if ($N_PHPR_DB_TYPE == "postgresql") {
pg_close($numconnessione);
}
if ($N_PHPR_DB_TYPE == "mysql") {
mysql_close($numconnessione);
}
if ($N_PHPR_DB_TYPE == "mysqli") {
mysqli_close($numconnessione);
}
if ($N_PHPR_DB_TYPE == "sqlite") {
$numconnessione->close();
}
} else {
$query = 1;
}
} else {
$query = 1;
}
unlink(C_DATA_PATH . "/lingua.php");
unlink(C_DATA_PATH . "/unit.php");
unlink(C_DATA_PATH . "/unit_single.php");
if ($query) {
$character_set_db = "";
$collation_db = "";
if ($N_PHPR_DB_TYPE == "postgresql") {
$DATETIME = "timestamp";
$MEDIUMTEXT = "text";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI") {
dl("pgsql.so");
$ext_pgsql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI")
$numconnessione = pg_connect("dbname={$N_PHPR_DB_NAME} host={$N_PHPR_DB_HOST} port={$N_PHPR_DB_PORT} user={$N_PHPR_DB_USER} password={$N_PHPR_DB_PASS} ");
pg_exec("set datestyle to 'iso'");
}
# fine if ($N_PHPR_DB_TYPE == "postgresql")
if ($N_PHPR_DB_TYPE == "mysql") {
$DATETIME = "datetime";
$MEDIUMTEXT = "mediumtext";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysql.so");
$ext_mysql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = mysql_connect("{$N_PHPR_DB_HOST}:{$N_PHPR_DB_PORT}", "{$N_PHPR_DB_USER}", "{$N_PHPR_DB_PASS}");
@mysql_query("SET NAMES 'utf8'");
@mysql_query("SET default_storage_engine=MYISAM");
$select_db = mysql_select_db($N_PHPR_DB_NAME);
if (!$select_db) {
$numconnessione = "";
} else {
$character_set = mysql_query("SHOW VARIABLES LIKE 'character_set_database'");
$collation = mysql_query("SHOW VARIABLES LIKE 'collation_database'");
if (mysql_num_rows($character_set) == 1 and mysql_num_rows($collation) == 1) {
$character_set_db = mysql_result($character_set, 0, 'Value');
$collation_db = mysql_result($collation, 0, 'Value');
if ($character_set_db != "utf8" or $collation_db != "utf8_general_ci") {
mysql_query("alter database {$N_PHPR_DB_NAME} default character set 'utf8' collate 'utf8_general_ci'");
}
}
# fine if (mysql_num_rows($character_set) == 1 and mysql_num_rows($collation) == 1)
}
# fine else if (!$select_db)
}
# fine if ($N_PHPR_DB_TYPE == "mysql")
if ($N_PHPR_DB_TYPE == "mysqli") {
$DATETIME = "datetime";
$MEDIUMTEXT = "mediumtext";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysqli.so");
$ext_mysql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
global $link_mysqli;
$numconnessione = mysqli_connect($N_PHPR_DB_HOST, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, "", $N_PHPR_DB_PORT);
$link_mysqli = $numconnessione;
@mysqli_query($numconnessione, "SET NAMES 'utf8'");
@mysqli_query($numconnessione, "SET default_storage_engine=MYISAM");
$select_db = mysqli_select_db($numconnessione, $N_PHPR_DB_NAME);
if (!$select_db) {
$numconnessione = "";
} else {
$character_set = mysqli_query($numconnessione, "SHOW VARIABLES LIKE 'character_set_database'");
$collation = mysqli_query($numconnessione, "SHOW VARIABLES LIKE 'collation_database'");
if (mysqli_num_rows($character_set) == 1 and mysqli_num_rows($collation) == 1) {
$character_set_db = mysqli_fetch_assoc($character_set);
$character_set_db = $character_set_db['Value'];
$collation_db = mysqli_fetch_assoc($collation);
$collation_db = $collation_db['Value'];
if ($character_set_db != "utf8" or $collation_db != "utf8_general_ci") {
mysqli_query($numconnessione, "alter database {$N_PHPR_DB_NAME} default character set 'utf8' collate 'utf8_general_ci'");
}
}
# fine if (mysqli_num_rows($character_set) == 1 and mysqli_num_rows($collation) == 1)
}
# fine else if (!$select_db)
}
# fine if ($N_PHPR_DB_TYPE == "mysqli")
if ($N_PHPR_DB_TYPE == "sqlite") {
$DATETIME = "text";
$MEDIUMTEXT = "text";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_sqlite_caricata != "SI") {
dl("sqlite.so");
$ext_sqlite_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_sqlite_caricata != "SI")
$numconnessione = new SQLite3(C_DATA_PATH . "/db_" . $N_PHPR_DB_NAME);
}
# fine if ($N_PHPR_DB_TYPE == "sqlite")
if ($numconnessione) {
$fileaperto = fopen(C_DATA_PATH . "/dati_connessione.php", "w+");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
if ($HOTELD_DB_TYPE) {
$N_PHPR_DB_TYPE = "";
}
if ($HOTELD_DB_NAME) {
$N_PHPR_DB_NAME = "";
}
if ($HOTELD_DB_HOST) {
$N_PHPR_DB_HOST = "";
}
if (strcmp($HOTELD_DB_PORT, "")) {
$N_PHPR_DB_PORT = "";
}
if ($HOTELD_DB_USER) {
$N_PHPR_DB_USER = "";
}
if (strcmp($HOTELD_DB_PASS, "")) {
$N_PHPR_DB_PASS = "";
}
if ($HOTELD_TAB_PRE) {
$N_PHPR_TAB_PRE = "";
}
}
# fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
$N_PHPR_DB_NAME = aggiungi_slash($N_PHPR_DB_NAME);
$N_PHPR_DB_HOST = aggiungi_slash($N_PHPR_DB_HOST);
$N_PHPR_DB_USER = aggiungi_slash($N_PHPR_DB_USER);
$N_PHPR_DB_PASS = aggiungi_slash($N_PHPR_DB_PASS);
fwrite($fileaperto, "<?php\n\$PHPR_DB_TYPE = \"{$N_PHPR_DB_TYPE}\";\n\$PHPR_DB_NAME = \"{$N_PHPR_DB_NAME}\";\n\$PHPR_DB_HOST = \"{$N_PHPR_DB_HOST}\";\n\$PHPR_DB_PORT = \"{$N_PHPR_DB_PORT}\";\n\$PHPR_DB_USER = \"{$N_PHPR_DB_USER}\";\n\$PHPR_DB_PASS = \"{$N_PHPR_DB_PASS}\";\n\$PHPR_LOAD_EXT = \"{$N_PHPR_LOAD_EXT}\";\n\$PHPR_TAB_PRE = \"{$N_PHPR_TAB_PRE}\";\n\$PHPR_LOG = \"{$phpr_log}\";\n");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
fwrite($fileaperto, "\n\$HOTELD_DB_TYPE = \"\";\n\$HOTELD_DB_NAME = \"\";\n\$HOTELD_DB_HOST = \"\";\n\$HOTELD_DB_PORT = \"\";\n\$HOTELD_DB_USER = \"\";\n\$HOTELD_DB_PASS = \"\";\n\$HOTELD_TAB_PRE = \"\";\nrequire('" . C_EXT_DB_DATA_PATH . "');\nif (\$HOTELD_DB_TYPE) \$PHPR_DB_TYPE = \$HOTELD_DB_TYPE;\nif (\$HOTELD_DB_NAME) \$PHPR_DB_NAME = \$HOTELD_DB_NAME;\nif (\$HOTELD_DB_HOST) \$PHPR_DB_HOST = \$HOTELD_DB_HOST;\nif (strcmp(\$HOTELD_DB_PORT,\"\")) \$PHPR_DB_PORT = \$HOTELD_DB_PORT;\nif (\$HOTELD_DB_USER) \$PHPR_DB_USER = \$HOTELD_DB_USER;\nif (strcmp(\$HOTELD_DB_PASS,\"\")) \$PHPR_DB_PASS = \$HOTELD_DB_PASS;\nif (\$HOTELD_TAB_PRE) \$PHPR_TAB_PRE = \$HOTELD_TAB_PRE;\n");
}
fwrite($fileaperto, "?>");
fclose($fileaperto);
@chmod(C_DATA_PATH . "/dati_connessione.php", 0640);
$leggendo_backup = "NO";
$leggendo_database = "NO";
$leggendo_tabella = "NO";
$leggendo_colonne = "NO";
$leggendo_righe = "NO";
$leggendo_file = "NO";
$leggendo_contenuto = "NO";
$nome_file = "";
$linee_inserite_in_tabella = "";
$ultima_linea = "";
$fbackup = fopen($file, "r");
if ($fbackup) {
$leggendo_righe = "NO";
while (!feof($fbackup)) {
unset($linee_backup);
$linee_backup = fread($fbackup, 524288);
$linee_backup = explode("\n", $linee_backup);
$num_linee_backup = count($linee_backup) - 1;
$linee_backup[0] = $ultima_linea . $linee_backup[0];
if (!feof($fbackup)) {
$ultima_linea = $linee_backup[$num_linee_backup];
} else {
$num_linee_backup++;
}
for ($num1 = 0; $num1 < $num_linee_backup; $num1++) {
$linea = togli_acapo($linee_backup[$num1]);
unset($linee_backup[$num1]);
# Keep alive
if (substr($num1, -3) == "000") {
http_keep_alive(" ");
}
if ($linea == "</backup>" and $leggendo_righe != "SI") {
$leggendo_backup = "NO";
}
if ($leggendo_backup == "SI") {
if ($linea == "</database>" and $leggendo_righe != "SI") {
$leggendo_database = "NO";
}
# restore del database
if ($leggendo_database == "SI") {
if ($linea == "</tabella>" and $leggendo_righe != "SI") {
$leggendo_tabella = "NO";
}
if ($leggendo_tabella == "SI") {
if (substr($linea, 0, 13) == "<nometabella>") {
$nome_tabella = substr($linea, 13);
$nome_tabella = substr($nome_tabella, 0, -14);
}
# fine if (substr($linea,0,13) == "<nometabella>")
if ($linea == "</colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne == "NO";
if ($nome_tabella == "clienti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "clienti (idclienti integer primary key, cognome varchar(70) not null, nome varchar(70), soprannome varchar(70), sesso char, titolo varchar(30), lingua varchar(14), datanascita date, cittanascita varchar(70), regionenascita varchar(70), nazionenascita varchar(70), documento varchar(70), scadenzadoc date, tipodoc varchar(70), cittadoc varchar(70), regionedoc varchar(70), nazionedoc varchar(70), nazionalita varchar(70), nazione varchar(70), regione varchar(70), citta varchar(70), via varchar(70), numcivico varchar(30), cap varchar(30), telefono varchar(50), telefono2 varchar(50), telefono3 varchar(50), fax varchar(50), email text, cod_fiscale varchar(50), partita_iva varchar(50), commento text, max_num_ordine integer, idclienti_compagni text, doc_inviati text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "relclienti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relclienti (idclienti integer, numero integer, tipo varchar(12), testo1 text, testo2 text, testo3 text, testo4 text, testo5 text, testo6 text, testo7 text, testo8 text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idclienti", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relclienti")
if ($nome_tabella == "anni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "anni (idanni integer primary key, tipo_periodi text)", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "versioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "versioni (idversioni integer primary key, num_versione float4)", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "nazioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "nazioni (idnazioni integer primary key, nome_nazione varchar(70), codice_nazione varchar(50), codice2_nazione varchar(50), codice3_nazione varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "regioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "regioni (idregioni integer primary key, nome_regione varchar(70), codice_regione varchar(50), codice2_regione varchar(50), codice3_regione varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "citta") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "citta (idcitta integer primary key, nome_citta varchar(70), codice_citta varchar(50), codice2_citta varchar(50), codice3_citta varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "documentiid") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "documentiid (iddocumentiid integer primary key, nome_documentoid varchar(70), codice_documentoid varchar(50), codice2_documentoid varchar(50), codice3_documentoid varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "parentele") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "parentele (idparentele integer primary key, nome_parentela varchar(70), codice_parentela varchar(50), codice2_parentela varchar(50), codice3_parentela varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "personalizza") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "personalizza (idpersonalizza varchar(50) not null, idutente integer, valpersonalizza text, valpersonalizza_num integer)", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "appartamenti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "appartamenti (idappartamenti varchar(100) primary key, numpiano text, maxoccupanti integer, numcasa text, app_vicini text, priorita integer, priorita2 integer, letto varchar(1), commento text )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "utenti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "utenti (idutenti integer primary key, nome_utente text, password text, salt text, tipo_pass varchar(1), datainserimento {$DATETIME}, hostinserimento varchar(50) )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "gruppi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "gruppi (idgruppi integer primary key, nome_gruppo text )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "privilegi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "privilegi (idutente integer, anno integer, regole1_consentite text, tariffe_consentite text, costi_agg_consentiti text, contratti_consentiti text, casse_consentite text, cassa_pagamenti varchar(70), priv_ins_prenota varchar(20), priv_mod_prenota varchar(35), priv_mod_pers varchar(15), priv_ins_clienti varchar(5), prefisso_clienti text, priv_ins_costi varchar(10), priv_vedi_tab varchar(30), priv_ins_tariffe varchar(10), priv_ins_regole varchar(10), priv_messaggi varchar(10), priv_inventario varchar(10) )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "relutenti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relutenti (idutente integer not null, idnazione integer, idregione integer, idcitta integer, iddocumentoid integer, idparentela integer, idsup integer, predef integer, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idutente", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relutenti")
if ($nome_tabella == "relgruppi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relgruppi (idutente integer not null, idgruppo integer, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idutente", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relgruppi")
if ($nome_tabella == "sessioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "sessioni (idsessioni varchar(30) primary key, idutente integer, indirizzo_ip text, tipo_conn varchar(12), user_agent text, ultimo_accesso {$DATETIME} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "transazioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "transazioni (idtransazioni varchar(30) primary key, idsessione varchar(30), tipo_transazione varchar(5), anno integer, spostamenti text, dati_transazione1 text, dati_transazione2 text, dati_transazione3 text, dati_transazione4 text, dati_transazione5 text, dati_transazione6 text, dati_transazione7 text, dati_transazione8 text, dati_transazione9 text, dati_transazione10 text, dati_transazione11 text, dati_transazione12 text, dati_transazione13 text, dati_transazione14 text, dati_transazione15 text, dati_transazione16 text, dati_transazione17 text, dati_transazione18 text, dati_transazione19 text, dati_transazione20 text, ultimo_accesso {$DATETIME})", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "transazioniweb") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "transazioniweb (idtransazioni varchar(30) primary key, idsessione varchar(30), tipo_transazione varchar(5), anno integer, spostamenti text, dati_transazione1 text, dati_transazione2 text, dati_transazione3 text, dati_transazione4 text, dati_transazione5 text, dati_transazione6 text, dati_transazione7 text, dati_transazione8 text, dati_transazione9 text, dati_transazione10 text, dati_transazione11 text, dati_transazione12 text, dati_transazione13 text, dati_transazione14 text, dati_transazione15 text, dati_transazione16 text, dati_transazione17 text, dati_transazione18 text, dati_transazione19 text, dati_transazione20 text, ultimo_accesso {$DATETIME})", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "descrizioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "descrizioni (nome text not null, tipo varchar(16), lingua varchar(3), numero integer, testo {$MEDIUMTEXT} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "beniinventario") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "beniinventario (idbeniinventario integer primary key, nome_bene varchar(70), codice_bene varchar(50), descrizione_bene text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "magazzini") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "magazzini (idmagazzini integer primary key, nome_magazzino varchar(70), codice_magazzino varchar(50), descrizione_magazzino text, numpiano text, numcasa text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "relinventario") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relinventario (idbeneinventario integer not null, idappartamento varchar(100), idmagazzino integer, quantita integer, quantita_min_predef integer, richiesto_checkin varchar(2), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idbeneinventario", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relinventario")
if ($nome_tabella == "casse") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "casse (idcasse integer primary key, nome_cassa varchar(70), stato varchar(8), codice_cassa varchar(50), descrizione_cassa text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "contratti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "contratti (numero integer, tipo varchar(8), testo {$MEDIUMTEXT} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "cache") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "cache (numero integer, tipo varchar(8), testo {$MEDIUMTEXT}, data_modifica {$DATETIME}, datainserimento {$DATETIME} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "interconnessioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "interconnessioni (idlocale integer, idremoto1 text, idremoto2 text, tipoid varchar(12), nome_ic varchar(24), anno integer, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "messaggi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "messaggi (idmessaggi integer primary key, tipo_messaggio varchar(8), stato varchar(8), idutenti text, idutenti_visto text, datavisione {$DATETIME}, mittente text, testo text, dati_messaggio1 text, dati_messaggio2 text, dati_messaggio3 text, dati_messaggio4 text, dati_messaggio5 text, dati_messaggio6 text, dati_messaggio7 text, dati_messaggio8 text, dati_messaggio9 text, dati_messaggio10 text, dati_messaggio11 text, dati_messaggio12 text, dati_messaggio13 text, dati_messaggio14 text, dati_messaggio15 text, dati_messaggio16 text, dati_messaggio17 text, dati_messaggio18 text, dati_messaggio19 text, dati_messaggio20 text, datainserimento {$DATETIME})", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 7) == "prenota") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idprenota integer primary key, idclienti integer, idappartamenti varchar(100), iddatainizio integer, iddatafine integer, assegnazioneapp varchar(4), app_assegnabili text, num_persone integer, idprenota_compagna text, tariffa text, tariffesettimanali text, incompatibilita text, sconto float8, tariffa_tot float8, caparra float8, commissioni float8, tasseperc float4, pagato float8, metodo_pagamento text, origine varchar(70), codice varchar(10), commento text, conferma varchar(4), checkin {$DATETIME}, checkout {$DATETIME}, id_anni_prec text, datainserimento {$DATETIME}, hostinserimento varchar(50), data_modifica {$DATETIME}, utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 12) == "costiprenota") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idcostiprenota integer primary key, idprenota integer, tipo varchar(2), nome varchar(40), valore float8, valore_perc float8, arrotonda float4, tasseperc float4, associasett varchar(1), settimane text, moltiplica text, categoria text, letto varchar(1), numlimite integer, idntariffe integer, variazione varchar(10), varmoltiplica text, varnumsett varchar(20), varperiodipermessi text, varbeniinv text, varappincompatibili text, vartariffeassociate varchar(10), vartariffeincomp text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer)", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idprenota", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
} else {
if (substr($nome_tabella, 0, 5) == "costi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idcosti integer unique,nome_costo text, val_costo float8, tipo_costo text, nome_cassa varchar(70), persona_costo text, provenienza_costo text, metodo_pagamento text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer)", $N_PHPR_DB_TYPE);
}
}
if (substr($nome_tabella, 0, 15) == "rclientiprenota") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idprenota integer, idclienti integer, num_ordine integer, parentela varchar(70), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idprenota", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if (substr($nome_tabella,0,15) == "rclientiprenota")
if (substr($nome_tabella, 0, 6) == "regole") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idregole integer, app_agenzia varchar(100), tariffa_chiusa text, tariffa_per_app text, tariffa_per_utente text, tariffa_per_persone text, tariffa_commissioni integer, iddatainizio integer, iddatafine integer, motivazione text, motivazione2 text )", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 5) == "soldi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idsoldi integer unique, motivazione text, id_pagamento text, metodo_pagamento text, saldo_prenota float8, saldo_cassa float8, soldi_prima float8, data_inserimento {$DATETIME}, utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 7) == "periodi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idperiodi integer primary key, datainizio date not null, datafine date{$lista_tariffe})", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 8) == "ntariffe") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idntariffe integer, nomecostoagg varchar(40), tipo_ca varchar(2), valore_ca float8, valore_perc_ca float8, arrotonda_ca float4, tasseperc_ca float4, associasett_ca varchar(1), numsett_ca varchar(20), moltiplica_ca text, periodipermessi_ca text, beniinv_ca text, appincompatibili_ca text, variazione_ca varchar(20), mostra_ca varchar(10), categoria_ca text, letto_ca varchar(1), numlimite_ca integer, regoleassegna_ca varchar(30), utente_inserimento integer{$lista_tariffe})", $N_PHPR_DB_TYPE);
}
}
# fine if ($linea == "</colonnetabella>" and $leggendo_righe != "SI")
if ($leggendo_colonne == "SI") {
if (substr($linea, 0, 13) == "<nomecolonna>") {
$num_colonne++;
$nome_colonna[$num_colonne] = substr($linea, 13);
$nome_colonna[$num_colonne] = substr($nome_colonna[$num_colonne], 0, -14);
if (substr($nome_tabella, 0, 7) == "periodi" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe .= ", " . $nome_colonna[$num_colonne] . " float8";
}
if (substr($nome_tabella, 0, 8) == "ntariffe" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe .= ", " . $nome_colonna[$num_colonne] . " varchar(40)";
}
}
# fine if (substr($linea,0,13) == "<nomecolonna>")
if (substr($linea, 0, 13) == "<tipocolonna>") {
$tipo_colonna[$num_colonne] = substr($linea, 13);
$tipo_colonna[$num_colonne] = substr($tipo_colonna[$num_colonne], 0, -14);
}
# fine if (substr($linea,0,13) == "<tipocolonna>")
}
# fine if ($leggendo_colonne == "SI")
if ($linea == "<colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne = "SI";
$num_colonne = 0;
$lista_tariffe = "";
}
# fine if ($linea == "<colonnetabella>" and $leggendo_righe != "SI")
if ($linea == "</righetabella>") {
$leggendo_righe = "NO";
}
if ($leggendo_righe == "SI") {
if (substr($linea, 0, 6) == "<riga>") {
$riga = substr($linea, 11);
} else {
$riga .= "\n" . $linea;
}
# fine else if (substr($linea,0,6) == "<riga>")
if (substr($linea, -7) == "</riga>") {
$riga = substr($riga, 0, -13);
$riga = explode("</cmp><cmp>", $riga);
$lista_valori = "";
$query = "insert into " . $N_PHPR_TAB_PRE . "{$nome_tabella} (";
for ($num2 = 0; $num2 < count($riga); $num2++) {
aggslashdb2($riga[$num2], $N_PHPR_DB_TYPE);
if ($riga[$num2] != "") {
$query .= $nome_colonna[$num2 + 1] . ",";
}
}
# fine for $num2
$query = substr($query, 0, -1) . ") values (";
for ($num2 = 0; $num2 < count($riga); $num2++) {
if ($riga[$num2] != "") {
$riga[$num2] = str_replace("</righetabella@%&@>", "</righetabella>", $riga[$num2]);
$riga[$num2] = str_replace("</riga@%&@>", "</riga>", $riga[$num2]);
$riga[$num2] = str_replace("<riga@%&@>", "<riga>", $riga[$num2]);
$riga[$num2] = str_replace("</cmp@%&@>", "</cmp>", $riga[$num2]);
$riga[$num2] = str_replace("@%&@@%&@", "@%&@", $riga[$num2]);
$query .= "'" . $riga[$num2] . "',";
}
# fine if ($riga[$num2] != "")
}
# fine for $num2
$query = substr($query, 0, -1) . ")";
#echo $query<br>";
esegui_query3($query, $N_PHPR_DB_TYPE);
}
# fine if (substr($linea,-7) == "</riga>")
}
# fine if ($leggendo_righe == "SI")
if ($linea == "<righetabella>") {
$leggendo_righe = "SI";
$linee_inserite_in_tabella[$nome_tabella] = 0;
}
# fine if ($linea == "<righetabella>")
}
# fine if ($leggendo_tabella == "SI")
if ($linea == "<tabella>" and $leggendo_righe != "SI") {
$leggendo_tabella = "SI";
}
} else {
# restore dei files
if ($linea == "</file>") {
$leggendo_file = "NO";
}
if ($leggendo_file == "SI") {
if ($nome_file) {
if ($leggendo_contenuto == "SI") {
if (substr($linea, -12) == "</contenuto>") {
$nome_file = "";
$leggendo_contenuto = "NO";
$linea = substr($linea, 0, -12);
fwrite($fileaperto, $linea);
fclose($fileaperto);
} else {
fwrite($fileaperto, $linea . "\n");
}
# fine else if (substr($linea,-12) == "</contenuto>")
}
# fine if ($leggendo_contenuto == "SI")
if ($linea == "<contenuto>") {
$leggendo_contenuto = "SI";
}
}
# fine if ($nome_file)
if (substr($linea, 0, 10) == "<nomefile>") {
$nome_file = substr($linea, 10);
$nome_file = substr($nome_file, 0, -11);
if (substr($nome_file, 0, 7) == "./data/") {
$nome_file = C_DATA_PATH . substr($nome_file, 6);
}
if ($nome_file) {
$fileaperto = fopen("{$nome_file}", "w+");
}
}
# fine if (substr($linea,0,10) == "<nomefile>")
}
# fine if ($leggendo_file == "SI")
if ($linea == "<file>" and $leggendo_modello != "SI") {
$leggendo_file = "SI";
}
}
# fine else if ($leggendo_database == "SI")
if ($linea == "<database>" and $leggendo_modello != "SI") {
$leggendo_database = "SI";
}
# restore dei modelli
if ($linea == "</modello>") {
$leggendo_modello = "NO";
$leggendo_contenuto_mod = "NO";
$nome_modello = "";
}
# fine if ($linea == "</modello>")
if ($leggendo_modello == "SI") {
if ($nome_modello) {
if ($leggendo_contenuto_mod == "SI") {
if (substr($linea, -12) == "</contenuto>") {
$leggendo_contenuto_mod = "NO";
$linea = substr($linea, 0, -12);
$contenuto_mod[$dir_modello][$nome_modello] .= $linea . "\n";
$nome_modello = "";
} else {
$contenuto_mod[$dir_modello][$nome_modello] .= $linea . "\n";
}
# fine else if (substr($linea,-12) == "</contenuto>")
}
# fine if ($leggendo_contenuto_mod == "SI")
if ($linea == "<contenuto>") {
$leggendo_contenuto_mod = "SI";
}
} else {
if (substr($linea, 0, 12) == "<dirmodello>") {
$dir_modello = substr($linea, 12);
$dir_modello = substr($dir_modello, 0, -13);
if (substr($dir_modello, -1) == "/") {
$dir_modello = substr($dir_modello, 0, -1);
}
if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "") {
$c_cartella_crea_mod = C_CARTELLA_CREA_MODELLI;
if (substr($c_cartella_crea_mod, -1) == "/") {
$c_cartella_crea_mod = substr($c_cartella_crea_mod, 0, -1);
}
if (substr($dir_modello . "/", 0, strlen($c_cartella_crea_mod . "/")) != $c_cartella_crea_mod . "/") {
$dir_modello = "";
}
if (str_replace("..", "", $dir_modello) != $dir_modello) {
$dir_modello = "";
}
}
# fine if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "")
}
# fine if (substr($linea,0,12) == "<dirmodello>")
if (substr($linea, 0, 13) == "<nomemodello>" and $dir_modello) {
$nome_modello = substr($linea, 13);
$nome_modello = substr($nome_modello, 0, -14);
if (substr($nome_modello, -4) != ".php") {
$nome_modello = "";
}
if (str_replace(".php", "", substr($nome_modello, 0, -4)) != substr($nome_modello, 0, -4)) {
$nome_modello = "";
}
}
# fine if (substr($linea,0,13) == "<nomemodello>" and $dir_modello)
}
# fine else if ($nome_modello)
}
# fine if ($leggendo_modello == "SI")
if ($linea == "<modello>" and $leggendo_database != "SI" and $leggendo_file != "SI") {
$leggendo_modello = "SI";
}
}
# fine if ($leggendo_backup == "SI")
if ($linea == "<backup>") {
$leggendo_backup = "SI";
}
}
# fine for $num1
}
# fine while (!feof($fbackup))
fclose($fbackup);
echo "<br>";
}
# fine if ($fbackup)
# Se si sono mantenuti gli anni non presenti nel backup, aggiorno i loro data ed importo eventuali clienti mancanti
if ($mantieni_anni and @is_array($anno_mantieni)) {
for ($num1 = 0; $num1 < $num_anni_vecchi; $num1++) {
$anno_vecchio = risul_query($anni_vecchi, $num1, 'idanni');
if ($anno_mantieni[$anno_vecchio]) {
esegui_query("insert into " . $PHPR_TAB_PRE . "anni (idanni,tipo_periodi) values ('{$anno_vecchio}','" . risul_query($anni_vecchi, $num1, 'tipo_periodi') . "') ");
}
# fine if ($anno_mantieni[$anno_vecchio])
}
# fine for $num1
unset($id_utenti_vecchi);
$id_utenti_vecchi[1] = 1;
for ($num1 = 0; $num1 < numlin_query($utenti_vecchi); $num1++) {
$idutente_vecchio = risul_query($utenti_vecchi, $num1, 'idutenti');
if ($idutente_vecchio != 1) {
$datainserimento = risul_query($utenti_vecchi, $num1, 'datainserimento');
if (!$datainserimento) {
$cond_datainserimento = "datainserimento is NULL";
} else {
$cond_datainserimento = "datainserimento = '" . aggslashdb($datainserimento) . "'";
}
$hostinserimento = risul_query($utenti_vecchi, $num1, 'hostinserimento');
if (!strcmp($hostinserimento, "")) {
$cond_hostinserimento = "(hostinserimento is NULL or hostinserimento = '')";
} else {
$cond_hostinserimento = "hostinserimento = '" . aggslashdb($hostinserimento) . "'";
}
$utente_esistente = esegui_query("select idutenti from " . $PHPR_TAB_PRE . "utenti where idutenti = '{$idutente_vecchio}' and {$cond_datainserimento} and {$cond_hostinserimento} ");
if (!numlin_query($utente_esistente)) {
reset($anno_mantieni);
while (list($anno_vecchio, $val) = each($anno_mantieni)) {
esegui_query("update " . $PHPR_TAB_PRE . "prenota{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "costi{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "costiprenota{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "rclientiprenota{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
if (@is_file(C_DATA_PATH . "/selectperiodi{$anno_vecchio}.{$idutente_vecchio}.php")) {
unlink(C_DATA_PATH . "/selectperiodi{$anno_vecchio}.{$idutente_vecchio}.php");
}
if (@is_file(C_DATA_PATH . "/selperiodimenu{$anno_vecchio}.{$idutente_vecchio}.php")) {
unlink(C_DATA_PATH . "/selperiodimenu{$anno_vecchio}.{$idutente_vecchio}.php");
}
}
# fine while (list($anno_vecchio,$val) = each($anno_mantieni))
$id_utenti_vecchi[$idutente_vecchio] = 1;
} else {
$id_utenti_vecchi[$idutente_vecchio] = $idutente_vecchio;
}
}
# fine if ($idutente_vecchio != 1)
}
# fine for $num1
unset($id_clienti_vecchi);
unset($id_clienti_inseriti);
$max_clienti = esegui_query("select max(idclienti) from " . $PHPR_TAB_PRE . "clienti");
$max_clienti = risul_query($max_clienti, 0, 0);
if ($max_clienti_vecchi > $max_clienti) {
$max_clienti = $max_clienti_vecchi;
}
for ($num1 = 0; $num1 < numlin_query($clienti_vecchi); $num1++) {
$idcliente_vecchio = risul_query($clienti_vecchi, $num1, 'idclienti');
$cliente_presente = 0;
reset($anno_mantieni);
while (list($anno_vecchio, $val) = each($anno_mantieni)) {
$idcliente_presente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "prenota{$anno_vecchio} where idclienti = '{$idcliente_vecchio}' ");
$idcliente_presente2 = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "rclientiprenota{$anno_vecchio} where idclienti = '{$idcliente_vecchio}' ");
$idcliente_presente3 = esegui_query("select idsoldi from " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} where motivazione {$LIKE} '{$idcliente_vecchio};%' ");
if (numlin_query($idcliente_presente) or numlin_query($idcliente_presente2) or numlin_query($idcliente_presente3)) {
$cliente_presente = 1;
break;
}
# fine if (numlin_query($idcliente_presente) or numlin_query($idcliente_presente2) or...
}
# fine while (list($anno_vecchio,$val) = each($anno_mantieni))
if ($cliente_presente) {
$datainserimento = risul_query($clienti_vecchi, $num1, 'datainserimento');
if (!$datainserimento) {
$cond_datainserimento = "datainserimento is NULL";
} else {
$cond_datainserimento = "datainserimento = '" . aggslashdb($datainserimento) . "'";
}
$hostinserimento = risul_query($clienti_vecchi, $num1, 'hostinserimento');
if (!strcmp($hostinserimento, "")) {
$cond_hostinserimento = "(hostinserimento is NULL or hostinserimento = '')";
} else {
$cond_hostinserimento = "hostinserimento = '" . aggslashdb($hostinserimento) . "'";
}
$cliente_esistente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "clienti where idclienti = '{$idcliente_vecchio}' and {$cond_datainserimento} and {$cond_hostinserimento} ");
if (!numlin_query($cliente_esistente)) {
$cliente_esistente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "clienti where cognome = '" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cognome')) . "' and {$cond_datainserimento} and {$cond_hostinserimento} ");
if (numlin_query($cliente_esistente) == 1) {
$id_nuovo = risul_query($cliente_esistente, 0, 'idclienti');
} else {
$id_esistente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "clienti where idclienti = '{$idcliente_vecchio}' ");
if (numlin_query($id_esistente)) {
$max_clienti++;
$id_nuovo = $max_clienti;
} else {
$id_nuovo = $idcliente_vecchio;
}
esegui_query("insert into " . $PHPR_TAB_PRE . "clienti (idclienti,cognome,nome,soprannome,sesso,titolo,lingua,cittanascita,regionenascita,nazionenascita,documento,tipodoc,cittadoc,regionedoc,nazionedoc,nazionalita,nazione,regione,citta,via,numcivico,cap,telefono,telefono2,telefono3,fax,email,cod_fiscale,partita_iva,commento,max_num_ordine,idclienti_compagni,doc_inviati,hostinserimento,utente_inserimento) values ('{$id_nuovo}',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cognome')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nome')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'soprannome')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'sesso')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'titolo')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'lingua')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cittanascita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'regionenascita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazionenascita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'documento')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'tipodoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cittadoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'regionedoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazionedoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazionalita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazione')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'regione')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'citta')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'via')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'numcivico')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cap')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'telefono')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'telefono2')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'telefono3')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'fax')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'email')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cod_fiscale')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'partita_iva')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'commento')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'max_num_ordine')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'idclienti_compagni')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'doc_inviati')) . "',\n'" . aggslashdb($hostinserimento) . "',\n'" . $id_utenti_vecchi[risul_query($clienti_vecchi, $num1, 'utente_inserimento')] . "') ");
$datanascita = risul_query($clienti_vecchi, $num1, 'datanascita');
if ($datanascita) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set datanascita = '" . aggslashdb($datanascita) . "' where idclienti = '{$id_nuovo}' ");
}
$scadenzadoc = risul_query($clienti_vecchi, $num1, 'scadenzadoc');
if ($scadenzadoc) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set scadenzadoc = '" . aggslashdb($scadenzadoc) . "' where idclienti = '{$id_nuovo}' ");
}
if ($datainserimento) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set datainserimento = '" . aggslashdb($datainserimento) . "' where idclienti = '{$id_nuovo}' ");
}
$id_clienti_inseriti[$idcliente_vecchio] = $id_nuovo;
}
# fine else if (numlin_query($cliente_esistente) == 1)
$id_clienti_vecchi[$idcliente_vecchio] = $id_nuovo;
if ($id_nuovo != $idcliente_vecchio) {
reset($anno_mantieni);
while (list($anno_vecchio, $val) = each($anno_mantieni)) {
esegui_query("update " . $PHPR_TAB_PRE . "prenota{$anno_vecchio} set idclienti = '{$id_nuovo}' where idclienti = '{$idcliente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "rclientiprenota{$anno_vecchio} set idclienti = '{$id_nuovo}' where idclienti = '{$idcliente_vecchio}' ");
$storia_soldi = esegui_query("select * from " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} where motivazione {$LIKE} '{$idcliente_vecchio};%' ");
for ($num2 = 0; $num2 < numlin_query($storia_soldi); $num2++) {
$idsoldi = risul_query($storia_soldi, $num2, 'idsoldi');
$motivazione = risul_query($storia_soldi, $num2, 'motivazione');
$motivazione = $id_nuovo . substr($motivazione, strlen($idcliente_vecchio));
esegui_query("update " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} set motivazione = '{$motivazione}' where idsoldi = '{$idsoldi}' ");
}
# fine for $num2
}
# fine while (list($anno_vecchio,$val) = each($anno_mantieni))
}
# fine if ($id_nuovo != $idcliente_vecchio)
} else {
$id_clienti_vecchi[$idcliente_vecchio] = $idcliente_vecchio;
}
}
# fine if ($cliente_presente)
}
# fine for $num1
if (@is_array($id_clienti_inseriti)) {
reset($id_clienti_inseriti);
while (list($idcliente_vecchio, $id_nuovo) = each($id_clienti_inseriti)) {
$n_idclienti_compagni = ",";
$idclienti_compagni = esegui_query("select idclienti_compagni from " . $PHPR_TAB_PRE . "clienti where idclienti = '{$id_nuovo}' ");
$idclienti_compagni = risul_query($idclienti_compagni, 0, 'idclienti_compagni');
$idclienti_compagni_vett = explode(",", $idclienti_compagni);
for ($num1 = 1; $num1 < count($idclienti_compagni_vett) - 1; $num1++) {
if ($id_clienti_vecchi[$idclienti_compagni_vett[$num1]]) {
$n_idclienti_compagni .= $id_clienti_vecchi[$idclienti_compagni_vett[$num1]] . ",";
}
}
# fine for $num1
if ($n_idclienti_compagni != $idclienti_compagni) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set idclienti_compagni = '{$n_idclienti_compagni}' where idclienti = '{$id_nuovo}' ");
}
}
# fine while (list($idcliente_vecchio,$id_nuovo) = each($id_clienti_inseriti))
}
# fine if (@is_array($id_clienti_inseriti))
for ($num1 = 0; $num1 < numlin_query($privilegi_vecchi); $num1++) {
$anno_priv = risul_query($privilegi_vecchi, $num1, 'anno');
if ($anno_mantieni[$anno_priv]) {
$idutente_priv = risul_query($privilegi_vecchi, $num1, 'idutente');
if ($id_utenti_vecchi[$idutente_priv] != 1) {
esegui_query("insert into " . $PHPR_TAB_PRE . "privilegi (idutente,anno,regole1_consentite,tariffe_consentite,costi_agg_consentiti,contratti_consentiti,priv_ins_prenota,priv_mod_prenota,priv_mod_pers,priv_ins_clienti,prefisso_clienti,priv_ins_costi,priv_vedi_tab,priv_ins_tariffe,priv_ins_regole,priv_messaggi,priv_inventario) values ('{$idutente_priv}','{$anno_priv}',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'regole1_consentite')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'tariffe_consentite')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'costi_agg_consentiti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'contratti_consentiti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_prenota')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_mod_prenota')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_mod_pers')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_clienti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'prefisso_clienti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_costi')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_vedi_tab')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_tariffe')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_regole')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_messaggi')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_inventario')) . "') ");
}
# fine if ($id_utenti_vecchi[$idutente_priv] != 1)
}
# fine if ($anno_mantieni[$anno_priv])
}
# fine for $num1
for ($num1 = 0; $num1 < numlin_query($personalizza_vecchi); $num1++) {
$idpersonalizza = risul_query($personalizza_vecchi, $num1, 'idpersonalizza');
if ($anno_mantieni[str_replace("giorno_vedi_ini_sett", "", $idpersonalizza)]) {
$idutente_pers = risul_query($personalizza_vecchi, $num1, 'idutente');
if ($id_utenti_vecchi[$idutente_pers] != 1) {
esegui_query("insert into " . $PHPR_TAB_PRE . "personalizza (idpersonalizza,idutente,valpersonalizza,valpersonalizza_num) values ('{$idpersonalizza}','{$idutente_pers}',\n'" . aggslashdb(risul_query($personalizza_vecchi, $num1, 'valpersonalizza')) . "',\n'" . aggslashdb(risul_query($personalizza_vecchi, $num1, 'valpersonalizza_num')) . "') ");
}
# fine if ($id_utenti_vecchi[$idutente_pers] != 1)
}
# fine if ($anno_mantieni[str_replace("giorno_vedi_ini_sett","",$idpersonalizza)])
}
# fine for $num1
}
# fine if ($mantieni_anni and @is_array($anno_mantieni))
if ($silenzio != "SI") {
echo "" . mex("Database creato", $pag) . "<br>";
}
$fatto = "SI";
if (($nuovo_db != "SI" or $database_esistente == "SI") and $character_set_db and ($character_set_db != "utf8" or $collation_db != "utf8_general_ci")) {
esegui_query2("alter database {$N_PHPR_DB_NAME} default character set '{$character_set_db}' collate '{$collation_db}'", $N_PHPR_DB_TYPE);
}
if (@is_array($contenuto_mod) and $N_PHPR_DB_TYPE == $PHPR_DB_TYPE) {
global $prima_parte_html, $lingua_mex;
echo "<br>";
$lingua_mex_orig = $lingua_mex;
if ($silenzio != "SI") {
$silenzio_mod = "SI";
} else {
$silenzio_mod = "totale";
}
global $anno_modello_presente, $num_periodi_date, $modello_esistente, $cambia_frasi, $lingua_modello, $percorso_cartella_modello, $nome_file;
include C_DATA_PATH . "/lingua.php";
$lingua_mex = $lingua[1];
$pag_orig = $pag;
$pag = "crea_modelli.php";
function assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE)
{
global $M_PHPR_DB_TYPE, $M_PHPR_DB_NAME, $M_PHPR_DB_HOST, $M_PHPR_DB_PORT, $M_PHPR_DB_USER, $M_PHPR_DB_PASS, $M_PHPR_LOAD_EXT, $M_PHPR_TAB_PRE;
$M_PHPR_DB_TYPE = $N_PHPR_DB_TYPE;
$M_PHPR_DB_NAME = $N_PHPR_DB_NAME;
$M_PHPR_DB_HOST = $N_PHPR_DB_HOST;
$M_PHPR_DB_PORT = $N_PHPR_DB_PORT;
$M_PHPR_DB_USER = $N_PHPR_DB_USER;
$M_PHPR_DB_PASS = $N_PHPR_DB_PASS;
$M_PHPR_LOAD_EXT = $N_PHPR_LOAD_EXT;
$M_PHPR_TAB_PRE = $N_PHPR_TAB_PRE;
}
# fine function assegna_var_conn_mod
$PHPR_TAB_PRE = $N_PHPR_TAB_PRE;
$tablepersonalizza = $PHPR_TAB_PRE . "personalizza";
include "./includes/funzioni_costi_agg.php";
include "./includes/templates/funzioni_modelli.php";
$modello_esistente = "SI";
$cambia_frasi = "NO";
include "./includes/templates/frasi_mod_disp.php";
include "./includes/templates/funzioni_mod_disp.php";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello]['mdl_disponibilita.php']) {
$lingua_modello = "ita";
$nome_file = mex2("mdl_disponibilita", $pag, $lingua_modello) . ".php";
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello]["{$nome_file}"], "{$percorso_cartella_modello}/{$nome_file_tmp}");
recupera_var_modello_disponibilita($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
crea_modello_disponibilita($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello]["mdl_disponibilita.php"])
}
# fine for $num_cart
$lang_dir = opendir("./includes/lang/");
include C_DATA_PATH . "/lingua.php";
while ($ini_lingua = readdir($lang_dir)) {
if ($ini_lingua != "." && $ini_lingua != "..") {
$nome_file = mex2("mdl_disponibilita", $pag, $ini_lingua) . ".php";
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello][$nome_file]) {
$lingua_modello = $ini_lingua;
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello][$nome_file], "{$percorso_cartella_modello}/{$nome_file_tmp}");
recupera_var_modello_disponibilita($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
crea_modello_disponibilita($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello][$nome_file])
}
# fine for $num_cart
}
# fine if ($file != "." && $file != "..")
}
# fine while ($file = readdir($lang_dig))
closedir($lang_dir);
$templates_dir = opendir("./includes/templates/");
while ($modello_ext = readdir($templates_dir)) {
if ($modello_ext != "." and $modello_ext != ".." and @is_dir("./includes/templates/{$modello_ext}")) {
include "./includes/templates/{$modello_ext}/name.php";
include "./includes/templates/{$modello_ext}/phrases.php";
include "./includes/templates/{$modello_ext}/functions.php";
$funz_recupera_var_modello = "recupera_var_modello_" . $modello_ext;
$funz_crea_modello = "crea_modello_" . $modello_ext;
$funz_mext = "mext_" . $modello_ext;
if ($template_file_name['ita']) {
$nome_file = $template_file_name['ita'];
} else {
$nome_file = "ita_" . $template_file_name["en"];
}
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello][$nome_file]) {
$lingua_modello = "ita";
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello][$nome_file], "{$percorso_cartella_modello}/{$nome_file_tmp}");
$funz_recupera_var_modello($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
$funz_crea_modello($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello][$nome_file])
}
# fine for $num_cart
$lang_dir = opendir("./includes/lang/");
while ($ini_lingua = readdir($lang_dir)) {
if ($ini_lingua != "." && $ini_lingua != "..") {
if ($template_file_name[$ini_lingua]) {
$nome_file = $template_file_name[$ini_lingua];
} else {
$nome_file = $ini_lingua . "_" . $template_file_name['en'];
}
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello][$nome_file]) {
$lingua_modello = $ini_lingua;
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello]["{$nome_file}"], "{$percorso_cartella_modello}/{$nome_file_tmp}");
$funz_recupera_var_modello($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
$funz_crea_modello($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello][$nome_file])
}
# fine for $num_cart
}
# fine if ($file != "." && $file != "..")
}
# fine while ($file = readdir($lang_dir))
closedir($lang_dir);
}
# fine if ($modello_ext != "." and $modello_ext != ".." and...
}
# fine while ($file = readdir($lang_dig))
closedir($templates_dir);
$pag = $pag_orig;
$lingua_mex = $lingua_mex_orig;
}
# fine if (@is_array($contenuto_mod) and...
} else {
if ($silenzio != "SI") {
echo mex("Non è stato possibile connettersi al nuovo database, controllare i data per la connessione, i privilegi dell' utente o il nome del database", $pag) . ".<br>";
}
}
} else {
if ($silenzio != "SI") {
echo mex("Non è stato possibile creare il nuovo database, controllare i data per la connessione, i privilegi dell' utente, il nome del database o se esiste già un database chiamato", $pag) . " {$N_PHPR_DB_NAME}.<br>";
}
}
}
# fine else if ($file_coerente == "NO")
return $fatto;
}
#$start_time = microtime();
define(C_ID_UTENTE,$id_utente);
$campi_pers_cliente = esegui_query("select * from $tablepersonalizza where idpersonalizza = 'campi_pers_cliente' and idutente = '$id_utente' ");
if (numlin_query($campi_pers_cliente)) {
$campi_pers_cliente = explode(">",risul_query($campi_pers_cliente,0,'valpersonalizza'));
$num_campi_pers_cliente = count($campi_pers_cliente);
} # fine if (numlin_query($campi_pers_cliente))
else $num_campi_pers_cliente = 0;
$campo_personalizzato_ = "campo_personalizzato_";
include("./includes/variabili_contratto.php");
if (!$num_ripeti or controlla_num_pos($num_ripeti) == "NO") $num_ripeti = 1;
if (get_magic_quotes_gpc()) {
for ($n_r = 1 ; $n_r <= $num_ripeti ; $n_r++) {
for ($num1 = 0 ; $num1 < $num_var_predef_ripeti ; $num1++) ${$var_predef[$num1]."_".$n_r} = stripslashes(${$var_predef[$num1]."_".$n_r});
} # fine for $n_r
} # fine if (get_magic_quotes_gpc())
if ($lista_prenota) {
$lista_clienti = "";
if ($priv_vedi_tab_prenotazioni != "n" or ($priv_vedi_tab_mesi != "n" and $priv_mod_prenotazioni != "n")) {
$tabelle_lock = "";
$altre_tab_lock = array($tableanni,$tableprenota,$tablecostiprenota,$tableperiodi,$tableclienti,$tablerelclienti,$tablesoldi,$tableutenti);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
include("./includes/funzioni_costi_agg.php");
if ($modifica_privilegi_anno) {
$anno_modifica = $modifica_privilegi_anno;
if (controlla_anno($anno_modifica) != "SI" or $anno_esistente[$anno_modifica] != "SI" or numlin_query($privilegi_anno[$anno_modifica]) == 0) {
$modificare = "NO";
echo mex("Anno <div style=\"display: inline; color: red;\">errato</div>",$pag).".<br>";
} # fine if (controlla_anno($modifica_privilegi_anno) != "SI" or...
if (${"modp_attiva_ore_mod".$anno_modifica} == "s") {
if (strlen(${"modp_num_ore_mod".$anno_modifica}) > 3 or controlla_num_pos(${"modp_num_ore_mod".$anno_modifica}) != "SI" or ${"modp_num_ore_mod".$anno_modifica} == 0) {
$modificare = "NO";
echo mex("Ore in cui si può modificare la prenotazione <div style=\"display: inline; color: red;\">errate</div>",$pag).".<br>";
} # fine if (strlen($modp_num_ore_mod) > 3 or...)
} # fine if ($modp_attiva_ore_mod == "s")
if (${"modp_attiva_ore_canc".$anno_modifica} == "s") {
if (strlen(${"modp_num_ore_canc".$anno_modifica}) > 3 or controlla_num_pos(${"modp_num_ore_canc".$anno_modifica}) != "SI" or ${"modp_num_ore_canc".$anno_modifica} == 0) {
$modificare = "NO";
echo mex("Ore in cui si può cancellare la prenotazione <div style=\"display: inline; color: red;\">errate</div>",$pag).".<br>";
} # fine if (strlen($modp_num_ore_canc) > 3 or...
} # fine if ($modp_attiva_ore_mod == "s")
if ($modificare != "NO") {
$regole1_consentite = risul_query($privilegi_anno[$anno_modifica],0,'regole1_consentite');
$tariffe_consentite = risul_query($privilegi_anno[$anno_modifica],0,'tariffe_consentite');
$costi_agg_consentiti = risul_query($privilegi_anno[$anno_modifica],0,'costi_agg_consentiti');
$contratti_consentiti = risul_query($privilegi_anno[$anno_modifica],0,'contratti_consentiti');
$cassa_pagamenti = risul_query($privilegi_anno[$anno_modifica],0,'cassa_pagamenti');
$priv_ins_prenota = risul_query($privilegi_anno[$anno_modifica],0,'priv_ins_prenota');
$priv_mod_prenota = risul_query($privilegi_anno[$anno_modifica],0,'priv_mod_prenota');
$priv_ins_costi = risul_query($privilegi_anno[$anno_modifica],0,'priv_ins_costi');
$priv_ins_tariffe = risul_query($privilegi_anno[$anno_modifica],0,'priv_ins_tariffe');
$priv_vedi_tab = risul_query($privilegi_anno[$anno_modifica],0,'priv_vedi_tab');
$nome_contr = mex("documento", $pag) . $num_contr;
if (strcmp($nome_contratto_ut[$num_contr], "")) {
$nome_contr .= " (" . $nome_contratto_ut[$num_contr] . ")";
}
$lista_contr .= "<option value=\"{$num_contr}\">{$nome_contr}</option>";
#if (risul_query($contr_txt,$num1,'tipo') == "contrtxt") $lista_contr_txt .= "<option value=\"$num_contr\">$nome_contr</option>";
}
# fine if (!numlin_query($salva_contr))
}
# fine for $num1
if ($lista_contr) {
echo "<table><tr><td style=\"height: 5px;\"></td></tr></table>\n" . mex("Condizioni da accettare nella form", $pag) . " (" . mex("nomi dall'utente delle liste, opzionali nel commento", $pag) . "):<br>\n<table><tr><td style=\"width: 25px;\"></td><td valign=\"top\">";
if (!$num_campi_doc_cond and $campi_form_doc_condizioni['array_esistente']) {
$num_campi_doc_cond = count($campi_form_doc_condizioni) - 1;
}
if (!$num_campi_doc_cond or controlla_num_pos($num_campi_doc_cond) == "NO") {
$num_campi_doc_cond = 1;
}
for ($num1 = 1; $num1 <= $num_campi_doc_cond; $num1++) {
$num_doc_cond = "num_doc_cond" . $num1;
if (!${$num_doc_cond}) {
${$num_doc_cond} = $campi_form_doc_condizioni[$num1];
}
if (!${$num_doc_cond}) {
$sel = " selected";
} else {
$sel = "";
}
if (!${"chiedi_num_doc_cond" . $num1}) {
${"chiedi_num_doc_cond" . $num1} = $chiedi_campi_form_doc_condizioni[$num1];
}
function esegui_modifiche_prenotazione(&$inserire, &$cancellata, $id_prenota_int, $id_prenota_idpr, $num_id_prenota, $id_transazione, $id_sessione, $anno, $id_nuovo_utente_inserimento, $n_stima_checkin, $n_met_paga_caparra, $n_origine_prenota, $n_pagato, $n_confermato, $tipo_commento, $n_commento, $n_cancella_commento, $tableprenota_da_aggiornare, $tipo_sposta, $dati_da_anno_prec, $prenota_in_anno_succ, $tra_anni, $PHPR_TAB_PRE)
{
global $id_utente, $priv_mod_checkin, $attiva_regole1_consentite, $regole1_consentite, $attiva_tariffe_consentite, $tariffe_consentite_vett, $priv_mod_date, $priv_ins_periodi_passati, $priv_mod_commento, $priv_mod_sconto, $priv_mod_caparra, $priv_mod_pagato, $priv_mod_orig_prenota, $d_commento, $cassa_pagamenti;
global $dati_ca, $d_id_utente_inserimento_idpr, $d_appartamento_idpr, $d_id_data_inizio_idpr, $d_nome_tariffa_idpr, $d_app_eliminati_costi_idpr, $d_checkin_idpr, $d_checkout_idpr, $d_prenota_comp_idpr, $fineperiodo_orig;
global $id_prenota_orig, $tableperiodi_orig, $tableprenota_orig, $tablecostiprenota_orig, $tableperiodi_prec, $tableprenota_prec, $tablecostiprenota_prec, $stile_data;
$pag = "modifica_prenota.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;
$tablesoldi = $PHPR_TAB_PRE . "soldi" . $anno;
$tableappartamenti = $PHPR_TAB_PRE . "appartamenti";
$tableclienti = $PHPR_TAB_PRE . "clienti";
$tablepersonalizza = $PHPR_TAB_PRE . "personalizza";
$tabletransazioni = $PHPR_TAB_PRE . "transazioni";
$tableutenti = $PHPR_TAB_PRE . "utenti";
$tablecostiprenota = $PHPR_TAB_PRE . "costiprenota" . $anno;
$tablerelinventario = $PHPR_TAB_PRE . "relinventario";
$tablecache = $PHPR_TAB_PRE . "cache";
$tablecosti = $PHPR_TAB_PRE . "costi" . $anno;
$file_interconnessioni = C_DATA_PATH . "/dati_interconnessioni.php";
if ($tableprenota_da_aggiornare == "SI") {
if (@is_file($file_interconnessioni)) {
include $file_interconnessioni;
if (@is_array($ic_present)) {
$dati_transaz = recupera_dati_transazione($id_transazione, $id_sessione, $anno, "SI", $tipo_transaz);
if ($tipo_transaz == "mod_p" and risul_query($dati_transaz, 0, 'dati_transazione11') == "SI") {
unset($interconnection_name);
$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_import.php";
$funz_import_reservations = "import_reservations_" . $interconnection_name;
$id_utente_origi = $id_utente;
$id_utente = 1;
$funz_import_reservations("", "", $file_interconnessioni, $anno, $PHPR_TAB_PRE, 2, $id_utente, $HOSTNAME);
$id_utente = $id_utente_origi;
}
# 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 ($tipo_transaz == "mod_p" and risul_query($dati_transazione,0,'dati_transazione11') == "SI")
}
# fine if (@is_array($ic_present))
}
# fine if (@is_file($file_interconnessioni))
$tableprenota_da_aggiornare = "";
}
# fine if ($tableprenota_da_aggiornare == "SI")
if ($dati_da_anno_prec == "SI" or $prenota_in_anno_succ) {
if (@is_file($file_interconnessioni)) {
$tabelle_lock = array($tableprenota_prec, $tableprenota_orig, $tablecostiprenota_prec, $tablecostiprenota_orig, $tablerelinventario, $tabletransazioni, $tablecache);
} else {
$tabelle_lock = array($tableprenota_prec, $tableprenota_orig, $tablecostiprenota_prec, $tablecostiprenota_orig, $tablerelinventario, $tabletransazioni);
}
$altre_tab_lock = array($tablenometariffe, $tableperiodi_prec, $tableperiodi_orig, $tableappartamenti, $tableregole, $tablepersonalizza, $tableutenti);
} else {
if (@is_file($file_interconnessioni)) {
$tabelle_lock = array($tableprenota, $tablecostiprenota, $tablerelinventario, $tabletransazioni, $tablecache);
} else {
$tabelle_lock = array($tableprenota, $tablecostiprenota, $tablerelinventario, $tabletransazioni);
}
$altre_tab_lock = array($tablenometariffe, $tableperiodi, $tableappartamenti, $tableregole, $tablepersonalizza, $tableutenti);
}
# fine else if ($dati_da_anno_prec == "SI")
$tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock);
$dati_transazione = recupera_dati_transazione($id_transazione, $id_sessione, $anno, "NO", $tipo_transazione);
if ($tipo_transazione != "mod_p") {
$inserire = "NO";
} else {
if ("," . $id_prenota_int . "," != risul_query($dati_transazione, 0, 'dati_transazione1')) {
$inserire = "NO";
}
}
if ($inserire != "NO") {
$d_data_inserimento = risul_query($dati_transazione, 0, 'dati_transazione2');
$d_host_inserimento = risul_query($dati_transazione, 0, 'dati_transazione3');
$n_costo_tot_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione4'));
$n_inizioperiodo = risul_query($dati_transazione, 0, 'dati_transazione5');
$n_fineperiodo = risul_query($dati_transazione, 0, 'dati_transazione6');
$n_appartamento_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione7'));
$n_assegnazioneapp_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione8'));
$n_lista_app_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione9'));
$n_numpersone_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione10'));
$tableprenota_da_aggiornare = risul_query($dati_transazione, 0, 'dati_transazione11');
$n_nometipotariffa_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione12'));
$n_costo_tariffa_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione13'));
$costi_aggiuntivi_modificati_int_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione14'));
$costi_aggiuntivi_da_inserire_int_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione15'));
$n_sconto_caparra_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione16'));
unset($n_sconto_idpr);
unset($n_caparra_idpr);
unset($n_commissioni_idpr);
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
if ($tipo_sposta == "fisso" and strcmp($n_appartamento_idpr[$id_prenota], "")) {
$n_assegnazioneapp_idpr[$id_prenota] = "k";
}
$n_sconto = explode("#@&", $n_sconto_caparra_idpr[$id_prenota]);
if (strcmp($n_sconto[1], "")) {
$n_caparra = (double) $n_sconto[1];
} else {
$n_caparra = "";
}
if (strcmp($n_sconto[2], "")) {
$n_commissioni = (double) $n_sconto[2];
} else {
$n_commissioni = "";
}
if (strcmp($n_sconto[0], "")) {
$n_sconto = (double) $n_sconto[0];
} else {
$n_sconto = "";
}
$n_sconto_idpr[$id_prenota] = $n_sconto;
$n_caparra_idpr[$id_prenota] = $n_caparra;
$n_commissioni_idpr[$id_prenota] = $n_commissioni;
}
# fine for $num_idpr
$n_tariffesettimanali_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione17'));
$id_per_corr_finto = (string) risul_query($dati_transazione, 0, 'dati_transazione18');
$prenota_comp_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione19'));
$n_app_eliminati_costi_idpr = unserialize(risul_query($dati_transazione, 0, 'dati_transazione20'));
if (get_magic_quotes_gpc()) {
$n_pagato = stripslashes($n_pagato);
$n_confermato = stripslashes($n_confermato);
}
# fine if (get_magic_quotes_gpc())
$n_pagato_idpr = unserialize($n_pagato);
$n_confermato_idpr = unserialize($n_confermato);
esegui_query("delete from {$tabletransazioni} where idtransazioni = '{$id_transazione}' and idsessione = '{$id_sessione}'");
if ($tableprenota_da_aggiornare) {
$spostamenti = risul_query($dati_transazione, 0, 'spostamenti');
$spostamenti = explode(",", $spostamenti);
}
# fine if ($tableprenota_da_aggiornare)
unset($dati_prenota_idpr);
unset($beniinv_presenti);
unset($num_ripetizioni_costo_mod_idpr);
unset($num_ripetizioni_costo_ins_idpr);
unset($n_tipotariffa_idpr);
$d_data_inserimento_idpr = explode(",", $d_data_inserimento);
$d_host_inserimento_idpr = explode(",", $d_host_inserimento);
if (get_magic_quotes_gpc()) {
$n_met_paga_caparra = stripslashes($n_met_paga_caparra);
}
$n_met_paga_caparra = htmlspecialchars($n_met_paga_caparra);
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$d_checkin = $d_checkin_idpr[$id_prenota];
$d_id_data_inizio = $d_id_data_inizio_idpr[$id_prenota];
$n_costo_tot = $n_costo_tot_idpr[$id_prenota];
$n_appartamento = $n_appartamento_idpr[$id_prenota];
$n_assegnazioneapp = $n_assegnazioneapp_idpr[$id_prenota];
$n_lista_app = $n_lista_app_idpr[$id_prenota];
$n_numpersone = $n_numpersone_idpr[$id_prenota];
$n_nometipotariffa = $n_nometipotariffa_idpr[$id_prenota];
$n_costo_tariffa = $n_costo_tariffa_idpr[$id_prenota];
$costi_aggiuntivi_modificati_int = $costi_aggiuntivi_modificati_int_idpr[$id_prenota];
$costi_aggiuntivi_da_inserire_int = $costi_aggiuntivi_da_inserire_int_idpr[$id_prenota];
$n_sconto = $n_sconto_idpr[$id_prenota];
$n_caparra = $n_caparra_idpr[$id_prenota];
$n_commissioni = $n_commissioni_idpr[$id_prenota];
$n_tariffesettimanali = $n_tariffesettimanali_idpr[$id_prenota];
$prenota_comp = $prenota_comp_idpr[$id_prenota];
$n_pagato = $n_pagato_idpr[$id_prenota];
$n_confermato = $n_confermato_idpr[$id_prenota];
global ${"dati_cap" . $id_prenota}, ${"metodo_pagamento" . $id_prenota};
$dati_cap = ${"dati_cap" . $id_prenota};
unset($num_costi_presenti);
$dati_prenota_idpr[$id_prenota] = esegui_query("select * from {$tableprenota} where idprenota = '{$id_prenota}' and idclienti != '0'");
$num_dati_prenota = numlin_query($dati_prenota_idpr[$id_prenota]);
if ($num_dati_prenota == 0) {
$inserire = "NO";
$cancellata = "SI";
} else {
$n_data_inserimento = risul_query($dati_prenota_idpr[$id_prenota], 0, 'datainserimento');
$n_host_inserimento = risul_query($dati_prenota_idpr[$id_prenota], 0, 'hostinserimento');
if ($n_data_inserimento != $d_data_inserimento_idpr[$num_idpr] or $n_host_inserimento != $d_host_inserimento_idpr[$num_idpr]) {
$inserire = "NO";
$cancellata = "SI";
$inizioperiodo = "";
$fineperiodo = "";
}
# fine if ($n_data_inserimento != $d_data_inserimento_idpr[$num_idpr] or ...
if ($n_appartamento != "") {
$appartamento = $n_appartamento;
} else {
$appartamento = risul_query($dati_prenota_idpr[$id_prenota], 0, 'idappartamenti');
}
if ($n_numpersone != "") {
$numpersone = $n_numpersone;
} else {
$numpersone = risul_query($dati_prenota_idpr[$id_prenota], 0, 'num_persone');
}
if (!$numpersone) {
$numpersone = 0;
}
if ($n_assegnazioneapp != "") {
$assegnazioneapp = $n_assegnazioneapp;
} else {
$assegnazioneapp = risul_query($dati_prenota_idpr[$id_prenota], 0, 'assegnazioneapp');
}
if ($n_lista_app != "") {
$lista_app = $n_lista_app;
} else {
$lista_app = risul_query($dati_prenota_idpr[$id_prenota], 0, 'app_assegnabili');
}
if ($n_inizioperiodo != "") {
$inizioperiodo = $n_inizioperiodo;
} else {
$inizioperiodo = risul_query($dati_prenota_idpr[$id_prenota], 0, 'iddatainizio');
}
if ($n_fineperiodo != "") {
$fineperiodo = $n_fineperiodo;
} else {
$fineperiodo = risul_query($dati_prenota_idpr[$id_prenota], 0, 'iddatafine');
}
}
# fine else if ($num_dati_prenota == 0)
if ($n_stima_checkin) {
$n_stima_checkin = aggslashdb($n_stima_checkin);
if ($priv_mod_checkin != "s") {
$inserire = "NO";
}
if (!preg_match("/[0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:00/", $n_stima_checkin)) {
$inserire = "NO";
} else {
$id_stima_checkin = esegui_query("select idperiodi from {$tableperiodi} where datainizio <= '" . substr($n_stima_checkin, 0, 10) . "' and datafine > '" . substr($n_stima_checkin, 0, 10) . "' ");
if (numlin_query($id_stima_checkin) == 1) {
$id_stima_checkin = risul_query($id_stima_checkin, 0, 'idperiodi');
if ($id_stima_checkin > $fineperiodo + 1) {
$inserire = "NO";
}
if ($id_stima_checkin < $inizioperiodo) {
$inserire = "NO";
}
} else {
$inserire = "NO";
}
if ($d_checkin) {
$inserire = "NO";
}
}
# fine else if (!preg_match("/[0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:00/",$n_stima_checkin))
}
# fine if ($n_stima_checkin)
$appartamento_esistente = esegui_query("select idappartamenti,maxoccupanti from {$tableappartamenti} where idappartamenti = '{$appartamento}'");
if (numlin_query($appartamento_esistente) != 1 and $n_appartamento) {
$inserire = "NO";
} else {
$maxoccupanti = risul_query($appartamento_esistente, 0, 'maxoccupanti');
if ($maxoccupanti and $numpersone > $maxoccupanti and $n_numpersone) {
$inserire = "NO";
}
}
# fine else if (numlin_query($appartamento_esistente) != 1)
$appartamento_chiuso = esegui_query("select idregole from {$tableregole} where iddatainizio <= '{$fineperiodo}' and iddatafine >= '{$inizioperiodo}' and app_agenzia = '{$appartamento}' and motivazione2 = 'x' ");
if (numlin_query($appartamento_chiuso)) {
$inserire = "NO";
}
if ($assegnazioneapp == "c" and str_replace("," . $appartamento . ",", "", "," . $lista_app . ",") == "," . $lista_app . "," and ($n_appartamento or $n_assegnazioneapp or $n_lista_app)) {
$inserire = "NO";
}
if ($attiva_regole1_consentite == "s" and ($n_appartamento != "" or $n_assegnazioneapp != "" or $n_lista_app != "")) {
unset($appartameti_in_lista);
if ($assegnazioneapp != "k" and $assegnazioneapp != "c") {
$inserire = "NO";
}
if ($assegnazioneapp == "k") {
$appartameti_in_lista[0] = $appartamento;
}
if ($assegnazioneapp == "c") {
$appartameti_in_lista = explode(",", $lista_app);
}
for ($n_lista = 0; $n_lista < count($appartameti_in_lista); $n_lista++) {
$appartamento_lista = $appartameti_in_lista[$n_lista];
$motivazioni_regola1 = esegui_query("select motivazione,iddatainizio,iddatafine from {$tableregole} where iddatainizio <= '{$fineperiodo}' and iddatafine >= '{$inizioperiodo}' and app_agenzia = '{$appartamento_lista}' and (motivazione2 != 'x' or motivazione2 is NULL) order by iddatainizio");
if (numlin_query($motivazioni_regola1) == 0) {
$inserire = "NO";
} else {
unset($motivazioni_consentite);
for ($num2 = 0; $num2 < count($regole1_consentite); $num2++) {
$motivazioni_consentite[$regole1_consentite[$num2]] = "SI";
}
$iddatainizio_regole_tot = risul_query($motivazioni_regola1, 0, 'iddatainizio');
$iddatafine_regole_tot = risul_query($motivazioni_regola1, 0, 'iddatafine');
$motivazione = risul_query($motivazioni_regola1, 0, 'motivazione');
if (!$motivazione) {
$motivazione = " ";
}
if (!$motivazioni_consentite[$motivazione]) {
$inserire = "NO";
}
for ($num2 = 1; $num2 < numlin_query($motivazioni_regola1); $num2++) {
$motivazione = risul_query($motivazioni_regola1, $num2, 'motivazione');
if (!$motivazione) {
$motivazione = " ";
}
if (!$motivazioni_consentite[$motivazione]) {
$inserire = "NO";
}
$iddatainizio_regola = risul_query($motivazioni_regola1, $num2, 'iddatainizio');
if ($iddatainizio_regola == $iddatafine_regole_tot + 1) {
$iddatafine_regole_tot = risul_query($motivazioni_regola1, $num2, 'iddatafine');
} else {
$inserire = "NO";
}
}
# fine for $num2
if ($iddatainizio_regole_tot > $inizioperiodo or $iddatafine_regole_tot < $fineperiodo) {
$inserire = "NO";
}
}
# fine else if (numlin_query($motivazioni_regola1) == 0)
}
# fine for $n_lista
}
# fine if ($attiva_regole1_consentite == "s" and...
if ($dati_da_anno_prec == "SI") {
passa_var_a_anno_prec($id_prenota, $tableperiodi, $tableprenota, $tablecostiprenota, $d_id_data_inizio, $d_id_data_fine, $n_fineperiodo, $inizioperiodo, $fineperiodo, $lunghezza_periodo, $dati_prenota_modifica);
}
if ($n_nometipotariffa != "") {
$trovata_tariffa = "NO";
$dati_tariffe = dati_tariffe($tablenometariffe, "", "", $tableregole);
for ($numtariffa = 1; $numtariffa <= $dati_tariffe['num']; $numtariffa++) {
$tariffa = "tariffa" . $numtariffa;
$nometariffa = $dati_tariffe[$tariffa]['nome'];
if ($n_nometipotariffa == $tariffa or $n_nometipotariffa == $nometariffa) {
$trovata_tariffa = "SI";
$n_tipotariffa = $tariffa;
$n_tipotariffa_idpr[$id_prenota] = $n_tipotariffa;
}
# fine if ($n_nometipotariffa == $tariffa or $n_nometipotariffa == $nometariffa)
}
# fine for $numtariffa
if ($attiva_tariffe_consentite == "s" and $tariffe_consentite_vett[substr($n_tipotariffa, 7)] != "SI" and $n_nometipotariffa != $d_nome_tariffa_idpr[$id_prenota] or $trovata_tariffa == "NO") {
$inserire = "NO";
}
for ($num2 = $inizioperiodo; $num2 <= $fineperiodo; $num2++) {
$rigasettimana = esegui_query("select * from {$tableperiodi} where idperiodi = '{$num2}' ");
$esistetariffa = risul_query($rigasettimana, 0, $n_tipotariffa);
$esistetariffap = risul_query($rigasettimana, 0, $n_tipotariffa . "p");
if ((!strcmp($esistetariffa, "") or $esistetariffa < 0) and (!strcmp($esistetariffap, "") or $esistetariffap < 0)) {
$inserire = "NO";
}
if ($n_nometipotariffa != $d_nome_tariffa_idpr[$id_prenota] and $dati_tariffe[$n_tipotariffa]['chiusa'][$num2]) {
$inserire = "NO";
}
}
# fine for $num2
}
# fine if ($n_nometipotariffa != "")
if ($priv_mod_date != "s" and ($n_inizioperiodo != "" or $n_fineperiodo != "")) {
$inserire = "NO";
}
if ($priv_ins_periodi_passati != "s" and $inizioperiodo < $d_id_data_inizio) {
$id_periodo_corrente = calcola_id_periodo_corrente($anno);
if ($id_periodo_corrente >= $inizioperiodo) {
$inserire = "NO";
}
}
# fine if ($priv_ins_periodi_passati != "s" and $inizioperiodo < $d_id_data_inizio)
#if ($n_numpersone != "" and $priv_mod_num_persone != "s") $inserire = "NO";
if ($n_numpersone and controlla_num_pos($n_numpersone) != "SI") {
$inserire = "NO";
}
if ($priv_mod_commento != "s" and ($n_commento != "" or $n_cancella_commento)) {
$inserire = "NO";
}
if (strcmp($n_sconto, "") and ($priv_mod_sconto != "s" or controlla_soldi($n_sconto) == "NO")) {
$inserire = "NO";
}
if (strcmp($n_caparra, "")) {
if ($priv_mod_caparra != "s" or controlla_soldi($n_caparra, "SI") == "NO") {
$inserire = "NO";
}
if ($n_caparra > $n_costo_tot) {
$inserire = "NO";
}
}
# fine if (strcmp($n_caparra,""))
if (strcmp($n_commissioni, "") and ($priv_mod_caparra != "s" or controlla_soldi($n_commissioni, "SI") == "NO")) {
$inserire = "NO";
}
if ($costi_aggiuntivi_modificati_int) {
$costi_aggiuntivi_modificati = explode("#@&", $costi_aggiuntivi_modificati_int);
for ($numca = 0; $numca < $dati_cap['num']; $numca++) {
$num_costo_mod = "NO";
for ($num2 = 0; $num2 < count($costi_aggiuntivi_modificati); $num2++) {
$costo_agg_modificato = explode("#?&", $costi_aggiuntivi_modificati[$num2]);
if ($costo_agg_modificato[0] == $dati_cap[$numca]['id']) {
$num_costo_mod = $num2;
}
}
# fine for $num2
$costo_agg_modificato = explode("#?&", $costi_aggiuntivi_modificati[$num_costo_mod]);
if ($costo_agg_modificato[1] != "cancella") {
$num_costo = $dati_ca['id'][$dati_cap[$numca]['idntariffe']];
if ($dati_ca[$num_costo]['id'] == $dati_cap[$numca]['idntariffe'] and $dati_cap[$numca]['nome'] == $dati_ca[$num_costo]['nome'] and $dati_ca[$num_costo]['numlimite']) {
$num_limite = (string) $dati_ca[$num_costo]['numlimite'];
} else {
$num_limite = (string) 0;
}
if ((string) $num_costo_mod != (string) "NO") {
$settimane_costo = $costo_agg_modificato[1];
$moltiplica = $costo_agg_modificato[2];
} else {
$settimane_costo = $dati_cap[$numca]['settimane'];
$moltiplica = $dati_cap[$numca]['moltiplica_costo'];
}
# fine else if ((string) $num_costo_mod != (string) "NO")
if (controlla_num_limite_costo($tablecostiprenota, $tableprenota, $dati_cap, $numca, $num_costi_presenti, $inizioperiodo, $fineperiodo, $settimane_costo, $moltiplica, $num_limite, $tra_anni) == "NO") {
$inserire = "NO";
}
if (str_replace(",{$appartamento},", "", "," . $dati_cap[$numca]['appincompatibili'] . ",") != "," . $dati_cap[$numca]['appincompatibili'] . ",") {
$inserire = "NO";
}
}
# fine if ($costo_agg_modificato[1] != "cancella")
if ($dati_cap[$numca]['tipo_beniinv']) {
if ($costo_agg_modificato[1] != "cancella") {
$num_ripetizioni_costo = "";
} else {
$num_ripetizioni_costo = "0";
}
$risul = controlla_beni_inventario_costo($tablerelinventario, $dati_cap, $numca, $beniinv_presenti, $num_ripetizioni_costo, "SI", $inizioperiodo, $fineperiodo, $settimane_costo, $moltiplica, $appartamento);
if ($risul != "SI") {
$inserire = "NO";
}
if ($num_ripetizioni_costo != $dati_cap[$numca]['beniinv_ripeti']) {
$beniinv_vett = explode(";", $dati_cap[$numca]['beniinv_orig']);
$num_ripetizioni_costo_mod_idpr[$id_prenota][$num_costo_mod] = $num_ripetizioni_costo . substr($dati_cap[$numca]['beniinv_orig'], strlen($beniinv_vett[0]));
}
# fine if ($num_ripetizioni_costo != $dati_cap[$numca]['beniinv_ripeti'])
}
# fine if ($dati_cap[$numca]['tipo_beniinv'])
}
# fine for $numca
}
# fine if ($costi_aggiuntivi_modificati_int)
if ($costi_aggiuntivi_da_inserire_int) {
$costi_aggiuntivi_da_inserire = explode("#@&", $costi_aggiuntivi_da_inserire_int);
for ($num2 = 0; $num2 < count($costi_aggiuntivi_da_inserire); $num2++) {
$costo_agg_da_inserire = explode("#?&", $costi_aggiuntivi_da_inserire[$num2]);
$num_costo = $dati_ca['id'][$costo_agg_da_inserire[9]];
if ($costo_agg_da_inserire[9] != $dati_ca[$num_costo]['id'] and $costo_agg_da_inserire[9] != "-1") {
$inserire = "NO";
} elseif (controlla_num_limite_costo($tablecostiprenota, $tableprenota, $dati_ca, $num_costo, $num_costi_presenti, $inizioperiodo, $fineperiodo, $costo_agg_da_inserire[6], $costo_agg_da_inserire[7], "", $tra_anni) == "NO") {
$inserire = "NO";
}
if (str_replace(",{$appartamento},", "", "," . $dati_ca[$num_costo]['appincompatibili'] . ",") != "," . $dati_ca[$num_costo]['appincompatibili'] . ",") {
$inserire = "NO";
}
if ($dati_ca[$num_costo]['tipo_beniinv']) {
$num_ripetizioni_costo_ins_idpr[$id_prenota][$num2] = "";
$risul = controlla_beni_inventario_costo($tablerelinventario, $dati_ca, $num_costo, $beniinv_presenti, $num_ripetizioni_costo_ins_idpr[$id_prenota][$num2], "SI", $inizioperiodo, $fineperiodo, $costo_agg_da_inserire[6], $costo_agg_da_inserire[7], $appartamento);
if ($risul != "SI") {
$inserire = "NO";
}
}
# fine if ($dati_ca[$num_costo]['tipo_beniinv'])
}
# fine for $num2
}
# fine if ($costi_aggiuntivi_da_inserire_int)
if ($dati_da_anno_prec == "SI") {
passa_var_a_anno_corr($id_prenota, $tableperiodi, $tableprenota, $tablecostiprenota, $d_id_data_inizio, $d_id_data_fine, $n_fineperiodo, $inizioperiodo, $fineperiodo, $lunghezza_periodo);
}
if ($priv_mod_caparra != "s" and $n_met_paga_caparra) {
$inserire = "NO";
}
if ($n_met_paga_caparra or ${"metodo_pagamento" . $id_prenota}) {
if (get_magic_quotes_gpc()) {
${"metodo_pagamento" . $id_prenota} = stripslashes(${"metodo_pagamento" . $id_prenota});
}
${"metodo_pagamento" . $id_prenota} = htmlspecialchars(${"metodo_pagamento" . $id_prenota});
$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);
if ($n_met_paga_caparra) {
$metodo_trovato = "NO";
for ($num1 = 0; $num1 < count($metodi_pagamento); $num1++) {
if ($metodi_pagamento[$num1] == $n_met_paga_caparra) {
$metodo_trovato = "SI";
}
}
if ($metodo_trovato == "NO") {
$inserire = "NO";
}
}
# fine if ($n_met_paga_caparra)
if (${"metodo_pagamento" . $id_prenota}) {
$metodo_trovato = "NO";
for ($num1 = 0; $num1 < count($metodi_pagamento); $num1++) {
if ($metodi_pagamento[$num1] == ${"metodo_pagamento" . $id_prenota}) {
$metodo_trovato = "SI";
}
}
if ($metodo_trovato == "NO") {
$inserire = "NO";
}
}
# fine if (${"metodo_pagamento".$id_prenota})
}
# fine if ($n_met_paga_caparra or ${"metodo_pagamento".$id_prenota})
if ($priv_mod_pagato == "n" and $n_confermato != "") {
$inserire = "NO";
}
if ($n_confermato and $n_confermato != "S" and $n_confermato != "N") {
$inserire = "NO";
}
if ($priv_mod_pagato != "s" and $n_pagato != "") {
$inserire = "NO";
}
if ($n_pagato and controlla_soldi($n_pagato, "SI") == "NO" or $n_pagato > $n_costo_tot) {
$inserire = "NO";
}
if ($inserire == "NO") {
break;
}
}
# fine for $num_idpr
if ($priv_mod_orig_prenota != "s" and $n_origine_prenota) {
$inserire = "NO";
}
if ($n_origine_prenota) {
if (get_magic_quotes_gpc()) {
$n_origine_prenota = stripslashes($n_origine_prenota);
}
$n_origine_prenota = htmlspecialchars($n_origine_prenota);
$origini_prenota = esegui_query("select valpersonalizza from {$tablepersonalizza} where idpersonalizza = 'origini_prenota' and idutente = '{$id_utente}'");
$origini_prenota = risul_query($origini_prenota, 0, 'valpersonalizza');
$origini_prenota = explode(",", $origini_prenota);
$origine_trovata = "NO";
for ($num1 = 0; $num1 < count($origini_prenota); $num1++) {
if ($origini_prenota[$num1] == $n_origine_prenota) {
$origine_trovata = "SI";
}
}
if ($origine_trovata == "NO") {
$inserire = "NO";
}
}
# fine if ($n_origine_prenota)
if ($id_nuovo_utente_inserimento != "" and $id_utente == 1) {
$id_nuovo_utente_inserimento = aggslashdb($id_nuovo_utente_inserimento);
$verifica_utente = esegui_query("select * from {$tableutenti} where idutenti = '{$id_nuovo_utente_inserimento}'");
if (numlin_query($verifica_utente) != 1) {
$inserire = "NO";
}
}
# fine if ($id_nuovo_utente_inserimento != "" and $id_utente == 1)
if ($n_commento != "") {
if (get_magic_quotes_gpc()) {
$n_commento = stripslashes($n_commento);
}
$n_commento = htmlspecialchars($n_commento);
}
# fine if ($n_commento != "")
}
# fine if ($inserire != "NO")
if ($inserire != "NO") {
# funzione: se ritorna $prenota_comp vuota sono tutte vicine
function controlla_prenota_vicine(&$prenota_comp, $dati_app, $app_prenota_id)
{
if ($prenota_comp) {
$prenota_comp_vett = explode(",", $prenota_comp);
$num_prenota_comp = count($prenota_comp_vett);
$prenota_comp = substr(str_replace("," . $prenota_comp_vett[0] . ",", ",", ",{$prenota_comp},"), 1, -1);
$app_corr = $app_prenota_id[$prenota_comp_vett[0]];
$num_vic = 0;
for ($num1 = 1; $num1 < $num_prenota_comp; $num1++) {
$app_vicini = $dati_app["vicini"][$app_prenota_id[$prenota_comp_vett[$num1]]];
if (str_replace(",{$app_corr},", "", ",{$app_vicini},") != ",{$app_vicini},") {
$prenota_comp = substr(str_replace("," . $prenota_comp_vett[$num1] . ",", ",", ",{$prenota_comp},"), 1, -1);
$pren_vicina[$num_vic] = $prenota_comp_vett[$num1];
$num_vic++;
}
# fine (str_replace(",$app_corr,","",",$app_vicini,") != ",$app_vicini,")
}
# fine for $num1
for ($num1 = 0; $num1 < $num_vic; $num1++) {
if (!$prenota_comp) {
break;
}
$prenota_comp = $pren_vicina[$num1] . "," . $prenota_comp;
controlla_prenota_vicine($prenota_comp, $dati_app, $app_prenota_id);
}
# fine for $num1
}
# fine if ($prenota_comp)
}
# fine function controlla_prenota_vicine
# aggiorno le posizioni e faccio i controlli.
if ($tableprenota_da_aggiornare) {
if (!function_exists("tab_a_var")) {
include "./includes/liberasettimane.php";
}
unset($limiti_var);
unset($app_prenota_id);
unset($app_orig_prenota_id);
unset($inizio_prenota_id);
unset($fine_prenota_id);
unset($app_assegnabili_id);
unset($prenota_in_app_sett);
unset($dati_app);
unset($profondita);
if ($id_per_corr_finto != "") {
$limiti_var['idperiodocorrente'] = $id_per_corr_finto;
}
$limiti_var['n_ini'] = 0;
$max_periodo = esegui_query("select max(idperiodi) from {$tableperiodi}");
$max_periodo = risul_query($max_periodo, 0, 0);
$limiti_var['n_fine'] = $max_periodo;
$minuti_durata_insprenota = esegui_query("select valpersonalizza_num from {$tablepersonalizza} where idpersonalizza = 'minuti_durata_insprenota' and idutente = '1'");
$minuti_durata_insprenota = risul_query($minuti_durata_insprenota, 0, 'valpersonalizza_num');
$limiti_var['lim_prenota_temp'] = aggslashdb(date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600 - $minuti_durata_insprenota * 60));
esegui_query("delete from {$tableprenota} where idclienti = '0' and datainserimento < '" . $limiti_var['lim_prenota_temp'] . "'", "", 1);
$profondita['iniziale'] = "";
$profondita['attuale'] = 1;
$max_prenota = esegui_query("select max(idprenota) from {$tableprenota}");
if (numlin_query($max_prenota) != 0) {
$tot_prenota = risul_query($max_prenota, 0, 0);
} else {
$tot_prenota = 0;
}
$profondita['tot_prenota_ini'] = $tot_prenota;
$profondita['tot_prenota_attuale'] = $tot_prenota;
tab_a_var($limiti_var, $app_prenota_id, $app_orig_prenota_id, $inizio_prenota_id, $fine_prenota_id, $app_assegnabili_id, $prenota_in_app_sett, $anno, $dati_app, $profondita, $PHPR_TAB_PRE . "prenota");
# Sposto gli appartamenti presenti in $spostamenti se possibile
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
for ($num1 = $inizio_prenota_id[$id_prenota]; $num1 <= $fine_prenota_id[$id_prenota]; $num1++) {
$prenota_in_app_sett[$app_prenota_id[$id_prenota]][$num1] = "";
}
# fine for $num1
}
# fine for $num_idpr
$num_spostamenti = count($spostamenti);
for ($num1 = 0; $num1 < $num_spostamenti; $num1++) {
$idprenota_cambiata = $spostamenti[$num1];
$app_cambiato = $spostamenti[$num1 + 1];
$applicare_cambio[$num1] = "NO";
if ($inizio_prenota_id[$idprenota_cambiata]) {
$applicare_cambio[$num1] = "SI";
if (!$app_assegnabili_id[$idprenota_cambiata]) {
$applicare_cambio[$num1] = "NO";
}
if ($app_assegnabili_id[$idprenota_cambiata] and $app_assegnabili_id[$idprenota_cambiata] != "v") {
$lista_app_assegnabili = "," . $app_assegnabili_id[$idprenota_cambiata] . ",";
if (str_replace("," . $app_cambiato . ",", "", $lista_app_assegnabili) == $lista_app_assegnabili) {
$applicare_cambio[$num1] = "NO";
}
}
# fine if ($app_assegnabili_id[$idprenota_cambiata] and...
if (str_replace("," . $app_cambiato . ",", "", $dati_app['lista']) == $dati_app['lista']) {
$applicare_cambio[$num1] = "NO";
}
if ($applicare_cambio[$num1] == "SI") {
for ($num2 = $inizio_prenota_id[$idprenota_cambiata]; $num2 <= $fine_prenota_id[$idprenota_cambiata]; $num2++) {
$prenota_in_app_sett[$app_prenota_id[$idprenota_cambiata]][$num2] = "";
}
# fine for $num2
$app_prenota_id[$idprenota_cambiata] = $app_cambiato;
}
# fine if ($applicare_cambio[$num1] == "SI")
}
# fine if ($inizio_prenota_id[$idprenota_cambiata])
$num1++;
}
# fine for $num1
for ($num1 = 0; $num1 < $num_spostamenti; $num1++) {
$idprenota_cambiata = $spostamenti[$num1];
if ($applicare_cambio[$num1] == "SI") {
for ($num2 = $inizio_prenota_id[$idprenota_cambiata]; $num2 <= $fine_prenota_id[$idprenota_cambiata]; $num2++) {
if ($prenota_in_app_sett[$app_prenota_id[$idprenota_cambiata]][$num2]) {
$inserire = "NO";
} else {
$prenota_in_app_sett[$app_prenota_id[$idprenota_cambiata]][$num2] = $idprenota_cambiata;
}
}
# fine for $num2
if ($inserire == "NO") {
break;
}
}
# fine if ($applicare_cambio[$num1] == "SI")
$num1++;
}
# fine for $num1
# Aggiorno la prenotazione e faccio i primi controlli sulla prenotazione modificata
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$n_appartamento = $n_appartamento_idpr[$id_prenota];
$n_assegnazioneapp = $n_assegnazioneapp_idpr[$id_prenota];
$n_lista_app = $n_lista_app_idpr[$id_prenota];
$n_numpersone = $n_numpersone_idpr[$id_prenota];
if ($n_appartamento != "") {
$app_prenota_id[$id_prenota] = $n_appartamento;
}
if ($n_inizioperiodo != "") {
$inizio_prenota_id[$id_prenota] = $n_inizioperiodo;
}
if ($n_fineperiodo != "") {
$fine_prenota_id[$id_prenota] = $n_fineperiodo;
}
for ($num1 = $inizio_prenota_id[$id_prenota]; $num1 <= $fine_prenota_id[$id_prenota]; $num1++) {
if ($prenota_in_app_sett[$app_prenota_id[$id_prenota]][$num1]) {
$inserire = "NO";
} else {
$prenota_in_app_sett[$app_prenota_id[$id_prenota]][$num1] = $id_prenota;
}
}
# fine for $num1
if ($n_assegnazioneapp == "v") {
$app_assegnabili_id[$id_prenota] = $dati_app['lista'];
}
if ($n_assegnazioneapp == "k") {
$app_assegnabili_id[$id_prenota] = "";
}
if ($n_assegnazioneapp == "c" and $n_lista_app) {
$app_assegnabili_id[$id_prenota] = "," . $n_lista_app . ",";
}
$assegnazione_app = risul_query($dati_prenota_idpr[$id_prenota], 0, 'assegnazioneapp');
if (!$n_assegnazioneapp and $assegnazione_app == "c" and $n_lista_app) {
$app_assegnabili_id[$id_prenota] = "," . $n_lista_app . ",";
}
if ($n_numpersone) {
$num_persone_prenota = $n_numpersone;
} else {
$num_persone_prenota = risul_query($dati_prenota_idpr[$id_prenota], 0, 'num_persone');
}
if ($num_persone_prenota and $dati_app['maxocc'][$app_prenota_id[$id_prenota]] and $dati_app['maxocc'][$app_prenota_id[$id_prenota]] < $num_persone_prenota) {
$inserire = "NO";
}
if (str_replace("," . $app_prenota_id[$id_prenota] . ",", "", $dati_app['lista']) == $dati_app['lista']) {
$inserire = "NO";
}
if ($app_assegnabili_id[$id_prenota] and $app_assegnabili_id[$id_prenota] != "v") {
$lista_app_assegnabili = "," . $app_assegnabili_id[$id_prenota] . ",";
if (str_replace("," . $app_prenota_id[$id_prenota] . ",", "", $lista_app_assegnabili) == $lista_app_assegnabili) {
$inserire = "NO";
}
}
# fine if ($app_assegnabili_id[$id_prenota] and...
if (str_replace("," . $app_prenota_id[$id_prenota] . ",", "", $dati_app['lista']) == $dati_app['lista']) {
$inserire = "NO";
}
}
# fine for $num_idpr
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$d_appartamento = $d_appartamento_idpr[$id_prenota];
$d_checkin = $d_checkin_idpr[$id_prenota];
$d_checkout = $d_checkout_idpr[$id_prenota];
$d_prenota_comp = $d_prenota_comp_idpr[$id_prenota];
$prenota_comp = $prenota_comp_idpr[$id_prenota];
$prenota_comp_copia = $prenota_comp;
if ($prenota_comp_copia != "") {
$prenota_comp_copia = $id_prenota . "," . $prenota_comp_copia;
}
controlla_prenota_vicine($prenota_comp_copia, $dati_app, $app_prenota_id);
if ($prenota_comp_copia) {
$inserire = "NO";
}
$prenota_comp_control = $prenota_comp;
if ($d_prenota_comp and $prenota_comp_control) {
$prenota_comp_control .= ",";
}
$prenota_comp_control .= $d_prenota_comp;
for ($num1 = 0; $num1 < $num_spostamenti; $num1++) {
$idprenota_cambiata = $spostamenti[$num1];
if ($app_assegnabili_id[0][$idprenota_cambiata]) {
if (str_replace(",{$idprenota_cambiata},", "", ",{$prenota_comp_control},") == ",{$prenota_comp_control},") {
$prenota_comp_copia = $app_assegnabili_id[0][$idprenota_cambiata];
if ($prenota_comp_copia != "") {
$prenota_comp_copia = $idprenota_cambiata . "," . $prenota_comp_copia;
}
controlla_prenota_vicine($prenota_comp_copia, $dati_app, $app_prenota_id);
if ($prenota_comp_copia) {
$inserire = "NO";
} else {
$prenota_comp_control .= "," . $app_assegnabili_id[0][$idprenota_cambiata];
}
if (substr($prenota_comp_control, 0, 1) == ",") {
$prenota_comp_control = substr($prenota_comp_control, 1);
}
}
# fine if (str_replace(",$idprenota_cambiata,","",",$prenota_comp_control,") == ",$prenota_comp_control,")
}
# fine if ($app_assegnabili_id[0][$idprenota_cambiata])
}
# fine for $num1
if ($d_checkin and !$d_checkout and $app_prenota_id[$id_prenota] != $d_appartamento) {
$checkin_presente = esegui_query("select idprenota from {$tableprenota} where idappartamenti = '" . aggslashdb($app_prenota_id[$id_prenota]) . "' and checkin is not NULL and checkout is NULL");
if (numlin_query($checkin_presente) >= 1) {
$inserire = "NO";
echo mex("Non si è potuto spostare la prenotazione per la registrazione dell'entrata", $pag) . ".<br>";
}
# fine if (numlin_query($checkin_presente) >= 1)
}
# fine if ($d_checkin and !$d_checkout and...
}
# fine for $num_idpr
}
# fine if ($tableprenota_da_aggiornare)
}
# fine if ($inserire != "NO")
if ($inserire != "NO" and $tableprenota_da_aggiornare) {
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
if (strcmp($app_prenota_id[$id_prenota], "") and !strcmp($app_orig_prenota_id[$id_prenota], "")) {
$app_orig_prenota_id[$id_prenota] = $app_prenota_id[$id_prenota] . "x";
}
}
# fine for $num_idpr
$risul_agg = aggiorna_tableprenota($app_prenota_id, $app_orig_prenota_id, $tableprenota);
if (!$risul_agg) {
$inserire = "NO";
}
}
# fine if ($inserire != "NO" and $tableprenota_da_aggiornare)
if ($inserire == "NO") {
echo mex("La prenotazione", $pag) . " {$id_prenota} " . mex("<b>non è stata modificata</b> perchè la tabella prenotazioni è cambiata nel frattempo", $pag) . ".<br>";
unlock_tabelle($tabelle_lock);
} else {
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$d_id_utente_inserimento = $d_id_utente_inserimento_idpr[$id_prenota];
$d_app_eliminati_costi = $d_app_eliminati_costi_idpr[$id_prenota];
$d_prenota_comp = $d_prenota_comp_idpr[$id_prenota];
$n_costo_tot = $n_costo_tot_idpr[$id_prenota];
$n_appartamento = $n_appartamento_idpr[$id_prenota];
$n_assegnazioneapp = $n_assegnazioneapp_idpr[$id_prenota];
$n_lista_app = $n_lista_app_idpr[$id_prenota];
$n_app_eliminati_costi = $n_app_eliminati_costi_idpr[$id_prenota];
$n_numpersone = $n_numpersone_idpr[$id_prenota];
$n_nometipotariffa = $n_nometipotariffa_idpr[$id_prenota];
$n_costo_tariffa = $n_costo_tariffa_idpr[$id_prenota];
$costi_aggiuntivi_modificati_int = $costi_aggiuntivi_modificati_int_idpr[$id_prenota];
$costi_aggiuntivi_da_inserire_int = $costi_aggiuntivi_da_inserire_int_idpr[$id_prenota];
$n_sconto = $n_sconto_idpr[$id_prenota];
$n_caparra = $n_caparra_idpr[$id_prenota];
$n_commissioni = $n_commissioni_idpr[$id_prenota];
$n_tariffesettimanali = $n_tariffesettimanali_idpr[$id_prenota];
$prenota_comp = $prenota_comp_idpr[$id_prenota];
$n_pagato = $n_pagato_idpr[$id_prenota];
$n_confermato = $n_confermato_idpr[$id_prenota];
$id_utente_inserimento = $d_id_utente_inserimento;
if ($id_nuovo_utente_inserimento != "" and $id_utente == 1) {
esegui_query("update {$tableprenota} set utente_inserimento = '{$id_nuovo_utente_inserimento}' where idprenota = '{$id_prenota}' ");
esegui_query("update {$tablecostiprenota} set utente_inserimento = '{$id_nuovo_utente_inserimento}' where idprenota = '{$id_prenota}' ");
$id_utente_inserimento = $id_nuovo_utente_inserimento;
if ($prenota_in_anno_succ) {
esegui_query("update {$tableprenota_orig} set utente_inserimento = '{$id_nuovo_utente_inserimento}' where idprenota = '{$id_prenota_orig}' ");
esegui_query("update {$tablecostiprenota_orig} set utente_inserimento = '{$id_nuovo_utente_inserimento}' where idprenota = '{$id_prenota_orig}' ");
}
# fine if ($prenota_in_anno_succ)
}
# fine if ($id_nuovo_utente_inserimento != "" and $id_utente == 1)
if ($n_inizioperiodo != "") {
esegui_query("update {$tableprenota} set iddatainizio = '{$n_inizioperiodo}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_inizioperiodo != "")
if ($n_fineperiodo != "") {
esegui_query("update {$tableprenota} set iddatafine = '{$n_fineperiodo}' where idprenota = '{$id_prenota}' ");
if ($dati_da_anno_prec == "SI") {
passa_var_a_anno_prec($id_prenota, $tableperiodi, $tableprenota, $tablecostiprenota, $d_id_data_inizio, $d_id_data_fine, $n_fineperiodo, $inizioperiodo, $fineperiodo, $lunghezza_periodo, $dati_prenota_modifica);
esegui_query("update {$tableprenota} set iddatafine = '{$n_fineperiodo}' where idprenota = '{$id_prenota}' ");
passa_var_a_anno_corr($id_prenota, $tableperiodi, $tableprenota, $tablecostiprenota, $d_id_data_inizio, $d_id_data_fine, $n_fineperiodo, $inizioperiodo, $fineperiodo, $lunghezza_periodo);
}
# fine if ($dati_da_anno_prec == "SI")
if ($prenota_in_anno_succ) {
$n_data_fine = esegui_query("select datafine from {$tableperiodi} where idperiodi = '{$n_fineperiodo}'");
$n_data_fine = risul_query($n_data_fine, 0, 'datafine');
$data_succ_esistente = esegui_query("select idperiodi from {$tableperiodi_orig} where datafine <= '{$n_data_fine}'");
if (numlin_query($data_succ_esistente) < 1) {
esegui_query("delete from {$tableprenota_orig} where idprenota = '{$id_prenota_orig}'");
esegui_query("delete from {$tablecostiprenota_orig} where idprenota = '{$id_prenota_orig}'");
}
# fine if (numlin_query($data_succ_esistente) < 1)
}
# fine if ($prenota_in_anno_succ)
}
# fine if ($n_fineperiodo != "")
if ($n_stima_checkin) {
esegui_query("update {$tableprenota} set checkout = '{$n_stima_checkin}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_stima_checkin)
#if ($n_appartamento != "") {
#esegui_query("update $tableprenota set idappartamenti = '$n_appartamento' where idprenota = '$id_prenota' ");
#} # fine if ($n_appartamento != "")
if ($n_assegnazioneapp != "") {
esegui_query("update {$tableprenota} set assegnazioneapp = '{$n_assegnazioneapp}' where idprenota = '{$id_prenota}' ");
if ($n_assegnazioneapp == "v" or $n_assegnazioneapp == "k") {
esegui_query("update {$tableprenota} set app_assegnabili = '' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_assegnazioneapp == "v" ...)
}
# fine if ($n_assegnazioneapp != "")
if ($n_lista_app != "") {
esegui_query("update {$tableprenota} set app_assegnabili = '{$n_lista_app}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_lista_app != "")
if ($d_prenota_comp != $prenota_comp) {
esegui_query("update {$tableprenota} set idprenota_compagna = '{$prenota_comp}' where idprenota = '{$id_prenota}' ");
if ($d_prenota_comp) {
$d_prenota_comp_vett = explode(",", $d_prenota_comp);
$num_d_prenota_comp = count($d_prenota_comp_vett);
for ($num1 = 0; $num1 < $num_d_prenota_comp; $num1++) {
$d_pren_comp = aggslashdb($d_prenota_comp_vett[$num1]);
if (str_replace(",{$d_pren_comp},", "", ",{$prenota_comp},") == ",{$prenota_comp},") {
esegui_query("update {$tableprenota} set idprenota_compagna = '' where idprenota = '{$d_pren_comp}' ");
}
}
# fine for $num1
}
# fine if ($d_prenota_comp)
if ($prenota_comp) {
$prenota_comp_vett = explode(",", $prenota_comp);
$num_prenota_comp = count($prenota_comp_vett);
for ($num1 = 0; $num1 < $num_prenota_comp; $num1++) {
$pren_comp = aggslashdb($prenota_comp_vett[$num1]);
$prenota_comp2 = substr(str_replace(",{$pren_comp},", ",", ",{$prenota_comp},"), 1) . $id_prenota;
esegui_query("update {$tableprenota} set idprenota_compagna = '{$prenota_comp2}' where idprenota = '{$pren_comp}' ");
}
# fine for $num1
}
# fine if ($prenota_comp)
}
# fine if ($d_prenota_comp != $prenota_comp)
if ($dati_da_anno_prec == "SI") {
passa_var_a_anno_prec($id_prenota, $tableperiodi, $tableprenota, $tablecostiprenota, $d_id_data_inizio, $d_id_data_fine, $n_fineperiodo, $inizioperiodo, $fineperiodo, $lunghezza_periodo, $dati_prenota_modifica);
}
if ($n_numpersone != "") {
esegui_query("update {$tableprenota} set num_persone = '{$n_numpersone}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_numpersone != "")
if ($n_nometipotariffa != "") {
if (substr($n_costo_tariffa, -1) == "p") {
$n_costo_tariffa = substr($n_costo_tariffa, 0, -1) . "#@&p";
}
$n_tariffa = aggslashdb($n_nometipotariffa) . "#@&" . $n_costo_tariffa;
esegui_query("update {$tableprenota} set tariffa = '{$n_tariffa}' where idprenota = '{$id_prenota}' ");
if (!strcmp($dati_tariffe[$n_tipotariffa_idpr[$id_prenota]]['tasse_percent'], "")) {
esegui_query("update {$tableprenota} set tasseperc = NULL where idprenota = '{$id_prenota}' ");
} else {
esegui_query("update {$tableprenota} set tasseperc = '" . $dati_tariffe[$n_tipotariffa_idpr[$id_prenota]]['tasse_percent'] . "' where idprenota = '{$id_prenota}' ");
}
}
# fine if ($n_nometipotariffa != "")
if ($n_tariffesettimanali != "") {
$n_tariffesettimanali = aggslashdb($n_tariffesettimanali);
esegui_query("update {$tableprenota} set tariffesettimanali = '{$n_tariffesettimanali}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_tariffesettimanali != "")
if ($costi_aggiuntivi_modificati_int) {
$costi_aggiuntivi_modificati = explode("#@&", $costi_aggiuntivi_modificati_int);
for ($num2 = 0; $num2 < count($costi_aggiuntivi_modificati); $num2++) {
$costo_agg_modificato = explode("#?&", $costi_aggiuntivi_modificati[$num2]);
if ($costo_agg_modificato[1] == "cancella") {
esegui_query("delete from {$tablecostiprenota} where idcostiprenota = '" . $costo_agg_modificato[0] . "' and idprenota = '{$id_prenota}' ");
} else {
esegui_query("update {$tablecostiprenota} set settimane = '" . $costo_agg_modificato[1] . "', moltiplica = '" . $costo_agg_modificato[2] . "' where idcostiprenota = '" . $costo_agg_modificato[0] . "' and idprenota = '{$id_prenota}' ");
if ($num_ripetizioni_costo_mod_idpr[$id_prenota][$num2]) {
esegui_query("update {$tablecostiprenota} set varbeniinv = '" . $num_ripetizioni_costo_mod_idpr[$id_prenota][$num2] . "' where idcostiprenota = '" . $costo_agg_modificato[0] . "' and idprenota = '{$id_prenota}' ");
}
}
# fine else if ($costo_agg_modificato[1] == "cancella")
}
# fine for $num2
}
# fine if ($costi_aggiuntivi_modificati_int)
if ($costi_aggiuntivi_da_inserire_int) {
$costi_aggiuntivi_da_inserire = explode("#@&", $costi_aggiuntivi_da_inserire_int);
for ($num2 = 0; $num2 < count($costi_aggiuntivi_da_inserire); $num2++) {
$costo_agg_da_inserire = explode("#?&", $costi_aggiuntivi_da_inserire[$num2]);
$num_costo = $dati_ca['id'][$costo_agg_da_inserire[9]];
$datainserimento = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600);
$idcostiprenota = esegui_query("select max(idcostiprenota) from {$tablecostiprenota}");
$idcostiprenota = risul_query($idcostiprenota, 0, 0) + 1;
if ($costo_agg_da_inserire[15]) {
$costo_agg_da_inserire[15] = $num_ripetizioni_costo_ins_idpr[$id_prenota][$num2] . ";" . $costo_agg_da_inserire[15];
}
esegui_query("insert into {$tablecostiprenota} (idcostiprenota,idprenota,tipo,nome,valore,associasett,settimane,moltiplica,letto,idntariffe,varmoltiplica,varnumsett,varperiodipermessi,vartariffeassociate,vartariffeincomp,varbeniinv,varappincompatibili,variazione,categoria,datainserimento,hostinserimento,utente_inserimento) values ('{$idcostiprenota}','{$id_prenota}','" . $costo_agg_da_inserire[0] . "','" . aggslashdb($costo_agg_da_inserire[1]) . "','" . $costo_agg_da_inserire[2] . "','" . $costo_agg_da_inserire[5] . "','" . $costo_agg_da_inserire[6] . "','" . $costo_agg_da_inserire[7] . "','" . $costo_agg_da_inserire[8] . "','" . $costo_agg_da_inserire[9] . "','" . $costo_agg_da_inserire[10] . "','" . $costo_agg_da_inserire[11] . "','" . $costo_agg_da_inserire[12] . "','" . $costo_agg_da_inserire[13] . "','" . $costo_agg_da_inserire[14] . "','" . $costo_agg_da_inserire[15] . "','" . $costo_agg_da_inserire[16] . "','" . $costo_agg_da_inserire[17] . "','" . $costo_agg_da_inserire[18] . "','{$datainserimento}','{$HOSTNAME}','{$id_utente}')");
if (substr($costo_agg_da_inserire[0], 1, 1) != "f") {
esegui_query("update {$tablecostiprenota} set valore_perc = '" . $costo_agg_da_inserire[3] . "', arrotonda = '" . $costo_agg_da_inserire[4] . "' where idcostiprenota = '{$idcostiprenota}'");
}
if ($dati_ca[$num_costo]['tasseperc']) {
esegui_query("update {$tablecostiprenota} set tasseperc = '" . $dati_ca[$num_costo]['tasseperc'] . "' where idcostiprenota = '{$idcostiprenota}'");
}
}
# fine for $num2
}
# fine if ($costi_aggiuntivi_da_inserire_int)
# Se prenotazione da anno precedente copio i costi aggiuntivi anche nell'anno
# corrente per mantenere il limite dei costi in stesso periodo
if (($dati_da_anno_prec == "SI" or $prenota_in_anno_succ) and ($costi_aggiuntivi_modificati_int or $costi_aggiuntivi_da_inserire_int)) {
$idcostiprenota_orig = esegui_query("select max(idcostiprenota) from {$tablecostiprenota_orig}");
$idcostiprenota_orig = risul_query($idcostiprenota_orig, 0, 0) + 1;
$idcostiprenota_prec = esegui_query("select max(idcostiprenota) from {$tablecostiprenota_prec}");
$idcostiprenota_prec = risul_query($idcostiprenota_prec, 0, 0) + 1;
if ($idcostiprenota_orig > $idcostiprenota_prec) {
$max_idcostiprenota = $idcostiprenota_orig;
} else {
$max_idcostiprenota = $idcostiprenota_prec;
}
esegui_query("delete from {$tablecostiprenota_orig} where idprenota = '{$id_prenota_orig}'");
$costiprenota_prec = esegui_query("select * from {$tablecostiprenota_prec} where idprenota = '{$id_prenota_prec}'");
$num_costiprenota_prec = numlin_query($costiprenota_prec);
$max_idcostiprenota = $max_idcostiprenota + $num_costiprenota_prec + 1;
$diff_settimane = $fineperiodo - $fineperiodo_orig;
for ($num1 = 0; $num1 < $num_costiprenota_prec; $num1++) {
$idcostiprenota = risul_query($costiprenota_prec, $num1, 'idcostiprenota');
esegui_query("update {$tablecostiprenota_prec} set idcostiprenota = '{$max_idcostiprenota}' where idcostiprenota = '{$idcostiprenota}'");
esegui_query("insert into {$tablecostiprenota_orig} select * from {$tablecostiprenota_prec} where idcostiprenota = '{$max_idcostiprenota}' ");
esegui_query("update {$tablecostiprenota_prec} set idcostiprenota = '{$idcostiprenota}' where idcostiprenota = '{$max_idcostiprenota}'");
esegui_query("update {$tablecostiprenota_orig} set idcostiprenota = '{$idcostiprenota_orig}' where idcostiprenota = '{$max_idcostiprenota}'");
$settimane = risul_query($costiprenota_prec, $num1, 'settimane');
if (str_replace(",", "", $settimane) != $settimane) {
$settimane = explode(",", $settimane);
$settimane_nuove = ",";
for ($num2 = 1; $num2 < count($settimane) - 1; $num2++) {
$settimane_nuove .= $settimane[$num2] - $diff_settimane . ",";
}
esegui_query("update {$tablecostiprenota_orig} set settimane = '{$settimane_nuove}' where idcostiprenota = '{$idcostiprenota_orig}'");
}
# fine if (str_replace(",","",$settimane) != $settimane)
$idcostiprenota_orig++;
}
# fine for $num1
}
# fine if (($dati_da_anno_prec == "SI" or $prenota_in_anno_succ) and...
if ((string) $n_app_eliminati_costi != (string) $d_app_eliminati_costi) {
esegui_query("update {$tableprenota} set incompatibilita = '" . aggslashdb($n_app_eliminati_costi) . "' where idprenota = '{$id_prenota}' ");
}
# fine if ((string) $n_app_eliminati_costi != (string) $d_app_eliminati_costi)
if (strcmp($n_sconto, "")) {
esegui_query("update {$tableprenota} set sconto = '{$n_sconto}' where idprenota = '{$id_prenota}' ");
}
# fine if (strcmp($n_sconto,""))
if (strcmp($n_caparra, "")) {
esegui_query("update {$tableprenota} set caparra = '{$n_caparra}' where idprenota = '{$id_prenota}' ");
}
# fine if (strcmp($n_caparra,""))
if ($n_met_paga_caparra != "") {
esegui_query("update {$tableprenota} set metodo_pagamento = '" . aggslashdb($n_met_paga_caparra) . "' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_met_paga_caparra != "")
if (strcmp($n_commissioni, "")) {
esegui_query("update {$tableprenota} set commissioni = '{$n_commissioni}' where idprenota = '{$id_prenota}' ");
}
# fine if (strcmp($n_commissioni,""))
if ($n_origine_prenota != "") {
esegui_query("update {$tableprenota} set origine = '" . aggslashdb($n_origine_prenota) . "' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_origine_prenota != "")
if ($n_pagato != "") {
esegui_query("update {$tableprenota} set pagato = '{$n_pagato}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_pagato != "")
if ($n_confermato != "") {
esegui_query("update {$tableprenota} set conferma = '{$n_confermato}' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_confermato != "")
if ($n_commento != "" and ($tipo_commento == "checkin" or $tipo_commento == "checkout")) {
$n_comm_checkin = "";
$n_comm_checkout = "";
if ($tipo_commento == "checkin" and !$d_checkin_idpr[$id_prenota]) {
$n_comm_checkin = $n_commento;
}
if ($tipo_commento == "checkout" and !$d_checkout_idpr[$id_prenota]) {
$n_comm_checkout = $n_commento;
}
$n_comm = $d_commento;
if (strstr($n_comm, ">")) {
$n_comm = explode(">", $n_comm);
if (strcmp($n_comm[1], "")) {
if ($n_comm_checkin) {
$n_comm_checkin = $n_comm[1] . " - {$n_comm_checkin}";
} else {
$n_comm_checkin = $n_comm[1];
}
}
# fine if (strcmp($n_comm[1],""))
if (strcmp($n_comm[2], "")) {
if ($n_comm_checkout) {
$n_comm_checkout = $n_comm[2] . " - {$n_comm_checkout}";
} else {
$n_comm_checkout = $n_comm[2];
}
}
# fine if (strcmp($n_comm[2],""))
$n_comm = $n_comm[0];
}
# fine if (strstr($n_comm,">"))
if (strcmp($n_comm_checkin, "") or strcmp($n_comm_checkout, "")) {
$n_comm .= ">{$n_comm_checkin}>{$n_comm_checkout}";
}
esegui_query("update {$tableprenota} set commento = '" . aggslashdb($n_comm) . "' where idprenota = '{$id_prenota}' ");
}
# fine if ($n_commento != "" and ($tipo_commento == "checkin" or...
if ($n_commento != "" and $tipo_commento != "checkin" and $tipo_commento != "checkout" or $n_cancella_commento == "SI") {
$n_comm = $n_commento;
if ($n_cancella_commento == "SI") {
$n_comm = "";
}
if (strstr($d_commento, ">")) {
$n_comm = $n_comm . strstr($d_commento, ">");
}
esegui_query("update {$tableprenota} set commento = '" . aggslashdb($n_comm) . "' where idprenota = '{$id_prenota}' ");
}
# fine if (($n_commento != "" and $tipo_commento != "checkin" and $tipo_commento != "checkout") or...
$adesso = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600);
esegui_query("update {$tableprenota} set tariffa_tot = '{$n_costo_tot}', data_modifica = '{$adesso}' where idprenota = '{$id_prenota}' ");
if ($dati_da_anno_prec == "SI") {
passa_var_a_anno_corr($id_prenota, $tableperiodi, $tableprenota, $tablecostiprenota, $d_id_data_inizio, $d_id_data_fine, $n_fineperiodo, $inizioperiodo, $fineperiodo, $lunghezza_periodo);
}
}
# fine for $num_idpr
aggiorna_beniinv_presenti($tablerelinventario, $beniinv_presenti);
if ($tabelle_lock) {
unlock_tabelle($tabelle_lock);
}
if ($tableprenota_da_aggiornare or $n_inizioperiodo != "" or $n_fineperiodo != "") {
$lock = 1;
$aggiorna_disp = 1;
$aggiorna_tar = 0;
if (@function_exists('pcntl_fork')) {
include "./includes/interconnect/aggiorna_ic_fork.php";
} else {
include "./includes/interconnect/aggiorna_ic.php";
}
}
# fine if ($tableprenota_da_aggiornare or...
for ($num_idpr = 0; $num_idpr < $num_id_prenota; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$n_pagato = $n_pagato_idpr[$id_prenota];
if ($n_pagato != "") {
$datainserimento_saldo = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600);
$idcliente_saldo = risul_query($dati_prenota_idpr[$id_prenota], 0, 'idclienti');
$d_idinizioprenota = risul_query($dati_prenota_idpr[$id_prenota], 0, 'iddatainizio');
$d_idfineprenota = risul_query($dati_prenota_idpr[$id_prenota], 0, 'iddatafine');
if ($n_inizioperiodo != "") {
$idinizioperiodo_saldo = $n_inizioperiodo;
} else {
$idinizioperiodo_saldo = $d_idinizioprenota;
}
if ($n_fineperiodo != "") {
$idfineperiodo_saldo = $n_fineperiodo;
} else {
$idfineperiodo_saldo = $d_idfineprenota;
}
$motivazione_saldo = "{$idcliente_saldo};{$idinizioperiodo_saldo};{$idfineperiodo_saldo};{$id_prenota}";
$pagato_attuale = risul_query($dati_prenota_idpr[$id_prenota], 0, 'pagato');
if (!$pagato_attuale) {
$pagato_attuale = 0;
}
$saldo = $n_pagato - $pagato_attuale;
$metodo_pagamento = ${"metodo_pagamento" . $id_prenota};
$metodo_pagamento = aggslashdb($metodo_pagamento);
$tabelle_lock = array($tablesoldi);
$tabelle_lock = lock_tabelle($tabelle_lock);
$idsoldi = esegui_query("select max(idsoldi) from {$tablesoldi}");
$idsoldi = risul_query($idsoldi, 0, 0) + 1;
esegui_query("insert into {$tablesoldi} (idsoldi,motivazione,metodo_pagamento,saldo_prenota,soldi_prima,data_inserimento,utente_inserimento) values ('{$idsoldi}','{$motivazione_saldo}','{$metodo_pagamento}','{$saldo}','{$pagato_attuale}','{$datainserimento_saldo}','{$id_utente}')");
unlock_tabelle($tabelle_lock);
if (strcmp($cassa_pagamenti, "")) {
$tabelle_lock = array($tablecosti);
$altre_tab_lock = array($tableperiodi, $tableclienti);
$tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock);
if ($anno >= substr($datainserimento_saldo, 0, 4)) {
$costo0 = esegui_query("select * from {$tablecosti} where idcosti = '0' ");
$costo0 = risul_query($costo0, 0, 'val_costo');
$costo0 = (double) $costo0 + (double) $saldo;
esegui_query("update {$tablecosti} set val_costo = '{$costo0}' where idcosti = '0' ");
}
# fine if ($anno_saldo >= substr($datainserimento_saldo,0,4))
if (!$idinizioperiodo_saldo) {
$data_inizio_costo = "?";
} else {
$data_inizio_costo = esegui_query("select datainizio from {$tableperiodi} where idperiodi = '{$idinizioperiodo_saldo}' ");
$data_inizio_costo = formatta_data(risul_query($data_inizio_costo, 0, 'datainizio'), $stile_data);
}
# fine else if (!$idinizioperiodo_saldo)
$data_fine_costo = esegui_query("select datafine from {$tableperiodi} where idperiodi = '{$idfineperiodo_saldo}' ");
$data_fine_costo = formatta_data(risul_query($data_fine_costo, 0, 'datafine'), $stile_data);
$cognome_saldo = esegui_query("select cognome from {$tableclienti} where idclienti = '{$idcliente_saldo}' ");
$cognome_saldo = risul_query($cognome_saldo, 0, 'cognome');
$nome_costo = "" . mex("Prenotazione", $pag) . " {$id_prenota} " . mex("dal", $pag) . " {$data_inizio_costo} " . mex("al", $pag) . " {$data_fine_costo} " . mex("per", $pag) . " {$cognome_saldo}";
$idcosti = esegui_query("select max(idcosti) from {$tablecosti}");
$idcosti = risul_query($idcosti, 0, 0) + 1;
esegui_query("insert into {$tablecosti} (idcosti,nome_costo,val_costo,tipo_costo,nome_cassa,persona_costo,provenienza_costo,metodo_pagamento,datainserimento,hostinserimento,utente_inserimento) values ('{$idcosti}','" . aggslashdb($nome_costo) . "','{$saldo}','e','" . aggslashdb($cassa_pagamenti) . "','" . aggslashdb($nome_utente) . "','p','{$metodo_pagamento}','{$datainserimento_saldo}','{$HOSTNAME}','{$id_utente}') ");
unlock_tabelle($tabelle_lock);
}
# fine if (strcmp($cassa_pagamenti,""))
}
# fine if ($n_pagato != "")
}
# fine for $num_idpr
}
# fine else if ($inserire == "NO")
}
if (numlin_query($d_idapp)) $app_letto_idpr[$num_idpr] = 1;
else $app_letto_idpr[$num_idpr] = 0;
} # fine for $num_idpr
if ($modifica == "SI") {
$form_modifica_ospiti = "NO";
$continua = 1;
for ($num_idpr = 0 ; $num_idpr < $num_id_prenota ; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$num_ospiti_inviati = ${"num_ospiti_inviati".$id_prenota};
if (!strcmp($num_ospiti_inviati,"") or controlla_num_pos($num_ospiti_inviati) == "NO") $continua = 0;
} # fine for $num_idpr
if ($continua) {
$tabelle_lock = array($tablerclientiprenota,$tableclienti);
$altre_tab_lock = array($tableprenota,$tablepersonalizza);
$tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock);
for ($num_idpr = 0 ; $num_idpr < $num_id_prenota ; $num_idpr++) {
$id_prenota = $id_prenota_idpr[$num_idpr];
$idclienti = $idclienti_idpr[$id_prenota];
$num_persone_tot = $num_persone_tot_idpr[$num_idpr];
$num_ospiti_inviati = ${"num_ospiti_inviati".$id_prenota};
$principale = ${"principale".$id_prenota};
if ($num_ospiti_inviati > $num_persone_tot + 30) $num_ospiti_inviati = $num_persone_tot + 30;
}
# fine if ($attiva_tariffe_consentite == "n" or $tariffe_consentite_vett[$num_tariffa] == "SI")
unlock_tabelle($tabelle_lock);
}
# fine if ($cambia_nome_tariffa and strcmp($nometariffa,"") and $priv_mod_tariffe != "n")
# Inserisco i prezzi (della form da-a)
if (($inserisci or $modifica) and $priv_mod_tariffe != "n") {
$mostra_form_iniziale = "NO";
$mostra_ok = 1;
$tabelle_lock = array($tablenometariffe, $tableperiodi, $tablepersonalizza);
$tabelle_lock = lock_tabelle($tabelle_lock);
$inserire = "SI";
$rigatariffe = esegui_query("select * from {$tablenometariffe} where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe, 0, 'nomecostoagg');
# Controllo se i campi inseriti sono già presenti
if (substr($tipotariffa, 0, 7) != "tariffa" or controlla_num_pos(substr($tipotariffa, 7)) != "SI") {
$tipotariffa = "tariffa1";
}
$num_tariffa = substr($tipotariffa, 7);
$tipotariffa_vedi = mex("tariffa", $pag) . $num_tariffa;
if ($attiva_tariffe_consentite != "n" and $tariffe_consentite_vett[$num_tariffa] != "SI") {
$inserire = "NO";
}
if ($num_tariffa > $numero_tariffe) {
$inserire = "NO";
}
if ($numcaselle < 1 or $numcaselle > $numcaselle_max) {
$numcaselle = 8;
}
$ultime_sel_ins_prezzi = "{$numcaselle},{$anno}";
for ($numperiodo = 1; $numperiodo <= $numcaselle; $numperiodo = $numperiodo + 1) {
if ($regola_4) {
if (substr($tipotariffa, 0, 7) != "tariffa" or controlla_num_pos(substr($tipotariffa, 7)) == "NO") {
$inserire = "NO";
echo mex("Si deve scegliere la tariffa", $pag) . ".<br>";
} else {
$regola_esistente = esegui_query("select * from {$tableregole} where tariffa_per_persone = '" . aggslashdb($tipotariffa) . "'");
$num_regole_esistente = numlin_query($regola_esistente);
/*
if ($num_regole_esistente != 0) {
$inserire = "NO";
echo mex("La tariffa scelta ha già un numero di persone associato, cancella la regola prima di inserirne una nuova",$pag).".<br>";
} # fine if ($num_regole_esistente != 0)
*/
}
# fine else if (substr($tipotariffa,0,7) != "tariffa" or...
if (!$num_persone or controlla_num_pos($num_persone) != "SI") {
$inserire = "NO";
echo mex("Si deve inserire il numero di persone da associare", $pag) . ".<br>";
}
# fine if (!$num_persone or controlla_num_pos($num_persone) != "SI")
if ($inserire != "NO") {
if ($num_regole_esistente != 0) {
esegui_query("update {$tableregole} set iddatainizio = '" . aggslashdb($num_persone) . "' where tariffa_per_persone = '" . aggslashdb($tipotariffa) . "'");
echo mex("La regola di assegnazione", $pag) . " 4 " . mex("è stata modificata", $pag) . ".<br>";
} else {
$idregole = esegui_query("select max(idregole) from {$tableregole}");
$idregole = risul_query($idregole, 0, 0);
$idregole = $idregole + 1;
esegui_query("insert into {$tableregole} (idregole,tariffa_per_persone,iddatainizio) values ('{$idregole}','" . aggslashdb($tipotariffa) . "', '" . aggslashdb($num_persone) . "')");
echo mex("La regola di assegnazione", $pag) . " 4 " . mex("è stata inserita", $pag) . ".<br>";
}
<tr><td style=\"text-align: right;\">".mex("Protocollo",$pag).":</td><td>
<select name=\"proto_email_tm\"><option value=\"pop3\"$sel_pop3>pop3</option>
<option value=\"imap\"$sel_imap>imap</option>
<option value=\"pop3/ssl\"$sel_pop3_ssl>pop3 (ssl)</option>
<option value=\"imap/ssl\"$sel_imap_ssl>imap (ssl)</option></select></td></tr>
<tr><td style=\"text-align: right;\">".mex("Porta",$pag).":</td><td>
<label><input type=\"radio\" name=\"tipo_porta_email_tm\" value=\"def\"$check_tp_etm_def>".mex("default",$pag)."</label><br>
<label><input id=\"tp_etm_p\" type=\"radio\" name=\"tipo_porta_email_tm\" value=\"pers\"$check_tp_etm_pers>".mex("persoalizzata",$pag).":</label>
<input type=\"text\" name=\"porta_email_tm\" size=\"6\" value=\"$porta_email_tm\" onfocus=\"document.getElementById('tp_etm_p').checked='1'\"></td></tr>
<tr><td style=\"text-align: right;\">".mex("Nome utente",$pag).":</td><td>
<input type=\"text\" name=\"username_email_tm\" size=\"25\" value=\"$username_email_tm\"></td></tr>
<tr><td style=\"text-align: right;\">".mex("Password",$pag).":</td><td>
<input type=\"text\" name=\"password_email_tm\" size=\"25\" value=\"$password_email_tm\">
<small>(".mex("lasciare vuota per chiedere ogni volta",$pag).")</small></td></tr>
<tr><td valign=\"top\" style=\"text-align: right;\">".mex("Identificazione messaggi di richiesta",$pag).":</td><td>";
if (!$num_trova_email_tm or controlla_num_pos($num_trova_email_tm) == "NO") $num_trova_email_tm = 1;
for ($num1 = 0 ; $num1 < $num_trova_email_tm ; $num1++) {
if (${"therad_email_tm$num1"} == "tutti") {
$sel_ini = "";
$sel_tutti = " selected";
} # fine if (${"therad_email_tm$num1"} == "tutti")
else {
$sel_ini = " selected";
$sel_tutti = "";
} # fine else if (${"therad_email_tm$num1"} == "tutti")
echo "<select name=\"therad_email_tm$num1\"><option value=\"ini\"$sel_ini>".mex("Messaggio iniziale",$pag)."</option>
<option value=\"tutti\"$sel_tutti>".mex("Qualsiasi messaggio",$pag)."</option></select>
".mex("da",$pag)." <input type=\"text\" name=\"mittente_email_tm$num1\" value=\"".${"mittente_email_tm$num1"}."\" size=\"20\">
".mex("con oggetto contenete",$pag)." <input type=\"text\" name=\"oggetto_email_tm$num1\" value=\"".${"oggetto_email_tm$num1"}."\" size=\"18\"><br>";
} # fine for $num1
echo "<input type=\"hidden\" name=\"num_trova_email_tm\" value=\"$num_trova_email_tm\"></td><td valign=\"bottom\">";
function inserisci_prenotazione($inizioperiodo, $fineperiodo, $lista_app, $tipotariffa, $numpersone, $prenota_vicine, $idclienti, $conferma, $pagato, $caparra, $met_paga_caparra, $commissioni, $origine_prenota, $sconto, $giorno_stima_checkin, $ora_stima_checkin, $min_stima_checkin, $commento, &$stato, $anno, $PHPR_TAB_PRE, $ins_passato = "", $id_utente_imp = "", $id_prenota_imp = "", $tariffe_sett_imp = "", $ins_costi_agg = "")
{
global $id_utente, $HOSTNAME;
$PHPR_TAB_PRE = aggslashdb($PHPR_TAB_PRE);
$anno = aggslashdb($anno);
$tableprenota = $PHPR_TAB_PRE . "prenota" . $anno;
$tablecostiprenota = $PHPR_TAB_PRE . "costiprenota" . $anno;
$tableperiodi = $PHPR_TAB_PRE . "periodi" . $anno;
$tableregole = $PHPR_TAB_PRE . "regole" . $anno;
$tableappartamenti = $PHPR_TAB_PRE . "appartamenti";
$tablepersonalizza = $PHPR_TAB_PRE . "personalizza";
$tableclienti = $PHPR_TAB_PRE . "clienti";
$tablenometariffe = $PHPR_TAB_PRE . "ntariffe" . $anno;
if (!function_exists('tab_a_var')) {
include "./includes/liberasettimane.php";
}
if (!function_exists('dati_tariffe')) {
include "./includes/funzioni_tariffe.php";
}
include "./includes/sett_gio.php";
$Euro = nome_valuta();
$stile_soldi = stile_soldi();
$stile_data = stile_data();
$num_tipologie = count($inizioperiodo);
$appartamenti = esegui_query("select * from {$tableappartamenti} ");
$numappartamenti = numlin_query($appartamenti);
$id_app_richiesti = 0;
$dati_tariffe = dati_tariffe($tablenometariffe, "", "", $tableregole);
if ($ins_costi_agg) {
if (!function_exists('dati_costi_agg_ntariffe')) {
include "./includes/funzioni_costi_agg.php";
}
$dati_ca = dati_costi_agg_ntariffe($tablenometariffe, $dati_tariffe['num'], "NO", "", $tableappartamenti);
}
# fine if ($ins_costi_agg)
for ($n_t = 1; $n_t <= $num_tipologie; $n_t++) {
$inizioperiodo_orig[$n_t] = $inizioperiodo[$n_t];
$fineperiodo_orig[$n_t] = $fineperiodo[$n_t];
$idinizioperiodo = esegui_query("select idperiodi from {$tableperiodi} where datainizio = '" . aggslashdb($inizioperiodo[$n_t]) . "' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) {
$idinizioperiodo = 10000;
} else {
$idinizioperiodo = risul_query($idinizioperiodo, 0, 'idperiodi');
}
$inizioperiodo[$n_t] = $idinizioperiodo;
if (!$idinizioperiodo_tot or $idinizioperiodo < $idinizioperiodo_tot) {
$idinizioperiodo_tot = $idinizioperiodo;
}
$idfineperiodo = esegui_query("select idperiodi from {$tableperiodi} where datafine = '" . aggslashdb($fineperiodo[$n_t]) . "' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) {
$idfineperiodo = -1;
} else {
$idfineperiodo = risul_query($idfineperiodo, 0, 'idperiodi');
}
$fineperiodo[$n_t] = $idfineperiodo;
if (!$idfineperiodo_tot or $idfineperiodo > $idfineperiodo_tot) {
$idfineperiodo_tot = $idfineperiodo;
}
$id_periodo_corrente = calcola_id_periodo_corrente($anno);
if ($id_periodo_corrente > $idinizioperiodo and !$ins_passato) {
$data_sbagliata = "SI";
}
if ($idfineperiodo < $idinizioperiodo or $data_sbagliata == "SI") {
$inserire = "NO";
$mess_errore .= mex("Le date sono sbagliate", "clienti.php");
if ($num_tipologie > 1) {
$mess_errore .= " (" . mex("tipologia", "clienti.php") . " {$n_t})";
}
$mess_errore .= ".<br>";
}
# fine if ($idfineperiodo < $idinizioperiodo or...
if (substr($tipotariffa[$n_t], 0, 7) != "tariffa" or controlla_num_pos(substr($tipotariffa[$n_t], 7)) == "NO") {
$tariffa_sbagliata = "SI";
} else {
$tar_sett_imp = $tariffe_sett_imp[$n_t];
for ($num1 = $inizioperiodo[$n_t]; $num1 <= $fineperiodo[$n_t]; $num1++) {
$rigasettimana = esegui_query("select * from {$tableperiodi} where idperiodi = '{$num1}' ");
$esistetariffa = risul_query($rigasettimana, 0, $tipotariffa[$n_t]);
$esistetariffap = risul_query($rigasettimana, 0, $tipotariffa[$n_t] . "p");
if ((!strcmp($esistetariffa, "") or $esistetariffa < 0) and (!strcmp($esistetariffap, "") or $esistetariffap < 0) and !strcmp($tar_sett_imp[$num1], "")) {
$tariffa_sbagliata = "SI";
}
if ($dati_tariffe[$tipotariffa[$n_t]]['chiusa'][$num1] and !strcmp($tar_sett_imp[$num1], "")) {
$tariffa_sbagliata = "SI";
}
}
# fine for $num1
}
# fine else if (substr($tipotariffa[$n_t],0,7) != "tariffa" or...
if ($tariffa_sbagliata == "SI") {
$inserire = "NO";
$mess_errore .= mex("Si deve inserire il tipo di tariffa", "clienti.php");
if ($num_tipologie > 1) {
$mess_errore .= "(" . mex("tipologia", "clienti.php") . " {$n_t})";
}
$mess_errore .= ".<br>";
} else {
# se vi è una regola 2 per la tariffa
unset($app_regola2_predef);
if (!$lista_app[$n_t]) {
$lista_app[$n_t] = trova_app_regola2($tipotariffa[$n_t], $regole2, $num_regole2, $app_regola2_predef, $id_periodo_corrente, $idinizioperiodo, $idfineperiodo, $tipo_periodi, $anno, $tableregole);
}
# fine if (!$lista_app[$n_t])
$id_utente_ins = "";
# se vi è una regola 3 per la tariffa
if ($id_utente == 1) {
$regole3 = esegui_query("select * from {$tableregole} where tariffa_per_utente = '" . aggslashdb($tipotariffa[$n_t]) . "'");
if (numlin_query($regole3) == 1) {
$id_utente_ins = risul_query($regole3, 0, 'iddatainizio');
}
}
# fine if ($id_utente == 1)
if (!$id_utente_ins and $id_utente_imp) {
$id_utente_ins = $id_utente_imp;
}
if (!$id_utente_ins and $id_utente) {
$id_utente_ins = $id_utente;
}
if (!$id_utente_ins) {
$id_utente_ins = 1;
}
# se vi è una regola 4 per la tariffa
if (!$numpersone[$n_t]) {
$regole4 = esegui_query("select * from {$tableregole} where tariffa_per_persone = '" . aggslashdb($tipotariffa[$n_t]) . "'");
if (numlin_query($regole4) == 1) {
$numpersone[$n_t] = risul_query($regole4, 0, 'iddatainizio');
}
}
# fine if (!$numpersone[$n_t])
if (!$numpersone) {
if ($dati_tariffe[$tipotariffa[$n_t]]['moltiplica'] == "p") {
$inserire = "NO";
$mess_errore .= mex("Si deve inserire il numero delle persone per questa tariffa", "clienti.php");
if ($num_tipologie > 1) {
$mess_errore .= "(" . mex("tipologia", "clienti.php") . " {$n_t})";
}
$mess_errore .= ".<br>";
}
# fine if ($dati_tariffe[$tipotariffa[$n_t]]['moltiplica'] == "p")
}
# fine if (!$numpersone)
}
# fine else if ($tariffa_sbagliata == "SI")
if (controlla_num_pos($idclienti[$n_t]) == "NO") {
$inserire = "NO";
} else {
$cliente_esistente = esegui_query("select cognome from {$tableclienti} where idclienti = '" . $idclienti[$n_t] . "' ");
if (numlin_query($cliente_esistente) != 1) {
$inserire = "NO";
} else {
$cognome = risul_query($cliente_esistente, 0, "cognome");
}
}
# fine else if (controlla_num_pos($idclienti[$n_t]) == "NO")
$app_richiesti_id[$n_t] = "";
$assegnazioneapp[$n_t] = "v";
if ($lista_app[$n_t]) {
$assegnazioneapp[$n_t] = "c";
$vett_app = explode(",", $lista_app[$n_t]);
$num_app = count($vett_app);
if ($num_app == 1) {
$assegnazioneapp[$n_t] = "k";
}
for ($num1 = 0; $num1 < $num_app; $num1++) {
$appo = aggslashdb($vett_app[$num1]);
$app_richiesti_id[$n_t][$appo] = "SI";
$appartamento_esistente = esegui_query("select idappartamenti from {$tableappartamenti} where idappartamenti = '{$appo}' ");
if (numlin_query($appartamento_esistente) != 1) {
$inserire = "NO";
$mess_errore .= mex("L'appartamento", 'unit.php') . " <div style=\"display: inline; color: red;\">{$appo}</div> " . mex("contenuto nella lista non esiste", "clienti.php");
if ($num_tipologie > 1) {
$mess_errore .= " (" . mex("tipologia", "clienti.php") . " {$n_t})";
}
$mess_errore .= ".<br>";
}
# fine if (numlin_query($appartamento_esistente) != 1)
}
# fine for $num1
}
# fine if ($lista_app[$n_t])
if ($numpersone[$n_t]) {
if (controlla_num_pos($numpersone[$n_t]) == "NO") {
$inserire = "NO";
$mess_errore .= mex("Il numero di persone è sbagliato", "clienti.php");
if ($num_tipologie > 1) {
$mess_errore .= " (" . mex("tipologia", "clienti.php") . " {$n_t})";
}
$mess_errore .= ".<br>";
}
# fine if (controlla_num_pos($numpersone[$n_t]) == "NO")
$app_richiesti_copia = $app_richiesti_id[$n_t];
$posti = 0;
if ($app_regola2_predef) {
$app_regola2_predef = ",{$app_regola2_predef},";
$posto_reg2_orig = 0;
}
# fine if ($app_regola2_predef)
for ($num1 = 0; $num1 < $numappartamenti; $num1++) {
$idapp = risul_query($appartamenti, $num1, 'idappartamenti');
$maxoccupanti = risul_query($appartamenti, $num1, 'maxoccupanti');
if (!$app_richiesti_copia or $app_richiesti_copia[$idapp] == "SI") {
if ($maxoccupanti and $maxoccupanti < $numpersone[$n_t]) {
$app_richiesti_id[$n_t][$idapp] = "NO";
} else {
$app_richiesti_id[$n_t][$idapp] = "SI";
$posti++;
}
# fine else if ($maxoccupanti and $maxoccupanti < $numpersone[$n_t])
}
# fine if (!$app_richiesti_copia or $app_richiesti_copia[$idapp] == "SI")
if ($app_regola2_predef) {
if (str_replace(",{$idapp},", "", $app_regola2_predef) != $app_regola2_predef) {
if (!$maxoccupanti or $maxoccupanti >= $numpersone[$n_t]) {
$posto_reg2_orig = 1;
}
}
# fine if (str_replace(",$idapp,","",$app_regola2_predef) != $app_regola2_predef)
}
# fine if ($app_regola2_predef)
}
# fine for $num1
if ($posti == 0 or $app_regola2_predef and !$posto_reg2_orig) {
$mess_errore .= mex("Non c'è nessun appartamento tra quelli richiesti che possa ospitare", 'unit.php') . " " . $numpersone[$n_t] . " " . mex("persone", "clienti.php");
if ($num_tipologie > 1) {
$mess_errore .= " (" . mex("tipologia", "clienti.php") . " {$n_t})";
}
$mess_errore .= ".<br>";
$inserire = "NO";
}
# fine if ($posti == 0 or...
}
# fine if ($numpersone[$n_t])
unset($lista_app_richiesti);
if (!$app_richiesti_id[$n_t]) {
$lista_app_richiesti = ",tutti,,";
} else {
while (list($key, $val) = each($app_richiesti_id[$n_t])) {
if ($val == "SI") {
$lista_app_richiesti .= $key . ",";
}
}
}
$lista_app_richiesti = substr($lista_app_richiesti, 0, -1);
$id_app_richiesti++;
$app_richiesti[$id_app_richiesti] = $lista_app_richiesti;
$idinizioperiodo_vett[$id_app_richiesti] = $idinizioperiodo;
$idfineperiodo_vett[$id_app_richiesti] = $idfineperiodo;
$app_richiesti[",numero,"] = $id_app_richiesti;
if ($num_tipologie > 1 and $prenota_vicine == "SI") {
$app_richiesti[",vicini,"] = "SI";
}
if ($id_prenota_imp) {
if (controlla_num_pos($id_prenota_imp[$n_t]) == "SI") {
$id_esistente = esegui_query("select idprenota from {$tableprenota} where idprenota = '" . $id_prenota_imp[$n_t] . "' ");
if (numlin_query($id_esistente)) {
unset($id_prenota_imp);
}
} else {
unset($id_prenota_imp);
}
}
# fine if ($id_prenota_imp)
}
# fine for $n_t
if ($inserire != "NO") {
$app_agenzia = esegui_query("select * from {$tableregole} where app_agenzia != ''{$condizioni_regole1_non_sel}");
$num_app_agenzia = numlin_query($app_agenzia);
$minuti_durata_insprenota = esegui_query("select valpersonalizza_num from {$tablepersonalizza} where idpersonalizza = 'minuti_durata_insprenota' and idutente = '1'");
$minuti_durata_insprenota = risul_query($minuti_durata_insprenota, 0, 'valpersonalizza_num');
$lim_prenota_temp = aggslashdb(date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600 - $minuti_durata_insprenota * 60));
esegui_query("delete from {$tableprenota} where idclienti = '0' and datainserimento < '" . $lim_prenota_temp . "' ");
#Se ci sono regole per $app_agenzia inserisco false prenotazioni fisse in $app_prenota_id2
if ($num_app_agenzia != 0) {
unset($limiti_var);
unset($app_prenota_id);
unset($app_orig_prenota_id);
unset($inizio_prenota_id);
unset($fine_prenota_id);
unset($app_assegnabili_id);
unset($prenota_in_app_sett);
unset($dati_app);
unset($profondita);
$limiti_var['n_ini'] = $idinizioperiodo_tot;
$limiti_var['n_fine'] = $idfineperiodo_tot;
$limiti_var['lim_prenota_temp'] = $lim_prenota_temp;
$profondita['iniziale'] = "";
$profondita['attuale'] = 1;
$max_prenota = esegui_query("select max(idprenota) from {$tableprenota}");
if (numlin_query($max_prenota) != 0) {
$tot_prenota = risul_query($max_prenota, 0, 0);
} else {
$tot_prenota = 0;
}
$profondita['tot_prenota_ini'] = $tot_prenota;
$profondita['tot_prenota_attuale'] = $tot_prenota;
tab_a_var($limiti_var, $app_prenota_id, $app_orig_prenota_id, $inizio_prenota_id, $fine_prenota_id, $app_assegnabili_id, $prenota_in_app_sett, $anno, $dati_app, $profondita, $PHPR_TAB_PRE . "prenota");
unset($info_periodi_ag);
$info_periodi_ag['numero'] = 0;
for ($num1 = 0; $num1 < $num_app_agenzia; $num1++) {
$mot2 = risul_query($app_agenzia, $num1, 'motivazione2');
if ($mot2 == "x") {
$info_periodi_ag['app'][$info_periodi_ag['numero']] = risul_query($app_agenzia, $num1, 'app_agenzia');
$info_periodi_ag['ini'][$info_periodi_ag['numero']] = risul_query($app_agenzia, $num1, 'iddatainizio');
$info_periodi_ag['fine'][$info_periodi_ag['numero']] = risul_query($app_agenzia, $num1, 'iddatafine');
$info_periodi_ag['numero']++;
}
# fine if ($mot2 == "x")
}
# fine for $num1
if ($info_periodi_ag['numero']) {
inserisci_prenota_fittizie($info_periodi_ag, $profondita, $app_prenota_id, $inizio_prenota_id, $fine_prenota_id, $prenota_in_app_sett, $app_assegnabili_id);
}
$limiti_var2 = $limiti_var;
$profondita2 = $profondita;
$prenota_in_app_sett2 = $prenota_in_app_sett;
$inizio_prenota_id2 = $inizio_prenota_id;
$fine_prenota_id2 = $fine_prenota_id;
$app_prenota_id2 = $app_prenota_id;
$app_assegnabili_id2 = $app_assegnabili_id;
unset($info_periodi_ag);
$info_periodi_ag['numero'] = 0;
for ($num1 = 0; $num1 < $num_app_agenzia; $num1++) {
$mot2 = risul_query($app_agenzia, $num1, 'motivazione2');
if ($mot2 != "x") {
$info_periodi_ag['app'][$info_periodi_ag['numero']] = risul_query($app_agenzia, $num1, 'app_agenzia');
$info_periodi_ag['ini'][$info_periodi_ag['numero']] = risul_query($app_agenzia, $num1, 'iddatainizio');
$info_periodi_ag['fine'][$info_periodi_ag['numero']] = risul_query($app_agenzia, $num1, 'iddatafine');
$info_periodi_ag['numero']++;
}
# fine if ($mot2 != "x")
}
# fine for $num1
if ($info_periodi_ag['numero']) {
inserisci_prenota_fittizie($info_periodi_ag, $profondita2, $app_prenota_id2, $inizio_prenota_id2, $fine_prenota_id2, $prenota_in_app_sett2, $app_assegnabili_id2);
}
$occupare_app_agenzia_sempre = "NO";
for ($num1 = $idinizioperiodo_tot; $num1 <= $idfineperiodo_tot; $num1++) {
$numprenotazioni = 0;
for ($num2 = 0; $num2 < $dati_app['totapp']; $num2++) {
if ($prenota_in_app_sett2[$dati_app['posizione'][$num2]][$num1]) {
$numprenotazioni++;
}
}
if ($numprenotazioni >= $numappartamenti) {
$occupare_app_agenzia_sempre = "SI";
}
}
# fine for $num1
if ($occupare_app_agenzia_sempre != "SI") {
$app_orig_prenota_id = $app_prenota_id2;
liberasettimane($idinizioperiodo_vett, $idfineperiodo_vett, $limiti_var2, $anno, $fatto_libera, $app_liberato, $profondita2, $app_richiesti, $app_prenota_id2, $app_orig_prenota_id, $inizio_prenota_id2, $fine_prenota_id2, $app_assegnabili_id2, $prenota_in_app_sett2, $dati_app, $PHPR_TAB_PRE . "prenota");
} else {
$fatto_libera = "NO";
}
if ($fatto_libera == "SI") {
$risul_agg = aggiorna_tableprenota($app_prenota_id2, $app_orig_prenota_id, $tableprenota);
if (!$risul_agg) {
$fatto_libera = "NO";
} else {
$occupare_app_agenzia = "NO";
$appartamento = $app_liberato;
}
# fine else if (!$risul_agg)
} else {
$occupare_app_agenzia = "SI";
$limiti_var['t_limite'] = time() + $sec_limite_libsett;
$app_liberato = "";
$app_orig_prenota_id = $app_prenota_id;
liberasettimane($idinizioperiodo_vett, $idfineperiodo_vett, $limiti_var, $anno, $fatto_libera2, $app_liberato, $profondita, $app_richiesti, $app_prenota_id, $app_orig_prenota_id, $inizio_prenota_id, $fine_prenota_id, $app_assegnabili_id, $prenota_in_app_sett, $dati_app, $PHPR_TAB_PRE . "prenota");
if ($fatto_libera2 != "NO") {
$risul_agg = aggiorna_tableprenota($app_prenota_id, $app_orig_prenota_id, $tableprenota);
if (!$risul_agg) {
$fatto_libera2 = "NO";
}
}
# fine if ($fatto_libera2 != "NO")
if ($fatto_libera2 == "NO") {
$inserire = "NO";
$mess_errore .= mex("Nel periodo selezionato non è possibile ospitare il cliente negli appartamenti richiesti", 'unit.php') . ".<br>";
for ($n_t = 1; $n_t <= $num_tipologie; $n_t++) {
$mess_prenota .= mex("Prenotazione", "prenota.php") . mex("dal", "prenota.php") . " <b>" . formatta_data($inizioperiodo_orig[$n_t], $stile_data) . "</b> " . mex("al", "prenota.php") . " <b>" . formatta_data($fineperiodo_orig[$n_t], $stile_data) . "</b>";
$mess_prenota .= " " . mex("a nome di", "prenota.php") . " <b>{$cognome}</b> ";
if ($numpersone[$n_t]) {
$mess_prenota .= " " . mex("per", "prenota.php") . " <b>" . $numpersone[$n_t] . "</b> " . mex("persone", "prenota.php") . "";
}
if ($dati_tariffe[$tipotariffa[$n_t]]['nome']) {
$nometariffa_vedi = $dati_tariffe[$tipotariffa[$n_t]]['nome'];
} else {
$nometariffa_vedi = mex("tariffa", "prenota.php") . substr($tipotariffa[$n_t], 7);
}
$mess_prenota .= ", " . mex("tariffa", "prenota.php") . " \"{$nometariffa_vedi}\".<br><br>";
}
# fine for $n_t
} else {
$appartamento = $app_liberato;
$mess_regola1 .= mex("Sono stati fatti i seguenti spostamenti nei periodi della <div style=\"display: inline; color: blue;\">regola di assegnazione 1</div>", "clienti.php") . ":<br>";
for ($num1 = 0; $num1 < $num_app_agenzia; $num1++) {
$mot2 = risul_query($app_agenzia, $num1, 'motivazione2');
if ($mot2 != "x") {
$id_app_agenzia = risul_query($app_agenzia, $num1, 'app_agenzia');
$idinizio_app_agenzia = risul_query($app_agenzia, $num1, 'iddatainizio');
$idfine_app_agenzia = risul_query($app_agenzia, $num1, 'iddatafine');
$motivazione_app_agenzia = risul_query($app_agenzia, $num1, 'motivazione');
$idprenota_cambiate_da_ag = esegui_query("select idprenota from {$tableprenota} where idappartamenti = '{$id_app_agenzia}' and iddatainizio <= '{$idfine_app_agenzia}' and iddatafine >= '{$idinizio_app_agenzia}'");
$num_idprenota_cambiate_da_ag = numlin_query($idprenota_cambiate_da_ag);
for ($num2 = 0; $num2 < $num_idprenota_cambiate_da_ag; $num2 = $num2 + 1) {
$idprenota_cambiata = risul_query($idprenota_cambiate_da_ag, $num2, 'idprenota');
if ($app_prenota_id[$idprenota_cambiata] and $app_prenota_id[$idprenota_cambiata] != $id_app_agenzia) {
$idapp_camb = $app_prenota_id[$idprenota_cambiata];
$dati_cambiati = esegui_query("select * from {$tableprenota} where idprenota = '{$idprenota_cambiata}'");
$idclienti_camb = risul_query($dati_cambiati, 0, 'idclienti');
$cliente_camb = esegui_query("select cognome from {$tableclienti} where idclienti = '{$idclienti_camb}'");
if ($idclienti_camb) {
$cliente_camb = risul_query($cliente_camb, 0, 'cognome');
} else {
$cliente_camb = "?";
}
$iddatainizio_camb = $inizio_prenota_id[$idprenota_cambiata];
$datainizio_camb = esegui_query("select datainizio from {$tableperiodi} where idperiodi = '{$iddatainizio_camb}'");
$datainizio_camb = risul_query($datainizio_camb, 0, 'datainizio');
$datainizio_camb_f = formatta_data($datainizio_camb, $stile_data);
$iddatafine_camb = $fine_prenota_id[$idprenota_cambiata];
$datafine_camb = esegui_query("select datafine from {$tableperiodi} where idperiodi = '{$iddatafine_camb}'");
$datafine_camb = risul_query($datafine_camb, 0, 'datafine');
$datafine_camb_f = formatta_data($datafine_camb, $stile_data);
$mess_regola1 .= mex("La prenotazione dal", "clienti.php") . " {$datainizio_camb_f} " . mex("al", "clienti.php") . " {$datafine_camb_f} " . mex("a nome di", "clienti.php") . " {$cliente_camb} " . mex("verrà spostata dall'appartamento", 'unit.php') . " <div style=\"display: inline; color: blue;\"><b>{$id_app_agenzia}</b></div> (<b>{$motivazione_app_agenzia}</b>) " . mex("al", "clienti.php") . " {$idapp_camb}.<br>";
}
# fine if ($app_prenota_id[$idprenota_cambiata] and $app_prenota_id[$idprenota_cambiata] != $id_app_agenzia)
}
# fine for $num2
$idprenota_cambiate_a_ag = prenota_in_app_e_periodo($id_app_agenzia, $idinizio_app_agenzia, $idfine_app_agenzia, $prenota_in_app_sett, $fine_prenota_id, $num_pca);
for ($num2 = 1; $num2 <= $num_pca; $num2++) {
$idprenota_cambiata = $idprenota_cambiate_a_ag[$num2];
if ($app_orig_prenota_id[$idprenota_cambiata] and $app_prenota_id[$idprenota_cambiata] != $app_orig_prenota_id[$idprenota_cambiata]) {
$dati_cambiati = esegui_query("select * from {$tableprenota} where idprenota = {$idprenota_cambiata}");
$idapp_camb = $app_orig_prenota_id[$idprenota_cambiata];
$idclienti_camb = risul_query($dati_cambiati, 0, 'idclienti');
$cliente_camb = esegui_query("select cognome from {$tableclienti} where idclienti = {$idclienti_camb}");
if ($idclienti_camb) {
$cliente_camb = risul_query($cliente_camb, 0, 'cognome');
} else {
$cliente_camb = "?";
}
$iddatainizio_camb = $inizio_prenota_id[$idprenota_cambiata];
$datainizio_camb = esegui_query("select datainizio from {$tableperiodi} where idperiodi = {$iddatainizio_camb}");
$datainizio_camb = risul_query($datainizio_camb, 0, 'datainizio');
$datainizio_camb_f = formatta_data($datainizio_camb, $stile_data);
$iddatafine_camb = $fine_prenota_id[$idprenota_cambiata];
$datafine_camb = esegui_query("select datafine from {$tableperiodi} where idperiodi = {$iddatafine_camb}");
$datafine_camb = risul_query($datafine_camb, 0, 'datafine');
$datafine_camb_f = formatta_data($datafine_camb, $stile_data);
$mess_regola1 .= mex("La prenotazione dal", "clienti.php") . " {$datainizio_camb_f} " . mex("al", "clienti.php") . " {$datafine_camb_f} " . mex("a nome di", "clienti.php") . " {$cliente_camb} " . mex("verrà spostata dall'appartamento", 'unit.php') . " {$idapp_camb} " . mex("al", "clienti.php") . " <div style=\"display: inline; color: blue;\"><b>{$id_app_agenzia}</b></div> (<b>{$motivazione_app_agenzia}</b>).<br>";
}
# fine if ($app_orig_prenota_id[$idprenota_cambiata] and...
}
# fine for $num2
for ($num2 = 1; $num2 <= $id_app_richiesti; $num2++) {
if ($id_app_richiesti > 1) {
$appartamento_controlla = $appartamento[$num2];
} else {
$appartamento_controlla = $appartamento;
}
if ($id_app_agenzia == $appartamento_controlla and $idinizio_app_agenzia <= $idfineperiodo and $idfine_app_agenzia >= $idinizioperiodo) {
$mess_regola1 .= mex("La nuova prenotazione verrà inserita nell'appartamento", 'unit.php') . " <div style=\"display: inline; color: blue;\"><b>{$id_app_agenzia}</b></div> (<b>{$motivazione_app_agenzia}</b>).<br>";
}
# fine if ($id_app_agenzia == $appartamento_controlla and ...
}
# fine for $num2
}
# fine if ($mot2 != "x")
}
# fine for $num1
}
# fine else if ($fatto_libera2 == "NO")
}
# fine else if ($fatto_libera == "SI")
} else {
# se non ci sono app_agenzia della regola di assegnazione 1
unset($limiti_var);
unset($profondita_);
unset($app_prenota_id_);
unset($app_orig_prenota_id_);
unset($inizio_prenota_id_);
unset($fine_prenota_id_);
unset($app_assegnabili_id_);
unset($prenota_in_app_sett_);
unset($dati_app_);
unset($app_liberato);
$limiti_var["lim_prenota_temp"] = $lim_prenota_temp;
liberasettimane($idinizioperiodo_vett, $idfineperiodo_vett, $limiti_var, $anno, $fatto_libera, $app_liberato, $profondita_, $app_richiesti, $app_prenota_id_, $app_orig_prenota_id_, $inizio_prenota_id_, $fine_prenota_id_, $app_assegnabili_id_, $prenota_in_app_sett_, $dati_app_, $PHPR_TAB_PRE . "prenota");
if ($fatto_libera == "NO") {
$inserire = "NO";
$mess_errore .= mex("Nel periodo selezionato non è possibile ospitare il cliente in un appartamento tra quelli richiesti", 'unit.php') . ".<br>";
for ($n_t = 1; $n_t <= $num_tipologie; $n_t++) {
$mess_prenota .= mex("Prenotazione", "prenota.php") . mex("dal", "prenota.php") . " <b>" . formatta_data($inizioperiodo_orig[$n_t], $stile_data) . "</b> " . mex("al", "prenota.php") . " <b>" . formatta_data($fineperiodo_orig[$n_t], $stile_data) . "</b>";
$mess_prenota .= " " . mex("a nome di", "prenota.php") . " <b>{$cognome}</b> ";
if ($numpersone[$n_t]) {
$mess_prenota .= " " . mex("per", "prenota.php") . " <b>" . $numpersone[$n_t] . "</b> " . mex("persone", "prenota.php") . "";
}
if ($dati_tariffe[$tipotariffa[$n_t]]['nome']) {
$nometariffa_vedi = $dati_tariffe[$tipotariffa[$n_t]]['nome'];
} else {
$nometariffa_vedi = mex("tariffa", "prenota.php") . substr($tipotariffa[$n_t], 7);
}
$mess_prenota .= ", " . mex("tariffa", "prenota.php") . " \"{$nometariffa_vedi}\".<br><br>";
}
# fine for $n_t
} else {
$appartamento = $app_liberato;
}
}
# fine else if ($num_app_agenzia != 0)
}
# fine if ($inserire != "NO")
if ($inserire != "NO") {
$metodi_pagamento = esegui_query("select valpersonalizza from {$tablepersonalizza} where idpersonalizza = 'metodi_pagamento' and idutente = '{$id_utente}'");
$metodi_pagamento = risul_query($metodi_pagamento, 0, 'valpersonalizza');
if ($metodi_pagamento) {
$metodi_pagamento = explode(",", $metodi_pagamento);
}
$origini_prenota = esegui_query("select valpersonalizza from {$tablepersonalizza} where idpersonalizza = 'origini_prenota' and idutente = '{$id_utente}'");
$origini_prenota = risul_query($origini_prenota, 0, 'valpersonalizza');
if ($origini_prenota) {
$origini_prenota = explode(",", $origini_prenota);
}
for ($n_t = 1; $n_t <= $num_tipologie; $n_t++) {
$lunghezza_periodo = $fineperiodo[$n_t] - $inizioperiodo[$n_t] + 1;
$max_idprenota = esegui_query("select numlimite from {$tablecostiprenota} where idcostiprenota = '1'");
$max_idprenota = risul_query($max_idprenota, 0, 'numlimite');
if ($id_prenota_imp[$n_t]) {
$idprenota = $id_prenota_imp[$n_t];
} else {
$idprenota = $max_idprenota;
}
if ($idprenota >= $max_idprenota) {
esegui_query("update {$tablecostiprenota} set numlimite = '" . ($idprenota + 1) . "' where idcostiprenota = '1'");
}
$mess_prenota .= mex("Prenotazione", "prenota.php") . " {$idprenota} " . mex("dal", "prenota.php") . " <b>" . formatta_data($inizioperiodo_orig[$n_t], $stile_data) . "</b> " . mex("al", "prenota.php") . " <b>" . formatta_data($fineperiodo_orig[$n_t], $stile_data) . "</b> ({$lunghezza_periodo} " . mex("{$parola_settiman}", "prenota.php");
if ($lunghezza_periodo == 1) {
$mess_prenota .= mex("{$lettera_a}", "prenota.php");
} else {
$mess_prenota .= mex("{$lettera_e}", "prenota.php");
}
$mess_prenota .= ") " . mex("a nome di", "prenota.php") . " <b>{$cognome}</b> ";
if ($numpersone[$n_t]) {
$mess_prenota .= mex("per", 'prenota.php') . " <b>" . $numpersone[$n_t] . "</b> " . mex("persone", 'prenota.php') . " ";
}
$mess_prenota .= mex("nell'appartamento", 'unit.php') . " <b>" . $appartamento[$n_t] . "</b>";
if ($assegnazioneapp[$n_t] == "k") {
$mess_prenota .= " (" . mex("fisso", "unit.php") . ")";
} else {
$mess_prenota .= " (" . mex("mobile", "prenota.php");
if ($lista_app[$n_t]) {
$mess_prenota .= " " . mex("in", "prenota.php") . " " . str_replace(",", ", ", $lista_app[$n_t]);
}
$mess_prenota .= ")";
}
# fine else if ($assegnazioneapp[$n_t] == "k")
$mess_prenota .= ":<br><br>";
$costo_tariffa_tot = (double) 0;
unset($lista_tariffe_sett);
unset($lista_tariffep_sett);
$tar_sett_imp = $tariffe_sett_imp[$n_t];
for ($num2 = $inizioperiodo[$n_t]; $num2 <= $fineperiodo[$n_t]; $num2++) {
$riga_tariffa = esegui_query("select * from {$tableperiodi} where idperiodi = {$num2}");
if (strcmp($tar_sett_imp[$num2], "")) {
$costo_tariffa = $tar_sett_imp[$num2];
} else {
$costo_tariffa = risul_query($riga_tariffa, 0, $tipotariffa[$n_t]);
}
if ($dati_tariffe[$tipotariffa[$n_t]]['moltiplica'] == "p") {
if (!strcmp($costo_tariffa, "")) {
$costo_tariffa = 0;
}
if (strcmp($tar_sett_imp[$num2], "")) {
$costo_tariffap = 0;
} else {
$costo_tariffap = risul_query($riga_tariffa, 0, $tipotariffa[$n_t] . "p");
}
if (!strcmp($costo_tariffap, "")) {
$costo_tariffap = 0;
}
$costo_tariffap = (double) $costo_tariffap * (double) $numpersone[$n_t];
$lista_tariffep_sett .= "," . $costo_tariffap;
$costo_tariffa = (double) $costo_tariffa + $costo_tariffap;
}
# fine if ($dati_tariffe[$tipotariffa[$n_t]]['moltiplica'] == "p")
$costo_tariffa_tot = (double) $costo_tariffa_tot + (double) $costo_tariffa;
$lista_tariffe_sett .= "," . $costo_tariffa;
}
# fine for $num2
$lista_tariffe_sett = substr($lista_tariffe_sett, 1);
if ($lista_tariffep_sett) {
$lista_tariffep_sett = substr($lista_tariffep_sett, 1);
$lista_tariffe_sett .= ";{$lista_tariffep_sett}";
}
# fine if ($lista_tariffep_sett)
$costo_tariffa = $costo_tariffa_tot;
$nometariffa = $dati_tariffe[$tipotariffa[$n_t]]['nome'];
if ($nometariffa == "") {
$nometariffa = $tipotariffa[$n_t];
$nometariffa_vedi = mex("tariffa", "prenota.php") . substr($tipotariffa[$n_t], 7);
} else {
$nometariffa_vedi = $nometariffa;
}
$nometariffa = aggslashdb($nometariffa);
$tariffa = $nometariffa . "#@&" . $costo_tariffa_tot;
if ($dati_tariffe[$tipotariffa[$n_t]]['moltiplica'] == "p") {
$tariffa .= "#@&p";
}
$costo_tariffa_tot_p = punti_in_num($costo_tariffa_tot, $stile_soldi);
$mess_prenota .= "{$costo_tariffa_tot_p} {$Euro} " . mex("tariffa", "prenota.php") . " \"{$nometariffa_vedi}\"<br>";
$valori = "abcdefghijkmnpqrstuvwxz";
srand((double) microtime() * 1000000);
unset($cod_prenota);
for ($num2 = 0; $num2 < 4; $num2++) {
$cod_prenota .= substr($valori, rand(0, 22), 1);
}
if ($conferma[$n_t] == "SI") {
$conf = "S";
} else {
$conf = "N";
}
if ($pagato[$n_t] > 0) {
$conf = "S";
}
$datainserimento = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600);
esegui_query("insert into {$tableprenota} (idprenota,idclienti,idappartamenti,iddatainizio,iddatafine,tariffa,tariffesettimanali,codice,conferma,datainserimento,hostinserimento,utente_inserimento) values ('{$idprenota}','" . $idclienti[$n_t] . "','" . aggslashdb($appartamento[$n_t]) . "','" . $inizioperiodo[$n_t] . "','" . $fineperiodo[$n_t] . "','{$tariffa}','{$lista_tariffe_sett}','{$cod_prenota}','{$conf}','{$datainserimento}','{$HOSTNAME}','{$id_utente_ins}')");
if ($numpersone[$n_t]) {
esegui_query("update {$tableprenota} set num_persone = '" . $numpersone[$n_t] . "' where idprenota = '{$idprenota}' ");
}
# fine if ($numpersone[$n_t])
if ($dati_tariffe[$tipotariffa[$n_t]]['tasse_percent']) {
esegui_query("update {$tableprenota} set tasseperc = '" . $dati_tariffe[$tipotariffa[$n_t]]['tasse_percent'] . "' where idprenota = '{$idprenota}' ");
}
# fine if ($dati_tariffe[$tipotariffa[$n_t]]['tasse_percent'])
$caparra[$n_t] = formatta_soldi($caparra[$n_t]);
if (controlla_soldi($caparra[$n_t], "pos") == "NO") {
$caparra[$n_t] = "";
}
if (!$caparra[$n_t]) {
$caparra[$n_t] = calcola_caparra($dati_tariffe, $tipotariffa[$n_t], $inizioperiodo[$n_t], $fineperiodo[$n_t], $costo_tariffa_tot, $lista_tariffe_sett);
}
$sconto[$n_t] = (double) formatta_soldi($sconto[$n_t]);
if ($sconto[$n_t] and controlla_soldi($sconto[$n_t]) == "SI") {
if ($sconto[$n_t] > $costo_tariffa_tot) {
$sconto[$n_t] = $costo_tariffa_tot;
}
esegui_query("update {$tableprenota} set sconto = '" . $sconto[$n_t] . "' where idprenota = '{$idprenota}' ");
$sconto_p = punti_in_num($sconto[$n_t], $stile_soldi);
if (substr($sconto_p, 0, 1) == "-") {
$sconto_p = substr($sconto_p, 1);
} else {
$mess_prenota .= "-";
}
$mess_prenota .= "{$sconto_p} {$Euro} " . mex("Sconto", "prenota.php") . "<br>";
$costo_tariffa_tot = (double) $costo_tariffa_tot - (double) $sconto[$n_t];
}
# fine if ($sconto[$n_t] and...
$commissioni[$n_t] = formatta_soldi($commissioni[$n_t]);
if (controlla_soldi($commissioni[$n_t], "pos") == "NO") {
$commissioni[$n_t] = "";
}
if (!$commissioni[$n_t]) {
$commissioni[$n_t] = calcola_commissioni($dati_tariffe, $tipotariffa[$n_t], $inizioperiodo[$n_t], $fineperiodo[$n_t], $lista_tariffe_sett, $sconto[$n_t], 0);
}
esegui_query("update {$tableprenota} set tariffa_tot = '{$costo_tariffa_tot}' where idprenota = '{$idprenota}' ");
$costo_tariffa_tot_p = punti_in_num($costo_tariffa_tot, $stile_soldi);
$mess_prenota .= "<b>{$costo_tariffa_tot_p} {$Euro} " . mex("TOTALE", "prenota.php") . "</b><br>";
if ($lista_app[$n_t]) {
esegui_query("update {$tableprenota} set app_assegnabili = '" . $lista_app[$n_t] . "' where idprenota = '{$idprenota}' ");
}
# fine if ($lista_app[$n_t])
if ($assegnazioneapp[$n_t]) {
esegui_query("update {$tableprenota} set assegnazioneapp = '" . $assegnazioneapp[$n_t] . "' where idprenota = '{$idprenota}' ");
}
# fine if ($assegnazioneapp[$n_t])
if ($caparra[$n_t]) {
if ($caparra[$n_t] > $costo_tariffa_tot) {
$caparra[$n_t] = $costo_tariffa_tot;
}
esegui_query("update {$tableprenota} set caparra = '" . $caparra[$n_t] . "' where idprenota = '{$idprenota}' ");
$da_pagare = $costo_tariffa_tot - $caparra[$n_t];
$caparra_p = punti_in_num($caparra[$n_t], $stile_soldi);
$da_pagare_p = punti_in_num($da_pagare, $stile_soldi);
$mess_prenota .= "<br>" . mex("Caparra", "prenota.php") . ": <b>{$caparra_p}</b> {$Euro} (" . mex("resto da pagare", "prenota.php") . ": {$da_pagare_p} {$Euro}).<br>";
}
# fine if ($caparra[$n_t])
$met_trovato = "NO";
if ($met_paga_caparra[$n_t] and $metodi_pagamento) {
for ($num2 = 0; $num2 < count($metodi_pagamento); $num2++) {
if ($met_paga_caparra[$n_t] == $metodi_pagamento[$num2]) {
$met_trovato = "SI";
}
}
# fine for $num2
if ($met_trovato == "SI") {
esegui_query("update {$tableprenota} set metodo_pagamento = '" . aggslashdb($met_paga_caparra[$n_t]) . "' where idprenota = '{$idprenota}' ");
if (!$caparra) {
$mess_prenota .= "<br>";
}
$mess_prenota .= mex("Metodo pagamento caparra", "prenota.php") . ": <b>" . $met_paga_caparra[$n_t] . "</b>.<br>";
}
# fine if ($met_trovato == "SI")
}
# fine if ($met_paga_caparra[$n_t] and $metodi_pagamento)
if ($commissioni[$n_t]) {
esegui_query("update {$tableprenota} set commissioni = '" . $commissioni[$n_t] . "' where idprenota = '{$idprenota}' ");
$resto_comm = $costo_tariffa_tot - $commissioni[$n_t];
$commissioni_p = punti_in_num($commissioni[$n_t], $stile_soldi);
$resto_comm_p = punti_in_num($resto_comm, $stile_soldi);
if (!$caparra[$n_t] and $met_trovato == "NO") {
$mess_prenota .= "<br>";
}
$mess_prenota .= mex("Commissioni", "prenota.php") . ": <b>{$commissioni_p}</b> {$Euro} (" . mex("resto commissioni", "prenota.php") . ": {$resto_comm_p} {$Euro}).<br>";
}
# fine if ($commissioni[$n_t])
# calcolo costi nulli, non letto e senza inventario da associare alla tariffa, tutti come se fossero "se possibile"
if ($ins_costi_agg == "costi_nulli") {
unset($num_letti_agg);
unset($num_costi_presenti);
$oggi_costo = date("Ymd", time() + C_DIFF_ORE * 3600);
for ($num_costo = 0; $num_costo < $dati_ca['num']; $num_costo++) {
if (!$dati_ca[$num_costo]['valore'] and !$dati_ca[$num_costo]['valore_perc'] and $dati_ca[$num_costo]['letto'] != "s" and !$dati_ca[$num_costo]['tipo_beniinv']) {
$associa_costo = "NO";
$associa_costo_tariffa = associa_costo_a_tariffa($dati_ca, $num_costo, $tipotariffa[$n_t], $fineperiodo[$n_t] - $inizioperiodo[$n_t] + 1);
if ($associa_costo_tariffa == "SI") {
$associa_costo = "SI";
}
if ($associa_costo_tariffa != "SI" and !$dati_ca[$num_costo]["incomp_" . $tipotariffa[$n_t]]) {
if ($dati_ca[$num_costo]['assegna_con_num_prenota'] and count($inizioperiodo) >= $dati_ca[$num_costo]['assegna_con_num_prenota']) {
$associa_costo = "SI";
}
if ($dati_ca[$num_costo]['assegna_da_ini_prenota']) {
$giorni_lim = substr($dati_ca[$num_costo]['assegna_da_ini_prenota'], 1);
$limite = date("Ymd", mktime(0, 0, 0, substr($inizioperiodo_orig[$n_t], 5, 2), substr($inizioperiodo_orig[$n_t], 8, 2) - $giorni_lim, substr($inizioperiodo_orig[$n_t], 0, 4)));
if (substr($dati_ca[$num_costo]['assegna_da_ini_prenota'], 0, 1) == ">" and $oggi_costo < $limite) {
$associa_costo = "SI";
}
if (substr($dati_ca[$num_costo]['assegna_da_ini_prenota'], 0, 1) == "<" and $oggi_costo > $limite) {
$associa_costo = "SI";
}
}
# fine if ($dati_ca[$num_costo][assegna_da_ini_prenota])
}
# fine if ($associa_costo_tariffa != "SI" and...
if ($associa_costo == "SI") {
#if ($dati_ca[$num_costo][tipo_val] == "q" and $costo_totale_presente = "SI") $associa_costo = "NO";
$settimane_costo = calcola_settimane_costo($tableperiodi, $dati_ca, $num_costo, $inizioperiodo[$n_t], $fineperiodo[$n_t], "", "");
calcola_moltiplica_costo($dati_ca, $num_costo, $moltiplica, $inizioperiodo[$n_t], $fineperiodo[$n_t], $settimane_costo, "", $numpersone[$n_t], $num_letti_agg);
$num_costi_presenti_copia = $num_costi_presenti;
$periodo_costo_trovato = trova_periodo_permesso_costo($dati_ca, $num_costo, $inizioperiodo[$n_t], $fineperiodo[$n_t], $settimane_costo);
if ($periodo_costo_trovato == "NO") {
$associa_costo = "NO";
} else {
if (controlla_num_limite_costo($tablecostiprenota, $tableprenota, $dati_ca, $num_costo, $num_costi_presenti_copia, $inizioperiodo[$n_t], $fineperiodo[$n_t], $settimane_costo, $moltiplica) == "NO") {
$associa_costo = "NO";
}
}
if ($associa_costo == "SI") {
$num_costi_presenti = $num_costi_presenti_copia;
$idcostiprenota = esegui_query("select max(idcostiprenota) from {$tablecostiprenota}");
$idcostiprenota = risul_query($idcostiprenota, 0, 0) + 1;
$tipo_ca = $dati_ca[$num_costo]['tipo'] . $dati_ca[$num_costo]['tipo_val'];
$valore_ca = $dati_ca[$num_costo]['valore'];
$valore_perc_ca = $dati_ca[$num_costo]['valore_perc'];
$associasett_ca = $dati_ca[$num_costo]['associasett'];
if ($dati_ca[$num_costo]['var_percentuale'] != "s" and $dati_ca[$num_costo]['tipo_val'] != "f") {
$tipo_ca = $dati_ca[$num_costo]['tipo'] . "f";
$moltiplica = 1;
if ($dati_ca[$num_costo]['tipo'] == "s") {
$settimane_costo = 1;
$associasett_ca = "n";
}
# fine if ($dati_ca[$num_costo][tipo] == "s")
}
# fine if ($dati_ca[$num_costo][var_percentuale] != "s" and...
if ($dati_ca[$num_costo]['var_moltiplica'] == "s") {
$varmoltiplica_ca = $dati_ca[$num_costo]['moltiplica'] . $dati_ca[$num_costo]['molt_max'] . $dati_ca[$num_costo]['molt_agg'] . "," . $dati_ca[$num_costo]['molt_max_num'];
} else {
$varmoltiplica_ca = "cx0,";
}
if ($dati_ca[$num_costo]['var_numsett'] == "s") {
$varnumsett_ca = $dati_ca[$num_costo]['numsett_orig'];
} else {
$varnumsett_ca = "c";
}
if ($dati_ca[$num_costo]['var_periodip'] == "s") {
$varperiodipermessi_ca = $dati_ca[$num_costo]['periodipermessi_orig'];
} else {
$varperiodipermessi_ca = "";
}
$varbeniinv_ca = "";
$varappincompatibili_ca = "";
if ($dati_ca[$num_costo]['var_tariffea'] == "s") {
$vartariffeassociate_ca = "p" . $dati_ca[$num_costo][$tipotariffa[$n_t]];
} else {
$vartariffeassociate_ca = "";
}
$vartariffeincomp_ca = "";
if ($dati_ca[$num_costo]['var_tariffei'] == "s") {
for ($numtariffa = 1; $numtariffa <= $dati_tariffe['num']; $numtariffa++) {
if ($dati_ca[$num_costo]["incomp_tariffa" . $numtariffa] == "i") {
$vartariffeincomp_ca .= "," . $numtariffa;
}
}
# fine for $numtariffa
if ($vartariffeincomp_ca) {
$vartariffeincomp_ca = substr($vartariffeincomp_ca, 1);
}
}
# fine if ($dati_ca[$num_costo][var_tariffei] == "s")
if ($dati_ca[$num_costo]['var_comb'] == "s") {
$variazione_ca = $dati_ca[$num_costo]['combina'];
} else {
$variazione_ca = "n";
}
$variazione_ca .= $dati_ca[$num_costo]['escludi_tot_perc'];
esegui_query("insert into {$tablecostiprenota} (idcostiprenota,idprenota,tipo,nome,valore,associasett,settimane,moltiplica,letto,idntariffe,variazione,varmoltiplica,varnumsett,varperiodipermessi,varbeniinv,varappincompatibili,vartariffeassociate,vartariffeincomp,datainserimento,hostinserimento,utente_inserimento) values ('{$idcostiprenota}','{$idprenota}','{$tipo_ca}','" . aggslashdb($dati_ca[$num_costo]['nome']) . "','{$valore_ca}','{$associasett_ca}','{$settimane_costo}','{$moltiplica}','" . $dati_ca[$num_costo]['letto'] . "','" . $dati_ca[$num_costo]['id'] . "','{$variazione_ca}','{$varmoltiplica_ca}','{$varnumsett_ca}','{$varperiodipermessi_ca}','{$varbeniinv_ca}','{$varappincompatibili_ca}','{$vartariffeassociate_ca}','{$vartariffeincomp_ca}','{$datainserimento}','{$HOSTNAME}','{$id_utente_ins}')");
if (substr($tipo_ca, 1, 1) != "f") {
esegui_query("update {$tablecostiprenota} set valore_perc = '{$valore_perc_ca}', arrotonda = '" . $dati_ca[$num_costo]['arrotonda'] . "' where idcostiprenota = '{$idcostiprenota}'");
}
if ($dati_ca[$num_costo]['tasseperc']) {
esegui_query("update {$tablecostiprenota} set tasseperc = '" . $dati_ca[$num_costo]['tasseperc'] . "' where idcostiprenota = '{$idcostiprenota}'");
}
if (strcmp($dati_ca[$num_costo]['categoria'], "")) {
esegui_query("update {$tablecostiprenota} set categoria = '" . $dati_ca[$num_costo]['categoria'] . "' where idcostiprenota = '{$idcostiprenota}'");
}
}
# fine if ($associa_costo == "SI")
}
# fine if ($associa_costo == "SI")
}
# fine if (!$dati_ca[$num_costo]['valore'] and !$dati_ca[$num_costo]['valore_perc'] and...
}
# fine for $num_costo
}
# fine if ($ins_costi_agg == "costi_nulli")
if ($origine_prenota[$n_t] and $origini_prenota) {
$orig_trovata = "NO";
for ($num2 = 0; $num2 < count($origini_prenota); $num2++) {
if ($origine_prenota[$n_t] == $origini_prenota[$num2]) {
$orig_trovata = "SI";
}
}
# fine for $num2
if ($orig_trovata == "SI") {
$origine_prenota[$n_t] = aggslashdb($origine_prenota[$n_t]);
esegui_query("update {$tableprenota} set origine = '" . $origine_prenota[$n_t] . "' where idprenota = '{$idprenota}' ");
if (!$caparra[$n_t] and $met_trovato == "NO" and !$commissioni[$n_t]) {
$mess_prenota .= "<br>";
}
$mess_prenota .= mex("Origine", "prenota.php") . ": <b>" . stripslashes($origine_prenota[$n_t]) . "</b>.<br>";
}
# fine if ($orig_trovata == "SI")
}
# fine if ($origine_prenota[$n_t] and $origini_prenota)
if ($giorno_stima_checkin[$n_t] and $ora_stima_checkin[$n_t] and $min_stima_checkin[$n_t]) {
if ($tipo_periodi == "g") {
$giorni_periodo = $lunghezza_periodo;
} else {
$giorni_periodo = $lunghezza_periodo * 7;
}
if (controlla_num_pos($giorno_stima_checkin[$n_t]) == "SI" and $giorno_stima_checkin[$n_t] >= 1 and $giorno_stima_checkin[$n_t] <= 7 and $giorno_stima_checkin[$n_t] <= $giorni_periodo + 1) {
$data_stima_checkin = esegui_query("select datainizio from {$tableperiodi} where idperiodi = '" . $inizioperiodo[$n_t] . "'");
$data_stima_checkin = risul_query($data_stima_checkin, 0, 'datainizio');
$data_ini_prenota_f = formatta_data($data_stima_checkin, $stile_data);
$anno_dts = substr($data_stima_checkin, 0, 4);
$mese_dts = substr($data_stima_checkin, 5, 2);
$giorno_dts = substr($data_stima_checkin, 8, 2);
$data_stima_checkin = date("Y-m-d", mktime(0, 0, 0, $mese_dts, $giorno_dts + $giorno_stima_checkin[$n_t] - 1, $anno_dts));
$stima_checkin = $data_stima_checkin . " " . $ora_stima_checkin[$n_t] . ":" . $min_stima_checkin[$n_t] . ":00";
if (preg_match("/[0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:00/", $stima_checkin)) {
esegui_query("update {$tableprenota} set checkout = '{$stima_checkin}' where idprenota = '{$idprenota}' ");
$mess_prenota .= "<br>" . mex("Orario stimato di entrata", "prenota.php") . ": <b>" . substr(str_replace($data_ini_prenota_f, "", formatta_data($stima_checkin, $stile_data)), 0, -3) . "</b>.<br>";
}
# fine if (preg_match("/[0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:00/",$stima_checkin))
}
# fine if (controlla_num_pos($giorno_stima_checkin) == "SI" and...
}
# fine if ($giorno_stima_checkin[$n_t] and $ora_stima_checkin[$n_t] and $min_stima_checkin[$n_t])
if ($commento[$n_t]) {
$commento[$n_t] = htmlspecialchars($commento[$n_t]);
$mess_prenota .= "<br>" . mex("Commento", "prenota.php") . ": " . $commento[$n_t] . "<br>";
$commento[$n_t] = aggslashdb($commento[$n_t]);
esegui_query("update {$tableprenota} set commento = '" . $commento[$n_t] . "' where idprenota = '{$idprenota}' ");
}
# fine if ($commento[$n_t])
$mess_prenota .= "<br>" . mex("Prenotazione", "prenota.php") . " {$idprenota} " . mex("inserita", "prenota.php") . "!<br>";
if ($n_t != $num_tipologie) {
$mess_prenota .= "<hr style=\"width: 95%\">";
}
$lista_idprenota .= ",{$idprenota}";
$lista_idini .= "," . $inizioperiodo[$n_t];
$lista_idfine .= "," . $fineperiodo[$n_t];
#$costo_tot_mess = (double) $costo_tot_mess + (double) $costo_tariffa_tot;
#$caparra_mess = (double) $caparra_mess + (double) $caparra;
}
# fine for $n_t
$lista_idprenota = substr($lista_idprenota, 1);
$lista_idini = substr($lista_idini, 1);
$lista_idfine = substr($lista_idfine, 1);
if ($prenota_vicine == "SI") {
$lista_idprenota_vett = explode(",", $lista_idprenota);
for ($num1 = 0; $num1 < count($lista_idprenota_vett); $num1++) {
$idprenota = $lista_idprenota_vett[$num1];
$idprenota_vicine = substr(str_replace("," . $idprenota . ",", ",", "," . $lista_idprenota . ","), 1, -1);
esegui_query("update {$tableprenota} set idprenota_compagna = '{$idprenota_vicine}' where idprenota = '{$idprenota}' ");
}
# fine for $num1
}
# fine if ($prenota_vicine == "SI")
$stato['inserita'] = "SI";
}
# fine if ($inserire != "NO")
if (!@is_array($stato) or $stato['inserita'] != "SI") {
$stato['inserita'] = "NO";
}
$stato['mess_errore'] = $mess_errore;
$stato['mess_regola1'] = $mess_regola1;
$stato['mess_prenota'] = $mess_prenota;
$stato['lista_idprenota'] = $lista_idprenota;
$stato['idinizioperiodo'] = $lista_idini;
$stato['idfineperiodo'] = $lista_idfine;
return $lista_idprenota;
}
<input type=\"hidden\" name=\"T_PHPR_DB_TYPE\" value=\"$T_PHPR_DB_TYPE\">
<input type=\"hidden\" name=\"T_PHPR_DB_NAME\" value=\"$T_PHPR_DB_NAME\">
<input type=\"hidden\" name=\"T_PHPR_DB_HOST\" value=\"$T_PHPR_DB_HOST\">
<input type=\"hidden\" name=\"T_PHPR_DB_PORT\" value=\"$T_PHPR_DB_PORT\">
<input type=\"hidden\" name=\"T_PHPR_DB_USER\" value=\"$T_PHPR_DB_USER\">
<input type=\"hidden\" name=\"T_PHPR_DB_PASS\" value=\"$T_PHPR_DB_PASS\">
<input type=\"hidden\" name=\"T_PHPR_LOAD_EXT\" value=\"$T_PHPR_LOAD_EXT\">
<input type=\"hidden\" name=\"T_PHPR_TAB_PRE\" value=\"$T_PHPR_TAB_PRE\">
<input type=\"hidden\" name=\"anno_modello\" value=\"$anno_modello\">
<input type=\"hidden\" name=\"lingua_modello\" value=\"$lingua_modello\">
<input type=\"hidden\" name=\"perc_cart_mod_sel\" value=\"$perc_cart_mod_sel\">
<h5>".mext_rat("Pagina della tabella con le tariffe",$pag)."</h5><br><br>
<table><tr><td valign=\"top\">
".mext_rat("Mostra tariffe",$pag)."</td><td>";
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
$numero_date_menu = $n_dates_menu;
$numero_data = 0;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
echo mex("dal",$pag)." ";
mostra_menu_date(C_DATA_PATH."/selectperiodi$anno_modello.1.php","inizioperiodo$num1",${"inizioperiodo".$num1},"","",$id_utente,$tema);
echo " ".mex("al",$pag)." ";
mostra_menu_date(C_DATA_PATH."/selectperiodi$anno_modello.1.php","fineperiodo$num1",${"fineperiodo".$num1},"","",$id_utente,$tema);
if (!${"intervalloperiodo".$num1}) ${"intervalloperiodo".$num1} = 1;
echo ", ".str_replace(" "," ",mex("$parola_settimane di intervallo",$pag)).":
<input type=\"text\" name=\"intervalloperiodo$num1\" value=\"".${"intervalloperiodo".$num1}."\" size=\"2\" maxlength=\"2\"><br>";
} # fine for $num1
if (!$estendi_ultima_data or strtoupper($estendi_ultima_data) == $SI or $estendi_ultima_data == "SI") { $sel_SI = " selected"; $sel_NO = ""; }
else { $sel_NO = " selected"; $sel_SI = ""; }
echo "</td><td style=\"width: 20px;\"></td><td valign=\"bottom\">";
if ($num_periodi_date > 1) echo "<input class=\"sbutton\" type=\"submit\" name=\"eliminadatemenu\" value=\"".mex("-",$pag)."\"> ";
function crea_modello_disponibilita ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) {
global $num_periodi_date,$M_PHPR_DB_TYPE,$M_PHPR_DB_NAME,$M_PHPR_DB_HOST,$M_PHPR_DB_PORT,$M_PHPR_DB_USER,$M_PHPR_DB_PASS,$M_PHPR_LOAD_EXT,$M_PHPR_TAB_PRE,$estendi_ultima_data,$max_num_app_tipologia,$chiedi_num_app_tipologia,$parola_appartamenti,$parola_appartamento,$aggiungi_tipologie,$max_num_tipologie,$chiedi_num_persone,$max_num_persone,$costo_aggiungi_letti,$max_num_aggiungi_letti,$sett_no_prenota;
global $mostra_richiesta_via_mail,$mostra_costi_aggiuntivi,$num_colonne_costi_agg,$num_motivazioni,$mostra_quadro_disp,$mostra_numero_liberi_quadro_disponibilita,$allinea_disponibilita_con_arrivo,$m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$utente_lis,$aggiungi_costi_fissi,$assegna_con_regola2,$mostra_frase_alternativa_regola1,$mostra_caparra,$ind_email,$maschera_envelope,$manda_copia_richiesta_email;
global $colore_sfondo_quadro_disponibilita,$colore_inizio_settimana_quadro_disponibilita,$colore_libero_quadro_disponibilita,$colore_occupato_quadro_disponibilita,$apertura_font_quadro_disponibilita,$chiusura_font_quadro_disponibilita,$apertura_tag_font,$chiusura_tag_font,$apertura_tag_font_rosse,$chiusura_tag_font_rosse,$stile_tabella_prenotazione,$m_valuta_sing,$m_valuta_plur,$frase_alternativa_regola1;
global $cambia_frasi,$utente_mess,$orig_prenota,$num_metodi_pagamento,$num_campi_pers,$num_campi_doc_cond,$chiedi_cognome,$chiedi_nome,$chiedi_email,$chiedi_sesso,$chiedi_datanascita,$chiedi_documento,$chiedi_nazione,$chiedi_citta,$chiedi_regione,$chiedi_via,$chiedi_numcivico,$chiedi_cap,$chiedi_telefono,$chiedi_telefono2,$chiedi_telefono3,$chiedi_fax,$chiedi_commento,$chiedi_oracheckin,$chiedi_metodopagamento;
global $mostra_bottone_paypal,$nome_modello_paypal,$mostra_calendario_scelta_date,$stile_riquadro_calendario,$stile_tabella_calendario,$stile_bottoni_calendario,$stile_bottone_apertura_calendario,$spostamento_orizzontale_calendario,$colore_data_attiva_calendario,$colore_data_selezionata_calendario,$prima_parte_html,$ultima_parte_html,$mostra_giorni_pieni,$modello_esistente;
global $file_css_frame,$apri_nuova_finestra_da_frame,$altezza_finestra_da_frame,$larghezza_finestra_da_frame,$tema_modello;
$tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello;
$tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello;
$tableanni = $PHPR_TAB_PRE."anni";
$tableutenti = $PHPR_TAB_PRE."utenti";
$tablepersonalizza = $PHPR_TAB_PRE."personalizza";
$tablecontratti = $PHPR_TAB_PRE."contratti";
if (controlla_anno($anno_modello) != "SI") {
$continua = "NO";
$anno_modello = "";
} # fine if (controlla_anno($anno_modello) != "SI")
else {
$anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'");
if (numlin_query($anno_esistente) != 1) $continua = "NO";
} # fine else if (controlla_anno($anno_modello) != "SI")
if ($continua != "NO") {
if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO";
$date_in_menu = "";
$idfineperiodo_prec = -10;
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1};
$inizioperiodo = aggslashdb(${"inizioperiodo".$num1});
$fineperiodo = aggslashdb(${"fineperiodo".$num1});
$idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; }
else { $idinizioperiodo = risul_query($idinizioperiodo,0,'idperiodi'); }
$inizioperiodo = $idinizioperiodo;
if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) {
$idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello");
$idfineperiodo = risul_query($idfineperiodo,0,0);
} # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
else {
$idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) { $idfineperiodo = -1; }
else { $idfineperiodo = risul_query($idfineperiodo,0,'idperiodi'); }
} # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
$fineperiodo = $idfineperiodo;
${"inizioperiodo".$num1} = $inizioperiodo;
${"fineperiodo".$num1} = $fineperiodo;
if ($idfineperiodo < $idinizioperiodo) $continua = "NO";
if (($idfineperiodo_prec + 1) >= $idinizioperiodo) $continua = "NO";
$idfineperiodo_prec = $idfineperiodo;
${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1});
if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO";
} # fine for $num1
if ($continua == "NO") {
if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>";
} # fine if ($continua == "NO")
else {
$file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php");
$num_linee_file_intero = count($file_intero);
$pag_gm = "giorni_mesi.php";
$m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'");
$m_tipo_periodi = risul_query($m_tipo_periodi,0,0);
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
$inizioperiodo = ${"inizioperiodo".$num1};
$fineperiodo = ${"fineperiodo".$num1};
$num_intervallo = 1;
for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) {
if (substr($file_intero[$num2],0,7) == "<option") {
$data_option = substr($file_intero[$num2],16,10);
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' ");
$esiste_data_option = numlin_query($id_data_option);
if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,'idperiodi');
else {
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' ");
$id_data_option = risul_query($id_data_option,0,'idperiodi');
} # fine else if ($esiste_data_option == 1)
if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) {
if ($num_intervallo == 1) {
$giorno_option = substr($data_option,8,2);
$mese_option = substr($data_option,5,2);
$anno_option = substr($data_option,0,4);
$nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
$nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
if ($m_tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello);
if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello);
if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello);
if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello);
if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello);
if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello);
if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello);
} # fine if ($m_tipo_periodi == "g")
else $nome_giorno = "";
if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello);
if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello);
if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello);
if ($nome_mese == "Apr") $nome_mese = mex2("Apr",$pag_gm,$lingua_modello);
if ($nome_mese == "May") $nome_mese = mex2("Mag",$pag_gm,$lingua_modello);
if ($nome_mese == "Jun") $nome_mese = mex2("Giu",$pag_gm,$lingua_modello);
if ($nome_mese == "Jul") $nome_mese = mex2("Lug",$pag_gm,$lingua_modello);
if ($nome_mese == "Aug") $nome_mese = mex2("Ago",$pag_gm,$lingua_modello);
if ($nome_mese == "Sep") $nome_mese = mex2("Set",$pag_gm,$lingua_modello);
if ($nome_mese == "Oct") $nome_mese = mex2("Ott",$pag_gm,$lingua_modello);
if ($nome_mese == "Nov") $nome_mese = mex2("Nov",$pag_gm,$lingua_modello);
if ($nome_mese == "Dec") $nome_mese = mex2("Dic",$pag_gm,$lingua_modello);
$date_in_menu .= "<option value=\\\"$data_option\\\">$nome_mese $giorno_option$nome_giorno, $anno_option</option>
";
} # fine if ($num_intervallo == 1)
if ($num_intervallo == ${"intervalloperiodo".$num1}) $num_intervallo = 1;
else $num_intervallo++;
} # fine if ($id_data_option > $inizioperiodo and...
} # fine if (substr($file_intero[$num2],0,7) == "<option")
} # fine for $num2
} # fine for $num1
$d_names = "\\\"". mex2(" Do",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Lu",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Ma",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Me",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Gi",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Ve",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Sa",$pag_gm,$lingua_modello)."\\\"";
$m_names = "\\\"". mex2("Gen",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Feb",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Mar",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Apr",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Mag",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Giu",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Lug",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Ago",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Set",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Ott",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Nov",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Dic",$pag_gm,$lingua_modello)."\\\"";
} # fine else if ($continua == "NO")
if (controlla_num_pos($sett_no_prenota) == "NO" or $sett_no_prenota < 0 or $sett_no_prenota > 365) {
$continua = "NO";
global $parola_settimane;
if ($silenzio == "NO") echo mex("Numero di $parola_settimane dopo cui prendere richieste errato",$pag).".<br>";
} # fine if (controlla_num_pos($sett_no_prenota) == "NO" or $sett_no_prenota < 1 or $sett_no_prenota > 365)
$utente_liste = $utente_lis;
if (@get_magic_quotes_gpc()) $utente_liste = stripslashes($utente_liste);
$utente_esistente = esegui_query("select idutenti from $tableutenti where nome_utente = '".aggslashdb($utente_liste)."'");
if (numlin_query($utente_esistente) != 1) {
$utente_liste = esegui_query("select nome_utente from $tableutenti where idutenti = '1'");
$utente_liste = risul_query($utente_liste,0,'nome_utente');
} # fine if (numlin_query($utente_esistente) != 1)
if ($chiedi_num_app_tipologia != "SI") $chiedi_num_app_tipologia = "NO";
if ($chiedi_num_app_tipologia == "SI" and controlla_num_pos($max_num_app_tipologia) == "NO") {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di appartamenti per tipologia errato",'unit.php').".<br>";
} # fine if ($chiedi_num_app_tipologia == "SI" and controlla_num_pos($max_num_app_tipologia) == "NO")
if ($chiedi_num_app_tipologia == "NO" and controlla_num_pos($max_num_app_tipologia) == "NO") $max_num_app_tipologia = 0;
if ($chiedi_num_app_tipologia == "SI" and !$parola_appartamenti) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Si deve inserire la parola per indicare gli appartamenti",'unit.php').".<br>";
} # fine if ($chiedi_num_app_tipologia == "SI" and !$parola_appartamenti)
if ($chiedi_num_app_tipologia != "SI" and !$parola_appartamento) $parola_appartamento = mex2("appartamento",'unit.php',$lingua_modello);
if ($chiedi_num_app_tipologia != "SI" and !$parola_appartamenti) $parola_appartamenti = mex2("appartamenti",'unit.php',$lingua_modello);
if ($aggiungi_tipologie != "SI") $aggiungi_tipologie = "NO";
if ($aggiungi_tipologie == "SI" and (controlla_num_pos($max_num_tipologie) == "NO" or $max_num_tipologie == 0)) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di tipologie errato",$pag).".<br>";
} # fine if ($aggiungi_tipologie == "SI" and controlla_num_pos($max_num_tipologie) == "NO" and $max_num_tipologie != 0)
if ($aggiungi_tipologie != "SI" and (controlla_num_pos($max_num_tipologie) == "NO" or $max_num_tipologie == 0)) $max_num_tipologie = 3;
if ($chiedi_num_persone == "SI" and controlla_num_pos($max_num_persone) == "NO") {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di persone errato",$pag).".<br>";
} # fine if ($chiedi_num_persone == "SI" and controlla_num_pos($max_num_persone) == "NO")
if ($chiedi_num_persone != "SI" and controlla_num_pos($max_num_persone) == "NO") $max_num_persone = 0;
$dati_ca = dati_costi_agg_ntariffe($tablenometariffe_modello,"NO");
if ($chiedi_num_persone != "SI") $costo_aggiungi_letti = "";
if ($costo_aggiungi_letti != "" and ($dati_ca[$dati_ca['id'][$costo_aggiungi_letti]]['letto'] != "s" or $dati_ca[$dati_ca['id'][$costo_aggiungi_letti]]['numsett'] == "c" or $dati_ca[$dati_ca['id'][$costo_aggiungi_letti]]['mostra'] != "s" or $dati_ca[$costo_aggiungi_letti]['combina'] == "s")) $continua = "NO";
if ($chiedi_num_persone == "SI" and $costo_aggiungi_letti != "" and (controlla_num_pos($max_num_aggiungi_letti) == "NO" or $max_num_aggiungi_letti == 0)) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di letti aggiuntivi errato",$pag).".<br>";
} # fine if ($chiedi_num_persone == "SI" and $costo_aggiungi_letti != "" and...
if (($chiedi_num_persone != "SI" or $costo_aggiungi_letti == "") and (controlla_num_pos($max_num_aggiungi_letti) == "NO" or $max_num_aggiungi_letti == 0)) $max_num_aggiungi_letti = 2;
if ($mostra_costi_aggiuntivi == "SI" and (controlla_num_pos($num_colonne_costi_agg) == "NO" or $num_colonne_costi_agg == 0)) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero di colonne dei costi aggiuntivi errato",$pag).".<br>";
} # fine if ($mostra_costi_aggiuntivi == "SI" and (controlla_num_pos($num_colonne_costi_agg) == "NO" or $num_colonne_costi_agg == 0))
if ($mostra_costi_aggiuntivi != "SI" and (controlla_num_pos($num_colonne_costi_agg) == "NO" or $num_colonne_costi_agg == 0)) $num_colonne_costi_agg = 2;
if (str_replace("..","",$nome_modello_paypal) != $nome_modello_paypal) $nome_modello_paypal = "";
if (str_replace("/","",$nome_modello_paypal) != $nome_modello_paypal) $nome_modello_paypal = "";
if ($mostra_bottone_paypal != "SI") $nome_modello_paypal = "";
if (!$nome_modello_paypal) $mostra_bottone_paypal = "NO";
$indirizzo_email = $ind_email;
$utente_messaggio = $utente_mess;
if ($mostra_richiesta_via_mail == "SI" and !preg_match('/^[_\.0-9a-z-]+@([0-9a-z][0-9a-z-]+\.)+[a-z]{2,4}$/i',$indirizzo_email) and !$utente_messaggio) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Indirizzo email non valido",$pag).".<br>";
} # fine if ($mostra_richiesta_via_mail == "SI" and ...
if ($utente_messaggio and $utente_messaggio != "tutti") {
if (@get_magic_quotes_gpc()) $utente_messaggio = stripslashes($utente_messaggio);
$utente_esistente = esegui_query("select idutenti from $tableutenti where nome_utente = '".aggslashdb($utente_messaggio)."'");
if (numlin_query($utente_esistente) != 1) $continua = "NO";
} # fine if ($utente_messaggio and $utente_messaggio != "tutti")
if ((string) $orig_prenota != "") {
$origini_prenota = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'origini_prenota' and idutente = '1'");
$origini_prenota = risul_query($origini_prenota,0,'valpersonalizza');
if ($origini_prenota) {
if (get_magic_quotes_gpc()) $orig_prenota = stripslashes($orig_prenota);
$origini_prenota = explode(",",$origini_prenota);
$trovato = "NO";
for ($num1 = 0 ; $num1 < count($origini_prenota) ; $num1++) if ($origini_prenota[$num1] == $orig_prenota) $trovato = "SI";
if ($trovato == "NO") $orig_prenota = "";
} # fine if ($origini_prenota)
else $orig_prenota = "";
} # fine if ((string) $orig_prenota != "")
if ($chiedi_cognome != "SI" and $chiedi_cognome != "opzionale" and $chiedi_cognome != "NO") $chiedi_cognome = "NO";
if ($chiedi_nome != "SI" and $chiedi_nome != "opzionale" and $chiedi_nome != "NO") $chiedi_nome = "opzionale";
if ($chiedi_email != "SI" and $chiedi_email != "opzionale" and $chiedi_email != "NO") $chiedi_email = "SI";
if ($chiedi_sesso != "SI" and $chiedi_sesso != "opzionale" and $chiedi_sesso != "NO") $chiedi_sesso = "NO";
if ($chiedi_datanascita != "SI" and $chiedi_datanascita != "opzionale" and $chiedi_datanascita != "NO") $chiedi_datanascita = "NO";
if ($chiedi_documento != "SI" and $chiedi_documento != "opzionale" and $chiedi_documento != "NO") $chiedi_documento = "NO";
if ($chiedi_nazione != "SI" and $chiedi_nazione != "opzionale" and $chiedi_nazione != "NO") $chiedi_nazione = "NO";
if ($chiedi_citta != "SI" and $chiedi_citta != "opzionale" and $chiedi_citta != "NO") $chiedi_citta = "NO";
if ($chiedi_regione != "SI" and $chiedi_regione != "opzionale" and $chiedi_regione != "NO") $chiedi_regione = "NO";
if ($chiedi_via != "SI" and $chiedi_via != "opzionale" and $chiedi_via != "NO") $chiedi_via = "NO";
if ($chiedi_numcivico != "SI" and $chiedi_numcivico != "opzionale" and $chiedi_numcivico != "NO") $chiedi_numcivico = "NO";
if ($chiedi_cap != "SI" and $chiedi_cap != "opzionale" and $chiedi_cap != "NO") $chiedi_cap = "NO";
if ($chiedi_telefono != "SI" and $chiedi_telefono != "opzionale" and $chiedi_telefono != "NO") $chiedi_telefono = "NO";
if ($chiedi_telefono2 != "SI" and $chiedi_telefono2 != "opzionale" and $chiedi_telefono2 != "NO") $chiedi_telefono2 = "NO";
if ($chiedi_telefono3 != "SI" and $chiedi_telefono3 != "opzionale" and $chiedi_telefono3 != "NO") $chiedi_telefono3 = "NO";
if ($chiedi_fax != "SI" and $chiedi_fax != "opzionale" and $chiedi_fax != "NO") $chiedi_fax = "NO";
if ($chiedi_commento != "SI" and $chiedi_commento != "opzionale" and $chiedi_commento != "NO") $chiedi_commento = "opzionale";
if ($chiedi_oracheckin != "SI" and $chiedi_oracheckin != "opzionale" and $chiedi_oracheckin != "NO") $chiedi_oracheckin = "NO";
if ($chiedi_metodopagamento != "SI" and $chiedi_metodopagamento != "opzionale" and $chiedi_metodopagamento != "NO") $chiedi_metodopagamento = "NO";
if (!$num_metodi_pagamento) $num_metodi_pagamento = 0;
if (!$num_campi_pers) $num_campi_pers = 0;
if (controlla_num_pos($num_metodi_pagamento) == "NO") $continua = "NO";
if (controlla_num_pos($num_campi_pers) == "NO") $continua = "NO";
$campi_form_doc_condizioni = "";
$chiedi_campi_form_doc_condizioni = "";
if (!$num_campi_doc_cond) $num_campi_doc_cond = 0;
if (controlla_num_pos($num_campi_doc_cond) == "NO") $continua = "NO";
else {
$num_campo_doc_cond = 0;
$doc_usati = "";
for ($num1 = 1 ; $num1 <= $num_campi_doc_cond ; $num1++) {
$num_doc_cond = "num_doc_cond".$num1;
$chiedi_num_doc_cond = "chiedi_num_doc_cond".$num1;
global $$num_doc_cond,$$chiedi_num_doc_cond;
if (strcmp($$num_doc_cond,"") and !$doc_usati[$$num_doc_cond]) {
if (controlla_num_pos($$num_doc_cond) == "NO") $continua = "NO";
else {
$contr_txt = esegui_query("select numero from $tablecontratti where (tipo = 'contrtxt' or tipo = 'contrhtm') and numero = '".$$num_doc_cond."' ");
if (!numlin_query($contr_txt)) {
if ($silenzio == "NO") $continua = "NO";
} # fine if (!numlin_query($contr_txt))
else {
$salva_contr = esegui_query("select * from $tablecontratti where numero = '".$$num_doc_cond."' and tipo = 'dir' ");
if (numlin_query($salva_contr)) {
if ($silenzio == "NO") $continua = "NO";
} # fine if (numlin_query($salva_contr))
else {
$doc_usati[$$num_doc_cond] = 1;
$num_campo_doc_cond++;
$campi_form_doc_condizioni .= "\"".$num_campo_doc_cond."\" => \"".$$num_doc_cond."\",";
$chiedi_campi_form_doc_condizioni .= "\"".$num_campo_doc_cond."\" => \"".mex($$chiedi_num_doc_cond,$pag)."\",";
} # fine else if (numlin_query($salva_contr))
} # fine else if (!numlin_query($contr_txt))
} # fine else if (controlla_num_pos($num_doc_email_conferma) == "NO")
} # fine if (strcmp($$num_doc_cond,"") and !$doc_usati[$$num_doc_cond])
} # fine for $num1
if ($campi_form_doc_condizioni) $campi_form_doc_condizioni = substr($campi_form_doc_condizioni,0,-1);
if ($chiedi_campi_form_doc_condizioni) $chiedi_campi_form_doc_condizioni = substr($chiedi_campi_form_doc_condizioni,0,-1);
} # fine else if (controlla_num_pos($num_campi_doc_cond) == "NO")
} # fine if ($continua != "NO")
if ($continua != "NO") {
$rigatariffe = esegui_query("select * from $tablenometariffe_modello where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
$tariffe_mostra = "";
$nomi_tariffe_imposte = "";
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa++) {
$tariffa = "tariffa".$numtariffa;
global $$tariffa;
if ($$tariffa == "SI") $tariffe_mostra .= " $numtariffa => \"".mex("SI",$pag)."\",";
$nome_tariffa_imposto = "nome_tariffa_imposto".$numtariffa;
global $$nome_tariffa_imposto;
$$nome_tariffa_imposto = formatta_input_var_x_file($$nome_tariffa_imposto);
if ($$nome_tariffa_imposto) $nomi_tariffe_imposte .= "$numtariffa => \"".$$nome_tariffa_imposto."\",";
} # fine for $numtariffa
if ($tariffe_mostra) $tariffe_mostra = substr($tariffe_mostra,0,-1);
if ($nomi_tariffe_imposte) $nomi_tariffe_imposte = substr($nomi_tariffe_imposte,0,-1);
unset($nomi_costi_imposti);
unset($costi_attivati);
unset($nomi_categorie_imposte);
unset($nomi_cat_presenti);
for ($numca = 0 ; $numca < $dati_ca['num'] ; $numca++) {
global ${"attiva_costo".$dati_ca[$numca]['id']};
if (${"attiva_costo".$dati_ca[$numca]['id']} == "SI") {
$costi_attivati .= " ".$dati_ca[$numca]['id']." => \"".mex("SI",$pag)."\",";
$nome_costo_imposto = "nome_costo_imposto".$dati_ca[$numca]['id'];
global $$nome_costo_imposto;
$$nome_costo_imposto = formatta_input_var_x_file($$nome_costo_imposto);
if ($$nome_costo_imposto) $nomi_costi_imposti .= $dati_ca[$numca]['id']." => \"".$$nome_costo_imposto."\",";
} # fine if (${"attiva_costo".$dati_ca[$numca]['id']} == "SI")
if ($dati_ca[$numca]['combina'] == "s" and !$nomi_cat_presenti[$dati_ca[$numca]['categoria']]) {
$nome_cat_imp = "nome_cat_imp".$dati_ca[$numca]['id'];
global $$nome_cat_imp;
$$nome_cat_imp = formatta_input_var_x_file($$nome_cat_imp);
if ($$nome_cat_imp) {
$nomi_cat_presenti[$dati_ca[$numca]['categoria']] = 1;
$categoria = formatta_input_var_x_file($dati_ca[$numca]['categoria']);
$nomi_categorie_imposte .= "\"$categoria\" => \"".$$nome_cat_imp."\",";
} # fine if ($$nome_cat_imp)
} # fine if ($dati_ca[$numca]['combina'] == "s")
} # fine for $numca
if ($nomi_costi_imposti) $nomi_costi_imposti = substr($nomi_costi_imposti,0,-1);
if ($costi_attivati) $costi_attivati = substr($costi_attivati,0,-1);
if ($nomi_categorie_imposte) $nomi_categorie_imposte = substr($nomi_categorie_imposte,0,-1);
$motivazioni_regola1 = "";
for ($num1 = 0 ; $num1 < $num_motivazioni ; $num1 = $num1 + 1) {
$var_motivazione = "var_mot_".$num1;
global $$var_motivazione;
$motivazione = $$var_motivazione;
if ($motivazione) {
$motivazione = formatta_input_var_x_file($motivazione);
$motivazioni_regola1 .= "\"$motivazione\" => \"".mex("SI",$pag)."\",";
} # fine if ($motivazione)
} # fine for $num1
if ($motivazioni_regola1) $motivazioni_regola1 = substr($motivazioni_regola1,0,-1);
if ($utente_messaggio == "tutti") $utente_messaggio = mex("tutti",$pag);
$metodi_pagamento_da_chiedere = "";
$nomi_metodi_pagamento_imposti = "";
$metodi_pagamento = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'metodi_pagamento' and idutente = '1'");
$metodi_pagamento = risul_query($metodi_pagamento,0,'valpersonalizza');
$metodi_pagamento = explode(",",$metodi_pagamento);
for ($num1 = 0 ; $num1 < count($metodi_pagamento) ; $num1++) $esiste_met_paga[$metodi_pagamento[$num1]] = "SI";
for ($num1 = 0 ; $num1 < $num_metodi_pagamento ; $num1++) {
$var_met_paga = "var_met_paga_".$num1;
$nome_met_paga_imposto = "nome_met_paga_imposto_".$num1;
global $$var_met_paga,$$nome_met_paga_imposto;
$met_paga_compara = $$var_met_paga;
if (@get_magic_quotes_gpc()) $met_paga_compara = stripslashes($met_paga_compara);
else $met_paga_compara = $$var_met_paga;
if ($$var_met_paga and $esiste_met_paga[$met_paga_compara]) {
$$var_met_paga = formatta_input_var_x_file($$var_met_paga);
$$nome_met_paga_imposto = formatta_input_var_x_file($$nome_met_paga_imposto);
$metodi_pagamento_da_chiedere .= "\"".$$var_met_paga."\" => \"".mex("SI",$pag)."\",";
if ($$nome_met_paga_imposto) $nomi_metodi_pagamento_imposti .= "\"".$$var_met_paga."\" => \"".$$nome_met_paga_imposto."\",";
} # fine ($$var_met_paga and $esiste_met_paga[$$var_met_paga])
} # fine for $num1
if ($metodi_pagamento_da_chiedere) $metodi_pagamento_da_chiedere = substr($metodi_pagamento_da_chiedere,0,-1);
if ($nomi_metodi_pagamento_imposti) $nomi_metodi_pagamento_imposti = substr($nomi_metodi_pagamento_imposti,0,-1);
$campi_form_personalizzati = "";
$chiedi_campi_form_personalizzati = "";
$num_campo_pers = 0;
for ($num1 = 1 ; $num1 <= $num_campi_pers ; $num1++) {
$campo_pers = "campo_pers".$num1;
$chiedi_campo_pers = "chiedi_campo_pers".$num1;
global $$campo_pers,$$chiedi_campo_pers;
if (get_magic_quotes_gpc()) $$campo_pers = stripslashes($$campo_pers);
$$campo_pers = formatta_input_var_x_file($$campo_pers);
if ($$campo_pers and ($$chiedi_campo_pers == "SI" or $$chiedi_campo_pers == "opzionale")) {
$num_campo_pers++;
$campi_form_personalizzati .= "\"".$num_campo_pers."\" => \"".$$campo_pers."\",";
$chiedi_campi_form_personalizzati .= "\"".$num_campo_pers."\" => \"".mex($$chiedi_campo_pers,$pag)."\",";
} # fine if ($$campo_pers and...
} # fine for $num1
if ($campi_form_personalizzati) $campi_form_personalizzati = substr($campi_form_personalizzati,0,-1);
if ($chiedi_campi_form_personalizzati) $chiedi_campi_form_personalizzati = substr($chiedi_campi_form_personalizzati,0,-1);
if (!$mostra_quadro_disp) {
$mostra_quadro_disponibilita = "NO";
$raggruppa_quadro_disponibilita_con_regola_2 = "NO";
$raggruppa_quadro_disponibilita_con_persone = "NO";
} # fine if (!$mostra_quadro_disp)
else {
$mostra_quadro_disponibilita = "SI";
if ($mostra_quadro_disp == "reg2") $raggruppa_quadro_disponibilita_con_regola_2 = "SI";
else $raggruppa_quadro_disponibilita_con_regola_2 = "NO";
if ($mostra_quadro_disp == "pers") $raggruppa_quadro_disponibilita_con_persone = "SI";
else $raggruppa_quadro_disponibilita_con_persone = "NO";
} # fine else if (!$mostra_quadro_disp)
if ($mostra_numero_liberi_quadro_disponibilita != "SI") $mostra_numero_liberi_quadro_disponibilita = "NO";
if ($allinea_disponibilita_con_arrivo != "SI") $allinea_disponibilita_con_arrivo = "NO";
if (substr($spostamento_orizzontale_calendario,0,1) == "+") $spostamento_orizzontale_calendario = substr($spostamento_orizzontale_calendario,1);
if (!strcmp($spostamento_orizzontale_calendario,"") or controlla_num($spostamento_orizzontale_calendario) == "NO") $spostamento_orizzontale_calendario = 2;
if (defined("C_MASCHERA_EMAIL") and C_MASCHERA_EMAIL != "") $maschera_envelope = C_MASCHERA_EMAIL;
if (C_RESTRIZIONI_DEMO_ADMIN == "SI") {
$indirizzo_email = C_EMAIL_DEMO_ADMIN;
$manda_copia_richiesta_email = "NO";
} # fine if (C_RESTRIZIONI_DEMO_ADMIN == "SI")
if ($file_css_frame == "http://") $file_css_frame = "";
if ($apri_nuova_finestra_da_frame != "SI") $apri_nuova_finestra_da_frame = "NO";
if (!$larghezza_finestra_da_frame or controlla_num_pos($larghezza_finestra_da_frame) == "NO") $larghezza_finestra_da_frame = "700";
if (!$altezza_finestra_da_frame or controlla_num_pos($altezza_finestra_da_frame) == "NO") $altezza_finestra_da_frame = "620";
$num_colori = 0;
$extra_head_frame = "";
if (strcmp($tema_modello,"")) {
include("./includes/templates/temi_mod_disp.php");
$num_temi = count($template_theme_name);
for ($num1 = 1 ; $num1 <= $num_temi ; $num1++) {
if ($tema_modello == $template_theme_name[$num1]) {
$tema_trovato = 1;
$tema_sel = $num1;
} # fine if ($tema_modello == $template_theme_name[$num1])
} # fine for $num1
if ($tema_trovato) {
$prima_parte_html = $template_theme_html_pre[$tema_sel];
$ultima_parte_html = $template_theme_html_post[$tema_sel];
$extra_head_frame = $framed_mode_extra_head[$tema_sel];
$valori_tema = $template_theme_values[$tema_sel];
$num_valori = count($valori_tema);
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) {
global ${"valore_tema_".$num1};
${"valore_tema_".$num1} = formatta_input_var_x_file(${"valore_tema_".$num1});
$valore_sost = ${"valore_tema_".$num1};
if (!strcmp($valore_sost,"")) $valore_sost = $valori_tema[$num1]['null'];
elseif (strcmp($valori_tema[$num1]['replace'],"")) $valore_sost = str_replace("[theme_value_$num1]",$valore_sost,$valori_tema[$num1]['replace']);
$prima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$prima_parte_html);
$ultima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$ultima_parte_html);
$extra_head_frame = str_replace("[theme_value_$num1]",$valore_sost,$extra_head_frame);
} # fine for $num1
$colori_tema = $template_theme_colors[$tema_sel];
$num_colori = count($colori_tema);
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) {
global ${"colore_tema_".$num1};
if (!preg_match("/^#[0-9a-f]{3,3}$/i",${"colore_tema_".$num1}) and !preg_match("/^#[0-9a-f]{6,6}$/i",${"colore_tema_".$num1})) ${"colore_tema_".$num1} = $colori_tema[$num1]['default'];
$prima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$prima_parte_html);
$ultima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$ultima_parte_html);
$extra_head_frame = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$extra_head_frame);
} # fine for $num1
} # fine if ($tema_trovato)
else $tema_modello = "";
} # fine if (strcmp($tema_modello,""))
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
$HOTELD_DB_TYPE = "";
$HOTELD_DB_NAME = "";
$HOTELD_DB_HOST = "";
$HOTELD_DB_PORT = "";
$HOTELD_DB_USER = "";
$HOTELD_DB_PASS = "";
$HOTELD_TAB_PRE = "";
include(C_EXT_DB_DATA_PATH);
if ($HOTELD_DB_TYPE) $M_PHPR_DB_TYPE = "";
if ($HOTELD_DB_NAME) $M_PHPR_DB_NAME = "";
if ($HOTELD_DB_HOST) $M_PHPR_DB_HOST = "";
if (strcmp($HOTELD_DB_PORT,"")) $M_PHPR_DB_PORT = "";
if ($HOTELD_DB_USER) $M_PHPR_DB_USER = "";
if (strcmp($HOTELD_DB_PASS,"")) $M_PHPR_DB_PASS = "";
if ($HOTELD_TAB_PRE) $M_PHPR_TAB_PRE = "";
} # fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
$M_PHPR_DB_TYPE = formatta_input_var_x_file($M_PHPR_DB_TYPE);
$M_PHPR_DB_NAME = formatta_input_var_x_file($M_PHPR_DB_NAME);
$M_PHPR_DB_HOST = formatta_input_var_x_file($M_PHPR_DB_HOST);
$M_PHPR_DB_PORT = formatta_input_var_x_file($M_PHPR_DB_PORT);
$M_PHPR_DB_USER = formatta_input_var_x_file($M_PHPR_DB_USER);
$M_PHPR_DB_PASS = formatta_input_var_x_file($M_PHPR_DB_PASS);
$M_PHPR_LOAD_EXT = formatta_input_var_x_file($M_PHPR_LOAD_EXT);
$M_PHPR_TAB_PRE = formatta_input_var_x_file($M_PHPR_TAB_PRE);
$m_stile_soldi = formatta_input_var_x_file($m_stile_soldi);
$m_stile_data = formatta_input_var_x_file($m_stile_data);
$anteponi_nome_valuta = formatta_input_var_x_file($anteponi_nome_valuta);
$parola_appartamenti = formatta_input_var_x_file($parola_appartamenti);
$parola_appartamento = formatta_input_var_x_file($parola_appartamento);
$chiedi_num_persone = formatta_input_var_x_file($chiedi_num_persone);
$aggiungi_costi_fissi = formatta_input_var_x_file($aggiungi_costi_fissi);
$mostra_costi_aggiuntivi = formatta_input_var_x_file($mostra_costi_aggiuntivi);
$assegna_con_regola2 = formatta_input_var_x_file($assegna_con_regola2);
$mostra_frase_alternativa_regola1 = formatta_input_var_x_file($mostra_frase_alternativa_regola1);
$mostra_caparra = formatta_input_var_x_file($mostra_caparra);
$mostra_richiesta_via_mail = formatta_input_var_x_file($mostra_richiesta_via_mail);
$indirizzo_email = formatta_input_var_x_file($indirizzo_email);
$manda_copia_richiesta_email = formatta_input_var_x_file($manda_copia_richiesta_email);
$maschera_envelope = formatta_input_var_x_file($maschera_envelope);
$mostra_giorni_pieni = formatta_input_var_x_file($mostra_giorni_pieni);
$orig_prenota = formatta_input_var_x_file($orig_prenota);
$mostra_bottone_paypal = formatta_input_var_x_file($mostra_bottone_paypal);
$nome_modello_paypal = formatta_input_var_x_file($nome_modello_paypal);
$colore_sfondo_quadro_disponibilita = formatta_input_var_x_file($colore_sfondo_quadro_disponibilita);
$colore_inizio_settimana_quadro_disponibilita = formatta_input_var_x_file($colore_inizio_settimana_quadro_disponibilita);
$colore_libero_quadro_disponibilita = formatta_input_var_x_file($colore_libero_quadro_disponibilita);
$colore_occupato_quadro_disponibilita = formatta_input_var_x_file($colore_occupato_quadro_disponibilita);
$apertura_font_quadro_disponibilita = formatta_input_var_x_file($apertura_font_quadro_disponibilita);
$chiusura_font_quadro_disponibilita = formatta_input_var_x_file($chiusura_font_quadro_disponibilita);
$apertura_tag_font = formatta_input_var_x_file($apertura_tag_font);
$chiusura_tag_font = formatta_input_var_x_file($chiusura_tag_font);
$apertura_tag_font_rosse = formatta_input_var_x_file($apertura_tag_font_rosse);
$chiusura_tag_font_rosse = formatta_input_var_x_file($chiusura_tag_font_rosse);
$stile_tabella_prenotazione = formatta_input_var_x_file($stile_tabella_prenotazione);
$mostra_calendario_scelta_date = formatta_input_var_x_file($mostra_calendario_scelta_date);
$stile_riquadro_calendario = formatta_input_var_x_file($stile_riquadro_calendario);
$stile_tabella_calendario = formatta_input_var_x_file($stile_tabella_calendario);
$stile_bottoni_calendario = formatta_input_var_x_file($stile_bottoni_calendario);
$stile_bottone_apertura_calendario = formatta_input_var_x_file($stile_bottone_apertura_calendario);
$colore_data_attiva_calendario = formatta_input_var_x_file($colore_data_attiva_calendario);
$colore_data_selezionata_calendario = formatta_input_var_x_file($colore_data_selezionata_calendario);
$m_valuta_sing = formatta_input_var_x_file($m_valuta_sing);
$m_valuta_plur = formatta_input_var_x_file($m_valuta_plur);
$frase_alternativa_regola1 = formatta_input_var_x_file($frase_alternativa_regola1);
$file_css_frame = formatta_input_var_x_file($file_css_frame);
$extra_head_frame = formatta_input_var_x_file($extra_head_frame);
if (get_magic_quotes_gpc()) $prima_parte_html = stripslashes($prima_parte_html);
$prima_parte_html = str_replace("<?","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("?>","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("<%","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("%>","ERROR",$prima_parte_html);
$prima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$prima_parte_html);
if (get_magic_quotes_gpc()) $ultima_parte_html = stripslashes($ultima_parte_html);
$ultima_parte_html = str_replace("<?","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("?>","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("<%","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("%>","ERROR",$ultima_parte_html);
$ultima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$ultima_parte_html);
# FRASI
if ($cambia_frasi == "SI" or $modello_esistente == "SI") {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) {
global ${$fr_frase[$num_fr]};
${$fr_frase[$num_fr]} = formatta_input_var_x_file(${$fr_frase[$num_fr]});
} # fine for $num_fr
} # fine if ($cambia_frasi == "SI" or $modello_esistente == "SI")
else {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) ${$fr_frase[$num_fr]} = mex2($frase[$num_fr],$pag,$lingua_modello);
} # fine else if ($cambia_frasi == "SI" or $modello_esistente == "SI")
$cost_percorso_a_dati = "";
if (function_exists("realpath")) {
if (realpath(C_DATA_PATH."/")) $cost_percorso_a_dati = realpath(C_DATA_PATH."/")."/";
} # fine if (function_exists("realpath"))
if ((string) $cost_percorso_a_dati == "") {
if (substr(C_DATA_PATH,0,1) == "/") $cost_percorso_a_dati = C_DATA_PATH;
else {
$dati_path = C_DATA_PATH;
if (substr($dati_path,0,2) == "./") $dati_path = substr($dati_path,1);
else $dati_path = "/".$dati_path;
if ($_SERVER["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($_SERVER["SCRIPT_FILENAME"]).$dati_path;
else {
if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($HTTP_SERVER_VARS["SCRIPT_FILENAME"]).$dati_path;
else {
if ($SCRIPT_FILENAME) $cost_percorso_a_dati = dirname($SCRIPT_FILENAME).$dati_path;
else $cost_percorso_a_dati = "./";
} # fine else if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"])
} # fine else if ($_SERVER["SCRIPT_FILENAME"])
} # fine else if (substr(C_DATI_PATH,0,1) == "/")
} # fine if ((string) $cost_percorso_a_dati == "")
$nome_file = mex2("mdl_disponibilita",$pag,$lingua_modello).".php";
$file = @fopen("$percorso_cartella_modello/$nome_file","w+");
if ($file) {
flock($file,2);
fwrite($file,"<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>$prima_parte_html
<!-- ".mex("FINE DELLA PRIMA PARTE DELL'HTML PERSONALE",$pag)." -->
<?php
} # fine if (!\$framed and !\$_GET['framed'] and !\$_POST['framed'])
# ".mex("INIZIO VARIABILI MODIFICABILI",$pag)." (".mex("modificare il valore sulla destra",$pag).")
# ".mex("Inserire in questa variabile il nome della pagina se \$PHP_SELF non è definita",$pag)."
\$".mex("var_nome_pagina",$pag)." = \"\";
\$".mex("var_anno",$pag)." = $anno_modello;
\$".mex("var_tipo_db",$pag)." = \"$M_PHPR_DB_TYPE\";
\$".mex("var_nome_db",$pag)." = \"$M_PHPR_DB_NAME\";
\$".mex("var_computer_db",$pag)." = \"$M_PHPR_DB_HOST\";
\$".mex("var_porta_db",$pag)." = \"$M_PHPR_DB_PORT\";
\$".mex("var_utente_db",$pag)." = \"$M_PHPR_DB_USER\";
\$".mex("var_password_db",$pag)." = \"$M_PHPR_DB_PASS\";
\$".mex("var_carica_estensione_db",$pag)." = \"".mex("$M_PHPR_LOAD_EXT",$pag)."\";
\$".mex("var_prefisso_tabelle_db",$pag)." = \"$M_PHPR_TAB_PRE\";
\$".mex("var_lingua_modello",$pag)." = \"$lingua_modello\";
\$".mex("var_stile_soldi",$pag)." = \"".mex("$m_stile_soldi",$pag)."\";
\$".mex("var_stile_data",$pag)." = \"".mex("$m_stile_data",$pag)."\";
\$".mex("var_anteponi_nome_valuta",$pag)." = \"".mex("$anteponi_nome_valuta",$pag)."\";
\$".mex("var_utente_liste",$pag)." = \"".mex("$utente_liste",$pag)."\";
\$".mex("var_estendi_ultima_data",$pag)." = \"".mex("$estendi_ultima_data",$pag)."\";
\$".mex("var_periodi_no_richieste",$pag)." = \"$sett_no_prenota\";
\$".mex("var_tariffe_mostra",$pag)." = array($tariffe_mostra);
\$".mex("var_nomi_tariffe_imposte",$pag)." = array($nomi_tariffe_imposte);
\$".mex("var_chiedi_numero_appartamenti_per_tipologia",$pag)." = \"".mex("$chiedi_num_app_tipologia",$pag)."\";
\$".mex("var_massimo_numero_appartamenti_per_tipologia",$pag)." = \"$max_num_app_tipologia\";
\$".mex("var_aggiungi_altre_tipologie",$pag)." = \"".mex("$aggiungi_tipologie",$pag)."\";
\$".mex("var_massimo_numero_altre_tipologie",$pag)." = \"$max_num_tipologie\";
\$".mex("var_chiedi_numero_persone",$pag)." = \"".mex("$chiedi_num_persone",$pag)."\";
\$".mex("var_massimo_numero_persone",$pag)." = \"$max_num_persone\";
\$".mex("var_costo_aggiungi_letti",$pag)." = \"$costo_aggiungi_letti\";
\$".mex("var_massimo_numero_letti_aggiuntivi",$pag)." = \"$max_num_aggiungi_letti\";
\$".mex("var_aggiungi_costi_fissi",$pag)." = \"".mex("$aggiungi_costi_fissi",$pag)."\";
\$".mex("var_chiedi_costi_aggiuntivi_di_pag_inserzione",$pag)." = \"".mex("$mostra_costi_aggiuntivi",$pag)."\";
\$".mex("var_numero_colonne_costi_aggiuntivi",$pag)." = \"$num_colonne_costi_agg\";
\$".mex("var_costi_aggiuntivi_mostra",$pag)." = array($costi_attivati);
\$".mex("var_nomi_costi_agg_imposti",$pag)." = array($nomi_costi_imposti);
\$".mex("var_categorie_costi_agg_imposte",$pag)." = array($nomi_categorie_imposte);
\$".mex("var_assegna_con_regola2",$pag)." = \"".mex("$assegna_con_regola2",$pag)."\";
\$".mex("var_considera_motivazioni_regola1",$pag)." = array($motivazioni_regola1);
\$".mex("var_mostra_frase_alternativa_regola1",$pag)." = \"".mex("$mostra_frase_alternativa_regola1",$pag)."\";
\$".mex("var_mostra_caparra",$pag)." = \"".mex("$mostra_caparra",$pag)."\";
\$".mex("var_mostra_richiesta_via_mail",$pag)." = \"".mex("$mostra_richiesta_via_mail",$pag)."\";
\$".mex("var_indirizzo_email",$pag)." = \"$indirizzo_email\";
\$".mex("var_manda_copia_richiesta_email",$pag)." = \"".mex("$manda_copia_richiesta_email",$pag)."\";
\$".mex("var_maschera_email",$pag)." = \"".mex("$maschera_envelope",$pag)."\";
\$".mex("var_mostra_giorni_pieni",$pag)." = \"".mex("$mostra_giorni_pieni",$pag)."\";
\$".mex("var_mostra_bottone_paypal",$pag)." = \"".mex("$mostra_bottone_paypal",$pag)."\";
\$".mex("var_nome_modello_paypal",$pag)." = \"".$nome_modello_paypal."\";
\$".mex("var_utente_messaggio",$pag)." = \"$utente_messaggio\";
\$".mex("var_origine_prenotazione",$pag)." = \"".$orig_prenota."\";
\$".mex("var_chiedi_cognome",$pag)." = \"".mex("$chiedi_cognome",$pag)."\";
\$".mex("var_chiedi_nome",$pag)." = \"".mex("$chiedi_nome",$pag)."\";
\$".mex("var_chiedi_email",$pag)." = \"".mex("$chiedi_email",$pag)."\";
\$".mex("var_chiedi_sesso",$pag)." = \"".mex("$chiedi_sesso",$pag)."\";
\$".mex("var_chiedi_datanascita",$pag)." = \"".mex("$chiedi_datanascita",$pag)."\";
\$".mex("var_chiedi_documento",$pag)." = \"".mex("$chiedi_documento",$pag)."\";
\$".mex("var_chiedi_nazione",$pag)." = \"".mex("$chiedi_nazione",$pag)."\";
\$".mex("var_chiedi_citta",$pag)." = \"".mex("$chiedi_citta",$pag)."\";
\$".mex("var_chiedi_regione",$pag)." = \"".mex("$chiedi_regione",$pag)."\";
\$".mex("var_chiedi_via",$pag)." = \"".mex("$chiedi_via",$pag)."\";
\$".mex("var_chiedi_numcivico",$pag)." = \"".mex("$chiedi_numcivico",$pag)."\";
\$".mex("var_chiedi_cap",$pag)." = \"".mex("$chiedi_cap",$pag)."\";
\$".mex("var_chiedi_telefono",$pag)." = \"".mex("$chiedi_telefono",$pag)."\";
\$".mex("var_chiedi_telefono2",$pag)." = \"".mex("$chiedi_telefono2",$pag)."\";
\$".mex("var_chiedi_telefono3",$pag)." = \"".mex("$chiedi_telefono3",$pag)."\";
\$".mex("var_chiedi_fax",$pag)." = \"".mex("$chiedi_fax",$pag)."\";
\$".mex("var_chiedi_commento",$pag)." = \"".mex("$chiedi_commento",$pag)."\";
\$".mex("var_chiedi_oracheckin",$pag)." = \"".mex("$chiedi_oracheckin",$pag)."\";
\$".mex("var_chiedi_metodopagamento",$pag)." = \"".mex("$chiedi_metodopagamento",$pag)."\";
\$".mex("var_metodi_pagamento_da_chiedere",$pag)." = array($metodi_pagamento_da_chiedere);
\$".mex("var_nomi_metodi_pagamento_imposti",$pag)." = array($nomi_metodi_pagamento_imposti);
\$".mex("var_campi_form_personalizzati",$pag)." = array($campi_form_personalizzati);
\$".mex("var_chiedi_campi_form_personalizzati",$pag)." = array($chiedi_campi_form_personalizzati);
\$".mex("var_campi_form_doc_condizioni",$pag)." = array($campi_form_doc_condizioni);
\$".mex("var_chiedi_campi_form_doc_condizioni",$pag)." = array($chiedi_campi_form_doc_condizioni);
\$".mex("var_mostra_quadro_disponibilita",$pag)." = \"".mex("$mostra_quadro_disponibilita",$pag)."\";
\$".mex("var_raggruppa_quadro_disponibilita_con_regola_2",$pag)." = \"".mex("$raggruppa_quadro_disponibilita_con_regola_2",$pag)."\";
\$".mex("var_raggruppa_quadro_disponibilita_con_persone",$pag)." = \"".mex("$raggruppa_quadro_disponibilita_con_persone",$pag)."\";
\$".mex("var_colore_sfondo_quadro_disponibilita",$pag)." = \"$colore_sfondo_quadro_disponibilita\";
\$".mex("var_colore_inizio_settimana_quadro_disponibilita",$pag)." = \"$colore_inizio_settimana_quadro_disponibilita\";
\$".mex("var_colore_libero_quadro_disponibilita",$pag)." = \"$colore_libero_quadro_disponibilita\";
\$".mex("var_colore_occupato_quadro_disponibilita",$pag)." = \"$colore_occupato_quadro_disponibilita\";
\$".mex("var_apertura_font_quadro_disponibilita",$pag)." = \"$apertura_font_quadro_disponibilita\";
\$".mex("var_chiusura_font_quadro_disponibilita",$pag)." = \"$chiusura_font_quadro_disponibilita\";
\$".mex("var_mostra_numero_liberi_quadro_disponibilita",$pag)." = \"".mex("$mostra_numero_liberi_quadro_disponibilita",$pag)."\";
\$".mex("var_allinea_disponibilita_con_arrivo",$pag)." = \"".mex("$allinea_disponibilita_con_arrivo",$pag)."\";
\$".mex("var_mostra_calendario_scelta_date",$pag)." = \"".mex("$mostra_calendario_scelta_date",$pag)."\";
\$".mex("var_stile_riquadro_calendario",$pag)." = \"$stile_riquadro_calendario\";
\$".mex("var_stile_tabella_calendario",$pag)." = \"$stile_tabella_calendario\";
\$".mex("var_stile_bottoni_calendario",$pag)." = \"$stile_bottoni_calendario\";
\$".mex("var_stile_bottone_apertura_calendario",$pag)." = \"$stile_bottone_apertura_calendario\";
\$".mex("var_spostamento_orizzontale_calendario",$pag)." = \"$spostamento_orizzontale_calendario\";
\$".mex("var_colore_data_attiva_calendario",$pag)." = \"$colore_data_attiva_calendario\";
\$".mex("var_colore_data_selezionata_calendario",$pag)." = \"$colore_data_selezionata_calendario\";
\$".mex("var_apertura_tag_font",$pag)." = \"$apertura_tag_font\";
\$".mex("var_chiusura_tag_font",$pag)." = \"$chiusura_tag_font\";
\$".mex("var_apertura_tag_font_rosse",$pag)." = \"$apertura_tag_font_rosse\";
\$".mex("var_chiusura_tag_font_rosse",$pag)." = \"$chiusura_tag_font_rosse\";
\$".mex("var_stile_tabella_prenotazione",$pag)." = \"$stile_tabella_prenotazione\";
\$".mex("var_file_css_frame",$pag)." = \"$file_css_frame\";
\$".mex("var_apri_nuova_finestra_da_frame",$pag)." = \"".mex("$apri_nuova_finestra_da_frame",$pag)."\";
\$".mex("var_larghezza_finestra_da_frame",$pag)." = \"$larghezza_finestra_da_frame\";
\$".mex("var_altezza_finestra_da_frame",$pag)." = \"$altezza_finestra_da_frame\";
\$".mex("var_tema_modello",$pag)." = \"$tema_modello\";
");
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) fwrite($file,"\$".mex("var_colore_tema",$pag)."_$num1 = \"".${"colore_tema_".$num1}."\";
");
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) fwrite($file,"\$".mex("var_valore_tema",$pag)."_$num1 = \"".${"valore_tema_".$num1}."\";
");
fwrite($file,"
# ".mex("FRASI",$pag)."
\$".mex("var_fr_Valuta_sing",$pag)." = \"".$m_valuta_sing."\";
\$".mex("var_fr_Valuta_plur",$pag)." = \"".$m_valuta_plur."\";
\$".mex("var_fr_appartamenti",$pag)." = \"".$parola_appartamenti."\";
\$".mex("var_fr_appartamento",$pag)." = \"".$parola_appartamento."\";
\$".mex("var_fr_alternativa_regola1",$pag)." = \"".$frase_alternativa_regola1."\";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".mex("var_".$fr_frase[$num_fr],$pag)." = \"".${$fr_frase[$num_fr]}."\";
");
fwrite($file,"
# ".mex("FRASI EMAIL",$pag)."
\$".mex("var_fre_Email",$pag)." = \"".mex("Email",$pag)."\";
\$".mex("var_fre_Nome",$pag)." = \"".mex("Nome",$pag)."\";
\$".mex("var_fre_Commento",$pag)." = \"".mex("Commento",$pag)."\";
\$".mex("var_fre_Periodo",$pag)." = \"".mex("Periodo",$pag)."\";
\$".mex("var_fre_dal",$pag)." = \"".mex("dal",$pag)."\";
\$".mex("var_fre_al",$pag)." = \"".mex("al",$pag)."\";
\$".mex("var_fre_Tariffa",$pag)." = \"".mex("Tariffa",$pag)."\";
\$".mex("var_fre_Costi_aggiuntivi",$pag)." = \"".mex("Costi aggiuntivi",$pag)."\";
\$".mex("var_fre_sett",$pag)." = \"".mex("$parola_settimane",$pag)."\";
\$".mex("var_fre_Numero_di_appartamenti",$pag)." = \"".mex("Numero di appartamenti",'unit.php')."\";
\$".mex("var_fre_Prezzo_totale",$pag)." = \"".mex("Prezzo totale",$pag)."\";
\$".mex("var_fre_Riferimento",$pag)." = \"".mex("Riferimento",$pag)."\";
\$".mex("var_fre_Richesta_prenotazione",$pag)." = \"".mex("Richesta prenotazione",$pag)."\";
\$".mex("var_fre_Caparra",$pag)." = \"".mex("Caparra",$pag)."\";
\$".mex("var_fre_Persone",$pag)." = \"".mex("Persone",$pag)."\";
\$".mex("var_fre_Cognome",$pag)." = \"".mex("Cognome",$pag)."\";
\$".mex("var_fre_Genere",$pag)." = \"".mex("Genere",$pag)."\";
\$".mex("var_fre_Data_di_nascita",$pag)." = \"".mex("Data di nascita",$pag)."\";
\$".mex("var_fre_Documento",$pag)." = \"".mex("Documento",$pag)."\";
\$".mex("var_fre_Nazione",$pag)." = \"".mex("Nazione",$pag)."\";
\$".mex("var_fre_Citta",$pag)." = \"".mex("Città",$pag)."\";
\$".mex("var_fre_Regione",$pag)." = \"".mex("Regione",$pag)."\";
\$".mex("var_fre_Via",$pag)." = \"".mex("Via",$pag)."\";
\$".mex("var_fre_Numero_civico",$pag)." = \"".mex("Numero civico",$pag)."\";
\$".mex("var_fre_Codice_postale",$pag)." = \"".mex("Codice postale",$pag)."\";
\$".mex("var_fre_Telefono",$pag)." = \"".mex("Telefono",$pag)."\";
\$".mex("var_fre_Secondo_telefono",$pag)." = \"".mex("Secondo telefono",$pag)."\";
\$".mex("var_fre_Terzo_telefono",$pag)." = \"".mex("Terzo telefono",$pag)."\";
\$".mex("var_fre_Fax",$pag)." = \"".mex("Fax",$pag)."\";
\$".mex("var_fre_Orario_stimato_di_arrivo",$pag)." = \"".mex("Orario stimato di arrivo",$pag)."\";
\$".mex("var_fre_Metodo_di_pagamento_della_caparra",$pag)." = \"".mex("Metodo di pagamento della caparra",$pag)."\";
# ".mex("PERIODI NEI MENU",$pag)."
\$".mex("var_periodi_menu",$pag)." = \"$date_in_menu\";
\$d_names = \"$d_names\";
\$m_names = \"$m_names\";
# ".mex("FINE VARIABILI MODIFICABILI",$pag)."
############################################################################
### ".mex("NON MODIFICARE NIENTE A PARTIRE DA QUI",$pag)."
############################################################################
error_reporting(E_ALL ^ E_NOTICE);
\$PHPR_LOG = \"NO\";
\$pag = \$".mex("var_nome_pagina",$pag).";
if (!\$pag) {
if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or @\$HTTP_SERVER_VARS[\"PHP_SELF\"]) {
if (@\$_SERVER[\"PHP_SELF\"]) \$PHP_SELF = \$_SERVER[\"PHP_SELF\"];
else if (@\$HTTP_SERVER_VARS[\"PHP_SELF\"]) \$PHP_SELF = \$HTTP_SERVER_VARS[\"PHP_SELF\"];
\$pag = explode(\"/\",\$PHP_SELF);
\$pag = \$pag[(count(\$pag)-1)];
} # fine if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or...
else echo \"".mex("La variabile \\\$PHP_SELF non è definita, si dovrà editare a mano questa pagina per inserirne il nome",$pag).".<br>\";
} # fine if (!\$pag)
define(C_PERCORSO_A_DATI,\"$cost_percorso_a_dati\");
\$anno = \$".mex("var_anno",$pag).";
\$PHPR_DB_TYPE = \$".mex("var_tipo_db",$pag).";
\$PHPR_DB_NAME = \$".mex("var_nome_db",$pag).";
\$PHPR_DB_HOST = \$".mex("var_computer_db",$pag).";
\$PHPR_DB_PORT = \$".mex("var_porta_db",$pag).";
\$PHPR_DB_USER = \$".mex("var_utente_db",$pag).";
\$PHPR_DB_PASS = \$".mex("var_password_db",$pag).";
if (strtoupper(\$".mex("var_carica_estensione_db",$pag).") == \"".mex("SI",$pag)."\") \$PHPR_LOAD_EXT = \"SI\";
else \$PHPR_LOAD_EXT = \"NO\";
\$PHPR_TAB_PRE = \$".mex("var_prefisso_tabelle_db",$pag).";
");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) fwrite($file,"\$HOTELD_DB_TYPE = \"\";
\$HOTELD_DB_NAME = \"\";
\$HOTELD_DB_HOST = \"\";
\$HOTELD_DB_PORT = \"\";
\$HOTELD_DB_USER = \"\";
\$HOTELD_DB_PASS = \"\";
\$HOTELD_TAB_PRE = \"\";
require('".C_EXT_DB_DATA_PATH."');
if (\$HOTELD_DB_TYPE) \$PHPR_DB_TYPE = \$HOTELD_DB_TYPE;
if (\$HOTELD_DB_NAME) \$PHPR_DB_NAME = \$HOTELD_DB_NAME;
if (\$HOTELD_DB_HOST) \$PHPR_DB_HOST = \$HOTELD_DB_HOST;
if (strcmp(\$HOTELD_DB_PORT,\"\")) \$PHPR_DB_PORT = \$HOTELD_DB_PORT;
if (\$HOTELD_DB_USER) \$PHPR_DB_USER = \$HOTELD_DB_USER;
if (strcmp(\$HOTELD_DB_PASS,\"\")) \$PHPR_DB_PASS = \$HOTELD_DB_PASS;
if (\$HOTELD_TAB_PRE) \$PHPR_TAB_PRE = \$HOTELD_TAB_PRE;
");
fwrite($file,"\$lingua_modello = \$".mex("var_lingua_modello",$pag).";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("europa",$pag)."\") \$stile_soldi = \"europa\";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("usa",$pag)."\") \$stile_soldi = \"usa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("europa",$pag)."\") \$stile_data = \"europa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("usa",$pag)."\") \$stile_data = \"usa\";
if (strtoupper(\$".mex("var_anteponi_nome_valuta",$pag).") == \"".mex("SI",$pag)."\") \$anteponi_nome_valuta = \"SI\";
else \$anteponi_nome_valuta = \"NO\";
\$utente_liste = \$".mex("var_utente_liste",$pag).";
if (strtoupper(\$".mex("var_estendi_ultima_data",$pag).") == \"".mex("SI",$pag)."\") \$estendi_ultima_data = \"SI\";
else \$estendi_ultima_data = \"NO\";
\$sett_no_prenota = \$".mex("var_periodi_no_richieste",$pag).";
unset(\$tariffe_mostra);
reset (\$".mex("var_tariffe_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_tariffe_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$tariffe_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$tariffe_mostra[\$key] = \"NO\";
} # fine while
\$n_tariffe_imposte = \$".mex("var_nomi_tariffe_imposte",$pag).";
if (strtoupper(\$".mex("var_chiedi_numero_appartamenti_per_tipologia",$pag).") == \"".mex("SI",$pag)."\") \$chiedi_num_app_tipologia = \"SI\";
else \$chiedi_num_app_tipologia = \"NO\";
\$max_num_app_tipologia = \$".mex("var_massimo_numero_appartamenti_per_tipologia",$pag).";
if (strtoupper(\$".mex("var_aggiungi_altre_tipologie",$pag).") == \"".mex("SI",$pag)."\") \$aggiungi_tipologie = \"SI\";
else \$aggiungi_tipologie = \"NO\";
\$max_num_tipologie = \$".mex("var_massimo_numero_altre_tipologie",$pag).";
if (strtoupper(\$".mex("var_chiedi_numero_persone",$pag).") == \"".mex("SI",$pag)."\") \$chiedi_num_persone = \"SI\";
else \$chiedi_num_persone = \"NO\";
\$max_num_persone = \$".mex("var_massimo_numero_persone",$pag).";
\$costo_aggiungi_letti = \$".mex("var_costo_aggiungi_letti",$pag).";
\$max_num_aggiungi_letti = \$".mex("var_massimo_numero_letti_aggiuntivi",$pag).";
if (strtoupper(\$".mex("var_chiedi_costi_aggiuntivi_di_pag_inserzione",$pag).") == \"".mex("SI",$pag)."\") \$mostra_costi_aggiuntivi = \"SI\";
else \$mostra_costi_aggiuntivi = \"NO\";
\$num_colonne_costi_agg = \$".mex("var_numero_colonne_costi_aggiuntivi",$pag).";
if (strtoupper(\$".mex("var_aggiungi_costi_fissi",$pag).") == \"".mex("SI",$pag)."\") \$aggiungi_costi_fissi = \"SI\";
else \$aggiungi_costi_fissi = \"NO\";
unset(\$costi_agg_mostra);
reset (\$".mex("var_costi_aggiuntivi_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_costi_aggiuntivi_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$costi_agg_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$costi_agg_mostra[\$key] = \"NO\";
} # fine while
\$n_costi_agg_imposti = \$".mex("var_nomi_costi_agg_imposti",$pag).";
\$cat_costi_agg_imposte = \$".mex("var_categorie_costi_agg_imposte",$pag).";
if (strtoupper(\$".mex("var_assegna_con_regola2",$pag).") == \"".mex("SI",$pag)."\") \$assegna_con_regola2 = \"SI\";
else \$assegna_con_regola2 = \"NO\";
unset(\$motivazioni_regola1);
reset (\$".mex("var_considera_motivazioni_regola1",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_considera_motivazioni_regola1",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$motivazioni_regola1[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$motivazioni_regola1[\$key] = \"NO\";
} # fine while
if (strtoupper(\$".mex("var_mostra_frase_alternativa_regola1",$pag).") == \"".mex("SI",$pag)."\") \$mostra_frase_alternativa_regola1 = \"SI\";
else \$mostra_frase_alternativa_regola1 = \"NO\";
if (strtoupper(\$".mex("var_mostra_caparra",$pag).") == \"".mex("SI",$pag)."\") \$mostra_caparra = \"SI\";
else \$mostra_caparra = \"NO\";
if (strtoupper(\$".mex("var_mostra_richiesta_via_mail",$pag).") == \"".mex("SI",$pag)."\") \$mostra_richiesta_via_mail = \"SI\";
else \$mostra_richiesta_via_mail = \"NO\";
\$indirizzo_email = \$".mex("var_indirizzo_email",$pag).";
if (strtoupper(\$".mex("var_manda_copia_richiesta_email",$pag).") == \"".mex("SI",$pag)."\") \$manda_copia_richiesta_email = \"SI\";
else \$manda_copia_richiesta_email = \"NO\";
if (strtoupper(\$".mex("var_maschera_email",$pag).") == \"".mex("SI",$pag)."\") \$maschera_envelope = \"SI\";
else \$maschera_envelope = \"NO\";
if (strtoupper(\$".mex("var_mostra_giorni_pieni",$pag).") == \"".mex("SI",$pag)."\") \$mostra_giorni_pieni = \"SI\";
else \$mostra_giorni_pieni = \"NO\";
if (strtoupper(\$".mex("var_mostra_bottone_paypal",$pag).") == \"".mex("SI",$pag)."\") \$mostra_bottone_paypal = \"SI\";
else \$mostra_bottone_paypal = \"NO\";
\$nome_modello_paypal = \$".mex("var_nome_modello_paypal",$pag).";
\$utente_messaggio = \$".mex("var_utente_messaggio",$pag).";
if (strtolower(\$utente_messaggio) == strtolower(\"".mex("tutti",$pag)."\")) \$utente_messaggio = \"tutti\";
\$origine_prenotazione = \$".mex("var_origine_prenotazione",$pag).";
\$chiedi_cognome = \$".mex("var_chiedi_cognome",$pag).";
if (strtoupper(\$chiedi_cognome) == \"".mex("SI",$pag)."\") \$chiedi_cognome = \"SI\";
if (strtoupper(\$chiedi_cognome) == \"".mex("NO",$pag)."\") \$chiedi_cognome = \"NO\";
\$chiedi_nome = \$".mex("var_chiedi_nome",$pag).";
if (strtoupper(\$chiedi_nome) == \"".mex("SI",$pag)."\") \$chiedi_nome = \"SI\";
if (strtoupper(\$chiedi_nome) == \"".mex("NO",$pag)."\") \$chiedi_nome = \"NO\";
\$chiedi_email = \$".mex("var_chiedi_email",$pag).";
if (strtoupper(\$chiedi_email) == \"".mex("SI",$pag)."\") \$chiedi_email = \"SI\";
if (strtoupper(\$chiedi_email) == \"".mex("NO",$pag)."\") \$chiedi_email = \"NO\";
\$chiedi_sesso = \$".mex("var_chiedi_sesso",$pag).";
if (strtoupper(\$chiedi_sesso) == \"".mex("SI",$pag)."\") \$chiedi_sesso = \"SI\";
if (strtoupper(\$chiedi_sesso) == \"".mex("NO",$pag)."\") \$chiedi_sesso = \"NO\";
\$chiedi_datanascita = \$".mex("var_chiedi_datanascita",$pag).";
if (strtoupper(\$chiedi_datanascita) == \"".mex("SI",$pag)."\") \$chiedi_datanascita = \"SI\";
if (strtoupper(\$chiedi_datanascita) == \"".mex("NO",$pag)."\") \$chiedi_datanascita = \"NO\";
\$chiedi_documento = \$".mex("var_chiedi_documento",$pag).";
if (strtoupper(\$chiedi_documento) == \"".mex("SI",$pag)."\") \$chiedi_documento = \"SI\";
if (strtoupper(\$chiedi_documento) == \"".mex("NO",$pag)."\") \$chiedi_documento = \"NO\";
\$chiedi_nazione = \$".mex("var_chiedi_nazione",$pag).";
if (strtoupper(\$chiedi_nazione) == \"".mex("SI",$pag)."\") \$chiedi_nazione = \"SI\";
if (strtoupper(\$chiedi_nazione) == \"".mex("NO",$pag)."\") \$chiedi_nazione = \"NO\";
\$chiedi_citta = \$".mex("var_chiedi_citta",$pag).";
if (strtoupper(\$chiedi_citta) == \"".mex("SI",$pag)."\") \$chiedi_citta = \"SI\";
if (strtoupper(\$chiedi_citta) == \"".mex("NO",$pag)."\") \$chiedi_citta = \"NO\";
\$chiedi_regione = \$".mex("var_chiedi_regione",$pag).";
if (strtoupper(\$chiedi_regione) == \"".mex("SI",$pag)."\") \$chiedi_regione = \"SI\";
if (strtoupper(\$chiedi_regione) == \"".mex("NO",$pag)."\") \$chiedi_regione = \"NO\";
\$chiedi_via = \$".mex("var_chiedi_via",$pag).";
if (strtoupper(\$chiedi_via) == \"".mex("SI",$pag)."\") \$chiedi_via = \"SI\";
if (strtoupper(\$chiedi_via) == \"".mex("NO",$pag)."\") \$chiedi_via = \"NO\";
\$chiedi_numcivico = \$".mex("var_chiedi_numcivico",$pag).";
if (strtoupper(\$chiedi_numcivico) == \"".mex("SI",$pag)."\") \$chiedi_numcivico = \"SI\";
if (strtoupper(\$chiedi_numcivico) == \"".mex("NO",$pag)."\") \$chiedi_numcivico = \"NO\";
\$chiedi_cap = \$".mex("var_chiedi_cap",$pag).";
if (strtoupper(\$chiedi_cap) == \"".mex("SI",$pag)."\") \$chiedi_cap = \"SI\";
if (strtoupper(\$chiedi_cap) == \"".mex("NO",$pag)."\") \$chiedi_cap = \"NO\";
\$chiedi_telefono = \$".mex("var_chiedi_telefono",$pag).";
if (strtoupper(\$chiedi_telefono) == \"".mex("SI",$pag)."\") \$chiedi_telefono = \"SI\";
if (strtoupper(\$chiedi_telefono) == \"".mex("NO",$pag)."\") \$chiedi_telefono = \"NO\";
\$chiedi_telefono2 = \$".mex("var_chiedi_telefono2",$pag).";
if (strtoupper(\$chiedi_telefono2) == \"".mex("SI",$pag)."\") \$chiedi_telefono2 = \"SI\";
if (strtoupper(\$chiedi_telefono2) == \"".mex("NO",$pag)."\") \$chiedi_telefono2 = \"NO\";
\$chiedi_telefono3 = \$".mex("var_chiedi_telefono3",$pag).";
if (strtoupper(\$chiedi_telefono3) == \"".mex("SI",$pag)."\") \$chiedi_telefono3 = \"SI\";
if (strtoupper(\$chiedi_telefono3) == \"".mex("NO",$pag)."\") \$chiedi_telefono3 = \"NO\";
\$chiedi_fax = \$".mex("var_chiedi_fax",$pag).";
if (strtoupper(\$chiedi_fax) == \"".mex("SI",$pag)."\") \$chiedi_fax = \"SI\";
if (strtoupper(\$chiedi_fax) == \"".mex("NO",$pag)."\") \$chiedi_fax = \"NO\";
\$chiedi_commento = \$".mex("var_chiedi_commento",$pag).";
if (strtoupper(\$chiedi_commento) == \"".mex("SI",$pag)."\") \$chiedi_commento = \"SI\";
if (strtoupper(\$chiedi_commento) == \"".mex("NO",$pag)."\") \$chiedi_commento = \"NO\";
\$chiedi_oracheckin = \$".mex("var_chiedi_oracheckin",$pag).";
if (strtoupper(\$chiedi_oracheckin) == \"".mex("SI",$pag)."\") \$chiedi_oracheckin = \"SI\";
if (strtoupper(\$chiedi_oracheckin) == \"".mex("NO",$pag)."\") \$chiedi_oracheckin = \"NO\";
\$chiedi_metodopagamento = \$".mex("var_chiedi_metodopagamento",$pag).";
if (strtoupper(\$chiedi_metodopagamento) == \"".mex("SI",$pag)."\") \$chiedi_metodopagamento = \"SI\";
if (strtoupper(\$chiedi_metodopagamento) == \"".mex("NO",$pag)."\") \$chiedi_metodopagamento = \"NO\";
unset(\$metodi_pagamento_da_chiedere);
reset (\$".mex("var_metodi_pagamento_da_chiedere",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_metodi_pagamento_da_chiedere",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$metodi_pagamento_da_chiedere[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$metodi_pagamento_da_chiedere[\$key] = \"NO\";
} # fine while
\$nomi_metodi_pagamento_imposti = \$".mex("var_nomi_metodi_pagamento_imposti",$pag).";
\$campi_form_personalizzati = \$".mex("var_campi_form_personalizzati",$pag).";
unset(\$chiedi_campi_form_personalizzati);
reset (\$".mex("var_chiedi_campi_form_personalizzati",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_chiedi_campi_form_personalizzati",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$chiedi_campi_form_personalizzati[\$key] = \"SI\";
} # fine while
\$campi_form_doc_condizioni = \$".mex("var_campi_form_doc_condizioni",$pag).";
unset(\$chiedi_campi_form_doc_condizioni);
reset (\$".mex("var_chiedi_campi_form_doc_condizioni",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_chiedi_campi_form_doc_condizioni",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$chiedi_campi_form_doc_condizioni[\$key] = \"SI\";
} # fine while
\$mostra_quadro_disp = \"\";
if (strtoupper(\$".mex("var_mostra_quadro_disponibilita",$pag).") == \"".mex("SI",$pag)."\") {
\$mostra_quadro_disp = \"app\";
if (strtoupper(\$".mex("var_raggruppa_quadro_disponibilita_con_persone",$pag).") == \"".mex("SI",$pag)."\") \$mostra_quadro_disp = \"pers\";
if (strtoupper(\$".mex("var_raggruppa_quadro_disponibilita_con_regola_2",$pag).") == \"".mex("SI",$pag)."\") \$mostra_quadro_disp = \"reg2\";
} # fine if (strtoupper(\$".mex("var_mostra_quadro_disponibilita",$pag).") == \"".mex("SI",$pag)."\")
\$c_sfondo_tab_disp = \$".mex("var_colore_sfondo_quadro_disponibilita",$pag).";
\$c_inisett_tab_disp = \$".mex("var_colore_inizio_settimana_quadro_disponibilita",$pag).";
\$c_libero_tab_disp = \$".mex("var_colore_libero_quadro_disponibilita",$pag).";
\$c_occupato_tab_disp = \$".mex("var_colore_occupato_quadro_disponibilita",$pag) .";
\$aper_font_tab_disp = \$".mex("var_apertura_font_quadro_disponibilita",$pag).";
\$chiu_font_tab_disp = \$".mex("var_chiusura_font_quadro_disponibilita",$pag).";
if (strtoupper(\$".mex("var_mostra_numero_liberi_quadro_disponibilita",$pag).") == \"".mex("SI",$pag)."\") \$mostra_num_liberi = \"SI\";
else \$mostra_num_liberi = \"NO\";
if (strtoupper(\$".mex("var_allinea_disponibilita_con_arrivo",$pag).") == \"".mex("SI",$pag)."\") \$allinea_disponibilita_con_arrivo = \"SI\";
else \$allinea_disponibilita_con_arrivo = \"NO\";
if (strtoupper(\$".mex("var_mostra_calendario_scelta_date",$pag).") == \"".mex("SI",$pag)."\") \$mostra_calendario_scelta_date = \"SI\";
else \$mostra_calendario_scelta_date = \"NO\";
\$stile_riquadro_calendario = \$".mex("var_stile_riquadro_calendario",$pag).";
\$stile_tabella_calendario = \$".mex("var_stile_tabella_calendario",$pag).";
\$stile_bottoni_calendario = \$".mex("var_stile_bottoni_calendario",$pag).";
\$stile_bottone_apertura_calendario = \$".mex("var_stile_bottone_apertura_calendario",$pag).";
\$spostamento_orizzontale_calendario = \$".mex("var_spostamento_orizzontale_calendario",$pag).";
\$colore_data_attiva_calendario = \$".mex("var_colore_data_attiva_calendario",$pag).";
\$colore_data_selezionata_calendario = \$".mex("var_colore_data_selezionata_calendario",$pag).";
\$apertura_tag_font = \$".mex("var_apertura_tag_font",$pag).";
\$chiusura_tag_font = \$".mex("var_chiusura_tag_font",$pag).";
\$apertura_tag_font_rosse = \$".mex("var_apertura_tag_font_rosse",$pag).";
\$chiusura_tag_font_rosse = \$".mex("var_chiusura_tag_font_rosse",$pag).";
\$stile_tabella_prenotazione = \$".mex("var_stile_tabella_prenotazione",$pag).";
\$file_css_frame = \$".mex("var_file_css_frame",$pag).";
if (strtoupper(\$".mex("var_apri_nuova_finestra_da_frame",$pag).") == \"".mex("SI",$pag)."\") \$apri_nuova_finestra_da_frame = \"SI\";
else \$apri_nuova_finestra_da_frame = \"NO\";
\$larghezza_finestra_da_frame = \$".mex("var_larghezza_finestra_da_frame",$pag).";
\$altezza_finestra_da_frame = \$".mex("var_altezza_finestra_da_frame",$pag).";
\$extra_head_frame = \"$extra_head_frame\";
\$tipo_periodi = \"$m_tipo_periodi\";
# FRASI
\$fr_Euro = \$".mex("var_fr_Valuta_sing",$pag).";
\$fr_Euros = \$".mex("var_fr_Valuta_plur",$pag).";
\$fr_appartamenti = \$".mex("var_fr_appartamenti",$pag).";
\$fr_appartamento = \$".mex("var_fr_appartamento",$pag).";
\$fr_alternativa_regola1 = \$".mex("var_fr_alternativa_regola1",$pag).";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".$fr_frase[$num_fr]." = \$".mex("var_".$fr_frase[$num_fr],$pag).";
");
fwrite($file,"\$fre_Email = \$".mex("var_fre_Email",$pag).";
\$fre_Nome = \$".mex("var_fre_Nome",$pag).";
\$fre_Commento = \$".mex("var_fre_Commento",$pag).";
\$fre_Periodo = \$".mex("var_fre_Periodo",$pag).";
\$fre_dal = \$".mex("var_fre_dal",$pag).";
\$fre_al = \$".mex("var_fre_al",$pag).";
\$fre_Tariffa = \$".mex("var_fre_Tariffa",$pag).";
\$fre_Costi_aggiuntivi = \$".mex("var_fre_Costi_aggiuntivi",$pag).";
\$fre_sett = \$".mex("var_fre_sett",$pag).";
\$fre_Numero_di_appartamenti = \$".mex("var_fre_Numero_di_appartamenti",$pag).";
\$fre_Prezzo_totale = \$".mex("var_fre_Prezzo_totale",$pag).";
\$fre_Riferimento = \$".mex("var_fre_Riferimento",$pag).";
\$fre_Richesta_prenotazione = \$".mex("var_fre_Richesta_prenotazione",$pag).";
\$fre_Caparra = \$".mex("var_fre_Caparra",$pag).";
\$fre_Persone = \$".mex("var_fre_Persone",$pag).";
\$fre_Cognome = \$".mex("var_fre_Cognome",$pag).";
\$fre_Genere = \$".mex("var_fre_Genere",$pag).";
\$fre_Data_di_nascita = \$".mex("var_fre_Data_di_nascita",$pag).";
\$fre_Documento = \$".mex("var_fre_Documento",$pag).";
\$fre_Nazione = \$".mex("var_fre_Nazione",$pag).";
\$fre_Citta = \$".mex("var_fre_Citta",$pag).";
\$fre_Regione = \$".mex("var_fre_Regione",$pag).";
\$fre_Via = \$".mex("var_fre_Via",$pag).";
\$fre_Numero_civico = \$".mex("var_fre_Numero_civico",$pag).";
\$fre_Codice_postale = \$".mex("var_fre_Codice_postale",$pag).";
\$fre_Telefono = \$".mex("var_fre_Telefono",$pag).";
\$fre_Secondo_telefono = \$".mex("var_fre_Secondo_telefono",$pag).";
\$fre_Terzo_telefono = \$".mex("var_fre_Terzo_telefono",$pag).";
\$fre_Fax = \$".mex("var_fre_Fax",$pag).";
\$fre_Orario_stimato_di_arrivo = \$".mex("var_fre_Orario_stimato_di_arrivo",$pag).";
\$fre_Metodo_di_pagamento_della_caparra = \$".mex("var_fre_Metodo_di_pagamento_della_caparra",$pag).";
# PERIODI NEI MENU
\$menu_periodi = \$".mex("var_periodi_menu",$pag).";
function mex_data(\$messaggio) {
");
if ($lingua_modello != "ita") {
if (@is_file("./includes/lang/$lingua_modello/giorni_mesi.php")) includi_file("./includes/lang/$lingua_modello/giorni_mesi.php",$file);
else if (@is_file("./includes/lang/en/giorni_mesi.php")) includi_file("./includes/lang/en/giorni_mesi.php",$file);
} # fine if ($lingua_modello != "ita")
fwrite($file,"
return \$messaggio;
} # fine function mex_data
");
includi_file("./includes/funzioni_".$M_PHPR_DB_TYPE.".php",$file);
fwrite($file,"
\$numconnessione = connetti_db(\$PHPR_DB_NAME,\$PHPR_DB_HOST,\$PHPR_DB_PORT,\$PHPR_DB_USER,\$PHPR_DB_PASS,\$PHPR_LOAD_EXT);
");
includi_file("./includes/funzioni.php",$file);
includi_file(C_DATA_PATH."/versione.php",$file);
includi_file("./includes/liberasettimane.php",$file);
includi_file("./includes/funzioni_tariffe.php",$file);
includi_file("./includes/funzioni_costi_agg.php",$file);
includi_file("./includes/funzioni_quadro_disp.php",$file);
includi_file("./includes/funzioni_clienti.php",$file);
includi_file("./includes/funzioni_dati_relutenti.php",$file);
if ($campi_form_doc_condizioni) {
includi_file("./includes/variabili_contratto.php",$file);
includi_file("./includes/funzioni_contratti.php",$file);
includi_file("./includes/funzioni_testo.php",$file);
fwrite($file,"
function crea_trad_var_vett (&\$trad_var_vett) {
\$trad_var_vett = \"\";
");
if (@is_dir("./includes/lang/es")) {
includi_file("./includes/lang/es/visualizza_contratto_var.php",$file);
fwrite($file,"
while (list(\$var_trad_ita,\$var_trad_ext) = each(\$trad_var)) \$trad_var_vett[\$var_trad_ext] = \$var_trad_ita;
unset(\$trad_var);
");
} # fine if (@is_dir("./includes/lang/es"))
if (@is_dir("./includes/lang/en")) {
includi_file("./includes/lang/en/visualizza_contratto_var.php",$file);
fwrite($file,"
while (list(\$var_trad_ita,\$var_trad_ext) = each(\$trad_var)) \$trad_var_vett[\$var_trad_ext] = \$var_trad_ita;
unset(\$trad_var);
");
} # fine if (@is_dir("./includes/lang/en"))
global $lingua_mex;
if ($lingua_mex != "ita" and $lingua_mex != "en" and $lingua_mex != "es") {
if (@is_dir("./includes/lang/$lingua_mex")) {
includi_file("./includes/lang/$lingua_mex/visualizza_contratto_var.php",$file);
fwrite($file,"
while (list(\$var_trad_ita,\$var_trad_ext) = each(\$trad_var)) \$trad_var_vett[\$var_trad_ext] = \$var_trad_ita;
unset(\$trad_var);
");
} # fine if (@is_dir("./includes/lang/$lingua_mex"))
} # fine if ($lingua_mex != "ita" and $lingua_mex != "en" and $lingua_mex != "es")
fwrite($file,"
if (!@is_array(\$trad_var_vett)) \$trad_var_vett['new_line'] = 'avanzamento_riga';
} # fine function crea_trad_var_vett
");
} # fine if ($campi_form_doc_condizioni)
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") {
$f_scad_acc = explode("/",$percorso_cartella_modello);
$num_f_scad_acc = count($f_scad_acc);
$file_scad_acc = "";
for ($num1 = 0 ; $num1 < $num_f_scad_acc ; $num1++) if ($f_scad_acc[$num1] != ".") $file_scad_acc .= "../";
$file_scad_acc .= C_FILE_SCADENZA_ACCOUNT;
fwrite($file,"
\$disattivato = \"\";
\$scadenza = trim(@implode(@file(\"$file_scad_acc\")));
\$adesso = date(\"YmdHis\");
if (!\$scadenza or \$scadenza < \$adesso) {
\$disattivato = \"SI\";
echo \"Expired account.<br>\";
} # fine (!\$scadenza or \$scadenza < \$adesso)
if (!\$disattivato) {
");
} # fine if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "")
includi_file("./includes/templates/modello_disponibilita.php",$file);
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") fwrite($file,"
} # fine if (!\$disattivato)
");
fwrite($file,"
if (!\$framed) {
?>
<!-- ".mex("INIZIO DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->
$ultima_parte_html
<!-- ".mex("FINE DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." --><?php } # fine if (!\$framed) ?>");
flock($file,3);
fclose($file);
$exec_crea_mod = substr(decoct(@fileperms('./crea_modelli.php')),-3,1);
if ((defined('C_CHMOD_EXEC_MODELLI') and C_CHMOD_EXEC_MODELLI == "SI") or $exec_crea_mod == "7" or $exec_crea_mod == "5") @chmod("$percorso_cartella_modello/$nome_file", 0750);
else @chmod("$percorso_cartella_modello/$nome_file", 0640);
$url_pagina = "";
if ($silenzio != "totale" or ($silenzio != "NO" and $tema_trovato and $framed_mode_example[$tema_sel])) {
$url_pagina = trova_url_pagina($nome_file,$percorso_cartella_modello,$pag);
if ($url_pagina) $url_pagina_link = $url_pagina;
else $url_pagina_link = "$percorso_cartella_modello/$nome_file";
} # fine if ($silenzio != "totale" or ($silenzio != "NO" and...
if ($silenzio == "NO") echo "<br>";
if ($silenzio != "totale") echo mex("Una pagina chiamata",$pag)." <b><a href=\"$url_pagina_link\" target=\"_blank\">$nome_file</a></b> ".mex("è stata creata nella directory",$pag)." \"$percorso_cartella_modello\".<br>";
if ($silenzio == "NO") {
if (defined('C_CARTELLA_CREA_MODELLI')) echo mex("Si può creare un link verso questa pagina dal proprio sito internet",$pag).".<br>";
else echo mex("Si può cambiare la directory dove vengono create le pagine da \"configura e personalizza\"",$pag).".<br>";
if ($tema_trovato and $framed_mode_example[$tema_sel] and $url_pagina) {
echo "<br><br>".mex("Esempio di codice html per includere il primo passo della form in modalità frame su altre pagine del sito",$pag).":<br>
<textarea rows=4 cols=108 wrap=\"off\" readonly=\"true\">
".htmlspecialchars(str_replace("[page_url]",$url_pagina,$framed_mode_example[$tema_sel]))."
</textarea><br><br>";
} # fine if ($tema_trovato and $framed_mode_example[$tema_sel] and...
} # fine if ($silenzio == "NO")
} # fine if ($file)
else if ($silenzio == "NO") echo mex("Non ho il permesso di scrittura nella cartella",$pag)." $percorso_cartella_modello.<br>";
} # fine if ($continua != "NO")
} # fine function crea_modello_disponibilita
function elimina_array_pers ($arr_pers_elimina) {
global $tablecontratti,$LIKE,$pag;
$arr_pers_elimina = aggslashdb($arr_pers_elimina);
$continua = "SI";
if (substr($arr_pers_elimina,0,1) != "a") $continua = "NO";
$arr_pers_elimina = substr($arr_pers_elimina,1);
if (controlla_num_pos($arr_pers_elimina) != "SI") $continua = "NO";
if ($continua == "SI") {
$n_arr_pers_el = esegui_query("select * from $tablecontratti where numero = '$arr_pers_elimina' and tipo $LIKE 'vett%'");
if (numlin_query($n_arr_pers_el) != 1) $continua = "NO";
else {
$n_arr_pers_el = explode(";",risul_query($n_arr_pers_el,0,"testo"));
$n_arr_pers_el = $n_arr_pers_el[0]."(".$n_arr_pers_el[1].")";
$arr_pers_el = "a".$arr_pers_elimina;
$condizioni = esegui_query("select * from $tablecontratti where tipo $LIKE 'cond%' order by numero");
$num_condizioni = numlin_query($condizioni);
for ($num1 = 0 ; $num1 < $num_condizioni ; $num1++) {
$condizione = risul_query($condizioni,$num1,'testo');
$condizione = explode("#@?",$condizione);
$elimina_cond_corr = "NO";
if ($condizione[1]) {
$se_cond = explode("#$?",$condizione[1]);
$num_se_cond = count($se_cond);
for ($num2 = 1 ; $num2 < $num_se_cond ; $num2++) {
$se_cond_corr = explode("#%?",$se_cond[$num2]);
if ($se_cond_corr[0] == $n_arr_pers_el) $elimina_cond_corr = "SI";
if ($se_cond_corr[2] == "var" and $se_cond_corr[3] == $n_arr_pers_el) $elimina_cond_corr = "SI";
} # fine for $num2
} # fine if ($condizione[1])
$azione = explode("#%?",$condizione[2]);
if ($azione[0] == "set" and ($azione[1] == $arr_pers_el or ($azione[3] == "var" and $azione[4] == $n_arr_pers_el))) $elimina_cond_corr = "SI";
if ($azione[0] == "set" and (($azione[5] == "var" and $azione[6] == $n_arr_pers_el) or ($azione[7] == "var" and $azione[8] == $n_arr_pers_el))) $elimina_cond_corr = "SI";
if ($azione[0] == "trunc" and $azione[1] == $arr_pers_el) $elimina_cond_corr = "SI";
if ($azione[0] == "oper" and ($azione[1] == $arr_pers_el or $azione[2] == $n_arr_pers_el or ($azione[4] == "var" and $azione[5] == $n_arr_pers_el))) $elimina_cond_corr = "SI";
if ($azione[0] == "unset" and $azione[1] == $arr_pers_el) $elimina_cond_corr = "SI";
if ($azione[0] == "array" and $azione[1] == $arr_pers_el) $elimina_cond_corr = "SI";
if ($elimina_cond_corr == "SI") {
$num_cond = risul_query($condizioni,$num1,'numero');
$tipo_cond = risul_query($condizioni,$num1,'tipo');
esegui_query("delete from $tablecontratti where numero = '$num_cond' and tipo = '$tipo_cond' ");
} # fine ($elimina_cond_corr == "SI")
} # fine for $num1
esegui_query("delete from $tablecontratti where numero = '$arr_pers_elimina' and tipo $LIKE 'vett%'");
echo mex("Array personalizzato eliminato",$pag).".<br>";
} # fine else if (numlin_query($n_var_pers_el) != 1)
} # fine if ($continua == "SI")
return $continua;
} # fine function elimina_arr_pers
<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 and $priv_cancella_contratti != "n")
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(C_DATA_PATH."/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;
if ($assegna_da_giorno_ini) { $errore = "SI"; $conflitti .= "6-16;"; }
if ($assegna_prenota_contemp) { $errore = "SI"; $conflitti .= "7-16;"; }
if ($beni_inv_elimina != "nessuno" and $tipo_bie == "a") { $errore = "SI"; $conflitti .= "12-16;"; }
if ($app_incompatibili == "SI") { $errore = "SI"; $conflitti .= "14-16;"; }
} # fine if ($combina_ca == "s")
if ($letto_ca != "n" and $letto_ca != "s") $errore = "SI";
if ($letto_ca != "n") {
if ($valore_p_ca and substr($tipo_percentuale,0,7) != "tariffa") { $errore = "SI"; $conflitti .= "3-17;"; }
if ($moltiplica_ca == "p" or $moltiplica_ca == "t" or $tipo_moltmax == "p" or $tipo_moltmax == "t") { $errore = "SI"; $conflitti .= "11-17;"; }
} # fine if ($letto_ca != "n")
if ($escludi_da_tot != "n" and $escludi_da_tot != "s") $errore = "SI";
if ($limite_ca != "n" and $limite_ca != "s") $errore = "SI";
if ($limite_ca != "n") {
if ($tipo_ca == "s" and $associasett != "s" and $numsett_ca != "t") { $errore = "SI"; $conflitti .= "9,10-19;"; }
if ($tipo_ca == "s" and $associasett != "s" and $periodi_permessi != "tutti" and $tipo_pp == "p") { $errore = "SI"; $conflitti .= "9,13-19;"; }
if (controlla_num_pos($numlimite_ca) == "NO" or $numlimite_ca == 0) $errore = "SI";
} # fine if ($limite_ca != "n")
if ($mantenere_percentuale != "s" or !$valore_p_ca) $mantenere_percentuale = "n";
if ($mantenere_percentuale == "n" and $valore_p_ca and $dati_ca[$num_costo]['tipo_val'] == "f") $note_mantenere .= "3;";
if (($mantenere_percentuale == "n" and $valore_p_ca) and ($tipo_ca == "s" and $numsett_ca != "c")) $mantenere_numsett = "n";
if ($mantenere_numsett != "s" or ($tipo_ca != "s" or $numsett_ca == "c")) $mantenere_numsett = "n";
if ($mantenere_numsett == "n" and $tipo_ca == "s" and $numsett_ca != "c" and $dati_ca[$num_costo]['tipo'] != "s") $note_mantenere .= "2;";
if ($mantenere_numsett == "n" and $tipo_ca == "s" and $numsett_ca != "c" and $dati_ca[$num_costo]['var_numsett'] == "c") $note_mantenere .= "9;";
if (($mantenere_percentuale == "n" and $valore_p_ca) and ($moltiplica_ca != "c" and $moltiplica_ca != "1")) $mantenere_moltiplica = "n";
if ($mantenere_moltiplica != "s" or ($moltiplica_ca == "c" and $tipo_moltmax == "n" and !$moltmax)) $mantenere_moltiplica = "n";
if ($mantenere_moltiplica == "n" and ($moltiplica_ca != "c" or $tipo_moltmax != "n" or $moltmax) and $dati_ca[$num_costo]['moltiplica'] == "c" and $dati_ca[$num_costo]['molt_max'] == "x") $note_mantenere .= "11;";
if ($mantenere_beniinv != "s" or $beni_inv_elimina == "nessuno") $mantenere_beniinv = "n";
if ($mantenere_beniinv == "n" and $beni_inv_elimina != "nessuno" and !$dati_ca[$num_costo]['beniinv_orig']) $note_mantenere .= "12;";
if ($mantenere_periodip != "s" or $periodi_permessi == "tutti") $mantenere_periodip = "n";
if ($mantenere_periodip == "n" and $periodi_permessi != "tutti" and !$dati_ca[$num_costo]['periodipermessi_orig']) $note_mantenere .= "13;";
} else {
$val_costo = formatta_soldi($val_costo);
if (controlla_soldi($val_costo) == "NO") {
if ($inserisci_entrata) {
echo mex("Il valore dell' entrata è sbagliato", $pag) . ".<br>";
}
if ($inserisci_spesa) {
echo mex("Il valore della spesa è sbagliato", $pag) . ".<br>";
}
$inserire = "NO";
}
# fine if (controlla_soldi($val_costo) == "NO")
}
# fine else if (!$val_costo)
$nome_cassa = "";
if (!$id_cassa or controlla_num_pos($id_cassa) != "SI") {
$inserire = "NO";
} else {
if ($attiva_casse_consentite != "n" and $casse_consentite_vett[$id_cassa] != "SI") {
$inserire = "NO";
} else {
$cassa_esistente = esegui_query("select * from {$tablecasse} where idcasse = '{$id_cassa}' ");
if (numlin_query($cassa_esistente) != 1) {
$inserire = "NO";
} elseif ($id_cassa != 1) {
$nome_cassa = risul_query($cassa_esistente, 0, 'nome_cassa');
}
}
# fine else if ($attiva_casse_consentite != "n" and $casse_consentite_vett[$id_cassa] != "SI")
}
# fine else if (!$id_cassa or controlla_num_pos($id_cassa) != "SI")
if (numlin_query($bene_in_mag_da) == 1) {
$quantita_da = risul_query($bene_in_mag_da,0,'quantita');
if ($quantita_da >= ${"mag_da".$idmag_da}) {
if ($tipoid != "idmagazzino" or $idmag_da != $idmag) {
$ricaricato = "SI";
esegui_query("update $tablerelinventario set quantita = '".($quantita_da - ${"mag_da".$idmag_da})."' where idmagazzino = '$idmag_da' and idbeneinventario = '$id_bene' ");
$quantita = $quantita + ${"mag_da".$idmag_da};
esegui_query("update $tablerelinventario set quantita = '$quantita' where $tipoid = '$idmag' and idbeneinventario = '$id_bene' ");
} # fine if ($tipoid != "idmagazzino" or $idmag_da != $idmag)
} # fine if ($quantita_da > ${"mag_da".$idmag_da})
} # fine if (numlin_query($bene_in_mag_da) == 1)
} # fine if (${"mag_da".$idmag_da} and...
} # fine for $num1
for ($num1 = 0 ; $num1 < $num_appartamenti ; $num1++) {
$idapp_da = risul_query($appartamenti,$num1,'idappartamenti');
if (${"app_da".$idapp_da} and controlla_num_pos(${"app_da".$idapp_da}) == "SI") {
if ($priv_vedi_inv_app == "s" or $appartamenti_consentiti[$idapp] != "NO") {
$bene_in_app_da = esegui_query("select * from $tablerelinventario where idappartamento = '$idapp_da' and idbeneinventario = '$id_bene' ");
if (numlin_query($bene_in_app_da) == 1) {
$quantita_da = risul_query($bene_in_app_da,0,'quantita');
$quantita_min_predef_da = risul_query($bene_in_app_da,0,'quantita_min_predef');
$num_diff_da = $quantita_da - $quantita_min_predef_da;
if ($num_diff_da >= ${"app_da".$idapp_da}) {
$ricaricato = "SI";
esegui_query("update $tablerelinventario set quantita = '".($quantita_da - ${"app_da".$idapp_da})."' where idappartamento = '$idapp_da' and idbeneinventario = '$id_bene' ");
$quantita = $quantita + ${"app_da".$idapp_da};
esegui_query("update $tablerelinventario set quantita = '$quantita' where $tipoid = '$idmag' and idbeneinventario = '$id_bene' ");
} # fine if ($num_diff_da > ${"app_da".$idapp_da})
} # fine if (numlin_query($bene_in_app_da) == 1)
} # fine if ($priv_vedi_inv_app == "s" or $appartamenti_consentiti[$idapp] != "NO")
} # fine if (${"app_da".$idapp_da} and...
$min_periodo = risul_query($min_periodo,0,'idperiodi');
$max_periodo = esegui_query("select idperiodi from $tableperiodi where datafine = '".aggslashdb($fineperiodi[0])."'");
$max_periodo = risul_query($max_periodo,0,'idperiodi');
$num_colonne_tab_disp = $numero_giorni;
$limiti_var['idperiodocorrente'] = calcola_id_periodo_corrente($anno);
if ((string) $id_data_inizio_tab_disp == "") {
if (!$data_preselezionata) $id_data_inizio_tab_disp = $limiti_var['idperiodocorrente'];
else {
$id_data_inizio_tab_disp = esegui_query("select idperiodi from $tableperiodi where datainizio = '".aggslashdb($data_preselezionata)."'");
if (numlin_query($id_data_inizio_tab_disp) == 1) $id_data_inizio_tab_disp = risul_query($id_data_inizio_tab_disp,0,'idperiodi');
else $id_data_inizio_tab_disp = $limiti_var['idperiodocorrente'];
} # fine else if (!$data_preselezionata)
} # fine if ((string) $id_data_inizio_tab_disp == "")
if (controlla_num_pos($id_data_inizio_tab_disp) != "SI") $id_data_inizio_tab_disp = "0";
if (($id_data_inizio_tab_disp + $num_colonne_tab_disp - 1) > $max_periodo) $id_data_inizio_tab_disp = ($max_periodo - $num_colonne_tab_disp + 1);
if ($id_data_inizio_tab_disp < $min_periodo) $id_data_inizio_tab_disp = $min_periodo;
if ($num_colonne_tab_disp > ($max_periodo - $min_periodo)) $num_colonne_tab_disp = ($max_periodo - $min_periodo);
$limiti_var['n_ini'] = $id_data_inizio_tab_disp;
$limiti_var['n_fine'] = ($id_data_inizio_tab_disp + $num_colonne_tab_disp - 1);
$profondita['iniziale'] = "";
$profondita['attuale'] = 1;
$max_prenota = esegui_query("select max(idprenota) from $tableprenota");
$tot_prenota = risul_query($max_prenota,0,0);
$profondita['tot_prenota_ini'] = $tot_prenota;
$profondita['tot_prenota_attuale'] = $tot_prenota;
tab_a_var ($limiti_var,$app_prenota_id,$app_orig_prenota_id,$inizio_prenota_id,$fine_prenota_id,$app_assegnabili_id,$prenota_in_app_sett,$anno,$dati_app,$profondita,$PHPR_TAB_PRE."prenota");
unset($info_periodi_ag);
$app_agenzia_c = esegui_query("select * from $tableregole where app_agenzia != '' and motivazione2 = 'x' ");
}
echo ".<br>";
$inserire = "NO";
}
# fine if ($posti < $num_app_richiesti)
}
# fine else if ($posti == 0)
}
# fine else if (!$condizioni_regole1_consentite)
if ($inserire == "NO" and $app_richiesti_copia) {
${"app_richiesti" . $n_t} = $app_richiesti_copia;
}
}
# fine if ($attiva_regole1_consentite == "s")
if ($numpersone) {
if (controlla_num_pos($numpersone) == "NO") {
$inserire = "NO";
echo mex("Il numero di persone è sbagliato", $pag);
if ($num_tipologie > 1) {
echo " (" . mex("tipologia", $pag) . " {$n_t})";
}
echo ".<br>";
}
# fine if (controlla_num_pos($numpersone) == "NO")
$app_richiesti_copia = ${"app_richiesti" . $n_t};
$posti = 0;
if ($app_regola2_predef) {
$app_regola2_predef = ",{$app_regola2_predef},";
$posto_reg2_orig = 0;
}
# fine if ($app_regola2_predef)
# fine else if (!$fileaperto)
}
# fine if ($permessi_scrittura_controllati != "SI")
if ($torna_indietro == "SI") {
echo "Torna indietro><br></div></form>";
}
# fine if ($torna_indietro == "SI")
}
# fine if ($creabase and !@is_file(C_DATI_PATH."/dati_connessione.php"))
// inserisco i data forniti nella tabella appartamenti e creo il file selezione appartamenti.
if ($insappartamenti and !@is_file(C_DATA_PATH . "/selectappartamenti.php")) {
$mostra_form_iniziale = "NO";
if (!controlla_num_pos($numletti) == "NO") {
$numletti = 0;
}
if (!$numappartamenti and !$numletti or controlla_num_pos($numappartamenti) == "NO") {
$numappartamenti = 5;
}
unset($lingua);
include C_DATA_PATH . "/lingua.php";
$lingua_mex = $lingua[1];
include C_DATA_PATH . "/dati_connessione.php";
include_once "./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);
$tableappartamenti = $PHPR_TAB_PRE . "appartamenti";
$fileaperto = fopen(C_DATA_PATH . "/selectappartamenti.php", "a+");
fwrite($fileaperto, "<?php \necho \"\n");
$zeri = (string) "0000000000000000000000000000";
$lettere = (string) "abcdefghijklmnopqrstuvwxyz";
$pos_lettera = 0;
$num_dorm = $numappartamenti;
} # fine if (numlin_query($dir_esistente))
unlock_tabelle($tabelle_lock);
} # fine if ($cambia_incr_np)
if ($cambia_num_prog) {
$tabelle_lock = array($tablecontratti);
$tabelle_lock = lock_tabelle($tabelle_lock);
$dir_esistente = esegui_query("select * from $tablecontratti where numero = '$num_contratto' and tipo = 'dir'");
if (numlin_query($dir_esistente)) {
if (!strcmp($contr_num_prog,"")) {
$mostra_form_iniziale = "NO";
esegui_query("delete from $tablecontratti where numero = '$num_contratto' and tipo = 'num_prog' ");
echo ucfirst(mex("il documento",$pag))." $num_contratto ".mex("non condividerà il numero progressivo con nessun documento",$pag).".<br>";
} # fine if (!strcmp($contr_num_prog,""))
else {
if ($contr_num_prog >= 1 and controlla_num_pos($contr_num_prog) != "NO") {
if ($contr_num_prog != $num_contratto_int and ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$contr_num_prog] == "SI")) {
$dir_esistente = esegui_query("select * from $tablecontratti where numero = '$contr_num_prog' and tipo = 'dir'");
if (numlin_query($dir_esistente)) {
$num_prog_esistente = esegui_query("select * from $tablecontratti where numero = '$contr_num_prog' and tipo = 'num_prog' ");
if (!numlin_query($num_prog_esistente)) {
$mostra_form_iniziale = "NO";
$num_prog_esistente = esegui_query("select testo from $tablecontratti where numero = '$num_contratto' and tipo = 'num_prog' ");
if (numlin_query($num_prog_esistente)) esegui_query("update $tablecontratti set testo = '$contr_num_prog' where numero = '$num_contratto' and tipo = 'num_prog' ");
else {
esegui_query("insert into $tablecontratti (numero,tipo,testo) values ('$num_contratto','num_prog','$contr_num_prog') ");
esegui_query("update $tablecontratti set testo = '$contr_num_prog' where testo = '$num_contratto_int' and tipo = 'num_prog' ");
} # fine else if (numlin_query($num_prog_esistente))
echo ucfirst(mex("il documento",$pag))." $num_contratto ".mex("condividerà il numero progressivo con il documento",$pag)." $contr_num_prog.<br>";
} # fine if (!numlin_query($num_prog_esistente))
} # fine if (numlin_query($dir_esistente))
} # fine if (strcmp($n_commento,""))
else esegui_query("delete from $tabledescrizioni where nome = '$idappartamenti' and tipo = 'appcommfoto' and lingua = '$ini_lingua' and numero = '$numfoto' ");
} # fine if ($file != "." && $file != ".." and...
} # fine while ($file = readdir($lang_dig))
closedir($lang_dir);
echo "<br>".ucfirst(mex("commento della foto",$pag))." $numfoto ".mex("aggiornato",$pag).".<br>";
} # fine if (numlin_query($foto_esistente))
unlock_tabelle($tabelle_lock);
} # fine if ($numfoto and controlla_num_pos($numfoto) == "SI" and...
$mostra_torna_indietro = "SI";
} # fine if ($commentofoto)
if ($cancurlfoto) {
$mostra_form_modifica = "NO";
if ($numfoto and controlla_num_pos($numfoto) == "SI") {
esegui_query("delete from $tabledescrizioni where nome = '$idappartamenti' and (tipo = 'appfoto' or tipo = 'appcommfoto') and numero = '$numfoto' ");
echo "".ucfirst(mex("foto eliminata",$pag)).".<br>";
} # fine if ($numfoto and controlla_num_pos($numfoto) == "SI")
$mostra_torna_indietro = "SI";
} # fine if ($aggurlfoto)
if ($aggurlfoto) {
$mostra_form_modifica = "NO";
if (get_magic_quotes_gpc()) $n_urlfoto = stripslashes($n_urlfoto);
$lowurl = strtolower($n_urlfoto);
if (substr($lowurl,-4) != ".jpg" and substr($lowurl,-5) != ".jpeg" and substr($lowurl,-4) != ".gif" and substr($lowurl,-4) != ".png") $errore = "SI";
if (str_replace("<","",$n_urlfoto) != $n_urlfoto or str_replace(">","",$n_urlfoto) != $n_urlfoto or str_replace("\"","",$n_urlfoto) != $n_urlfoto) $errore = "SI";
$app_esist = esegui_query("select idappartamenti from $tableappartamenti where idappartamenti = '$idappartamenti' ");
if (!numlin_query($app_esist)) $errore = "SI";
if ($origine_prenota == $origini_prenota[$num2]) $orig_trovata = "SI";
} # fine for $num2
if ($orig_trovata == "SI") {
$origine_prenota = aggslashdb($origine_prenota);
esegui_query("update $tableprenota set origine = '$origine_prenota' where idprenota = '$idprenota' ");
if (!$caparra and !$commissioni and $met_trovato == "NO") echo "<br>";
echo mex("Origine",$pag).": <b>".stripslashes($origine_prenota)."</b>.<br>";
} # fine if ($orig_trovata == "SI")
} # fine if ($origini_prenota)
} # fine if ($origine_prenota and $priv_ins_orig_prenota == "s")
if ($giorno_stima_checkin and $ora_stima_checkin and $min_stima_checkin and $priv_ins_checkin == "s") {
if ($inizioperiodo == $vett_idinizio[$n_t][1]) {
if ($tipo_periodi == "g") $giorni_periodo = $lunghezza_periodo;
else $giorni_periodo = ($lunghezza_periodo * 7);
if (controlla_num_pos($giorno_stima_checkin) == "SI" and $giorno_stima_checkin >= 1 and $giorno_stima_checkin <= 7 and $giorno_stima_checkin <= ($giorni_periodo + 1)) {
$data_stima_checkin = esegui_query("select datainizio from $tableperiodi where idperiodi = '$inizioperiodo'");
$data_stima_checkin = risul_query($data_stima_checkin,0,'datainizio');
$data_ini_prenota_f = formatta_data($data_stima_checkin,$stile_data);
$anno_dts = substr($data_stima_checkin,0,4);
$mese_dts = substr($data_stima_checkin,5,2);
$giorno_dts = substr($data_stima_checkin,8,2);
$data_stima_checkin = date("Y-m-d",mktime(0,0,0,$mese_dts,($giorno_dts + $giorno_stima_checkin - 1),$anno_dts));
$stima_checkin = $data_stima_checkin." ".$ora_stima_checkin.":".$min_stima_checkin.":00";
if (preg_match("/[0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:00/",$stima_checkin)) {
esegui_query("update $tableprenota set checkout = '$stima_checkin' where idprenota = '$idprenota' ");
echo "<br>".mex("Orario stimato di entrata",$pag).": <b>".substr(str_replace($data_ini_prenota_f,"",formatta_data($stima_checkin,$stile_data)),0,-3)."</b>.<br>";
} # fine if (preg_match("/[0-9]{4}-[0-9]{2}-[0-9]{2} [0-9]{2}:[0-9]{2}:00/",$stima_checkin))
} # fine if (controlla_num_pos($giorno_stima_checkin) == "SI" and...
} # fine if ($inizioperiodo == $vett_idinizio[$n_t][1])
} # fine if ($giorno_stima_checkin and $ora_stima_checkin and $min_stima_checkin and $priv_ins_checkin == "s")
