Line # Revision Author
1 3 ahitrov@rambler.ru package @NAME@::SampleCustomDocument;
2
3 use strict;
4
5 use @NAME@::SQL::SampleTable;
6 use base 'Contenido::Document';
7
8 sub extra_properties
9 {
10 return (
11 )
12 }
13
14 sub class_name
15 {
16 return '������� ����������';
17 }
18
19 sub class_description
20 {
21 return '������� ����������';
22 }
23
24 sub class_table
25 {
26 return '@NAME@::SQL::SampleTable';
27 }
28
29 1;