commit-gnue
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

r6791 - in trunk/gnue-packages: base/item base/person sales sales/doc su


From: kilo
Subject: r6791 - in trunk/gnue-packages: base/item base/person sales sales/doc supply-chain/doc supply-chain/inventory
Date: Thu, 9 Dec 2004 04:04:47 -0600 (CST)

Author: kilo
Date: 2004-12-09 04:04:47 -0600 (Thu, 09 Dec 2004)
New Revision: 6791

Added:
   trunk/gnue-packages/base/item/API.txt
   trunk/gnue-packages/sales/doc/API.txt
   trunk/gnue-packages/supply-chain/doc/inventory.txt
Modified:
   trunk/gnue-packages/base/person/person.gcd
   trunk/gnue-packages/sales/sales.gcd
   trunk/gnue-packages/supply-chain/inventory/inventory.gcd
Log:
Packages.
Added API files, extended SALES module.

Added: trunk/gnue-packages/base/item/API.txt
===================================================================
--- trunk/gnue-packages/base/item/API.txt       2004-12-09 09:58:57 UTC (rev 
6790)
+++ trunk/gnue-packages/base/item/API.txt       2004-12-09 10:04:47 UTC (rev 
6791)
@@ -0,0 +1,13 @@
+Module API
+
+Properties
+==========
+type
+shortName
+longName
+keywords
+unit
+
+Procedures
+==========
+

Modified: trunk/gnue-packages/base/person/person.gcd
===================================================================
--- trunk/gnue-packages/base/person/person.gcd  2004-12-09 09:58:57 UTC (rev 
6790)
+++ trunk/gnue-packages/base/person/person.gcd  2004-12-09 10:04:47 UTC (rev 
6791)
@@ -80,7 +80,7 @@
   ************************************************************************ -->
   <class name="BirthData"   comment="Constant personal data determinded at 
birth">
     <property name="name"   type="PERSON_Name"  comment="Original name" />
-    <property name="date"   type="datetime"     comment="Date of birth" />
+    <property name="date"   type="date"         comment="Date of birth" />
     <property name="place"  type="string(70)"   comment="Place of birth" />
     <property name="sex"    type="string(1)"    comment="F or M" />
     <property name="mother" type="PERSON_Name"  comment="Original name of 
person's mother" />

Added: trunk/gnue-packages/sales/doc/API.txt
===================================================================
--- trunk/gnue-packages/sales/doc/API.txt       2004-12-09 09:58:57 UTC (rev 
6790)
+++ trunk/gnue-packages/sales/doc/API.txt       2004-12-09 10:04:47 UTC (rev 
6791)
@@ -0,0 +1,16 @@
+Module API
+
+Properties
+==========
+price       number(10,2)
+vat         TAX_Vat
+
+Procedures
+==========
+getNet      returns Net price, wrt quantity
+getVat      returns Vat value, wrt quantity
+getGross    returns Gross value, wrt quantity
+getVatRate  returns Vat rate
+setPrice
+setVatRate
+

Modified: trunk/gnue-packages/sales/sales.gcd
===================================================================
--- trunk/gnue-packages/sales/sales.gcd 2004-12-09 09:58:57 UTC (rev 6790)
+++ trunk/gnue-packages/sales/sales.gcd 2004-12-09 10:04:47 UTC (rev 6791)
@@ -23,10 +23,43 @@
 
      $Id$ -->
 
+<!--
+Prerequisites:
+    base/item/item.gcd
+    finance/tax/tax.gcd
+-->
+
 <module name="SALES">
   <class name="ITEM_Item">
     <!--pricing module...-->
     <property name="price"  type="number(10,2)"/>
