r5976 - in trunk/gnue-packages/base: comm/class location/class person/class

[kilo]

Author: kilo
Date: 2004-07-14 05:01:08 -0500 (Wed, 14 Jul 2004)
New Revision: 5976

Modified:
   trunk/gnue-packages/base/comm/class/comm.gcd
   trunk/gnue-packages/base/location/class/loc.gcd
   trunk/gnue-packages/base/person/class/person.gcd
Log:
Updated classes with code dictionary designations

Modified: trunk/gnue-packages/base/comm/class/comm.gcd
===================================================================
--- trunk/gnue-packages/base/comm/class/comm.gcd        2004-07-14 09:44:40 UTC 
(rev 5975)
+++ trunk/gnue-packages/base/comm/class/comm.gcd        2004-07-14 10:01:08 UTC 
(rev 5976)
@@ -3,7 +3,7 @@
 <!-- Implements a business logic object representing communication 
possibilities. -->
 <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, CodeXXX" />
+    <property name="code"       type="CDICT_Code"           nullable="False"   
 comment="Phone/Fax/Email/Post, Code 001" />
     <property name="format"     type="string(60)"                              
 comment="For decoding" />
     <property name="name"       type="string(30)"           nullable="False"   
 comment="'Home phone' or 'Work email' etc" />
     <property name="formatted"  type="string(30)"                              
 comment="">

Modified: trunk/gnue-packages/base/location/class/loc.gcd
===================================================================
--- trunk/gnue-packages/base/location/class/loc.gcd     2004-07-14 09:44:40 UTC 
(rev 5975)
+++ trunk/gnue-packages/base/location/class/loc.gcd     2004-07-14 10:01:08 UTC 
(rev 5976)
@@ -39,7 +39,7 @@
 
   <class name="Place" comment="">
     <property name="name"       type="string(40)"           nullable="False"   
 comment="GNUe..." />
-    <property name="type"       type="CDICT_Code"           nullable="False"   
 comment="street/avenue/boulevard/etc, CodeXXX" />
+    <property name="type"       type="CDICT_Code"           nullable="False"   
 comment="street/avenue/boulevard/etc, Code 002" />
     <property name="formatted"  type="string(50)"                              
 comment="Returns place formatted per local requirements">
       <![CDATA[
       return self.name + ' ' + self.type
@@ -48,7 +48,7 @@
   </class>
 
   <class name="Address" comment="">
-    <property name="descr"      type="CDICT_Code"                              
 comment="Type of address (home, work, business, etc) CodeXXX" />
+    <property name="descr"      type="CDICT_Code"                              
 comment="Type of address (home, work, business, etc) Code 003" />
     <property name="country"    type="LOC_Country"                             
 comment="" />
     <property name="zip"        type="LOC_Zip"                                 
 comment="Also designates city" />
     <property name="place"      type="LOC_Place"                               
 comment="Name and type of place" />

Modified: trunk/gnue-packages/base/person/class/person.gcd
===================================================================
--- trunk/gnue-packages/base/person/class/person.gcd    2004-07-14 09:44:40 UTC 
(rev 5975)
+++ trunk/gnue-packages/base/person/class/person.gcd    2004-07-14 10:01:08 UTC 
(rev 5976)
@@ -2,11 +2,11 @@
 
 <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="CDICT_Code"                          
 comment="Mr., Mrs., Dr., etc" />
+    <property name="namePrefix"     type="CDICT_Code"                          
 comment="Mr., Mrs., Dr., etc Code 004" />
     <property name="nameFirst"      type="string(25)"                          
 comment="" />
     <property name="nameMiddle"     type="string(25)"                          
 comment="" />
     <property name="nameLast"       type="string(25)"       nullable="False"   
 comment="" />
-    <property name="nameSuffix"     type="CDICT_Code"                          
 comment="Jr., Sr., III., etc" />
+    <property name="nameSuffix"     type="CDICT_Code"                          
 comment="Jr., Sr., III., etc Code 005" />
     <property name="nameNick"       type="string(25)"                          
 comment="" />
     <property name="workTitle"      type="string(25)"                          
 comment="" />
     <property name="fullName"       type="string(100)"                         
 comment="Full name per local requirements">
@@ -48,7 +48,7 @@
   <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="" />
+    <property name="department"     type="CDICT_Code"                          
 comment="Code 006" />
   </class>
 
 </module>