gnue/gnue-config base/company/classes/company.g...

[Neil Tiffin]

CVSROOT:        /home/cvs
Module name:    gnue
Changes by:     Neil Tiffin <address@hidden>    01/05/27 13:00:41

Modified files:
        gnue-config/base/company/classes: company.gcd 
        gnue-config/supply-chain/vendor/classes: vendor.gcd 

Log message:
        Incorporate Stans comments regarding changing company to organization.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/base/company/classes/company.gcd.diff?cvsroot=OldCVS&tr1=1.3&tr2=1.4&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.13&tr2=1.14&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.3 
gnue/gnue-config/base/company/classes/company.gcd:1.4
--- gnue/gnue-config/base/company/classes/company.gcd:1.3       Tue May 15 
10:18:17 2001
+++ gnue/gnue-config/base/company/classes/company.gcd   Sun May 27 13:00:41 2001
@@ -22,12 +22,12 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.3 $ $Date: 2001/05/15 17:18:17 $ $Author: ntiffin $
+# $Revision: 1.4 $ $Date: 2001/05/27 20:00:41 $ $Author: ntiffin $
 #
 include "../../../base/person/classes/person.gcd"
 include "../../../base/location/classes/address.gcd"
 
-module company
+module organization
 {
   # -------------------------------------------------------------------------
   # base class for instantiating person type as a general contact
@@ -49,14 +49,15 @@
   # -------------------------------------------------------------------------
   # base class for vendor and customer classes
   # -------------------------------------------------------------------------
-  class company
+  class organization
   {
-    char                   companyname<80>; # NOT NULL
-    company::address []    address;
-    company::contact []    contact;
-    char                   keyword<100>;    # keyword for searching
+    char                     organization_name<80>; # NOT NULL
+    organization::address [] address;
+    organization::contact [] contact;
+    person::comm_type  []    comm;      # co. telephone number, fax, email etc.
+    char                     keyword<100>;    # keyword for searching
     
-    INDEX (companyname);
+    INDEX (organization_name);
   };
 
 };
Index: gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd
diff -u gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.13 
gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.14
--- gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.13        Tue May 
15 10:18:17 2001
+++ gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd     Sun May 27 
13:00:41 2001
@@ -22,7 +22,7 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.13 $ $Date: 2001/05/15 17:18:17 $ $Author: ntiffin $
+# $Revision: 1.14 $ $Date: 2001/05/27 20:00:41 $ $Author: ntiffin $
 #
 include "../../../base/company/classes/company.gcd"
 
@@ -58,7 +58,7 @@
   # -------------------------------------------------------------------------
   # 
   # -------------------------------------------------------------------------
-  class vendor : company::company
+  class vendor : organzation::organzation
   {
     text  notes;                      # notes specific to vendors