CREATE OR REPLACE PACKAGE data_arch     
		authid current_user /* вызов с правами текущего пользователя необходим для того,
			чтобы была возможность включить роль SELECT_CATALOG_ROLE (в режиме вызова
			с definer's rights роли блокированы) */
as
	procedure detach_ts(p_ts varchar2);	/* в заданном табличном пространстве
		преобразует все секции в отдельные таблицы, проверяет замкнутость
		набора для транспортировки и переводит tablespace в READ ONLY */
	procedure attach_ts(p_ts varchar2 default NULL, p_dfmb integer default 22780, p_dfcnt integer default 3);
		/* создает очередное табличное пространство (со следующим порядковым номером)
		и регистрирует его для дальнейшего использования */
	procedure update_ts;	/* проверяет размер текущего табличного пространства и при
		необходимости изменяет его */
	procedure drop_detached_partitions(p_ts varchar2 default NULL);	/* удаляет
		пустые секции, оставшиеся после detach_ts (если в них в дальнейшем не
		предполагается импортировать данные) */
	procedure import_ts(p_ts varchar2);	/* преобразует отдельные таблицы в транспортированном
		табличном пространстве в секции соответствующих таблиц, создавая эти секции и сами
		таблицы, если это необходимо */
	procedure mark_on_tape(p_ts varchar2);	/* изменяет статус табличного пространства с
		DETACHED на ON TAPE */
	procedure urgent_switch_cur_ts;	/* выполняет переключение текущего табличного пространства на
		следующее по порядковому номеру -- для случаев, когда следующее пространство не было создано
		вовремя и требуется срочное переключение */
	procedure check_inactive_tss(p_curts number);	/* проверяет состав секций на неактивных табличных
		пространствах с серийными номерами, меньшими p_curts, и делает их READ ONLY, если все в порядке */
	function get_last_msg return varchar2;	/* возвращает последнее сообщение из таблицы 
		otla_tbs_error */
	function get_col_defs(st CLOB) return CLOB;	/* возвращает из DDL-оператора создания таблицы
		только часть, соответствующую описанию столбцов (заключенную в скобки) */
	function get_ind_def(st CLOB) return CLOB;	/* возвращает из DDL-оператора создания индекса
		только часть CREATE ... INDEX ... ON .... (....) */
end otla_arch;
/