function estendi_menu_date($file_menu, $nuovo_file_menu, $tipo_periodi, $data_ini, $data_ini_agg, $data_fine, $anno, $pag) { $mese_fine = substr($data_fine, 5, 2); $anno_fine = substr($data_fine, 0, 4); $giorno_fine = substr($data_fine, 8, 2); if ((int) substr($data_fine, 8, 2) == 1) { $mese_fine--; } if ($anno_fine > $anno) { $diff = $anno_fine - $anno; $mese_fine = $diff * 12 + $mese_fine; } # fine if ($anno_fine > $anno) if (!$data_ini_agg or $data_ini_agg < $data_ini) { $data_ini_agg = $data_ini; } $mese_ini_agg = substr($data_ini_agg, 5, 2); $anno_ini_agg = substr($data_ini_agg, 0, 4); $numgiorno = substr($data_ini_agg, 8, 2); if ($anno_ini_agg > $anno) { $diff = $anno_ini_agg - $anno; $mese_ini_agg = $diff * 12 + $mese_ini_agg; } # fine if ($anno_fine > $anno) if ($tipo_periodi == "g") { $aggiungi_giorni = 1; } else { $aggiungi_giorni = 7; } $date_option_agg = ""; $n_date_menu_agg = 0; $mesecreato = $mese_ini_agg; while ($mesecreato <= $mese_fine) { if ($date_option_agg) { $numgiorno = $numgiorno + $aggiungi_giorni; } $datafine = date("Y-m-d", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno)); $annocreato = date("Y", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno)); $mesecreato = date("n", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno)); if ($annocreato > $anno) { $diff = $annocreato - $anno; $mesecreato = $diff * 12 + $mesecreato; } # fine if ($annocreato > $anno) $nome_giorno = date("D", mktime(0, 0, 0, $mese_ini_agg, $numgiorno, $anno)); if ($tipo_periodi == "g") { $nome_giorno = "[{$nome_giorno}]"; } else { $nome_giorno = ""; } $nome_mese = substr($datafine, 5, 2); $numero_giorno = substr($datafine, 8, 2); $numero_anno = substr($datafine, 0, 4); if (!$date_option_agg) { $a_ini_menu_agg = substr($datafine, 0, 4); $m_ini_menu_agg = substr($datafine, 5, 2) - 1; $g_ini_menu_agg = substr($datafine, 8, 2); } # fine if (!$date_option_agg) $n_date_menu_agg++; $date_option_agg .= "<option value=\\\"{$datafine}\\\">[{$nome_mese}] {$numero_giorno}{$nome_giorno}, {$numero_anno}</option>\n"; } # fine while ($mesecreato <= $mese_fine) if ($tipo_periodi == "g") { $date_option_agg = str_replace("[Sun]", mex(" Do", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[Mon]", mex(" Lu", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[Tue]", mex(" Ma", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[Wed]", mex(" Me", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[Thu]", mex(" Gi", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[Fri]", mex(" Ve", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[Sat]", mex(" Sa", "inizio.php"), $date_option_agg); } # fine if ($tipo_periodi == "g") $date_option_agg = str_replace("[01]", mex("Gen", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[02]", mex("Feb", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[03]", mex("Mar", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[04]", mex("Apr", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[05]", mex("Mag", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[06]", mex("Giu", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[07]", mex("Lug", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[08]", mex("Ago", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[09]", mex("Set", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[10]", mex("Ott", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[11]", mex("Nov", "inizio.php"), $date_option_agg); $date_option_agg = str_replace("[12]", mex("Dic", "inizio.php"), $date_option_agg); unset($y_ini_menu); unset($m_ini_menu); unset($d_ini_menu); unset($n_dates_menu); unset($d_increment); include $file_menu; $num_periodi_vecchi = count($y_ini_menu); $fileaperto = fopen($nuovo_file_menu, "w+"); flock($fileaperto, 2); fwrite($fileaperto, "<?php \n\n"); $num_menu = 0; for ($num1 = 0; $num1 < $num_periodi_vecchi; $num1++) { $scrivi = 0; if ($y_ini_menu[$num1] . "-" . $m_ini_menu[$num1] . "-" . $d_ini_menu[$num1] > $data_ini) { $scrivi = 1; } else { $numgiorno = $d_ini_menu[$num1]; for ($num2 = 0; $num2 < $n_dates_menu[$num1]; $num2++) { $data_corr = date("Y-m-d", mktime(0, 0, 0, $m_ini_menu[$num1] + 1, $numgiorno, $y_ini_menu[$num1])); if ($data_corr >= $data_ini and $data_corr != $data_ini_agg) { $y_ini_menu[$num1] = substr($data_corr, 0, 4); $m_ini_menu[$num1] = substr($data_corr, 5, 2) - 1; $d_ini_menu[$num1] = substr($data_corr, 8, 2); $n_dates_menu[$num1] = $n_dates_menu[$num1] - $num2; if ($n_dates_menu[$num1]) { $scrivi = 1; } break; } # fine if ($data_corr >= $data_ini and... $numgiorno = $numgiorno + $d_increment[$num1]; } # fine for $num2 } # fine else if ($y_ini_menu[$num1]."-".$m_ini_menu[$num1]."-".$d_ini_menu[$num1] > $data_ini) if ($scrivi) { fwrite($fileaperto, "\$y_ini_menu[{$num_menu}] = \"" . $y_ini_menu[$num1] . "\";\n\$m_ini_menu[{$num_menu}] = \"" . $m_ini_menu[$num1] . "\";\n\$d_ini_menu[{$num_menu}] = \"" . $d_ini_menu[$num1] . "\";\n\$n_dates_menu[{$num_menu}] = \"" . $n_dates_menu[$num1] . "\";\n\$d_increment[{$num_menu}] = \"" . $d_increment[$num1] . "\";\n"); $num_menu++; } # fine if ($scrivi) } # fine for $num1 $dates_options_list_vett = explode("<option value=\"", $dates_options_list); $num_dates_options_list = count($dates_options_list_vett); for ($num1 = 1; $num1 < $num_dates_options_list; $num1++) { $data_corr = substr($dates_options_list_vett[$num1], 0, 10); if ($data_corr >= $data_ini and ($data_corr != $data_ini_agg or !$date_option_agg)) { $n_dates_options_list .= "<option value=\"" . $dates_options_list_vett[$num1]; } } # fine for $num1 if ($n_date_menu_agg) { fwrite($fileaperto, "\$y_ini_menu[{$num_menu}] = \"{$a_ini_menu_agg}\";\n\$m_ini_menu[{$num_menu}] = \"{$m_ini_menu_agg}\";\n\$d_ini_menu[{$num_menu}] = \"{$g_ini_menu_agg}\";\n\$n_dates_menu[{$num_menu}] = \"{$n_date_menu_agg}\";\n\$d_increment[{$num_menu}] = \"{$aggiungi_giorni}\";\n"); } # fine if ($n_date_menu_agg) if ($partial_dates) { fwrite($fileaperto, "\$partial_dates = 1;\n"); } fwrite($fileaperto, "\$d_names = \"\\\"" . mex(" Do", "inizio.php") . "\\\",\\\"" . mex(" Lu", "inizio.php") . "\\\",\\\"" . mex(" Ma", "inizio.php") . "\\\",\\\"" . mex(" Me", "inizio.php") . "\\\",\\\"" . mex(" Gi", "inizio.php") . "\\\",\\\"" . mex(" Ve", "inizio.php") . "\\\",\\\"" . mex(" Sa", "inizio.php") . "\\\"\";\n\$m_names = \"\\\"" . mex("Gen", "inizio.php") . "\\\",\\\"" . mex("Feb", "inizio.php") . "\\\",\\\"" . mex("Mar", "inizio.php") . "\\\",\\\"" . mex("Apr", "inizio.php") . "\\\",\\\"" . mex("Mag", "inizio.php") . "\\\",\\\"" . mex("Giu", "inizio.php") . "\\\",\\\"" . mex("Lug", "inizio.php") . "\\\",\\\"" . mex("Ago", "inizio.php") . "\\\",\\\"" . mex("Set", "inizio.php") . "\\\",\\\"" . mex("Ott", "inizio.php") . "\\\",\\\"" . mex("Nov", "inizio.php") . "\\\",\\\"" . mex("Dic", "inizio.php") . "\\\"\";\n\n\$dates_options_list = \"\n\n" . trim(addslashes($n_dates_options_list)) . "\n{$date_option_agg}\n\";\n\n?>"); flock($fileaperto, 3); fclose($fileaperto); }
} # fine if ($righe_tab_disp) } # fine if ($mostra_quadro_disp) } else { echo "<br>\n<div style=\"text-align: center;\">"; } } else { unlock_tabelle($tabelle_lock); } if ($origine) { $action = $origine; $fr_torna_indietro = mex("Torna indietro", $pag); } else { $action = "inizio.php"; $fr_torna_indietro = mex("Torna al menù principale", $pag); } # fine else if ($origine) echo "<br><br><form accept-charset=\"utf-8\" method=\"post\" action=\"{$action}\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"{$fr_torna_indietro}\">\n</div></form><br><br>"; if ($verificare != "NO") { echo "</div>"; } if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) { include "./themes/" . $tema[$id_utente] . "/php/foot.php"; } else { include "./includes/foot.php"; } } # fine if ($anno_utente_attivato == "SI" and ($priv_ins_nuove_prenota == "s" or $priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n")) } # fine if ($id_utente)
function scarica_backup_subordinazione ($file_backup,$url_subordinazione,$utente_subordinazione,$password_subordinazione,$anno,$compresso_subordinazione) { global $tableversioni,$pag; $errore = "NO"; if ($output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione&anno=$anno&azione=SI&crea_backup=SI")) { $backup = @fopen($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione&anno=$anno&azione=SI&mostra_header=NO&salva_backup=SI&compresso=$compresso_subordinazione","r"); if ($backup) { if ($fileaperto = fopen($file_backup,"w")) { flock($fileaperto,2); while (!feof($backup)) { $linee = fread($backup,524288); fwrite($fileaperto,$linee); } # fine while (!feof($fbackup)) flock($fileaperto,3); fclose($fileaperto); } # fine if ($fileaperto = fopen($file_backup,"w")) else { $errore = "SI"; echo mex("Non ho i permassi di scrittura sulla cartella data",$pag).".<br>"; } # fine else if ($fileaperto = fopen($file_backup,"w")) fclose ($backup); if ($errore != "SI") { if ($compresso_subordinazione == "SI") { if (rename($file_backup,$file_backup.".gz")) { if ($fileaperto = fopen($file_backup,"w")) { flock($fileaperto,2); $gzbackup = gzopen($file_backup.".gz","r"); if ($gzbackup) { while (!feof($gzbackup)) { $linee = gzread($gzbackup,524288); fwrite($fileaperto,$linee); } # fine while (!feof($gzbackup)) } # fine if ($gzbackup) flock($fileaperto,3); fclose($fileaperto); } # fine if ($fileaperto = fopen($file_backup,"w")) unlink($file_backup.".gz"); } # fine if (rename($file_backup,$file_backup.".gz")) } # fine if ($compresso_subordinazione == "SI") $linee = ""; if ($fbackup = fopen($file_backup,"r")) { $linee = fread($fbackup,524288); fclose($fbackup); } # fine if ($fbackup = fopen($file,"r")) $versione_corrente = esegui_query("select * from $tableversioni where idversioni = 1"); $versione_corrente = risul_query($versione_corrente,0,'num_versione'); if (str_replace("<versione>$versione_corrente</versione>","",$linee) == $linee) { $errore = "SI"; if (str_replace("<versione>","",$linee) == $linee) echo mex("Non si è potuto scaricare il backup remoto",$pag).".<br>"; else echo mex("Versione locale diversa da quella remota",$pag).".<br>"; include("./includes/funzioni_aggiorna.php"); global $agg_cod_sorg; unset($linee); $agg_cod_sorg = aggiorna_codice_sorgente_phpr($url_subordinazione); if ($agg_cod_sorg) echo "<br>".mex("Aggiornamento codice sorgente eseguito con successo",$pag)."!<br><br>"; } # fine if (str_replace("<versione>$versione_corrente</versione>","",$linee) == $linee) unset($linee); } # fine if ($errore != "SI") } # fine if ($backup) else { $errore = "SI"; echo mex("Non si è potuto stabilire la connessione",$pag).".<br>"; } # fine else if ($backup) } # fine if ($output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione")) else { $errore = "SI"; echo mex("Non si è potuto stabilire la connessione",$pag).".<br>"; } # fine else if ($output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione")) if ($errore != "SI") $output = @file($url_subordinazione."crea_backup.php?nome_utente_phpr=$utente_subordinazione&password_phpr=$password_subordinazione&anno=$anno&azione=SI&cancella_backup=SI"); return $errore; } # fine function scarica_backup_subordinazione
function crea_modello_rat ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) { global $num_periodi_date,$M_PHPR_DB_TYPE,$M_PHPR_DB_NAME,$M_PHPR_DB_HOST,$M_PHPR_DB_PORT,$M_PHPR_DB_USER,$M_PHPR_DB_PASS,$M_PHPR_LOAD_EXT,$M_PHPR_TAB_PRE,$estendi_ultima_data; global $m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$mostra_caparra,$modello_esistente,$cambia_frasi,$template_data_dir,$template_file_name,$parola_settimane; global $apertura_tag_font,$chiusura_tag_font,$stile_tabella_tariffe,$m_valuta_sing,$m_valuta_plur,$prima_parte_html,$ultima_parte_html,$file_css_frame,$tema_modello; $tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello; $tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello; $tableanni = $PHPR_TAB_PRE."anni"; if (controlla_anno($anno_modello) != "SI") { $continua = "NO"; $anno_modello = ""; } # fine if (controlla_anno($anno_modello) != "SI") else { $anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'"); if (numlin_query($anno_esistente) != 1) $continua = "NO"; } # fine else if (controlla_anno($anno_modello) != "SI") if ($continua != "NO") { if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO"; $date_in_menu = ""; $idfineperiodo_prec = -10; if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1; for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) { global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1}; $inizioperiodo = aggslashdb(${"inizioperiodo".$num1}); $fineperiodo = aggslashdb(${"fineperiodo".$num1}); $idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' "); $num_idinizioperiodo = numlin_query($idinizioperiodo); if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; } else { $idinizioperiodo = risul_query($idinizioperiodo,0,idperiodi); } $inizioperiodo = $idinizioperiodo; if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) { $idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello"); $idfineperiodo = risul_query($idfineperiodo,0,0); } # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) else { $idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' "); $num_idfineperiodo = numlin_query($idfineperiodo); if ($num_idfineperiodo == 0) { $idfineperiodo = -1; } else { $idfineperiodo = risul_query($idfineperiodo,0,idperiodi); } } # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) $fineperiodo = $idfineperiodo ; ${"inizioperiodo".$num1} = $inizioperiodo; ${"fineperiodo".$num1} = $fineperiodo; if ($idfineperiodo < $idinizioperiodo) $continua = "NO"; if (($idfineperiodo_prec + 1) > $idinizioperiodo) $continua = "NO"; $idfineperiodo_prec = $idfineperiodo; ${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1}); if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO"; } # fine for $num1 if ($continua == "NO") { if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>"; } # fine if ($continua == "NO") else { $file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php"); $num_linee_file_intero = count($file_intero); $pag_gm = "giorni_mesi.php"; $m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'"); $m_tipo_periodi = risul_query($m_tipo_periodi,0,0); for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) { $inizioperiodo = ${"inizioperiodo".$num1}; $fineperiodo = ${"fineperiodo".$num1}; $num_intervallo = 1; for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) { if (substr($file_intero[$num2],0,7) == "<option") { $data_option = substr($file_intero[$num2],16,10); $id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' "); $esiste_data_option = numlin_query($id_data_option); if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,idperiodi); else { $id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' "); $id_data_option = risul_query($id_data_option,0,idperiodi); } # fine else if ($esiste_data_option == 1) if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) { if ($num_intervallo == 1) { $giorno_option = substr($data_option,8,2); $mese_option = substr($data_option,5,2); $anno_option = substr($data_option,0,4); $nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option)); $nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option)); if ($m_tipo_periodi == "g") { if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello); if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello); if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello); if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello); if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello); if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello); if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello); } # fine if ($m_tipo_periodi == "g") else $nome_giorno = ""; if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello); if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello); if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello); if ($nome_mese == "Apr") $nome_mese = mex2("Apr",$pag_gm,$lingua_modello); if ($nome_mese == "May") $nome_mese = mex2("Mag",$pag_gm,$lingua_modello); if ($nome_mese == "Jun") $nome_mese = mex2("Giu",$pag_gm,$lingua_modello); if ($nome_mese == "Jul") $nome_mese = mex2("Lug",$pag_gm,$lingua_modello); if ($nome_mese == "Aug") $nome_mese = mex2("Ago",$pag_gm,$lingua_modello); if ($nome_mese == "Sep") $nome_mese = mex2("Set",$pag_gm,$lingua_modello); 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
$template_theme_name[1] = "default"; $template_theme_colors[1][1]['name'] = "font"; $template_theme_colors[1][1]['default'] = "#000000"; $template_theme_colors[1][2]['name'] = "background"; $template_theme_colors[1][2]['default'] = "#ffffff"; $template_theme_colors[1][3]['name'] = "background 2"; $template_theme_colors[1][3]['default'] = "#ebebeb"; $template_theme_values[1][1]['name'] = mex("URL della home",$pag); $template_theme_values[1][1]['default'] = $dati_struttura[4]; $template_theme_values[1][1]['replace'] = "<div style=\"width: 100%; padding: 10px 0 10px 20px; margin: 0; border-bottom: 2px solid [theme_color_1]; background-color: [theme_color_3];\"><a href=\"[theme_value_1]\" style=\"color: [theme_color_1];\" target=\"_top\">[theme_value_2]</a></div>"; $template_theme_values[1][2]['name'] = mex("URL del logo",$pag); $template_theme_values[1][2]['default'] = $dati_struttura[15]; $template_theme_values[1][2]['replace'] = "<img style=\"text-decoration: none; border: 0px;\" src=\"[theme_value_2]\" alt=\"[theme_value_3]\">"; $template_theme_values[1][2]['null'] = "[theme_value_3]"; $template_theme_values[1][3]['name'] = mex("Torna alla HOME",$pag); $template_theme_values[1][3]['default'] = mex2("Torna alla HOME",$pag,$lingua_modello); $template_theme_html_pre[1] = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\" \"http://www.w3.org/TR/html4/strict.dtd\"> <html> <head> <meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\" > <title> $nome_file </title> <style type=\"text/css\"> .rates { background-color: [theme_color_3]; border-radius: 10px; } .rates tr:first-child td:first-child { border-top-left-radius: 10px; } .rates tr:first-child td:last-child { border-top-right-radius: 10px; } .rates tr:last-child td:first-child { border-bottom-left-radius: 10px; } .rates tr:last-child td:last-child { border-bottom-right-radius: 10px; } </style> </head>
echo "$istogramma<br><br>"; } # fine if (@is_array($x)) } # fine if ($tipo_tabella == "statistiche" and $priv_vedi_tab_stat != "n") echo "<div style=\"text-align: center;\"><br> <form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input class=\"sbutton\" type=\"submit\" name=\"indietro\" value=\"".mex("Torna al menù principale",$pag)."\"> </div></form></div><div style=\"height: 20px\"></div>"; if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/".$tema[$id_utente]."/php")) include("./themes/".$tema[$id_utente]."/php/foot.php"); else include("./includes/foot.php"); } # fine if ($anno_utente_attivato == "SI") } # fine if ($id_utente) ?>
# fine if ($priv_ins_entrate == "s") if ($priv_ins_spese == "s") { echo "\n<h3>" . mex("Inserisci i costi di gestione per l'anno", $pag) . " {$anno}.</h3>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"costi.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\"><br>\n<table style=\"margin-left: auto; margin-right: auto;\" cellspacing=2 cellpadding=5>\n<tr><td>"; if ($num_casse_attive == 1) { echo $hidden_cassa; } else { echo "" . mex("Cassa", $pag) . ": <select name=\"id_cassa\">\n{$opt_casse}</select></td></tr>\n<tr><td>"; } echo "" . mex("Natura spesa", $pag) . ": \n<input type=\"text\" name=\"nome_costo\" size=\"30\" value=\"\">\n</td></tr>\n<tr><td>\n" . mex("Importo", $pag) . ": \n<input type=\"text\" name=\"val_costo\" size=\"10\" value=\"\"> {$Euro}.\n</td></tr>\n{$metodo_pagamento_txt}"; if ($priv_persona_ins_costi == "c") { echo "<tr><td>" . mex("Persona che inserisce", $pag) . ": \n<input type=\"text\" name=\"persona_costo\" size=\"20\" value=\"\"> (" . mex("opzionale", $pag) . ").\n</td></tr>"; } # fine if ($priv_persona_ins_costi == "c") echo "</table><div style=\"text-align: center;\">\n<input class=\"sbutton\" type=\"submit\" name=\"inserisci_spesa\" value=\"" . mex("Inserisci la spesa", $pag) . "\"><br>\n</div></div></form>\n<table><tr><td style=\"height: 8px;\"></td></tr></table><hr style=\"width: 95%\">"; } # fine if ($priv_ins_spese == "s") echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div style=\"text-align: center;\">\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"tipo_tabella\" value=\"costi\">\n<input class=\"sbutton\" type=\"submit\" name=\"visualizza\" value=\"" . mex("Visualizza la tabella con tutte le spese e le entrate", $pag) . "\">\n</div></form>"; } # fine else if (!$num_casse_attive) echo "<table><tr><td style=\"height: 8px;\"></td></tr></table>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div style=\"text-align: center;\">\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"indietro\" value=\"" . mex("Torna al menù principale", $pag) . "\">\n</div></form><table><tr><td style=\"height: 20px;\"></td></tr></table>"; } # fine if ($mostra_form_inserimento != "NO") if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) { include "./themes/" . $tema[$id_utente] . "/php/foot.php"; } else { include "./includes/foot.php"; } } # fine if ($anno_utente_attivato == "SI") } # fine if ($id_utente)
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") }
function trova_prima_data($testo, $stile_data, $lingua) { global $lingua_mex; $prima_data = ""; $lung_prima_data = strlen($testo); if (preg_match("|[^0-9][0-9]{1,2}[-/ ][0-9]{1,2}[-/ ][0-9]{4,4}[^0-9]|", $testo)) { $prima_data_vett = preg_split("|[0-9]{1,2}[-/ ][0-9]{1,2}[-/ ][0-9]{4,4}|", $testo); $lung_prima_data_corr = strlen($prima_data_vett[0]); if ($lung_prima_data_corr < $lung_prima_data) { $lung_prima_data = $lung_prima_data_corr; $prima_data = substr($testo, $lung_prima_data); if ($prima_data_vett[1]) { $prima_data = explode($prima_data_vett[1], $prima_data); $prima_data = $prima_data[0]; } # fine if ($prima_data_vett[1]) $prima_data_corr = preg_split("|[-/ ]|", $prima_data); if (strlen($prima_data_corr[0]) < 2) { $prima_data_corr[0] = "0" . $prima_data_corr[0]; } if (strlen($prima_data_corr[1]) < 2) { $prima_data_corr[1] = "0" . $prima_data_corr[1]; } if ((int) $prima_data_corr[0] > 12) { $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[1] . "-" . $prima_data_corr[0]; } else { if ((int) $prima_data_corr[1] > 12) { $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[0] . "-" . $prima_data_corr[1]; } else { if ($stile_data == "usa") { $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[0] . "-" . $prima_data_corr[1]; } else { $prima_data = $prima_data_corr[2] . "-" . $prima_data_corr[1] . "-" . $prima_data_corr[0]; } } # fine else if ($prima_data_corr[1] > 12) } # fine else if ($prima_data_corr[0] > 12) } # fine if ($lung_prima_data_corr < $lung_prima_data) } # fine if (preg_match("|[^0-9][0-9]{1,2}[-/ ][0-9]{1,2}[-/ ][0-9]{4,4}|",$testo)) if (preg_match("|[^0-9][0-9]{4,4}[-/ ][0-9]{1,2}[-/ ][0-9]{1,2}[^0-9]|", $testo)) { $prima_data_vett = preg_split("|[0-9]{4,4}[-/ ][0-9]{1,2}[-/ ][0-9]{1,2}|", $testo); $lung_prima_data_corr = strlen($prima_data_vett[0]); if ($lung_prima_data_corr < $lung_prima_data) { $lung_prima_data = $lung_prima_data_corr; $prima_data = substr($testo, $lung_prima_data); if ($prima_data_vett[1]) { $prima_data = explode($prima_data_vett[1], $prima_data); $prima_data = $prima_data[0]; } # fine if ($prima_data_vett[1]) $prima_data_corr = preg_split("|[-/ ]|", $prima_data); if (strlen($prima_data_corr[1]) < 2) { $prima_data_corr[1] = "0" . $prima_data_corr[1]; } if (strlen($prima_data_corr[2]) < 2) { $prima_data_corr[2] = "0" . $prima_data_corr[2]; } $prima_data = $prima_data_corr[0] . "-" . $prima_data_corr[1] . "-" . $prima_data_corr[2]; } # fine if ($lung_prima_data_corr < $lung_prima_data) } # fine if (preg_match("|[^0-9][0-9]{4,4}[-/ ][0-9]{1,2}[-/ ][0-9]{1,2}[^0-9]|",$testo)) $lingua_orig = $lingua_mex; $lingua_mex = $lingua; $Gen = mex("Gen", 'giorni_mesi.php'); $Feb = mex("Feb", 'giorni_mesi.php'); $Mar = mex("Mar", 'giorni_mesi.php'); $Apr = mex("Apr", 'giorni_mesi.php'); $Mag = mex("Mag", 'giorni_mesi.php'); $Giu = mex("Giu", 'giorni_mesi.php'); $Lug = mex("Lug", 'giorni_mesi.php'); $Ago = mex("Ago", 'giorni_mesi.php'); $Set = mex("Set", 'giorni_mesi.php'); $Ott = mex("Ott", 'giorni_mesi.php'); $Nov = mex("Nov", 'giorni_mesi.php'); $Dic = mex("Dic", 'giorni_mesi.php'); $Gennaio = mex("Gennaio", 'giorni_mesi.php'); $Febbraio = mex("Febbraio", 'giorni_mesi.php'); $Marzo = mex("Marzo", 'giorni_mesi.php'); $Aprile = mex("Aprile", 'giorni_mesi.php'); $Maggio = mex("Maggio", 'giorni_mesi.php'); $Giugno = mex("Giugno", 'giorni_mesi.php'); $Luglio = mex("Luglio", 'giorni_mesi.php'); $Agosto = mex("Agosto", 'giorni_mesi.php'); $Settembre = mex("Settembre", 'giorni_mesi.php'); $Ottobre = mex("Ottobre", 'giorni_mesi.php'); $Novembre = mex("Novembre", 'giorni_mesi.php'); $Dicembre = mex("Dicembre", 'giorni_mesi.php'); $lingua_mex = $lingua_orig; $mesi_alternativi = "{$Gen}|{$Feb}|{$Mar}|{$Apr}|{$Mag}|{$Giu}|{$Lug}|{$Ago}|{$Set}|{$Ott}|{$Nov}|{$Dic}|{$Gennaio}|{$Febbraio}|{$Marzo}|{$Aprile}|{$Maggio}|{$Giugno}|{$Luglio}|{$Agosto}|{$Settembre}|{$Ottobre}|{$Novembre}|{$Dicembre}"; if (preg_match("=[^0-9a-z]({$mesi_alternativi})[, -/]+[0-9]{1,2}[, -/]+[0-9]{4,4}[^0-9a-z]=i", $testo)) { $prima_data_vett = preg_split("=({$mesi_alternativi})[, -/]+[0-9]{1,2}[, -/]+[0-9]{4,4}=i", $testo); $lung_prima_data_corr = strlen($prima_data_vett[0]); if ($lung_prima_data_corr < $lung_prima_data) { $lung_prima_data = $lung_prima_data_corr; $prima_data = substr($testo, $lung_prima_data); if ($prima_data_vett[1]) { $prima_data = explode($prima_data_vett[1], $prima_data); $prima_data = $prima_data[0]; } # fine if ($prima_data_vett[1]) $prima_data_corr = preg_split("|[, -/]+|", $prima_data); if ($prima_data_corr[0] == $Gen or $prima_data_corr[0] == $Gennaio) { $mese = "01"; } if ($prima_data_corr[0] == $Feb or $prima_data_corr[0] == $Febbraio) { $mese = "02"; } if ($prima_data_corr[0] == $Mar or $prima_data_corr[0] == $Marzo) { $mese = "03"; } if ($prima_data_corr[0] == $Apr or $prima_data_corr[0] == $Aprile) { $mese = "04"; } if ($prima_data_corr[0] == $Mag or $prima_data_corr[0] == $Maggio) { $mese = "05"; } if ($prima_data_corr[0] == $Giu or $prima_data_corr[0] == $Giugno) { $mese = "06"; } if ($prima_data_corr[0] == $Lug or $prima_data_corr[0] == $Luglio) { $mese = "07"; } if ($prima_data_corr[0] == $Ago or $prima_data_corr[0] == $Agosto) { $mese = "08"; } if ($prima_data_corr[0] == $Set or $prima_data_corr[0] == $Settembre) { $mese = "09"; } if ($prima_data_corr[0] == $Ott or $prima_data_corr[0] == $Ottobre) { $mese = "10"; } if ($prima_data_corr[0] == $Nov or $prima_data_corr[0] == $Novembre) { $mese = "11"; } if ($prima_data_corr[0] == $Dic or $prima_data_corr[0] == $Dicembre) { $mese = "12"; } if (strlen($prima_data_corr[1]) < 2) { $prima_data_corr[1] = "0" . $prima_data_corr[1]; } $prima_data = $prima_data_corr[2] . "-" . $mese . "-" . $prima_data_corr[1]; } # fine if ($lung_prima_data_corr < $lung_prima_data) } # fine if (preg_match("=[^0-9a-z]($mesi_alternativi)[, -/]+[0-9]{1,2}[, -/]+[0-9]{4,4}[^0-9a-z]=i",$testo)) if (preg_match("=[^0-9a-z][0-9]{1,2}[, -/]+({$mesi_alternativi})[, -/]+[0-9]{4,4}[^0-9a-z]=i", $testo)) { $prima_data_vett = preg_split("=[0-9]{1,2}[, -/]+({$mesi_alternativi})[, -/]+[0-9]{4,4}=i", $testo); $lung_prima_data_corr = strlen($prima_data_vett[0]); if ($lung_prima_data_corr < $lung_prima_data) { $lung_prima_data = $lung_prima_data_corr; $prima_data = substr($testo, $lung_prima_data); if ($prima_data_vett[1]) { $prima_data = explode($prima_data_vett[1], $prima_data); $prima_data = $prima_data[0]; } # fine if ($prima_data_vett[1]) $prima_data_corr = preg_split("|[, -/]+|", $prima_data); if ($prima_data_corr[1] == $Gen or $prima_data_corr[1] == $Gennaio) { $mese = "01"; } if ($prima_data_corr[1] == $Feb or $prima_data_corr[1] == $Febbraio) { $mese = "02"; } if ($prima_data_corr[1] == $Mar or $prima_data_corr[1] == $Marzo) { $mese = "03"; } if ($prima_data_corr[1] == $Apr or $prima_data_corr[1] == $Aprile) { $mese = "04"; } if ($prima_data_corr[1] == $Mag or $prima_data_corr[1] == $Maggio) { $mese = "05"; } if ($prima_data_corr[1] == $Giu or $prima_data_corr[1] == $Giugno) { $mese = "06"; } if ($prima_data_corr[1] == $Lug or $prima_data_corr[1] == $Luglio) { $mese = "07"; } if ($prima_data_corr[1] == $Ago or $prima_data_corr[1] == $Agosto) { $mese = "08"; } if ($prima_data_corr[1] == $Set or $prima_data_corr[1] == $Settembre) { $mese = "09"; } if ($prima_data_corr[1] == $Ott or $prima_data_corr[1] == $Ottobre) { $mese = "10"; } if ($prima_data_corr[1] == $Nov or $prima_data_corr[1] == $Novembre) { $mese = "11"; } if ($prima_data_corr[1] == $Dic or $prima_data_corr[1] == $Dicembre) { $mese = "12"; } if (strlen($prima_data_corr[0]) < 2) { $prima_data_corr[0] = "0" . $prima_data_corr[0]; } $prima_data = $prima_data_corr[2] . "-" . $mese . "-" . $prima_data_corr[0]; } # fine if ($lung_prima_data_corr < $lung_prima_data) } # fine if (preg_match("=[^0-9a-z][0-9]{1,2}[, -/]+($mesi_alternativi)[, -/]+[0-9]{4,4}[^0-9a-z]=i",$testo)) return $prima_data; }
$tariffa = risul_query($regole4, $num1, 'tariffa_per_persone'); $persone = risul_query($regole4, $num1, 'iddatainizio'); echo "if (tariffa == \"{$tariffa}\") txt_box.value = \"{$persone}\";\n"; } # fine for $num1 echo "}\n-->\n</script>\n\n<div style=\"text-align: center;\">" . mex("Regola di assegnazione", $pag) . " <b>4</b>.</div><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"crearegole.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"inserisci\" value=\"SI\">\n" . mex("Quando si sceglie la tariffa", $pag) . "\n<select name=\"tipotariffa\" id=\"t4\" onchange=\"aggiorna_val_reg4()\">\n<option value=\"\" selected>----</option>"; for ($numtariffa = 1; $numtariffa <= $numero_tariffe; $numtariffa = $numtariffa + 1) { $tariffa = "tariffa" . $numtariffa; $tariffa_vedi = mex("tariffa", "prenota.php") . $numtariffa; $nometariffa = risul_query($rigatariffe, 0, $tariffa); if ($nometariffa != "") { $nometariffa_vedi = " ({$nometariffa})"; } else { $nometariffa_vedi = ""; } echo "\n<option value=\"{$tariffa}\">{$tariffa_vedi}{$nometariffa_vedi}</option>"; } # fine for $numtariffa echo "</select>\n " . mex("assegna automaticamente come numero di persone", $pag) . "\n <input type=\"text\" id=\"v4\" name=\"num_persone\" size=\"5\">\n " . mex("se non si inserisce nessun altro numero", $pag) . ".<br>"; echo "<script type=\"text/javascript\">\n<!--\nvar txt_box = document.getElementById(\"v4\");\ntxt_box.disabled = true;\n-->\n</script>\n<div style=\"text-align: center;\">\n<input class=\"sbutton\" type=\"submit\" name=\"regola_4\" value=\"" . mex("Inserisci o modifica la regola", $pag) . " 4\">\n</div></div></form><hr style=\"width: 95%\">"; echo "<table><tr><td style=\"height: 6px;\"></td></tr></table>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"creaprezzi.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"ins_rapido_costo\" value=\"SI\">\n<input type=\"hidden\" name=\"origine\" value=\"crearegole.php\">\n" . mex("Inserimento rapido di un nuovo costo aggiuntivo per", 'creaprezzi.php') . "\n <select name=\"tipocostoagg\">\n<option value=\"perm_min\">" . mex("permanenza minima", 'creaprezzi.php') . "</option>\n<option value=\"num_bamb\">" . mex("numero di bambini", 'creaprezzi.php') . "</option>\n<option value=\"letto_agg\">" . mex("letto aggiuntivo", 'creaprezzi.php') . "</option>\n<option value=\"off_spec\">" . mex("offerta speciale", 'creaprezzi.php') . "</option>\n</select>\n<input class=\"sbutton\" type=\"submit\" value=\"" . mex("inserisci", 'creaprezzi.php') . "\">.\n<table><tr><td style=\"height: 6px;\"></td></tr></table>\n</div></form><hr style=\"width: 95%\">"; echo "<div style=\"text-align: center;\"><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"tipo_tabella\" value=\"regole\">\n<input class=\"sbutton\" type=\"submit\" name=\"visualizza\" value=\"" . mex("Vedi le regole già inserite", $pag) . "\">\n</div></form><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"" . mex("Torna al menù principale", $pag) . "\">\n<br></div></form><br></div>"; } # fine else if ($inserisci) if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) { include "./themes/" . $tema[$id_utente] . "/php/foot.php"; } else { include "./includes/foot.php"; } } # fine if ($id_utente and $id_utente == 1)
$id_utente_mod = $id_utente; } echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"./personalizza.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"id_utente_mod\" value=\"{$id_utente_mod}\">\n<input type=\"hidden\" name=\"aggiorna_qualcosa\" value=\"SI\">\n<input type=\"hidden\" name=\"origine\" value=\"./creaprezzi.php\">\n<input type=\"hidden\" name=\"cambiaarrtasse\" value=\"SI\">"; $arrotond_tasse = esegui_query("select * from {$tablepersonalizza} where idpersonalizza = 'arrotond_tasse' and idutente = '{$id_utente}'"); $arrotond_tasse = virgola_in_num(risul_query($arrotond_tasse, 0, 'valpersonalizza'), $stile_soldi); echo ucfirst(mex("valore a cui arrotondare le percentuali delle tasse", "personalizza.php")) . ":\n <input type=\"text\" name=\"nuovo_arrotond_tasse\" size=\"4\" value=\"{$arrotond_tasse}\">\n<input class=\"sbutton\" type=\"submit\" value=\"" . mex("Cambia", "personalizza.php") . "\">\n</div></form><br>"; } # fine if ($modifica_pers != "NO") echo "<hr style=\"width: 95%\">"; } # fine if ($priv_mod_tariffe != "n" and $lista_opt_tariffe) if ($priv_vedi_tab_periodi != "n") { echo "<div style=\"text-align: center;\"><br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"tipo_tabella\" value=\"periodi\">\n<input class=\"sbutton\" type=\"submit\" name=\"visualizza\" value=\"" . mex("Vedi i prezzi già inseriti", $pag) . "\">\n</div></form><br>"; } # fine if ($priv_vedi_tab_periodi != "n") echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"indietro\" value=\"" . mex("Torna al menù principale", $pag) . "\">\n</div></form></div><br>"; } # fine if ($mostra_form_iniziale != "NO") } # fine else if (($modificacaparra or $modificacommissioni or $modificacommper or $modificatasse) and $priv_mod_tariffe != "n") if ($aggiorna_tariffe_interconn == "SI") { $lock = 1; $aggiorna_disp = 0; $aggiorna_tar = 1; if (@function_exists('pcntl_fork')) { include "./includes/interconnect/aggiorna_ic_fork.php"; } else { include "./includes/interconnect/aggiorna_ic.php"; } } # fine if ($aggiorna_tariffe_interconn == "SI")
function mostra_dati_cliente(&$dati_cliente, &$dcognome, &$dnome, &$dsoprannome, &$dtitolo_cli, &$dsesso, &$ddatanascita, &$ddatanascita_f, &$dnazionenascita, &$dcittanascita, &$dregionenascita, &$ddocumento, &$dscadenzadoc, &$dscadenzadoc_f, &$dtipodoc, &$dnazionedoc, &$dregionedoc, &$dcittadoc, &$dnazionalita, &$dlingua_cli, &$dnazione, &$dregione, &$dcitta, &$dvia, &$dnumcivico, &$dtelefono, &$dtelefono2, &$dtelefono3, &$dfax, &$dcap, &$demail, &$dcod_fiscale, &$dpartita_iva, $mostra_num = "", $priv_ins_clienti = "", $silenzio = "") { global $pag, $id_utente, $PHPR_TAB_PRE; if ($id_utente == 1 or !$id_utente) { $priv_vedi_telefoni = "s"; $priv_vedi_indirizzo = "s"; } else { if (!$priv_ins_clienti) { $privilegi_globali_utente = esegui_query("select * from {$PHPR_TAB_PRE}" . "privilegi where idutente = '{$id_utente}' and anno = '1'"); $priv_ins_clienti = risul_query($privilegi_globali_utente, 0, 'priv_ins_clienti'); } # fine if (!$priv_ins_clienti) $priv_vedi_telefoni = substr($priv_ins_clienti, 3, 1); $priv_vedi_indirizzo = substr($priv_ins_clienti, 4, 1); } # fine else if ($id_utente == 1 or !$id_utente) $didclienti = risul_query($dati_cliente, 0, 'idclienti'); $dcognome = risul_query($dati_cliente, 0, 'cognome'); $dnome = risul_query($dati_cliente, 0, 'nome'); $dsoprannome = risul_query($dati_cliente, 0, 'soprannome'); $dtitolo_cli = risul_query($dati_cliente, 0, 'titolo'); $dsesso = risul_query($dati_cliente, 0, 'sesso'); $ddatanascita = risul_query($dati_cliente, 0, 'datanascita'); $ddatanascita_f = formatta_data($ddatanascita, $stile_data); $ddocumento = risul_query($dati_cliente, 0, 'documento'); $dtipodoc = risul_query($dati_cliente, 0, 'tipodoc'); $dscadenzadoc = risul_query($dati_cliente, 0, 'scadenzadoc'); $dscadenzadoc_f = formatta_data($dscadenzadoc, $stile_data); $dcittadoc = risul_query($dati_cliente, 0, 'cittadoc'); $dregionedoc = risul_query($dati_cliente, 0, 'regionedoc'); $dnazionedoc = risul_query($dati_cliente, 0, 'nazionedoc'); $dcittanascita = risul_query($dati_cliente, 0, 'cittanascita'); $dregionenascita = risul_query($dati_cliente, 0, 'regionenascita'); $dnazionenascita = risul_query($dati_cliente, 0, 'nazionenascita'); $dnazionalita = risul_query($dati_cliente, 0, 'nazionalita'); $dlingua_cli = risul_query($dati_cliente, 0, 'lingua'); $dnazione = risul_query($dati_cliente, 0, 'nazione'); $dregione = risul_query($dati_cliente, 0, 'regione'); $dcitta = risul_query($dati_cliente, 0, 'citta'); if ($priv_vedi_indirizzo == "s") { $dvia = risul_query($dati_cliente, 0, 'via'); $dnumcivico = risul_query($dati_cliente, 0, 'numcivico'); $dcap = risul_query($dati_cliente, 0, 'cap'); } # fine if ($priv_vedi_indirizzo == "s") if ($priv_vedi_telefoni == "s") { $dtelefono = risul_query($dati_cliente, 0, 'telefono'); $dtelefono2 = risul_query($dati_cliente, 0, 'telefono2'); $dtelefono3 = risul_query($dati_cliente, 0, 'telefono3'); $dfax = risul_query($dati_cliente, 0, 'fax'); $demail = risul_query($dati_cliente, 0, 'email'); } # fine if ($priv_vedi_telefoni == "s") $dcod_fiscale = risul_query($dati_cliente, 0, 'cod_fiscale'); $dpartita_iva = risul_query($dati_cliente, 0, 'partita_iva'); if ($dlingua_cli) { if ($dlingua_cli == "ita") { $d_nome_lingua = "Italiano"; } elseif (preg_replace("/[a-z]{2,3}/", "", $dlingua_cli) == "") { if (@is_file("./includes/lang/{$dlingua_cli}/l_n")) { $d_nome_lingua = file("./includes/lang/{$dlingua_cli}/l_n"); $d_nome_lingua = ucfirst(togli_acapo($d_nome_lingua[0])); } # fine if (@is_file("./includes/lang/$dlingua_cli/l_n")) } # fine elseif (preg_replace("/[a-z]{2,3}/","",$dlingua_cli) == "") if (!$d_nome_lingua) { $dlingua_cli = ""; } } # fine if ($dlingua_cli) $output = ""; $O = "o"; $O2 = "o"; if ($dsesso == "f") { $O = "a"; } if ($dsesso2 == "f") { $O2 = "a"; } if ($mostra_num == "SI") { $output .= "{$didclienti}. <em>{$dcognome}</em> "; if ($dnome) { $output .= "<em>{$dnome}</em> "; } } else { if ($dtitolo_cli) { $output .= "{$dtitolo_cli} "; } $output .= "<b>{$dcognome}</b>"; if ($dnome) { $output .= " {$dnome}"; } if ($dsoprannome) { $output .= " ({$dsoprannome})"; } } # fine else if ($mostra_num == "SI") if ($ddatanascita or $dcittanascita) { $output .= " " . mex("nat{$O}", $pag); } if ($ddatanascita) { $output .= " " . mex("il", $pag) . " {$ddatanascita_f}"; } if ($dcittanascita) { $output .= mex(" a", $pag) . " {$dcittanascita}"; } if ($dregionenascita or $dnazionenascita) { $output .= " ({$dregionenascita}"; if ($dregionenascita and $dnazionenascita) { $output .= ", "; } $output .= "{$dnazionenascita})"; } # fine if ($dregionenascita or $dnazionenascita) $lin = ""; if ($dnazionalita) { $lin .= "{$dnazionalita}"; } if ($dnazionalita and $d_nome_lingua) { $lin .= " "; } if ($d_nome_lingua) { $lin .= "(" . mex("ln.", $pag) . " <em>{$d_nome_lingua}</em>)"; } if ($lin and $ddocumento) { if (!$dnazionedoc or $dnazionedoc == $dnazionalita) { $lin .= " - "; } else { $output .= "<br>{$lin}"; $lin = ""; } # fine else if (!$dnazionedoc or... } # fine if ($lin and $ddocumento) if ($ddocumento) { if ($dtipodoc) { $lin .= "{$dtipodoc} "; } $lin .= "{$ddocumento}"; if ($dscadenzadoc) { if ($dcittadoc or $dnazionedoc and $dnazionedoc != $dnazionalita) { $lin .= " ({$dcittadoc}"; if ($dcittadoc and $dnazionedoc and $dnazionedoc != $dnazionalita) { $lin .= ", "; } if ($dnazionedoc and $dnazionedoc != $dnazionalita) { $lin .= "{$dnazionedoc}"; } $lin .= ")"; } # fine if ($dcittadoc or... if (date("Ymd", time() + C_DIFF_ORE * 3600) <= str_replace("-", "", $dscadenzadoc)) { $lin .= " " . mex("scade", $pag) . " {$dscadenzadoc_f}"; } else { $lin .= " " . mex("scade", $pag) . " <font color=\"red\">{$dscadenzadoc_f}</font>"; } } # fine if ($dscadenzadoc) } # fine if ($ddocumento) if ($lin) { $output .= "<br>{$lin}"; } $lin = ""; if ($dcitta) { $lin .= "{$dcitta}"; if ($dvia or $dnumcivico or $dcap) { $lin .= ","; } $lin .= " "; } # fine if ($dcitta) if ($dvia) { $lin .= "{$dvia} "; } if ($dnumcivico) { $lin .= "nº {$dnumcivico} "; } if ($dcap) { $lin .= mex("CAP", $pag) . " {$dcap} "; } if ($dnazione or $dregione) { $lin .= "("; } if ($dregione) { $lin .= $dregione; } if ($dnazione and $dregione) { $lin .= ", "; } if ($dnazione) { $lin .= $dnazione; } if ($dnazione or $dregione) { $lin .= ") "; } if ($lin) { $output .= "<br>{$lin}"; } $lin = ""; if ($dtelefono) { $lin .= mex("Telefono", $pag) . ": {$dtelefono} "; } if ($dtelefono2) { $lin .= mex("2º telefono", $pag) . ": {$dtelefono2} "; } if ($dtelefono3) { $lin .= mex("3º telefono", $pag) . ": {$dtelefono3}, "; } if ($dfax) { $lin .= "fax: {$dfax}, "; } if ($demail) { $lin .= "email: <a href=\"mailto:{$demail}\">{$demail}</a> "; } if ($lin) { $output .= "<br>{$lin}"; } $lin = ""; if ($dcod_fiscale) { $lin .= mex("Codice fiscale", $pag) . ": {$dcod_fiscale} "; } if ($dcod_fiscale and $dpartita_iva) { $lin .= ", "; } if ($dpartita_iva) { $lin .= mex("Partita iva", $pag) . ": {$dpartita_iva} "; } if ($lin) { $output .= "<br>{$lin}"; } if (!$silenzio) { echo $output; } else { return $output; } }
<a style=\"color: #666666;\" href=\"./inizio.php?$sessione_anno_var\"><b>".mex("MENU","head.php")."</b></a>"; if ($priv_ins_nuove_prenota == "s" or $priv_ins_spese == "s" or $priv_ins_entrate == "s" or $inserimento_nuovi_clienti != "NO" or ($modifica_clienti != "NO" and $vedi_clienti != "NO")) { echo " | <b>".mex("INSERIRE","head.php").":</b>"; if ($priv_ins_nuove_prenota == "s") echo " <a style=\"color: #666666;\" href=\"./prenota.php?$sessione_anno_var\"><b>".mex("PRENOTAZIONE","head.php")."</b></a>"; if ($inserimento_nuovi_clienti != "NO" or ($modifica_clienti != "NO" and $vedi_clienti != "NO")) echo " <a style=\"color: #666666;\" href=\"./clienti.php?$sessione_anno_var\"><b>".mex("CLIENTE","head.php")."</b></a>"; if ($priv_ins_spese == "s" or $priv_ins_entrate == "s") echo " <a style=\"color: #666666;\" href=\"./costi.php?$sessione_anno_var\"><b>".mex("SPESE","head.php")."</b></a>"; } # fine if ($priv_ins_nuove_prenota == "s" or... if ($priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n" or $vedi_clienti != "NO" or $priv_vedi_tab_costi != "n" or $priv_vedi_tab_periodi != "n" or $priv_vedi_tab_appartamenti != "n") { echo " | <b>".mex("TABELLE","head.php").":</b>"; if ($priv_vedi_tab_mesi != "n") echo " <a style=\"color: #666666;\" href=\"./tabella.php?$sessione_anno_var&mese=$mese_attuale\"><b>".mex("$MESE_ATT","head.php")."</b></a>"; if ($priv_vedi_tab_prenotazioni != "n") echo " <a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&tipo_tabella=prenotazioni\"><b>".mex("PRENOTAZIONI","head.php")."</b></a>"; if ($vedi_clienti != "NO") echo " <a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&tipo_tabella=clienti\"><b>".mex("CLIENTI","head.php")."</b></a>"; if ($priv_vedi_tab_costi != "n") echo " <a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&tipo_tabella=costi\"><b>".mex("SPESE","head.php")."</b></a>"; if ($priv_vedi_tab_periodi != "n") echo " <a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&tipo_tabella=periodi\"><b>".mex("TARIFFE","head.php")."</b></a>"; if ($priv_vedi_tab_appartamenti != "n") { $fr_APPARTAMENTI = mex("APPARTAMENTI","unit.php"); if (strlen($fr_APPARTAMENTI) > 11) $fr_APPARTAMENTI = substr($fr_APPARTAMENTI,0,6)."."; echo " <a style=\"color: #666666;\" href=\"./visualizza_tabelle.php?$sessione_anno_var&tipo_tabella=appartamenti\"><b>$fr_APPARTAMENTI</b></a>"; } # fine if ($priv_vedi_tab_appartamenti != "n") } # fine if ($priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n" or... echo "</td>"; if ($idprenota_origine) $anno = $anno - 1; if ($mostra_X == "SI") { if (@is_array($_POST)) reset($_POST); for($num1 = 0 ; $num1 < count($_POST); $num1++) { $lista_var_X .= "&".key($_POST)."=".$_POST[key($_POST)]; next($_POST); } # fine for $num1 if (@is_array($_GET)) reset($_GET);
function mostra_form_relutenti ($rel_sing,$rel_plur,$nome_sing,$nome_plur,$e,$a,$le,$tablerel,$id_utente,$id_utente_mod,$id_utente_sel,$option_select_utenti_importa_contratti,$anno,$id_sessione,$pag,$tablerelutenti,$rel_sup_sing="",$rel_sup_plur="",$tablerel_sup="",$frase_nella_sup="") { echo "<div style=\"line-height: 150%;\"> <form accept-charset=\"utf-8\" method=\"post\" action=\"./personalizza.php\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"id_utente_mod\" value=\"$id_utente_mod\"> <input type=\"hidden\" name=\"aggiorna_qualcosa\" value=\"SI\">"; if ($rel_sup_sing) { $rel_sup_utente = esegui_query("select distinct $tablerel_sup.nome_$rel_sup_sing from $tablerelutenti inner join $tablerel_sup on $tablerelutenti.id$rel_sup_sing = $tablerel_sup.id$rel_sup_plur where $tablerelutenti.idutente = '$id_utente_sel' order by $tablerel_sup.nome_$rel_sup_sing"); $num_rel_sup_utente = numlin_query($rel_sup_utente); for ($num1 = 0 ; $num1 < $num_rel_sup_utente ; $num1++) { $rel_sup = htmlspecialchars(risul_query($rel_sup_utente,$num1,"nome_$rel_sup_sing",$tablerel_sup)); $opt_rel_sup .= "<option value=\"$rel_sup\">$rel_sup</option>"; } # fine for $num1 $rel_sup_esist = esegui_query("select id$rel_sing from $tablerelutenti where id$rel_sing is not NULL and idsup is not NULL and idutente = '$id_utente_sel' limit 1"); if (numlin_query($rel_sup_esist) > 0) { $mostra_sup = "SI"; if ($opt_rel_sup) { $mostra_linea_canc = "SI"; echo mex(ucfirst($nome_plur),$pag)." ".mex($frase_nella_sup,$pag)." <select id=\"$rel_sup_sing"."_$rel_sing\" onchange=\"ricarica_ifrm('dati_rel','$rel_sing"."_da_eliminare','$rel_sup_sing"."_$rel_sing','$rel_sing','$rel_sup_sing','$id_utente_sel')\"> <option value=\"\" selected>----</option> $opt_rel_sup </select>: <b id=\"b_$rel_sing"."_da_eliminare\" style=\"font-weight: normal;\">"; $rel_utente = esegui_query("select distinct $tablerel.nome_$rel_sing,$tablerel.codice_$rel_sing,$tablerel.codice2_$rel_sing,$tablerel.codice3_$rel_sing from $tablerelutenti inner join $tablerel on $tablerelutenti.id$rel_sing = $tablerel.id$rel_plur where $tablerelutenti.idutente = '$id_utente_sel' and $tablerelutenti.idsup is NULL order by $tablerel.nome_$rel_sing"); $num_rel_utente = numlin_query($rel_utente); if ($num_rel_utente) { echo "<select name=\"$rel_sing"."_da_eliminare\" id=\"$rel_sing"."_da_eliminare\">"; for ($num1 = 0 ; $num1 < $num_rel_utente ; $num1++) { $rel = htmlspecialchars(risul_query($rel_utente,$num1,"nome_$rel_sing",$tablerel)); $codice = htmlspecialchars(risul_query($rel_utente,$num1,"codice_$rel_sing",$tablerel)); $codice2 = htmlspecialchars(risul_query($rel_utente,$num1,"codice2_$rel_sing",$tablerel)); $codice3 = htmlspecialchars(risul_query($rel_utente,$num1,"codice3_$rel_sing",$tablerel)); echo "<option value=\"$rel\">$rel"; if (strcmp($codice,"")) echo " ($codice)"; if (strcmp($codice2,"")) echo " (".mex("2°",$pag)." $codice2)"; if (strcmp($codice3,"")) echo " (".mex("3°",$pag)." $codice3)"; echo "</option>"; } # fine for $num1 echo "</select>"; } # fine if ($num_rel_utente) else echo "<input type=\"text\" name=\"$rel_sing"."_da_eliminare\" id=\"$rel_sing"."_da_eliminare\" size=\"20\" maxlength=\"50\">"; echo "</b>"; } # fine if ($opt_rel_sup) } # fine if (numlin_query($rel_sup_esist) > 0) } # fine if ($rel_sup_sing) if ($mostra_sup != "SI") { $rel_utente = esegui_query("select distinct $tablerel.nome_$rel_sing,$tablerel.codice_$rel_sing,$tablerel.codice2_$rel_sing,$tablerel.codice3_$rel_sing from $tablerelutenti inner join $tablerel on $tablerelutenti.id$rel_sing = $tablerel.id$rel_plur where $tablerelutenti.idutente = '$id_utente_sel' order by $tablerel.nome_$rel_sing"); $num_rel_utente = numlin_query($rel_utente); if ($num_rel_utente) { $mostra_linea_canc = "SI"; echo mex(ucfirst($nome_plur),$pag).": <select name=\"$rel_sing"."_da_eliminare\">"; for ($num1 = 0 ; $num1 < $num_rel_utente ; $num1++) { $rel = htmlspecialchars(risul_query($rel_utente,$num1,"nome_$rel_sing",$tablerel)); $codice = htmlspecialchars(risul_query($rel_utente,$num1,"codice_$rel_sing",$tablerel)); $codice2 = htmlspecialchars(risul_query($rel_utente,$num1,"codice2_$rel_sing",$tablerel)); $codice3 = htmlspecialchars(risul_query($rel_utente,$num1,"codice3_$rel_sing",$tablerel)); echo "<option value=\"$rel\">$rel"; if (strcmp($codice,"")) echo " ($codice)"; if (strcmp($codice2,"")) echo " (".mex("2°",$pag)." $codice2)"; if (strcmp($codice3,"")) echo " (".mex("3°",$pag)." $codice3)"; echo "</option>"; } # fine for $num1 echo "</select>"; } # fine if ($num_rel_utente) } # fine if ($mostra_sup != "SI") if ($mostra_linea_canc == "SI") { echo "<input class=\"sbutton\" type=\"submit\" name=\"elimina_$rel_sing\" value=\"".mex("elimina",$pag)."\">"; if ($mostra_sup != "SI") echo " <input class=\"sbutton\" type=\"submit\" name=\"elimina_tutte_$rel_plur\" value=\"".mex("Elimina tutt$e",$pag)."\">"; echo "<br>"; } # fine if ($mostra_linea_canc == "SI") echo "<table cellspacing=0 cellpadding=0 style=\"margin: 4px 0 4px 0;\"><tr><td> ".mex("Nuov$a $nome_sing",$pag).": <input type=\"text\" name=\"nuova_$rel_sing\" size=\"20\" maxlength=\"50\"> ("; if ($opt_rel_sup) { echo "".mex($frase_nella_sup,$pag)." <select name=\"sup_n_$rel_sing\"> <option value=\"\" selected>----</option> $opt_rel_sup </select>,<br>"; } # fine if ($opt_rel_sup) echo mex("codice",$pag)." <input type=\"text\" name=\"cod_n_$rel_sing\" size=\"12\" maxlength=\"50\">,"; if (!$opt_rel_sup) echo "<br>"; else echo " "; echo "".mex("2° codice",$pag)." <input type=\"text\" name=\"cod2_n_$rel_sing\" size=\"12\" maxlength=\"50\">, ".mex("3° codice",$pag)." <input type=\"text\" name=\"cod3_n_$rel_sing\" size=\"12\" maxlength=\"50\">) </td><td style=\"width: 10px;\"></td><td valign=\"middle\"> <input class=\"sbutton\" type=\"submit\" name=\"aggiungi_$rel_sing\" value=\"".mex("aggiungi",$pag)."\"> </td></tr></table>"; if ($id_utente == 1 and $option_select_utenti_importa_contratti) { echo "".mex("Importa $le $nome_plur",$pag)." ".mex("dell'utente",$pag)." <select name=\"utente_importa_$rel_plur\"> $option_select_utenti_importa_contratti </select> <input class=\"sbutton\" type=\"submit\" name=\"importa_$rel_plur\" value=\"".mex("Importa",$pag)."\"> "; } # fine if ($id_utente == 1 and $option_select_utenti_importa_contratti) echo "<input class=\"sbutton\" type=\"submit\" name=\"$rel_plur"."_predefinite\" value=\"".mex("Ripristina predefinit$e",$pag)."\">"; if ($mostra_linea_canc == "SI" and $mostra_sup == "SI") echo " <input class=\"sbutton\" type=\"submit\" name=\"elimina_tutte_$rel_plur\" value=\"".mex("Elimina tutt$e",$pag)."\">"; echo "</div></form></div> <hr style=\"width: 95%\">"; } # fine function mostra_form_relutenti
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
function ripristina_backup_contr($linee_backup, $silenzio, $pag, $PHPR_TAB_PRE, $modalita, $contr_agg = "") { global $LIKE, $MEDIUMTEXT; include "./includes/variabili_contratto.php"; unset($var_predef); $versione_corrente = esegui_query("select * from " . $PHPR_TAB_PRE . "versioni where idversioni = 1"); $versione_corrente = risul_query($versione_corrente, 0, 'num_versione'); for ($num1 = 0; $num1 < count($linee_backup); $num1++) { $linea = togli_acapo($linee_backup[$num1]); if (substr($linea, 0, 10) == "<versione>") { $versione_file = substr($linea, 10); $versione_file = substr($versione_file, 0, -11); break; } # fine if (substr($linea,0,10) == "<versione>") } # fine for $num1 if ($versione_file and ($versione_file <= $versione_corrente and $versione_file >= "2.00")) { if ($modalita != "aggiungi") { $contr_agg = ""; } $contr_agg_var = $contr_agg; $contr_agg_all = ""; $contr_agg_trovato = 0; # Prima lettura di controllo del file contratti $file_coerente = "SI"; $num_err = ""; $leggendo_righe = "NO"; unset($tab_presente); $info_contr['max_contr'] = 0; $num_linee_backup = count($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 ($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>") { $leggendo_colonne == "NO"; if ($nome_tabella == "contratti") { $tab_presente["contratti"] = "SI"; } if ($nome_tabella != "contratti") { $file_coerente = "NO"; $num_err .= "#1"; } } # fine if ($linea == "</colonnetabella>") 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; } # 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; } # 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 .= "#2"; } } # 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 .= "#3"; } if ($var_riserv[$nome[1]]) { $file_coerente = "NO"; $num_err .= "#4"; } } # fine if (substr($tipo_contr,0,4) == "vett") if ($modalita == "info") { if ($riga[$num_colonna['tipo']] == "nomi_con" and $riga[$num_colonna['numero']] == "1") { $info_contr['nomi_con'] = $riga[$num_colonna['testo']]; } if (substr($riga[$num_colonna['tipo']], 0, 5) == "contr" and $riga[$num_colonna['numero']] > $info_contr['max_contr']) { $info_contr['max_contr'] = $riga[$num_colonna['numero']]; } } # fine if ($modalita == "info") if ($contr_agg and $riga[$num_colonna['numero']] == $contr_agg) { if (substr($riga[$num_colonna['tipo']], 0, 5) == "contr") { $contr_agg_trovato = 1; } if ($riga[$num_colonna['tipo']] == "impor_vc") { $contr_agg_var = $riga[$num_colonna['testo']]; } if ($riga[$num_colonna['tipo']] == "allegato") { $contr_agg_all .= "," . $riga[$num_colonna['testo']] . ","; } } # fine if ($contr_agg and $riga[$num_colonna['numero']] == $contr_agg) } # fine if ($nome_tabella == "contratti") $lista_valori = ""; $lista_colonne = ""; 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 (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 .= "#5"; } $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"; } } # fine if ($leggendo_database == "SI") if ($linea == "<database>") { $leggendo_database = "SI"; } } # fine if ($leggendo_backup == "SI") if ($linea == "<backup>") { $leggendo_backup = "SI"; } } # fine for $num1 if ($tab_presente["contratti"] != "SI") { $file_coerente = "NO"; $num_err .= "#6"; } if ($contr_agg and !$contr_agg_trovato) { $file_coerente = "NO"; $num_err .= "#7"; } if ($file_coerente == "NO") { if ($silenzio != "SI") { echo mex("Il formato del file è errato", $pag) . ".<br>"; } # debug backup DOCUMENTI #if ($num_err) echo $num_err.".<br>"; } else { unset($var_riserv); if ($modalita == "info") { return $info_contr; } if ($modalita == "rimpiazza") { esegui_query("delete from " . $PHPR_TAB_PRE . "contratti"); } $max_contr = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo {$LIKE} 'contr%'"); if (numlin_query($max_contr) != 0) { $max_contr = risul_query($max_contr, 0, 0); } else { $max_contr = 0; } if (!$max_contr) { $max_contr = 0; } $max_var = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo {$LIKE} 'var%'"); if (numlin_query($max_var) != 0) { $max_var = risul_query($max_var, 0, 0); } else { $max_var = 0; } if (!$max_var) { $max_var = 0; } $max_arr = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo {$LIKE} 'vett%'"); if (numlin_query($max_arr) != 0) { $max_arr = risul_query($max_arr, 0, 0); } else { $max_arr = 0; } if (!$max_arr) { $max_arr = 0; } $max_cond = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo = 'cond'"); if (numlin_query($max_cond) != 0) { $max_cond = risul_query($max_cond, 0, 0); } else { $max_cond = 0; } if (!$max_cond) { $max_cond = 0; } $max_all = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo = 'file_all'"); if (numlin_query($max_all) != 0) { $max_all = risul_query($max_all, 0, 0); } else { $max_all = 0; } if (!$max_all) { $max_all = 0; } unset($nuovo_num_contr); unset($nuovo_num_var); $nuovo_num_var['-1'] = '-1'; $nuovo_num_var['-2'] = '-2'; unset($nuovo_nome_var); unset($nuovo_num_all); $leggendo_backup = "NO"; $leggendo_database = "NO"; $leggendo_tabella = "NO"; $leggendo_colonne = "NO"; $leggendo_righe = "NO"; $leggendo_file = "NO"; $leggendo_contenuto = "NO"; $nome_file = ""; unset($linee_inserite_in_tabella); if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "") { if (C_CARTELLA_DOC != "" and @is_dir(C_CARTELLA_CREA_MODELLI . "/" . C_CARTELLA_DOC)) { $dir_salva_home = C_CARTELLA_CREA_MODELLI . "/" . C_CARTELLA_DOC; } else { $dir_salva_home = C_CARTELLA_CREA_MODELLI; } } else { $dir_salva_home = C_DATA_PATH; } 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 ($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 == "contratti") esegui_query2("create table ".$N_PHPR_TAB_PRE."contratti (numero integer, tipo varchar(8), testo $MEDIUMTEXT )",$N_PHPR_DB_TYPE); } # fine if ($linea == "</colonnetabella>") 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; } # 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 = ""; $lista_colonne = ""; unset($valore_colonna); $inserire_riga = "SI"; $tipo_contr = $riga[$num_colonna['tipo']]; $vecchio_num = $riga[$num_colonna['numero']]; if (substr($tipo_contr, 0, 5) == "contr" or $tipo_contr == "opzeml" or $tipo_contr == "oggetto" or $tipo_contr == "allegato" or $tipo_contr == "headhtm" or $tipo_contr == "foothtm" or $tipo_contr == "est_txt" or $tipo_contr == "dir" or substr($tipo_contr, 0, 4) == "mln_" or $tipo_contr == "impor_vc" or $tipo_contr == "num_prog" or $tipo_contr == "nomefile" or $tipo_contr == "autosalv" or $tipo_contr == "compress" or $tipo_contr == "incr_np") { if (!$contr_agg or $vecchio_num == $contr_agg) { if (!$nuovo_num_contr[$vecchio_num]) { if ($contr_agg) { $nuovo_num_contr[$vecchio_num] = $max_contr + 1; } else { $nuovo_num_contr[$vecchio_num] = $max_contr + $vecchio_num; } } # fine if (!$nuovo_num_contr[$vecchio_num]) $riga[$num_colonna['numero']] = $nuovo_num_contr[$vecchio_num]; if (substr($tipo_contr, 0, 5) == "contr" or substr($tipo_contr, 0, 4) == "mln_") { if (@is_array($nuovo_nome_var)) { reset($nuovo_nome_var); while (list($v_nome, $n_nome) = each($nuovo_nome_var)) { $riga[$num_colonna['testo']] = str_replace("[{$v_nome}]", "[{$n_nome}]", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[c {$v_nome}=", "[c {$n_nome}=", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[c {$v_nome}!=", "[c {$n_nome}!=", $riga[$num_colonna['testo']]); if (substr($v_nome, -1) == ")") { $v_nome_arr = explode("(", $v_nome); $v_nome_arr = $v_nome_arr[0]; $n_nome_arr = explode("(", $n_nome); $n_nome_arr = $n_nome_arr[0]; $riga[$num_colonna['testo']] = str_replace("[r4 array=\"{$v_nome_arr}\"]", "[r4 array=\"{$n_nome_arr}\"]", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[{$v_nome_arr}('", "[{$n_nome_arr}('", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[c {$v_nome_arr}('", "[c {$n_nome_arr}('", $riga[$num_colonna['testo']]); } # fine if (substr($v_nome,-1) == ")") } # fine while (list($v_nome,$n_nome) = each($nuovo_nome_var)) } # fine if (@is_array($nuovo_nome_var)) } # fine if (substr($tipo_contr,0,5) == "contr" or substr($tipo_contr,0,4) == "mln_") if ($tipo_contr == "dir") { if (!function_exists('formatta_dir_salva_doc')) { include './includes/funzioni_contratti.php'; } $dir_salva = formatta_dir_salva_doc($riga[$num_colonna['testo']]); if ($dir_salva == "~") { $dir_salva = $dir_salva_home; } if (!@is_dir($dir_salva)) { $inserire_riga = "NO"; } else { $fileaperto = @fopen("{$dir_salva}/prova.tmp", "a+"); if (!$fileaperto) { $inserire_riga = "NO"; } else { fclose($fileaperto); unlink("{$dir_salva}/prova.tmp"); } # fine else if (!$fileaperto) } # fine else if (!@is_dir($dir_salva)) } # fine if ($tipo_contr == "dir") if ($tipo_contr == "allegato") { $vecchio_all = $riga[$num_colonna['testo']]; if (!$nuovo_num_all[$vecchio_all]) { $nuovo_num_all[$vecchio_all] = $max_all + $vecchio_all; } $riga[$num_colonna['testo']] = $nuovo_num_all[$vecchio_all]; } # fine if ($tipo_contr == "allegato") if ($tipo_contr == "impor_vc") { if (!$contr_agg) { $vecchio_num_impor_vc = $riga[$num_colonna['testo']]; if (!$nuovo_num_contr[$vecchio_num_impor_vc]) { $nuovo_num_contr[$vecchio_num_impor_vc] = $max_contr + $vecchio_num_impor_vc; } $riga[$num_colonna['testo']] = $nuovo_num_contr[$vecchio_num_impor_vc]; } else { $inserire_riga = "NO"; } } # fine if ($tipo_contr == "impor_vc") if ($tipo_contr == "num_prog") { if (!$contr_agg) { $vecchio_num_np = $riga[$num_colonna['testo']]; if (!$nuovo_num_contr[$vecchio_num_np]) { $nuovo_num_contr[$vecchio_num_np] = $max_contr + $vecchio_num_np; } $riga[$num_colonna['testo']] = $nuovo_num_contr[$vecchio_num_np]; } else { $inserire_riga = "NO"; } } # fine if ($tipo_contr == "num_prog") } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,5) == "contr" or $tipo_contr == "opzeml" or... if (substr($tipo_contr, 0, 3) == "var") { $contr_cond = substr($tipo_contr, 3); if (!$contr_agg or $contr_agg_var == $contr_cond) { if (strcmp($contr_cond, "")) { if (!$nuovo_num_contr[$contr_cond]) { if ($contr_agg) { $nuovo_num_contr[$contr_cond] = $max_contr + 1; } else { $nuovo_num_contr[$contr_cond] = $max_contr + $contr_cond; } } # fine if (!$nuovo_num_contr[$contr_cond]) $contr_cond = $nuovo_num_contr[$contr_cond]; $tipo_contr = "var{$contr_cond}"; $riga[$num_colonna['tipo']] = $tipo_contr; } # fine if (strcmp($contr_cond,"")) if (!$nuovo_num_var[$vecchio_num]) { $num_var_esistente = ""; $testo = $riga[$num_colonna['testo']]; $var_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($testo) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($testo) . ";%') "); for ($num2 = 0; $num2 < numlin_query($var_esistente); $num2++) { if ($testo == risul_query($var_esistente, $num2, 'testo') and $tipo_contr == risul_query($var_esistente, $num2, 'tipo')) { $num_var_esistente = $num2 + 1; } } if ($num_var_esistente) { $nuovo_num_var[$vecchio_num] = risul_query($var_esistente, $num_var_esistente - 1, 'numero'); $inserire_riga = "NO"; } else { $nuovo_num_var[$vecchio_num] = $max_var + $vecchio_num; if (numlin_query($var_esistente)) { $nuovo_nome_trovato = "NO"; $nuovo_nome = $testo; while ($nuovo_nome_trovato == "NO") { $nuovo_nome .= "_"; $var_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($nuovo_nome) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($nuovo_nome) . ";%') "); if (!numlin_query($var_esistente)) { $nuovo_nome_trovato = "SI"; } } # fine while ($nuovo_nome_trovato == "NO") $nuovo_nome_var[$testo] = $nuovo_nome; # cambio il nome della variabile anche negli array già inseriti reset($nuovo_nome_var); while (list($key, $val) = each($nuovo_nome_var)) { $nuovo_nome_var[$key] = str_replace("({$testo})", "({$nuovo_nome})", $val); if ($val != $nuovo_nome_var[$key]) { $nome_arr = substr($nuovo_nome_var[$key], 0, -1 * (strlen($nuovo_nome) + 2)); $arr_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where tipo = 'vett{$contr_cond}' and testo = '" . aggslashdb($nome_arr) . ";" . aggslashdb($testo) . "' "); if (numlin_query($arr_esistente)) { $testo_arr = explode(";", risul_query($arr_esistente, 0, 'testo')); $testo_arr[1] = $nuovo_nome; $testo_arr = implode(";", $testo_arr); esegui_query("update " . $PHPR_TAB_PRE . "contratti set testo = '" . aggslashdb($testo_arr) . "' where tipo = 'vett{$contr_cond}' and testo = '" . aggslashdb($nome_arr) . ";" . aggslashdb($testo) . "' "); } # fine if (numlin_query($arr_esistente)) } # fine if ($val != $nuovo_nome_var[$key]) } # fine while (list($key,$val) = each($nuovo_nome_var)) $riga[$num_colonna['testo']] = $nuovo_nome; } # fine if (numlin_query($var_esistente)) } # fine else if ($num_var_esistente) } # fine if (!$nuovo_num_contr[$vecchio_num]) $riga[$num_colonna['numero']] = $nuovo_num_var[$vecchio_num]; } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,3) == "var") if (substr($tipo_contr, 0, 4) == "vett") { $contr_cond = substr($tipo_contr, 4); if (!$contr_agg or $contr_agg_var == $contr_cond) { if (strcmp($contr_cond, "")) { if (!$nuovo_num_contr[$contr_cond]) { if ($contr_agg) { $nuovo_num_contr[$contr_cond] = $max_contr + 1; } else { $nuovo_num_contr[$contr_cond] = $max_contr + $contr_cond; } } # fine if (!$nuovo_num_contr[$contr_cond]) $contr_cond = $nuovo_num_contr[$contr_cond]; $tipo_contr = "vett{$contr_cond}"; $riga[$num_colonna['tipo']] = $tipo_contr; } # fine if (strcmp($contr_cond,"")) if (!$nuovo_num_var["a{$vecchio_num}"]) { $num_arr_esistente = ""; $testo = $riga[$num_colonna['testo']]; $nome_arr = explode(";", $testo); $var_arr = $nome_arr[1]; $nome_arr = $nome_arr[0]; $arr_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($nome_arr) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($nome_arr) . ";%') "); for ($num2 = 0; $num2 < numlin_query($arr_esistente); $num2++) { if ($testo == risul_query($arr_esistente, $num2, 'testo') and $tipo_contr == risul_query($arr_esistente, $num2, 'tipo')) { $num_arr_esistente = $num2 + 1; } } if ($num_arr_esistente) { $nuovo_num_var["a{$vecchio_num}"] = "a" . risul_query($arr_esistente, $num_arr_esistente - 1, 'numero'); $inserire_riga = "NO"; } else { $nuovo_num_var["a{$vecchio_num}"] = "a" . ($max_arr + $vecchio_num); if (numlin_query($arr_esistente)) { $nuovo_nome_trovato = "NO"; $nuovo_nome = $nome_arr; while ($nuovo_nome_trovato == "NO") { $nuovo_nome .= "_"; $arr_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($nuovo_nome) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($nuovo_nome) . ";%') "); if (!numlin_query($arr_esistente)) { $nuovo_nome_trovato = "SI"; } } # fine while ($nuovo_nome_trovato == "NO") $nuovo_nome_var["{$nome_arr}({$var_arr})"] = "{$nuovo_nome}({$var_arr})"; $riga[$num_colonna["testo"]] = $nuovo_nome . substr($testo, strlen($nome_arr)); } else { $nuovo_nome_var["{$nome_arr}({$var_arr})"] = "{$nome_arr}({$var_arr})"; } } # fine else if ($num_arr_esistente) } # fine if (!$nuovo_num_contr["a$vecchio_num"]) $riga[$num_colonna['numero']] = substr($nuovo_num_var["a{$vecchio_num}"], 1); } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,4) == "vett") if (substr($tipo_contr, 0, 4) == "cond") { $contr_cond = substr($tipo_contr, 4); if (!$contr_agg or $contr_agg_var == $contr_cond) { if (!strcmp($contr_cond, "")) { $riga[$num_colonna['numero']] = $max_cond + $vecchio_num; } else { $vecchio_num = $contr_cond; if (!$nuovo_num_contr[$vecchio_num]) { if ($contr_agg) { $nuovo_num_contr[$vecchio_num] = $max_contr + 1; } else { $nuovo_num_contr[$vecchio_num] = $max_contr + $vecchio_num; } } # fine if (!$nuovo_num_contr[$vecchio_num]) $riga[$num_colonna['tipo']] = "cond" . $nuovo_num_contr[$vecchio_num]; $contr_cond = $nuovo_num_contr[$vecchio_num]; } # fine else if (!strcmp($contr_cond,"")) $cond_vecchia = $riga[$num_colonna['testo']]; $cond_vecchia = explode("#@?", $cond_vecchia); $azione_vecchia = explode("#%?", $cond_vecchia[2]); $cond_nuova = $cond_vecchia[0] . "#@?"; if ($cond_vecchia[1]) { $cond_vecchia = explode("#\$?", $cond_vecchia[1]); $cond_nuova .= $cond_vecchia[0]; $num_cond = count($cond_vecchia); for ($num2 = 1; $num2 < $num_cond; $num2++) { $cond_nuova .= "#\$?"; $cond_vett = explode("#%?", $cond_vecchia[$num2]); if ($cond_vett[2] == "var") { ripristina_nome_var_cond(array(0, 3), $cond_vett, $nuovo_nome_var); } else { ripristina_nome_var_cond(array('0'), $cond_vett, $nuovo_nome_var); } for ($num3 = 0; $num3 < count($cond_vett); $num3++) { $cond_nuova .= $cond_vett[$num3] . "#%?"; } $cond_nuova = substr($cond_nuova, 0, -3); } # fine for $num2 } # fine ($cond_vecchia[1]) $cond_nuova .= "#@?" . $azione_vecchia[0]; if ($azione_vecchia[0] == "set") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; if ($azione_vecchia[3] == "var") { ripristina_nome_var_cond(array(4), $azione_vecchia, $nuovo_nome_var); } if ($azione_vecchia[5] == "var") { ripristina_nome_var_cond(array(6), $azione_vecchia, $nuovo_nome_var); } if ($azione_vecchia[7] == "var") { ripristina_nome_var_cond(array(8), $azione_vecchia, $nuovo_nome_var); } } # fine if ($azione_vecchia[0] == "set") if ($azione_vecchia[0] == "trunc") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; } if ($azione_vecchia[0] == "oper") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; if ($azione_vecchia[4] == "var") { ripristina_nome_var_cond(array(2, 5), $azione_vecchia, $nuovo_nome_var); } else { ripristina_nome_var_cond(array(2), $azione_vecchia, $nuovo_nome_var); } } # fine if ($azione_vecchia[0] == "oper") if ($azione_vecchia[0] == "date") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; ripristina_nome_var_cond(array(2), $azione_vecchia, $nuovo_nome_var); } # fine if ($azione_vecchia[0] == "date") if ($azione_vecchia[0] == "unset") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; } if ($azione_vecchia[0] == "array") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; if ($azione_vecchia[2] == "cop") { $azione_vecchia[3] = $nuovo_num_var[$azione_vecchia[3]]; } } # fine if ($azione_vecchia[0] == "array") for ($num2 = 1; $num2 < count($azione_vecchia); $num2++) { $cond_nuova .= "#%?" . $azione_vecchia[$num2]; } $riga[$num_colonna['testo']] = $cond_nuova; $testo = aggslashdb($riga[$num_colonna['testo']]); #$cond_esistente = esegui_query("select * from ".$PHPR_TAB_PRE."contratti where tipo = 'cond$contr_cond' and testo = '$testo' "); #for ($num2 = 0 ; $num2 < numlin_query($cond_esistente) ; $num2++) if ($cond_nuova == risul_query($cond_esistente,$num2,'testo')) $inserire_riga = "NO"; } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,4) == "cond") if ($tipo_contr == "file_all") { $vecchio_all = $riga[$num_colonna['numero']]; if (!$contr_agg or str_replace(",{$vecchio_all},", "", $contr_agg_all) != $contr_agg_all) { if (!$nuovo_num_all[$vecchio_all]) { $nuovo_num_all[$vecchio_all] = $max_all + $vecchio_all; } $riga[$num_colonna['numero']] = $nuovo_num_all[$vecchio_all]; } else { $inserire_riga = "NO"; } } # fine if ($tipo_contr == "file_all") 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); $lista_valori .= ",'" . $valore . "'"; $lista_colonne .= "," . $nome_colonna[$num2 + 1]; } # fine if ($valore != "") } # fine for $num2 $lista_valori = substr($lista_valori, 1); $lista_colonne = substr($lista_colonne, 1); #echo "insert into $nome_tabella ($lista_colonne) values ($lista_valori)<br>"; if ($inserire_riga != "NO") { esegui_query("insert into " . $PHPR_TAB_PRE . "{$nome_tabella} ({$lista_colonne}) values ({$lista_valori}) "); } } # 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"; } } # fine if ($leggendo_database == "SI") if ($linea == "<database>") { $leggendo_database = "SI"; } } # fine if ($leggendo_backup == "SI") if ($linea == "<backup>") { $leggendo_backup = "SI"; } } # fine for $num1 $tabelle_lock = array($PHPR_TAB_PRE . "contratti", $PHPR_TAB_PRE . "personalizza"); $altre_tab_lock = array($PHPR_TAB_PRE . "versioni"); $tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock); $nomi_contratti = esegui_query("select testo from {$PHPR_TAB_PRE}" . "contratti where numero = '1' and tipo = 'nomi_con' "); $nomi_contratti = risul_query($nomi_contratti, 0, 'testo'); if ($modalita == "rimpiazza") { esegui_query("update {$PHPR_TAB_PRE}" . "personalizza set valpersonalizza = '" . aggslashdb($nomi_contratti) . "' where idpersonalizza = 'nomi_contratti'"); } else { $nomi_contratti = explode("#@&", $nomi_contratti); $n_nomi_contratti = ""; for ($num1 = 0; $num1 < count($nomi_contratti); $num1++) { $nome_contr = explode("#?&", $nomi_contratti[$num1]); if (!$contr_agg or $nome_contr[0] == $contr_agg) { $n_nomi_contratti .= "#@&" . $nuovo_num_contr[$nome_contr[0]] . "#?&" . $nome_contr[1]; } } # fine for $num1 $d_nomi_contr = esegui_query("select * from {$PHPR_TAB_PRE}" . "personalizza where idpersonalizza = 'nomi_contratti' "); for ($num1 = 0; $num1 < numlin_query($d_nomi_contr); $num1++) { $idutente_contr = risul_query($d_nomi_contr, $num1, 'idutente'); $nomi_contr_utente = risul_query($d_nomi_contr, $num1, 'valpersonalizza') . $n_nomi_contratti; esegui_query("update {$PHPR_TAB_PRE}" . "personalizza set valpersonalizza = '" . aggslashdb($nomi_contr_utente) . "' where idpersonalizza = 'nomi_contratti' and idutente = '{$idutente_contr}' "); } # fine for $num1 } # fine else if ($modalita == "rimpiazza") esegui_query("delete from {$PHPR_TAB_PRE}" . "contratti where numero = '1' and tipo = 'nomi_con' "); unlock_tabelle($tabelle_lock); if ($silenzio != "SI") { echo mex("Documenti ripristinati", $pag) . ".<br>"; } } # fine else if ($file_coerente == "NO") } else { if ($silenzio != "SI") { echo mex("La versione attuale di hoteldruid e quella del file non coincidono", $pag) . ".<br>"; } } }
} # fine for $num1 echo "</select>.<br>"; $anno_prec = $anno -1; if (@is_file(C_DATA_PATH."/selectperiodi$anno_prec.1.php")) { echo "<label><input type=\"checkbox\" name=\"importa_anno_prec\" value=\"SI\" checked> ".mex("Importa dall'anno precedente prenotazioni, tariffe (compresi costi aggiuntivi), privilegi degli utenti e regole d'assegnazione.",$pag)."</label>"; } # fine if (@is_file(C_DATI_PATH."/selectperiodi$anno_prec.1.php")) echo "</div></form>"; } # fine else if (controlla_anno($anno) == "NO" or $id_utente != 1 or... echo "<br><hr style=\"width: 95%\"><br> <form accept-charset=\"utf-8\" method=\"post\" action=\"inizio.php\"><div> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <br> ".mex("richiedi l'anno",$pag)." <input type=\"text\" name=\"anno\" size=\"4\" maxlength=\"4\"> <input class=\"sbutton\" type=\"submit\" name=\"vai\" value=\"".mex("vai",$pag)."\"><br> </div></form>"; if ($tema[$id_utente] != "base") include("./themes/".$tema[$id_utente]."/php/foot.php"); else include("./includes/foot.php"); } # fine else if ($anno_esistente == "SI") } # fine else if (@is_file(C_DATI_PATH."/dati_connessione.php") != true) } # fine if ($id_utente)
if (!$dir_salva) echo $contratto; } # fine if ($mostra_contratto == "SI") if ($mostra_torna_indietro == "SI") { if (!$origine) $origine = "./inizio.php"; echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"".htmlspecialchars($origine)."\"><div><br><br> <input type=\"hidden\" name=\"origine_vecchia\" value=\"".htmlspecialchars($origine_vecchia)."\"> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"torna_indietro\" value=\"1\"> ".bottone_submit_contr(mex("Torna indietro",$pag),"indi","indietro")." </div></form><br>"; } # fine if ($mostra_torna_indietro == "SI") if (($mostra_contratto == "SI" and $mostra_headers == "SI") or $manda_mail == "SI" or $dir_salva) { if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/".$tema[$id_utente]."/php")) include("./themes/".$tema[$id_utente]."/php/foot.php"); else include("./includes/foot.php"); } # fine if (($mostra_contratto == "SI" and $mostra_headers == "SI") or... if ($foothtm) echo $foothtm; } # fine if ($anno_utente_attivato == "SI") } # fine if ($id_utente)
function aggiorna_relutenti($aggiungi_rel, $rel_predefinite, $elimina_tutte_rel, $importa_rel, $id_utente, $id_utente_mod, $nuova_rel, $sup_n_rel, $cod_n_rel, $cod2_n_rel, $cod3_n_rel, $utente_importa_rel, $pag, $rel_sing, $rel_plur, $tablerel, $tablerelutenti, $rel_sup_sing = "", $rel_sup_plur = "", $tablerel_sup = "", $rel_inf_sing = "", $rel_inf_plur = "", $tablerel_inf = "") { if ($id_utente != 1 or $id_utente_mod == $utente_importa_rel) { $importa_rel = ""; } if ($aggiungi_rel or $rel_predefinite or $elimina_tutte_rel or $importa_rel) { if (get_magic_quotes_gpc()) { $nuova_rel = stripslashes($nuova_rel); $cod_n_rel = stripslashes($cod_n_rel); $cod2_n_rel = stripslashes($cod2_n_rel); $cod3_n_rel = stripslashes($cod3_n_rel); $sup_n_rel = stripslashes($sup_n_rel); } # fine if (get_magic_quotes_gpc()) $nuova_rel = htmlspecialchars($nuova_rel); $cod_n_rel = htmlspecialchars($cod_n_rel); $cod2_n_rel = htmlspecialchars($cod2_n_rel); $cod3_n_rel = htmlspecialchars($cod3_n_rel); $sup_n_rel = htmlspecialchars($sup_n_rel); if (!$aggiungi_rel or str_replace(" ", "", $nuova_rel)) { echo "<div id=\"avanz_{$rel_plur}\"><br>"; if ($tablerel_inf) { $tabelle_lock = array($tablerel, $tablerel_inf, $tablerelutenti); } else { $tabelle_lock = array($tablerel, $tablerelutenti); } if ($tablerel_sup) { $altre_tab_lock = array($tablerel_sup); } else { $altre_tab_lock = ""; } $tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock); unset($lista_rel); unset($cod_rel); unset($cod2_rel); unset($cod3_rel); unset($cod_rel_sup); if ($aggiungi_rel) { $lista_rel[0] = $nuova_rel; $cod_rel[0] = $cod_n_rel; $cod2_rel[0] = $cod2_n_rel; $cod3_rel[0] = $cod3_n_rel; if ($rel_sup_sing and $sup_n_rel) { $sup_n_rel_esist = esegui_query("select distinct {$tablerel_sup}.id{$rel_sup_plur} from {$tablerelutenti} inner join {$tablerel_sup} on {$tablerelutenti}.id{$rel_sup_sing} = {$tablerel_sup}.id{$rel_sup_plur} where {$tablerelutenti}.idutente = '{$id_utente_mod}' and {$tablerel_sup}.nome_{$rel_sup_sing} = '" . aggslashdb($sup_n_rel) . "' "); if (numlin_query($sup_n_rel_esist) > 0) { $id_rel_sup_vett[0] = risul_query($sup_n_rel_esist, 0, "id{$rel_sup_plur}", $tablerel_sup); } } # fine if ($rel_sup_sing and $sup_n_rel) } else { $rel_canc = esegui_query("select id{$rel_sing} from {$tablerelutenti} where idutente = '{$id_utente_mod}' and id{$rel_sing} is not NULL "); $num_rel_canc = numlin_query($rel_canc); esegui_query("delete from {$tablerelutenti} where idutente = '{$id_utente_mod}' and id{$rel_sing} is not NULL "); $rel_usate = esegui_query("select distinct id{$rel_sing} from {$tablerelutenti} where id{$rel_sing} is not NULL"); $num_rel_usate = numlin_query($rel_usate); for ($num1 = 0; $num1 < $num_rel_usate; $num1++) { $relutente_usate[(int) risul_query($rel_usate, $num1, "id{$rel_sing}")] = 1; } # fine for $num1 for ($num1 = 0; $num1 < $num_rel_canc; $num1++) { if (substr($num1, -3) == "000") { http_keep_alive(". "); } if ($num1 > 20) { $nolog = 1; } else { $nolog = 0; } cancella_relutente(risul_query($rel_canc, $num1, "id{$rel_sing}"), $id_utente_mod, $rel_sing, $rel_plur, $tablerel, $tablerelutenti, $rel_inf_sing, $rel_inf_plur, $tablerel_inf, "SI", $relutente_usate, $nolog); } # fine for $num1 unset($rel_canc); unset($rel_usate); unset($relutente_usate); if ($rel_predefinite) { include C_DATA_PATH . "/lingua.php"; global ${"lista_" . $rel_plur}, ${"cod_" . $rel_plur}, ${"cod2_" . $rel_plur}, ${"cod3_" . $rel_plur}, ${"cod_" . $rel_sup_sing . "_" . $rel_plur}; if ($lingua[$id_utente_mod] == "ita") { include_once "./includes/lista_{$rel_plur}.php"; } else { if (@is_file("./includes/lang/" . $lingua[$id_utente_mod] . "/lista_{$rel_plur}.php")) { include_once "./includes/lang/" . $lingua[$id_utente_mod] . "/lista_{$rel_plur}.php"; } } $lista_rel = ${"lista_" . $rel_plur}; $cod_rel = ${"cod_" . $rel_plur}; $cod2_rel = ${"cod2_" . $rel_plur}; $cod3_rel = ${"cod3_" . $rel_plur}; if ($rel_sup_sing) { $cod_rel_sup = ${"cod_" . $rel_sup_sing . "_" . $rel_plur}; } if (@is_array($lista_rel)) { $num_rel = count($lista_rel); } else { $num_rel = 0; } for ($num1 = 0; $num1 < $num_rel; $num1++) { $lista_rel[$num1] = htmlspecialchars($lista_rel[$num1]); $cod_rel[$num1] = htmlspecialchars($cod_rel[$num1]); $cod2_rel[$num1] = htmlspecialchars($cod2_rel[$num1]); $cod3_rel[$num1] = htmlspecialchars($cod3_rel[$num1]); $cod_rel_sup[$num1] = htmlspecialchars($cod_rel_sup[$num1]); } # fine for $num1 } else { if ($importa_rel) { $utente_importa_rel = aggslashdb($utente_importa_rel); $rel_ut_imp = esegui_query("select distinct {$tablerel}.nome_{$rel_sing},{$tablerelutenti}.idsup from {$tablerelutenti} inner join {$tablerel} on {$tablerelutenti}.id{$rel_sing} = {$tablerel}.id{$rel_plur} where {$tablerelutenti}.idutente = '{$utente_importa_rel}' order by {$tablerel}.nome_{$rel_sing}"); $num_rel_ut_imp = numlin_query($rel_ut_imp); for ($num1 = 0; $num1 < $num_rel_ut_imp; $num1++) { $rel = risul_query($rel_ut_imp, $num1, "nome_{$rel_sing}", $tablerel); $lista_rel[$num1] = $rel; if ($rel_sup_sing) { $id_rel_sup_vett[$num1] = risul_query($rel_ut_imp, $num1, 'idsup', $tablerelutenti); } } # fine for $num1 unset($rel_ut_imp); } } # fine if ($importa_rel) } # fine else if ($aggiungi_rel) $num_passa_a_var = 2; if (@is_array($lista_rel)) { $num_rel_agg = count($lista_rel); } else { $num_rel_agg = 0; } if ($num_rel_agg >= $num_passa_a_var) { $rel_esistenti = esegui_query("select id{$rel_plur},nome_{$rel_sing},codice_{$rel_sing} from {$tablerel} where nome_{$rel_sing} is not NULL "); $num_rel_esistenti = numlin_query($rel_esistenti); for ($num1 = 0; $num1 < $num_rel_esistenti; $num1++) { $nome_rel = risul_query($rel_esistenti, $num1, "nome_{$rel_sing}"); $rel_esistente[$nome_rel] = 1; $id_esistente[$nome_rel] = risul_query($rel_esistenti, $num1, "id{$rel_plur}"); $cod_esistente[$nome_rel] = risul_query($rel_esistenti, $num1, "codice_{$rel_sing}"); } # fine for $num1 unset($rel_esistenti); $rel_esistenti2 = esegui_query("select id{$rel_sing},idsup from {$tablerelutenti} where idutente = '{$id_utente_mod}' and id{$rel_sing} is not NULL "); $num_rel_esistenti2 = numlin_query($rel_esistenti2); for ($num1 = 0; $num1 < $num_rel_esistenti2; $num1++) { $id_rel = risul_query($rel_esistenti2, $num1, "id{$rel_sing}"); $rel_esistente2[$id_rel] = 1; $idsup_esistente2[$id_rel] = risul_query($rel_esistenti2, $num1, 'idsup'); } # fine for $num1 unset($rel_esistenti2); } # fine if ($num_rel_agg > $num_passa_a_var) unset($num_max); for ($num1 = 0; $num1 < $num_rel_agg; $num1++) { if (substr($num1, -3) == "000") { http_keep_alive(". "); } if ($num1 > 20) { $nolog = 1; } else { $nolog = 0; } $id_rel_sup = ""; if ($rel_sup_sing and $cod_rel_sup[$num1]) { if ($cod_sup_esist[$cod_rel_sup[$num1]]) { $id_rel_sup = $cod_sup_esist[$cod_rel_sup[$num1]]; } else { $rel_sup = esegui_query("select id{$rel_sup_plur} from {$tablerel_sup} where codice_{$rel_sup_sing} = '" . aggslashdb($cod_rel_sup[$num1]) . "' "); if (numlin_query($rel_sup) > 0) { $id_rel_sup = risul_query($rel_sup, 0, "id{$rel_sup_plur}"); $cod_sup_esist[$cod_rel_sup[$num1]] = $id_rel_sup; } # fine if (numlin_query($rel_sup) > 0) } # fine else if ($cod_sup_esistente[$cod_rel_sup[$num1]]) } # fine if ($rel_sup_sing and $cod_rel_sup[$num1]) if ($rel_sup_sing and $id_rel_sup_vett[$num1]) { if ($id_sup_esist[$id_rel_sup_vett[$num1]]) { $id_rel_sup = $id_sup_esist[$id_rel_sup_vett[$num1]]; } else { $rel_sup = esegui_query("select id{$rel_sup_plur} from {$tablerel_sup} where id{$rel_sup_plur} = '" . aggslashdb($id_rel_sup_vett[$num1]) . "' "); if (numlin_query($rel_sup) > 0) { $id_rel_sup = $id_rel_sup_vett[$num1]; $id_sup_esist[$id_rel_sup_vett[$num1]] = $id_rel_sup; } # fine if (numlin_query($rel_sup) > 0) } # fine else if ($cod_sup_esistente[$cod_rel_sup[$num1]]) } # fine if ($rel_sup_sing and $id_rel_sup_vett[$num1]) if ($num_rel_agg < $num_passa_a_var) { $rel_esistenti = esegui_query("select id{$rel_plur},nome_{$rel_sing},codice_{$rel_sing} from {$tablerel} where nome_{$rel_sing} = '" . aggslashdb($lista_rel[$num1]) . "' "); if (numlin_query($rel_esistenti)) { $nome_rel = risul_query($rel_esistenti, 0, "nome_{$rel_sing}"); $rel_esistente[$nome_rel] = 1; $id_esistente[$nome_rel] = risul_query($rel_esistenti, 0, "id{$rel_plur}"); $cod_esistente[$nome_rel] = risul_query($rel_esistenti, 0, "codice_{$rel_sing}"); } # fine if (numlin_query($rel_esistenti)) } # fine if ($num_rel_agg <= $num_passa_a_var) if (!$rel_esistente[$lista_rel[$num1]]) { if (!$num_max) { $num_max = esegui_query("select max(id{$rel_plur}) from {$tablerel} "); $num_max = risul_query($num_max, 0, 0) + 1; } else { $num_max++; } $num_n_rel = $num_max; esegui_query("insert into {$tablerel} (id{$rel_plur},nome_{$rel_sing},codice_{$rel_sing},codice2_{$rel_sing},codice3_{$rel_sing}) values ('{$num_n_rel}','" . aggslashdb($lista_rel[$num1]) . "','" . aggslashdb($cod_rel[$num1]) . "','" . aggslashdb($cod2_rel[$num1]) . "','" . aggslashdb($cod3_rel[$num1]) . "') ", "", $nolog); $rel_esistente[$lista_rel[$num1]] = 1; $id_esistente[$lista_rel[$num1]] = $num_n_rel; $cod_esistente[$lista_rel[$num1]] = $cod_rel[$num1]; } else { $num_n_rel = $id_esistente[$lista_rel[$num1]]; $r_cod = $cod_esistente[$lista_rel[$num1]]; if (!$r_cod and $cod_rel[$num1]) { esegui_query("update {$tablerel} set codice_{$rel_sing} = '" . aggslashdb($cod_rel[$num1]) . "' where id{$rel_plur} = '{$num_n_rel}' "); } if ($cod2_rel[$num1]) { esegui_query("update {$tablerel} set codice2_{$rel_sing} = '" . aggslashdb($cod2_rel[$num1]) . "' where id{$rel_plur} = '{$num_n_rel}' "); } if ($cod3_rel[$num1]) { esegui_query("update {$tablerel} set codice3_{$rel_sing} = '" . aggslashdb($cod3_rel[$num1]) . "' where id{$rel_plur} = '{$num_n_rel}' "); } if ($num_rel_agg < $num_passa_a_var) { $rel_esistenti2 = esegui_query("select idsup from {$tablerelutenti} where idutente = '{$id_utente_mod}' and id{$rel_sing} = '{$num_n_rel}' "); if (numlin_query($rel_esistenti2)) { $rel_esistente2[$num_n_rel] = 1; $idsup_esistente2[$num_n_rel] = risul_query($rel_esistenti2, 0, 'idsup'); } # fine if (numlin_query($rel_esistenti2)) } # fine if ($num_rel_agg < $num_passa_a_var) } # fine else if (!$rel_esistente[$lista_rel[$num1]]) if (!$rel_esistente2[$num_n_rel]) { if ($id_rel_sup) { esegui_query("insert into {$tablerelutenti} (idutente,id{$rel_sing},idsup) values ('{$id_utente_mod}','{$num_n_rel}','{$id_rel_sup}') ", "", $nolog); } else { esegui_query("insert into {$tablerelutenti} (idutente,id{$rel_sing}) values ('{$id_utente_mod}','{$num_n_rel}') ", "", $nolog); } $rel_esistente2[$num_n_rel] = 1; $idsup_esistente2[$num_n_rel] = $id_rel_sup; } elseif ($id_rel_sup) { $idsup = $idsup_esistente2[$num_n_rel]; if (!$idsup) { esegui_query("update {$tablerelutenti} set idsup = '{$id_rel_sup}' where idutente = '{$id_utente_mod}' and id{$rel_sing} = '{$num_n_rel}' "); } } # fine elseif ($id_rel_sup) } # fine for $num1 unlock_tabelle($tabelle_lock); echo "<br></div>\n<script type=\"text/javascript\">\n<!--\nvar avanz = document.getElementById('avanz_{$rel_plur}');\navanz.style.display = 'none';\n-->\n</script>\n"; switch ($rel_sing) { case "regione": if ($aggiungi_rel and $pag) { echo mex("Nuova regione/provincia aggiunta", $pag) . ".<br>"; } if ($rel_predefinite and $pag) { echo mex("Regioni/provincie predefinite ripristinate", $pag) . ".<br>"; } if ($elimina_tutte_rel and $pag) { echo mex("Regioni/provincie cancellate", $pag) . ".<br>"; } if ($importa_rel and $pag) { echo mex("Regioni/provincie importate", $pag) . ".<br>"; } break; case "documentoid": if ($aggiungi_rel and $pag) { echo mex("Nuovo tipo di documento di identità aggiunto", $pag) . ".<br>"; } if ($rel_predefinite and $pag) { echo mex("Tipi di documento di identità predefiniti ripristinati", $pag) . ".<br>"; } if ($elimina_tutte_rel and $pag) { echo mex("Tipi di documento di identità cancellati", $pag) . ".<br>"; } if ($importa_rel and $pag) { echo mex("Tipi di documento di identità importati", $pag) . ".<br>"; } break; case "citta": $rel_sing = "città"; $rel_plur = "città"; default: if ($aggiungi_rel and $pag) { echo mex("Nuova {$rel_sing} aggiunta", $pag) . ".<br>"; } if ($rel_predefinite and $pag) { echo mex(ucfirst($rel_plur) . " predefinite ripristinate", $pag) . ".<br>"; } if ($elimina_tutte_rel and $pag) { echo mex(ucfirst($rel_plur) . " cancellate", $pag) . ".<br>"; } if ($importa_rel and $pag) { echo mex(ucfirst($rel_plur) . " importate", $pag) . ".<br>"; } } # fine switch ($rel_sing) unset($lista_rel); unset($cod_rel); unset($cod2_rel); unset($cod3_rel); unset($cod_rel_sup); unset($rel_esistente); unset($id_esistente); unset($cod_esistente); unset($rel_esistente2); unset($idsup_esistente2); } # fine if (!$aggiungi_rel or str_replace(" ","",$nuova_rel)) } # fine if ($aggiungi_rel or $rel_predefinite or... }
function mostra_frame_rel($id, $rel, $rel_sup, $id_ut_sel, $cmp, $mostra_cod, $pieno, $titolo, $size = "20", $maxlength = "50") { global $tablerelutenti, $tablenazioni, $tableregioni, $tablecitta, $tabledocumentiid, $tableparentele; trova_rel($rel, $rel_sing, $rel_plur, $tablerel); trova_rel($rel_sup, $rel_sup_sing, $rel_sup_plur, $tablerel_sup); if (get_magic_quotes_gpc()) { $id = stripslashes($id); } $id = htmlspecialchars($id); $id_sup = esegui_query("select distinct {$tablerel_sup}.id{$rel_sup_plur} from {$tablerelutenti} inner join {$tablerel_sup} on {$tablerelutenti}.id{$rel_sup_sing} = {$tablerel_sup}.id{$rel_sup_plur} where {$tablerelutenti}.idutente = '{$id_ut_sel}' and {$tablerel_sup}.nome_{$rel_sup_sing} = '" . aggslashdb($id) . "' "); if (numlin_query($id_sup)) { $is_id = "= '" . risul_query($id_sup, 0, "id{$rel_sup_plur}", $tablerel_sup) . "'"; } else { $is_id = "is NULL"; } echo "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\"\n \"http://www.w3.org/TR/html4/strict.dtd\">\n<html>\n<head>\n<meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\" >\n<title> {$titolo} </title>\n</head>\n<body>\n<div id=\"dati_rel\">"; $rel_utente = esegui_query("select distinct {$tablerel}.nome_{$rel_sing},{$tablerel}.codice_{$rel_sing},{$tablerel}.codice2_{$rel_sing},{$tablerel}.codice3_{$rel_sing} from {$tablerelutenti} inner join {$tablerel} on {$tablerelutenti}.id{$rel_sing} = {$tablerel}.id{$rel_plur} where {$tablerelutenti}.idutente = '{$id_ut_sel}' and {$tablerelutenti}.idsup {$is_id} order by {$tablerel}.nome_{$rel_sing}"); $num_rel_utente = numlin_query($rel_utente); if ($num_rel_utente) { echo "<select name=\"{$cmp}\" id=\"{$cmp}\">"; if ($pieno != "SI") { echo "<option value=\"\">------</option>"; } for ($num1 = 0; $num1 < $num_rel_utente; $num1++) { $rel = htmlspecialchars(risul_query($rel_utente, $num1, "nome_{$rel_sing}", $tablerel)); echo "<option value=\"{$rel}\">{$rel}"; if ($mostra_cod) { $codice = htmlspecialchars(risul_query($rel_utente, $num1, "codice_{$rel_sing}", $tablerel)); $codice2 = htmlspecialchars(risul_query($rel_utente, $num1, "codice2_{$rel_sing}", $tablerel)); $codice3 = htmlspecialchars(risul_query($rel_utente, $num1, "codice3_{$rel_sing}", $tablerel)); if (strcmp($codice, "")) { echo " ({$codice})"; } if (strcmp($codice2, "")) { echo " (" . mex("2°", 'personalizza.php') . " {$codice2})"; } if (strcmp($codice3, "")) { echo " (" . mex("3°", 'personalizza.php') . " {$codice3})"; } } # fine if ($mostra_cod) echo "</option>"; } # fine for $num1 echo "</select>"; } else { echo "<input type=\"text\" name=\"{$cmp}\" id=\"{$cmp}\" size=\"{$size}\" maxlength=\"{$maxlength}\">"; } echo "</div>\n</body>\n</html>\n"; }
function ins_nome_giorno (&$var,$g_corr) { $var .= "<small>"; if ($g_corr == "0") $var .= mex(" Do","giorni_mesi.php"); if ($g_corr == "1") $var .= mex(" Lu","giorni_mesi.php"); if ($g_corr == "2") $var .= mex(" Ma","giorni_mesi.php"); if ($g_corr == "3") $var .= mex(" Me","giorni_mesi.php"); if ($g_corr == "4") $var .= mex(" Gi","giorni_mesi.php"); if ($g_corr == "5") $var .= mex(" Ve","giorni_mesi.php"); if ($g_corr == "6") $var .= mex(" Sa","giorni_mesi.php"); $var = str_replace(" ","<br>",$var); $var .= "</small>"; } # fine function ins_nome_giorno
for ($num1 = 0; $num1 < $num_gruppi; $num1++) { $id_gruppo = risul_query($gruppi, $num1, 'idgruppi'); $nome_gruppo = risul_query($gruppi, $num1, 'nome_gruppo'); echo "<option value=\"gr{$id_gruppo}\">" . mex("del gruppo", $pag) . " {$nome_gruppo}</option>"; } # fine for $num1 echo "</select>\n" . mex("dall'utente", $pag) . "\n<select name=\"id_utente_esporta\">{$option_select_utenti}</select>\n<input class=\"sbutton\" type=\"submit\" value=\"" . mex("Importa", $pag) . "\">\n</div></form><br>"; } # fine if ($num_lista_utenti > 2) if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0) { $num_utenti_esistenti = esegui_query("select idutenti from {$tableutenti}"); $num_utenti_esistenti = numlin_query($num_utenti_esistenti); if ($num_utenti_esistenti >= C_MASSIMO_NUM_UTENTI) { $aggiungi_utenti = "NO"; } } # fine if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0) if ($aggiungi_utenti != "NO") { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"gestione_utenti.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n" . mex("Aggiungi", $pag) . "\n " . mex("un nuovo utente chiamato", $pag) . " <input type=\"text\" name=\"nome\" size=\"15\">\n<input class=\"sbutton\" type=\"submit\" name=\"aggiungi_utente\" value=\"" . mex("Aggiungi", $pag) . "\">\n</div></form>"; } # fine if ($aggiungi_utenti != "NO") echo "<br><div style=\"text-align: center;\">\n<form accept-charset=\"utf-8\" method=\"post\" action=\"personalizza.php\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"" . mex("Torna indietro", $pag) . "\">\n</div></form><br></div>"; } # fine if ($mostra_tabella_iniziale != "NO") if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) { include "./themes/" . $tema[$id_utente] . "/php/foot.php"; } else { include "./includes/foot.php"; } } # fine if ($id_utente and $id_utente == 1)
function crea_messaggio_contr_salva($nome_file_contr, $num_file_salva, $num_contr_esist, $nome_file_contr_esist, $numero_contratto, $nomi_contratti, $dir_salva, $tipo_contratto, $num_ripeti, $origine, $origine_vecchia, $lista_var_form, $mostra_headers, $anno, $id_sessione, $id_utente, $tema, $tableversioni, $tabletransazioni, $pag) { global $PHPR_TAB_PRE, $priv_cancella_contratti; $nome_file_contr_orig = $nome_file_contr; $num_file_salva_orig = $num_file_salva; if ($num_contr_esist) { $nome_file_contr = $nome_file_contr_esist; $num_file_salva = count($nome_file_contr); } # fine if ($num_contr_esist) $tabelle_lock = array($tableversioni, $tabletransazioni); $adesso = date("YmdHis", time() + C_DIFF_ORE * 3600); list($usec, $sec) = explode(' ', microtime()); mt_srand((double) $sec + (double) $usec * 100000); $val_casuale = mt_rand(100000, 999999); $versione_transazione = prendi_numero_versione($tableversioni); $ultimo_accesso = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600); $id_transazione = $adesso . $val_casuale . $versione_transazione; esegui_query("insert into {$tabletransazioni} (idtransazioni,idsessione,tipo_transazione,anno,dati_transazione1,dati_transazione2,dati_transazione3,dati_transazione4,dati_transazione5,ultimo_accesso) values ('{$id_transazione}','{$id_sessione}','con_s','{$anno}','" . aggslashdb($dir_salva) . "','" . aggslashdb(serialize($nome_file_contr)) . "','{$tipo_contratto}','" . aggslashdb($origine) . "','" . aggslashdb($origine_vecchia) . "','{$ultimo_accesso}')"); unlock_tabelle($tabelle_lock); if ($tipo_contratto == "contrrtf") { $sec_aspetta = 2; } else { $sec_aspetta = 6; } $url_reload = "./{$pag}?id_sessione={$id_sessione}&anno={$anno}&id_transazione={$id_transazione}&numero_contratto={$numero_contratto}"; if ($num_file_salva == 1) { $target = ""; } else { $target = " target=\"_blank\""; } if ($mostra_headers == "NO") { if ($num_file_salva == 1) { $extra_head = "<meta http-equiv=\"refresh\" content=\"{$sec_aspetta}; url={$url_reload}&n_file=1\">\n"; } if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) { include "./themes/" . $tema[$id_utente] . "/php/head.php"; } else { include "./includes/head.php"; } } # fine if ($mostra_headers == "NO") if ($num_contr_esist and $num_file_salva_orig == 1) { echo "<div style=\"line-height: 180%\"><br>"; } else { echo "<div style=\"line-height: 130%\"><br>"; } if ($num_contr_esist) { if ($num_ripeti > 1) { echo mex("Documenti già esistenti riguardanti queste prenotazioni", $pag) . ":<br>"; } else { echo mex("Documenti già esistenti riguardanti questa prenotazione", $pag) . ":<br>"; } } # fine if ($num_contr_esist) for ($num1 = 1; $num1 <= $num_file_salva; $num1++) { if ($num_contr_esist and $num_file_salva_orig == 1) { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"{$pag}\"><div>\n{$lista_var_form}\n<input type=\"hidden\" name=\"sovrascrivi\" value=\"" . htmlspecialchars($nome_file_contr[$num1]) . "\">"; } # fine if ($num_contr_esist and $num_file_salva_orig == 1) if (!$num_contr_esist) { echo ucfirst(mex("documento", $pag)) . " "; if ($nomi_contratti['salv'][$numero_contratto] != $nomi_contratti[$numero_contratto]) { echo "\"" . $nomi_contratti[$numero_contratto] . "\" "; } echo mex("<span class=\"colblu\">salvato</span> come", $pag); } # fine if (!$num_contr_esist) echo " <b><a style=\"color: #000000;\" href=\"{$url_reload}&n_file={$num1}\"{$target}>" . $nome_file_contr[$num1] . "</a></b>"; if ($num_contr_esist and $num_file_salva_orig == 1 and $priv_cancella_contratti != "n") { echo " " . bottone_submit_contr(mex("Sovrascrivi", $pag)) . "\n.</div></form>"; } else { echo ".<br>"; } } # fine for $num1 echo "<br></div>"; if (!$num_contr_esist) { if ($priv_cancella_contratti != "n") { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"{$pag}\"><div>\n<input type=\"hidden\" name=\"anno\" value=\"{$anno}\">\n<input type=\"hidden\" name=\"id_sessione\" value=\"{$id_sessione}\">\n<input type=\"hidden\" name=\"numero_contratto\" value=\"{$numero_contratto}\">\n<input type=\"hidden\" name=\"id_transazione\" value=\"{$id_transazione}\">\n<input type=\"hidden\" name=\"cancella\" value=\"SI\">"; if ($num_file_salva == 1) { echo " " . bottone_submit_contr(mex("Cancella il documento", $pag)); } else { echo bottone_submit_contr(mex("Cancella i documenti", $pag)); } echo "</div></form><br>"; } # fine if ($priv_cancella_contratti != "n") } else { echo "<br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"{$pag}\"><div>\n{$lista_var_form}\n<input type=\"hidden\" name=\"cont_salva\" value=\"SI\">"; if ($num_file_salva_orig == 1) { echo " " . bottone_submit_contr(mex("Salva un nuovo documento", $pag)); } else { echo bottone_submit_contr(mex("Salva dei nuovi documenti", $pag)); } echo "</div></form><br>"; } # fine else if (!$num_contr_esist) }
function crea_nuovo_anno($anno, $PHPR_TAB_PRE, $DATETIME, $tipo_periodi, $giorno_ini_fine, $mese_ini, $mese_fine, $importa_anno_prec, $silenzio, $pag) { allunga_tempo_limite(); global $lingua_mex, $LIKE, $ILIKE, $PHPR_DB_TYPE; $lingua_mex_orig = $lingua_mex; include_once "./includes/funzioni_menu.php"; include C_DATA_PATH . "/lingua.php"; $lingua_mex = $lingua[1]; $tableanni = $PHPR_TAB_PRE . "anni"; $tableprivilegi = $PHPR_TAB_PRE . "privilegi"; $tabletransazioni = $PHPR_TAB_PRE . "transazioni"; $tabletransazioniweb = $PHPR_TAB_PRE . "transazioniweb"; $tablepersonalizza = $PHPR_TAB_PRE . "personalizza"; $tablemessaggi = $PHPR_TAB_PRE . "messaggi"; $tableinterconnessioni = $PHPR_TAB_PRE . "interconnessioni"; $tablecontratti = $PHPR_TAB_PRE . "contratti"; $tableutenti = $PHPR_TAB_PRE . "utenti"; $tablerelclienti = $PHPR_TAB_PRE . "relclienti"; if ($PHPR_DB_TYPE == "mysql" or $PHPR_DB_TYPE == "mysqli") { @esegui_query("SET default_storage_engine=MYISAM", 1); } $filelock = fopen(C_DATA_PATH . "/anni.lock", "w+"); if ($filelock) { flock($filelock, 2); $anno_esistente = esegui_query("select * from {$tableanni} where idanni = {$anno}"); if (numlin_query($anno_esistente) == 0) { if (C_CAMBIA_TIPO_PERIODI == "NO") { $tipo_periodi_esistenti = esegui_query("select * from {$tableanni} order by idanni desc"); if (numlin_query($tipo_periodi_esistenti) != 0) { $tipo_periodi = risul_query($tipo_periodi_esistenti, 0, 'tipo_periodi'); } } # fine if (C_CAMBIA_TIPO_PERIODI == "NO") if ($tipo_periodi != "g") { $tipo_periodi = "s"; } // creo la tabella con periodi settimanali e prezzi e la tabella con i nomi delle tariffe $tableperiodi = $PHPR_TAB_PRE . "periodi" . $anno; $tablenometariffe = $PHPR_TAB_PRE . "ntariffe" . $anno; if ($importa_anno_prec == "SI") { $anno_prec = $anno - 1; $tablenometariffe_prec = $PHPR_TAB_PRE . "ntariffe" . $anno_prec; $num_tariffe_tab = esegui_query("select nomecostoagg from {$tablenometariffe_prec} where idntariffe = 1"); $num_tariffe_tab = risul_query($num_tariffe_tab, 0, 'nomecostoagg'); } else { $num_tariffe_tab = 8; } $query = "create table {$tableperiodi} (idperiodi integer primary key, datainizio date not null, datafine date"; $query2 = "create table {$tablenometariffe} (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"; $num_col_tariffe_db = $num_tariffe_tab; if ($num_col_tariffe_db < 12) { $num_col_tariffe_db = 12; } for ($num1 = 1; $num1 <= $num_col_tariffe_db; $num1++) { $nome_nuova_tariffa = "tariffa" . $num1; $query .= ", {$nome_nuova_tariffa} float8, {$nome_nuova_tariffa}" . "p float8"; $query2 .= ", {$nome_nuova_tariffa} varchar(40)"; } # fine for $num1 $crea_tab = esegui_query($query . ")"); if ($crea_tab) { esegui_query($query2 . ")"); function estrai_col_tabella($col_table) { $col_table = explode(",", $col_table); for ($num1 = 0; $num1 < count($col_table); $num1++) { $col = explode(" ", trim($col_table[$num1])); $tutte_col .= $col[0] . ","; } # fine for $num1 return substr($tutte_col, 0, -1); } # fine function estrai_col_tabella # Creo la tabella delle prernotazioni $tableprenotazioni = $PHPR_TAB_PRE . "prenota" . $anno; $col_tableprenota = "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, codice varchar(10), origine varchar(70), commento text, conferma varchar(4), checkin {$DATETIME}, checkout {$DATETIME}, id_anni_prec text, datainserimento {$DATETIME}, hostinserimento varchar(50), data_modifica {$DATETIME}, utente_inserimento integer "; esegui_query("create table {$tableprenotazioni} ({$col_tableprenota})"); $col_tableprenota = estrai_col_tabella($col_tableprenota); # Creo la tabella con i costi aggiuntivi delle prenotazioni $tablecostiprenota = $PHPR_TAB_PRE . "costiprenota" . $anno; $col_tablecostiprenota = "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"; esegui_query("create table {$tablecostiprenota} ({$col_tablecostiprenota})"); $col_tablecostiprenota = estrai_col_tabella($col_tablecostiprenota); crea_indice($tablecostiprenota, "idprenota", $PHPR_TAB_PRE . "iidpcostiprenota" . $anno); esegui_query("insert into {$tablecostiprenota} (idcostiprenota,numlimite) values ('1','1')"); # Creo la tabella le relazioni tra prenotazioni e clienti non titolari $tablerclientiprenota = $PHPR_TAB_PRE . "rclientiprenota" . $anno; $col_tablerclientiprenota = "idprenota integer, idclienti integer, num_ordine integer, parentela varchar(70), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer"; esegui_query("create table {$tablerclientiprenota} ({$col_tablerclientiprenota})"); $col_tablerclientiprenota = estrai_col_tabella($col_tablerclientiprenota); crea_indice($tablerclientiprenota, "idprenota", $PHPR_TAB_PRE . "iidprclientiprenota" . $anno); # Creo la tabella per le regole di assegnazione $tableregole = $PHPR_TAB_PRE . "regole" . $anno; $col_tableregole = "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"; esegui_query("create table {$tableregole} ({$col_tableregole})"); $col_tableregole = estrai_col_tabella($col_tableregole); # Creo la tabella con i costi di gestione $tablecosti = $PHPR_TAB_PRE . "costi" . $anno; $col_tablecosti = "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"; esegui_query("create table {$tablecosti} ({$col_tablecosti})"); $col_tablecosti = estrai_col_tabella($col_tablecosti); # Creo la tabella per la storia entrate-uscite $tablesoldi = $PHPR_TAB_PRE . "soldi" . $anno; $col_tablesoldi = "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"; esegui_query("create table {$tablesoldi} ({$col_tablesoldi})"); $col_tablesoldi = estrai_col_tabella($col_tablesoldi); $tabelle_lock = array($tableanni, $tableprenotazioni, $tablecostiprenota, $tablerclientiprenota, $tablenometariffe, $tableperiodi, $tablerelclienti, $tablecosti, $tableregole, $tablesoldi, $tablepersonalizza, $tableprivilegi, $tabletransazioni); if ($importa_anno_prec == "SI") { $anno_prec = $anno - 1; $tablenometariffe_prec = $PHPR_TAB_PRE . "ntariffe" . $anno_prec; $tableprenota_prec = $PHPR_TAB_PRE . "prenota" . $anno_prec; $tablecostiprenota_prec = $PHPR_TAB_PRE . "costiprenota" . $anno_prec; $tablerclientiprenota_prec = $PHPR_TAB_PRE . "rclientiprenota" . $anno_prec; $tableperiodi_prec = $PHPR_TAB_PRE . "periodi" . $anno_prec; $tableregole_prec = $PHPR_TAB_PRE . "regole" . $anno_prec; $tablesoldi_prec = $PHPR_TAB_PRE . "soldi" . $anno_prec; $tablecosti_prec = $PHPR_TAB_PRE . "costi" . $anno_prec; $tabelle_lock = array($tableanni, $tableprenota_prec, $tableprenotazioni, $tablecostiprenota_prec, $tablecostiprenota, $tablerclientiprenota_prec, $tablerclientiprenota, $tablenometariffe, $tableperiodi, $tablerelclienti, $tablecosti_prec, $tablecosti, $tableregole, $tablesoldi_prec, $tablesoldi, $tableinterconnessioni, $tablemessaggi, $tablepersonalizza, $tableprivilegi, $tabletransazioni); $altre_tab_lock = array($tablenometariffe_prec, $tableperiodi_prec, $tableregole_prec, $tablecontratti, $tableutenti); $max_data_ini_prec = esegui_query("select max(datainizio) from {$tableperiodi_prec}"); if (numlin_query($max_data_ini_prec) != 0) { $max_data_ini_prec = risul_query($max_data_ini_prec, 0, 0); $max_mese_prec = 0; if (substr($max_data_ini_prec, 0, 4) >= $anno) { $max_mese_prec = substr($max_data_ini_prec, 5, 2); } if (substr($max_data_ini_prec, 0, 4) == $anno + 1) { $max_mese_prec = $max_mese_prec + 12; } if (substr($max_data_ini_prec, 0, 4) == $anno + 2) { $max_mese_prec = $max_mese_prec + 24; } if (substr($max_data_ini_prec, 0, 4) == $anno + 3) { $max_mese_prec = $max_mese_prec + 36; } if (substr($max_data_ini_prec, 0, 4) == $anno + 4) { $max_mese_prec = $max_mese_prec + 48; } if ($max_mese_prec > $mese_fine) { $mese_fine = $max_mese_prec; } $data_ini_agg = date("Y-m-d", mktime(0, 0, 0, substr($max_data_ini_prec, 5, 2) + 1, 1, substr($max_data_ini_prec, 0, 4))); } else { $max_data_ini_prec = ""; $max_mese_prec = ""; $data_ini_agg = ""; } # fine else if (numlin_query($max_data_ini_prec) != 0) } else { unset($altre_tab_lock); } $tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock); # Elimino tutte le transazioni, potrebbero contenere date dell'anno creato esegui_query("delete from {$tabletransazioni}"); # Inserisco l'anno nella tabella anni esegui_query("insert into {$tableanni} (idanni,tipo_periodi) values ('{$anno}','{$tipo_periodi}')"); esegui_query("insert into {$tablecosti} (idcosti) values ('0')"); esegui_query("insert into {$tablesoldi} (idsoldi,motivazione,soldi_prima) values ('1','soldi_prenotazioni_cancellate','0')"); // trovo il primo giorno di inizio/fine dell'anno (nel caso di periodi settimanali) $numgiorno = 1; $giorno_ini_fine = (string) $giorno_ini_fine; if ($giorno_ini_fine != "0" and $giorno_ini_fine != "1" and $giorno_ini_fine != "2" and $giorno_ini_fine != "3" and $giorno_ini_fine != "4" and $giorno_ini_fine != "5" and $giorno_ini_fine != "6") { $giorno_ini_fine = 6; } do { $nomegiorno = date("w", mktime(0, 0, 0, 1, $numgiorno, $anno)); $numgiorno = $numgiorno + 1; } while ($nomegiorno != $giorno_ini_fine); $numgiorno = $numgiorno - 1; if ($tipo_periodi == "g") { $numgiorno = 1; $aggiungi_giorni = 1; } else { $aggiungi_giorni = 7; } if ($mese_ini > $mese_fine) { if ($silenzio != "SI") { echo mex("I mesi erano indicati erroneamente, sono stati inseriti i mesi da Gennaio a Dicembre", $pag) . ".<br>"; } $mese_ini = 1; if ($mese_fine < 12) { $mese_fine = 12; } } # fine if ($mese_ini > $mese_fine) $anno_fine = $anno + 3; $idperiodi = 1; $fileaperto = fopen(C_DATA_PATH . "/selectperiodi{$anno}.1.php", "a+"); flock($fileaperto, 2); $date_option = ""; $n_date_menu = 0; do { $datainizio = date("Y-m-d", mktime(0, 0, 0, 1, $numgiorno, $anno)); $annocreato = date("Y", mktime(0, 0, 0, 1, $numgiorno, $anno)); $mesecreato = date("n", mktime(0, 0, 0, 1, $numgiorno, $anno)); $nome_giorno = date("D", mktime(0, 0, 0, 1, $numgiorno, $anno)); $nome_mese = date("M", mktime(0, 0, 0, 1, $numgiorno, $anno)); $numero_giorno = date("d", mktime(0, 0, 0, 1, $numgiorno, $anno)); $numero_anno = $annocreato; $numgiorno = $numgiorno + $aggiungi_giorni; $datafine = date("Y-m-d", mktime(0, 0, 0, 1, $numgiorno, $anno)); $annocreato2 = date("Y", mktime(0, 0, 0, 1, $numgiorno, $anno)); $mesecreato2 = date("n", mktime(0, 0, 0, 1, $numgiorno, $anno)); if ($annocreato > $anno) { $diff = $annocreato - $anno; $mesecreato = $diff * 12 + $mesecreato; } # fine if ($annocreato > $anno) if ($annocreato2 > $anno) { $diff = $annocreato2 - $anno; $mesecreato2 = $diff * 12 + $mesecreato2; } # fine if ($annocreato2 > $anno) if ($mesecreato >= $mese_ini and $mesecreato <= $mese_fine) { esegui_query("insert into {$tableperiodi} ( idperiodi, datainizio, datafine) values ( {$idperiodi}, '{$datainizio}', '{$datafine}')"); if ($tipo_periodi == "g") { if ($nome_giorno == "Sun") { $nome_giorno = mex(" Do", $pag); } if ($nome_giorno == "Mon") { $nome_giorno = mex(" Lu", $pag); } if ($nome_giorno == "Tue") { $nome_giorno = mex(" Ma", $pag); } if ($nome_giorno == "Wed") { $nome_giorno = mex(" Me", $pag); } if ($nome_giorno == "Thu") { $nome_giorno = mex(" Gi", $pag); } if ($nome_giorno == "Fri") { $nome_giorno = mex(" Ve", $pag); } if ($nome_giorno == "Sat") { $nome_giorno = mex(" Sa", $pag); } } else { $nome_giorno = ""; } if ($nome_mese == "Jan") { $nome_mese = mex("Gen", $pag); } if ($nome_mese == "Feb") { $nome_mese = mex("Feb", $pag); } if ($nome_mese == "Mar") { $nome_mese = mex("Mar", $pag); } if ($nome_mese == "Apr") { $nome_mese = mex("Apr", $pag); } if ($nome_mese == "May") { $nome_mese = mex("Mag", $pag); } if ($nome_mese == "Jun") { $nome_mese = mex("Giu", $pag); } if ($nome_mese == "Jul") { $nome_mese = mex("Lug", $pag); } if ($nome_mese == "Aug") { $nome_mese = mex("Ago", $pag); } if ($nome_mese == "Sep") { $nome_mese = mex("Set", $pag); } if ($nome_mese == "Oct") { $nome_mese = mex("Ott", $pag); } if ($nome_mese == "Nov") { $nome_mese = mex("Nov", $pag); } if ($nome_mese == "Dec") { $nome_mese = mex("Dic", $pag); } if (!$date_option) { $a_ini_menu = substr($datainizio, 0, 4); $m_ini_menu = substr($datainizio, 5, 2) - 1; $g_ini_menu = substr($datainizio, 8, 2); } # fine if (!$date_option) $n_date_menu++; $date_option .= "<option value=\\\"{$datainizio}\\\">{$nome_mese} {$numero_giorno}{$nome_giorno}, {$numero_anno}</option>\n"; $idperiodi = $idperiodi + 1; $datafine2 = $datafine; } # fine if ($mesecreato >= $mese_ini and $mesecreato <= $mese_fine) } while ($annocreato2 <= $anno_fine or $mesecreato2 == 48); $numero_mese = substr($datafine2, 5, 2); if ($numero_mese == "01") { $nome_mese = mex("Gen", $pag); } if ($numero_mese == "02") { $nome_mese = mex("Feb", $pag); } if ($numero_mese == "03") { $nome_mese = mex("Mar", $pag); } if ($numero_mese == "04") { $nome_mese = mex("Apr", $pag); } if ($numero_mese == "05") { $nome_mese = mex("Mag", $pag); } if ($numero_mese == "06") { $nome_mese = mex("Giu", $pag); } if ($numero_mese == "07") { $nome_mese = mex("Lug", $pag); } if ($numero_mese == "08") { $nome_mese = mex("Ago", $pag); } if ($numero_mese == "09") { $nome_mese = mex("Set", $pag); } if ($numero_mese == "10") { $nome_mese = mex("Ott", $pag); } if ($numero_mese == "11") { $nome_mese = mex("Nov", $pag); } if ($numero_mese == "12") { $nome_mese = mex("Dic", $pag); } $numero_giorno = substr($datafine2, 8, 2); $numero_anno = substr($datafine2, 0, 4); $n_date_menu++; $date_option .= "<option value=\\\"{$datafine2}\\\">{$nome_mese} {$numero_giorno}, {$numero_anno}</option>\n"; fwrite($fileaperto, "<?php \n\n\$y_ini_menu[0] = \"{$a_ini_menu}\";\n\$m_ini_menu[0] = \"{$m_ini_menu}\";\n\$d_ini_menu[0] = \"{$g_ini_menu}\";\n\$n_dates_menu[0] = \"{$n_date_menu}\";\n\$d_increment[0] = \"{$aggiungi_giorni}\";\n\$d_names = \"\\\"" . mex(" Do", $pag) . "\\\",\\\"" . mex(" Lu", $pag) . "\\\",\\\"" . mex(" Ma", $pag) . "\\\",\\\"" . mex(" Me", $pag) . "\\\",\\\"" . mex(" Gi", $pag) . "\\\",\\\"" . mex(" Ve", $pag) . "\\\",\\\"" . mex(" Sa", $pag) . "\\\"\";\n\$m_names = \"\\\"" . mex("Gen", $pag) . "\\\",\\\"" . mex("Feb", $pag) . "\\\",\\\"" . mex("Mar", $pag) . "\\\",\\\"" . mex("Apr", $pag) . "\\\",\\\"" . mex("Mag", $pag) . "\\\",\\\"" . mex("Giu", $pag) . "\\\",\\\"" . mex("Lug", $pag) . "\\\",\\\"" . mex("Ago", $pag) . "\\\",\\\"" . mex("Set", $pag) . "\\\",\\\"" . mex("Ott", $pag) . "\\\",\\\"" . mex("Nov", $pag) . "\\\",\\\"" . mex("Dic", $pag) . "\\\"\";\n\n\$dates_options_list = \"\n\n{$date_option}\n\";\n\n?>"); flock($fileaperto, 3); fclose($fileaperto); if ($importa_anno_prec == "SI" and @is_file(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".1.php")) { estendi_menu_date(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".1.php", C_DATA_PATH . "/selperiodimenu{$anno}.1.php", $tipo_periodi, date("Y-m-d", mktime(0, 0, 0, $mese_ini, 1, $anno)), $data_ini_agg, date("Y-m-d", mktime(0, 0, 0, $mese_fine + 1, 1, $anno)), $anno, $pag); } else { copy(C_DATA_PATH . "/selectperiodi{$anno}.1.php", C_DATA_PATH . "/selperiodimenu{$anno}.1.php"); } $lista_clienti_importati = ""; # Importo eventuali prenotazioni, tariffe e regole dell'anno precedente if ($importa_anno_prec == "SI") { $tableprenota = $tableprenotazioni; $data_inizio_periodi = esegui_query("select * from {$tableperiodi} where idperiodi = 1"); $data_inizio_periodi = risul_query($data_inizio_periodi, 0, 'datainizio'); $ini_periodo_interferenza = esegui_query("select * from {$tableperiodi_prec} where datainizio = '{$data_inizio_periodi}'"); $num_periodo_interferenza = numlin_query($ini_periodo_interferenza); $tipo_periodi_prec = esegui_query("select * from {$tableanni} where idanni = {$anno_prec}"); $tipo_periodi_prec = risul_query($tipo_periodi_prec, 0, 'tipo_periodi'); if ($tipo_periodi_prec != $tipo_periodi) { $num_periodo_interferenza = 0; } if ($num_periodo_interferenza == 0) { if ($silenzio != "SI") { echo mex("Non ci sono periodi che riguardano il ", $pag) . $anno . mex(" nel ", $pag) . $anno_prec . mex(", o il giorno di inizio/fine locazione era differente, sono stati importati solo i data riguardanti costi aggiuntivi, caparra, nome delle tariffe, privilegi degli utenti e regole di assegnazione 2 e 3", $pag) . ".<br>"; } } else { $id_data_fine_periodi = esegui_query("select max(idperiodi) from {$tableperiodi}"); $id_data_fine_periodi = risul_query($id_data_fine_periodi, 0, 0); $id_data_ini_periodi_prec = risul_query($ini_periodo_interferenza, 0, 'idperiodi'); $id_data_fine_periodi_prec = esegui_query("select max(idperiodi) from {$tableperiodi_prec}"); $id_data_fine_periodi_prec = risul_query($id_data_fine_periodi_prec, 0, 0); $num_periodi_prec = $id_data_fine_periodi_prec - $id_data_ini_periodi_prec + 1; if ($num_periodi_prec > $id_data_fine_periodi) { $id_data_fine_periodi_prec = $id_data_ini_periodi_prec + $id_data_fine_periodi - 1; $prenota_non_importabili = esegui_query("select * from {$tableprenota_prec} where iddatafine > {$id_data_fine_periodi_prec} "); $num_prenota_non_importabili = numlin_query($prenota_non_importabili); if ($num_prenota_non_importabili != 0) { echo "<br>ERROR<br>"; } } # fine if ($num_periodi_prec > $id_data_fine_periodi) $idprenota_corr = 0; $max_idprenota_prec = esegui_query("select max(idprenota) from {$tableprenota_prec}"); $max_idprenota_prec = risul_query($max_idprenota_prec, 0, 0) + 1; $max_idcostiprenota_prec = esegui_query("select max(idcostiprenota) from {$tablecostiprenota_prec}"); $max_idcostiprenota_prec = risul_query($max_idcostiprenota_prec, 0, 0) + 1; $prenota_gia_iniziate = esegui_query("select * from {$tableprenota_prec} where iddatainizio < {$id_data_ini_periodi_prec} and iddatafine >= {$id_data_ini_periodi_prec} and iddatafine <= {$id_data_fine_periodi_prec} "); $num_prenota_gia_iniziate = numlin_query($prenota_gia_iniziate); for ($num1 = 0; $num1 < $num_prenota_gia_iniziate; $num1 = $num1 + 1) { $idprenota = risul_query($prenota_gia_iniziate, $num1, 'idprenota'); $idclienti = risul_query($prenota_gia_iniziate, $num1, 'idclienti'); $lista_clienti_importati .= "and idclienti != '{$idclienti}' "; $idappartamenti = risul_query($prenota_gia_iniziate, $num1, 'idappartamenti'); $iddatafine = risul_query($prenota_gia_iniziate, $num1, 'iddatafine'); $iddatafine = $iddatafine - $id_data_ini_periodi_prec + 1; $datainserimento = risul_query($prenota_gia_iniziate, $num1, 'datainserimento'); $hostinserimento = risul_query($prenota_gia_iniziate, $num1, 'hostinserimento'); $data_modifica = risul_query($prenota_gia_iniziate, $num1, 'data_modifica'); $utente_inserimento = risul_query($prenota_gia_iniziate, $num1, 'utente_inserimento'); $checkin = risul_query($prenota_gia_iniziate, $num1, 'checkin'); $checkout = risul_query($prenota_gia_iniziate, $num1, 'checkout'); $codice = risul_query($prenota_gia_iniziate, $num1, 'codice'); $idprenota_corr++; esegui_query("insert into {$tableprenota} (idprenota,idclienti,idappartamenti,iddatainizio,iddatafine,assegnazioneapp,commento,codice,datainserimento,hostinserimento,utente_inserimento) values ('{$idprenota_corr}','{$idclienti}','{$idappartamenti}','0',{$iddatafine},'k','{$idprenota}','{$codice}','{$datainserimento}','{$hostinserimento}','{$utente_inserimento}') "); if ($checkin) { esegui_query("update {$tableprenota} set checkin = '" . aggslashdb($checkin) . "' where idprenota = '{$idprenota_corr}'"); } if ($checkout) { esegui_query("update {$tableprenota} set checkout = '" . aggslashdb($checkout) . "' where idprenota = '{$idprenota_corr}'"); } esegui_query("update {$tablecostiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'"); esegui_query("insert into {$tablecostiprenota} select {$col_tablecostiprenota} from {$tablecostiprenota_prec} where idprenota = '{$max_idprenota_prec}' "); esegui_query("update {$tablecostiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tablecostiprenota_prec} set idprenota = '{$idprenota}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tablerclientiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'"); esegui_query("insert into {$tablerclientiprenota} select {$col_tablerclientiprenota} from {$tablerclientiprenota_prec} where idprenota = '{$max_idprenota_prec}' "); esegui_query("update {$tablerclientiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tablerclientiprenota_prec} set idprenota = '{$idprenota}' where idprenota = '{$max_idprenota_prec}'"); } # fine for $num1 $nuovo_idprenota = ""; $nuovo_iddatainizio = ""; $nuovo_iddatafine = ""; $prenota_importate = esegui_query("select * from {$tableprenota_prec} where iddatainizio >= '{$id_data_ini_periodi_prec}' and iddatafine <= '{$id_data_fine_periodi_prec}' order by idprenota "); $num_prenota_importate = numlin_query($prenota_importate); for ($num1 = 0; $num1 < $num_prenota_importate; $num1 = $num1 + 1) { $idprenota = risul_query($prenota_importate, $num1, 'idprenota'); $iddatainizio = risul_query($prenota_importate, $num1, 'iddatainizio'); $iddatainizio = $iddatainizio - $id_data_ini_periodi_prec + 1; $iddatafine = risul_query($prenota_importate, $num1, 'iddatafine'); $iddatafine = $iddatafine - $id_data_ini_periodi_prec + 1; $idclienti = risul_query($prenota_importate, $num1, 'idclienti'); $lista_clienti_importati .= "and idclienti != '{$idclienti}' "; $id_anni_prec = risul_query($prenota_importate, $num1, 'id_anni_prec'); if (!$id_anni_prec) { $id_anni_prec = ";"; } $id_anni_prec .= "{$anno_prec},{$idprenota};"; $idprenota_corr++; esegui_query("update {$tableprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'"); esegui_query("insert into {$tableprenota} select {$col_tableprenota} from {$tableprenota_prec} where idprenota = '{$max_idprenota_prec}' "); esegui_query("update {$tableprenota} set iddatainizio = '{$iddatainizio}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tableprenota} set iddatafine = '{$iddatafine}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tableprenota} set id_anni_prec = '{$id_anni_prec}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tableprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("delete from {$tableprenota_prec} where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tablecostiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'"); esegui_query("insert into {$tablecostiprenota} select {$col_tablecostiprenota} from {$tablecostiprenota_prec} where idprenota = '{$max_idprenota_prec}' "); esegui_query("update {$tablecostiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("delete from {$tablecostiprenota_prec} where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tablerclientiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'"); esegui_query("insert into {$tablerclientiprenota} select {$col_tablerclientiprenota} from {$tablerclientiprenota_prec} where idprenota = '{$max_idprenota_prec}' "); esegui_query("update {$tablerclientiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'"); esegui_query("delete from {$tablerclientiprenota_prec} where idprenota = '{$max_idprenota_prec}'"); esegui_query("update {$tableinterconnessioni} set idlocale = '{$idprenota_corr}', anno = '{$anno}' where idlocale = '{$idprenota}' and ( tipoid = 'prenota' or tipoid = 'mess' ) and anno = '{$anno_prec}' "); $nuovo_idprenota[$idprenota] = $idprenota_corr; $nuovo_iddatainizio[$idprenota] = $iddatainizio; $nuovo_iddatafine[$idprenota] = $iddatafine; } # fine for $num1 esegui_query("update {$tablecostiprenota} set numlimite = '" . ($idprenota_corr + 1) . "' where idcostiprenota = '1'"); $prenota_compagne = esegui_query("select idprenota,idprenota_compagna from {$tableprenota} where idprenota_compagna != '' "); $num_prenota_compagne = numlin_query($prenota_compagne); for ($num1 = 0; $num1 < $num_prenota_compagne; $num1++) { $idprenota = risul_query($prenota_compagne, $num1, 'idprenota'); $idprenota_compagna = risul_query($prenota_compagne, $num1, 'idprenota_compagna'); $idprenota_compagna = explode(",", $idprenota_compagna); $n_idprenota_compagna = $nuovo_idprenota[$idprenota_compagna[0]]; for ($num2 = 1; $num2 < count($idprenota_compagna); $num2++) { $n_idprenota_compagna .= "," . $nuovo_idprenota[$idprenota_compagna[$num2]]; } esegui_query("update {$tableprenota} set idprenota_compagna = '{$n_idprenota_compagna}' where idprenota = '{$idprenota}'"); } # fine for $num1 $id_costi_agg_importati = esegui_query("select idcostiprenota from {$tablecostiprenota} where idcostiprenota != '1' order by idcostiprenota"); $num_id_costi_agg_importati = numlin_query($id_costi_agg_importati); for ($num1 = 0; $num1 < $num_costi_agg_importati; $num1++) { $idcostiprenota = risul_query($id_costi_agg_importati, $num1, 'idcostiprenota'); $max_idcostiprenota_prec++; esegui_query("update {$tablecostiprenota} set idcostiprenota = '{$max_idcostiprenota_prec}' where idcostiprenota = '{$idcostiprenota}'"); } # fine for $num1 $costi_agg_importati = esegui_query("select * from {$tablecostiprenota} where idcostiprenota != '1' order by idcostiprenota"); $num_costi_agg_importati = numlin_query($costi_agg_importati); for ($num1 = 0; $num1 < $num_costi_agg_importati; $num1++) { $idcostiprenota = risul_query($costi_agg_importati, $num1, 'idcostiprenota'); $settimane = risul_query($costi_agg_importati, $num1, 'settimane'); if (str_replace(",", "", $settimane) != $settimane) { $settimane = explode(",", $settimane); $settimane_nuove = ","; for ($num2 = 1; $num2 < count($settimane) - 1; $num2++) { $settimane_nuove .= $settimane[$num2] - $id_data_ini_periodi_prec + 1 . ","; } esegui_query("update {$tablecostiprenota} set settimane = '{$settimane_nuove}' where idcostiprenota = '{$idcostiprenota}'"); } # fine if (str_replace(",","",$settimane) != $settimane) $varperiodipermessi = risul_query($costi_agg_importati, $num1, 'varperiodipermessi'); if ($varperiodipermessi) { $vpp_nuovi = substr($varperiodipermessi, 0, 1); $varperiodipermessi = explode(",", substr($varperiodipermessi, 1)); for ($num2 = 0; $num2 < count($varperiodipermessi); $num2++) { $id_data_fine_vpp = explode("-", $varperiodipermessi[$num2]); $id_data_inizio_vpp = $id_data_fine_vpp[0]; $id_data_fine_vpp = $id_data_fine_vpp[1]; if ($id_data_fine_vpp >= $id_data_ini_periodi_prec and $id_data_inizio_vpp <= $id_data_fine_periodi_prec) { if ($id_data_inizio_vpp < $id_data_ini_periodi_prec) { $id_data_inizio_vpp = $id_data_ini_periodi_prec; } if ($id_data_fine_vpp > $id_data_fine_periodi_prec) { $id_data_fine_vpp = $id_data_fine_periodi_prec; } $id_data_inizio_vpp = $id_data_inizio_vpp - $id_data_ini_periodi_prec + 1; $id_data_fine_vpp = $id_data_fine_vpp - $id_data_ini_periodi_prec + 1; $vpp_nuovi .= $id_data_inizio_vpp . "-" . $id_data_fine_vpp . ","; } # fine if ($id_data_fine_vpp >= $id_data_ini_periodi_prec and... } # fine for $num2 if (strlen($vpp_nuovi) > 1) { $vpp_nuovi = substr($vpp_nuovi, 0, -1); } esegui_query("update {$tablecostiprenota} set varperiodipermessi = '{$vpp_nuovi}' where idcostiprenota = '{$idcostiprenota}'"); } # fine if ($varperiodipermessi) esegui_query("update {$tablecostiprenota} set idcostiprenota = '" . ($num1 + 2) . "' where idcostiprenota = '{$idcostiprenota}'"); } # fine for $num1 $tariffe_importate = esegui_query("select * from {$tableperiodi_prec} where idperiodi >= '{$id_data_ini_periodi_prec}' and idperiodi <= '{$id_data_fine_periodi_prec}' "); $num_tariffe_iportate = numlin_query($tariffe_importate); for ($num1 = 0; $num1 < $num_tariffe_iportate; $num1 = $num1 + 1) { $idperiodi = risul_query($tariffe_importate, $num1, 'idperiodi'); $idperiodi = $idperiodi - $id_data_ini_periodi_prec + 1; for ($num2 = 1; $num2 <= $num_tariffe_tab; $num2++) { $tariffa = (string) risul_query($tariffe_importate, $num1, "tariffa" . $num2); if (strcmp($tariffa, "")) { esegui_query("update {$tableperiodi} set tariffa{$num2} = '{$tariffa}' where idperiodi = {$idperiodi} "); } $tariffap = (string) risul_query($tariffe_importate, $num1, "tariffa" . $num2 . "p"); if (strcmp($tariffap, "")) { esegui_query("update {$tableperiodi} set tariffa{$num2}" . "p = '{$tariffap}' where idperiodi = {$idperiodi} "); } } # fine for $num2 } # fine for $num1 $regole_prec = esegui_query("select * from {$tableregole_prec} where iddatafine >= '{$id_data_ini_periodi_prec}' "); $num_regole_prec = numlin_query($regole_prec); for ($num1 = 0; $num1 < $num_regole_prec; $num1 = $num1 + 1) { $idregole = risul_query($regole_prec, $num1, 'idregole'); $app_agenzia = risul_query($regole_prec, $num1, 'app_agenzia'); $tariffa_chiusa = risul_query($regole_prec, $num1, 'tariffa_chiusa'); $tariffa_commissioni = risul_query($regole_prec, $num1, 'tariffa_commissioni'); $iddatainizio = risul_query($regole_prec, $num1, 'iddatainizio'); $motivazione = risul_query($regole_prec, $num1, 'motivazione'); $motivazione2 = risul_query($regole_prec, $num1, 'motivazione2'); if ($iddatainizio < $id_data_ini_periodi_prec) { $iddatainizio = $id_data_ini_periodi_prec; } $iddatainizio = $iddatainizio - $id_data_ini_periodi_prec + 1; $iddatafine = risul_query($regole_prec, $num1, 'iddatafine'); if ($iddatafine > $id_data_fine_periodi_prec) { $iddatafine = $id_data_fine_periodi_prec; } $iddatafine = $iddatafine - $id_data_ini_periodi_prec + 1; if ($tariffa_commissioni) { esegui_query("insert into {$tableregole} (idregole,tariffa_commissioni,iddatainizio,iddatafine) values ('{$idregole}','{$tariffa_commissioni}','{$iddatainizio}','{$iddatafine}') "); } else { if ($tariffa_chiusa) { esegui_query("insert into {$tableregole} (idregole,tariffa_chiusa,iddatainizio,iddatafine) values ('{$idregole}','{$tariffa_chiusa}','{$iddatainizio}','{$iddatafine}') "); } else { esegui_query("insert into {$tableregole} (idregole,app_agenzia,iddatainizio,iddatafine) values ('{$idregole}','{$app_agenzia}','{$iddatainizio}','{$iddatafine}') "); } } # fine else $tariffa_commissioni) if (strcmp($motivazione, "")) { esegui_query("update {$tableregole} set motivazione = '" . aggslashdb($motivazione) . "' where idregole = '{$idregole}' "); } if (strcmp($motivazione2, "")) { esegui_query("update {$tableregole} set motivazione2 = '" . aggslashdb($motivazione2) . "' where idregole = '{$idregole}' "); } } # fine for $num1 $soldi_importati = esegui_query("select * from {$tablesoldi_prec} where data_inserimento >= '{$data_inizio_periodi}' and saldo_prenota is not NULL order by idsoldi"); $num_soldi_importati = numlin_query($soldi_importati); $idsoldi_corr = 1; for ($num1 = 0; $num1 < $num_soldi_importati; $num1++) { $motiv = explode(";", risul_query($soldi_importati, $num1, 'motivazione')); if ($nuovo_idprenota[$motiv[3]]) { $idsoldi_corr++; $idsoldi_prec = risul_query($soldi_importati, $num1, 'idsoldi'); $n_motiv = $motiv[0] . ";" . $nuovo_iddatainizio[$motiv[3]] . ";" . $nuovo_iddatafine[$motiv[3]] . ";" . $nuovo_idprenota[$motiv[3]]; esegui_query("insert into {$tablesoldi} select {$col_tablesoldi} from {$tablesoldi_prec} where idsoldi = '{$idsoldi_prec}' "); esegui_query("delete from {$tablesoldi_prec} where idsoldi = '{$idsoldi_prec}' "); esegui_query("update {$tablesoldi} set motivazione = '{$n_motiv}' where idsoldi = '{$idsoldi_prec}' "); esegui_query("update {$tablesoldi} set idsoldi = '{$idsoldi_corr}' where idsoldi = '{$idsoldi_prec}' "); } # fine if ($nuovo_idprenota[$motiv[3]]) } # fine for $num1 $costi_importati = esegui_query("select * from {$tablecosti_prec} where datainserimento >= '{$data_inizio_periodi}' and tipo_costo is not NULL order by idcosti"); $num_costi_importati = numlin_query($costi_importati); $idcosti_corr = 0; for ($num1 = 0; $num1 < $num_costi_importati; $num1++) { $idcosti_corr++; $idcosti_prec = risul_query($costi_importati, $num1, 'idcosti'); esegui_query("insert into {$tablecosti} select {$col_tablecosti} from {$tablecosti_prec} where idcosti = '{$idcosti_prec}' "); esegui_query("delete from {$tablecosti_prec} where idcosti = '{$idcosti_prec}' "); esegui_query("update {$tablecosti} set idcosti = '{$idcosti_corr}' where idcosti = '{$idcosti_prec}' "); } # fine for $num1 $costo_cassa = 0; $data_lim = $anno + 1 . "-01-01 00:00:00"; $costi_cassa = esegui_query("select * from {$tablecosti} where tipo_costo = 'e' and provenienza_costo = 'p' and datainserimento < '{$data_lim}' "); $num_costi_cassa = numlin_query($costi_cassa); for ($num2 = 0; $num2 < $num_costi_cassa; $num2++) { $costo_cassa = $costo_cassa + risul_query($costi_cassa, $num2, 'val_costo'); } if ($costo_cassa) { esegui_query("update {$tablecosti} set val_costo = '{$costo_cassa}' where idcosti = '0' "); } unset($cassa_prec); $costi_non_importati = esegui_query("select * from {$tablecosti_prec} where tipo_costo is not NULL order by idcosti"); $num_costi_non_importati = numlin_query($costi_non_importati); for ($num1 = 0; $num1 < $num_costi_non_importati; $num1++) { $tipo_costo = risul_query($costi_non_importati, $num1, 'tipo_costo'); $val_costo = risul_query($costi_non_importati, $num1, 'val_costo'); $utente_costo = risul_query($costi_non_importati, $num1, 'utente_inserimento'); if ($tipo_costo == "e") { $cassa_prec[$utente_costo] = $cassa_prec[$utente_costo] + (double) $val_costo; } else { $cassa_prec[$utente_costo] = $cassa_prec[$utente_costo] - (double) $val_costo; } } # fine for $num1 if (@is_array($cassa_prec)) { $datainserimento = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600); reset($cassa_prec); while (list($utente_costo, $val_costo) = each($cassa_prec)) { $idcosti_corr++; esegui_query("insert into {$tablecosti} (idcosti,nome_costo,val_costo,persona_costo,tipo_costo,datainserimento,hostinserimento,utente_inserimento) values ('{$idcosti_corr}','{$anno_prec}','{$val_costo}','','e','{$datainserimento}','{$HOSTNAME}','{$utente_costo}') "); } # fine (list($utente_costo,$val_costo) = each($cassa_prec)) } # fine if (@is_array($cassa_prec)) # aggiorno i messaggi con prenotazioni del nuovo anno già inserite, quelli da inserire sono aggiornati con i modelli internet $messaggi_importati = esegui_query("select * from {$tablemessaggi} where stato = 'ins' and dati_messaggio18 = '{$anno_prec}' "); $num_messaggi_importati = numlin_query($messaggi_importati); for ($num1 = 0; $num1 < $num_messaggi_importati; $num1++) { $agg_mess = 1; $n_lista_pren = ""; $lista_pren = explode(",", risul_query($messaggi_importati, $num1, 'dati_messaggio1')); for ($num2 = 0; $num2 < count($lista_pren); $num2++) { if ($nuovo_idprenota[$lista_pren[$num2]]) { $n_lista_pren .= $nuovo_idprenota[$lista_pren[$num2]] . ","; } else { $agg_mess = 0; } } # fine for $num2 if ($agg_mess) { $idmess = risul_query($messaggi_importati, $num1, 'idmessaggi'); $n_lista_pren = substr($n_lista_pren, 0, -1); esegui_query("update {$tablemessaggi} set dati_messaggio1 = '{$n_lista_pren}', dati_messaggio18 = '{$anno}' where idmessaggi = '{$idmess}' "); } # fine if ($agg_mess) } # fine for $num1 # aggiorno i numeri delle prenotazioni importate nei nomi dei documenti già creati nel nuovo anno $dirs_salva = esegui_query("select * from {$tablecontratti} where tipo = 'dir'"); $num_dirs_salva = numlin_query($dirs_salva); if ($num_dirs_salva) { unset($contr_salva_in); $max_contr = esegui_query("select max(numero) from {$tablecontratti} where tipo {$LIKE} 'contr%'"); $max_contr = risul_query($max_contr, 0, 0); if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "") { if (C_CARTELLA_DOC != "" and @is_dir(C_CARTELLA_CREA_MODELLI . "/" . C_CARTELLA_DOC)) { $dir_salva_home = C_CARTELLA_DOC; } else { $dir_salva_home = ""; } } else { $dir_salva_home = C_DATA_PATH; } $utenti = esegui_query("select * from " . $PHPR_TAB_PRE . "utenti order by idutenti"); $num_utenti = numlin_query($utenti); unset($nomi_contr_ut); $parola_documento = mex("documento", 'visualizza_contratto.php'); for ($num1 = 0; $num1 < $num_utenti; $num1++) { $idutente_contr = risul_query($utenti, $num1, 'idutenti'); for ($num2 = 1; $num2 <= $max_contr; $num2++) { $nomi_contr_ut[$idutente_contr][$num2] = $parola_documento . $num2; } $nomi_contratti = esegui_query("select valpersonalizza from {$tablepersonalizza} where idpersonalizza = 'nomi_contratti' and idutente = '{$idutente_contr}'"); $nomi_contratti = risul_query($nomi_contratti, 0, 'valpersonalizza'); $nomi_contratti = explode("#@&", $nomi_contratti); $num_nomi_contratti = count($nomi_contratti); for ($num2 = 0; $num2 < $num_nomi_contratti; $num2++) { $dati_nome_contratto = explode("#?&", $nomi_contratti[$num2]); $nomi_contr_ut[$idutente_contr][$dati_nome_contratto[0]] = $dati_nome_contratto[1]; } # fine for $num2 } # fine for $num1 unset($prefissi_contr); for ($num1 = 0; $num1 < $num_dirs_salva; $num1++) { $dir_salva = risul_query($dirs_salva, 0, 'testo'); if ($dir_salva == "~") { $dir_salva = $dir_salva_home; } if (defined('C_CARTELLA_CREA_MODELLI') and C_CARTELLA_CREA_MODELLI != "") { $dir_salva = C_CARTELLA_CREA_MODELLI . "/" . str_replace("..", "", $dir_salva); } if (!@is_dir($dir_salva)) { $dir_salva = ""; } $num_contr = risul_query($dirs_salva, 0, 'numero'); $tipo_contratto = esegui_query("select tipo from " . $PHPR_TAB_PRE . "contratti where numero = '{$num_contr}' and tipo {$LIKE} 'contr%' "); $tipo_contratto = risul_query($tipo_contratto, 0, 'tipo'); $suff_file = "html"; if ($tipo_contratto == "contrrtf") { $suff_file = "rtf"; } if ($tipo_contratto == "contrtxt") { $suff_file = "txt"; } $filelock_contr = fopen($dir_salva . "/crea_contr.lock", "w+"); flock($filelock_contr, 2); for ($num2 = 0; $num2 < $num_utenti; $num2++) { $idutente_contr = risul_query($utenti, $num1, 'idutenti'); if (!$prefissi_contr[$dir_salva . "/" . $nomi_contr_ut[$idutente_contr][$num_contr]]) { $nome_contratto = $nomi_contr_ut[$idutente_contr][$num_contr]; $prefissi_contr[$dir_salva . "/" . $nome_contratto] = 1; $contr_dir = opendir($dir_salva . "/"); while ($contr_corr = readdir($contr_dir)) { if ($contr_corr != "." and $contr_corr != ".." and is_file($dir_salva . "/" . $contr_corr)) { if (substr($contr_corr, 0, strlen($nome_contratto)) == $nome_contratto) { $resto_nome_contr = substr($contr_corr, strlen($nome_contratto)); if (substr($resto_nome_contr, 0, 6) == "_{$anno}" . "_") { if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}(_[0-9]+(-[0-9]+)?)*\\.{$suff_file}/", "", $resto_nome_contr) == "") { $num_pren_esist = substr($resto_nome_contr, 12); $num_pren_esist = substr($num_pren_esist, 0, -1 * (strlen($suff_file) + 1)); if ($num_pren_esist) { $agg_contr = 1; $n_lista_pren = ""; $num_pren_esist = explode("_", $num_pren_esist); for ($num3 = 0; $num3 < count($num_pren_esist); $num3++) { $num_pren_esist2 = explode("-", $num_pren_esist[$num3]); $fine_for = $num_pren_esist2[count($num_pren_esist2) - 1]; for ($num4 = $num_pren_esist2[0]; $num4 <= $fine_for; $num4++) { if (!$nuovo_idprenota[$num4]) { $agg_contr = 0; break; } # fine if (!$nuovo_idprenota[$num4]) if ($num4 == $num_pren_esist2[0]) { $n_lista_pren .= "_" . $nuovo_idprenota[$num4]; } elseif ($num4 == $fine_for) { $n_lista_pren .= "-" . $nuovo_idprenota[$num4]; } } # fine for $num4 } # fine for $num3 if ($agg_contr) { $n_nome_contr = $nome_contratto . substr($resto_nome_contr, 0, 11) . $n_lista_pren . ".{$suff_file}"; rename($dir_salva . "/" . $contr_corr, $dir_salva . "/" . $n_nome_contr); } # fine if ($agg_contr) } # fine if ($num_pren_esist) } # fine if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}\.$suff_file/","",$resto_nome_contr) == "") } # fine if (substr($resto_nome_contr,0,6) == "_$anno"."_") } # fine if (substr($contr_corr,0,strlen($nome_contratto)) == $nome_contratto) } # fine if ($contr_corr != "." and $contr_corr != ".." and... } # fine while ($fattura_corr = readdir($fatture_dir)) closedir($contr_dir); } # fine if (!$prefissi_contr[$dir_salva."/".$nomi_contr_ut[$idutente_contr][$num_contr]]) } # fine for $num2 flock($filelock_contr, 3); fclose($filelock_contr); unlink($dir_salva . "/crea_contr.lock"); } # fine for $num1 } # fine if ($num_dirs_salva) } # fine else if ($num_periodo_interferenza == 0) $colonne = "idntariffe,nomecostoagg,tipo_ca,valore_ca,valore_perc_ca,arrotonda_ca,tasseperc_ca,associasett_ca,numsett_ca,moltiplica_ca,periodipermessi_ca,beniinv_ca,appincompatibili_ca,variazione_ca,mostra_ca,categoria_ca,letto_ca,numlimite_ca,regoleassegna_ca,utente_inserimento"; for ($num1 = 1; $num1 <= $num_tariffe_tab; $num1++) { $nome_nuova_tariffa = "tariffa" . $num1; $colonne .= ",{$nome_nuova_tariffa}"; } # fine for $num1 esegui_query("insert into {$tablenometariffe} ({$colonne}) select {$colonne} from {$tablenometariffe_prec}"); $costi_agg_importati = esegui_query("select * from {$tablenometariffe} where idntariffe > 10 "); $num_costi_agg_importati = numlin_query($costi_agg_importati); for ($num1 = 0; $num1 < $num_costi_agg_importati; $num1++) { $idntariffe = risul_query($costi_agg_importati, $num1, 'idntariffe'); $periodipermessi = risul_query($costi_agg_importati, $num1, 'periodipermessi_ca'); if ($periodipermessi) { $pp_nuovi = substr($periodipermessi, 0, 1); $periodipermessi = explode(",", substr($periodipermessi, 1)); for ($num2 = 0; $num2 < count($periodipermessi); $num2++) { $id_data_fine_pp = explode("-", $periodipermessi[$num2]); $id_data_inizio_pp = $id_data_fine_pp[0]; $id_data_fine_pp = $id_data_fine_pp[1]; if ($id_data_fine_pp >= $id_data_ini_periodi_prec and $id_data_inizio_pp <= $id_data_fine_periodi_prec) { if ($id_data_inizio_pp < $id_data_ini_periodi_prec) { $id_data_inizio_pp = $id_data_ini_periodi_prec; } if ($id_data_fine_pp > $id_data_fine_periodi_prec) { $id_data_fine_pp = $id_data_fine_periodi_prec; } $id_data_inizio_pp = $id_data_inizio_pp - $id_data_ini_periodi_prec + 1; $id_data_fine_pp = $id_data_fine_pp - $id_data_ini_periodi_prec + 1; $pp_nuovi .= $id_data_inizio_pp . "-" . $id_data_fine_pp . ","; } # fine if ($id_data_fine_pp >= $id_data_ini_periodi_prec and... } # fine for $num2 if (strlen($pp_nuovi) > 1) { $pp_nuovi = substr($pp_nuovi, 0, -1); } esegui_query("update {$tablenometariffe} set periodipermessi_ca = '{$pp_nuovi}' where idntariffe = '{$idntariffe}'"); } # fine if ($periodipermessi) } # fine for $num1 esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_per_app != ''"); esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_per_utente != ''"); esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_per_persone != ''"); esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_commissioni is not NULL and iddatainizio is NULL "); $privilegi_prec = esegui_query("select * from {$tableprivilegi} where anno = '{$anno_prec}'"); for ($num1 = 0; $num1 < numlin_query($privilegi_prec); $num1++) { $idutente_p = risul_query($privilegi_prec, $num1, 'idutente'); $regole1_consentite_p = risul_query($privilegi_prec, $num1, 'regole1_consentite'); $tariffe_consentite_p = risul_query($privilegi_prec, $num1, 'tariffe_consentite'); $costi_agg_consentiti_p = risul_query($privilegi_prec, $num1, 'costi_agg_consentiti'); $contratti_consentiti_p = risul_query($privilegi_prec, $num1, 'contratti_consentiti'); $cassa_pagamenti_p = aggslashdb(risul_query($privilegi_prec, $num1, 'cassa_pagamenti')); $priv_ins_prenota_p = risul_query($privilegi_prec, $num1, 'priv_ins_prenota'); $priv_mod_prenota_p = risul_query($privilegi_prec, $num1, 'priv_mod_prenota'); $priv_mod_pers_p = risul_query($privilegi_prec, $num1, 'priv_mod_pers'); $priv_ins_clienti_p = risul_query($privilegi_prec, $num1, 'priv_ins_clienti'); $prefisso_clienti_p = risul_query($privilegi_prec, $num1, 'prefisso_clienti'); $priv_ins_costi_p = risul_query($privilegi_prec, $num1, 'priv_ins_costi'); $priv_vedi_tab_p = risul_query($privilegi_prec, $num1, 'priv_vedi_tab'); $priv_ins_tariffe_p = risul_query($privilegi_prec, $num1, 'priv_ins_tariffe'); $priv_ins_regole_p = risul_query($privilegi_prec, $num1, 'priv_ins_regole'); esegui_query("insert into {$tableprivilegi} (idutente,anno,regole1_consentite,tariffe_consentite,costi_agg_consentiti,contratti_consentiti,cassa_pagamenti,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) values ('{$idutente_p}','{$anno}','{$regole1_consentite_p}','{$tariffe_consentite_p}','{$costi_agg_consentiti_p}','{$contratti_consentiti_p}','{$cassa_pagamenti_p}','{$priv_ins_prenota_p}','{$priv_mod_prenota_p}','{$priv_mod_pers_p}','{$priv_ins_clienti_p}','{$prefisso_clienti_p}','{$priv_ins_costi_p}','{$priv_vedi_tab_p}','{$priv_ins_tariffe_p}','{$priv_ins_regole_p}')"); $lingua_mex = $lingua[$idutente_p]; crea_menu_date(C_DATA_PATH . "/selectperiodi{$anno}.1.php", C_DATA_PATH . "/selectperiodi{$anno}.{$idutente_p}.php", $tipo_periodi); if (@is_file(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".{$idutente_p}.php")) { estendi_menu_date(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".{$idutente_p}.php", C_DATA_PATH . "/selperiodimenu{$anno}.{$idutente_p}.php", $tipo_periodi, date("Y-m-d", mktime(0, 0, 0, $mese_ini, 1, $anno)), $data_ini_agg, date("Y-m-d", mktime(0, 0, 0, $mese_fine + 1, 1, $anno)), $anno, $pag); } else { copy(C_DATA_PATH . "/selectperiodi{$anno}.{$idutente_p}.php", C_DATA_PATH . "/selperiodimenu{$anno}.{$idutente_p}.php"); } $lingua_mex = $lingua[1]; $giorno_vedi_ini_sett = esegui_query("select valpersonalizza_num from {$tablepersonalizza} where idpersonalizza = 'giorno_vedi_ini_sett{$anno_prec}' and idutente = '{$idutente_p}'"); if (numlin_query($giorno_vedi_ini_sett) == 1 and $tipo_periodi == "g") { esegui_query("insert into {$tablepersonalizza} (idpersonalizza,valpersonalizza_num,idutente) values ('giorno_vedi_ini_sett{$anno}','" . risul_query($giorno_vedi_ini_sett, 0, "valpersonalizza_num") . "','{$idutente_p}')"); } } # fine for $num1 $giorno_vedi_ini_sett = esegui_query("select valpersonalizza_num from {$tablepersonalizza} where idpersonalizza = 'giorno_vedi_ini_sett{$anno_prec}' and idutente = '1'"); if (numlin_query($giorno_vedi_ini_sett) == 1 and $tipo_periodi == "g") { esegui_query("insert into {$tablepersonalizza} (idpersonalizza,valpersonalizza_num,idutente) values ('giorno_vedi_ini_sett{$anno}','" . risul_query($giorno_vedi_ini_sett, 0, "valpersonalizza_num") . "','1')"); } $inserisci_in_ntariffe = "NO"; } # fine if ($importa_anno_prec == "SI") if ($inserisci_in_ntariffe != "NO") { # rigo 1: nomi tariffe; 2-3: caparra (% e arrotondo). for ($numtariffe = 1; $numtariffe <= 6; $numtariffe = $numtariffe + 1) { esegui_query("insert into {$tablenometariffe} (idntariffe) values ('{$numtariffe}')"); } # fine for $numtariffe esegui_query("update {$tablenometariffe} set nomecostoagg = '8' where idntariffe = '1'"); esegui_query("update {$tablenometariffe} set numlimite_ca = '11' where idntariffe = '1'"); } # fine if ($inserisci_in_ntariffe != "NO") esegui_query("delete from {$tablerelclienti} where tipo = 'cc' {$lista_clienti_importati}"); unlock_tabelle($tabelle_lock); if ($silenzio != "SI") { echo "<br> " . mex("Anno ", $pag) . $anno . mex(" creato", $pag) . "! <br><br>"; } if ($importa_anno_prec == "SI" and C_RESTRIZIONI_DEMO_ADMIN != "SI") { 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; $pag_orig = $pag; $pag = "crea_modelli.php"; include "./includes/templates/funzioni_modelli.php"; $modello_esistente = "SI"; $cambia_frasi = "NO"; $anno_modello = $anno; 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 (@is_file("{$percorso_cartella_modello}/mdl_disponibilita.php")) { $lingua_modello = "ita"; $nome_file = mex2("mdl_disponibilita", $pag, $lingua_modello) . ".php"; $num_periodi_date = ""; recupera_var_modello_disponibilita($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE); if ($anno_modello_presente == $anno_prec) { aggiorna_var_anno_modello_disponibilita($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi); 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 ($anno_modello_presente == $anno_prec) } # fine if (@is_file("$percorso_cartella_modello/modello_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"; for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) { $percorso_cartella_modello = $perc_cart_mod_vett[$num_cart]; if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) { $lingua_modello = $ini_lingua; $num_periodi_date = ""; recupera_var_modello_disponibilita($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE); if ($anno_modello_presente == $anno_prec) { aggiorna_var_anno_modello_disponibilita($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi); 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 ($anno_modello_presente == $anno_prec) } # fine if (@is_file("$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_aggiorna_var_anno_modello = "aggiorna_var_anno_modello_" . $modello_ext; if ($template_file_name["ita"]) { $nome_file = $template_file_name["ita"]; } else { $nome_file = "ita_" . $template_file_name["en"]; } for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) { $percorso_cartella_modello = $perc_cart_mod_vett[$num_cart]; if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) { $lingua_modello = "ita"; $num_periodi_date = ""; $funz_recupera_var_modello($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE); if ($anno_modello_presente == $anno_prec) { $funz_aggiorna_var_anno_modello($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi); $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 ($anno_modello_presente == $anno_prec) } # fine if (@is_file("$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"]; } for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) { $percorso_cartella_modello = $perc_cart_mod_vett[$num_cart]; if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) { $lingua_modello = $ini_lingua; $num_periodi_date = ""; $funz_recupera_var_modello($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE); if ($anno_modello_presente == $anno_prec) { $funz_aggiorna_var_anno_modello($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi); $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 ($anno_modello_presente == $anno_prec) } # fine if (@is_file("$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; if ($silenzio != "SI") { echo "<br>"; } } # fine if ($importa_anno_prec == "SI" and C_RESTRIZIONI_DEMO_ADMIN != "SI") } else { if ($silenzio != "SI") { echo mex("Non ho i permessi per creare nuove tabelle nel database", $pag) . ".<br>"; } } } else { if ($silenzio != "SI") { echo mex("Anno già creato", $pag) . ".<br>"; } } flock($filelock, 3); fclose($filelock); unlink(C_DATA_PATH . "/anni.lock"); } else { if ($silenzio != "SI") { echo mex("Non ho i permessi di scrittura sulla cartella data", $pag) . ".<br>"; } } $lingua_mex = $lingua_mex_orig; }
function mext_rat ($messaggio,$pag,$lingua="") { if ($lingua) $lingua_mex = $lingua; else global $lingua_mex; if ($lingua_mex != "en" and $lingua_mex != "ita" and $lingua_mex != "es") { if (@is_file("./includes/lang/$lingua_mex/modt_rat.php")) include("./includes/lang/$lingua_mex/modt_rat.php"); } # fine if ($lingua_mex != "en" and... if ($tr != 1) { # messaggi in inglese di default if ($lingua_mex != "es" and $lingua_mex != "ita") { switch ($messaggio) { case "Pagina della tabella con le tariffe": $messaggio = "Page of the rates table"; $tr = 1; break; case "Crea la pagina con la tabella delle tariffe": $messaggio = "Create the rates table page"; $tr = 1; break; case "Mostra tariffe": $messaggio = "Show rates"; $tr = 1; break; case "Tabella Tariffe": $messaggio = "Rates Table"; $tr = 1; break; case "Stile tabella tariffe": $messaggio = "Rates table style"; $tr = 1; break; case "Costi aggiuntivi": $messaggio = "Extra costs"; $tr = 1; break; case "della tariffa": $messaggio = "of the rate"; $tr = 1; break; case "della tariffa senza persone": $messaggio = "of the rate without persons"; $tr = 1; break; case "della tariffa di una persona": $messaggio = "of the rate of one person"; $tr = 1; break; case "del prezzo totale": $messaggio = "of total price"; $tr = 1; break; case "della caparra": $messaggio = "of deposit"; $tr = 1; break; case "del resto della caparra": $messaggio = "of deposit rest"; $tr = 1; break; case "alla settimana": $messaggio = "per week"; $tr = 1; break; case "al giorno": $messaggio = "per day"; $tr = 1; break; case "a persona": $messaggio = "per person"; $tr = 1; break; case "obbligatorio con": $messaggio = "obligatory with"; $tr = 1; break; case "tutte le tariffe": $messaggio = "all rates"; $tr = 1; break; case "*p": $messaggio = "*p"; $tr = 1; break; case "": $messaggio = ""; $tr = 1; break; case "": $messaggio = ""; $tr = 1; break; case "var_stile_tabella_tariffe": $messaggio = "var_rates_table_style"; $tr = 1; break; case "var_fr_Costi_aggiuntivi": $messaggio = "var_phr_Extra_costs"; $tr = 1; break; case "var_fr_della_tariffa": $messaggio = "var_phr_of_the_rate"; $tr = 1; break; case "var_fr_della_tariffa_senza_persone": $messaggio = "var_phr_of_the_rate_without_persons"; $tr = 1; break; case "var_fr_della_tariffa_di_una_persona": $messaggio = "var_phr_of_the_rate_of_one_person"; $tr = 1; break; case "var_fr_del_prezzo_totale": $messaggio = "var_phr_of_total_price"; $tr = 1; break; case "var_fr_della_caparra": $messaggio = "var_phr_of_deposit"; $tr = 1; break; case "var_fr_del_resto_della_caparra": $messaggio = "var_phr_of_deposit_rest"; $tr = 1; break; case "var_fr_alla_settimana": $messaggio = "var_phr_per_week"; $tr = 1; break; case "var_fr_a_persona": $messaggio = "var_phr_per_person"; $tr = 1; break; case "var_fr_obbligatorio_con": $messaggio = "var_phr_obligatory_with"; $tr = 1; break; case "var_fr_tutte_le_tariffe": $messaggio = "var_phr_all_rates"; $tr = 1; break; case "var_fr_per_p": $messaggio = "var_phr_per_p"; $tr = 1; break; case "var_fr_": $messaggio = "var_phr_"; $tr = 1; break; case "var_fr_": $messaggio = "var_phr_"; $tr = 1; break; } # fine switch ($messaggio) } # fine if ($lingua_mex != "es" and $lingua_mex != "ita") if ($lingua_mex == "es") { switch ($messaggio) { case "Pagina della tabella con le tariffe": $messaggio = "Página de la tabla con las tarifas"; $tr = 1; break; case "Crea la pagina con la tabella delle tariffe": $messaggio = "Crea la página con la tabla de las tarifas"; $tr = 1; break; case "Mostra tariffe": $messaggio = "Enseñar las tarifas"; $tr = 1; break; case "Tabella Tariffe": $messaggio = "Tabla de las Tarifas"; $tr = 1; break; case "Stile tabella tariffe": $messaggio = "Estilo de la tabla de las tarifas"; $tr = 1; break; case "Costi aggiuntivi": $messaggio = "Costes añadidos"; $tr = 1; break; case "della tariffa": $messaggio = "de la tarifa"; $tr = 1; break; case "della tariffa senza persone": $messaggio = "de la tarifa sin personas"; $tr = 1; break; case "della tariffa di una persona": $messaggio = "de la tarifa de una persona"; $tr = 1; break; case "del prezzo totale": $messaggio = "del precio total"; $tr = 1; break; case "della caparra": $messaggio = "de la fianza"; $tr = 1; break; case "del resto della caparra": $messaggio = "del resto de la fianza"; $tr = 1; break; case "alla settimana": $messaggio = "a la semana"; $tr = 1; break; case "al giorno": $messaggio = "al día"; $tr = 1; break; case "a persona": $messaggio = "por persona"; $tr = 1; break; case "obbligatorio con": $messaggio = "obligatorio con"; $tr = 1; break; case "tutte le tariffe": $messaggio = "todas las tarifas"; $tr = 1; break; case "*p": $messaggio = "*p"; $tr = 1; break; case "": $messaggio = ""; $tr = 1; break; case "": $messaggio = ""; $tr = 1; break; case "var_stile_tabella_tariffe": $messaggio = "var_estilo_tabla_reservas"; $tr = 1; break; case "var_fr_Costi_aggiuntivi": $messaggio = "var_fr_Costes_agnadidos"; $tr = 1; break; case "var_fr_della_tariffa": $messaggio = "var_fr_de_la_tarifa"; $tr = 1; break; case "var_fr_della_tariffa_senza_persone": $messaggio = "var_fr_de_la_tarifa_sin_personas"; $tr = 1; break; case "var_fr_della_tariffa_di_una_persona": $messaggio = "var_fr_de_la_tarifa_de_una_persona"; $tr = 1; break; case "var_fr_del_prezzo_totale": $messaggio = "var_fr_del_precio_total"; $tr = 1; break; case "var_fr_della_caparra": $messaggio = "var_fr_de_la_fianza"; $tr = 1; break; case "var_fr_del_resto_della_caparra": $messaggio = "var_fr_del_resto_de_la_fianza"; $tr = 1; break; case "var_fr_alla_settimana": $messaggio = "var_fr_a_la_semana"; $tr = 1; break; case "var_fr_a_persona": $messaggio = "var_fr_por_persona"; $tr = 1; break; case "var_fr_obbligatorio_con": $messaggio = "var_fr_obligatorio_con"; $tr = 1; break; case "var_fr_tutte_le_tariffe": $messaggio = "var_fr_todas_las_tarifas"; $tr = 1; break; case "var_fr_per_p": $messaggio = "var_fr_por_p"; $tr = 1; break; case "var_fr_": $messaggio = "var_fr_"; $tr = 1; break; case "var_fr_": $messaggio = "var_fr_"; $tr = 1; break; } # fine switch ($messaggio) } # fine if ($lingua_mex == "es") if ($tr != 1) { if ($lingua) $messaggio = mex2($messaggio,$pag,$lingua); else $messaggio = mex($messaggio,$pag); } # fine if ($tr != 1) } # fine if ($tr != 1) return $messaggio; } # fine function mext_rat
@unlink(C_DATA_PATH . "/ini.php"); } # fine if (C_UTILIZZA_SEMPRE_DEFAULTS == "AUTO" and @is_file(C_DATI_PATH."/ini.php")) $tablemessaggi = $PHPR_TAB_PRE . "messaggi"; $testo = "<div style=\"max-width: 600px; line-height: 1.1;\">"; if (C_NASCONDI_MARCA != "SI") { $testo .= "<h4>" . mex("Benvenuto a HotelDruid!", $pag) . "</h4><br>"; } $testo .= "" . mex("Questi sono alcuni semplici passi che puoi seguire per configurare le funzionalità di base di HotelDruid", $pag) . ":<br>\n<ul style=\"line-height: 1.2;\">\n<li>" . mex("Inserisci le informazioni sugli appartamenti dalla", 'unit.php') . "\n <em><b><a href=\"./visualizza_tabelle.php?tipo_tabella=appartamenti&<sessione>\">" . mex("tabella appartamenti", 'unit.php') . "</a></b></em>, \n " . mex("utilizzando l'apposito tasto al di sotto di essa", $pag) . ". " . mex("Gli appartamenti possono essere creati, cancellati e rinominati", 'unit.php') . ". \n " . mex("Si consiglia di inserire almeno la capienza massima per ogni appartamento", 'unit.php') . ".<br><br></li>\n<li>" . mex("Inserisci il numero di tariffe, un nome per ciascuna di esse ed i prezzi corrispondenti dalla", $pag) . " \n <em><b><a href=\"./creaprezzi.php?<sessione>\">" . mex("pagina inserimento prezzi", $pag) . "</a></b></em>.\n " . mex("Considera che le tariffe di HotelDruid fungono anche da tipologie di appartamenti", 'unit.php') . " (" . mex("vedi passo successivo", $pag) . ").<br><br></li>\n<li>" . mex("Associa una lista di appartamenti ad ogni tariffa, inserendo una regola di assegnazione 2 per ognuna di esse, dalla", 'unit.php') . " \n <em><b><a href=\"./crearegole.php?<sessione>#regola2\">" . mex("pagina inserimento regole", $pag) . "</a></b></em>.\n " . mex("Ogni appatamento può essere associato a più tariffe", 'unit.php') . ".<br><br></li>\n<li>" . mex("Se questo server web è pubblico si può abilitare il login e creare nuovi utenti dalla", $pag) . "\n <em><b><a href=\"./gestione_utenti.php?<sessione>\">" . mex("pagina gestione utenti", $pag) . "</a></b></em>.<br><br></li>\n<li>" . mex("Vai alla pagina", $pag) . "\n \"<em><b><a href=\"./personalizza.php?<sessione>\">" . mex("configura e personalizza", $pag) . "</a></b></em>\"\n " . mex("per cambiare il nome della valuta, abilitare la registrazione delle entrate, inserire i metodi di pagamento, ed impostare molte altre opzioni", $pag) . ".<br><br></li>\n</ul></div>"; if (C_NASCONDI_MARCA == "SI") { $testo = str_replace("HotelDruid", mex("questo programma", $pag), $testo); } $testo = aggslashdb($testo); $datainserimento = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600); esegui_query("insert into {$tablemessaggi} (idmessaggi,tipo_messaggio,idutenti,idutenti_visto,datavisione,mittente,testo,datainserimento) values ('1','sistema',',1,',',1,','{$datainserimento}','1','{$testo}','{$datainserimento}')"); echo mex("Dati inseriti", $pag) . "!<br>" . mex("Tutti i data permanenti sono stati inseriti", $pag) . ".<br>"; echo "><br>\n</div></form>\""; if (C_CREA_ULTIMO_ACCESSO == "SI") { $fileaperto = @fopen(C_DATA_PATH . "/ultimo_accesso", "w+"); @fwrite($fileaperto, date("d-m-Y H:i:s")); @fclose($fileaperto); @chmod(C_DATA_PATH . "/ultimo_accesso", 0644); } # fine if (C_CREA_ULTIMO_ACCESSO == "SI") } # fine if ($insappartamenti and !@is_file(C_DATI_PATH."/selectappartamenti.php")) if ($mostra_form_iniziale != "NO") { // prima form di inserimento echo "<h4>" . mex2("Inserimento dei data permanenti", $pag, $lingua) . "</h4><br>\n" . mex2("Inserisci questi data per poi creare il database", $pag, $lingua) . ".<br>\n<br>\n<form accept-charset=\"utf-8\" method=\"post\" action=\"createdb.php\"><div>\n" . mex2("Tipo di database", $pag, $lingua) . ": \n<select name=\"tipo_db\">"; if (C_CREADB_TIPODB == "postgresql") { $selected = " selected";
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; }
</div></form>"; echo "<hr style=\"width: 95%\"><br><div style=\"text-align: center;\"> <form accept-charset=\"utf-8\" method=\"post\" action=\"modifica_app.php\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"idappartamenti\" value=\"$idappartamenti\"> <input class=\"sbutton\" id=\"canc\" type=\"submit\" name=\"cancella_app\" value=\"".mex($fr1."Cancella l'appartamento",'unit.php')." $idappartamenti\"> </div><br></form></div> <hr style=\"width: 95%\"><br><div style=\"text-align: center;\"> <form accept-charset=\"utf-8\" method=\"post\" action=\"visualizza_tabelle.php\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"tipo_tabella\" value=\"appartamenti\"> <input class=\"sbutton\" id=\"indi\" type=\"submit\" name=\"torna\" value=\"".mex("Torna indietro",$pag)."\"> </div></form><br></div>"; } # fine if ($mostra_form_modifica != "NO") if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/".$tema[$id_utente]."/php")) include("./themes/".$tema[$id_utente]."/php/foot.php"); else include("./includes/foot.php"); } # fine if ($id_utente and $id_utente == 1)
echo "<a class=\"nav\" href=\"./visualizza_tabelle.php?$sessione_anno_var&tipo_tabella=appartamenti\"> <b>$fr_APPARTAMENTI</b> </a></td><td>"; } # fine if ($priv_vedi_tab_appartamenti != "n") } # fine if ($priv_vedi_tab_mesi != "n" or $priv_vedi_tab_prenotazioni != "n" or... if ($modifica_pers != "NO" or ($priv_crea_backup == "s" and $installazione_subordinata != "SI")) { echo "|</td><td><div class=\"drop\"><ul> <li><a class=\"nav\" href=\"./personalizza.php?$sessione_anno_var\"> <b>".mex("CONFIGURA","head.php")."</b> </a>"; echo "<ul>"; if ($id_utente == 1) { if ($installazione_subordinata != "SI") { echo "<li><a href=\"./gestione_utenti.php?$sessione_anno_var\"> <b>".mex("UTENTI","head.php")."</b> </a></li> <li><a href=\"./crea_modelli.php?$sessione_anno_var\"> <b>".mex("SITO WEB","head.php")."</b> </a></li>"; } # fine if ($installazione_subordinata != "SI") if (C_RESTRIZIONI_DEMO_ADMIN != "SI" and C_CREA_SUBORDINAZIONI != "NO") echo "<li><a href=\"./interconnessioni.php?$sessione_anno_var\"> <b>".mex("INTERCONN.","head.php")."</b> </a></li>"; } # fine if ($id_utente == 1) if ($priv_crea_backup == "s" and $installazione_subordinata != "SI") echo "<li><a href=\"./crea_backup.php?$sessione_anno_var\"> <b>".mex("BACKUP","head.php")."</b> </a></li>"; if ($modifica_pers != "NO") echo "<li><a href=\"./personalizza.php?$sessione_anno_var#contratti\"> <b>".mex("DOCUMENTI","head.php")."</b> </a></li>"; echo "</ul></li></ul></div></td><td>"; } # fine if ($modifica_pers != "NO" or ($priv_crea_backup == "s" and... echo "</td></tr></table></td>"; if ($idprenota_origine) $anno = $anno - 1; if ($mostra_X == "SI") { if (@is_array($_POST)) reset($_POST); for ($num1 = 0 ; $num1 < count($_POST) ; $num1++) { $lista_var_X .= "&".key($_POST)."=".$_POST[key($_POST)]; next($_POST); } # fine for $num1 if (@is_array($_GET)) reset($_GET); for($num1 = 0 ; $num1 < count($_GET); $num1++) { $lista_var_X .= "&".key($_GET)."=".$_GET[key($_GET)];