|
0
|
1 use strict;
|
|
|
2 use warnings;
|
|
|
3
|
|
|
4 package IMPL::ORM::MapInfo;
|
|
|
5 use base qw(IMPL::Object);
|
|
|
6 use IMPL::Class::Property;
|
|
|
7
|
|
|
8 BEGIN {
|
|
|
9 public property Entities => prop_all;
|
|
|
10 public property Cumulative => prop_all;
|
|
|
11 }
|
|
|
12
|
|
|
13 package IMPL::ORM::MapEntityInfo;
|
|
|
14 use base qw(IMPL::Object IMPL::Object::Autofill);
|
|
|
15 use IMPL::Class::Property;
|
|
|
16
|
|
|
17 BEGIN {
|
|
|
18 public property Name => prop_all;
|
|
|
19 public property Fields => prop_all;
|
|
|
20 }
|
|
|
21
|
|
|
22 1;
|
