[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
gnue/gnue-config base/company/classes/company.g...
From: |
Neil Tiffin |
Subject: |
gnue/gnue-config base/company/classes/company.g... |
Date: |
Tue, 15 May 2001 10:18:17 -0700 |
CVSROOT: /home/cvs
Module name: gnue
Changes by: Neil Tiffin <address@hidden> 01/05/15 10:18:17
Modified files:
gnue-config/base/company/classes: company.gcd
gnue-config/base/person/classes: person.gcd
gnue-config/supply-chain/vendor/classes: vendor.gcd
Log message:
More updates to fix geas parser issues.
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/base/company/classes/company.gcd.diff?cvsroot=OldCVS&tr1=1.2&tr2=1.3&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/base/person/classes/person.gcd.diff?cvsroot=OldCVS&tr1=1.11&tr2=1.12&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.12&tr2=1.13&r1=text&r2=text
Patches:
Index: gnue/gnue-config/base/company/classes/company.gcd
diff -u gnue/gnue-config/base/company/classes/company.gcd:1.2
gnue/gnue-config/base/company/classes/company.gcd:1.3
--- gnue/gnue-config/base/company/classes/company.gcd:1.2 Mon May 14
07:54:34 2001
+++ gnue/gnue-config/base/company/classes/company.gcd Tue May 15 10:18:17 2001
@@ -22,7 +22,7 @@
#
# This file originally written by Neil Tiffin (address@hidden).
#
-# $Revision: 1.2 $ $Date: 2001/05/14 14:54:34 $ $Author: ntiffin $
+# $Revision: 1.3 $ $Date: 2001/05/15 17:18:17 $ $Author: ntiffin $
#
include "../../../base/person/classes/person.gcd"
include "../../../base/location/classes/address.gcd"
@@ -34,7 +34,7 @@
# -------------------------------------------------------------------------
class contact
{
- person::person person;
+ person::person name;
char code<8>; # type of contact
};
Index: gnue/gnue-config/base/person/classes/person.gcd
diff -u gnue/gnue-config/base/person/classes/person.gcd:1.11
gnue/gnue-config/base/person/classes/person.gcd:1.12
--- gnue/gnue-config/base/person/classes/person.gcd:1.11 Mon May 14
07:16:57 2001
+++ gnue/gnue-config/base/person/classes/person.gcd Tue May 15 10:18:17 2001
@@ -22,9 +22,11 @@
#
# This file originally written by Neil Tiffin (address@hidden).
#
-# $Revision: 1.11 $ $Date: 2001/05/14 14:16:57 $ $Author: ntiffin $
+# $Revision: 1.12 $ $Date: 2001/05/15 17:18:17 $ $Author: ntiffin $
#
+include "../../../base/location/classes/address.gcd"
+
module person {
# ----------------------------------------------
@@ -67,7 +69,7 @@
# ----------------------------------------------
class comm
{
- comm_type *type;
+ person::comm_type *atype;
char address<70>;
char remark<70>;
};
@@ -89,9 +91,9 @@
# name_prefix + given_names + other_name
# + surname + name_postfix
- text get_full_name(); # Mr. Frank N. Furter Sr.
+ #text get_full_name(); # Mr. Frank N. Furter Sr.
# name_prefix + surname
- text get_polite_name(); # Mr. Furter
+ #text get_polite_name(); # Mr. Furter
};
# ----------------------------------------------
Index: gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd
diff -u gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.12
gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.13
--- gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.12 Mon May
14 07:16:57 2001
+++ gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd Tue May 15
10:18:17 2001
@@ -22,7 +22,7 @@
#
# This file originally written by Neil Tiffin (address@hidden).
#
-# $Revision: 1.12 $ $Date: 2001/05/14 14:16:57 $ $Author: ntiffin $
+# $Revision: 1.13 $ $Date: 2001/05/15 17:18:17 $ $Author: ntiffin $
#
include "../../../base/company/classes/company.gcd"
@@ -39,6 +39,7 @@
#status_code code;
char code<8>;
char description<25>;
+
INDEX (code);
};
@@ -59,7 +60,8 @@
# -------------------------------------------------------------------------
class vendor : company::company
{
-
+ text notes; # notes specific to vendors
+
#vendor_status_code code; # Approved, dont use etc.
#LOOKUP status : vendor::vendorStatus(code).description = statuscode;
- gnue/gnue-config base/company/classes/company.g...,
Neil Tiffin <=