--- a/Lib/IMPL/DOM/Schema/Property.pm	Mon Oct 05 00:48:49 2009 +0400
+++ b/Lib/IMPL/DOM/Schema/Property.pm	Tue Oct 13 17:51:25 2009 +0400
@@ -28,7 +28,7 @@
 sub CTOR {
     my ($this,%args) = @_;
     
-    $this->RequiredMessage($args{RequiredMessage} || 'A property %Schema.name% is required');
+    $this->RequiredMessage($args{RequiredMessage} || 'A property %Schema.name% is required in the %Node.qname%');
 }
 
 sub Validate {
@@ -40,7 +40,9 @@
         
         if (! $nodeProp->nodeValue) {
             return new IMPL::DOM::Schema::ValidationError(
-                Message => 
+                Message => $this->RequiredMessage,
+                Node => $node,
+                Schema => $this
             );
         }
         return $this->SUPER::Validate($nodeProp);