r9 - trunk/base

[reinhard]

Author: reinhard
Date: 2004-11-05 13:36:25 -0600 (Fri, 05 Nov 2004)
New Revision: 9

Modified:
   trunk/base/base.gcd
Log:
Set some properties to non-nullable.


Modified: trunk/base/base.gcd
===================================================================
--- trunk/base/base.gcd 2004-11-05 19:31:00 UTC (rev 8)
+++ trunk/base/base.gcd 2004-11-05 19:36:25 UTC (rev 9)
@@ -25,20 +25,20 @@
 
 <module name="base" comment="Basic classes">
   <class name="company">
-    <property name="code"     type="string(8)" />
+    <property name="code"     type="string(8)"     nullable="False" />
     <property name="name"     type="string(35)" />
     <property name="currency" type="base_currency" comment="base currency" />
   </class>
 
   <class name="currency" filter="base_company">
-    <property name="code"      type="string(8)" />
-    <property name="name"      type="string(35)" />
-    <property name="roundunit" type="number(14,2)" />
+    <property name="code"      type="string(8)"    nullable="False" />
+    <property name="name"      type="string(35)"   />
+    <property name="roundunit" type="number(14,2)" nullable="False" />
     <!-- Conversion factors to base currency -->
     <!-- Example: convbase = 100, convthis = 1376.03 means 100 units of base
          currency are 1376.03 units of this currency -->
-    <property name="convbase"  type="number(14,2)" />
-    <property name="convthis"  type="number(14,2)" />
+    <property name="convbase"  type="number(14,2)" nullable="False" />
+    <property name="convthis"  type="number(14,2)" nullable="False" />
 
     <procedure name="round" type="number(14,2)">
       <parameter name="amount" type="number(14,2)" />