package SQL::SectionTable;
use strict;
use base 'SQL::ProtoTable';
sub db_table
{
return 'sections';
}
sub available_filters {
my @available_filters = qw(
_class_filter
_status_filter
_in_id_filter
_id_filter
_name_filter
_class_excludes_filter
_excludes_filter
_datetime_filter
_date_equal_filter
_date_filter
_previous_days_filter
_s_filter
_alias_filter
);
return \@available_filters;
}
# ----------------------------------------------------------------------------
# �������� ������ � ��������, ������ ��� ������� �����!
# ��� ����� �������� - ���������� ��� ���� ����������.
#
# attr - ������������ ��������, �������� ��������;
# type - ��� ���������, ��������� ��� ������������;
# rusname - ������� ��������, ����� �� ��������� ��� �����������;
# hidden - ����� 1, �����
# readonly - ������������� ��� ������ ������ ��� ��������� � ����������
# db_field - ���� � �������
# default - �������� �� ��������� (���� ������ ����� ��� ��������)
# ----------------------------------------------------------------------------
sub required_properties
{
return (
{ # ������������� ���������, �������� �� ���� �����...
'attr' => 'id',
'type' => 'integer',
'rusname' => '������������� ���������',
'hidden' => 1,
'auto' => 1,
'readonly' => 1,
'db_field' => 'id',
'db_type' => 'integer',
},
{ # ������������� ������������ ������
'attr' => 'pid',
'type' => 'parent',
'rusname' => '������������� ��������',
'db_field' => 'pid',
'db_type' => 'integer',
},
{ # ������� ����������
'attr' => 'sorder',
'type' => 'sorder',
'rusname' => '������� ����������',
'hidden' => 1,
'db_field' => 'sorder',
'db_type' => 'integer',
},
{ # ����� ���������...
'attr' => 'class',
'type' => 'string',
'rusname' => '����� ���������',
'hidden' => 1,
'readonly' => 1,
'db_field' => 'class',
'db_type' => 'varchar(48)',
},
{ # ��� ���������...
'attr' => 'name',
'type' => 'string',
'rusname' => '��������',
'db_field' => 'name',
'db_type' => 'varchar(255)',
},
{ # ��� ���������...
'attr' => 'alias',
'type' => 'string',
'rusname' => 'web-alias',
'db_field' => 'alias',
'db_type' => 'text',
},
{ # ����� �������� ���������, ��������� ����...
'attr' => 'ctime',
'type' => 'datetime',
'rusname' => '����� ��������',
'hidden' => 1,
'readonly' => 1,
'auto' => 1,
'db_field' => 'ctime',
'db_type' => 'timestamp',
'default' => 'CURRENT_TIMESTAMP',
},
{ # ����� ����������� ���������, ��������� ����...
'attr' => 'mtime',
'type' => 'datetime',
'rusname' => '����� �����������',
'hidden' => 1,
'auto' => 1,
'db_field' => 'mtime',
'db_type' => 'timestamp',
'default' => 'CURRENT_TIMESTAMP',
},
{ # ���� ���� ������� �������� ����������...
'attr' => 'status',
'type' => 'status',
'rusname' => '������',
'db_field' => 'status',
'db_type' => 'integer',
},
);
}
########### FILTERS DESCRIPTION ####################################################################################
sub _s_filter {
my ($self,%opts)=@_;
return undef unless ( exists($opts{s}) );
if ($opts{dive}) {
return &SQL::Common::_generic_int_filter('d.pid', $opts{all_childs});
} else {
return &SQL::Common::_generic_int_filter('d.pid', $opts{s});
}
}
sub _alias_filter {
my ($self,%opts)=@_;
return undef unless ( exists($opts{alias}) );
return &SQL::Common::_generic_text_filter('d.alias', $opts{alias});
}
1;