gnue/gnue-config base/location/classes/address....

[Neil Tiffin]

CVSROOT:        /home/cvs
Module name:    gnue
Changes by:     Neil Tiffin <address@hidden>    01/05/06 15:20:21

Modified files:
        gnue-config/base/location/classes: address.gcd 
        gnue-config/base/person/classes: person.gcd 
        gnue-config/base/units/classes: units.gcd 
        gnue-config/supply-chain/vendor/classes: vendor.gcd 
        gnue-config/supply-chain/warehouse/classes: warehouse.gcd 
Removed files:
        gnue-config/base/location/classes: validcountrycodes.gcd 
                                           validstatecodes.gcd 

Log message:
        More revisions to make compatible with geas.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/base/location/classes/address.gcd.diff?cvsroot=OldCVS&tr1=1.8&tr2=1.9&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/base/person/classes/person.gcd.diff?cvsroot=OldCVS&tr1=1.9&tr2=1.10&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/base/units/classes/units.gcd.diff?cvsroot=OldCVS&tr1=1.15&tr2=1.16&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd.diff?cvsroot=OldCVS&tr1=1.10&tr2=1.11&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/supply-chain/warehouse/classes/warehouse.gcd.diff?cvsroot=OldCVS&tr1=1.4&tr2=1.5&r1=text&r2=text

Patches:
Index: gnue/gnue-config/base/location/classes/address.gcd
diff -u gnue/gnue-config/base/location/classes/address.gcd:1.8 
gnue/gnue-config/base/location/classes/address.gcd:1.9
--- gnue/gnue-config/base/location/classes/address.gcd:1.8      Fri May  4 
17:35:08 2001
+++ gnue/gnue-config/base/location/classes/address.gcd  Sun May  6 15:20:20 2001
@@ -22,14 +22,29 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.8 $ $Date: 2001/05/05 00:35:08 $ $Author: ntiffin $
+# $Revision: 1.9 $ $Date: 2001/05/06 22:20:20 $ $Author: ntiffin $
 #
 
-include "validstatecodes.gcd"
-include "validcountrycodes.gcd"
-
 module location
 {
+  class region
+  {
+    char  code<8>;   # state/region abbrev
+    char  desc<35>;  # long state/region name
+  };
+
+  class country
+  {
+    char   phone_code<4>;    # for validating phone country code
+    char   code<8>;          # for validating address country abbreviation
+    char   description<35>;  # the long country name
+    location::region []regions;        # regions or states within country
+    char   city_format<35>;  # formatting template for the city/postal code
+                             # address line
+    
+    UNIQUE INDEX(code);
+  };
+
   # -------------------------------------------------------------------------
   # address - definition of physical addresses.
   # -------------------------------------------------------------------------
Index: gnue/gnue-config/base/person/classes/person.gcd
diff -u gnue/gnue-config/base/person/classes/person.gcd:1.9 
gnue/gnue-config/base/person/classes/person.gcd:1.10
--- gnue/gnue-config/base/person/classes/person.gcd:1.9 Thu Apr 19 16:09:30 2001
+++ gnue/gnue-config/base/person/classes/person.gcd     Sun May  6 15:20:20 2001
@@ -22,7 +22,7 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.9 $ $Date: 2001/04/19 23:09:30 $ $Author: ntiffin $
+# $Revision: 1.10 $ $Date: 2001/05/06 22:20:20 $ $Author: ntiffin $
 #
 
 module person {
@@ -82,8 +82,8 @@
     char    name_postfix<8>;    # Jr.  Sr.  III
     
     char    work_title<25>;     # president, vice president
-    address []address;          # home, work address
-    comm    []comm;             # email, phone, fax, web
+    location::address []address;          # home, work address
+    person::comm    []comm;             # email, phone, fax, web
     
                # name_prefix + given_names + other_name
                #       + surname + name_postfix
Index: gnue/gnue-config/base/units/classes/units.gcd
diff -u gnue/gnue-config/base/units/classes/units.gcd:1.15 
gnue/gnue-config/base/units/classes/units.gcd:1.16
--- gnue/gnue-config/base/units/classes/units.gcd:1.15  Fri May  4 17:35:08 2001
+++ gnue/gnue-config/base/units/classes/units.gcd       Sun May  6 15:20:20 2001
@@ -22,7 +22,7 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.15 $ $Date: 2001/05/05 00:35:08 $ $Author: ntiffin $
+# $Revision: 1.16 $ $Date: 2001/05/06 22:20:20 $ $Author: ntiffin $
 #
 
 module unit
@@ -41,7 +41,7 @@
   # -------------------------------------------------------------------------
   # quantity - 
   # -------------------------------------------------------------------------
-  type quantity : unit::smpl_quantity
+  type quantity
   {                          # this definition allows us to abstract
                              # quantities as needed
                              # for example if value = 456192
@@ -72,6 +72,6 @@
                           # different
 
     unit::conversion_unit  [] units;  # units.
-    quantity convert( unit::quantity source, unit::unit destination);
+    #unit::quantity convert( unit::quantity source, unit::unit destination);
   };
 };
Index: gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd
diff -u gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.10 
gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.11
--- gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.10        Fri May 
 4 17:35:09 2001
+++ gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd     Sun May  6 
15:20:21 2001
@@ -22,7 +22,7 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.10 $ $Date: 2001/05/05 00:35:09 $ $Author: ntiffin $
+# $Revision: 1.11 $ $Date: 2001/05/06 22:20:21 $ $Author: ntiffin $
 #
 include "../../../base/location/classes/address.gcd"
 
@@ -108,7 +108,7 @@
   {
     vendor_id     id;                # NOT NULL  UNIQUE
     text          companyname;       # NOT NULL
-    vendor::vendor_address [] address;
+    vendor::address [] address;
     vendor::contact [] contact;
         
     #vendor_status_code  code;        # Approved, dont use etc.
Index: gnue/gnue-config/supply-chain/warehouse/classes/warehouse.gcd
diff -u gnue/gnue-config/supply-chain/warehouse/classes/warehouse.gcd:1.4 
gnue/gnue-config/supply-chain/warehouse/classes/warehouse.gcd:1.5
--- gnue/gnue-config/supply-chain/warehouse/classes/warehouse.gcd:1.4   Fri May 
 4 17:35:09 2001
+++ gnue/gnue-config/supply-chain/warehouse/classes/warehouse.gcd       Sun May 
 6 15:20:21 2001
@@ -22,13 +22,13 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.4 $ $Date: 2001/05/05 00:35:09 $ $Author: ntiffin $
+# $Revision: 1.5 $ $Date: 2001/05/06 22:20:21 $ $Author: ntiffin $
 #
 
 module warehouse
 {
 
-  class location {             
+  class storage_location {             
     char          part_number<25>;
     text          location_desc;               # todo expand this to int 
floor, row, column, bin
     int               on_hand_qty;