[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
gnue/gnue-config base/location/classes/address....
From: |
Neil Tiffin |
Subject: |
gnue/gnue-config base/location/classes/address.... |
Date: |
Sun, 06 May 2001 15:20:21 -0700 |
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;
- gnue/gnue-config base/location/classes/address....,
Neil Tiffin <=