<?php ################################################################################## # HOTELDRUID # Copyright (C) 2001-2023 by Marco Maria Francesco De Santis (marco@digitaldruid.net) # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU Affero General Public License as published by # the Free Software Foundation, either version 3 of the License, or # any later version accepted by Marco Maria Francesco De Santis, which # shall act as a proxy as defined in Section 14 of version 3 of the # license. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU Affero General Public License for more details. # # You should have received a copy of the GNU Affero General Public License # along with this program. If not, see <http://www.gnu.org/licenses/>. ################################################################################## function trova_prenota_succ ($anno,$d_id_data_fine,$PHPR_TAB_PRE,$id_prenota,&$fineperiodo_succ,$pcanc="") { $fineperiodo_succ = ""; $id_prenota_succ = ""; $d_data_fine = esegui_query("select datafine from ".$PHPR_TAB_PRE."periodi".$anno." where idperiodi = '$d_id_data_fine'"); $d_data_fine = risul_query($d_data_fine,0,'datafine'); if (substr($d_data_fine,0,4) != $anno) { $anno_succ_esistente = esegui_query("select idanni from ".$PHPR_TAB_PRE."anni where idanni = '".($anno + 1)."'"); if (numlin_query($anno_succ_esistente) == 1) { $id_prenota_succ = "soloanno"; $data_succ_esistente = esegui_query("select idperiodi from $PHPR_TAB_PRE"."periodi".($anno + 1)." where datafine <= '$d_data_fine'"); if (numlin_query($data_succ_esistente) >= 1) { $prenota_succ = esegui_query("select idprenota,iddatafine from $PHPR_TAB_PRE"."prenota".$pcanc.($anno + 1)." where iddatainizio = '0' and commento = '$id_prenota'"); if (numlin_query($prenota_succ) == 1) { $id_prenota_succ = risul_query($prenota_succ,0,'idprenota'); $fineperiodo_succ = risul_query($prenota_succ,0,'iddatafine'); } # fine if (numlin_query($prenota_in_anno_succ) == 1) } # fine if (numlin_query($data_succ_esistente) >= 1) } # fine if (numlin_query($anno_succ_esistente) == 1) } # fine if (substr($d_data_fine,0,4) != $anno) return $id_prenota_succ; } # fine function trova_prenota_succ function trova_prenota_prec ($anno,$d_id_data_inizio,$PHPR_TAB_PRE,$dati_prenota_modifica,&$n_dati_prenota_modifica,$pcanc="") { $n_dati_prenota_modifica = ""; $id_prenota_prec = ""; if ($d_id_data_inizio == 0) { $id_prenota_prec = "SI"; $id_prenota_prec_esist = aggslashdb(risul_query($dati_prenota_modifica,0,'commento')); if ($id_prenota_prec_esist) { $anno_prec_esistente = esegui_query("select idanni from ".$PHPR_TAB_PRE."anni where idanni = '".($anno - 1)."'"); if (numlin_query($anno_prec_esistente) == 1) { $n_dati_prenota_modifica = esegui_query("select * from $PHPR_TAB_PRE"."prenota".$pcanc.($anno - 1)." where idprenota = '$id_prenota_prec_esist'"); if (numlin_query($n_dati_prenota_modifica) == 1) $id_prenota_prec = $id_prenota_prec_esist; } # fine if (numlin_query($anno_prec_esistente) == 1) } # fine if ($id_prenota_prec_esist) } # fine if ($d_id_data_inizio == 0) return $id_prenota_prec; } # fine function trova_prenota_prec function cancella_prenotazione ($id_prenota,$cancella_pagato,$metodo_pagamento,$priv_mod_pagato,$lock,$anno,$PHPR_TAB_PRE,$id_utente,&$stato_canc,$metodo_pagamento_imp="",$dettagli_prenota="",$modo=array(),$cassa_pagamenti="") { $pag = "modifica_prenota.php"; $tableprenota = $PHPR_TAB_PRE."prenota".$anno; $tableprenotacanc = $PHPR_TAB_PRE."prenotacanc".$anno; $tableperiodi = $PHPR_TAB_PRE."periodi".$anno; $tablesoldi = $PHPR_TAB_PRE."soldi".$anno; $tablecosti = $PHPR_TAB_PRE."costi".$anno; $tableanni = $PHPR_TAB_PRE."anni"; $tablepersonalizza = $PHPR_TAB_PRE."personalizza"; $tablecostiprenota = $PHPR_TAB_PRE."costiprenota".$anno; $tablerclientiprenota = $PHPR_TAB_PRE."rclientiprenota".$anno; $tableinterconnessioni = $PHPR_TAB_PRE."interconnessioni"; $tableclienti = $PHPR_TAB_PRE."clienti"; $tableutenti = $PHPR_TAB_PRE."utenti"; $testo = ""; $continua_canc = "SI"; if (strcmp($cassa_pagamenti,"")) { if (defined('C_VERSIONE_ATTUALE') and C_VERSIONE_ATTUALE < 3.00) $tabelle_lock = array($tableprenota,$tablecostiprenota,$tablerclientiprenota,$tablecosti,$tablesoldi,$tableinterconnessioni); else $tabelle_lock = array($tableprenota,$tableprenotacanc,$tablecostiprenota,$tablerclientiprenota,$tablecosti,$tablesoldi,$tableinterconnessioni); } # fine if (strcmp($cassa_pagamenti,"")) else { if (defined('C_VERSIONE_ATTUALE') and C_VERSIONE_ATTUALE < 3.00) $tabelle_lock = array($tableprenota,$tablecostiprenota,$tablerclientiprenota,$tablesoldi,$tableinterconnessioni); else $tabelle_lock = array($tableprenota,$tableprenotacanc,$tablecostiprenota,$tablerclientiprenota,$tablesoldi,$tableinterconnessioni); } # fine else if (strcmp($cassa_pagamenti,"")) if ($dettagli_prenota or strcmp($cassa_pagamenti,"")) { $altre_tab_lock = array($tableanni,$tableperiodi,$tableclienti,$tablepersonalizza); $stile_data = stile_data($id_utente); } # fine if ($dettagli_prenota or strcmp($cassa_pagamenti,"")) else $altre_tab_lock = array($tableanni,$tableperiodi,$tablepersonalizza); if (!empty($modo['gia_canc'])) $dati_prenota = esegui_query("select * from $tableprenotacanc where idprenota = '".aggslashdb($id_prenota)."' and idclienti != '0' "); else $dati_prenota = esegui_query("select * from $tableprenota where idprenota = '".aggslashdb($id_prenota)."' and idclienti != '0' "); $num_dati_prenota = numlin_query($dati_prenota); if ($num_dati_prenota == 0) { $testo .= mex("La prenotazione",$pag)." $id_prenota ".mex("era già stata cancellata",$pag)."!<br>"; $continua_canc = "NO"; } # fine if ($num_dati_prenota == 0) # Controlli per vedere se la prenotazione è anche nell'anno precedente o successivo if ($continua_canc != "NO") { $id_prenota_succ = ""; $id_prenota_orig = ""; $d_id_data_inizio = risul_query($dati_prenota,0,'iddatainizio'); $d_id_data_fine = risul_query($dati_prenota,0,'iddatafine'); if (!empty($modo['gia_canc'])) { $pcanc = "canc"; $modo['permanente'] = 1; } # fine if (!empty($modo['gia_canc'])) else $pcanc = ""; $id_prenota_succ = trova_prenota_succ($anno,$d_id_data_fine,$PHPR_TAB_PRE,$id_prenota,$fineperiodo_succ,$pcanc); if ($id_prenota_succ == "soloanno") $id_prenota_succ = ""; if ($id_prenota_succ) { $tableprenota_succ = $PHPR_TAB_PRE."prenota".($anno + 1); $tableprenotacanc_succ = $PHPR_TAB_PRE."prenotacanc".($anno + 1); $tablecostiprenota_succ = $PHPR_TAB_PRE."costiprenota".($anno + 1); $tablerclientiprenota_succ = $PHPR_TAB_PRE."rclientiprenota".($anno + 1); } # fine if ($id_prenota_succ) $id_prenota_prec = trova_prenota_prec($anno,$d_id_data_inizio,$PHPR_TAB_PRE,$dati_prenota,$n_dati_prenota_modifica,$pcanc); if ($id_prenota_prec == "SI") $id_prenota_prec = ""; if ($id_prenota_prec) { $id_prenota_succ = $id_prenota; $id_prenota = $id_prenota_prec; $tableprenota_succ = $tableprenota; $tableprenotacanc_succ = $tableprenotacanc; $tablecostiprenota_succ = $tablecostiprenota; $tablerclientiprenota_succ = $tablerclientiprenota; $tableprenota = $PHPR_TAB_PRE."prenota".($anno - 1); $tableprenotacanc = $PHPR_TAB_PRE."prenotacanc".($anno - 1); $tablecostiprenota = $PHPR_TAB_PRE."costiprenota".($anno - 1); $tablerclientiprenota = $PHPR_TAB_PRE."rclientiprenota".($anno - 1); $tablesoldi = $PHPR_TAB_PRE."soldi".($anno - 1); $tablecosti = $PHPR_TAB_PRE."costi".($anno - 1); } # fine if ($id_prenota_prec) if ($id_prenota_succ) { if (strcmp($cassa_pagamenti,"")) { if (defined('C_VERSIONE_ATTUALE') and C_VERSIONE_ATTUALE < 3.00) $tabelle_lock = array($tableprenota,$tableprenota_succ,$tablecostiprenota,$tablecostiprenota_succ,$tablerclientiprenota,$tablerclientiprenota_succ,$tablecosti,$tablesoldi,$tableinterconnessioni); else $tabelle_lock = array($tableprenota,$tableprenota_succ,$tableprenotacanc,$tableprenotacanc_succ,$tablecostiprenota,$tablecostiprenota_succ,$tablerclientiprenota,$tablerclientiprenota_succ,$tablecosti,$tablesoldi,$tableinterconnessioni); } # fine if (strcmp($cassa_pagamenti,"")) else { if (defined('C_VERSIONE_ATTUALE') and C_VERSIONE_ATTUALE < 3.00) $tabelle_lock = array($tableprenota,$tableprenota_succ,$tablecostiprenota,$tablecostiprenota_succ,$tablerclientiprenota,$tablerclientiprenota_succ,$tablesoldi,$tableinterconnessioni); else $tabelle_lock = array($tableprenota,$tableprenota_succ,$tableprenotacanc,$tableprenotacanc_succ,$tablecostiprenota,$tablecostiprenota_succ,$tablerclientiprenota,$tablerclientiprenota_succ,$tablesoldi,$tableinterconnessioni); } # fine else if (strcmp($cassa_pagamenti,"")) } # fine if ($id_prenota_succ) if (!$modo['permanente']) { $nome_ut_canc = esegui_query("select nome_utente from $tableutenti where idutenti = '$id_utente' "); $nome_ut_canc = risul_query($nome_ut_canc,0,'nome_utente'); } # fine if (!$modo['permanente']) } # fine if ($continua_canc != "NO") if ($lock) $tabelle_lock = lock_tabelle($tabelle_lock,$altre_tab_lock); else $tabelle_lock = ""; if (!empty($modo['gia_canc'])) $dati_prenota = esegui_query("select * from $tableprenotacanc where idprenota = '$id_prenota' and idclienti != '0'"); else $dati_prenota = esegui_query("select * from $tableprenota where idprenota = '$id_prenota' and idclienti != '0'"); $num_dati_prenota = numlin_query($dati_prenota); if ($num_dati_prenota == 0 and $continua_canc != "NO") { $testo .= mex("La prenotazione",$pag)." $id_prenota ".mex("era già stata cancellata",$pag)."!<br>"; $continua_canc = "NO"; } # fine if ($num_dati_prenota == 0 and $continua_canc != "NO") if ($continua_canc != "NO") { if (empty($modo['gia_canc'])) { $d_pagato = risul_query($dati_prenota,0,'pagato'); if ($d_pagato != 0) { if ($cancella_pagato and $priv_mod_pagato == "s") { if (is_array($metodo_pagamento)) { $valuta_pagamento = $metodo_pagamento['valuta']; $id_pagamento = $metodo_pagamento['id']; $giorno_pagamento = $metodo_pagamento['giorno']; $mese_pagamento = $metodo_pagamento['mese']; $anno_pagamento = $metodo_pagamento['anno']; $note_pagamento = $metodo_pagamento['note']; $metodo_pagamento = $metodo_pagamento['metodo']; } # fine if (is_array($metodo_pagamento)) if (@get_magic_quotes_gpc()) $metodo_pagamento = (string) stripslashes($metodo_pagamento); $metodo_pagamento = htmlspecialchars($metodo_pagamento); if ($metodo_pagamento != "" or !empty($id_pagamento)) { $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 and !strcmp((string) $metodo_pagamento_imp,"")) $id_pagamento = ""; $metodi_pagamento = explode(",",$metodi_pagamento); $metodo_trovato = "NO"; for ($num1 = 0 ; $num1 < count($metodi_pagamento) ; $num1++) if ($metodi_pagamento[$num1] == $metodo_pagamento) $metodo_trovato = "SI"; if ($metodo_trovato == "NO") $metodo_pagamento = ""; } # fine if ($metodo_pagamento != "" or !empty($id_pagamento)) if (strcmp((string) $metodo_pagamento_imp,"")) $metodo_pagamento = $metodo_pagamento_imp; $metodo_pagamento = aggslashdb($metodo_pagamento); $datainserimento_saldo = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600))); $datatransazione_saldo = $datainserimento_saldo; if (isset($giorno_pagamento) and isset($mese_pagamento) and isset($anno_pagamento)) { if ($giorno_pagamento >= 1 and $giorno_pagamento <= 31 and $mese_pagamento >= 1 and $mese_pagamento <= 12) { $anno_corr = date('Y',(time() + (C_DIFF_ORE * 3600))); if ($anno_pagamento >= ($anno_corr - 2) and $anno_pagamento <= ($anno_corr + 1)) $datatransazione_saldo = date("Y-m-d H:i:s",mktime(0,0,0,(int) $mese_pagamento,(int) $giorno_pagamento,(int) $anno_pagamento)); } # fine if ($giorno_pagamento >= 1 and $giorno_pagamento <= 31 and $mese_pagamento >= 1 and... } # fine if (isset($giorno_pagamento) and isset($mese_pagamento) and isset($anno_pagamento)) $idcliente_saldo = risul_query($dati_prenota,0,'idclienti'); $d_idinizioprenota = risul_query($dati_prenota,0,'iddatainizio'); $d_idfineprenota = risul_query($dati_prenota,0,'iddatafine'); $motivazione_saldo = "$idcliente_saldo;$d_idinizioprenota;$d_idfineprenota;$id_prenota"; $saldo = 0 - $d_pagato; $valuta = ""; if (isset($valuta_pagamento) and strcmp((string) $valuta_pagamento,"")) { if (!isset($altre_valute)) $altre_valute = altre_valute(); $valuta_pag = fixset($altre_valute['id'][$valuta_pagamento]); if (strcmp((string) $valuta_pag,"")) { $valuta = $valuta_pagamento.">".$altre_valute[$valuta_pag]['cambio'].">".$altre_valute[$valuta_pag]['arrotond']; $saldo_valuta = converti_valuta($saldo,$altre_valute[$valuta_pag]['cambio'],$altre_valute[$valuta_pag]['arrotond']); } # fine else if (strcmp((string) $valuta_pag,"")) } # fine if (isset($valuta_pagamento) and strcmp((string) $valuta_pagamento,"")) $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_transazione,data_inserimento,utente_inserimento) values ('$idsoldi','$motivazione_saldo','$metodo_pagamento','$saldo','$d_pagato','$datatransazione_saldo','$datainserimento_saldo','$id_utente')"); if (!$modo['permanente']) esegui_query("update $tableprenota set pagato = '0' where idprenota = '$id_prenota' "); if ($valuta) esegui_query("update $tablesoldi set valuta = '".aggslashdb($valuta)."', saldo_valuta = '".aggslashdb($saldo_valuta)."' where idsoldi = '$idsoldi' "); if (!empty($id_pagamento)) esegui_query("update $tablesoldi set id_pagamento = '".aggslashdb(htmlspecialchars($id_pagamento))."' where idsoldi = '$idsoldi' "); if (!empty($note_pagamento)) esegui_query("update $tablesoldi set note = '".aggslashdb(htmlspecialchars($note_pagamento))."' where idsoldi = '$idsoldi' "); if (strcmp($cassa_pagamenti,"")) { 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 (!$d_idinizioprenota) $data_inizio_costo = "?"; else { $data_inizio_costo = esegui_query("select datainizio from $tableperiodi where idperiodi = '$d_idinizioprenota' "); $data_inizio_costo = formatta_data(risul_query($data_inizio_costo,0,'datainizio'),$stile_data); } # fine else if (!$d_idinizioprenota) $data_fine_costo = esegui_query("select datafine from $tableperiodi where idperiodi = '$d_idfineprenota' "); $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"; if (!empty($note_pagamento)) $nome_costo .= " - ".htmlspecialchars($note_pagamento); $idcosti = esegui_query("select max(idcosti) from $tablecosti"); $idcosti = risul_query($idcosti,0,0) + 1; if ($cassa_pagamenti == "#1#") $nome_cassa = ""; else $nome_cassa = $cassa_pagamenti; global $nome_utente,$HOSTNAME; esegui_query("insert into $tablecosti (idcosti,nome_costo,val_costo,tipo_costo,nome_cassa,persona_costo,provenienza_costo,metodo_pagamento,data_transazione,datainserimento,hostinserimento,utente_inserimento) values ('$idcosti','".aggslashdb($nome_costo)."','$saldo','e','".aggslashdb($nome_cassa)."','".aggslashdb(htmlspecialchars(fixstr($nome_utente)))."','p','$metodo_pagamento','$datatransazione_saldo','$datainserimento_saldo','".aggslashdb(htmlspecialchars(fixstr($HOSTNAME)))."','$id_utente') "); if ($valuta) esegui_query("update $tablecosti set valuta = '".aggslashdb($valuta)."', costo_valuta = '".aggslashdb($saldo_valuta)."' where idcosti = '$idcosti' "); if (!empty($id_pagamento)) esegui_query("update $tablecosti set id_pagamento = '".aggslashdb(htmlspecialchars($id_pagamento))."' where idcosti = '$idcosti' "); } # fine if (strcmp($cassa_pagamenti,"")) } # fine if ($cancella_pagato and $priv_mod_pagato == "s") else { $soldi_prenota_cancellate = esegui_query("select * from $tablesoldi where idsoldi = 1"); $soldi_prenota_cancellate = risul_query($soldi_prenota_cancellate,0,'soldi_prima'); $soldi_prenota_cancellate = $soldi_prenota_cancellate + $d_pagato; esegui_query("update $tablesoldi set soldi_prima = '$soldi_prenota_cancellate' where idsoldi = 1"); } # fine else if ($cancella_pagato and $priv_mod_pagato == "s") } # fine if ($d_pagato != 0) $d_prenota_comp = aggslashdb(risul_query($dati_prenota,0,'idprenota_compagna')); if ($d_prenota_comp) { $d_prenota_comp_vett = explode(",",$d_prenota_comp); for ($num1 = 0 ; $num1 < count($d_prenota_comp_vett) ; $num1++) { $idprenota_compagna = substr(str_replace(",".$d_prenota_comp_vett[$num1].",",",",",$d_prenota_comp,"),1,-1); esegui_query("update $tableprenota set idprenota_compagna = '$idprenota_compagna' where idprenota = '".$d_prenota_comp_vett[$num1]."' "); } # fine for $num1 if (!$modo['permanente']) esegui_query("update $tableprenota set idprenota_compagna = '' where idprenota = '$id_prenota' "); } # fine if ($d_prenota_comp) } # fine if (empty($modo['gia_canc'])) if ($modo['permanente']) { esegui_query("delete from $tablecostiprenota where idprenota = '$id_prenota'"); esegui_query("delete from $tablerclientiprenota where idprenota = '$id_prenota'"); } # fine if ($modo['permanente']) else { esegui_query("insert into $tableprenotacanc select * from $tableprenota where idprenota = '$id_prenota' "); $d_commento = (string) risul_query($dati_prenota,0,'commento'); $tipo_commento = "hd_del_res"; $n_commento = "$nome_ut_canc|".date("Y-m-d H:i",(time() + (C_DIFF_ORE * 3600))); if (strstr($d_commento,">")) $n_commento = $d_commento.">".$tipo_commento."<".$n_commento; else $n_commento = $d_commento.">>>".$tipo_commento."<".$n_commento; esegui_query("update $tableprenotacanc set commento = '".aggslashdb($n_commento)."' where idprenota = '$id_prenota' "); } # fine else if ($modo['permanente']) if (!empty($modo['gia_canc'])) esegui_query("delete from $tableprenotacanc where idprenota = '$id_prenota'"); else esegui_query("delete from $tableprenota where idprenota = '$id_prenota'"); if ($id_prenota_succ) { if ($modo['permanente']) { esegui_query("delete from $tablecostiprenota_succ where idprenota = '$id_prenota_succ'"); esegui_query("delete from $tablerclientiprenota_succ where idprenota = '$id_prenota_succ'"); } # fine if ($modo['permanente']) else esegui_query("insert into $tableprenotacanc_succ select * from $tableprenota_succ where idprenota = '$id_prenota_succ' "); if ($modo['gia_canc']) esegui_query("delete from $tableprenotacanc_succ where idprenota = '$id_prenota'"); else esegui_query("delete from $tableprenota_succ where idprenota = '$id_prenota_succ'"); if (!$modo['gia_canc']) { if ($d_id_data_inizio == 0 and $id_prenota_prec) { esegui_query("delete from $tableinterconnessioni where idlocale = '$id_prenota' and tipoid = 'prenota' and anno = '".($anno - 1)."' "); esegui_query("delete from $tableinterconnessioni where idlocale = '$id_prenota_succ' and tipoid = 'prenota' and anno = '$anno' "); $id_prenota = $id_prenota_succ; } # fine if ($d_id_data_inizio == 0 and $id_prenota_prec) else { esegui_query("delete from $tableinterconnessioni where idlocale = '$id_prenota' and (tipoid = 'prenota' or tipoid = 'conferma') and anno = '$anno' "); esegui_query("delete from $tableinterconnessioni where idlocale = '$id_prenota_succ' and tipoid = 'prenota' and anno = '".($anno + 1)."' "); } # fine else if ($d_id_data_inizio == 0 and $id_prenota_prec) } # fine if (!$modo['gia_canc']) } # fine if ($id_prenota_succ) elseif (empty($modo['gia_canc'])) esegui_query("delete from $tableinterconnessioni where idlocale = '$id_prenota' and tipoid = 'prenota' and anno = '$anno' "); if ($dettagli_prenota) { $cognome_cliente = risul_query($dati_prenota,0,'idclienti'); $cognome_cliente = esegui_query("select cognome from $tableclienti where idclienti = '$cognome_cliente' "); $cognome_cliente = risul_query($cognome_cliente,0,'cognome'); $data_inizio = risul_query($dati_prenota,0,'iddatainizio'); $data_fine = risul_query($dati_prenota,0,'iddatafine'); $data_inizio = esegui_query("select datainizio from $tableperiodi where idperiodi = '$data_inizio' "); $data_fine = esegui_query("select datafine from $tableperiodi where idperiodi = '$data_fine' "); if (numlin_query($data_inizio)) $data_inizio = risul_query($data_inizio,0,'datainizio'); else $data_inizio = ""; if (numlin_query($data_fine)) $data_fine = risul_query($data_fine,0,'datafine'); else $data_fine = ""; $data_inizio = formatta_data($data_inizio,$stile_data); $data_fine = formatta_data($data_fine,$stile_data); $testo .= mex("Prenotazione",$pag)." $id_prenota ".mex("a nome di",$pag)." <b>$cognome_cliente</b> ".mex("dal",$pag)." $data_inizio ".mex("al",$pag)." $data_fine <em>".mex("cancellata",$pag)."</em>"; } # fine if ($dettagli_prenota) else $testo .= mex("Prenotazione",$pag)." $id_prenota ".mex("cancellata",$pag); if ($modo['permanente']) $testo .= " ".mex("in modo permanente",$pag); $testo .= "!<br>"; } # fine if ($continua_canc != "NO") $stato_canc = $continua_canc; if ($tabelle_lock) unlock_tabelle($tabelle_lock); return $testo; } # fine function cancella_prenotazione function controlla_id_prenota(&$id_prenota,&$id_prenota_idpr,&$num_id_prenota,&$id_prenota_int,&$priv_mod_prenotazioni,$anno,$PHPR_TAB_PRE,$pcanc="") { global $priv_mod_prenota_comp,$priv_mod_prenota_iniziate,$priv_mod_prenota_ore,$priv_mod_pagato,$id_utente,$utenti_gruppi,$idprenota_origine,$anno_origine; $tableprenota = $PHPR_TAB_PRE."prenota".$pcanc.$anno; $tablesoldi = $PHPR_TAB_PRE."soldi".$anno; $id_prenota = aggslashdb(htmlspecialchars($id_prenota)); $id_prenota_int = $id_prenota; $id_prenota_idpr = array(); $id_prenota_idpr[0] = $id_prenota; $num_id_prenota = 1; if (str_replace(",","",$id_prenota) != $id_prenota) { $id_prenota_idpr = explode(",",$id_prenota); $num_id_prenota = count($id_prenota_idpr); $priv_mod_prenota_comp = "n"; } # fine if (str_replace(",","",$id_prenota) != $id_prenota) if ($idprenota_origine) $anno_origine = $anno + 1; else $anno_origine = $anno; if ($priv_mod_prenota_iniziate != "s") $id_periodo_corrente = calcola_id_periodo_corrente($anno); for ($num_idpr = 0 ; $num_idpr < $num_id_prenota ; $num_idpr++) { $id_prenota = $id_prenota_idpr[$num_idpr]; if ($priv_mod_prenotazioni == "p" or $priv_mod_prenotazioni == "g") { $utente_inserimento = esegui_query("select utente_inserimento from $tableprenota where idprenota = '$id_prenota'"); if (numlin_query($utente_inserimento) == 1) $utente_inserimento = risul_query($utente_inserimento,0,'utente_inserimento'); else $utente_inserimento = "NO"; if ($priv_mod_prenotazioni == "p" and $utente_inserimento != $id_utente) $priv_mod_prenotazioni = "n"; if ($priv_mod_prenotazioni == "g" and !$utenti_gruppi[$utente_inserimento]) $priv_mod_prenotazioni = "n"; } # fine if ($priv_mod_prenotazioni == "p" or $priv_mod_prenotazioni == "g") $d_prenota = esegui_query("select iddatainizio,datainserimento from $tableprenota where idprenota = '$id_prenota'"); if (!numlin_query($d_prenota) or controlla_num($id_prenota) != "SI") $priv_mod_prenotazioni = "n"; else { if ($priv_mod_prenota_iniziate != "s") { $id_inizio_prenota = risul_query($d_prenota,0,'iddatainizio'); if ($id_periodo_corrente >= $id_inizio_prenota) $priv_mod_prenotazioni = "n"; } # fine if ($priv_mod_prenota_iniziate != "s") if ($priv_mod_prenota_ore != "000") { $adesso = date("YmdHis",(time() + (C_DIFF_ORE * 3600))); $data_ins = risul_query($d_prenota,0,'datainserimento'); $limite = date("YmdHis",mktime((substr($data_ins,11,2) + (int) $priv_mod_prenota_ore),substr($data_ins,14,2),substr($data_ins,17,2),substr($data_ins,5,2),substr($data_ins,8,2),substr($data_ins,0,4))); if ($adesso > $limite) $priv_mod_prenotazioni = "n"; } # fine if ($priv_mod_prenota_ore != "000") } # fine else if (!numlin_query($d_prenota)) } # fine for $num_idpr if ($priv_mod_pagato == "s" and defined("C_MASSIMO_NUM_STORIA_SOLDI") and C_MASSIMO_NUM_STORIA_SOLDI != 0) { $num_soldi_esistenti = esegui_query("select idsoldi from $tablesoldi"); $num_soldi_esistenti = numlin_query($num_soldi_esistenti); if ($num_soldi_esistenti >= (C_MASSIMO_NUM_STORIA_SOLDI + 1)) $priv_mod_pagato = "c"; } # fine if ($priv_mod_pagato == "s" and defined("C_MASSIMO_NUM_STORIA_SOLDI") and C_MASSIMO_NUM_STORIA_SOLDI != 0) } # fine function controlla_id_prenota function prepara_modifiche_prenotazione ($id_prenota_idpr,$num_id_prenota,&$prenota_in_anno_succ,&$dati_da_anno_prec,&$tra_anni,$anno,$PHPR_TAB_PRE,$pcanc) { global $d_id_utente_inserimento_idpr,$d_id_clienti_idpr,$d_id_data_inizio_idpr,$d_id_data_fine_idpr,$d_appartamento_idpr,$d_assegnazione_app_idpr,$d_app_assegnabili_idpr,$d_nome_tipotariffa_idpr,$d_app_eliminati_costi_idpr,$d_sconto_idpr,$d_caparra_idpr,$d_valuta_caparra_idpr,$d_cambio_caparra_idpr,$d_arrotond_caparra_idpr,$d_met_paga_caparra_idpr,$d_commissioni_idpr,$d_num_persone_idpr,$d_nome_tariffa_idpr,$d_costo_tariffa_idpr,$d_molt_tariffa_idpr,$d_tariffesettimanali_idpr,$d_costo_agg_tot_idpr,$d_prezzo_costo_agg_idpr,$d_costo_tot_idpr; global $d_commento,$d_prenota_comp_idpr,$dati_tariffe,$dati_cat_pers,$dati_ca,$dati_prenota_modifica,$id_prenota_orig,$tableperiodi_orig,$tableprenota_orig,$tablecostiprenota_orig,$tableperiodi_prec,$tableprenota_prec,$tablecostiprenota_prec,$fineperiodo_orig,$stile_data,$d_data_inizio_f,$d_data_fine_f,$n_host_inserimento_idpr,$id_utente,$lingua_mex,$d_cat_persone_idpr,$d_checkin_idpr,$d_checkout_idpr,$d_pagato_idpr,$d_confermato_idpr,$id_prenota_prec,$d_valuta_tariffa_idpr,$d_cambio_tariffa_idpr,$d_arrotond_tariffa_idpr; if (!function_exists('dati_tariffe')) include("./includes/funzioni_tariffe.php"); if (!function_exists('dati_costi_agg_ntariffe')) include("./includes/funzioni_costi_agg.php"); $tablenometariffe = $PHPR_TAB_PRE."ntariffe".$anno; $tableprenota = $PHPR_TAB_PRE."prenota".$pcanc.$anno; $tableperiodi = $PHPR_TAB_PRE."periodi".$anno; $tableregole = $PHPR_TAB_PRE."regole".$anno; $tableappartamenti = $PHPR_TAB_PRE."appartamenti"; $tableclienti = $PHPR_TAB_PRE."clienti"; $tablecostiprenota = $PHPR_TAB_PRE."costiprenota".$anno; $tablepersonalizza = $PHPR_TAB_PRE."personalizza"; $d_id_utente_inserimento_idpr = array(); $d_id_clienti_idpr = array(); $d_id_data_inizio_idpr = array(); $d_id_data_fine_idpr = array(); $d_appartamento_idpr = array(); $d_assegnazione_app_idpr = array(); $d_app_assegnabili_idpr = array(); $d_nome_tipotariffa_idpr = array(); $d_costo_tariffa_idpr = array(); $d_molt_tariffa_idpr = array(); $d_app_eliminati_costi_idpr = array(); $d_sconto_idpr = array(); $d_caparra_idpr = array(); $d_valuta_tariffa_idpr = array(); $d_cambio_tariffa_idpr = array(); $d_arrotond_tariffa_idpr = array(); $d_valuta_caparra_idpr = array(); $d_cambio_caparra_idpr = array(); $d_arrotond_caparra_idpr = array(); $d_met_paga_caparra_idpr = array(); $d_commissioni_idpr = array(); $d_num_persone_idpr = array(); $d_cat_persone_idpr = array(); $d_nome_tariffa_idpr = array(); $d_tariffesettimanali_idpr = array(); $d_costo_agg_tot_idpr = array(); $d_prezzo_costo_agg_idpr = array(); $d_costo_tot_idpr = array(); $d_pagato_idpr = array(); $d_confermato_idpr = array(); $d_checkin_idpr = array(); $d_checkout_idpr = array(); $d_prenota_comp_idpr = array(); $n_host_inserimento_idpr = array(); $dati_tariffe = dati_tariffe($tablenometariffe,"",$tablepersonalizza,$tableregole); $dati_cat_pers = dati_cat_pers($id_utente,$tablepersonalizza,$lingua_mex,"v",1,1); $dati_ca = dati_costi_agg_ntariffe($tablenometariffe,$dati_tariffe['num'],"NO","",$tableappartamenti,$dati_cat_pers); $dati_prenota_modifica = esegui_query("select * from $tableprenota where idprenota = '".$id_prenota_idpr[0]."' and idclienti != '0'"); $d_id_data_inizio0 = risul_query($dati_prenota_modifica,0,'iddatainizio'); if ($d_id_data_inizio0 == 0) { $d_data_inizio_f = "<"; $d_id_data_inizio = 1; } # fine if ($d_id_data_inizio0 == 0) else { $d_data_inizio_f = ""; $d_id_data_inizio = $d_id_data_inizio0; } # fine if ($d_id_data_inizio0 == 0) $d_data_inizio = esegui_query("select datainizio from $tableperiodi where idperiodi = '$d_id_data_inizio' "); $d_data_inizio = risul_query($d_data_inizio,0,'datainizio'); $d_data_inizio_f .= formatta_data($d_data_inizio,$stile_data); $d_id_data_fine0 = risul_query($dati_prenota_modifica,0,'iddatafine'); $d_data_fine = esegui_query("select datafine from $tableperiodi where idperiodi = '$d_id_data_fine0' "); $d_data_fine = risul_query($d_data_fine,0,'datafine'); $d_data_fine_f = formatta_data($d_data_fine,$stile_data); for ($num_idpr = 0 ; $num_idpr < $num_id_prenota ; $num_idpr++) { $id_prenota = $id_prenota_idpr[$num_idpr]; global ${"dati_cap".$id_prenota}; if ($num_idpr > 0) $dati_prenota_modifica = esegui_query("select * from $tableprenota where idprenota = '$id_prenota' and idclienti != '0'"); $d_id_utente_inserimento_idpr[$id_prenota] = risul_query($dati_prenota_modifica,0,'utente_inserimento'); $d_id_clienti_idpr[$id_prenota] = risul_query($dati_prenota_modifica,0,'idclienti'); $d_id_data_inizio = risul_query($dati_prenota_modifica,0,'iddatainizio'); $d_id_data_inizio_idpr[$id_prenota] = $d_id_data_inizio; if ($d_id_data_inizio != $d_id_data_inizio0) $d_data_inizio_f = "~~~~"; $d_id_data_fine = risul_query($dati_prenota_modifica,0,'iddatafine'); $d_id_data_fine_idpr[$id_prenota] = $d_id_data_fine; if ($d_id_data_fine != $d_id_data_fine0) $d_data_fine_f = "~~~~"; $d_appartamento = risul_query($dati_prenota_modifica,0,'idappartamenti'); $d_appartamento_idpr[$id_prenota] = $d_appartamento; $d_assegnazione_app = risul_query($dati_prenota_modifica,0,'assegnazioneapp'); $d_assegnazione_app_idpr[$id_prenota] = $d_assegnazione_app; $d_app_assegnabili = risul_query($dati_prenota_modifica,0,'app_assegnabili'); $d_app_assegnabili_idpr[$id_prenota] = $d_app_assegnabili; $tra_anni = ""; $prenota_in_anno_succ = trova_prenota_succ($anno,$d_id_data_fine,$PHPR_TAB_PRE,$id_prenota,$fineperiodo_orig); if ($prenota_in_anno_succ) { $tra_anni = $anno; $tableperiodi_orig = $PHPR_TAB_PRE."periodi".($anno + 1); $tableprenota_orig = $PHPR_TAB_PRE."prenota".($anno + 1); $tablecostiprenota_orig = $PHPR_TAB_PRE."costiprenota".($anno + 1); $tableperiodi_prec = $tableperiodi; $tableprenota_prec = $tableprenota; $tablecostiprenota_prec = $tablecostiprenota; if ($prenota_in_anno_succ != "soloanno") $id_prenota_orig = $prenota_in_anno_succ; else $prenota_in_anno_succ = ""; } # fine if ($prenota_in_anno_succ) $dati_da_anno_prec = "NO"; if ($num_id_prenota == 1) $id_prenota_prec = trova_prenota_prec($anno,$d_id_data_inizio,$PHPR_TAB_PRE,$dati_prenota_modifica,$n_dati_prenota_modifica); else $id_prenota_prec = ""; if ($id_prenota_prec == "SI") $id_prenota_prec = ""; if ($id_prenota_prec) { $dati_da_anno_prec = "SI"; $tra_anni = $anno - 1; $dati_prenota_modifica = $n_dati_prenota_modifica; $id_prenota_orig = $id_prenota; $tableperiodi_orig = $tableperiodi; $tableprenota_orig = $tableprenota; $tablecostiprenota_orig = $tablecostiprenota; $tableperiodi_prec = $PHPR_TAB_PRE."periodi".($anno - 1); $tableprenota_prec = $PHPR_TAB_PRE."prenota".($anno - 1); $tablecostiprenota_prec = $PHPR_TAB_PRE."costiprenota".($anno - 1); $dati_tariffe = dati_tariffe($PHPR_TAB_PRE."ntariffe".($anno - 1),"","",$PHPR_TAB_PRE."regole".($anno - 1)); $dati_ca = dati_costi_agg_ntariffe($PHPR_TAB_PRE."ntariffe".($anno - 1),$dati_tariffe['num'],"NO","",$tableappartamenti); $dati_cap = dati_costi_agg_prenota($tablecostiprenota_prec,$id_prenota_prec,$dati_cat_pers); ${"dati_cap".$id_prenota} = $dati_cap; function 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) { global $id_prenota_prec,$tableperiodi_prec,$tableprenota_prec,$tablecostiprenota_prec,$d_id_data_inizio_orig,$d_id_data_fine_orig,$n_fineperiodo_orig,$inizioperiodo_orig,$fineperiodo_orig; $id_prenota = $id_prenota_prec; $tableperiodi = $tableperiodi_prec; $tableprenota = $tableprenota_prec; $tablecostiprenota = $tablecostiprenota_prec; $d_id_data_inizio_orig = $d_id_data_inizio; $d_id_data_fine_orig = $d_id_data_fine; $n_fineperiodo_orig = $n_fineperiodo; $inizioperiodo_orig = $inizioperiodo; $fineperiodo_orig = $fineperiodo; $d_id_data_inizio = risul_query($dati_prenota_modifica,0,'iddatainizio'); $inizioperiodo = $d_id_data_inizio; if ($n_fineperiodo) $diff_fineperiodo = $n_fineperiodo - $d_id_data_fine; $d_id_data_fine = risul_query($dati_prenota_modifica,0,'iddatafine'); if ($n_fineperiodo) { $n_fineperiodo = $d_id_data_fine + $diff_fineperiodo; $fineperiodo = $n_fineperiodo; } # fine if ($n_fineperiodo) else $fineperiodo = $d_id_data_fine; $lunghezza_periodo = $fineperiodo - $inizioperiodo + 1; } # fine function passa_var_a_anno_prec function passa_var_a_anno_corr (&$id_prenota,&$tableperiodi,&$tableprenota,&$tablecostiprenota,&$d_id_data_inizio,&$d_id_data_fine,&$n_fineperiodo,&$inizioperiodo,&$fineperiodo,&$lunghezza_periodo) { global $id_prenota_orig,$tableperiodi_orig,$tableprenota_orig,$tablecostiprenota_orig,$d_id_data_inizio_orig,$d_id_data_fine_orig,$n_fineperiodo_orig,$inizioperiodo_orig,$fineperiodo_orig; $id_prenota = $id_prenota_orig; $tableperiodi = $tableperiodi_orig; $tableprenota = $tableprenota_orig; $tablecostiprenota = $tablecostiprenota_orig; $d_id_data_inizio = $d_id_data_inizio_orig; $d_id_data_fine = $d_id_data_fine_orig; $n_fineperiodo = $n_fineperiodo_orig; $inizioperiodo = $inizioperiodo_orig; $fineperiodo = $fineperiodo_orig; $lunghezza_periodo = $fineperiodo - $inizioperiodo + 1; } # fine function passa_var_a_anno_corr } # fine if ($id_prenota_prec) $d_tariffa = risul_query($dati_prenota_modifica,0,'tariffa'); $d_tariffa = explode("#@&",$d_tariffa); $d_nome_tariffa = $d_tariffa[0]; $d_nome_tariffa_idpr[$id_prenota] = $d_nome_tariffa; $d_costo_tariffa = (double) $d_tariffa[1]; $d_costo_tariffa_idpr[$id_prenota] = $d_costo_tariffa; $d_molt_tariffa = fixset($d_tariffa[2]); $d_molt_tariffa_idpr[$id_prenota] = $d_molt_tariffa; if ($dati_da_anno_prec != "SI") { $dati_cap = dati_costi_agg_prenota($tablecostiprenota,$id_prenota,$dati_cat_pers); ${"dati_cap".$id_prenota} = $dati_cap; } # fine if ($dati_da_anno_prec != "SI") $d_nome_tipotariffa = ""; for ($numtariffa = 1 ; $numtariffa <= $dati_tariffe['num'] ; $numtariffa++) { $nometariffa = $dati_tariffe["tariffa$numtariffa"]['nome']; if ($d_nome_tariffa == $nometariffa or $d_nome_tariffa == "tariffa".$numtariffa) { $d_nome_tipotariffa = "tariffa".$numtariffa; } # fine if ($d_nome_tariffa == $nometariffa or $d_nome_tariffa == "tariffa".$numtariffa } # fine for $numtariffa $d_nome_tipotariffa_idpr[$id_prenota] = $d_nome_tipotariffa; $d_app_eliminati_costi = risul_query($dati_prenota_modifica,0,'incompatibilita'); $d_app_eliminati_costi_idpr[$id_prenota] = $d_app_eliminati_costi; $d_sconto = (double) risul_query($dati_prenota_modifica,0,'sconto'); if (!$d_sconto) $d_sconto = (double) 0; $d_sconto_idpr[$id_prenota] = $d_sconto; $d_commento = risul_query($dati_prenota_modifica,0,'commento'); $d_caparra = risul_query($dati_prenota_modifica,0,'caparra'); $d_caparra_idpr[$id_prenota] = $d_caparra; $d_valuta_tariffa = risul_query($dati_prenota_modifica,0,'valuta'); if ($d_valuta_tariffa) { $d_valuta_tariffa = explode(">",$d_valuta_tariffa); $d_valuta_caparra = explode("<",$d_valuta_tariffa[1]); $d_valuta_tariffa = explode("<",$d_valuta_tariffa[0]); $d_valuta_tariffa_idpr[$id_prenota] = $d_valuta_tariffa[0]; $d_cambio_tariffa_idpr[$id_prenota] = $d_valuta_tariffa[1]; $d_arrotond_tariffa_idpr[$id_prenota] = $d_valuta_tariffa[2]; $d_valuta_caparra_idpr[$id_prenota] = $d_valuta_caparra[0]; $d_cambio_caparra_idpr[$id_prenota] = $d_valuta_caparra[1]; $d_arrotond_caparra_idpr[$id_prenota] = $d_valuta_caparra[2]; } # fine if ($d_valuta_tariffa) else { $d_valuta_tariffa = array(); $d_valuta_caparra = array(); $d_valuta_tariffa_idpr[$id_prenota] = ""; $d_cambio_tariffa_idpr[$id_prenota] = ""; $d_arrotond_tariffa_idpr[$id_prenota] = ""; $d_valuta_caparra_idpr[$id_prenota] = ""; $d_cambio_caparra_idpr[$id_prenota] = ""; $d_arrotond_caparra_idpr[$id_prenota] = ""; } # fine else if ($d_valuta_tariffa) $d_met_paga_caparra = risul_query($dati_prenota_modifica,0,'metodo_pagamento'); $d_met_paga_caparra_idpr[$id_prenota] = $d_met_paga_caparra; $d_commissioni = risul_query($dati_prenota_modifica,0,'commissioni'); $d_commissioni_idpr[$id_prenota] = $d_commissioni; $d_origine_prenota = risul_query($dati_prenota_modifica,0,'origine'); $d_num_persone = risul_query($dati_prenota_modifica,0,'num_persone'); $d_num_persone_idpr[$id_prenota] = $d_num_persone; if (!$d_num_persone) $d_num_persone = 0; $d_cat_persone = dati_cat_pers_p($dati_prenota_modifica,0,$dati_cat_pers,$d_num_persone); $d_cat_persone_idpr[$id_prenota] = $d_cat_persone; $d_tariffesettimanali = risul_query($dati_prenota_modifica,0,'tariffesettimanali'); $d_tariffesettimanali_idpr[$id_prenota] = $d_tariffesettimanali; $d_costo_agg_tot = (double) 0; $costo_escludi_perc = (double) 0; $d_prezzo_costo_agg = array(); 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); for ($numca = 0 ; $numca < $dati_cap['num'] ; $numca++) { $d_prezzo_costo_agg[$numca] = (double) calcola_prezzo_totale_costo($dati_cap,$numca,$d_id_data_inizio,$d_id_data_fine,$dati_cap[$numca]['settimane'],$dati_cap[$numca]['moltiplica_costo'],$d_costo_tariffa,$d_tariffesettimanali,($d_costo_tariffa + $d_costo_agg_tot - $d_sconto),$d_caparra,$d_num_persone,fixset($dati_cap[$numca]['cat_pers']),0,$costo_escludi_perc); $d_costo_agg_tot = (double) $d_costo_agg_tot + $d_prezzo_costo_agg[$numca]; if ($dati_cap[$numca]['escludi_tot_perc'] == "s") $costo_escludi_perc = (double) $costo_escludi_perc + $d_prezzo_costo_agg[$numca]; } # fine for $numca $d_costo_agg_tot_idpr[$id_prenota] = $d_costo_agg_tot; $d_prezzo_costo_agg_idpr[$id_prenota] = $d_prezzo_costo_agg; 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); $d_costo_tot = $d_costo_tariffa + $d_costo_agg_tot - $d_sconto; $d_costo_tot_idpr[$id_prenota] = $d_costo_tot; $d_pagato = risul_query($dati_prenota_modifica,0,'pagato'); if (!$d_pagato) $d_pagato = 0; $d_pagato_idpr[$id_prenota] = $d_pagato; $d_conferma = risul_query($dati_prenota_modifica,0,'conferma'); $d_confermato_idpr[$id_prenota] = substr($d_conferma,0,1); $d_checkin = risul_query($dati_prenota_modifica,0,'checkin'); $d_checkin_idpr[$id_prenota] = $d_checkin; $d_checkout = risul_query($dati_prenota_modifica,0,'checkout'); $d_checkout_idpr[$id_prenota] = $d_checkout; $d_prenota_comp = risul_query($dati_prenota_modifica,0,'idprenota_compagna'); $d_prenota_comp_idpr[$id_prenota] = $d_prenota_comp; $n_host_inserimento_idpr[$id_prenota] = risul_query($dati_prenota_modifica,0,'hostinserimento'); } # fine for $num_idpr } # fine function prepara_modifiche_prenotazione 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_valuta_caparra,$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,$pcanc) { 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_commenti_pers,$priv_mod_sconto,$priv_mod_caparra,$priv_mod_pagato,$priv_mod_orig_prenota,$d_commento,$cassa_pagamenti,$nome_utente; global $dati_ca,$dati_cat_pers,$d_cat_persone_idpr,$d_id_utente_inserimento_idpr,$d_appartamento_idpr,$d_id_data_inizio_idpr,$d_id_data_fine_idpr,$d_nome_tariffa_idpr,$d_app_eliminati_costi_idpr,$d_checkin_idpr,$d_checkout_idpr,$d_prenota_comp_idpr,$fineperiodo_orig,$comm_pers_presenti,$d_caparra_idpr,$d_pagato_idpr,$HOSTNAME; global $id_prenota_orig,$tableperiodi_orig,$tableprenota_orig,$tablecostiprenota_orig,$tableperiodi_prec,$tableprenota_prec,$tablecostiprenota_prec,$stile_data,$tipo_n_app,$priv_mod_utente_ins,$utenti_gruppi,$dati_prenota_modifica,$d_valuta_caparra_idpr,$d_cambio_caparra_idpr,$d_arrotond_caparra_idpr,$d_valuta_tariffa_idpr,$d_cambio_tariffa_idpr,$d_arrotond_tariffa_idpr; $pag = "modifica_prenota.php"; $tablenometariffe = $PHPR_TAB_PRE."ntariffe".$anno; $tableprenota = $PHPR_TAB_PRE."prenota".$pcanc.$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_DATI_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 (isset($ic_present[$interconnection_name]) and $ic_present[$interconnection_name] == "SI") { include("./includes/interconnect/$mod_ext/functions_import.php"); $funz_import_reservations = "import_reservations_".$interconnection_func_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 (isset($ic_present[$interconnection_name]) and $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); } # fine if ($dati_da_anno_prec == "SI" or $prenota_in_anno_succ) 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((string) $n_appartamento_idpr[$id_prenota],"")) $n_assegnazioneapp_idpr[$id_prenota] = "k"; $n_sconto = explode("#>&",$n_sconto_caparra_idpr[$id_prenota]); if (strcmp((string) $n_sconto[1],"")) $n_caparra = (double) $n_sconto[1]; else $n_caparra = ""; if (strcmp((string) $n_sconto[2],"")) $n_commissioni = (double) $n_sconto[2]; else $n_commissioni = ""; $n_valuta_tariffa = $n_sconto[3]; if (strcmp((string) $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')); $cat_persone_idpr = unserialize(risul_query($dati_transazione,0,'dati_transazione21')); 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'); if ($spostamenti) $spostamenti = explode(",",$spostamenti); else $spostamenti = array(); } # fine if ($tableprenota_da_aggiornare) unset($dati_prenota_idpr); unset($beniinv_presenti); unset($num_ripetizioni_costo_mod_idpr); unset($cambia_cat_pers_ca_mod_idpr); unset($num_ripetizioni_costo_ins_idpr); unset($cambia_cat_pers_ca_ins_idpr); unset($n_tipotariffa_idpr); unset($cambio_pagamento_idpr); unset($arrotond_pagamento_idpr); unset($altre_valute); $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_valuta_caparra = stripslashes($n_valuta_caparra); } # fine if (@get_magic_quotes_gpc()) #$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]; $d_id_data_fine = $d_id_data_fine_idpr[$id_prenota]; $d_cat_persone = $d_cat_persone_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]; $cat_persone = $cat_persone_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},${"valuta_pagamento".$id_prenota},${"id_pagamento".$id_prenota},${"giorno_pagamento".$id_prenota},${"mese_pagamento".$id_prenota},${"anno_pagamento".$id_prenota},${"note_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"; } # fine if ($num_dati_prenota == 0) 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 (strcmp((string) $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 ($tipo_n_app == "aggiungi" and strcmp((string) $n_appartamento,"") and $assegnazioneapp == "k") { $n_assegnazioneapp = "c"; $assegnazioneapp = "c"; $n_lista_app = risul_query($dati_prenota_idpr[$id_prenota],0,'app_assegnabili'); if (!strstr(",$n_lista_app,",",$n_appartamento,")) { if (!strcmp((string) $n_lista_app,"")) $n_lista_app = risul_query($dati_prenota_idpr[$id_prenota],0,'idappartamenti'); $n_lista_app .= ",$n_appartamento"; } # fine if (!strstr(",$n_lista_app,",",$n_appartamento,")) $n_assegnazioneapp_idpr[$id_prenota] = $n_assegnazioneapp; $n_lista_app_idpr[$id_prenota] = $n_lista_app; } # fine if ($tipo_n_app == "aggiungi" and strcmp((string) $n_appartamento,"" and $n_assegnazioneapp == "k") 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"; } # fine if (numlin_query($id_stima_checkin) == 1) 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) if (strcmp((string) $n_appartamento,"")) { $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"; } # fine if (strcmp((string) $n_appartamento,"")) if ($assegnazioneapp == "c" and str_replace(",".$appartamento.",","",",".$lista_app.",") == ",".$lista_app."," and (strcmp((string) $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((string) $esistetariffa,"") or $esistetariffa < 0) and (!strcmp((string) $esistetariffap,"") or $esistetariffap < 0)) $inserire = "NO"; if ($n_nometipotariffa != $d_nome_tariffa_idpr[$id_prenota] and !empty($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 ($dati_cat_pers['num']) { $numpersone_cat_pers = 0; $osp_princ_trovato = 0; $cat_persone['int'] = ""; for ($num2 = 0 ; $num2 < $cat_persone['num'] ; $num2++) { if ($cat_persone[$num2]['molt']) { if (controlla_num_pos($cat_persone[$num2]['molt']) == "NO") $inserire = "NO"; else $numpersone_cat_pers += $cat_persone[$num2]['molt']; if ($cat_persone[$num2]['osp_princ'] == "s") $osp_princ_trovato = 1; $cat_pers = $cat_persone[$num2]['ord']; if (substr($cat_pers,0,2) != "ex") { if ($cat_persone[$num2]['n_plur'] != $dati_cat_pers[$cat_pers]['langs'][$cat_persone[$num2]['lang']]['n_p'] or $cat_persone[$num2]['perc'] != $dati_cat_pers[$cat_pers]['perc']) $inserire = "NO"; } # fine if (substr($cat_pers,0,2) != "ex") else { $ncp = substr($cat_pers,2); $cat_pers = $d_cat_persone['ord'][$ncp]; if ($cat_persone[$num2]['n_plur'] != $d_cat_persone[$ncp]['n_plur'] or $cat_persone[$num2]['perc'] != $d_cat_persone[$ncp]['perc'] or $d_cat_persone[$cat_pers]['esist'] == ($ncp + 1)) $inserire = "NO"; $cat_persone[$num2]['n_sing'] = $d_cat_persone[$ncp]['n_sing_orig']; $cat_persone[$num2]['n_plur'] = $d_cat_persone[$ncp]['n_plur_orig']; } # fine else if (substr($cat_pers,0,2) != "ex") $cat_persone['int'] .= "<$cat_pers>".$cat_persone[$num2]['molt'].">".$cat_persone[$num2]['osp_princ'].">".$cat_persone[$num2]['perc'].">".$cat_persone[$num2]['lang'].">".$cat_persone[$num2]['n_sing'].">".$cat_persone[$num2]['n_plur']; } # fine if ($cat_persone[$num2]['molt']) } # fine for $num2 if ($numpersone_cat_pers != $numpersone or ($n_numpersone and !$osp_princ_trovato)) $inserire = "NO"; if ($cat_persone['int']) $cat_persone['int'] = $cat_persone['arrotond'].$cat_persone['int']; $cat_persone_idpr[$id_prenota] = $cat_persone; } # fine if ($dati_cat_pers['num']) if ($priv_mod_commenti_pers != "s" and $tipo_commento != "checkin" and $tipo_commento != "checkout") $tipo_commento = ""; if ($priv_mod_commento != "s" and !strcmp((string) $tipo_commento,"")) $n_commento = ""; if ($priv_mod_commento != "s" and ((strcmp((string) $n_commento,"") and (!strcmp((string) $tipo_commento,"") or $tipo_commento == "checkin" or $tipo_commento == "checkout")) or $n_cancella_commento)) $inserire = "NO"; if ($priv_mod_commenti_pers == "s" and strcmp((string) $tipo_commento,"") and empty($comm_pers_presenti[$tipo_commento]) and $tipo_commento != "checkin" and $tipo_commento != "checkout") $inserire = "NO"; if (strcmp((string) $n_sconto,"") and ($priv_mod_sconto != "s" or controlla_soldi($n_sconto) == "NO")) $inserire = "NO"; if (strcmp((string) $n_caparra,"")) { $caparra = $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((string) $n_caparra,"")) else $caparra = $d_caparra_idpr[$id_prenota]; if (strcmp((string) $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); $nca_mod = count($costi_aggiuntivi_modificati); for ($numca = 0 ; $numca < $dati_cap['num'] ; $numca++) { $num_costo_mod = "NO"; for ($num2 = 0 ; $num2 < $nca_mod ; $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("#?&",fixstr($costi_aggiuntivi_modificati[$num_costo_mod])); if (!isset($costo_agg_modificato[1]) or $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]; $cat_pers_ca = $costo_agg_modificato[3]; if ($dati_cap[$numca]['letto'] == "s" and $dati_cat_pers['num'] and $cat_pers_ca != "e") { if (!strcmp((string) $dati_cat_pers[$cat_pers_ca]['n_plur'],"")) $inserire = "NO"; elseif ($cat_pers_ca != $dati_cap[$numca]['cat_pers']['ord'][0] or !$dati_cap[$numca]['cat_pers'][$dati_cap[$numca]['cat_pers']['ord'][0]]['esist']) { $cambia_cat_pers_ca_mod_idpr[$id_prenota][$num_costo_mod] = $dati_cat_pers['arrotond']."<$cat_pers_ca>>".$dati_cat_pers[$cat_pers_ca]['osp_princ'].">".$dati_cat_pers[$cat_pers_ca]['perc'].">".$dati_cat_pers['lang'].">".$dati_cat_pers[$cat_pers_ca]['n_sing'].">".$dati_cat_pers[$cat_pers_ca]['n_plur']; } # fine elseif ($cat_pers_ca != $dati_cap[$numca]['cat_pers']['ord'][0] or... } # fine if ($dati_cap[$numca]['letto'] == "s" and $dati_cat_pers['num'] and $cat_pers_ca != "e") } # fine if ((string) $num_costo_mod != (string) "NO") 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 (!isset($costo_agg_modificato[1]) or $costo_agg_modificato[1] != "cancella") if (!empty($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 (!empty($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 = fixset($dati_ca['id'][$costo_agg_da_inserire[9]]); if ($costo_agg_da_inserire[9] != fixset($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,","",",".fixset($dati_ca[$num_costo]['appincompatibili']).",") != ",".fixset($dati_ca[$num_costo]['appincompatibili']).",") $inserire = "NO"; if ($costo_agg_da_inserire[8] != "n" and $dati_cat_pers['num']) { $cat_pers_ca = $costo_agg_da_inserire[19]; if (!strcmp((string) $dati_cat_pers[$cat_pers_ca]['n_plur'],"")) $inserire = "NO"; else $cambia_cat_pers_ca_ins_idpr[$id_prenota][$num2] = $dati_cat_pers['arrotond']."<$cat_pers_ca>>".$dati_cat_pers[$cat_pers_ca]['osp_princ'].">".$dati_cat_pers[$cat_pers_ca]['perc'].">".$dati_cat_pers['lang'].">".$dati_cat_pers[$cat_pers_ca]['n_sing'].">".$dati_cat_pers[$cat_pers_ca]['n_plur']; } # fine if ($costo_agg_da_inserire[8] != "n" and $dati_cat_pers['num']) if (!empty($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 (!empty($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 or $n_valuta_caparra)) $inserire = "NO"; if (strcmp((string) $n_valuta_caparra,"") or strcmp((string) ${"valuta_pagamento".$id_prenota},"")) { if (@get_magic_quotes_gpc()) ${"valuta_pagamento".$id_prenota} = stripslashes(${"valuta_pagamento".$id_prenota}); if (!@is_array($altre_valute)) $altre_valute = altre_valute(); if (strcmp((string) $n_valuta_caparra,"") and $n_valuta_caparra != ">0" and !strcmp((string) $altre_valute['id'][$n_valuta_caparra],"")) $inserire = "NO"; if (strcmp((string) ${"valuta_pagamento".$id_prenota},"")) { if (substr(${"valuta_pagamento".$id_prenota},0,1) == ">") { ${"valuta_pagamento".$id_prenota} = substr(${"valuta_pagamento".$id_prenota},1); $valuta_trovata = 0; if (${"valuta_pagamento".$id_prenota} == $d_valuta_caparra_idpr[$id_prenota] and (double) $d_pagato_idpr[$id_prenota] < (double) $caparra and $n_pagato > $d_pagato_idpr[$id_prenota]) { $cambio_pagamento_idpr[$id_prenota] = $d_cambio_caparra_idpr[$id_prenota]; $arrotond_pagamento_idpr[$id_prenota] = $d_arrotond_caparra_idpr[$id_prenota]; $valuta_trovata = 1; } # fine if (${"valuta_pagamento".$id_prenota} == $d_valuta_caparra_idpr[$id_prenota] and... elseif (${"valuta_pagamento".$id_prenota} == $d_valuta_tariffa_idpr[$id_prenota]) { $cambio_pagamento_idpr[$id_prenota] = $d_cambio_tariffa_idpr[$id_prenota]; $arrotond_pagamento_idpr[$id_prenota] = $d_arrotond_tariffa_idpr[$id_prenota]; $valuta_trovata = 1; } # fine elseif (${"valuta_pagamento".$id_prenota} == $d_valuta_tariffa_idpr[$id_prenota]) if (!$valuta_trovata) $inserire = "NO"; } # fine if (substr(${"valuta_pagamento".$id_prenota},0,1) == ">") else { $valuta_pag = $altre_valute['id'][${"valuta_pagamento".$id_prenota}]; if (!strcmp((string) $valuta_pag,"")) $inserire = "NO"; else { $cambio_pagamento_idpr[$id_prenota] = $altre_valute[$valuta_pag]['cambio']; $arrotond_pagamento_idpr[$id_prenota] = $altre_valute[$valuta_pag]['arrotond']; } # fine else if (!strcmp((string) $valuta_pag,"")) } # fine else if (substr(${"valuta_pagamento".$id_prenota},0,1) == ">") } # fine if (strcmp((string) ${"valuta_pagamento".$id_prenota},"")) } # fine if (strcmp((string) $n_valuta_caparra,"") or strcmp((string) ${"valuta_pagamento".$id_prenota},"")) if ($n_met_paga_caparra or !empty(${"metodo_pagamento".$id_prenota}) or !empty(${"id_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}); if (!isset($metodi_pagamento)) { $metodi_pagamento_int = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'metodi_pagamento' and idutente = '$id_utente'"); $metodi_pagamento_int = (string) risul_query($metodi_pagamento_int,0,'valpersonalizza'); $metodi_pagamento = explode(",",$metodi_pagamento_int); } # fine if (!isset($metodi_pagamento)) if (!$metodi_pagamento_int) ${"id_pagamento".$id_prenota} = ""; 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 !empty(${"metodo_pagamento".$id_prenota}) or... if (($priv_mod_pagato == "n" or $priv_mod_pagato == "v") and $n_confermato != "") $inserire = "NO"; if ($n_confermato and $n_confermato != "S" and $n_confermato != "N") $inserire = "NO"; if ($priv_mod_pagato != "s" and strcmp((string) $n_pagato,"")) $inserire = "NO"; if (strcmp((string) $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); if (!isset($origini_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); } # fine if (!isset($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 ($priv_mod_utente_ins == "s" or ($priv_mod_utente_ins == "g" and $utenti_gruppi[$id_nuovo_utente_inserimento]))) { $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 ($priv_mod_utente_ins == "s" or ($priv_mod_utente_ins == "g" and $utenti_gruppi[$id_nuovo_utente_inserimento]))) 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"); $limiti_var = array(); 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); $profondita = array(); 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 (!empty($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 (!empty($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 (!empty($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 (!empty($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 (!empty($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 (!empty($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((string) $app_prenota_id[$id_prenota],"") and !strcmp((string) $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)." ".fixset($id_prenota)." ".mex("<b>non è stata modificata</b> perchè la tabella prenotazioni è cambiata nel frattempo",$pag).".<br>"; unlock_tabelle($tabelle_lock); } # fine if ($inserire == "NO") 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]; $d_cat_persone = $d_cat_persone_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]; $cat_persone = $cat_persone_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 ($priv_mod_utente_ins == "s" or ($priv_mod_utente_ins == "g" and $utenti_gruppi[$id_nuovo_utente_inserimento]))) { 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 ($priv_mod_utente_ins == "s" or ($priv_mod_utente_ins == "g" and $utenti_gruppi[$id_nuovo_utente_inserimento]))) 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 != "") { if (!$dati_cat_pers['num']) esegui_query("update $tableprenota set num_persone = '$n_numpersone', cat_persone = NULL where idprenota = '$id_prenota' "); else esegui_query("update $tableprenota set num_persone = '$n_numpersone' where idprenota = '$id_prenota' "); } # fine if ($n_numpersone != "") if ($dati_cat_pers['num'] and $cat_persone['int'] != $d_cat_persone['int']) { esegui_query("update $tableprenota set cat_persone = '".aggslashdb($cat_persone['int'])."' where idprenota = '$id_prenota' "); } # fine if ($dati_cat_pers['num'] and $cat_persone['int'] != $d_cat_persone['int']) 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((string) $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 (!empty($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' "); if (!empty($cambia_cat_pers_ca_mod_idpr[$id_prenota][$num2])) esegui_query("update $tablecostiprenota set cat_persone = '".aggslashdb($cambia_cat_pers_ca_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 (!empty($dati_ca[$num_costo]['tasseperc'])) esegui_query("update $tablecostiprenota set tasseperc = '".$dati_ca[$num_costo]['tasseperc']."' where idcostiprenota = '$idcostiprenota'"); if (!empty($cambia_cat_pers_ca_ins_idpr[$id_prenota][$num2])) esegui_query("update $tablecostiprenota set cat_persone = '".aggslashdb($cambia_cat_pers_ca_ins_idpr[$id_prenota][$num2])."' 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((string) $n_sconto,"")) { esegui_query("update $tableprenota set sconto = '$n_sconto' where idprenota = '$id_prenota' "); } # fine if (strcmp((string) $n_sconto,"")) if (strcmp((string) $n_caparra,"")) { esegui_query("update $tableprenota set caparra = '$n_caparra' where idprenota = '$id_prenota' "); } # fine if (strcmp((string) $n_caparra,"")) $aggiorna_valuta = 0; if (strcmp((string) $n_valuta_tariffa,"")) { $aggiorna_valuta = 1; if ($n_valuta_tariffa == ">0") $valuta_prenota = ">"; else { if (!@is_array($altre_valute)) $altre_valute = altre_valute(); $valuta = $altre_valute['id'][$n_valuta_tariffa]; if (strcmp((string) $valuta,"")) $valuta_prenota = "$n_valuta_tariffa<".$altre_valute[$valuta]['cambio']."<".$altre_valute[$valuta]['arrotond'].">"; else $valuta_prenota = ">"; } # fine else if ($n_valuta_tariffa == ">0") } # fine if (strcmp((string) $n_valuta_tariffa,"")) else { if (strcmp((string) $d_valuta_tariffa_idpr[$id_prenota],"")) $valuta_prenota = $d_valuta_tariffa_idpr[$id_prenota]."<".$d_cambio_tariffa_idpr[$id_prenota]."<".$d_arrotond_tariffa_idpr[$id_prenota].">"; else $valuta_prenota = ">"; } # fine else if (strcmp((string) $n_valuta_tariffa,"")) if (strcmp((string) $n_valuta_caparra,"")) { $aggiorna_valuta = 1; if ($n_valuta_caparra != ">0") $valuta_prenota .= "$n_valuta_caparra<".$altre_valute[$altre_valute['id'][$n_valuta_caparra]]['cambio']."<".$altre_valute[$altre_valute['id'][$n_valuta_caparra]]['arrotond']; } # fine if (strcmp((string) $n_valuta_caparra,"")) elseif (strcmp((string) $d_valuta_caparra_idpr[$id_prenota],"")) $valuta_prenota .= $d_valuta_caparra_idpr[$id_prenota]."<".$d_cambio_caparra_idpr[$id_prenota]."<".$d_arrotond_caparra_idpr[$id_prenota]; if ($aggiorna_valuta) { if ($valuta_prenota == ">") esegui_query("update $tableprenota set valuta = NULL where idprenota = '$id_prenota' "); else esegui_query("update $tableprenota set valuta = '".aggslashdb($valuta_prenota)."' where idprenota = '$id_prenota' "); } # fine if ($aggiorna_valuta) if (strcmp((string) $n_met_paga_caparra,"")) { esegui_query("update $tableprenota set metodo_pagamento = '".aggslashdb($n_met_paga_caparra)."' where idprenota = '$id_prenota' "); } # fine if (strcmp((string) $n_met_paga_caparra,"")) if (strcmp((string) $n_commissioni,"")) { esegui_query("update $tableprenota set commissioni = '$n_commissioni' where idprenota = '$id_prenota' "); } # fine if (strcmp((string) $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 (strcmp((string) $n_pagato,"")) { esegui_query("update $tableprenota set pagato = '$n_pagato' where idprenota = '$id_prenota' "); if ($prenota_in_anno_succ) esegui_query("update $tableprenota_orig set pagato = '$n_pagato' where idprenota = '$id_prenota_orig' "); } # fine if (strcmp((string) $n_pagato,"")) if ($n_confermato != "") { esegui_query("update $tableprenota set conferma = '$n_confermato' where idprenota = '$id_prenota' "); } # fine if ($n_confermato != "") if (strcmp((string) $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; $altri_comm = ""; if (strstr($n_comm,">")) { $n_comm = explode(">",$n_comm); if (strcmp((string) $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((string) $n_comm[1],"")) if (strcmp((string) $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((string) $n_comm[2],"")) for ($num1 = 3 ; $num1 < count($n_comm) ; $num1++) { $altri_comm .= ">".$n_comm[$num1]; } # fine for $num1 $n_comm = $n_comm[0]; } # fine if (strstr($n_comm,">")) if (strcmp((string) $n_comm_checkin,"") or strcmp((string) $n_comm_checkout,"")) $n_comm .= ">$n_comm_checkin>$n_comm_checkout"; elseif ($altri_comm) $n_comm .= ">>"; if ($altri_comm) $n_comm .= $altri_comm; esegui_query("update $tableprenota set commento = '".aggslashdb($n_comm)."' where idprenota = '$id_prenota' "); } # fine if (strcmp((string) $n_commento,"") and ($tipo_commento == "checkin" or... if ((strcmp((string) $n_commento,"") and !strcmp((string) $tipo_commento,"")) or $n_cancella_commento == "SI") { $n_comm = $n_commento; if ($n_cancella_commento == "SI") $n_comm = ""; if (strstr((string) $d_commento,">")) $n_comm = $n_comm.strstr($d_commento,">"); esegui_query("update $tableprenota set commento = '".aggslashdb($n_comm)."' where idprenota = '$id_prenota' "); } # fine if ((strcmp((string) $n_commento,"") and !strcmp((string) $tipo_commento,"")) or $n_cancella_commento == "SI") if (strcmp((string) $tipo_commento,"") and !empty($comm_pers_presenti[$tipo_commento])) { $n_comm = $d_commento; if (strstr($d_commento,">")) { $d_comm = explode(">",$d_commento); $num_comm = count($d_comm); if ($num_comm < 4) { for ($num1 = $num_comm ; $num1 < 3 ; $num1++) $n_comm .= ">"; $n_comm .= ">".$tipo_commento."<".$n_commento; } # fine if ($num_comm < 4) else { $n_comm = $d_comm[0].">".$d_comm[1].">".$d_comm[2]; $n_comm_inserito = 0; for ($num1 = 3 ; $num1 < $num_comm ; $num1++) { if (substr($d_comm[$num1],0,(strlen($tipo_commento) + 1)) == "$tipo_commento<") { $n_comm_inserito = 1; if (strcmp((string) $n_commento,"")) $n_comm .= ">".$tipo_commento."<".$n_commento; } # fine if (substr($d_comm[$num1],0,(strlen($tipo_commento) + 1)) == "$tipo_commento<") else $n_comm .= ">".$d_comm[$num1]; } # fine for $num1 if (!$n_comm_inserito and strcmp((string) $n_commento,"")) $n_comm .= ">".$tipo_commento."<".$n_commento; } # fine else if ($num_comm < 4) } # fine if (strstr($d_commento,">")) elseif (strcmp((string) $n_commento,"")) $n_comm .= ">>>".$tipo_commento."<".$n_commento; if ($n_comm != $d_commento) esegui_query("update $tableprenota set commento = '".aggslashdb($n_comm)."' where idprenota = '$id_prenota' "); } # fine if (strcmp((string) $tipo_commento,"") and !empty($comm_pers_presenti[$tipo_commento])) $adesso = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600))); if (strcmp((string) $n_costo_tot,"")) { esegui_query("update $tableprenota set tariffa_tot = '$n_costo_tot', data_modifica = '$adesso' where idprenota = '$id_prenota' "); if ($prenota_in_anno_succ) esegui_query("update $tableprenota_orig set tariffa_tot = '$n_costo_tot', data_modifica = '$adesso' where idprenota = '$id_prenota_orig' "); } # fine if (strcmp((string) $n_costo_tot,"")) 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 (strcmp((string) $n_pagato,"")) { $datainserimento_saldo = date("Y-m-d H:i:s",(time() + (C_DIFF_ORE * 3600))); $datatransazione_saldo = $datainserimento_saldo; if (isset(${"giorno_pagamento".$id_prenota}) and isset(${"mese_pagamento".$id_prenota}) and isset(${"anno_pagamento".$id_prenota})) { if (${"giorno_pagamento".$id_prenota} >= 1 and ${"giorno_pagamento".$id_prenota} <= 31 and ${"mese_pagamento".$id_prenota} >= 1 and ${"mese_pagamento".$id_prenota} <= 12) { $anno_corr = date('Y',(time() + (C_DIFF_ORE * 3600))); if (${"anno_pagamento".$id_prenota} >= ($anno_corr - 2) and ${"anno_pagamento".$id_prenota} <= ($anno_corr + 1)) $datatransazione_saldo = date("Y-m-d H:i:s",mktime(0,0,0,(int) ${"mese_pagamento".$id_prenota},(int) ${"giorno_pagamento".$id_prenota},(int) ${"anno_pagamento".$id_prenota})); } # fine if (${"giorno_pagamento".$id_prenota} >= 1 and ${"giorno_pagamento".$id_prenota} <= 31 and... } # fine if (isset(${"giorno_pagamento".$id_prenota}) and isset(${"mese_pagamento".$id_prenota}) and... $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; if (strcmp((string) ${"valuta_pagamento".$id_prenota},"")) { $valuta = ${"valuta_pagamento".$id_prenota}.">".$cambio_pagamento_idpr[$id_prenota].">".$arrotond_pagamento_idpr[$id_prenota]; $saldo_valuta = converti_valuta($saldo,$cambio_pagamento_idpr[$id_prenota],$arrotond_pagamento_idpr[$id_prenota]); } # fine if (strcmp((string) ${"valuta_pagamento".$id_prenota},"")) else { $valuta = ""; $saldo_valuta = ""; } # fine else if (strcmp((string) ${"valuta_pagamento".$id_prenota},"")) $metodo_pagamento = aggslashdb(${"metodo_pagamento".$id_prenota}); $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_transazione,data_inserimento,utente_inserimento) values ('$idsoldi','$motivazione_saldo','$metodo_pagamento','$saldo','$pagato_attuale','$datatransazione_saldo','$datainserimento_saldo','$id_utente')"); if ($valuta) esegui_query("update $tablesoldi set valuta = '".aggslashdb($valuta)."', saldo_valuta = '".aggslashdb($saldo_valuta)."' where idsoldi = '$idsoldi' "); if (!empty(${"id_pagamento".$id_prenota})) esegui_query("update $tablesoldi set id_pagamento = '".aggslashdb(htmlspecialchars(${"id_pagamento".$id_prenota}))."' where idsoldi = '$idsoldi' "); if (!empty(${"note_pagamento".$id_prenota})) esegui_query("update $tablesoldi set note = '".aggslashdb(htmlspecialchars(${"note_pagamento".$id_prenota}))."' where idsoldi = '$idsoldi' "); 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"; if (!empty(${"note_pagamento".$id_prenota})) $nome_costo .= " - ".htmlspecialchars(${"note_pagamento".$id_prenota}); $idcosti = esegui_query("select max(idcosti) from $tablecosti"); $idcosti = risul_query($idcosti,0,0) + 1; if ($cassa_pagamenti == "#1#") $nome_cassa = ""; else $nome_cassa = $cassa_pagamenti; esegui_query("insert into $tablecosti (idcosti,nome_costo,val_costo,tipo_costo,nome_cassa,persona_costo,provenienza_costo,metodo_pagamento,data_transazione,datainserimento,hostinserimento,utente_inserimento) values ('$idcosti','".aggslashdb($nome_costo)."','$saldo','e','".aggslashdb($nome_cassa)."','".aggslashdb($nome_utente)."','p','$metodo_pagamento','$datatransazione_saldo','$datainserimento_saldo','$HOSTNAME','$id_utente') "); if ($valuta) esegui_query("update $tablecosti set valuta = '".aggslashdb($valuta)."', costo_valuta = '".aggslashdb($saldo_valuta)."' where idcosti = '$idcosti' "); if (!empty(${"id_pagamento".$id_prenota})) esegui_query("update $tablecosti set id_pagamento = '".aggslashdb(htmlspecialchars(${"id_pagamento".$id_prenota}))."' where idcosti = '$idcosti' "); unlock_tabelle($tabelle_lock); } # fine if (strcmp($cassa_pagamenti,"")) } # fine if (strcmp((string) $n_pagato,"")) } # fine for $num_idpr } # fine else if ($inserire == "NO") } # fine function esegui_modifiche_prenotazione ?> |