Mercurial > pub > Impl
diff Lib/IMPL/SQL/Schema/Traits.pm @ 269:dacfe7c0311a
SQL schema updated (unstable)
author | sergey |
---|---|
date | Thu, 24 Jan 2013 20:00:27 +0400 |
parents | 4d0e1962161c |
children | 56364d0c4b4f |
line wrap: on
line diff
--- a/Lib/IMPL/SQL/Schema/Traits.pm Thu Jan 17 02:39:44 2013 +0400 +++ b/Lib/IMPL/SQL/Schema/Traits.pm Thu Jan 24 20:00:27 2013 +0400 @@ -224,6 +224,7 @@ BEGIN { public property tableName => prop_get | owner_set; public property column => prop_get | owner_set; + public property position => prop_get | owner_set; } sub CTOR { @@ -290,6 +291,7 @@ public property columnType => prop_all; public property defaultValue => prop_all; public property isNullable => prop_all; + public property position => prop_all; public property options => prop_all; # hash diff format, (keys have a prefix '+' - add or update value, '-' remove value) } @@ -405,15 +407,13 @@ Данные, которые содержаться в примитивных операциях не могут существовать независимо от схемы. -=head1 OPEARATIONS +=head1 OPERATIONS =head2 General Методы обще для всех примитивных операций. -=over - -=item C<apply($schema)> +=head3 C<apply($schema)> Пытается приминить операцию к указанной схеме. @@ -431,164 +431,132 @@ =back -=back - =head2 Primitive operations -=over - -=item C<IMPL::SQL::Schema::Traits::CreateTable> +=head3 C<IMPL::SQL::Schema::Traits::CreateTable> Создает таблицу -=over +=head4 C<CTOR($table)> -=item C<CTOR($table)> - -=item C<[get]table> +=head4 C<[get]table> C<IMPL::SQL::Schema::Traits::Table> - описание создаваемой таблицы -=back - -=item C<IMPL::SQL::Schema::Traits::DropTable> +=head3 C<IMPL::SQL::Schema::Traits::DropTable> Удалает таблицу по имени -=over +=head4 C<CTOR($tableName)> -=item C<CTOR($tableName)> - -=item C<[get]tableName> +=head4 C<[get]tableName> Имя удаляемой таблицы -=back - -=item C<IMPL::SQL::Schema::Traits::RenameTable> +=head3 C<IMPL::SQL::Schema::Traits::RenameTable> -=over +=head4 C<CTOR($tableName,$tableNewName)> -=item C<CTOR($tableName,$tableNewName)> - -=item C<[get]tableName> +=head4 C<[get]tableName> Имя таблицы, которую требуется переименовать -=item C<[get]tableNewName> +=head4 C<[get]tableNewName> Новое имя таблицы -=back - -=item C<IMPL::SQL::Schema::Traits::AlterTableAddColumn> +=head3 C<IMPL::SQL::Schema::Traits::AlterTableAddColumn> Добавляет столбец в таблицу -=over +=head4 C<CTOR($tableName,$column,$position)> -=item C<CTOR($tableName,$column)> - -=item C<[get]tableName> +=head4 C<[get]tableName> Имя таблицы в которую нужно добавить столбец -=item C<[get]column> +=head4 C<[get]column> -C<IMPL::SQL::Schema::Traits::Column> - описание столбца который нужно добавить +C<IMPL::SQL::Schema::Traits::Column> - описание столбца который нужно добавить -=back +=head4 C<[get]position> -=item C<IMPL::SQL::Schema::Traits::AlterTableDropColumn> +Позиция на которую нужно вставить столбец + +=head3 C<IMPL::SQL::Schema::Traits::AlterTableDropColumn> Удаляет столбец из таблицы -=over +=head4 C<CTOR($tableName,$columnName)> -=item C<CTOR($tableName,$columnName)> - -=item C<[get]tableName> +=head4 C<[get]tableName> Имя таблицы в которой нужно удалить столбец -=item C<[get]columnName> +=head4 C<[get]columnName> Имя столбца для удаления -=back - -=item C<IMPL::SQL::Schema::Traits::AlterTableChangeColumn> +=head3 C<IMPL::SQL::Schema::Traits::AlterTableChangeColumn> Меняет описание столбца -=over - -=item C<CTOR($tableName,$columnName,%args)> +=head4 C<CTOR($tableName,$columnName,%args)> C<%args> - хеш, ключами которого являются оставшиеся свойства создаваемого объекта. -=item C<[get]tableName> +=head4 C<[get]tableName> Имя таблицы в которой находится столбец. -=item C<[get]columnName> +=head4 C<[get]columnName> Имя столбца для изменения -=item C<[get]columnType> +=head4 C<[get]columnType> Новый тип столбца. Не задан, если тип не меняется -=item C<[get]defaultValue> +=head4 C<[get]defaultValue> Значение по умолчанию. Не задано, если не меняется -=item C<[get]isNullable> +=head4 C<[get]isNullable> Может ли столбец содержать C<NULL>. Не задано, если не меняется. -=item C<[get]options> - -Хеш опций, не задан, если опции не меняются +=head4 C<[get]options> -=back +Хеш опций, не задан, если опции не меняются. Данный хеш содержит разничу между +старыми и новыми значениями свойства C<tag> столбца. -=item C<IMPL::SQL::Schema::Traits::AlterTableAddConstraint> + +=head3 C<IMPL::SQL::Schema::Traits::AlterTableAddConstraint> Базовый класс для операций по добавлению ограничений -=over +=head4 C<CTOR($tableName,$constraint)> -=item C<CTOR($tableName,$constraint)> - -=item C<[get]tableName> +=head4 C<[get]tableName> Имя таблицы в которую добавляется ограничение. -=item C<[get]constraint> +=head4 C<[get]constraint> C<IMPL::SQL::Schema::Traits::Constraint> - описние ограничения, которое нужно добавить. -=back - -=item C<IMPL::SQL::Schema::Traits::AlterTableDropConstraint> +=head3 C<IMPL::SQL::Schema::Traits::AlterTableDropConstraint> Удаляет ограничение на таблицу -=over +=head4 C<CTOR($tableName,$constraintName)> -=item C<CTOR($tableName,$constraintName)> - -=item C<[get]tableName> +=head4 C<[get]tableName> Имя таблицы в которой требуется удалить ограничение. -=item C<[get]constraintName> +=head4 C<[get]constraintName> Имя ограничения для удаления. -=back - -=back - =cut