-    <!--sales conditions-->
+    <property name="vat"    type="TAX_Vat"/>
+    
+    <procedure name="getNet"  type="number(10,2)">
+      <parameter name="quantity" type="number(10,2)"/>
+      return self.price and (self.price * quantity) or 0
+    </procedure>
+
+    <procedure name="getVat"    type="number(10,2)">
+      <parameter name="quantity" type="number(10,2)"/>
+      if (self.price is not None) and (self.vat is not None):
+        return self.vat.TAX_vatFromNet(inNet=self.getPrice(quantity=quantity))
+      else:
+        return 0
+    </procedure>
+
+    <procedure name="getGross"  type="number(10,2)">
+      <parameter name="quantity" type="number(10,2)"/>
+      if (self.price is not None) and (self.vat is not None):
+        return 
self.vat.TAX_grossFromNet(inNet=self.getPrice(quantity=quantity))
+      else:
+        return 0
+    </procedure>
+
+    <procedure name="getVatRate"    type="number(6,3)">
+      return self.vat and self.vat.TAX_rate or 0
+    </procedure>
+    
+    <!--sales conditions (discounts, special price, etc)-->
   </class>
 </module>

Added: trunk/gnue-packages/supply-chain/doc/inventory.txt
===================================================================
--- trunk/gnue-packages/supply-chain/doc/inventory.txt  2004-12-09 09:58:57 UTC 
(rev 6790)
+++ trunk/gnue-packages/supply-chain/doc/inventory.txt  2004-12-09 10:04:47 UTC 
(rev 6791)
@@ -0,0 +1,27 @@
+Summary:
+    Inventory controls the company's goods and materials until they are
+    used up or sold.
+    Purchasing issues Purchase Orders to replenish stock.
+    Receiving receives the physical goods and verifies their quantity
+    and quality.
+    Shipping and Manufacturing withdraw items from Inventory.
+
+Requirements:
+    Manage inventory.
+    Provide way to track where items are stored in warehouse.
+    Move items into new local storage locations.
+    An item may be stored in multiple locations in the warehouse.
+    Provide capability to combine locations and split locations.
+    All movement that leaves a physical location will go out through
+        the shipping module and come in through the receiving module.
+
+    A physical location (a building, a business address etc)
+        may have many warehouses.
+    For each item in each storage location in each warehouse
+        keep track of actual quantity on hand.
+    Bin Types. Each bin can utilize user definable types
+        (i.e. static bin, movable bin, cart, reels etc.)
+    The storage locations will be defined using user definable locations
+        like floors, isles, stands, columns, bins, etc.
+
+

Modified: trunk/gnue-packages/supply-chain/inventory/inventory.gcd
===================================================================
--- trunk/gnue-packages/supply-chain/inventory/inventory.gcd    2004-12-09 
09:58:57 UTC (rev 6790)
+++ trunk/gnue-packages/supply-chain/inventory/inventory.gcd    2004-12-09 
10:04:47 UTC (rev 6791)
@@ -24,33 +24,6 @@
      $Id$ -->
 
 <!--
-Summary:
-    Inventory controls the company's goods and materials until they are
-    used up or sold.
-    Purchasing issues Purchase Orders to replenish stock.
-    Receiving receives the physical goods and verifies their quantity
-    and quality.
-    Shipping and Manufacturing withdraw items from Inventory.
-
-Requirements:
-    Manage inventory.
-    Provide way to track where items are stored in warehouse.
-    Move items into new local storage locations.
-    An item may be stored in multiple locations in the warehouse.
-    Provide capability to combine locations and split locations.
-    All movement that leaves a physical location will go out through
-        the shipping module and come in through the receiving module.
-
-    A physical location (a building, a business address etc)
-        may have many warehouses.
-    For each item in each storage location in each warehouse
-        keep track of actual quantity on hand.
-    Bin Types. Each bin can utilize user definable types
-        (i.e. static bin, movable bin, cart, reels etc.)
-    The storage locations will be defined using user definable locations
-        like floors, isles, stands, columns, bins, etc.
-
-
 Prerequisites:
     base/item/item.gcd
     base/loc/location.gcd





reply via email to

[Prev in Thread] Current Thread [Next in Thread]