gnue/gnue-config/supply-chain/vendor/classes ve...

[Neil Tiffin]

CVSROOT:        /home/cvs
Module name:    gnue
Changes by:     Neil Tiffin <address@hidden>    01/07/04 16:43:03

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

Log message:
        Update vendor.gcd to current syntax.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd.diff?cvsroot=OldCVS&tr1=1.15&tr2=1.16&r1=text&r2=text

Patches:
Index: gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd
diff -u gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.15 
gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.16
--- gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd:1.15        Sat Jun 
23 20:17:42 2001
+++ gnue/gnue-config/supply-chain/vendor/classes/vendor.gcd     Wed Jul  4 
16:43:03 2001
@@ -22,27 +22,26 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.15 $ $Date: 2001/06/24 03:17:42 $ $Author: ntiffin $
+# $Revision: 1.16 $ $Date: 2001/07/04 23:43:03 $ $Author: ntiffin $
 #
+
 include "../../../base/org/classes/org.gcd"
+include "../../../base/currency/classes/currency.gcd"
 
 module vendor
 {
-  #type  status_code  = char<8>;
-  #type  type_code    = char<8>;
-    
   # -------------------------------------------------------------------------
   # vendor status i.e. approved, dont use, special purchase only
   # -------------------------------------------------------------------------
   class status
   {
-    #status_code  code;
     char         code<8>;
     char         description<25>;
     
     INDEX (code);
   };
     
+    
   # -------------------------------------------------------------------------
   # type of vendor.  service, raw material, labor.
   # -------------------------------------------------------------------------
@@ -53,23 +52,25 @@
         
     INDEX (code);
   };
-        
+    
     
   # -------------------------------------------------------------------------
-  # 
+  # vendor specific information
   # -------------------------------------------------------------------------
-  class vendor : organzation::organzation
+  class vendor : org::organization
   {
-    text  notes;                      # notes specific to vendors
+    text            notes;    # notes specific to vendors
     
-    #vendor_status_code  code;        # Approved, dont use etc.
-    #LOOKUP status : vendor::vendorStatus(code).description = statuscode;
-
-    #vendor_type_code  code;          # Service, manufacturer, office supplies 
etc.
-    #LOOKUP type : vendor::VendorType(code).description = typecode;
-        
+    vendor::status *status;   # Approved, dont use etc.
+    vendor::type   *type;     # Service, manufacturer, office supplies etc.
+    
+    char            std_terms; # TODO should be pointer
+    
+    currency::money year_0;  # this year to date
+    currency::money year_1;  # last year
+    currency::money year_2;  # year before
+    
+    date            last_receipt;
   };
-
-};
-
 
+};
\ No newline at end of file