Line # Revision Author
1 234 ahitrov package blogs::SQL::MembersTable;
2
3 use strict;
4 use Contenido::Globals;
5 use base 'SQL::LinkTable';
6
7 sub db_table
8 {
9 return 'blog_members';
10 }
11
12 sub available_filters {
13 my @available_filters = qw(
14 _class_filter
15 _status_filter
16 _in_id_filter
17 _id_filter
18 _name_filter
19 _class_excludes_filter
20 _excludes_filter
21 _datetime_filter
22 _date_equal_filter
23 _date_filter
24
25 _dest_id_filter
26 _dest_class_filter
27 _source_id_filter
28 _source_class_filter
29 );
30 return \@available_filters;
31 }
32
33 # ----------------------------------------------------------------------------
34 # Свойства храним в массивах, потому что порядок важен!
35 # Это общие свойства - одинаковые для всех документов.
36 #
37 # attr - обязательный параметр, название атрибута;
38 # type - тип аттрибута, требуется для отображдения;
39 # rusname - русское название, опять же требуется для отображения;
40 # hidden - равен 1, когда
41 # readonly - инициализации при записи только без изменения в дальнейшем
42 # db_field - поле в таблице
43 # default - значение по умолчанию (поле всегда имеет это значение)
44 # ----------------------------------------------------------------------------
45 sub required_properties
46 {
47 my $self = shift;
48
49 my @parent_properties = grep { $_->{attr} ne 'source_class' } $self->SUPER::required_properties;
50 return (
51 @parent_properties,
52 { # Is Moder
53 'attr' => 'moderator',
54 'type' => 'integer',
55 'rusname' => 'Является модератором',
56 'db_field' => 'moderator',
57 'db_type' => 'smallint',
58 'default' => 0,
59 },
60 );
61 }
62
63 ########### FILTERS DESCRIPTION ####################################################################################
64
65
66 1;
67