commit-gnue
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

r6681 - in trunk/gnue-packages: base/comm base/item base/person finance/


From: kilo
Subject: r6681 - in trunk/gnue-packages: base/comm base/item base/person finance/tax
Date: Tue, 16 Nov 2004 05:05:10 -0600 (CST)

Author: kilo
Date: 2004-11-16 05:05:10 -0600 (Tue, 16 Nov 2004)
New Revision: 6681

Modified:
   trunk/gnue-packages/base/comm/comm.gcd
   trunk/gnue-packages/base/item/item.gcd
   trunk/gnue-packages/base/person/person.gcd
   trunk/gnue-packages/finance/tax/item-vat.gcd
   trunk/gnue-packages/finance/tax/tax.gcd
Log:
Get packages up to usable state...

Modified: trunk/gnue-packages/base/comm/comm.gcd
===================================================================
--- trunk/gnue-packages/base/comm/comm.gcd      2004-11-16 11:04:25 UTC (rev 
6680)
+++ trunk/gnue-packages/base/comm/comm.gcd      2004-11-16 11:05:10 UTC (rev 
6681)
@@ -1,26 +1,51 @@
 <?xml version="1.0" encoding="UTF-8"?>
 
-<!-- Implements a business logic object representing communication 
possibilities. -->
+<!-- COMM Module
+     Implements a business logic object representing communication
+     possibilities.
+
+     Copyright 2004 Free Software Foundation
+
+     This file is part of GNU Enterprise.
+
+     GNU Enterprise is free software; you can redistribute it and/or
+     modify it under the terms of the GNU General Public License as
+     published by the Free Software Foundation; either version 2 of
+     the License, or (at your option) any later version.
+
+     GNU Enterprise is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+     GNU General Public License for more details.
+
+     You should have received a copy of the GNU General Public License
+     along with GNU Enterprise; see the file COPYING.  If not, write to
+     the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+     Boston, MA 02111-1307, USA.
+
+     $Id$ -->
+
 <module name="COMM"             comment="Ways to reach someone/something">
-  <class name="CommType" comment="Defines a communication type and its format">
-    <property name="code"       type="CDICT_Code"           nullable="False"   
 comment="Phone/Fax/Email/Post, Code 001" />
-    <property name="format"     type="string(70)"                              
 comment="For decoding" />
-    <property name="name"       type="string(35)"           nullable="False"   
 comment="'Home phone' or 'Work email' etc" />
-    <property name="formatted"  type="string"                                  
 comment="">
-      <![CDATA[
+  <class name="Comm" comment="">
+    <property name="access"     type="string(70)"                           
comment="a phone number, an email address, etc"/>
+    <property name="commType"   type="COMM_CommType"                        
comment=""/>
+    <property name="comment"    type="string(70)"                           
comment=""/>
+    <property name="formatted"  type="string"                               
comment="">
+      return self.access
+    </property>
+  </class>
+  
+  <class name="CommType" comment="Defines a communication channel and its 
format">
+    <property name="code"       type="COMM_CommCode"    nullable="False"    
comment="Phone/Fax/Email/Post etc" />
+    <property name="format"     type="string(70)"                           
comment="For decoding" />
+    <property name="name"       type="string(35)"       nullable="False"    
comment="'Home phone' or 'Work email' etc" />
+    <property name="formatted"  type="string"                               
comment="">
       return self.name
-      ]]>
     </property>
   </class>
 
-  <class name="Comm" comment="">
-    <property name="access"     type="string(70)"                              
 comment="a phone number, an email address, etc"/>
-    <property name="commType"   type="COMM_CommType"                           
 comment=""/>
-    <property name="comment"    type="string(70)"                              
 comment=""/>
-    <property name="formatted"  type="string"                                  
 comment="">
-      <![CDATA[
-      return self.access
-      ]]>
-    </property>
+  <class name="CommCode">
+    <property name="code"   type="string(8)"    comment="" />
+    <property name="value"  type="string(70)"   comment="" />
   </class>
 </module>


Property changes on: trunk/gnue-packages/base/comm/comm.gcd
___________________________________________________________________
Name: svn:keywords
   + Id

Modified: trunk/gnue-packages/base/item/item.gcd
===================================================================
--- trunk/gnue-packages/base/item/item.gcd      2004-11-16 11:04:25 UTC (rev 
6680)
+++ trunk/gnue-packages/base/item/item.gcd      2004-11-16 11:05:10 UTC (rev 
6681)
@@ -25,24 +25,24 @@
 
 <module name="ITEM">
   <class name="Item"        comment="Atomic item info">
-    <property name="type"           type="ITEM_ItemType"    nullable="False"   
 comment="" />
-    <property name="shortName"      type="string(35)"                          
 comment="" />
-    <property name="longName"       type="string(70)"                          
 comment="" />
-    <property name="keywords"       type="string"                              
 comment="Free form keywords for lookup" />
