X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=includes%2Ftypes.inc;fp=includes%2Ftypes.inc;h=94d5c4e026391ecf95fb7180025e63560fa7167b;hb=90b3d069d96b99671af51726e2953352738abb75;hp=79ef8be71c01699d87a8daf242fee733ad718fe3;hpb=8ecdfec3e664440856af9b205d37e3327c126cfc;p=fa-stable.git

diff --git a/includes/types.inc b/includes/types.inc
index 79ef8be7..94d5c4e0 100644
--- a/includes/types.inc
+++ b/includes/types.inc
@@ -137,6 +137,79 @@ function payment_person_name($type, $person_id, $full=true) {
 	}
 }
 
+//
+//	Returns counterparty (supplier/customer) name for selected transaction.
+//
+function get_counterparty_name($trans_type, $trans_no, $full=true)
+{
+	switch($trans_type)
+	{
+		case ST_SALESORDER:
+		case ST_SALESQUOTE:
+			$sql = "SELECT order.customer_id as person_id, debtor.name as name
+			FROM ".TB_PREF."sales_orders order, ".TB_PREF."debtors_master debtor
+			WHERE order_no=".db_escape($trans_no)." AND trans_type=".db_escape($trans_type)
+			." AND order.debtor_no=debtor.debtor_no";
+			break;
+		case ST_SALESINVOICE :
+		case ST_CUSTCREDIT :
+		case ST_CUSTPAYMENT :
+		case ST_CUSTDELIVERY :
+			$sql = "SELECT trans.debtor_no as person_id, debtor.name as name
+			FROM ".TB_PREF."debtor_trans trans, ".TB_PREF."debtors_master debtor
+			WHERE trans_no=".db_escape($trans_no)." AND type=".db_escape($trans_type)
+			." AND trans.debtor_no=debtor.debtor_no";
+			break;
+
+		case ST_PURCHORDER :
+			$sql = "SELECT order.supplier_id as person_id, supp.supp_name as name
+			FROM ".TB_PREF."purch_orders order, ".TB_PREF."suppliers supp
+			WHERE order_no=".db_escape($trans_no)
+			." AND order.supplier_id=supp.supplier_id";
+			break;
+
+		case ST_SUPPINVOICE :
+		case ST_SUPPCREDIT :
+		case ST_SUPPAYMENT :
+			$sql = "SELECT trans.supplier_id as person_id, supp.supp_name as name
+			FROM ".TB_PREF."supp_trans trans, ".TB_PREF."suppliers supp
+			WHERE trans_no=".db_escape($trans_no)." AND type=".db_escape($trans_type)
+			." AND trans.supplier_id=supp.supplier_id";
+			break;
+
+		case ST_SUPPRECEIVE :
+			$sql = "SELECT trans.supplier_id as person_id, supp.supp_name as name
+			FROM ".TB_PREF."grn_batch trans, ".TB_PREF."suppliers supp
+			WHERE id=".db_escape($trans_no)
+			." AND trans.supplier_id=supp.supplier_id";
+			break;
+
+		case ST_JOURNAL:	// FIXME - this one can have multiply counterparties of various types depending on person_type_id
+
+		default: 
+		/*	// internal operations
+		case ST_WORKORDER :
+		case ST_INVADJUST : // GRN/DN returns ?
+		case ST_BANKTRANSFER :
+		case ST_LOCTRANSFER :
+		case ST_MANUISSUE :
+		case ST_MANURECEIVE :
+		case ST_COSTUPDATE :
+		case ST_BANKPAYMENT :	// generic bank transactions
+		case ST_BANKDEPOSIT :*/
+			return null;
+	}
+
+	$result = db_query($sql, 'cannot retrieve counterparty name');
+	if (db_num_rows($result))
+	{
+		$row = db_fetch($result);
+		return sprintf("[%05s] %s", $row['person_id'], $row['name']);
+	}
+
+	return '';
+}
+
 function payment_person_has_items($type) {
 	switch ($type)
 	{
@@ -171,6 +244,7 @@ define('WO_ADVANCED', 2);
 
 define('WO_LABOUR', 0);
 define('WO_OVERHEAD', 1);
+define('WO_MATERIALS', 2);
 
 //----------------------------------------------------------------------------------
 //	GL account classes
@@ -226,6 +300,19 @@ define('PTT_CASH', 2);
 define('PTT_DAYS', 3);
 define('PTT_FOLLOWING', 4);
 
+//----------------------------------------------------------------------------------
+// Tax calculation algorithms used in als and purchase (depends on supplier's invoicing software)
+
+define('TCA_TOTALS', 1); // taxes are calculated from respective net totals for all lines
+define('TCA_LINES', 2); // taxes calculated for every line, then summed
+//
+//	Bank account owner types
+//
+define('BO_UNKNOWN', 0);
+define('BO_COMPANY', 1);
+define('BO_CUSTBRANCH', 2);
+define('BO_SUPPLIER', 3);
+
 include_once($path_to_root . '/includes/sysnames.inc');
 
 ?>
\ No newline at end of file