r5181 - trunk/gnue-appserver/src/classrep

[reinhard]

Author: reinhard
Date: 2004-02-27 11:44:52 -0600 (Fri, 27 Feb 2004)
New Revision: 5181

Modified:
   trunk/gnue-appserver/src/classrep/Property.py
   trunk/gnue-appserver/src/classrep/SchemaSupport.py
Log:
Write procedures in the gsd file.


Modified: trunk/gnue-appserver/src/classrep/Property.py
===================================================================
--- trunk/gnue-appserver/src/classrep/Property.py       2004-02-27 16:45:04 UTC 
(rev 5180)
+++ trunk/gnue-appserver/src/classrep/Property.py       2004-02-27 17:44:52 UTC 
(rev 5181)
@@ -122,6 +122,12 @@
       self.dbScale  = self._ID_SCALE
 
     if self.dbType in ["string", "number"]:
+      if int (self.dbLength) == 0:
+        self.dbFullType = self.dbType
+      else:
+        self.dbFullType = "%s(%d)" % (self.dbType, int (self.dbLength))
+
+    elif self.dbType in ["string", "number"]:
       if int (self.dbScale) == 0:
         self.dbFullType = "%s(%d)" % (self.dbType, int (self.dbLength))
       else:
@@ -131,7 +137,13 @@
       self.dbFullType = self.dbType
 
     # build appserver specific type information
-    if self.gnue_type in ["string", "number"]:
+    if self.gnue_type == "string":
+      if int (self.gnue_length) == 0:
+        self.fullType = self.gnue_type
+      else:
+        self.fullType = "%s(%d)" % (self.gnue_type, int (self.gnue_length))
+
+    elif self.gnue_type == "number":
       if int (self.gnue_scale) == 0:
         self.fullType = "%s(%d)" % (self.gnue_type, int (self.gnue_length))
       else:

Modified: trunk/gnue-appserver/src/classrep/SchemaSupport.py
===================================================================
--- trunk/gnue-appserver/src/classrep/SchemaSupport.py  2004-02-27 16:45:04 UTC 
(rev 5180)
+++ trunk/gnue-appserver/src/classrep/SchemaSupport.py  2004-02-27 17:44:52 UTC 
(rev 5181)
@@ -204,6 +204,12 @@
     propdata.tablename = 'gnue_property'
     proprows = GSRows (propdata)
 
+    # and all their procedures
+    procdata = GSTableData (gsData)
+    procdata.name      = 'gnue_procedure_dump'
+    procdata.tablename = 'gnue_procedure'
+    procrows = GSRows (procdata)
+
     for classdef in classdefs:
       cProp = self.__classes ["gnue_class"].properties
 
@@ -216,7 +222,7 @@
       self.__buildValue (row, cProp ["gnue_comment"], classdef.gnue_comment)
 
       for propdef in classdef.properties.values ():
-        # add one field per property
+
         pProp = self.__classes ["gnue_property"].properties
         row = GSRow (proprows)
 
@@ -229,7 +235,20 @@
         self.__buildValue (row, pProp ["gnue_scale"], propdef.gnue_scale)
         self.__buildValue (row, pProp ["gnue_comment"], propdef.gnue_comment)
 
+      for procdef in classdef.procedures.values ():
 
+        pProp = self.__classes ["gnue_procedure"].properties
+        row = GSRow (procrows)
+
+        self.__buildValue (row, pProp ["gnue_id"],       procdef.gnue_id)
+        self.__buildValue (row, pProp ["gnue_module"],   procdef.gnue_module)
+        self.__buildValue (row, pProp ["gnue_class"],    procdef.gnue_class)
+        self.__buildValue (row, pProp ["gnue_name"],     procdef.gnue_name)
+        self.__buildValue (row, pProp ["gnue_language"], procdef.gnue_language)
+        self.__buildValue (row, pProp ["gnue_code"],     procdef.gnue_code)
+        self.__buildValue (row, pProp ["gnue_comment"],  procdef.gnue_comment)
+
+
   # ---------------------------------------------------------------------------
   # Create a new field in a row and populate it with a value
   # ---------------------------------------------------------------------------