function SQLupdateTemaTresVersion($ver2ver)
{
global $DBCFG;
$prefix = $DBCFG['DBprefix'];
switch ($ver2ver) {
case '1_6x1_7':
$sql1_6x1_7 = SQL("ALTER", " TABLE `" . $prefix . "tema` ADD `isMetaTerm` BOOLEAN NOT NULL DEFAULT FALSE,ADD INDEX ( `isMetaTerm` ) ");
$ctrl = ARRAYfetchValueXValue('config', 'CFG_SEARCH_METATERM');
if (!$ctrl[value_id]) {
$sql1_6x1_7a = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t('config', 'CFG_SEARCH_METATERM', NULL, '0')");
}
$ctrl = ARRAYfetchValueXValue('config', 'CFG_ENABLE_SPARQL');
if (!$ctrl[value_id]) {
$sql1_6x1_7b = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t('config', 'CFG_ENABLE_SPARQL', NULL, '0')");
}
$ctrl = ARRAYfetchValueXValue('config', 'CFG_SUGGESTxWORD');
if (!$ctrl[value_id]) {
$sql1_6x1_7c = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t('config', 'CFG_SUGGESTxWORD', NULL, '1')");
}
$logTask["1_6x1_7"] = SQLcount($sql1_6x1_7a);
break;
case '1_5x1_6':
$sql1_5x1_6 = SQL("ALTER", " TABLE `" . $prefix . "term2tterm` ADD INDEX `target_terms` ( `tterm_string` ) ");
$sql1_5x1_6a = SQL("ALTER", " TABLE `" . $prefix . "usuario` ADD `user_activation_key` VARCHAR( 60 ) NULL , ADD INDEX ( `user_activation_key` ) ");
$sql1_5x1_6b = SQL("ALTER", " TABLE `" . $prefix . "usuario` CHANGE `pass` `pass` VARCHAR( 60{$ver2ver} ) CHARACTER SET utf8 COLLATE utf8_general_ci NOT NULL DEFAULT ''");
$logTask["1_5x1_6"] = SQLcount($sql1_6x1_6);
break;
case '1_4x1_5':
$sql1_4x1_5a = SQL("ALTER", " TABLE `" . $prefix . "tvocab` CHANGE `tvocab_tag` `tvocab_tag` VARCHAR( 20 ) CHARACTER SET utf8 COLLATE utf8_general_ci NOT NULL");
$sql1_4x1_5b = SQL("ALTER", " TABLE `" . $prefix . "values` CHANGE `value_code` `value_code` VARCHAR( 20 ) CHARACTER SET utf8 COLLATE utf8_general_ci NULL DEFAULT NULL");
$sql1_4x1_5b = SQL("ALTER", " TABLE `" . $prefix . "values` CHANGE `value` `value` longtext CHARACTER SET utf8 COLLATE utf8_general_ci NULL DEFAULT NULL");
$sql1_4x1_5b = SQL("ALTER", " TABLE `" . $prefix . "values` CHANGE `value_type` `value_type` VARCHAR( 64 ) CHARACTER SET utf8 COLLATE utf8_general_ci NULL DEFAULT NULL");
$sql1_4x1_5c = SQL("ALTER", "TABLE `" . $prefix . "tabla_rel` ADD `rel_rel_id` INT( 22 ) NULL AFTER `t_relacion` ,ADD INDEX ( `rel_rel_id` )");
$sql1_4x1_5d = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "uri` (\r\n\t\t`uri_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tema_id` int(22) NOT NULL,\r\n\t\t`uri_type_id` int(22) NOT NULL,\r\n\t\t`uri` tinytext NOT NULL,\r\n\t\t`uid` int(22) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\tPRIMARY KEY (`uri_id`),\r\n\t\tKEY `tema_id` (`tema_id`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM COMMENT='external URIs associated to terms';");
if ($sql1_4x1_5c) {
$ctrl = ARRAYfetchValue('4', 'SP');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('4', 'Spelling variant', NULL, 'SP')");
}
$ctrl = ARRAYfetchValue('4', 'MS');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('4', 'MisSpelling', NULL, 'MS')");
}
$ctrl = ARRAYfetchValue('3', 'P');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('3', 'Partitive', NULL, 'P')");
}
$ctrl = ARRAYfetchValue('3', 'I');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('3', 'Instance', NULL, 'I')");
}
$ctrl = ARRAYfetchValue('4', 'H');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('4', 'Hidden label', NULL, 'H')");
}
$ctrl = ARRAYfetchValue('4', 'AB');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('4', 'Abbreviation', NULL, 'AB')");
}
$ctrl = ARRAYfetchValue('4', 'FT');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('4', 'Full form of the term', NULL, 'FT')");
}
$ctrl = ARRAYfetchValue('URI_TYPE', 'broadMatch');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('URI_TYPE', 'broadMatch', NULL, 'broadMatch')");
}
$ctrl = ARRAYfetchValue('URI_TYPE', 'closeMatch');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('URI_TYPE', 'closeMatch', NULL, 'closeMatch')");
}
$ctrl = ARRAYfetchValue('URI_TYPE', 'exactMatch');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('URI_TYPE', 'exactMatch', NULL, 'exactMatch')");
}
$ctrl = ARRAYfetchValue('URI_TYPE', 'relatedMatch');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('URI_TYPE', 'relatedMatch', NULL, 'relatedMatch')");
}
$ctrl = ARRAYfetchValue('URI_TYPE', 'narrowMatch');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('URI_TYPE', 'narrowMatch', NULL, 'narrowMatch')");
}
$ctrl = ARRAYfetchValue('DATESTAMP', 'NOTE_CHANGE');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('DATESTAMP', now(), NULL, 'NOTE_CHANGE')");
}
$ctrl = ARRAYfetchValue('DATESTAMP', 'TERM_CHANGE');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('DATESTAMP', now(), NULL, 'TERM_CHANGE')");
}
$ctrl = ARRAYfetchValue('DATESTAMP', 'TTERM_CHANGE');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('DATESTAMP', now(), NULL, 'TTERM_CHANGE')");
}
$ctrl = ARRAYfetchValue('DATESTAMP', 'THES_CHANGE');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('DATESTAMP', now(), NULL, 'THES_CHANGE')");
}
$ctrl = ARRAYfetchValue('METADATA', 'dc:contributor');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('METADATA', NULL, 2, 'dc:contributor')");
}
$ctrl = ARRAYfetchValue('METADATA', 'dc:publisher');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('METADATA', NULL, 5, 'dc:publisher')");
}
$ctrl = ARRAYfetchValue('METADATA', 'dc:rights');
if (!$ctrl[value_id]) {
$sqlvalue = SQL("insert", "into `" . $prefix . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t('METADATA', NULL, 9, 'dc:rights')");
}
}
$result5 = SQL("insert", "into `" . $prefix . "values` (`value_id`, `value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t(15, 't_nota', 'Nota catalográfica', 5, 'NC'),\r\n\t\t(16, 'config', '_USE_CODE', 1, '1'),\r\n\t\t(17, 'config', '_SHOW_CODE', 1, '1'),\r\n\t\t(18, 'config', 'CFG_MAX_TREE_DEEP', NULL, '3'),\r\n\t\t(19, 'config', 'CFG_VIEW_STATUS', NULL, '0'),\r\n\t\t(20, 'config', 'CFG_SIMPLE_WEB_SERVICE', NULL, '1'),\r\n\t\t(21, 'config', 'CFG_NUM_SHOW_TERMSxSTATUS', NULL, '200'),\r\n\t\t(22, 'config', 'CFG_MIN_SEARCH_SIZE', NULL, '2'),\r\n\t\t(23, 'config', '_SHOW_TREE', '1', '1'),\r\n\t\t(24, 'config', '_PUBLISH_SKOS', '1', '0')");
$logTask["1_3x1_4"] = SQLcount($result5);
break;
case '1_1x1_2':
$result61 = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "term2tterm` (\r\n\t\t`tterm_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tvocab_id` int(22) NOT NULL,\r\n\t\t`tterm_url` varchar(200) NOT NULL,\r\n\t\t`tterm_uri` varchar(200) NOT NULL,\r\n\t\t`tterm_string` varchar(250) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\t`cuando_last` timestamp NULL DEFAULT NULL,\r\n\t\t`uid` int(22) NOT NULL,\r\n\t\t`tema_id` int(22) NOT NULL,\r\n\t\tPRIMARY KEY (`tterm_id`),\r\n\t\tKEY `tvocab_id` (`tvocab_id`,`cuando`,`cuando_last`,`uid`),\r\n\t\tKEY `tema_id` (`tema_id`),\r\n\t\tKEY `tterm_string` (`tterm_string`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM");
$result62 = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "tvocab` (\r\n\t\t`tvocab_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tvocab_label` varchar(150) NOT NULL,\r\n\t\t`tvocab_tag` varchar(5) NOT NULL,\r\n\t\t`tvocab_lang` VARCHAR( 5 ),\r\n\t\t`tvocab_title` varchar(200) NOT NULL,\r\n\t\t`tvocab_url` varchar(250) NOT NULL,\r\n\t\t`tvocab_uri_service` varchar(250) NOT NULL,\r\n\t\t`tvocab_status` tinyint(1) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\t`uid` int(22) NOT NULL,\r\n\t\tPRIMARY KEY (`tvocab_id`),\r\n\t\tKEY `uid` (`uid`),\r\n\t\tKEY `status` (`tvocab_status`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM ;");
$result622 = SQL("ALTER", " TABLE `" . $prefix . "notas` ADD FULLTEXT `notas` (`nota`);");
$result5 = SQL("insert", "into `" . $prefix . "values` (`value_id`, `value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t(15, 't_nota', 'Nota catalográfica', 5, 'NC'),\r\n\t\t(16, 'config', '_USE_CODE', 1, '1'),\r\n\t\t(17, 'config', '_SHOW_CODE', 1, '1'),\r\n\t\t(18, 'config', 'CFG_MAX_TREE_DEEP', NULL, '3'),\r\n\t\t(19, 'config', 'CFG_VIEW_STATUS', NULL, '0'),\r\n\t\t(20, 'config', 'CFG_SIMPLE_WEB_SERVICE', NULL, '1'),\r\n\t\t(21, 'config', 'CFG_NUM_SHOW_TERMSxSTATUS', NULL, '200'),\r\n\t\t(22, 'config', 'CFG_MIN_SEARCH_SIZE', NULL, '2'),\r\n\t\t(23, 'config', '_SHOW_TREE', '1', '1'),\r\n\t\t(24, 'config', '_PUBLISH_SKOS', '1', '0')");
$logTask["1_1x1_2"] = $result61 + $result62 + $result622;
break;
case '1x1_2':
//update to 1.1
$result60 = SQL("ALTER", " TABLE `" . $prefix . "tema` ADD `code` VARCHAR( 30 ) NULL COMMENT 'code_term' AFTER `tema_id`");
$result601 = SQL("ALTER", " TABLE `" . $prefix . "tema` ADD INDEX ( `code` )");
$result61 = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "term2tterm` (\r\n\t\t`tterm_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tvocab_id` int(22) NOT NULL,\r\n\t\t`tterm_url` varchar(200) NOT NULL,\r\n\t\t`tterm_uri` varchar(200) NOT NULL,\r\n\t\t`tterm_string` varchar(250) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\t`cuando_last` timestamp NULL DEFAULT NULL,\r\n\t\t`uid` int(22) NOT NULL,\r\n\t\t`tema_id` int(22) NOT NULL,\r\n\t\tPRIMARY KEY (`tterm_id`),\r\n\t\tKEY `tvocab_id` (`tvocab_id`,`cuando`,`cuando_last`,`uid`),\r\n\t\tKEY `tema_id` (`tema_id`),\r\n\t\tKEY `tterm_string` (`tterm_string`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM");
$result62 = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "tvocab` (\r\n\t\t`tvocab_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tvocab_label` varchar(150) NOT NULL,\r\n\t\t`tvocab_tag` varchar(5) NOT NULL,\r\n\t\t`tvocab_lang` VARCHAR( 5 ),\r\n\t\t`tvocab_title` varchar(200) NOT NULL,\r\n\t\t`tvocab_url` varchar(250) NOT NULL,\r\n\t\t`tvocab_uri_service` varchar(250) NOT NULL,\r\n\t\t`tvocab_status` tinyint(1) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\t`uid` int(22) NOT NULL,\r\n\t\tPRIMARY KEY (`tvocab_id`),\r\n\t\tKEY `uid` (`uid`),\r\n\t\tKEY `status` (`tvocab_status`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM ;");
$result622 = SQL("ALTER", " TABLE `" . $prefix . "notas` ADD FULLTEXT `notas` (`nota`);");
$result5 = SQL("insert", "into `" . $prefix . "values` (`value_id`, `value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t(15, 't_nota', 'Nota catalográfica', 5, 'NC'),\r\n\t\t(16, 'config', '_USE_CODE', 1, '1'),\r\n\t\t(17, 'config', '_SHOW_CODE', 1, '1'),\r\n\t\t(18, 'config', 'CFG_MAX_TREE_DEEP', NULL, '3'),\r\n\t\t(19, 'config', 'CFG_VIEW_STATUS', NULL, '0'),\r\n\t\t(20, 'config', 'CFG_SIMPLE_WEB_SERVICE', NULL, '1'),\r\n\t\t(21, 'config', 'CFG_NUM_SHOW_TERMSxSTATUS', NULL, '200'),\r\n\t\t(22, 'config', 'CFG_MIN_SEARCH_SIZE', NULL, '2'),\r\n\t\t(23, 'config', '_SHOW_TREE', '1', '1'),\r\n\t\t(24, 'config', '_PUBLISH_SKOS', '1', '0')");
$logTask["1x1_2"] = SQLcount($result61) + SQLcount($result62) + SQLcount($result622) + SQLcount($result60) + SQLcount($result601);
break;
case '1x1_2':
//update to 1.1
$result60 = SQL("ALTER", " TABLE `" . $prefix . "tema` ADD `code` VARCHAR( 20 ) NULL COMMENT 'code_term' AFTER `tema_id`");
$result601 = SQL("ALTER", " TABLE `" . $prefix . "tema` ADD INDEX ( `code` )");
$result61 = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "term2tterm` (\r\n\t\t`tterm_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tvocab_id` int(22) NOT NULL,\r\n\t\t`tterm_url` varchar(200) NOT NULL,\r\n\t\t`tterm_uri` varchar(200) NOT NULL,\r\n\t\t`tterm_string` varchar(250) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\t`cua\r\n\t\t` int(22) NOT NULL,\r\n\t\t`tema_id` int(22) NOT NULL,\r\n\t\tPRIMARY KEY (`tterm_id`),\r\n\t\tKEY `tvocab_id` (`tvocab_id`,`cuando`,`cuando_last`,`uid`),\r\n\t\tKEY `tema_id` (`tema_id`),\r\n\t\tKEY `tterm_string` (`tterm_string`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM");
$result62 = SQL("CREATE", " TABLE IF NOT EXISTS `" . $prefix . "tvocab` (\r\n\t\t`tvocab_id` int(22) NOT NULL AUTO_INCREMENT,\r\n\t\t`tvocab_label` varchar(150) NOT NULL,\r\n\t\t`tvocab_tag` varchar(5) NOT NULL,\r\n\t\t`tvocab_lang` VARCHAR( 5 ),\r\n\t\t`tvocab_title` varchar(200) NOT NULL,\r\n\t\t`tvocab_url` varchar(250) NOT NULL,\r\n\t\t`tvocab_uri_service` varchar(250) NOT NULL,\r\n\t\t`tvocab_status` tinyint(1) NOT NULL,\r\n\t\t`cuando` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,\r\n\t\t`uid` int(22) NOT NULL,\r\n\t\tPRIMARY KEY (`tvocab_id`),\r\n\t\tKEY `uid` (`uid`),\r\n\t\tKEY `status` (`tvocab_status`)\r\n\t\t) DEFAULT CHARSET=utf8 ENGINE=MyISAM ;");
$result5 = SQL("insert", "into `" . $prefix . "values` (`value_id`, `value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t(15, 't_nota', 'Nota catalográfica', 5, 'NC'),\r\n\t\t(16, 'config', '_USE_CODE', 1, '1'),\r\n\t\t(17, 'config', '_SHOW_CODE', 1, '1'),\r\n\t\t(18, 'config', 'CFG_MAX_TREE_DEEP', NULL, '3'),\r\n\t\t(19, 'config', 'CFG_VIEW_STATUS', NULL, '0'),\r\n\t\t(20, 'config', 'CFG_SIMPLE_WEB_SERVICE', NULL, '1'),\r\n\t\t(21, 'config', 'CFG_NUM_SHOW_TERMSxSTATUS', NULL, '200'),\r\n\t\t(22, 'config', 'CFG_MIN_SEARCH_SIZE', NULL, '2'),\r\n\t\t(23, 'config', '_SHOW_TREE', '1', '1'),\r\n\t\t(24, 'config', '_PUBLISH_SKOS', '1', '0')");
$result622 = SQL("ALTER", " TABLE `" . $prefix . "notas` ADD FULLTEXT `notas` (`nota`);");
$logTask["1x1_2"] = SQLcount($result61) + SQLcount($result62) + SQLcount($result622) + SQLcount($result60) + SQLcount($result601);
break;
default:
return false;
break;
}
return $logTask;
}
function abm_vocabulario($do, $vocabulario_id = "")
{
global $DBCFG;
global $DB;
$arrayTesa = doArrayDatosTesauro($_POST);
$POSTarrayUser[orga] = trim($POSTarrayUser[orga]);
$arrayTesa[titulo] = trim($arrayTesa[titulo]);
$arrayTesa[autor] = trim($arrayTesa[autor]);
$arrayTesa[idioma] = trim($arrayTesa[idioma]);
$arrayTesa[cobertura] = trim($arrayTesa[cobertura]);
$arrayTesa[keywords] = trim($arrayTesa[keywords]);
$arrayTesa[tipo] = trim($arrayTesa[tipo]);
$arrayTesa[polijerarquia] = trim($arrayTesa[polijerarquia]);
$arrayTesa[url_base] = trim($arrayTesa[url_base]);
$arrayTesa[cuando] = trim($arrayTesa[cuando]);
$POSTarrayUser[orga] = $DB->qstr($POSTarrayUser[orga], get_magic_quotes_gpc());
$arrayTesa[titulo] = $DB->qstr($arrayTesa[titulo], get_magic_quotes_gpc());
$arrayTesa[autor] = $DB->qstr($arrayTesa[autor], get_magic_quotes_gpc());
$arrayTesa[idioma] = $DB->qstr($arrayTesa[idioma], get_magic_quotes_gpc());
$arrayTesa[cobertura] = $DB->qstr($arrayTesa[cobertura], get_magic_quotes_gpc());
$arrayTesa[keywords] = $DB->qstr($arrayTesa[keywords], get_magic_quotes_gpc());
$arrayTesa[tipo] = $DB->qstr($arrayTesa[tipo], get_magic_quotes_gpc());
$arrayTesa[polijerarquia] = $DB->qstr($arrayTesa[polijerarquia], get_magic_quotes_gpc());
$arrayTesa[url_base] = $DB->qstr($arrayTesa[url_base], get_magic_quotes_gpc());
$arrayTesa[cuando] = $DB->qstr($arrayTesa[cuando], get_magic_quotes_gpc());
$arrayTesa["contact_mail"] = $_POST["contact_mail"];
$vocabulario_id = secure_data($vocabulario_id, "int");
switch ($do) {
case 'A':
//Alta de vocabulario de referencia
$sql = SQL("insert", "into {$DBCFG['DBprefix']}config (titulo,autor,idioma,cobertura,keywords,tipo,polijerarquia,url_base,cuando)\r\n\tvalues\r\n\t({$arrayTesa['titulo']},{$arrayTesa['autor']},{$arrayTesa['idioma']},{$arrayTesa['cobertura']},{$arrayTesa['keywords']},{$arrayTesa['tipo']}, {$arrayTesa['polijerarquia']}, {$arrayTesa['url_base']},{$arrayTesa['cuando']})");
break;
case 'M':
//Modificacion de vocabulario de referencia y principal
$sql = SQL("update", "{$DBCFG['DBprefix']}config SET titulo={$arrayTesa['titulo']},\r\n\t\t\t\tautor={$arrayTesa['autor']},\r\n\t\t\t\tidioma={$arrayTesa['idioma']},\r\n\t\t\t\tcobertura={$arrayTesa['cobertura']},\r\n\t\t\t\tkeywords= {$arrayTesa['keywords']},\r\n\t\t\t\ttipo= {$arrayTesa['tipo']},\r\n\t\t\t\tpolijerarquia= {$arrayTesa['polijerarquia']},\r\n\t\t\t\turl_base= {$arrayTesa['url_base']},\r\n\t\t\t\tcuando={$arrayTesa['cuando']}\r\n\t\t\t\twhere id= '{$vocabulario_id}'");
//It is the main vocabulary => change config values
if ($vocabulario_id == '1') {
$sql = SQL("select", "v.value_id,v.value_type,v.value,v.value_code,v.value_order\r\n\t\t\t\t\t\tfrom {$DBCFG['DBprefix']}values v\r\n\t\t\t\t\t\twhere v.value_type='config'");
while ($array = $sql->FetchRow()) {
$value_code = $_POST[$array["value"]] == '00' ? '0' : secure_data($_POST[$array[value]], "int");
$sql_update = SQL("update", "{$DBCFG['DBprefix']}values set value_code='{$value_code}' where value_type='config' and value='{$array['value']}'");
}
//Update to 1.72=> check if CFG_SUGGESTxWORD is defined
$ctrl = ARRAYfetchValueXValue('config', 'CFG_SUGGESTxWORD');
if (!$ctrl[value_id]) {
$value_code = $_POST["CFG_SUGGESTxWORD"] == '00' ? '0' : secure_data($_POST["CFG_SUGGESTxWORD"], "int");
$sql1_6x1_7b = SQL("insert", "into `" . $DBCFG[DBprefix] . "values` (`value_type`, `value`, `value_order`, `value_code`) VALUES\r\n\t\t\t\t\t('config', 'CFG_SUGGESTxWORD', NULL, '{$value_code}')");
}
//Update to 1.73=> check if CONTACT_MAIL is defined
if (ARRAYfetchValue('CONTACT_MAIL')) {
$ADDcontactMail = ABM_value("MOD_SINGLE_VALUE", array("value_type" => 'CONTACT_MAIL', "value_code" => 'NULL', "value" => $arrayTesa["contact_mail"]));
} else {
$ADDcontactMail = ABM_value("ADD_VALUE", array("value_type" => 'CONTACT_MAIL', "value_code" => 'NULL', "value" => $arrayTesa["contact_mail"]));
}
$MODdccontributor = ABM_value("MOD_VALUE", array("value_type" => 'METADATA', "value_code" => 'dc:contributor', "value" => $_POST["dccontributor"]));
$MODdcpublisher = ABM_value("MOD_VALUE", array("value_type" => 'METADATA', "value_code" => 'dc:publisher', "value" => $_POST["dcpublisher"]));
$MODdcrights = ABM_value("MOD_VALUE", array("value_type" => 'METADATA', "value_code" => 'dc:rights', "value" => $_POST["dcrights"]));
}
break;
case 'B':
//Eliminacion de un vocabulario de REFERENCIA
//no es el vocabulario por defecto
if ($vocabulario_id > 1) {
$sql = SQLo("delete", "from {$DBCFG['DBprefix']}tema where tesauro_id=?", array($vocabulario_id));
$sql = SQLo("delete", "from {$DBCFG['DBprefix']}config where id=?", array($vocabulario_id));
}
break;
}
return array("vocabulario_id" => $vocabulario_id);
}
