--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Lib/IMPL/ORM/Schema/ValueType.pm	Thu Jan 07 15:34:42 2010 +0300
@@ -0,0 +1,31 @@
+package IMPL::ORM::Schema::ValueType;
+
+use strict;
+
+use base qw(IMPL::DOM::Node);
+
+our %CTOR = (
+    'IMPL::DOM::Node' => sub { nodeName => 'ValueType' }
+);
+
+use IMPL::Class::Property;
+
+BEGIN {
+    public property typeName => prop_all;
+    public property typeReflected => prop_all;
+}
+
+sub CTOR {
+    my ($this,$typeName,$typeReflected) = @_;
+    
+    $this->typeName($typeName);
+    $this->typeReflected($typeReflected);
+}
+
+1;
+
+__END__
+
+=pod
+
+=cut
\ No newline at end of file