r15 - trunk/base

[reinhard]

Author: reinhard
Date: 2005-01-06 08:33:27 -0600 (Thu, 06 Jan 2005)
New Revision: 15

Modified:
   trunk/base/base-C.gld
   trunk/base/base-de.gld
   trunk/base/base.gcd
Log:
Moved base currency to a separate parameters class to fix chicken-egg problem.


Modified: trunk/base/base-C.gld
===================================================================
--- trunk/base/base-C.gld       2004-11-07 22:35:23 UTC (rev 14)
+++ trunk/base/base-C.gld       2005-01-06 14:33:27 UTC (rev 15)
@@ -27,7 +27,6 @@
   <class name="company" label="Company">
     <property name="code"     pos="100" label="Code"          search="100" />
     <property name="name"     pos="200" label="Name"          search="200" />
-    <property name="currency" pos="300" label="Base currency" />
   </class>
 
   <class name="currency" label="Currency">
@@ -37,4 +36,8 @@
     <property name="convbase"  pos="400" label="Conversion amount in base 
currency" />
     <property name="convthis"  pos="401" label="Conversion amount in this 
currency" />
   </class>
+
+  <class name="parameters" label="Parameters">
+    <property name="currency" pos="100" label="Base currency" />
+  </class>
 </module>

Modified: trunk/base/base-de.gld
===================================================================
--- trunk/base/base-de.gld      2004-11-07 22:35:23 UTC (rev 14)
+++ trunk/base/base-de.gld      2005-01-06 14:33:27 UTC (rev 15)
@@ -27,7 +27,6 @@
   <class name="company" label="Firma">
     <property name="code"     pos="100" label="Code"         search="100" />
     <property name="name"     pos="200" label="Name"         search="200" />
-    <property name="currency" pos="300" label="Basisw�hrung" />
   </class>
 
   <class name="currency" label="W�hrung">
@@ -37,4 +36,8 @@
     <property name="convbase"  pos="400" label="Konvertierungsbetrag 
Basisw�hrung" />
     <property name="convthis"  pos="401" label="Konvertierungsbetrag diese 
W�hrung" />
   </class>
+
+  <class name="parameters" label="Parameter">
+    <property name="currency" pos="100" label="Basisw�hrung" />
+  </class>
 </module>

Modified: trunk/base/base.gcd
===================================================================
--- trunk/base/base.gcd 2004-11-07 22:35:23 UTC (rev 14)
+++ trunk/base/base.gcd 2005-01-06 14:33:27 UTC (rev 15)
@@ -27,7 +27,6 @@
   <class name="company">
     <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">
@@ -77,4 +76,8 @@
       ]]>
     </procedure>
   </class>
+
+  <class name="parameters" filter="base_company">
+    <property name="currency" type="base_currency" comment="base currency" />
+  </class>
 </module>