<?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/>. ################################################################################## $pag = "modifica_var_contr.php"; $titolo = "HotelDruid: Modifica Variabili Documenti"; $var_pag = array(); $var_pag[0] = 'contr_cond'; $var_pag[1] = 'torna'; $var_pag[2] = 'cambia_qualcosa'; $var_pag[3] = 'aggiungi_cond'; $var_pag[4] = 'num_se'; $var_pag[5] = 'and_or'; $var_pag[6] = 'num_cond_mod'; $var_pag[7] = 'inizializza'; $var_pag[8] = 'cond_sempre'; $var_pag[9] = 'var_se1'; $var_pag[10] = 'cond1'; $var_pag[11] = 'tipo_val_se1'; $var_pag[12] = 'val_se_txt1'; $var_pag[13] = 'val_se_sel1'; $var_pag[14] = 'azione'; $var_pag[15] = 'oper_str'; $var_pag[16] = 'var_allora'; $var_pag[17] = 'tipo_val_allora'; $var_pag[18] = 'val_allora_txt'; $var_pag[19] = 'val_allora_sel'; $var_pag[20] = 'oper_allora_sel'; $var_pag[21] = 'tipo_val_sost1'; $var_pag[22] = 'val_sost1_txt'; $var_pag[23] = 'val_sost1_sel'; $var_pag[24] = 'tipo_val_sost2'; $var_pag[25] = 'val_sost2_txt'; $var_pag[26] = 'val_sost2_sel'; $var_pag[27] = 'var_trunc'; $var_pag[28] = 'val_trunc'; $var_pag[29] = 'val_trunc2'; $var_pag[30] = 'pos_trunc2'; $var_pag[31] = 'var_oper'; $var_pag[32] = 'var_oper2'; $var_pag[33] = 'operatore'; $var_pag[34] = 'tipo_val_oper'; $var_pag[35] = 'val_oper_txt'; $var_pag[36] = 'val_oper_sel'; $var_pag[37] = 'val_arrotond'; $var_pag[38] = 'var_data'; $var_pag[39] = 'oper_data'; $var_pag[40] = 'subdata'; $var_pag[41] = 'var_data2'; $var_pag[42] = 'oper_giorni'; $var_pag[43] = 'num_giorni'; $var_pag[44] = 'tipo_giorni'; $var_pag[45] = 'tipo_int'; $var_pag[46] = 'var_opdat2'; $var_pag[47] = 'var_opdat3'; $var_pag[48] = 'arr_azz'; $var_pag[49] = 'array'; $var_pag[50] = 'tipo_arr'; $var_pag[51] = 'lista_val'; $var_pag[52] = 'array2'; $var_pag[53] = 'break_cont'; $var_pag[54] = 'val_se_sel2'; $var_pag[55] = 'canc_se'; $var_pag[56] = 'var_pers_elimina'; $var_pag[57] = 'nuova_var_pers'; $var_pag[58] = 'aggiungi_var_pers'; $var_pag[59] = 'solo_contr_cond'; $var_pag[60] = 'nuovo_arr_pers'; $var_pag[61] = 'aggiungi_arr_pers'; $var_pag[62] = 'var_arr'; $var_pag[63] = 'elimina_var_pers'; $var_pag[64] = 'sposta_su'; $var_pag[65] = 'num_cond'; $var_pag[66] = 'salta_a'; $var_pag[67] = 'sposta_giu'; $var_pag[68] = 'elimina_cond'; $var_pag[69] = 'arr_pers_elimina'; $var_pag[70] = 'elimina_arr_pers'; $var_pag[71] = 'mod_contr_importa'; $var_pag[72] = 'tipo_contr_imp'; $var_pag[73] = 'contr_imp'; $var_pag[74] = 'agg_se'; $n_var_pag = 75; $num2 = 0; if (isset($_POST['num_se'])) $num2 = (int) $_POST['num_se']; elseif (isset($_GET['num_se'])) $num2 = (int) $_GET['num_se']; for ($num1 = 2 ; $num1 <= $num2 ; $num1++) { $var_pag[$n_var_pag++] = "var_se$num1"; $var_pag[$n_var_pag++] = "cond$num1"; $var_pag[$n_var_pag++] = "val_se_txt$num1"; $var_pag[$n_var_pag++] = "tipo_val_se$num1"; $var_pag[$n_var_pag++] = "val_se_sel$num1"; } # fine for $num1 include("./costanti.php"); include(C_DATI_PATH."/dati_connessione.php"); include("./includes/funzioni_$PHPR_DB_TYPE.php"); $numconnessione = connetti_db($PHPR_DB_NAME,$PHPR_DB_HOST,$PHPR_DB_PORT,$PHPR_DB_USER,$PHPR_DB_PASS,$PHPR_LOAD_EXT); include("./includes/funzioni.php"); include("./includes/sett_gio.php"); $tablenometariffe = $PHPR_TAB_PRE."ntariffe".$anno; $tableperiodi = $PHPR_TAB_PRE."periodi".$anno; $tableanni = $PHPR_TAB_PRE."anni"; $tablepersonalizza = $PHPR_TAB_PRE."personalizza"; $tablecontratti = $PHPR_TAB_PRE."contratti"; $id_utente = controlla_login($numconnessione,$PHPR_TAB_PRE,$id_sessione,$nome_utente_phpr,$password_phpr,$anno); if ($id_utente) { if ($id_utente != 1) { $tableprivilegi = $PHPR_TAB_PRE."privilegi"; $tablerelgruppi = $PHPR_TAB_PRE."relgruppi"; $privilegi_annuali_utente = esegui_query("select * from $tableprivilegi where idutente = '$id_utente' and anno = '$anno'"); if (numlin_query($privilegi_annuali_utente) == 0) $anno_utente_attivato = "NO"; else { $anno_utente_attivato = "SI"; $privilegi_globali_utente = esegui_query("select * from $tableprivilegi where idutente = '$id_utente' and anno = '1'"); $priv_mod_pers = risul_query($privilegi_globali_utente,0,'priv_mod_pers'); if (substr($priv_mod_pers,0,1) != "s") $modifica_pers = "NO"; else $modifica_pers = "SI"; $priv_mod_doc = substr($priv_mod_pers,2,1); $priv_mod_doc_api = substr($priv_mod_pers,4,1); $priv_mod_doc_html = substr($priv_mod_pers,9,1); $contratti_consentiti = risul_query($privilegi_annuali_utente,0,'contratti_consentiti'); $attiva_contratti_consentiti = substr($contratti_consentiti,0,1); if ($attiva_contratti_consentiti == "s") { $contratti_consentiti = explode(",",$contratti_consentiti); unset($contratti_consentiti_vett); for ($num1 = 1 ; $num1 < count($contratti_consentiti) ; $num1++) if ($contratti_consentiti[$num1]) $contratti_consentiti_vett[$contratti_consentiti[$num1]] = "SI"; } # fine if ($attiva_contratti_consentiti == "s") } # fine else if (numlin_query($privilegi_annuali_utente) == 0) } # fine if ($id_utente != 1) else { $anno_utente_attivato = "SI"; $modifica_pers = "SI"; $priv_mod_doc = "s"; $priv_mod_doc_api = "s"; $priv_mod_doc_html = "s"; $attiva_contratti_consentiti = "n"; } # fine else if ($id_utente != 1) if ($anno_utente_attivato == "SI" and $priv_mod_doc == "s" and $modifica_pers != "NO") { $titolo = "HotelDruid: ".mex("Modifica Variabili Documenti",$pag); if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/".$tema[$id_utente]."/php")) include("./themes/".$tema[$id_utente]."/php/head.php"); else include("./includes/head.php"); $Euro = nome_valuta(); $stile_soldi = stile_soldi(); $stile_data = stile_data(); if (!isset($contr_cond) or controlla_num_pos($contr_cond) == "NO" or $contr_cond < 1) $contr_cond = ""; if ($attiva_contratti_consentiti != "n" and $contratti_consentiti_vett[$contr_cond] != "SI") $contr_cond = ""; if (strcmp((string) $contr_cond,"")) { $contr_cond = (int) $contr_cond; $contr_cond_esist = esegui_query("select tipo from $tablecontratti where numero = '".aggslashdb($contr_cond)."' and tipo $LIKE 'contr%' "); if (numlin_query($contr_cond_esist) != 1) $contr_cond = ""; else { if ($priv_mod_doc_html != "s" and risul_query($contr_cond_esist,0,'tipo') == "contrhtm") $contr_cond = ""; if ($contr_cond and $priv_mod_doc_api != "s") { $api_esistente = esegui_query("select * from $tablecontratti where numero = '".aggslashdb($contr_cond)."' and tipo = 'api'"); if (numlin_query($api_esistente)) $contr_cond = ""; } # fine if ($contr_cond and $priv_mod_doc_api != "s") } # fine else if (numlin_query($contr_cond_esist) != 1) } # fine if (strcmp((string) $contr_cond,"")) include("./includes/funzioni_mod_contratti.php"); $campi_pers_comm = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'campi_pers_comm' and idutente = '$id_utente'"); if (numlin_query($campi_pers_comm) == 1) { $campi_pers_comm = explode(">",risul_query($campi_pers_comm,0,'valpersonalizza')); $num_commenti_pers = count($campi_pers_comm); } # fine if (numlin_query($campi_pers_comm) == 1) else $num_commenti_pers = 0; $campi_pers_cliente = esegui_query("select * from $tablepersonalizza where idpersonalizza = 'campi_pers_cliente' and idutente = '$id_utente' "); if (numlin_query($campi_pers_cliente)) { $campi_pers_cliente = explode(">",risul_query($campi_pers_cliente,0,'valpersonalizza')); $num_campi_pers_cliente = count($campi_pers_cliente); } # fine if (numlin_query($campi_pers_cliente)) else $num_campi_pers_cliente = 0; include_once("./includes/funzioni_tariffe.php"); $dati_cat_pers = dati_cat_pers($id_utente,$tablepersonalizza,$lingua_mex,"v",0,1); $dati_allegato = array('num' => 0); $allegati = esegui_query("select * from $tablecontratti where numero = '".aggslashdb($contr_cond)."' and tipo = 'allegato'"); if (numlin_query($allegati)) { $allegati = risul_query($allegati,0,'testo'); if ($allegati) { $allegati = explode(",",$allegati); $dati_allegato['num'] = (count($allegati) - 2); } # fine if ($allegati) } # fine if (numlin_query($allegati)) #$commento_personalizzato_ = mexv("commento_personalizzato")."_"; #$campo_personalizzato_ = mexv("campo_personalizzato")."_"; $commento_personalizzato_ = "commento_personalizzato_"; $campo_personalizzato_ = "campo_personalizzato_"; $num_persone_tipo_ = "num_persone_tipo_"; $allegato_ = "allegato"; include("./includes/variabili_contratto.php"); if (!empty($canc_se) and $num_se > 1) { $cambia_qualcosa = ""; $num_se--; if ($num_se == 1) $cond_sempre = "NO"; } # fine if (!empty($canc_se) and $num_se > 1) if (!empty($agg_se)) { $cambia_qualcosa = ""; $num_se++; } # fine if (!empty($agg_se)) if (isset($num_se) and $num_se > 80) $num_se = 80; if (!empty($cambia_qualcosa)) { $mostra_form_iniziale = ""; if (!empty($aggiungi_var_pers)) { $mostra_form_iniziale = "NO"; $continua = "SI"; if (@get_magic_quotes_gpc()) $nuova_var_pers = stripslashes($nuova_var_pers); $nuova_var_pers = str_replace("#%?","",$nuova_var_pers); if (!$nuova_var_pers) $continua = "NO"; if (preg_replace("/[A-Za-z]/","",substr($nuova_var_pers,0,1)) != "") $continua = "NO"; if (preg_replace("/[A-Za-z0-9_]/","",$nuova_var_pers) != "") $continua = "NO"; $ultima_parte = explode("_",$nuova_var_pers); $ultima_parte = (string) $ultima_parte[(count($ultima_parte) - 1)]; if ($ultima_parte != "" and preg_replace("/[0-9]/","",$ultima_parte) == "") $continua = "NO"; if (!empty($var_riserv[$nuova_var_pers]) or substr($nuova_var_pers,0,20) == "campo_personalizzato" or substr($nuova_var_pers,0,23) == "commento_personalizzato" or substr($nuova_var_pers,0,16) == "num_persone_tipo") $continua = "NO"; if (substr($nuova_var_pers,0,8) == "allegato" and preg_replace("/[0-9]/","",substr($nuova_var_pers,8)) == "") $continua = "NO"; if ($continua == "SI") { $tabelle_lock = array($tablecontratti); $tabelle_lock = lock_tabelle($tabelle_lock); $var_esistente = esegui_query("select * from $tablecontratti where (tipo $LIKE 'var%' and testo $LIKE '$nuova_var_pers') or (tipo $LIKE 'vett%' and testo $LIKE '$nuova_var_pers;%') "); if (numlin_query($var_esistente) != 0) $continua = "NO"; $lang_dir = opendir("./includes/lang/"); while ($ini_lingua = readdir($lang_dir)) { if ($ini_lingua != "." && $ini_lingua != "..") { $file_trad = implode("",@file("./includes/lang/$ini_lingua/visualizza_contratto_var.php")); if (str_replace("'".$nuova_var_pers."'","",$file_trad) != $file_trad) $continua = "NO"; if (str_replace("\"".$nuova_var_pers."\"","",$file_trad) != $file_trad) $continua = "NO"; } # fine if ($file != "." && $file != "..") } # fine while ($file = readdir($lang_dig)) closedir($lang_dir); for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) { if ($nuova_var_pers == $var_predef[$num1]) $continua = "NO"; } # fine for $num1 if ($solo_contr_cond and strcmp((string) $contr_cond,"")) { $tipo = "var$contr_cond"; $contr_cond_esist = esegui_query("select numero from $tablecontratti where numero = '".aggslashdb($contr_cond)."' and tipo $LIKE 'contr%' "); if (numlin_query($contr_cond_esist) != 1) $continua = "NO"; } # fine if ($solo_contr_cond and strcmp((string) $contr_cond,"")) else $tipo = "var"; if ($continua == "SI") { $max_var = esegui_query("select max(numero) from $tablecontratti where tipo $LIKE 'var%'"); if (numlin_query($max_var) != 0) $max_var = (risul_query($max_var,0,0) + 1); else $max_var = 1; esegui_query("insert into $tablecontratti (numero,tipo,testo) values ('$max_var','$tipo','$nuova_var_pers')"); echo mex("Nuova variabile personalizzata inserita",$pag).".<br>"; } # fine if ($continua == "SI") unlock_tabelle($tabelle_lock); } # fine if ($continua == "SI") if ($continua != "SI") echo mex("I dati inseriti sono <div style=\"display: inline; color: red;\">errati</div>",$pag).".<br>"; } # fine if (!empty($aggiungi_var_pers)) if (!empty($elimina_var_pers)) { $mostra_form_iniziale = "NO"; $var_pers_elimina = aggslashdb($var_pers_elimina); $continua = "SI"; if (controlla_num_pos($var_pers_elimina) != "SI") $continua = "NO"; if ($continua == "SI") { $tabelle_lock = array($tablecontratti); $tabelle_lock = lock_tabelle($tabelle_lock); $n_var_pers_el = esegui_query("select * from $tablecontratti where numero = '$var_pers_elimina' and tipo $LIKE 'var%'"); if (numlin_query($n_var_pers_el) == 1) { $n_var_pers_el = risul_query($n_var_pers_el,0,"testo"); $num_cond_canc = elimina_cond_variabile_pers($n_var_pers_el,$var_pers_elimina,"",$tablecontratti); esegui_query("delete from $tablecontratti where numero = '$var_pers_elimina' and tipo $LIKE 'var%'"); echo mex("Variabile personalizzata eliminata",$pag).".<br>"; } # fine if (numlin_query($n_var_pers_el) == 1) unlock_tabelle($tabelle_lock); } # fine if ($continua == "SI") if ($continua != "SI") echo mex("I dati inseriti sono <div style=\"display: inline; color: red;\">errati</div>",$pag).".<br>"; } # fine if (!empty($elimina_var_pers)) if (!empty($aggiungi_arr_pers)) { $mostra_form_iniziale = "NO"; $continua = "SI"; if (@get_magic_quotes_gpc()) $nuovo_arr_pers = stripslashes($nuovo_arr_pers); $nuovo_arr_pers = str_replace("#%?","",$nuovo_arr_pers); if (!$nuovo_arr_pers) $continua = "NO"; if (preg_replace("/[A-Za-z]/","",substr($nuovo_arr_pers,0,1)) != "") $continua = "NO"; if (preg_replace("/[A-Za-z0-9_]/","",$nuovo_arr_pers) != "") $continua = "NO"; $ultima_parte = explode("_",$nuovo_arr_pers); $ultima_parte = (string) $ultima_parte[(count($ultima_parte) - 1)]; if ($ultima_parte != "" and preg_replace("/[0-9]/","",$ultima_parte) == "") $continua = "NO"; if (!empty($var_riserv[$nuovo_arr_pers])) $continua = "NO"; if ($continua == "SI") { $tabelle_lock = array("$tablecontratti"); $tabelle_lock = lock_tabelle($tabelle_lock); $arr_esistente = esegui_query("select * from $tablecontratti where (tipo $LIKE 'vett%' and testo $LIKE '$nuovo_arr_pers;%') or (tipo $LIKE 'var%' and testo $LIKE '$nuovo_arr_pers') "); if (numlin_query($arr_esistente) != 0) $continua = "NO"; $lang_dir = opendir("./includes/lang/"); while ($ini_lingua = readdir($lang_dir)) { if ($ini_lingua != "." && $ini_lingua != "..") { $file_trad = implode("",@file("./includes/lang/$ini_lingua/visualizza_contratto_var.php")); if (str_replace("'".$nuovo_arr_pers."'","",$file_trad) != $file_trad) $continua = "NO"; if (str_replace("\"".$nuovo_arr_pers."\"","",$file_trad) != $file_trad) $continua = "NO"; } # fine if ($file != "." && $file != "..") } # fine while ($file = readdir($lang_dig)) closedir($lang_dir); for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) { if ($nuovo_arr_pers == $var_predef[$num1]) $continua = "NO"; } # fine for $num1 if ($solo_contr_cond and strcmp((string) $contr_cond,"")) { $tipo = "vett$contr_cond"; $contr_cond_esist = esegui_query("select numero from $tablecontratti where numero = '".aggslashdb($contr_cond)."' and tipo $LIKE 'contr%' "); if (numlin_query($contr_cond_esist) != 1) $continua = "NO"; } # fine if ($solo_contr_cond and strcmp((string) $contr_cond,"")) else { $solo_contr_cond = ""; $tipo = "vett"; } # fine else if ($solo_contr_cond and strcmp((string) $contr_cond,"")) if ($continua == "SI") { if ($solo_contr_cond) $variabili_pers = esegui_query("select * from $tablecontratti where tipo = 'var' or tipo = 'var$contr_cond' order by tipo, numero"); else $variabili_pers = esegui_query("select * from $tablecontratti where tipo = 'var' order by numero"); $num_variabili_pers = numlin_query($variabili_pers); for ($num1 = 0 ; $num1 < $num_variabili_pers ; $num1++) { $var_pers = risul_query($variabili_pers,$num1,'testo'); $num_var_pers = risul_query($variabili_pers,$num1,'numero'); $var_predef[$num_var_predef] = $var_pers; $num_var_predef++; $nome_var[$num_var_pers] = $var_pers; } # fine for $num1 if (empty($var_arr)) { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"contr_cond\" value=\"$contr_cond\"> <input type=\"hidden\" name=\"solo_contr_cond\" value=\"$solo_contr_cond\"> <input type=\"hidden\" name=\"cambia_qualcosa\" value=\"SI\"> <input type=\"hidden\" name=\"nuovo_arr_pers\" value=\"$nuovo_arr_pers\"> <input type=\"hidden\" name=\"aggiungi_arr_pers\" value=\"SI\"> ".mex("Array della variabile",$pag).": <select name=\"var_arr\">"; for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) { echo "<option value=\"".$var_predef[$num1]."\">".mexv($var_predef[$num1])."</option>"; } # fine for $num1 echo "</select> <input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"".mex("Aggiungi",$pag)."\"> </div></form><br>"; } # fine if (empty($var_arr)) else { $var_arr_num = -1; for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) { if ($var_arr == $var_predef[$num1]) $var_arr_num = $num1; } # fine for $num1 if ($var_arr_num < 0) $continua = "NO"; if ($continua == "SI") { $max_arr = esegui_query("select max(numero) from $tablecontratti where tipo $LIKE 'vett%' "); if (numlin_query($max_arr) != 0) $max_arr = (risul_query($max_arr,0,0) + 1); else $max_arr = 1; esegui_query("insert into $tablecontratti (numero,tipo,testo) values ('$max_arr','$tipo','$nuovo_arr_pers;$var_arr')"); echo mex("Nuovo array personalizzato inserito",$pag).".<br>"; } # fine if ($continua == "SI") } # fine else if (empty($var_arr)) } # fine if ($continua == "SI") unlock_tabelle($tabelle_lock); } # fine if ($continua == "SI") if ($continua != "SI") echo mex("I dati inseriti sono <div style=\"display: inline; color: red;\">errati</div>",$pag).".<br>"; } # fine if (!empty($aggiungi_arr_pers)) if (!empty($elimina_arr_pers)) { $mostra_form_iniziale = "NO"; $tabelle_lock = array($tablecontratti); $tabelle_lock = lock_tabelle($tabelle_lock); $continua = elimina_array_pers($arr_pers_elimina,"",$tablecontratti); unlock_tabelle($tabelle_lock); if ($continua != "SI") echo mex("I dati inseriti sono <div style=\"display: inline; color: red;\">errati</div>",$pag).".<br>"; } # fine if (!empty($elimina_arr_pers)) if (!empty($mod_contr_importa) and !empty($contr_cond)) { $tabelle_lock = array($tablecontratti); $tabelle_lock = lock_tabelle($tabelle_lock); if ($contr_imp) { if (controlla_num_pos($contr_imp) == "NO" or $contr_imp < 1) $contr_imp = ""; if ($contr_imp == $contr_cond or ($attiva_contratti_consentiti != "n" and $contratti_consentiti_vett[$contr_imp] != "SI")) $contr_imp = ""; if (strcmp((string) $contr_imp,"")) { $contr_imp_esist = esegui_query("select numero from $tablecontratti where numero = '".aggslashdb($contr_imp)."' and tipo $LIKE 'contr%' "); if (numlin_query($contr_imp_esist) != 1) $contr_imp = ""; else { $contr_imp_esist = esegui_query("select numero from $tablecontratti where numero = '$contr_imp' and tipo = 'impor_vc' "); if (numlin_query($contr_imp_esist)) $contr_imp = ""; } # fine else if (numlin_query($contr_imp_esist) != 1) } # fine if (strcmp((string) $contr_imp,"")) if ($contr_imp) { esegui_query("delete from $tablecontratti where tipo = 'var$contr_cond' or tipo = 'cond$contr_cond' or tipo = 'vett$contr_cond' "); if ($tipo_contr_imp != "importa") { $contr_importa = esegui_query("select testo from $tablecontratti where numero = '$contr_cond' and tipo = 'impor_vc' "); if (numlin_query($contr_importa)) esegui_query("update $tablecontratti set testo = '$contr_imp' where numero = '$contr_cond' and tipo = 'impor_vc' "); else { esegui_query("insert into $tablecontratti (numero,tipo,testo) values ('$contr_cond','impor_vc','$contr_imp') "); esegui_query("update $tablecontratti set testo = '$contr_imp' where testo = '$contr_cond' and tipo = 'impor_vc' "); } # fine else if (numlin_query($contr_importa)) } # fine if ($tipo_contr_imp != "importa") else { $var_cond_importa = esegui_query("select * from $tablecontratti where tipo = 'var$contr_imp' or tipo = 'cond$contr_imp' or tipo = 'vett$contr_imp' "); $num_var_cond = numlin_query($var_cond_importa); for ($num1 = 0 ; $num1 < $num_var_cond ; $num1++) { $num_imp = risul_query($var_cond_importa,$num1,'numero'); $tipo_imp = risul_query($var_cond_importa,$num1,'tipo'); $tipo_imp = preg_replace("/[0-9]/","",$tipo_imp).$contr_cond; $testo_imp = aggslashdb(risul_query($var_cond_importa,$num1,'testo')); esegui_query("insert into $tablecontratti (numero,tipo,testo) values ('$num_imp','$tipo_imp','$testo_imp') "); } # fine for $num1 } # fine else if ($tipo_contr_imp == "sempre") } # fine if ($contr_imp) } # fine if ($contr_imp) else esegui_query("delete from $tablecontratti where numero = '$contr_cond' and tipo = 'impor_vc' "); unlock_tabelle($tabelle_lock); } # fine if (!empty($mod_contr_importa) and !empty($contr_cond)) if (!empty($aggiungi_cond)) { $mostra_form_iniziale = "NO"; $continua = "SI"; if (substr(fixstr($inizializza),0,1) == "a") { $num_arr_rip = substr($inizializza,1); $inizializza = "rar$num_arr_rip"; $arr_esistente = esegui_query("select * from $tablecontratti where (tipo = 'vett' or tipo = 'vett$contr_cond') and numero = '".aggslashdb($num_arr_rip)."'"); if (numlin_query($arr_esistente) != 1) $continua = "NO"; } # fine if (substr($inizializza,0,1) == "a") if ($inizializza != "rpt" and $inizializza != "inr" and $inizializza != "ind" and $inizializza != "ros" and $inizializza != "rca" and $inizializza != "rpa" and $inizializza != "run" and $inizializza != "rds" and preg_replace("/rar[1-9][0-9]*/","",fixstr($inizializza)) != "") $continua = "NO"; if (isset($cond_sempre) and strcmp((string) $cond_sempre,"") and $cond_sempre != "SI" and $cond_sempre != "NO") $continua = "NO"; if (fix_set($azione) != "set" and $azione != "trunc" and $azione != "oper" and $azione != "date" and $azione != "unset" and $azione != "array" and $azione != "break" and $azione != "cont") $continua = "NO"; if (!empty($oper_data) and $azione = "date") $azione = "opdat"; if ($num_se < 1 or $num_se > 80) $continua = "NO"; if ($num_se > 1 and $and_or != "and" and $and_or != "or") $continua = "NO"; if ($continua == "SI") { function controlla_var_allora (&$var_allora,&$continua,$contr_cond) { $var_allora = aggslashdb($var_allora); $var_trovata = 0; global $dati_allegato; for ($num1 = 1 ; $num1 <= $dati_allegato['num'] ; $num1++) if ((string) $var_allora == (string) (-100 - $num1)) $var_trovata = 1; if (!$var_trovata and $var_allora != "-1" and $var_allora != "-2" and $var_allora != "-3") { global $tablecontratti,$LIKE; if (substr($var_allora,0,1) != "a") $var_esistente = esegui_query("select * from $tablecontratti where (tipo = 'var' or tipo = 'var$contr_cond') and numero = '$var_allora'"); else $var_esistente = esegui_query("select * from $tablecontratti where (tipo = 'vett' or tipo = 'vett$contr_cond') and numero = '".substr($var_allora,1)."'"); if (numlin_query($var_esistente) != 1) $continua = "NO"; } # fine (!$var_trovata and $var_allora != "-1" and $var_allora != "-2" and... } # fine function controlla_var_allora function controlla_var_se (&$var_se,&$continua,$var_predef,$num_var_predef,$contr_cond) { global $tablecontratti,$LIKE; $var_se = aggslashdb(fixstr($var_se)); $var_se_trovata = "NO"; if (str_replace("(","",$var_se) == $var_se) $var_se_contr = $var_se; else { $var_se_contr = explode("(",$var_se); $var_se_contr = $var_se_contr[0]; } # fine else if (str_replace("(","",$var_se) == $var_se) $var_esistente = esegui_query("select * from $tablecontratti where ((tipo = 'var' or tipo = 'var$contr_cond') and testo $LIKE '$var_se_contr') or ((tipo = 'vett' or tipo = 'vett$contr_cond') and testo $LIKE '$var_se_contr;%')"); if (numlin_query($var_esistente) == 1) $var_se_trovata = "SI"; for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) { if ($var_predef[$num1] == $var_se) $var_se_trovata = "SI"; } # fine for $num1 if ($var_se_trovata != "SI") $continua = "NO"; return $var_se; } # fine function controlla_var_se function controlla_testo_input (&$var_txt) { $var_txt = fixstr($var_txt); if (@get_magic_quotes_gpc()) $var_txt = stripslashes($var_txt); if (defined('C_RESTRIZIONI_DEMO_ADMIN') and C_RESTRIZIONI_DEMO_ADMIN == "SI") $var_txt = htmlspecialchars($var_txt); $var_txt = str_replace("#%?","#?",$var_txt); $var_txt = str_replace("#@?","#?",$var_txt); $var_txt = str_replace("#$?","#?",$var_txt); $var_txt = str_replace("|","/",$var_txt); $var_txt = aggslashdb($var_txt); return $var_txt; } # fine function controlla_testo_input $testo = "$inizializza#@?"; $tabelle_lock = array($tablecontratti); $tabelle_lock = lock_tabelle($tabelle_lock); if (!empty($num_cond_mod) and controlla_num($num_cond_mod) != "NO") { $cond_esist = @esegui_query("select numero from $tablecontratti where numero = '".aggslashdb($num_cond_mod)."' and tipo = 'cond$contr_cond' "); if (!numlin_query($cond_esist)) $continua = "NO"; } # fine if (!empty($num_cond_mod) and controlla_num($num_cond_mod) != "NO") else $num_cond_mod = ""; if (!isset($cond_sempre) or $cond_sempre != "SI") { if ($num_se > 1) $testo .= $and_or; for ($num1 = 1 ; $num1 <= $num_se ; $num1++) { controlla_var_se(${"var_se".$num1},$continua,$var_predef,$num_var_predef,$contr_cond); if (${"cond".$num1} != "=" and ${"cond".$num1} != "!=" and ${"cond".$num1} != "mag" and ${"cond".$num1} != "min" and ${"cond".$num1} != "con" and ${"cond".$num1} != "cmm" and ${"cond".$num1} != "nco" and ${"cond".$num1} != "ncm") $continua = "NO"; if (${"cond".$num1} == "mag") ${"cond".$num1} = ">"; if (${"cond".$num1} == "min") ${"cond".$num1} = "<"; if (${"cond".$num1} == "con") ${"cond".$num1} = "{}"; if (${"cond".$num1} == "cmm") ${"cond".$num1} = "{A}"; if (${"cond".$num1} == "nco") ${"cond".$num1} = "!{}"; if (${"cond".$num1} == "ncm") ${"cond".$num1} = "!{A}"; if (${"tipo_val_se".$num1} != "txt" and ${"tipo_val_se".$num1} != "var") $continua = "NO"; if (${"tipo_val_se".$num1} == "txt") $val_se = controlla_testo_input(${"val_se_txt".$num1}); else $val_se = controlla_var_se(${"val_se_sel".$num1},$continua,$var_predef,$num_var_predef,$contr_cond); $testo .= "#$?".${"var_se".$num1}."#%?".${"cond".$num1}."#%?".${"tipo_val_se".$num1}."#%?$val_se"; } # fine for $num1 } # fine if (!isset($cond_sempre) or $cond_sempre != "SI") $testo .= "#@?"; if ($azione == "set") { if ($oper_str != "=" and $oper_str != ".=") $continua = "NO"; controlla_var_allora($var_allora,$continua,$contr_cond); if ($tipo_val_allora != "txt" and $tipo_val_allora != "var") $continua = "NO"; if ($tipo_val_allora == "txt") { $val_allora = controlla_testo_input($val_allora_txt); $oper_allora_sel = ""; } # fine if ($tipo_val_allora == "txt") else $val_allora = controlla_var_se($val_allora_sel,$continua,$var_predef,$num_var_predef,$contr_cond); if ($oper_allora_sel != "" and $oper_allora_sel != "low" and $oper_allora_sel != "upp" and $oper_allora_sel != "url" and $oper_allora_sel != "asc" and $oper_allora_sel != "eas" and $oper_allora_sel != "md5" and $oper_allora_sel != "eht" and $oper_allora_sel != "dht" and $oper_allora_sel != "e64" and $oper_allora_sel != "d64" and $oper_allora_sel != "2c0" and $oper_allora_sel != "0c2" and $oper_allora_sel != "1c0" and $oper_allora_sel != "0c1" and $oper_allora_sel != "3c0" and $oper_allora_sel != "0c3") $continua = "NO"; if (fix_set($tipo_val_sost1) != "txt" and $tipo_val_sost1 != "var") $continua = "NO"; if ($tipo_val_sost1 == "txt") $val_sost1 = controlla_testo_input($val_sost1_txt); else $val_sost1 = controlla_var_se($val_sost1_sel,$continua,$var_predef,$num_var_predef,$contr_cond); if (fix_set($tipo_val_sost2) == "txt") $val_sost2 = controlla_testo_input($val_sost2_txt); else $val_sost2 = controlla_var_se($val_sost2_sel,$continua,$var_predef,$num_var_predef,$contr_cond); $testo .= "set#%?$var_allora#%?$oper_str#%?$tipo_val_allora#%?$val_allora#%?$tipo_val_sost1#%?$val_sost1#%?$tipo_val_sost2#%?$val_sost2#%?$oper_allora_sel"; } # fine if ($azione == "set") if ($azione == "trunc") { controlla_var_allora($var_trunc,$continua,$contr_cond); if (!$val_trunc or controlla_num($val_trunc) == "NO") $continua = "NO"; $val_trunc2 = controlla_testo_input($val_trunc2); if ($pos_trunc2 != "ini" and $pos_trunc2 != "fin") $continua = "NO"; $testo .= "trunc#%?$var_trunc#%?$val_trunc#%?$val_trunc2#%?$pos_trunc2"; } # fine if ($azione == "trunc") if ($azione == "oper") { controlla_var_allora($var_oper,$continua,$contr_cond); controlla_var_se($var_oper2,$continua,$var_predef,$num_var_predef,$contr_cond); if ($operatore != "+" and $operatore != "-" and $operatore != "*" and $operatore != "/") $continua = "NO"; if ($tipo_val_oper != "txt" and $tipo_val_oper != "var") $continua = "NO"; if ($tipo_val_oper == "txt") { $val_oper = formatta_soldi($val_oper_txt); if (controlla_soldi($val_oper,"NO") == "NO") $continua = "NO"; if ($operatore == "/" and !$val_oper) $continua = "NO"; } # fine if ($tipo_val_oper == "txt") else $val_oper = controlla_var_se($val_oper_sel,$continua,$var_predef,$num_var_predef,$contr_cond); $val_arrotond = formatta_soldi($val_arrotond); if (controlla_soldi($val_arrotond) == "NO") $continua = "NO"; if ($operatore == "/" and !$val_arrotond) $continua = "NO"; if (strcmp((string) $val_arrotond,"") and !strcmp(str_replace("0","",$val_arrotond),"")) $continua = "NO"; $testo .= "oper#%?$var_oper#%?$var_oper2#%?$operatore#%?$tipo_val_oper#%?$val_oper#%?$val_arrotond"; } # fine if ($azione == "oper") if ($azione == "date") { controlla_var_allora($var_data,$continua,$contr_cond); controlla_var_se($var_data2,$continua,$var_predef,$num_var_predef,$contr_cond); if ($subdata != "gi" and $subdata != "me" and $subdata != "an" and $subdata != "gs" and $subdata != "is" and $subdata != "da") $continua = "NO"; if ($oper_giorni != "+" and $oper_giorni != "-") $continua = "NO"; if (!strcmp((string) $num_giorni,"") or controlla_num_pos($num_giorni) == "NO") $continua = "NO"; if ($num_giorni and $oper_giorni == "-") $num_giorni = ($num_giorni * -1); if ($tipo_giorni != "g" and $tipo_giorni != "m" and $tipo_giorni != "a") $continua = "NO"; $testo .= "date#%?$var_data#%?$var_data2#%?$subdata#%?$num_giorni#%?$tipo_giorni"; } # fine if ($azione == "date") if ($azione == "opdat") { controlla_var_allora($var_data,$continua,$contr_cond); controlla_var_se($var_opdat2,$continua,$var_predef,$num_var_predef,$contr_cond); controlla_var_se($var_opdat3,$continua,$var_predef,$num_var_predef,$contr_cond); if ($tipo_int != "g" and $tipo_int != "m" and $tipo_int != "a") $continua = "NO"; $testo .= "opdat#%?$var_data#%?$tipo_int#%?$var_opdat2#%?$var_opdat3"; } # fine if ($azione == "opdat") if ($azione == "unset") { if (substr($arr_azz,0,1) != "a") $continua = "NO"; controlla_var_allora($arr_azz,$continua,$contr_cond); $testo .= "unset#%?$arr_azz"; } # fine if ($azione == "unset") if ($azione == "array") { if (substr($array,0,1) != "a") $continua = "NO"; $arr_esistente = esegui_query("select * from $tablecontratti where (tipo = 'vett' or tipo = 'vett$contr_cond') and numero = '".aggslashdb(substr($array,1))."'"); if (numlin_query($arr_esistente) != 1) $continua = "NO"; else { $arr_pers_vett = explode(";",risul_query($arr_esistente,0,'testo')); $var_arr_pers = $arr_pers_vett[1]; $var_non_predef = esegui_query("select numero from $tablecontratti where (tipo = 'var' or tipo = 'var$contr_cond') and testo = '".aggslashdb($var_arr_pers)."' "); if (!numlin_query($var_non_predef)) $continua = "NO"; } # fine if (numlin_query($arr_esistente) != 1) if ($tipo_arr != "dat" and $tipo_arr != "dap" and $tipo_arr != "val" and $tipo_arr != "cop") $continua = "NO"; if ($tipo_arr == "val") $lista_val = controlla_testo_input($lista_val); else $lista_val = ""; if ($tipo_arr == "cop") { $lista_val = $array2; if (substr($array2,0,1) != "a") $continua = "NO"; $arr_esistente = esegui_query("select * from $tablecontratti where (tipo = 'vett' or tipo = 'vett$contr_cond') and numero = '".aggslashdb(substr($array2,1))."'"); if (numlin_query($arr_esistente) != 1) $continua = "NO"; } # fine if ($tipo_arr == "cop") $testo .= "array#%?$array#%?$tipo_arr#%?$lista_val"; } # fine if ($azione == "array") if ($azione == "break") { if ($break_cont != "" and $break_cont != "cont") $continua = "NO"; $testo .= "break#%?$break_cont"; } # fine if ($azione == "break") if ($azione == "cont") $testo .= "cont"; if ($continua == "SI") { if ($num_cond_mod) { esegui_query("delete from $tablecontratti where numero = '$num_cond_mod' and tipo = 'cond$contr_cond' "); $max_cond = $num_cond_mod; } # fine if ($num_cond_mod) else { $max_cond = esegui_query("select max(numero) from $tablecontratti where tipo = 'cond$contr_cond' "); if (numlin_query($max_cond) != 0) $max_cond = (risul_query($max_cond,0,0) + 1); else $max_cond = 1; } # fine else if ($num_cond_mod) esegui_query("insert into $tablecontratti (numero,tipo,testo) values ('$max_cond','cond$contr_cond','$testo')"); if (!$num_cond_mod) echo mex("Nuova condizione inserita",$pag).".<br>"; else echo ucfirst(mex("condizione modificata",$pag)).".<br>"; } # fine if ($continua == "SI") unlock_tabelle($tabelle_lock); } # fine if ($continua == "SI") if ($continua != "SI") echo mex("I dati inseriti sono <div style=\"display: inline; color: red;\">errati</div>",$pag).".<br>"; } # fine if (!empty($aggiungi_cond)) if (!empty($elimina_cond)) { $mostra_form_iniziale = "NO"; $continua = "SI"; if (controlla_num_pos($num_cond) == "NO") $continua = "NO"; if ($continua == "SI") { $tabelle_lock = array("$tablecontratti"); $tabelle_lock = lock_tabelle($tabelle_lock); esegui_query("delete from $tablecontratti where numero = '$num_cond' and tipo = 'cond$contr_cond'"); echo mex("Condizione eliminata",$pag).".<br>"; unlock_tabelle($tabelle_lock); } # fine if ($continua == "SI") if ($continua != "SI") echo mex("I dati inseriti sono <div style=\"display: inline; color: red;\">errati</div>",$pag).".<br>"; } # fine if (!empty($elimina_cond)) if ($mostra_form_iniziale == "NO") { echo "<br><form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"contr_cond\" value=\"$contr_cond\"> <input class=\"sbutton\" type=\"submit\" name=\"torna\" value=\"".mex("Torna indietro",$pag)."\"> </div></form>"; } # fine if ($mostra_form_iniziale == "NO") } # fine if (!empty($cambia_qualcosa)) if ((!empty($sposta_giu) or !empty($sposta_su)) and $num_cond and !empty($salta_a)) { $tabelle_lock = array("$tablecontratti"); $tabelle_lock = lock_tabelle($tabelle_lock); $condizioni = esegui_query("select * from $tablecontratti where tipo = 'cond$contr_cond' order by testo $LIKE 'ini%' desc, numero"); $num_condizioni = numlin_query($condizioni); $errore = 0; if ($num_cond == $salta_a) $errore = 1; if (!empty($sposta_giu) and !empty($sposta_su)) $errore = 1; unset($cond_vett); $num_cond_trovato = 0; $salta_a_trovato = 0; $tipo_cond = ""; for ($num1 = 0 ; $num1 < $num_condizioni ; $num1++) { $cond_vett[$num1] = risul_query($condizioni,$num1,'numero'); if ($cond_vett[$num1] == $num_cond) { $num_cond_trovato = 1; $pos_num_cond = $num1; if (!$tipo_cond) $tipo_cond = substr(risul_query($condizioni,$num1,'testo'),0,3); elseif ($tipo_cond != substr(risul_query($condizioni,$num1,'testo'),0,3)) $errore = 1; } # fine if ($cond_vett[$num1] == $num_cond) if ($cond_vett[$num1] == $salta_a) { $salta_a_trovato = 1; $pos_salta_a = $num1; if (!$tipo_cond) $tipo_cond = substr(risul_query($condizioni,$num1,'testo'),0,3); elseif ($tipo_cond != substr(risul_query($condizioni,$num1,'testo'),0,3)) $errore = 1; } # fine if ($cond_vett[$num1] == $salta_a) if (!empty($sposta_giu) and !$num_cond_trovato and $salta_a_trovato) $errore = 1; if (!empty($sposta_su) and $num_cond_trovato and !$salta_a_trovato) $errore = 1; } # fine for $num1 if (!$num_cond_trovato or !$salta_a_trovato) $errore = 1; if (!$errore) { esegui_query("update $tablecontratti set numero = '-1' where numero = '$num_cond' and tipo = 'cond$contr_cond' "); $ultima_cond = $num_cond; if (!empty($sposta_giu)) { for ($num1 = ($pos_num_cond + 1) ; $num1 <= $pos_salta_a ; $num1++) { esegui_query("update $tablecontratti set numero = '$ultima_cond' where numero = '".$cond_vett[$num1]."' and tipo = 'cond$contr_cond' "); $ultima_cond = $cond_vett[$num1]; } # fine for $num1 } # fine if (!empty($sposta_giu)) if (!empty($sposta_su)) { for ($num1 = ($pos_num_cond - 1) ; $num1 >= $pos_salta_a ; $num1--) { esegui_query("update $tablecontratti set numero = '$ultima_cond' where numero = '".$cond_vett[$num1]."' and tipo = 'cond$contr_cond' "); $ultima_cond = $cond_vett[$num1]; } # fine for $num1 } # fine if (!empty($sposta_su)) esegui_query("update $tablecontratti set numero = '$salta_a' where numero = '-1' and tipo = 'cond$contr_cond' "); } # fine if (!$errore) unlock_tabelle($tabelle_lock); } # fine if ((!empty($sposta_giu) or !empty($sposta_su)) and $num_cond and... if (!isset($mostra_form_iniziale) or $mostra_form_iniziale != "NO") { echo "<h3>".mex("Variabili personalizzate dei documenti",$pag)."</h3><br><br>"; $variabili_pers = esegui_query("select * from $tablecontratti where tipo = 'var' or tipo = 'var$contr_cond' order by tipo, numero"); $num_variabili_pers = numlin_query($variabili_pers); $option_var_pers = ""; $option_var_pers_tipo = ""; $nome_var['-1'] = mexv('messaggio_di_errore'); $nome_var['-2'] = mexv('errore_ripetizione'); $nome_var['-3'] = mexv('nome_documento_scaricato'); for ($num1 = 1 ; $num1 <= $dati_allegato['num'] ; $num1++) $nome_var[(-100 - $num1)] = mexv('allegato').$num1; $num_var_predef_orig = $num_var_predef; for ($num1 = 0 ; $num1 < $num_variabili_pers ; $num1++) { $var_pers = risul_query($variabili_pers,$num1,'testo'); $num_var_pers = risul_query($variabili_pers,$num1,'numero'); $option_var_pers .= "<option value=\"$num_var_pers\">$var_pers</option>"; $tipo_var_pers = risul_query($variabili_pers,$num1,'tipo'); if ($tipo_var_pers == "var") $option_var_pers_tipo .= "<option value=\"$num_var_pers\">$var_pers (".mex("tutti i documenti",$pag).")</option>"; else $option_var_pers_tipo .= "<option value=\"$num_var_pers\">$var_pers (".mex("documento",$pag)." $contr_cond)</option>"; $var_predef[$num_var_predef] = $var_pers; $num_var_predef++; $nome_var[$num_var_pers] = $var_pers; } # fine for $num1 $contr_importa_vc = ""; if ($contr_cond) { $c_imp_vc = esegui_query("select testo from $tablecontratti where numero = '$contr_cond' and tipo = 'impor_vc' "); if (numlin_query($c_imp_vc)) $contr_importa_vc = risul_query($c_imp_vc,0,'testo'); } # fine if ($contr_cond) echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"contr_cond\" value=\"$contr_cond\"> <input type=\"hidden\" name=\"cambia_qualcosa\" value=\"SI\"> ".mex("Variabili personalizzate",$pag).": "; if ($option_var_pers) { echo "<select name=\"var_pers_elimina\"> $option_var_pers_tipo </select> <input class=\"sbutton\" type=\"submit\" name=\"elimina_var_pers\" value=\"".mex("Elimina",$pag)." (".mex("anche condizioni",$pag).")\">"; unset($option_var_pers_tipo); } # fine if ($option_var_pers) echo " <input name=\"nuova_var_pers\" size=\"20\" maxlength=\"50\" type=\"text\"> <input class=\"sbutton\" type=\"submit\" name=\"aggiungi_var_pers\" value=\"".mex("Aggiungi",$pag)."\">"; if ($contr_cond and !$contr_importa_vc) echo " (<label><input type=\"checkbox\" name=\"solo_contr_cond\" value=\"SI\" checked> ".mex("solo al documento",$pag)." $contr_cond</label>)"; echo "</div></form><br>"; $array_pers = esegui_query("select * from $tablecontratti where tipo = 'vett' or tipo = 'vett$contr_cond' order by tipo, numero"); $num_array_pers = numlin_query($array_pers); $option_arr_pers = ""; $opt_arr_var_non_predef = ""; for ($num1 = 0 ; $num1 < $num_array_pers ; $num1++) { $arr_pers_vett = explode(";",risul_query($array_pers,$num1,'testo')); $arr_pers = $arr_pers_vett[0]; $var_arr_pers = $arr_pers_vett[1]; $num_arr_pers = risul_query($array_pers,$num1,'numero'); $option_arr_pers .= "<option value=\"a$num_arr_pers\">$arr_pers(".mexv($var_arr_pers).")</option>"; $var_non_predef = esegui_query("select numero from $tablecontratti where (tipo = 'var' or tipo = 'var$contr_cond') and testo = '".aggslashdb($var_arr_pers)."' "); if (numlin_query($var_non_predef)) $opt_arr_var_non_predef .= "<option value=\"a$num_arr_pers\">$arr_pers($var_arr_pers)</option>"; $var_predef[$num_var_predef] = "$arr_pers($var_arr_pers)"; $num_var_predef++; $nome_var["a$num_arr_pers"] = "$arr_pers(".mexv($var_arr_pers).")"; } # fine for $num1 $option_var_pers .= $option_arr_pers; echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"contr_cond\" value=\"$contr_cond\"> <input type=\"hidden\" name=\"cambia_qualcosa\" value=\"SI\"> ".mex("Array personalizzati",$pag).": "; if ($option_arr_pers) { echo "<select name=\"arr_pers_elimina\"> $option_arr_pers </select> <input class=\"sbutton\" type=\"submit\" name=\"elimina_arr_pers\" value=\"".mex("Elimina",$pag)."\">"; } # fine if ($option_arr_pers) echo " <input name=\"nuovo_arr_pers\" size=\"20\" maxlength=\"50\" type=\"text\"> <input class=\"sbutton\" type=\"submit\" name=\"aggiungi_arr_pers\" value=\"".mex("Aggiungi",$pag)."\">"; if ($contr_cond and !$contr_importa_vc) echo " (<label><input type=\"checkbox\" name=\"solo_contr_cond\" value=\"SI\" checked> ".mex("solo al documento",$pag)." $contr_cond</label>)"; echo "</div></form><br>"; $contratti = esegui_query("select * from $tablecontratti where tipo $LIKE 'contr%' order by numero"); $num_contratti = numlin_query($contratti); $nomi_contratti = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'nomi_contratti' and idutente = '$id_utente'"); $nomi_contratti = explode("#@&",risul_query($nomi_contratti,0,'valpersonalizza')); $num_nomi_contratti = count($nomi_contratti); for ($num1 = 0 ; $num1 < $num_nomi_contratti ; $num1++) { $dati_nome_contratto = explode("#?&",$nomi_contratti[$num1]); $nome_contratto[$dati_nome_contratto[0]] = fixset($dati_nome_contratto[1]); } # fine for $num1 if (!$contr_cond) { $sel = " selected"; $frase_cond_contr = mex("a tutti i documenti",$pag); $input_cond_contr = ""; } # fine if (!$contr_cond) else $sel = ""; $opt_contr = "<option value=\"\"$sel>".mex("a tutti i documenti",$pag)."</option>"; for ($num1 = 0 ; $num1 < $num_contratti ; $num1++) { $num_contr = risul_query($contratti,$num1,'numero'); if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") { $mod_doc_corr = 1; if ($priv_mod_doc_api != "s") { $api_esistente = esegui_query("select * from $tablecontratti where numero = '".aggslashdb($num_contr)."' and tipo = 'api'"); if (numlin_query($api_esistente)) $mod_doc_corr = 0; } # fine if ($priv_mod_doc_api != "s") if ($mod_doc_corr) { if ($contr_cond == $num_contr) { $sel = " selected"; $frase_cond_contr = mex("al documento",$pag)." $num_contr"; if (!empty($nome_contratto[$num_contr])) $frase_cond_contr .= " (".$nome_contratto[$num_contr].")"; $input_cond_contr = "<input type=\"hidden\" name=\"contr_cond\" value=\"$num_contr\">"; } # fine if ($contr_cond == $num_contr) else $sel = ""; $opt_contr .= "<option value=\"$num_contr\"$sel>".mex("al documento",$pag)." $num_contr"; if (!empty($nome_contratto[$num_contr])) $opt_contr .= " (".$nome_contratto[$num_contr].")"; $opt_contr .= "</option>"; } # fine if ($mod_doc_corr) } # fine if ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI") } # fine for $num1 echo "<br><form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> ".mex("Modifica le condizioni applicate",$pag)." <select name=\"contr_cond\"> $opt_contr</select> <input class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica",$pag)."\"> </div></form>"; if ($option_var_pers) { function rowbgcolor () { global $rowbgcolor,$t2row1color,$t2row2color; if ($rowbgcolor == $t2row2color) $rowbgcolor = $t2row1color; else $rowbgcolor = $t2row2color; return $rowbgcolor; } # fine function rowbgcolor $num_rip_a = 0; $num_cond_rip_a = array(); $num_cond_rip_a[1] = 0; $ordine_rar = ""; $condizioni_rar = esegui_query("select * from $tablecontratti where tipo = 'cond$contr_cond' and testo $LIKE 'rar%' order by testo"); $num_condizioni_rar = numlin_query($condizioni_rar); for ($num1 = 0 ; $num1 < $num_condizioni_rar ; $num1++) { $cond = risul_query($condizioni_rar,$num1,'testo'); $num_arr_rip = substr($cond,3,(strlen(strstr($cond,"#@?")) * -1)); if (empty($num_cond_rip_a['num'][$num_arr_rip])) { $num_rip_a++; $num_cond_rip_a['num'][$num_arr_rip] = $num_rip_a; $num_cond_rip_a['arr'][$num_rip_a] = $num_arr_rip; $ordine_rar .= ", testo $LIKE 'rar$num_arr_rip%' desc"; } # fine if (empty($num_cond_rip_a['num'][$num_arr_rip])) } # fine for $num1 $azione_orig = fixset($azione); $num_cond_mod_vedi = ""; $condizioni = esegui_query("select * from $tablecontratti where tipo = 'cond$contr_cond' order by testo $LIKE 'ind%' desc, testo $LIKE 'inr%' desc, testo $LIKE 'rpt%' desc, testo $LIKE 'ros%' desc, testo $LIKE 'rca%' desc, testo $LIKE 'rpa%' desc, testo $LIKE 'run%' desc, testo $LIKE 'rds%' desc$ordine_rar, numero"); $num_condizioni = numlin_query($condizioni); $num_cond_ini_d = 0; $num_cond_ini_r = 0; $num_cond_rpt = 0; $num_cond_rip_o = 0; $num_cond_rip_c = 0; $num_cond_rip_p = 0; $num_cond_rip_u = 0; $num_cond_rip_d = 0; for ($num1 = 0 ; $num1 < $num_condizioni ; $num1++) { $n_cond = risul_query($condizioni,$num1,'numero'); $cond = risul_query($condizioni,$num1,'testo'); if (substr($cond,0,3) == "ind") $num_cond_ini_d = $num1 + 1; if (substr($cond,0,3) == "inr") $num_cond_ini_r = $num1 + 1; if (substr($cond,0,3) == "rpt") $num_cond_rpt = $num1 + 1; if (substr($cond,0,3) == "ros") $num_cond_rip_o = $num1 + 1; if (substr($cond,0,3) == "rca") $num_cond_rip_c = $num1 + 1; if (substr($cond,0,3) == "rpa") $num_cond_rip_p = $num1 + 1; if (substr($cond,0,3) == "run") $num_cond_rip_u = $num1 + 1; if (substr($cond,0,3) == "rds") $num_cond_rip_d = $num1 + 1; if (substr($cond,0,3) == "rar") { $num_arr_rip = substr($cond,3,(strlen(strstr($cond,"#@?")) * -1)); $num_cond_rip_a[$num_cond_rip_a['num'][$num_arr_rip]] = $num1 + 1; } # fine if (substr($cond,0,3) == "rar") if (isset($num_cond) and $n_cond == $num_cond) $num_cond_passa = $num1; $cond_vett[$num1] = $n_cond; } # fine for $num1 if ($num_cond_ini_r < $num_cond_ini_d) $num_cond_ini_r = $num_cond_ini_d; if ($num_cond_rpt < $num_cond_ini_r) $num_cond_rpt = $num_cond_ini_r; if ($num_cond_rip_o < $num_cond_rpt) $num_cond_rip_o = $num_cond_rpt; if ($num_cond_rip_c < $num_cond_rip_o) $num_cond_rip_c = $num_cond_rip_o; if ($num_cond_rip_p < $num_cond_rip_c) $num_cond_rip_p = $num_cond_rip_c; if ($num_cond_rip_u < $num_cond_rip_p) $num_cond_rip_u = $num_cond_rip_p; if ($num_cond_rip_d < $num_cond_rip_u) $num_cond_rip_d = $num_cond_rip_u; if ($num_cond_rip_a[1] < $num_cond_rip_d) $num_cond_rip_a[1] = $num_cond_rip_d; for ($num1 = 1 ; $num1 < $num_rip_a ; $num1++) if ($num_cond_rip_a[($num1 + 1)] < $num_cond_rip_a[$num1]) $num_cond_rip_a[($num1 + 1)] = $num_cond_rip_a[$num1]; if (!empty($num_cond) and $num_cond_passa < 20) echo "<a name=\"condizioni\"></a>"; echo "<div class=\"rbox\">".mex("<b>Condizioni</b> applicate",$pag)." $frase_cond_contr:<br> <table><tr><td style=\"height: 5px;\"></td></tr></table>"; if ($num_condizioni > 0) { echo "<table>"; for ($num1 = 0 ; $num1 < $num_condizioni ; $num1++) { $condizione = risul_query($condizioni,$num1,'testo'); $num_cond = risul_query($condizioni,$num1,'numero'); $condizione = explode("#@?",$condizione); $azione = explode("#%?",$condizione[2]); if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $num_cond_mod_vedi = ($num1 + 1); $inizializza = $condizione[0]; $azione_orig = $azione[0]; $num_cond_mod_orig = $num_cond_mod; if (!empty($agg_se) or !empty($canc_se)) $num_cond_mod = ""; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) if ($num1 == $num_cond_rpt and $condizione[0] == "ros") echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni degli ospiti",$pag)." (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; if ($num1 == $num_cond_rip_o and $condizione[0] == "rca") echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni dei costi aggiuntivi",$pag)." (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; if ($num1 == $num_cond_rip_c and $condizione[0] == "rpa") echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni dei pagamenti",$pag)." (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; if ($num1 == $num_cond_rip_p and $condizione[0] == "run") echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni delle unità",$pag)." (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; if ($num1 == $num_cond_rip_u and $condizione[0] == "rds") echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni dei documenti salvati",$pag)." (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; if ($num1 == $num_cond_rip_d and $condizione[0] == "rar".$num_cond_rip_a['arr'][1]) echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni dell'array",$pag)." [".$nome_var["a".$num_cond_rip_a['arr'][1]]."] (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; for ($num2 = 1 ; $num2 < $num_rip_a ; $num2++) if ($num1 == $num_cond_rip_a[$num2] and $condizione[0] == "rar".$num_cond_rip_a['arr'][($num2 + 1)]) echo "</table><br>".mex("Condizioni applicate",$pag)." ".mex("solo nelle ripetizioni dell'array",$pag)." [".$nome_var["a".$num_cond_rip_a['arr'][($num2 + 1)]]."] (<em>".mex("tutte le altre condizioni non verranno più applicate in queste ripetizioni",$pag)."</em>):<br><table>"; echo "<tr style=\"background-color: ".rowbgcolor().";\"><td><b>".($num1 + 1)."</b>. "; if (isset($num_cond_passa) and $num_cond_passa == ($num1 + 20)) echo "<a name=\"condizioni\"></a>"; $str_cond = ""; if ($condizione[1]) { $se_cond = explode("#$?",$condizione[1]); $num_se_cond = count($se_cond); if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $cond_sempre = "NO"; $num_se = ($num_se_cond - 1); $and_or = $se_cond[0]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) for ($num2 = 1 ; $num2 < $num_se_cond ; $num2++) { $se_cond_corr = explode("#%?",$se_cond[$num2]); if ($num2 > 1) { if ($se_cond[0] == "or") $str_cond .= "".mex("o",$pag).""; else $str_cond .= "".mex("e",$pag).""; } # fine if ($num2 > 1) else $str_cond .= mex("se",$pag); $str_cond .= " [".mexv($se_cond_corr[0])."] "; if ($se_cond_corr[1] == "=") $str_cond .= mex("è uguale a",$pag); if ($se_cond_corr[1] == "!=") $str_cond .= mex("è diverso da",$pag); if ($se_cond_corr[1] == ">") $str_cond .= mex("è maggiore di",$pag); if ($se_cond_corr[1] == "<") $str_cond .= mex("è minore di",$pag); if ($se_cond_corr[1] == "{}") $str_cond .= mex("contiene",$pag); if ($se_cond_corr[1] == "{A}") $str_cond .= mex("contiene",$pag)." (".mex("maiusc./minusc.",$pag).")"; if ($se_cond_corr[1] == "!{}") $str_cond .= mex("non contiene",$pag); if ($se_cond_corr[1] == "!{A}") $str_cond .= mex("non contiene",$pag)." (".mex("maiusc./minusc.",$pag).")"; if ($se_cond_corr[2] == "var") $str_cond .= " [".mexv($se_cond_corr[3])."] "; else $str_cond .= " \"".htmlspecialchars($se_cond_corr[3])."\" "; if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { ${"var_se".$num2} = $se_cond_corr[0]; ${"cond".$num2} = $se_cond_corr[1]; if (${"cond".$num2} == ">") ${"cond".$num2} = "mag"; if (${"cond".$num2} == "<") ${"cond".$num2} = "min"; if (${"cond".$num2} == "{}") ${"cond".$num2} = "con"; if (${"cond".$num2} == "{A}") ${"cond".$num2} = "cmm"; if (${"cond".$num2} == "!{}") ${"cond".$num2} = "nco"; if (${"cond".$num2} == "!{A}") ${"cond".$num2} = "ncm"; ${"tipo_val_se".$num2} = $se_cond_corr[2]; if ($se_cond_corr[2] == "var") ${"val_se_sel".$num2} = $se_cond_corr[3]; else ${"val_se_txt".$num2} = $se_cond_corr[3]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine for $num2 $str_cond .= mex("allora",$pag)." "; } # fine if ($condizione[1]) if ($azione[0] == "set") { $str_cond .= mex("porre",$pag)." [".$nome_var[$azione[1]]."] "; if ($azione[2] == "=") $str_cond .= mex("uguale a",$pag); if ($azione[2] == ".=") $str_cond .= mex("concatenato con",$pag); if ($azione[3] == "var") { $str_cond .= " [".mexv($azione[4])."]"; if ($azione[9] == "low") $str_cond .= " ".mex("in minuscole",$pag); if ($azione[9] == "upp") $str_cond .= " ".mex("in maiuscole",$pag); if ($azione[9] == "url") $str_cond .= " ".mex("codificato per URL",$pag); if ($azione[9] == "asc") $str_cond .= " ".mex("codificato in ASCII",$pag); if ($azione[9] == "eas") $str_cond .= " ".mex("in ASCII esteso",$pag); if ($azione[9] == "md5") $str_cond .= " ".mex("codificato con MD5",$pag); if ($azione[9] == "eht") $str_cond .= " ".mex("codificato in HTML",$pag); if ($azione[9] == "dht") $str_cond .= " ".mex("decodificato da HTML",$pag); if ($azione[9] == "e64") $str_cond .= " ".mex("codificato in MIME base64",$pag); if ($azione[9] == "d64") $str_cond .= " ".mex("decodificato da MIME base64",$pag); if ($azione[9] == "0c1") $str_cond .= " ".mex("convertito da base",$pag)."10 ".mex("a base",$pag)."2"; if ($azione[9] == "1c0") $str_cond .= " ".mex("convertito da base",$pag)."2 ".mex("a base",$pag)."10"; if ($azione[9] == "0c2") $str_cond .= " ".mex("convertito da base",$pag)."10 ".mex("a base",$pag)."16"; if ($azione[9] == "2c0") $str_cond .= " ".mex("convertito da base",$pag)."16 ".mex("a base",$pag)."10"; if ($azione[9] == "0c3") $str_cond .= " ".mex("convertito da base",$pag)."10 ".mex("a base",$pag)."36"; if ($azione[9] == "3c0") $str_cond .= " ".mex("convertito da base",$pag)."36 ".mex("a base",$pag)."10"; } # fine if ($azione[3] == "var") else $str_cond .= " \"".htmlspecialchars($azione[4])."\""; if (strcmp((string) $azione[6],"")) { $str_cond .= " ".mex("sostituendo",$pag)." "; if ($azione[5] == "var") $str_cond .= "[".mexv($azione[6])."]"; else $str_cond .= "\"".htmlspecialchars($azione[6])."\""; $str_cond .= " ".mex("con",$pag)." "; if ($azione[7] == "var") $str_cond .= "[".mexv($azione[8])."]"; else $str_cond .= "\"".htmlspecialchars($azione[8])."\""; } # fine if (strcmp((string) $azione[6],"")) if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $oper_str = $azione[2]; $var_allora = $azione[1]; $tipo_val_allora = $azione[3]; if ($azione[3] == "var") $val_allora_sel = $azione[4]; else $val_allora_txt = $azione[4]; $tipo_val_sost1 = $azione[5]; if ($azione[5] == "var") $val_sost1_sel = $azione[6]; else $val_sost1_txt = $azione[6]; $tipo_val_sost2 = $azione[7]; if ($azione[7] == "var") $val_sost2_sel = $azione[8]; else $val_sost2_txt = $azione[8]; $oper_allora_sel = $azione[9]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine if ($azione[0] == "set") if ($azione[0] == "trunc") { $str_cond .= mex("troncare",$pag)." [".$nome_var[$azione[1]]."] "; if ($azione[2] < 0) $str_cond .= mex("prima di",$pag)." ".($azione[2] * -1); else $str_cond .= mex("dopo",$pag)." ".$azione[2]; $str_cond .= " ".mex("caratteri",$pag); if (strcmp((string) $azione[3],"")) { $str_cond .= " (".mex("riempiendo i mancanti con",$pag)." \"".htmlspecialchars($azione[3])."\""; if ($azione[4] == "ini") $str_cond .= " ".mex("all'inizio",$pag); if ($azione[4] == "fin") $str_cond .= " ".mex("alla fine",$pag); $str_cond .= ")"; } # fine if (strcmp((string) $azione[3],"")) if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $var_trunc = $azione[1]; $val_trunc = $azione[2]; $val_trunc2 = $azione[3]; $pos_trunc2 = $azione[4]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine if ($azione[0] == "trunc") if ($azione[0] == "oper") { $str_cond .= mex("porre",$pag)." [".$nome_var[$azione[1]]."] ".mex("uguale a",$pag); $str_cond .= " [".mexv($azione[2])."] "; $str_cond .= $azione[3]." "; if ($azione[4] == "var") $str_cond .= "[".mexv($azione[5])."]"; else $str_cond .= $azione[5]; if (strcmp((string) $azione[6],"")) $str_cond .= " (".mex("arrotondato a",$pag)." ".$azione[6].")"; if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $var_oper = $azione[1]; $var_oper2 = $azione[2]; $operatore = $azione[3]; $tipo_val_oper = $azione[4]; if ($azione[4] == "var") $val_oper_sel = $azione[5]; else $val_oper_txt = $azione[5]; $val_arrotond = $azione[6]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine if ($azione[0] == "oper") if ($azione[0] == "date") { $str_cond .= mex("porre",$pag)." [".$nome_var[$azione[1]]."] ".mex("uguale a",$pag)." \""; if ($azione[3] == "gi") $str_cond .= mex("il giorno",$pag); if ($azione[3] == "me") $str_cond .= mex("il mese",$pag); if ($azione[3] == "an") $str_cond .= mex("l'anno",$pag); if ($azione[3] == "gs") $str_cond .= mex("il giorno della settimana",$pag); if ($azione[3] == "is") $str_cond .= mex("la data",$pag)." (".mex("formato ISO",$pag).")"; if ($azione[3] == "da") $str_cond .= mex("la data",$pag)." (".mex("formato corrente",$pag).")"; $str_cond .= "\" ".mex("della data",$pag)." [".mexv($azione[2])."]"; if ($azione[4]) { if ($azione[4] < 0) $str_cond .= " - ".($azione[4] * -1)." "; else $str_cond .= " + ".$azione[4]." "; if ($azione[5] == "g") $str_cond .= mex("giorni",$pag); if ($azione[5] == "m") $str_cond .= mex("mesi",$pag); if ($azione[5] == "a") $str_cond .= mex("anni",$pag); } # fine if ($azione[4]) if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $var_data = $azione[1]; $var_data2 = $azione[2]; $subdata = $azione[3]; $num_giorni = $azione[4]; if ($num_giorni < 0) { $num_giorni = ($num_giorni * -1); $oper_giorni = "-"; } # fine if ($num_giorni < 0) else $oper_giorni = "+"; $tipo_giorni = $azione[5]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine if ($azione[0] == "date") if ($azione[0] == "opdat") { $str_cond .= mex("porre",$pag)." [".$nome_var[$azione[1]]."] ".mex("uguale al numero di",$pag)." \""; if ($azione[2] == "g") $str_cond .= mex("giorni",$pag); if ($azione[2] == "m") $str_cond .= mex("mesi",$pag); if ($azione[2] == "a") $str_cond .= mex("anni",$pag); $str_cond .= "\" ".mex("dalla data",$pag)." [".mexv($azione[3])."]"; $str_cond .= " ".mex("alla data",$pag)." [".mexv($azione[4])."]"; if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $var_data = $azione[1]; $tipo_int = $azione[2]; $var_opdat2 = $azione[3]; $var_opdat3 = $azione[4]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine if ($azione[0] == "opdat") if ($azione[0] == "unset") { $str_cond .= mex("azzera l'array",$pag)." [".$nome_var[$azione[1]]."]"; if (isset($num_cond_mod) and $num_cond_mod == $num_cond) $arr_azz = $azione[1]; } # fine if ($azione[0] == "unset") if ($azione[0] == "array") { $str_cond .= mex("assegna all'array",$pag)." [".$nome_var[$azione[1]]."] "; if ($azione[2] == "dat") $str_cond .= mex("valori progressivi tra le date selezionate",$pag); if ($azione[2] == "dap") $str_cond .= mex("valori progressivi tra il primo arrivo e l'ultima partenza",$pag); if ($azione[2] == "val") $str_cond .= mex("i valori",$pag)." \"".htmlspecialchars(str_replace(",",", ",$azione[3]))."\""; if ($azione[2] == "cop") $str_cond .= mex("i valori dell'array",$pag)." [".$nome_var[$azione[3]]."]"; if (isset($num_cond_mod) and $num_cond_mod == $num_cond) { $array = $azione[1]; $tipo_arr = $azione[2]; if ($azione[2] == "val") $lista_val = $azione[3]; if ($azione[2] == "cop") $array2 = $azione[3]; } # fine if (isset($num_cond_mod) and $num_cond_mod == $num_cond) } # fine if ($azione[0] == "array") if ($azione[0] == "break") { $str_cond .= mex("non processare le condizioni successive",$pag); if ($azione[1] == "cont") $str_cond .= " ".mex("fino al prossimo "riprendi"",$pag); if (isset($num_cond_mod) and $num_cond_mod == $num_cond) $break_cont = $azione[1]; } # fine if ($azione[0] == "array") if ($azione[0] == "cont") $str_cond .= mex("riprendi a processare le condizioni successive",$pag); if ($condizione[0] == "inr") $str_cond .= " ".mex("solo all'inizio delle ripetizioni delle prenotazioni",$pag); if ($condizione[0] == "ind") $str_cond .= " ".mex("solo all'inizio del documento",$pag); if ($condizione[0] == "ros") $str_cond .= " ".mex("solo nelle ripetizioni degli ospiti",$pag); if ($condizione[0] == "rca") $str_cond .= " ".mex("solo nelle ripetizioni dei costi aggiuntivi",$pag); if ($condizione[0] == "rpa") $str_cond .= " ".mex("solo nelle ripetizioni dei pagamenti",$pag); if ($condizione[0] == "run") $str_cond .= " ".mex("solo nelle ripetizioni delle unità",$pag); if ($condizione[0] == "rds") $str_cond .= " ".mex("solo nelle ripetizioni dei documenti salvati",$pag); if (substr($condizione[0],0,3) == "rar") $str_cond .= " ".mex("solo nelle ripetizioni dell'array",$pag)." [".$nome_var["a".substr($condizione[0],3)]."]"; echo ucfirst($str_cond).".</td>"; $fine_cond_rip_a = 0; for ($num2 = 1 ; $num2 <= $num_rip_a ; $num2++) if ($num1 == ($num_cond_rip_a[$num2] - 1)) $fine_cond_rip_a = 1; if ($num1 != ($num_condizioni - 1) and $num1 != ($num_cond_ini_r - 1) and $num1 != ($num_cond_ini_d - 1) and $num1 != ($num_cond_rpt - 1) and $num1 != ($num_cond_rip_o - 1) and $num1 != ($num_cond_rip_c - 1) and $num1 != ($num_cond_rip_p - 1) and $num1 != ($num_cond_rip_u - 1) and $num1 != ($num_cond_rip_d - 1) and !$fine_cond_rip_a) { $opt_giu = ""; $fine_opt = $num_condizioni; for ($num2 = $num_rip_a ; $num2 > 0 ; $num2--) if ($num1 < ($num_cond_rip_a[$num2] - 1)) $fine_opt = $num_cond_rip_a[$num2]; if ($num1 < ($num_cond_rip_d - 1)) $fine_opt = $num_cond_rip_d; if ($num1 < ($num_cond_rip_u - 1)) $fine_opt = $num_cond_rip_u; if ($num1 < ($num_cond_rip_p - 1)) $fine_opt = $num_cond_rip_p; if ($num1 < ($num_cond_rip_c - 1)) $fine_opt = $num_cond_rip_c; if ($num1 < ($num_cond_rip_o - 1)) $fine_opt = $num_cond_rip_o; if ($num1 < ($num_cond_rpt - 1)) $fine_opt = $num_cond_rpt; if ($num1 < ($num_cond_ini_r - 1)) $fine_opt = $num_cond_ini_r; if ($num1 < ($num_cond_ini_d - 1)) $fine_opt = $num_cond_ini_d; for ($num2 = ($num1 + 2) ; $num2 <= $fine_opt ; $num2++) $opt_giu .= "<option value=\"".$cond_vett[($num2 - 1)]."\">$num2</option>"; echo "<td><form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#condizioni\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <input type=\"hidden\" name=\"sposta_giu\" value=\"SI\"> <input type=\"hidden\" name=\"num_cond\" value=\"$num_cond\"> <table cellspacing=0><tr><td><select class=\"smallsel\" name=\"salta_a\">$opt_giu</select></td><td> <button type=\"submit\"> <img style=\"display: block;\" src=\"./img/freccia_giu_marg.png\" alt=\"<\"> </button></td></tr></table></div></form></td>"; } # fine if ($num1 != ($num_condizioni - 1) and $num1 != ($num_cond_ini_r - 1) and... else echo "<td></td>"; $fine_cond_rip_a = 0; for ($num2 = 1 ; $num2 <= $num_rip_a ; $num2++) if ($num1 == $num_cond_rip_a[$num2]) $fine_cond_rip_a = 1; if ($num1 != 0 and $num1 != $num_cond_ini_r and $num1 != $num_cond_ini_d and $num1 != $num_cond_rpt and $num1 != $num_cond_rip_o and $num1 != $num_cond_rip_c and $num1 != $num_cond_rip_p and $num1 != $num_cond_rip_u and $num1 != $num_cond_rip_d and !$fine_cond_rip_a) { $opt_su = ""; $fine_opt = 1; if ($num1 > $num_cond_ini_d) $fine_opt = ($num_cond_ini_d + 1); if ($num1 > $num_cond_ini_r) $fine_opt = ($num_cond_ini_r + 1); if ($num1 > $num_cond_rpt) $fine_opt = ($num_cond_rpt + 1); if ($num1 > $num_cond_rip_o) $fine_opt = ($num_cond_rip_o + 1); if ($num1 > $num_cond_rip_c) $fine_opt = ($num_cond_rip_c + 1); if ($num1 > $num_cond_rip_p) $fine_opt = ($num_cond_rip_p + 1); if ($num1 > $num_cond_rip_u) $fine_opt = ($num_cond_rip_u + 1); if ($num1 > $num_cond_rip_d) $fine_opt = ($num_cond_rip_d + 1); for ($num2 = 1 ; $num2 <= $num_rip_a ; $num2++) if ($num1 > $num_cond_rip_a[$num2]) $fine_opt = ($num_cond_rip_a[$num2] + 1); for ($num2 = $num1 ; $num2 >= $fine_opt ; $num2--) $opt_su .= "<option value=\"".$cond_vett[($num2 - 1)]."\">$num2</option>"; echo "<td><form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#condizioni\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <input type=\"hidden\" name=\"sposta_su\" value=\"SI\"> <input type=\"hidden\" name=\"num_cond\" value=\"$num_cond\"> <table cellspacing=0><tr><td><button type=\"submit\"> <img style=\"display: block;\" src=\"./img/freccia_su_marg.png\" alt=\">\"> </button></td><td><select class=\"smallsel\" name=\"salta_a\">$opt_su</select> </td></tr></table></div></form></td>"; } # fine if ($num1 != 0 and $num1 != $num_cond_ini_r and $num1 != $num_cond_ini_d and... else echo "<td></td>"; echo "<td><form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#modcond\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <input type=\"hidden\" name=\"num_cond_mod\" value=\"$num_cond\"> <input class=\"smallsbutton\" type=\"submit\" value=\"".mex("Modifica",$pag)."\"> </div></form></td> <td><form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#condizioni\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <input type=\"hidden\" name=\"cambia_qualcosa\" value=\"SI\"> <input type=\"hidden\" name=\"num_cond\" value=\"$num_cond\"> <input class=\"smallsbutton\" type=\"submit\" name=\"elimina_cond\" value=\"".mex("Elimina",$pag)."\"> </div></form></td></tr>"; if (isset($num_cond_mod_orig) and $num_cond_mod_orig == $num_cond) $num_cond_mod = $num_cond_mod_orig; } # fine for $num1 echo "</table>"; } # fine if ($num_condizioni > 0) else echo "<br>"; echo "</div><br>"; $azione = $azione_orig; if (!$num_cond_mod_vedi) $num_cond_mod = ""; } # fine if ($option_var_pers) if ($contr_cond) { $opt_contr_imp = ""; for ($num1 = 0 ; $num1 < $num_contratti ; $num1++) { $num_contr = risul_query($contratti,$num1,'numero'); if ($contr_cond != $num_contr and ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$num_contr] == "SI" or $num_contr == $contr_importa_vc)) { $contr_imp_esist = esegui_query("select numero from $tablecontratti where numero = '$num_contr' and tipo = 'impor_vc' "); if (!numlin_query($contr_imp_esist)) { if ($num_contr == $contr_importa_vc) $sel = " selected"; else $sel = ""; $opt_contr_imp .= "<option value=\"$num_contr\"$sel>$num_contr"; if (!empty($nome_contratto[$num_contr])) $opt_contr_imp .= " (".$nome_contratto[$num_contr].")"; $opt_contr_imp .= "</option>"; } # fine if (!numlin_query($contr_imp_esist)) } # fine if ($contr_cond != $num_contr and... } # fine for $num1 if ($opt_contr_imp) { if (!$contr_importa_vc) $sel = " selected"; else $sel = ""; echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <input type=\"hidden\" name=\"cambia_qualcosa\" value=\"SI\"> <input type=\"hidden\" name=\"mod_contr_importa\" value=\"SI\">"; if ($contr_importa_vc) echo "".mex("Utilizza sempre",$pag).""; else echo "<select name=\"tipo_contr_imp\"> <option value=\"sempre\">".mex("Utilizza sempre",$pag)."</option> <option value=\"importa\">".mex("Importa ora",$pag)."</option> </select>"; echo " ".mex("variabili e condizioni del documento",$pag)." <select name=\"contr_imp\"> <option value=\"\">----</option> $opt_contr_imp</select> <input class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica",$pag)."\"> </div></form>"; if (isset($num_condizioni) and $num_condizioni > 0) echo "<small> (".mex("le variabili e condizioni attuali verranno cancellate",$pag).")</small>"; if ($contr_importa_vc and ($attiva_contratti_consentiti == "n" or $contratti_consentiti_vett[$contr_importa_vc] == "SI")) { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"contr_cond\" value=\"$contr_importa_vc\"> <input class=\"sbutton\" type=\"submit\" value=\"".mex("Visualizza le condizioni del documento",$pag)." $contr_importa_vc\"> </div></form>"; } # fine if ($contr_importa_vc and... echo "<br><br>"; } # fine if ($opt_contr_imp) } # fine if ($contr_cond) if($option_var_pers and !$contr_importa_vc) { for ($num1 = 1 ; $num1 <= $dati_allegato['num'] ; $num1++) $option_var_pers .= "<option value=\"".(-100 - $num1)."\">".mexv('allegato')."$num1</option>"; $option_var_pers .= "<option value=\"-3\">".mexv('nome_documento_scaricato')."</option> <option value=\"-2\">".mexv('errore_ripetizione')."</option> <option value=\"-1\">".mexv('messaggio_di_errore')."</option>"; $option_var_predef = ""; $option_var_predef_data = ""; for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) { $option_var_predef .= "<option value=\"".$var_predef[$num1]."\">".mexv($var_predef[$num1])."</option>"; if (!empty($var_predef_data[$var_predef[$num1]]) or $num1 >= $num_var_predef_orig) $option_var_predef_data .= "<option value=\"".$var_predef[$num1]."\">".mexv($var_predef[$num1])."</option>"; } # fine for $num1 if (empty($num_se)) $num_se = 1; if ($num_se > 2 and empty($and_or)) $num_se = 1; $sel_rip = ""; $sel_inirip = ""; $sel_inidoc = ""; $sel_iniros = ""; $sel_inirca = ""; $sel_inirpa = ""; $sel_inirun = ""; $sel_inirds = ""; if (empty($inizializza) or $inizializza == "rpt") $sel_rip = " selected"; else { if ($inizializza == "inr") $sel_inirip = " selected"; if ($inizializza == "ind") $sel_inidoc = " selected"; if ($inizializza == "ros") $sel_iniros = " selected"; if ($inizializza == "rca") $sel_inirca = " selected"; if ($inizializza == "rpa") $sel_inirpa = " selected"; if ($inizializza == "run") $sel_inirun = " selected"; if ($inizializza == "rds") $sel_inirds = " selected"; } # fine else if (empty($inizializza) or $inizializza == "rpt") $option_arr_rip = str_replace("\">","\">".mex("solo nelle ripetizioni dell'array",$pag)." ",$option_arr_pers); if (isset($inizializza) and substr($inizializza,0,3) == "rar") { $num_arr_rip = substr($inizializza,3); $option_arr_rip = str_replace("\"a".$num_arr_rip."\"","\"a".$num_arr_rip."\" selected",$option_arr_rip); } # fine if (isset($inizializza) and substr($inizializza,0,3) == "rar") echo "<div class=\"rbox\" style=\"padding-top: 8px;\"> <a name=\"modcond\"></a> <form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#modcond\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <input type=\"hidden\" name=\"cambia_qualcosa\" value=\"SI\"> <input type=\"hidden\" name=\"aggiungi_cond\" value=\"SI\"> <input type=\"hidden\" name=\"num_se\" value=\"$num_se\"> <input type=\"hidden\" name=\"and_or\" value=\"".htmlspecialchars(fixstr($and_or))."\"> <input type=\"hidden\" name=\"num_cond_mod\" value=\"$num_cond_mod\">"; if (!$num_cond_mod) echo "<b>".ucfirst(mex("nuova condizione",$pag))."</b> ".mex("da applicare",$pag); else echo "".ucfirst(mex("modifica la condizione",$pag))." <b>$num_cond_mod_vedi</b> ".mex("da applicare",$pag); echo " <select name=\"inizializza\"> <option value=\"rpt\"$sel_rip>".mex("in tutte le ripetizioni delle prenotazioni",$pag)."</option> <option value=\"inr\"$sel_inirip>".mex("solo all'inizio delle ripetizioni delle prenotazioni",$pag)."</option> <option value=\"ind\"$sel_inidoc>".mex("solo all'inizio del documento",$pag)."</option> <option value=\"ros\"$sel_iniros>".mex("solo nelle ripetizioni degli ospiti",$pag)."</option> <option value=\"rca\"$sel_inirca>".mex("solo nelle ripetizioni dei costi aggiuntivi",$pag)."</option> <option value=\"rpa\"$sel_inirpa>".mex("solo nelle ripetizioni dei pagamenti",$pag)."</option> <option value=\"run\"$sel_inirun>".mex("solo nelle ripetizioni delle unità",$pag)."</option> <option value=\"rds\"$sel_inirds>".mex("solo nelle ripetizioni dei documenti salvati",$pag)."</option> $option_arr_rip </select>:<br> <table>"; if ($num_se == 1) { if (!isset($cond_sempre) or $cond_sempre != "NO") $checked = " checked"; else $checked = ""; echo "<tr><td> <input type=\"radio\" id=\"cond_sem_si\" name=\"cond_sempre\" value=\"SI\"$checked></td> <td colspan=\"2\" onclick=\"document.getElementById('cond_sem_si').checked='1'\"> ".ucfirst(mex("sempre",$pag))."</td></tr>"; } # fine if ($num_se == 1) for ($num1 = 1 ; $num1 <= $num_se ; $num1++) { if ($num_se == 1) { if (isset($cond_sempre) and $cond_sempre == "NO") $checked = " checked"; else $checked = ""; echo "<tr onclick=\"document.getElementById('cond_sem_no').checked='1'\"><td> <input type=\"radio\" id=\"cond_sem_no\" name=\"cond_sempre\" value=\"NO\"$checked></td>"; } # fine if ($num_se == 1) else echo "<tr>"; if ($num1 > 1) { $fr_se = mex("se",$pag); if ($num_se == 2) { echo "<td><select name=\"and_or\"> ".str_replace("=\"$and_or\">","=\"$and_or\" selected>"," <option value=\"and\">".mex("e",$pag)."</option> <option value=\"or\">".mex("o",$pag)."</option> ")."</select></td>"; } # fine if ($num_se == 2) else { echo "<td>"; if ($num1 == 2) echo "<input type=\"hidden\" name=\"and_or\" value=\"$and_or\">"; if ($and_or == "and") echo mex("e",$pag); if ($and_or == "or") echo mex("o",$pag); echo "</td>"; } # fine else if ($num_se == 2) } # fine if ($num1 > 1) else { $fr_se = ucfirst(mex("se",$pag)); if ($num_se > 1) echo "<td></td>"; } # fine else if ($num1 > 1) if (isset(${"tipo_val_se".$num1}) and ${"tipo_val_se".$num1} == "var") { $chk_var = " checked"; $chk_txt = ""; } else { $chk_var = ""; $chk_txt = " checked"; } $sel_ug = ""; $sel_div = ""; $sel_mag = ""; $sel_min = ""; $sel_con = ""; $sel_cmm = ""; $sel_nco = ""; $sel_ncm = ""; if (isset(${"cond".$num1})) { if (${"cond".$num1} == "=") $sel_ug = " selected"; if (${"cond".$num1} == "!=") $sel_div = " selected"; if (${"cond".$num1} == "mag") $sel_mag = " selected"; if (${"cond".$num1} == "min") $sel_min = " selected"; if (${"cond".$num1} == "con") $sel_con = " selected"; if (${"cond".$num1} == "cmm") $sel_cmm = " selected"; if (${"cond".$num1} == "nco") $sel_nco = " selected"; if (${"cond".$num1} == "ncm") $sel_ncm = " selected"; } # fine if (isset(${"cond".$num1})) echo "<td>$fr_se</td><td><select name=\"var_se$num1\"> ".str_replace("\"".fixset(${"var_se".$num1})."\">","\"".fixset(${"var_se".$num1})."\" selected>",$option_var_predef)." </select></td><td><select name=\"cond$num1\"> <option value=\"=\"$sel_ug>".mex("è uguale a",$pag)."</option> <option value=\"!=\"$sel_div>".mex("è diverso da",$pag)."</option> <option value=\"mag\"$sel_mag>".mex("è maggiore di",$pag)."</option> <option value=\"min\"$sel_min>".mex("è minore di",$pag)."</option> <option value=\"con\"$sel_con>".mex("contiene",$pag)."</option> <option value=\"cmm\"$sel_cmm>".mex("contiene",$pag)." (".mex("maiusc./minusc.",$pag).")</option> <option value=\"nco\"$sel_nco>".mex("non contiene",$pag)."</option> <option value=\"ncm\"$sel_ncm>".mex("non contiene",$pag)." (".mex("maiusc./minusc.",$pag).")</option> </select></td><td><b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"><tr><td> <input type=\"radio\" id=\"val_se_txt$num1\" name=\"tipo_val_se$num1\" value=\"txt\"$chk_txt></td><td> <input type=\"text\" name=\"val_se_txt$num1\" value=\"".htmlspecialchars(fixstr(${"val_se_txt".$num1}))."\" size=\"20\" maxlength=\"750\" onfocus=\"document.getElementById('val_se_txt$num1').checked='1'\"> </td></tr><tr><td><input type=\"radio\" id=\"val_se_sel$num1\" name=\"tipo_val_se$num1\" value=\"var\"$chk_var></td><td> <select name=\"val_se_sel$num1\" onfocus=\"document.getElementById('val_se_sel$num1').checked='1'\"> ".str_replace("\"".fixset(${"val_se_sel".$num1})."\">","\"".fixset(${"val_se_sel".$num1})."\" selected>",$option_var_predef)." </select></td></tr></table></td>"; if ($num1 == $num_se) { if ($num_se > 1) echo "<td><input name=\"canc_se\" class=\"sbutton\" type=\"submit\" value=\"".ucfirst(mex("elimina questo "se"",$pag))."\"></td></tr><tr><td colspan=\"6\"></td>"; echo "<td><input name=\"agg_se\" class=\"sbutton\" type=\"submit\" value=\"".ucfirst(mex("aggiungi un altro "se"",$pag))."\"></td>"; } # fine if ($num1 == $num_se) echo "</tr>"; } # fine for $num1 echo "</table><br> ".ucfirst(mex("azione",$pag)).":<br>"; if (!$azione or $azione == "set") $chk_az = " checked"; else $chk_az = ""; if (isset($oper_str) and $oper_str == ".=") { $sel_ug = ""; $sel_div = " selected"; } else { $sel_ug = " selected"; $sel_div = ""; } if (isset($tipo_val_allora) and $tipo_val_allora == "var") { $chk_var = " checked"; $chk_txt = ""; } else { $chk_var = ""; $chk_txt = " checked"; } if (isset($tipo_val_sost1) and $tipo_val_sost1 == "var") { $chk_var_s1 = " checked"; $chk_txt_s1 = ""; } else { $chk_var_s1 = ""; $chk_txt_s1 = " checked"; } if (isset($tipo_val_sost2) and $tipo_val_sost2 == "var") { $chk_var_s2 = " checked"; $chk_txt_s2 = ""; } else { $chk_var_s2 = ""; $chk_txt_s2 = " checked"; } $sel_oper_no = ""; $sel_oper_low = ""; $sel_oper_upp = ""; $sel_oper_url = ""; $sel_oper_asc = ""; $sel_oper_eas = ""; $sel_oper_md5 = ""; $sel_oper_eht = ""; $sel_oper_dht = ""; $sel_oper_e64 = ""; $sel_oper_d64 = ""; $sel_oper_0c2 = ""; $sel_oper_2c0 = ""; $sel_oper_0c1 = ""; $sel_oper_1c0 = ""; $sel_oper_0c3 = ""; $sel_oper_3c0 = ""; if (empty($oper_allora_sel)) $sel_oper_no = " selected"; else { if ($oper_allora_sel == "low") $sel_oper_low = " selected"; if ($oper_allora_sel == "upp") $sel_oper_upp = " selected"; if ($oper_allora_sel == "url") $sel_oper_url = " selected"; if ($oper_allora_sel == "asc") $sel_oper_asc = " selected"; if ($oper_allora_sel == "eas") $sel_oper_eas = " selected"; if ($oper_allora_sel == "md5") $sel_oper_md5 = " selected"; if ($oper_allora_sel == "eht") $sel_oper_eht = " selected"; if ($oper_allora_sel == "dht") $sel_oper_dht = " selected"; if ($oper_allora_sel == "e64") $sel_oper_e64 = " selected"; if ($oper_allora_sel == "d64") $sel_oper_d64 = " selected"; if ($oper_allora_sel == "0c2") $sel_oper_0c2 = " selected"; if ($oper_allora_sel == "2c0") $sel_oper_2c0 = " selected"; if ($oper_allora_sel == "0c1") $sel_oper_0c1 = " selected"; if ($oper_allora_sel == "1c0") $sel_oper_1c0 = " selected"; if ($oper_allora_sel == "0c3") $sel_oper_0c3 = " selected"; if ($oper_allora_sel == "3c0") $sel_oper_3c0 = " selected"; } # fine else if (empty($oper_allora_sel)) echo "<table onclick=\"document.getElementById('az_set').checked='1'\"><tr><td> <input type=\"radio\" id=\"az_set\" name=\"azione\" value=\"set\"$chk_az> </td><td><select name=\"oper_str\"> <option value=\"=\"$sel_ug>".ucwords(mex("uguaglia",$pag))."</option> <option value=\".=\"$sel_div>".ucwords(mex("concatena",$pag))."</option> </select></td><td><select name=\"var_allora\"> ".str_replace("\"".fixset($var_allora)."\">","\"".fixset($var_allora)."\" selected>",$option_var_pers)." </select></td><td>".str_replace(" "," ",mex("con",$pag))."</td> <td><b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"><tr><td> <input type=\"radio\" id=\"val_all_txt\" name=\"tipo_val_allora\" value=\"txt\"$chk_txt></td><td> <input type=\"text\" name=\"val_allora_txt\" value=\"".htmlspecialchars(fixstr($val_allora_txt))."\" size=\"20\" maxlength=\"750\" onfocus=\"document.getElementById('val_all_txt').checked='1'\"> </td></tr><tr><td><input type=\"radio\" id=\"val_all_sel\" name=\"tipo_val_allora\" value=\"var\"$chk_var></td><td> <select name=\"val_allora_sel\" onfocus=\"document.getElementById('val_all_sel').checked='1'\"> ".str_replace("\"".fixset($val_allora_sel)."\">","\"".fixset($val_allora_sel)."\" selected>",$option_var_predef)." </select><select name=\"oper_allora_sel\" onfocus=\"document.getElementById('val_all_sel').checked='1'\"> <option value=\"\"$sel_oper_no></option> <option value=\"low\"$sel_oper_low>".mex("in minuscole",$pag)."</option> <option value=\"upp\"$sel_oper_upp>".mex("in maiuscole",$pag)."</option> <option value=\"url\"$sel_oper_url>".mex("codificato per URL",$pag)."</option> <option value=\"asc\"$sel_oper_asc>".mex("codificato in ASCII",$pag)."</option> <option value=\"eas\"$sel_oper_eas>".mex("in ASCII esteso",$pag)."</option> <option value=\"md5\"$sel_oper_md5>".mex("codificato con MD5",$pag)."</option> <option value=\"eht\"$sel_oper_eht>".mex("codif. in HTML",$pag)."</option> <option value=\"dht\"$sel_oper_dht>".mex("decodif. da HTML",$pag)."</option> <option value=\"e64\"$sel_oper_e64>".mex("codif. in base64",$pag)."</option> <option value=\"d64\"$sel_oper_d64>".mex("decodif. da base64",$pag)."</option> <option value=\"0c2\"$sel_oper_0c2>".mex("da base",$pag)." 10 ".mex("a",$pag)." 2</option> <option value=\"2c0\"$sel_oper_2c0>".mex("da base",$pag)." 2 ".mex("a",$pag)." 10</option> <option value=\"0c1\"$sel_oper_0c1>".mex("da base",$pag)." 10 ".mex("a",$pag)." 16</option> <option value=\"1c0\"$sel_oper_1c0>".mex("da base",$pag)." 16 ".mex("a",$pag)." 10</option> <option value=\"0c3\"$sel_oper_0c3>".mex("da base",$pag)." 10 ".mex("a",$pag)." 36</option> <option value=\"3c0\"$sel_oper_3c0>".mex("da base",$pag)." 36 ".mex("a",$pag)." 10</option> </select></td></tr></table></td><td> (".str_replace(" "," ",mex("sostituendo",$pag))."</td><td> <b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"><tr><td> <input type=\"radio\" id=\"val_s1_txt\" name=\"tipo_val_sost1\" value=\"txt\"$chk_txt_s1></td><td> <input type=\"text\" name=\"val_sost1_txt\" value=\"".htmlspecialchars(fixstr($val_sost1_txt))."\" size=\"20\" maxlength=\"750\" onfocus=\"document.getElementById('val_s1_txt').checked='1'\"> </td></tr><tr><td><input type=\"radio\" id=\"val_s1_sel\" name=\"tipo_val_sost1\" value=\"var\"$chk_var_s1></td><td> <select name=\"val_sost1_sel\" onfocus=\"document.getElementById('val_s1_sel').checked='1'\"> ".str_replace("\"".fixset($val_sost1_sel)."\">","\"".fixset($val_sost1_sel)."\" selected>",$option_var_predef)." </select></td></tr></table></td><td> ".str_replace(" "," ",mex("con",$pag))."</td><td> <b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"><tr><td> <input type=\"radio\" id=\"val_s2_txt\" name=\"tipo_val_sost2\" value=\"txt\"$chk_txt_s2></td><td> <input type=\"text\" name=\"val_sost2_txt\" value=\"".htmlspecialchars(fixstr($val_sost2_txt))."\" size=\"20\" maxlength=\"750\" onfocus=\"document.getElementById('val_s2_txt').checked='1'\"> </td></tr><tr><td><input type=\"radio\" id=\"val_s2_sel\" name=\"tipo_val_sost2\" value=\"var\"$chk_var_s2></td><td> <select name=\"val_sost2_sel\" onfocus=\"document.getElementById('val_s2_sel').checked='1'\"> ".str_replace("\"".fixset($val_sost2_sel)."\">","\"".fixset($val_sost2_sel)."\" selected>",$option_var_predef)." </select></td></tr></table> </td><td>)</td></tr></table><br>"; if ($azione == "trunc") $chk_az = " checked"; else $chk_az = ""; if (isset($pos_trunc2) and $pos_trunc2 == "fin") { $sel_ini = ""; $sel_fin = " selected"; } else { $sel_ini = " selected"; $sel_fin = ""; } echo "<table onclick=\"document.getElementById('az_trunc').checked='1'\"><tr><td> <input type=\"radio\" id=\"az_trunc\" name=\"azione\" value=\"trunc\"$chk_az> </td><td>".ucfirst(mex("troncare",$pag))." </td><td><select name=\"var_trunc\"> ".str_replace("\"".fixset($var_trunc)."\">","\"".fixset($var_trunc)."\" selected>",$option_var_pers)." </select></td><td>".str_replace(" "," ",mex("dopo",$pag))." <small><small>(".str_replace(" "," ",mex("prima di con valori negativi",$pag)).")</small></small></td><td> <input type=\"text\" name=\"val_trunc\" value=\"".fixset($val_trunc)."\" size=\"3\" maxlength=\"12\"></td><td> ".str_replace(" "," ",mex("caratteri",$pag))."</td><td> <td>(".str_replace(" "," ",mex("se mancanti riempire con",$pag))."</td><td> <input type=\"text\" name=\"val_trunc2\" value=\"".htmlspecialchars(fixstr($val_trunc2))."\" size=\"10\" maxlength=\"750\"></td> <td>".str_replace(" "," ",mex("la parte",$pag))."</td><td> <select name=\"pos_trunc2\"> <option value=\"ini\"$sel_ini>".mex("iniziale",$pag)."</option> <option value=\"fin\"$sel_fin>".mex("finale",$pag)."</option> </select></td><td>) </td></tr></table><br>"; if ($azione == "oper") $chk_az = " checked"; else $chk_az = ""; $sel_piu = ""; $sel_men = ""; $sel_per = ""; $sel_div = ""; if (isset($operatore)) { if ($operatore == "+") $sel_piu = " selected"; if ($operatore == "-") $sel_men = " selected"; if ($operatore == "*") $sel_per = " selected"; if ($operatore == "/") $sel_div = " selected"; } # fine if (isset($operatore)) if (isset($tipo_val_oper) and $tipo_val_oper == "var") { $chk_var = " checked"; $chk_txt = ""; } else { $chk_var = ""; $chk_txt = " checked"; } if (!isset($val_oper_txt) or !strcmp((string) $val_oper_txt,"")) $val_oper_txt = "0"; echo "<table><tr onclick=\"document.getElementById('az_oper').checked='1'\"><td> <input type=\"radio\" id=\"az_oper\" name=\"azione\" value=\"oper\"$chk_az> </td><td>".ucfirst(mex("porre",$pag))." </td><td><select name=\"var_oper\"> ".str_replace("\"".fixset($var_oper)."\">","\"".fixset($var_oper)."\" selected>",$option_var_pers)." </select></td><td>".str_replace(" "," ",mex("uguale a",$pag))."</td><td> <select name=\"var_oper2\"> ".str_replace("\"".fixset($var_oper2)."\">","\"".fixset($var_oper2)."\" selected>",$option_var_predef)." </select></td><td> <select name=\"operatore\"> <option value=\"+\"$sel_piu>+</option> <option value=\"-\"$sel_men>-</option> <option value=\"*\"$sel_per>*</option> <option value=\"/\"$sel_div>/</option> </select></td><td> <b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"><tr><td> <input type=\"radio\" id=\"val_oper_txt\" name=\"tipo_val_oper\" value=\"txt\"$chk_txt></td><td> <input type=\"text\" name=\"val_oper_txt\" value=\"$val_oper_txt\" size=\"15\" maxlength=\"750\" onfocus=\"document.getElementById('val_oper_txt').checked='1'\"> </td></tr><tr><td><input type=\"radio\" id=\"val_oper_sel\" name=\"tipo_val_oper\" value=\"var\"$chk_var></td><td> <select name=\"val_oper_sel\" onfocus=\"document.getElementById('val_oper_sel').checked='1'\"> ".str_replace("\"".fixset($val_oper_sel)."\">","\"".fixset($val_oper_sel)."\" selected>",$option_var_predef)." </select></td></tr></table> </td><td>(".str_replace(" "," ",mex("arrotondato a",$pag))."</td><td> <input type=\"text\" name=\"val_arrotond\" value=\"".htmlspecialchars(fixstr($val_arrotond))."\" size=\"15\" maxlength=\"50\"></td><td>) </td></tr><tr><td></td><td colspan=\"9\"><small> (".mex("Utilizzare una variabile personalizzata che finisce con \"_p\" per aggiungervi i separatori delle migliaia e 2 decimali dopo l'operazione",$pag).") </small></td></tr></table><br>"; if ($azione == "date" or $azione == "opdat") $chk_az = " checked"; else $chk_az = ""; $chk_opdat0 = ""; $chk_opdat1 = ""; if ($azione == "opdat") $chk_opdat1 = " checked"; else $chk_opdat0 = " checked"; $sel_gi = ""; $sel_me = ""; $sel_an = ""; $sel_gs = ""; $sel_is = ""; $sel_da = ""; if (isset($subdata)) { if ($subdata == "gi") $sel_gi = " selected"; if ($subdata == "me") $sel_me = " selected"; if ($subdata == "an") $sel_an = " selected"; if ($subdata == "gs") $sel_gs = " selected"; if ($subdata == "is") $sel_is = " selected"; if ($subdata == "da") $sel_da = " selected"; } # fine if (isset($subdata)) $sel_piu = ""; $sel_men = ""; if (isset($oper_giorni)) { if ($oper_giorni == "+") $sel_piu = " selected"; if ($oper_giorni == "-") $sel_men = " selected"; } # fine if (isset($oper_giorni)) if (!isset($num_giorni) or !strcmp((string) $num_giorni,"")) $num_giorni = "0"; $sel_g = ""; $sel_m = ""; $sel_a = ""; if (isset($tipo_giorni)) { if ($tipo_giorni == "g") $sel_g = " selected"; if ($tipo_giorni == "m") $sel_m = " selected"; if ($tipo_giorni == "a") $sel_a = " selected"; } # fine if (isset($tipo_giorni)) $sel_ig = ""; $sel_im = ""; $sel_ia = ""; if (isset($tipo_int)) { if ($tipo_int == "g") $sel_ig = " selected"; if ($tipo_int == "m") $sel_im = " selected"; if ($tipo_int == "a") $sel_ia = " selected"; } # fine if (isset($tipo_int)) echo "<table><tr onclick=\"document.getElementById('az_date').checked='1'\"><td> <input type=\"radio\" id=\"az_date\" name=\"azione\" value=\"date\"$chk_az> </td><td>".ucfirst(mex("porre",$pag))." </td><td><select name=\"var_data\">"; if (!isset($var_data)) echo $option_var_pers; else echo str_replace("\"$var_data\">","\"$var_data\" selected>",$option_var_pers); echo "</select></td><td>".str_replace(" "," ",mex("uguale a",$pag))."</td> <td><b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"><tr><td> <table cellspacing=\"0\"><tr onclick=\"document.getElementById('opdat0').checked='1'\"><td> <input type=\"radio\" id=\"opdat0\" name=\"oper_data\" value=\"\"$chk_opdat0> </td><td><select name=\"subdata\"> <option value=\"gi\"$sel_gi>".mex("il giorno",$pag)."</option> <option value=\"me\"$sel_me>".mex("il mese",$pag)."</option> <option value=\"an\"$sel_an>".mex("l'anno",$pag)."</option> <option value=\"gs\"$sel_gs>".mex("il giorno della settimana",$pag)."</option> <option value=\"is\"$sel_is>".mex("la data",$pag)." (".mex("formato ISO",$pag).")</option> <option value=\"da\"$sel_da>".mex("la data",$pag)." (".mex("formato corrente",$pag).")</option> </select></td><td> ".str_replace(" "," ",mex("della data",$pag))."</td><td> <select name=\"var_data2\">"; if (!isset($var_data2)) echo $option_var_predef_data; else echo str_replace("\"$var_data2\">","\"$var_data2\" selected>",$option_var_predef_data); echo "</select></td><td> <select name=\"oper_giorni\"> <option value=\"+\"$sel_piu>+</option> <option value=\"-\"$sel_men>-</option> </select></td><td> <input type=\"text\" name=\"num_giorni\" value=\"$num_giorni\" size=\"3\" maxlength=\"150\"> </td><td> <select name=\"tipo_giorni\"> <option value=\"g\"$sel_g>".mex("giorni",$pag)."</option> <option value=\"m\"$sel_m>".mex("mesi",$pag)."</option> <option value=\"a\"$sel_a>".mex("anni",$pag)."</option> </select></td></tr></table></td></tr><tr><td> <table cellspacing=\"0\"><tr onclick=\"document.getElementById('opdat1').checked='1'\"><td> <input type=\"radio\" id=\"opdat1\" name=\"oper_data\" value=\"1\"$chk_opdat1> </td><td> ".str_replace(" "," ",mex("numero di",$pag))."</td><td> <select name=\"tipo_int\"> <option value=\"g\"$sel_ig>".mex("giorni",$pag)."</option> <option value=\"m\"$sel_im>".mex("mesi",$pag)."</option> <option value=\"a\"$sel_ia>".mex("anni",$pag)."</option> </select></td><td> ".str_replace(" "," ",mex("dalla data",$pag))."</td><td> <select name=\"var_opdat2\">"; if (!isset($var_opdat2)) echo $option_var_predef_data; else echo str_replace("\"$var_opdat2\">","\"$var_opdat2\" selected>",$option_var_predef_data); echo "</select></td><td> ".str_replace(" "," ",mex("alla data",$pag))."</td><td> <select name=\"var_opdat3\">"; if (!isset($var_opdat3)) echo $option_var_predef_data; else echo str_replace("\"$var_opdat3\">","\"$var_opdat3\" selected>",$option_var_predef_data); echo "</select></td></tr></table></td></tr></table> </td></tr></table><br>"; if ($option_arr_pers) { if ($azione == "unset") $chk_az = " checked"; else $chk_az = ""; echo "<table onclick=\"document.getElementById('az_azzera').checked='1'\"><tr><td> <input type=\"radio\" id=\"az_azzera\" name=\"azione\" value=\"unset\"$chk_az> </td><td>".str_replace(" "," ",ucfirst(mex("azzera l'array",$pag)))."</td><td> <select name=\"arr_azz\"> ".str_replace("\"".fix_set($arr_azz)."\">","\"$arr_azz\" selected>",$option_arr_pers)." </select></td></tr></table><br>"; } # fine if ($option_arr_pers) if ($opt_arr_var_non_predef) { if ($azione == "array") $chk_az = " checked"; else $chk_az = ""; $chk_dat = ""; $chk_dap = ""; $chk_val = ""; $chk_cop = ""; if (empty($tipo_arr) or $tipo_arr == "dat") $chk_dat = " checked"; else { if ($tipo_arr == "dap") $chk_dap = " checked"; if ($tipo_arr == "val") $chk_val = " checked"; if ($tipo_arr == "cop") $chk_cop = " checked"; } # fine else if (empty($tipo_arr) or $tipo_arr == "dat") echo "<table onclick=\"document.getElementById('az_array').checked='1'\"><tr><td> <input type=\"radio\" id=\"az_array\" name=\"azione\" value=\"array\"$chk_az> </td><td>".str_replace(" "," ",ucfirst(mex("assegna all'array",$pag)))."</td><td> <select name=\"array\"> ".str_replace("\"".fix_set($array)."\">","\"$array\" selected>",$opt_arr_var_non_predef)." </select></td><td> <b style=\"font-size: 260%;\">{</b></td><td> <table cellspacing=\"0\"> <tr onclick=\"document.getElementById('arr_dat').checked='1'\"><td> <input type=\"radio\" id=\"arr_dat\" name=\"tipo_arr\" value=\"dat\"$chk_dat></td><td> ".str_replace(" "," ",mex("valori progressivi tra le date selezionate",$pag)." (".mex("nelle ripetizioni vengono considerate solo le prenotazioni nella data valutata",$pag)).").</td></tr> <tr onclick=\"document.getElementById('arr_dap').checked='1'\"><td> <input type=\"radio\" id=\"arr_dap\" name=\"tipo_arr\" value=\"dap\"$chk_dap></td><td> ".str_replace(" "," ",mex("valori progressivi tra il primo arrivo e l'ultima partenza",$pag)." <small>(".mex("nelle ripetizioni vengono considerate solo le prenotazioni nella data valutata",$pag)).")</small>.</td></tr> <tr onclick=\"document.getElementById('arr_val').checked='1'\"><td> <input type=\"radio\" id=\"arr_val\" name=\"tipo_arr\" value=\"val\"$chk_val></td><td> <table cellspacing=\"0\"><tr><td> ".str_replace(" "," ",mex("una lista di valori predefiniti",$pag)).":</td> <td><input type=\"text\" name=\"lista_val\" value=\"".htmlspecialchars(fixstr($lista_val))."\" size=\"26\"></td> <td>(".str_replace(" "," ",mex("separati da virgole",$pag))."). </td></tr></table></td></tr> <tr onclick=\"document.getElementById('arr_cop').checked='1'\"><td> <input type=\"radio\" id=\"arr_cop\" name=\"tipo_arr\" value=\"cop\"$chk_cop></td><td> <table cellspacing=\"0\"><tr><td> ".str_replace(" "," ",mex("i valori dell'array",$pag)." ")."</td> <td><select name=\"array2\"> ".str_replace("\"".fix_set($array2)."\">","\"$array2\" selected>",$option_arr_pers)." </select>.</td></tr></table></td></tr></table> </td></tr></table><br>"; } # fine if ($opt_arr_var_non_predef) if ($azione == "break") $chk_az = " checked"; else $chk_az = ""; if (isset($break_cont) and $break_cont == "cont") { $sel_fine = ""; $sel_cont = " selected"; } else { $sel_fine = " selected"; $sel_cont = ""; } echo "<table onclick=\"document.getElementById('az_break').checked='1'\"><tr><td> <input type=\"radio\" id=\"az_break\" name=\"azione\" value=\"break\"$chk_az> </td><td>".str_replace(" "," ",ucfirst(mex("non processare le condizioni successive",$pag)))." </td><td><select name=\"break_cont\"> <option value=\"\"$sel_fine>".mex("fino alla fine",$pag)."</option> <option value=\"cont\"$sel_cont>".mex("fino al prossimo "riprendi"",$pag)."</option> </select></td></tr></table><br>"; if ($azione == "cont") $chk_az = " checked"; else $chk_az = ""; echo "<table onclick=\"document.getElementById('az_cont').checked='1'\"><tr><td> <input type=\"radio\" id=\"az_cont\" name=\"azione\" value=\"cont\"$chk_az> </td><td>".str_replace(" "," ",ucfirst(mex("riprendi a processare le condizioni successive",$pag)." ".mex("se precedentemente interrotte",$pag)))." </td></tr></table><br> <div class=\"txtcenter\"> <input class=\"sbutton\" type=\"submit\" value=\""; if (!$num_cond_mod) echo ucfirst(mex("aggiungi la nuova condizione",$pag)); else echo ucfirst(mex("modifica la condizione",$pag))." $num_cond_mod_vedi"; echo "\"></div></div></form><br>"; if ($num_cond_mod) { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> $input_cond_contr <div class=\"txtcenter\"> <input class=\"sbutton\" type=\"submit\" value=\"".ucfirst(mex("annulla",$pag))."\"> </div></div></form><br>"; } # fine if ($num_cond_mod) echo "</div><br>"; } # fine if ($option_var_pers and !$contr_importa_vc) echo "<br><hr style=\"width: 95%\"><br><div style=\"text-align: center;\">"; if ($contr_cond) { echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"./modifica_contratto.php\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"num_contratto\" value=\"$contr_cond\"> <input class=\"sbutton\" type=\"submit\" value=\"".mex("Modifica il documento",$pag)." $contr_cond\"> </div></form><br>"; } # fine if ($contr_cond) echo "<form accept-charset=\"utf-8\" method=\"post\" action=\"personalizza.php#contratti\"><div> <input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input class=\"sbutton\" type=\"submit\" value=\"".mex("Torna indietro",$pag)."\"> </div></form><br></div>"; } # fine if (!isset($mostra_form_iniziale) or $mostra_form_iniziale != "NO") if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/".$tema[$id_utente]."/php")) include("./themes/".$tema[$id_utente]."/php/foot.php"); else include("./includes/foot.php"); } # fine if ($anno_utente_attivato == "SI" and $priv_mod_doc == "s" and $modifica_pers != "NO") } # fine if ($id_utente) ?> |