r5910 - trunk/gnue-appserver/src/gcd

[johannes]

Author: johannes
Date: 2004-06-15 08:42:23 -0500 (Tue, 15 Jun 2004)
New Revision: 5910

Modified:
   trunk/gnue-appserver/src/gcd/gcd2sql.py
Log:
Fixed gnue_property inserts for reference properties


Modified: trunk/gnue-appserver/src/gcd/gcd2sql.py
===================================================================
--- trunk/gnue-appserver/src/gcd/gcd2sql.py     2004-06-15 10:12:11 UTC (rev 
5909)
+++ trunk/gnue-appserver/src/gcd/gcd2sql.py     2004-06-15 13:42:23 UTC (rev 
5910)
@@ -310,14 +310,19 @@
               ('gnue_module'  , 'string' , moduleId),
               ('gnue_class'   , 'string' , cClass.gnue_id),
               ('gnue_name'    , 'string' , sObject.name),
-              ('gnue_type'    , 'string' , sObject.datatype),
               ('gnue_nullable', 'boolean', sObject.nullable)]
 
+      if sObject.isReference:
+        data.append (('gnue_type'    , 'string' , sObject.type))
+      else:
+        data.append (('gnue_type'    , 'string' , sObject.datatype))
+
+
       if hasattr (sObject, 'comment'):
         data.append (('gnue_comment', 'string', sObject.comment))
-      if sObject.length:
+      if sObject.length and not sObject.isReference:
         data.append (('gnue_length', 'number', sObject.length))
-      if sObject.scale:
+      if sObject.scale and not sObject.isReference:
         data.append (('gnue_scale', 'number', sObject.scale))
 
       self.__addData ('gnue_property', data)