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