-    <property name="price"          type="ITEM_Price"                          
 comment="" />
+    <property name="type"       type="ITEM_ItemType"    nullable="False"    
comment="" />
+    <property name="shortName"  type="string(35)"                           
comment="" />
+    <property name="longName"   type="string(70)"                           
comment="" />
+    <property name="keywords"   type="string"                               
comment="Free form keywords for lookup" />
+    <property name="price"      type="ITEM_Price"                           
comment="" />
   </class>
 
   <class name="Price"       comment="Item price information">
-    <property name="minQuantity"    type="CORE_Quantity"                    
comment="" />
-    <property name="maxQuantity"    type="CORE_Quantity"                    
comment="" />
-    <property name="unitPrice"      type="CORE_Amount"                      
comment="" />
-    <property name="minAmount"      type="CORE_Amount"                      
comment="" />
-    <property name="maxAmount"      type="CORE_Amount"                      
comment="" />
+    <property name="minQuantity"    type="CORE_Quantity"    comment="" />
+    <property name="maxQuantity"    type="CORE_Quantity"    comment="" />
+    <property name="unitPrice"      type="number(10,2)"     comment="" />
+    <property name="minAmount"      type="number(10,2)"     comment="" />
+    <property name="maxAmount"      type="number(10,2)"     comment="" />
   </class>
 
   <class name="ItemType">
-    <property name="code"           type="string(35)"                       
comment="" />
-    <property name="value"          type="string(70)"                       
comment="" />
+    <property name="code"   type="string(35)"   comment="" />
+    <property name="value"  type="string(70)"   comment="" />
   </class>
 
 </module>

Modified: trunk/gnue-packages/base/person/person.gcd
===================================================================
--- trunk/gnue-packages/base/person/person.gcd  2004-11-16 11:04:25 UTC (rev 
6680)
+++ trunk/gnue-packages/base/person/person.gcd  2004-11-16 11:05:10 UTC (rev 
6681)
@@ -20,8 +20,9 @@
      along with GNU Enterprise; see the file COPYING.  If not, write to
      the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
      Boston, MA 02111-1307, USA.
--->
 
+     $Id$ -->
+
 <module name="PERSON" comment="A person with names, physical address(es) and 
communication way(s)">
   <class name="Person" comment="Typedef of a person">
     <property name="namePrefix"     type="PERSON_Prefix"                    
comment="Mr., Mrs., Dr., etc." />
@@ -31,8 +32,8 @@
     <property name="nameSuffix"     type="PERSON_Suffix"                    
comment="Jr., Sr., III., etc." />
     <property name="nameNick"       type="string(35)"                       
comment="" />
     <property name="workTitle"      type="string(35)"                       
comment="" />
+    
     <property name="fullName"       type="string"                           
comment="Full name per local requirements">
-      <![CDATA[
       name = ''
       if self.namePrefix : name += self.namePrefix.value + ' '
       if self.nameFirst:   name += self.nameFirst + ' '
@@ -41,30 +42,14 @@
       if self.nameSuffix:  name += ' ' + self.nameSuffix.value
 
       return name
-      ]]>
     </property>
+    
     <property name="politeName"     type="string"                           
comment="Polite name per local requirements">
-      <![CDATA[
       name = ''
       if self.namePrefix : name += self.namePrefix.value + ' '
       name += self.nameLast
       return name
-      ]]>
     </property>
-
-    <procedure name="getAddress"    type="LOC_Address"                      
comment="Get an address by address type">
-      <parameter name="addressType" type="CDICT_Code" />
-      <![CDATA[
-      pass
-      ]]>
-    </procedure>
-
-    <procedure name="getComm"       type="COMM_Comm"                        
comment="Get a communication way by comm type">
-      <parameter name="commType"    type="CDICT_Code" />
-      <![CDATA[
-      pass
-      ]]>
-    </procedure>
   </class>
 
   <class name="Prefix"  comment="Stores valid name prefixes">
@@ -77,11 +62,4 @@
     <property name="value"          type="string(35)"                       
comment="" />
   </class>
 
-
-  <class name="Employee" comment="">
-    <property name="code"           type="string(8)"                        
comment="Employee designation" />
-    <property name="person"         type="PERSON_Person"                    
comment="" />
-    <property name="department"     type="CDICT_Code"                       
comment="Code 006" />
-  </class>
-
 </module>


Property changes on: trunk/gnue-packages/base/person/person.gcd
___________________________________________________________________
Name: svn:keywords
   + Id


Property changes on: trunk/gnue-packages/finance/tax/item-vat.gcd
___________________________________________________________________
Name: svn:keywords
   + Id


Property changes on: trunk/gnue-packages/finance/tax/tax.gcd
___________________________________________________________________
Name: svn:keywords
   + Id





reply via email to

[Prev in Thread] Current Thread [Next in Thread]