Journal Edition: allow edit reconciliation status for bank related journals.
[fa-stable.git] / gl / includes / db / gl_db_bank_trans.inc
index ad369861053d2dc6c47c4f2b62d2cadfe7db7ee7..5ffa2d0cf0acd52f8f5eabead63a537971f4abe9 100644 (file)
@@ -32,10 +32,7 @@ function add_bank_trans($type, $trans_no, $bank_act, $ref, $date_,
        }
        else
                $amount_bank = $amount;
-
-
-       // Also store the rate to the home
-       //$BankToHomeCurrencyRate = get_exchange_rate_to_home_currency($bank_account_currency, $date_);
+       $amount_bank = round2($amount_bank, user_price_dec());  
 
        $sql = "INSERT INTO ".TB_PREF."bank_trans (type, trans_no, bank_act, ref,
                trans_date, amount, person_type_id, person_id) ";
@@ -54,7 +51,9 @@ function add_bank_trans($type, $trans_no, $bank_act, $ref, $date_,
 
 function exists_bank_trans($type, $type_no)
 {
-       $sql = "SELECT trans_no FROM ".TB_PREF."bank_trans WHERE type=".db_escape($type)
+       $sql = "SELECT trans_no
+               FROM ".TB_PREF."bank_trans
+               WHERE type=".db_escape($type)
                ." AND trans_no=".db_escape($type_no);
        $result = db_query($sql, "Cannot retreive a bank transaction");
 
@@ -65,29 +64,72 @@ function exists_bank_trans($type, $type_no)
 
 function get_bank_trans($type, $trans_no=null, $person_type_id=null, $person_id=null)
 {
-       $sql = "SELECT *, bank_account_name, account_code, bank_curr_code
-               FROM ".TB_PREF."bank_trans, ".TB_PREF."bank_accounts
-               WHERE ".TB_PREF."bank_accounts.id=".TB_PREF."bank_trans.bank_act ";
-       if ($type != null)
-               $sql .= " AND type=".db_escape($type);
-       if ($trans_no != null)
-               $sql .= " AND ".TB_PREF."bank_trans.trans_no = ".db_escape($trans_no);
-       if ($person_type_id != null)
-               $sql .= " AND ".TB_PREF."bank_trans.person_type_id = ".db_escape($person_type_id);
-       if ($person_id != null)
-               $sql .= " AND ".TB_PREF."bank_trans.person_id = ".db_escape($person_id);
-       $sql .= " ORDER BY trans_date, ".TB_PREF."bank_trans.id";
+       $sql = "SELECT bt.*, act.*,
+               IFNULL(abs(dt.ov_amount), IFNULL(ABS(st.ov_amount), bt.amount)) settled_amount,
+               IFNULL(abs(dt.ov_amount/bt.amount), IFNULL(ABS(st.ov_amount/bt.amount), 1)) settle_rate,
+               IFNULL(debtor.curr_code, IFNULL(supplier.curr_code, act.bank_curr_code)) settle_curr
+
+               FROM ".TB_PREF."bank_trans bt
+                                LEFT JOIN ".TB_PREF."debtor_trans dt ON dt.type=bt.type AND dt.trans_no=bt.trans_no
+                                LEFT JOIN ".TB_PREF."debtors_master debtor ON debtor.debtor_no = dt.debtor_no
+                                LEFT JOIN ".TB_PREF."supp_trans st ON st.type=bt.type AND st.trans_no=bt.trans_no
+                                LEFT JOIN ".TB_PREF."suppliers supplier ON supplier.supplier_id = st.supplier_id,
+                        ".TB_PREF."bank_accounts act
+               WHERE act.id=bt.bank_act ";
+       if (isset($type))
+               $sql .= " AND bt.type=".db_escape($type);
+       if (isset($trans_no))
+               $sql .= " AND bt.trans_no = ".db_escape($trans_no);
+       if (isset($person_type_id))
+               $sql .= " AND bt.person_type_id = ".db_escape($person_type_id);
+       if (isset($person_id))
+               $sql .= " AND bt.person_id = ".db_escape($person_id);
+       $sql .= " ORDER BY trans_date, bt.id";
 
        return db_query($sql, "query for bank transaction");
 }
 
 //----------------------------------------------------------------------------------------
 
+function get_bank_trans_for_bank_account($bank_account, $from, $to)
+{
+       $from = date2sql($from);
+       $to = date2sql($to);
+       $sql = "SELECT t.* 
+               FROM ".TB_PREF."bank_trans t 
+                       LEFT JOIN ".TB_PREF."voided v ON t.type=v.type AND t.trans_no=v.id
+               WHERE t.bank_act = ".db_escape($bank_account) . "
+                       AND ISNULL(v.date_)
+                       AND trans_date >= '$from'
+                       AND trans_date <= '$to'
+                       AND amount != 0
+               ORDER BY trans_date, t.id";
+
+       return db_query($sql,"The transactions for '" . $bank_account . "' could not be retrieved");
+}
+
+//----------------------------------------------------------------------------------------
+
+function get_balance_before_for_bank_account($bank_account, $from)
+{
+       $from = date2sql($from);
+       $sql = "SELECT SUM(amount)
+               FROM ".TB_PREF."bank_trans
+               WHERE bank_act=".db_escape($bank_account) . "
+                       AND trans_date < '$from'";
+       $before_qty = db_query($sql, "The starting balance on hand could not be calculated");
+       $bfw_row = db_fetch_row($before_qty);
+       return $bfw_row[0];
+}
+//----------------------------------------------------------------------------------------
+
 function get_gl_trans_value($account, $type, $trans_no)
 {
-       $sql = "SELECT SUM(amount) FROM ".TB_PREF."gl_trans WHERE account="
-       .db_escape($account)." AND type=".db_escape($type)
-       ." AND type_no=".db_escape($trans_no);
+       $sql = "SELECT SUM(amount)
+               FROM ".TB_PREF."gl_trans
+               WHERE account=".db_escape($account)
+                       ." AND type=".db_escape($type)
+                       ." AND type_no=".db_escape($trans_no);
 
        $result = db_query($sql, "query for gl trans value");
 
@@ -99,13 +141,15 @@ function get_gl_trans_value($account, $type, $trans_no)
 
 function void_bank_trans($type, $type_no, $nested=false)
 {
+
        if (!$nested)
                begin_transaction();
 
-       $sql = "UPDATE ".TB_PREF."bank_trans SET amount=0
-               WHERE type=".db_escape($type)." AND trans_no=".db_escape($type_no);
+       $sql = "UPDATE ".TB_PREF."bank_trans 
+                       SET amount=0
+                       WHERE type=".db_escape($type)." AND trans_no=".db_escape($type_no);
 
-       $result = db_query($sql, "could not void bank transactions for type=$type and trans_no=$type_no");
+       db_query($sql, "could not void bank transactions for type=$type and trans_no=$type_no");
 
        void_gl_trans($type, $type_no, true);
 
@@ -123,6 +167,62 @@ function void_bank_trans($type, $type_no, $nested=false)
                commit_transaction();
 }
 
-//----------------------------------------------------------------------------------
+/**
+*      Check account history to find transaction which would exceed authorized overdraft for given account.
+*      Returns null or transaction in conflict. Running balance is checked on daily basis only, to enable ID change after edition.
+*      $delta_amount - tested change in bank balance at $date.
+**/
+function check_bank_account_history($delta_amount, $bank_account, $date=null, $user=null, $balance_offset = 0)
+{
+       if ($delta_amount >= 0 && isset($date))
+                return null;   // amount increase is always safe
+
+       $balance = $date ? get_bank_account_limit($bank_account, $date, $user) : 0;
+
+       if (!isset($balance) && isset($date))
+               return null;    // unlimited account
+
+       $balance += $balance_offset;
+       if (floatcmp($balance, -$delta_amount) < 0)
+               return array('amount' => $balance + $delta_amount, 'trans_date'=> date2sql($date));
+
+       $balance += $delta_amount;
+
+       $sql = "SELECT sum(amount) as amount, trans_date
+                       FROM ".TB_PREF."bank_trans
+                       WHERE bank_act=".db_escape($bank_account);
+       if ($date)
+       {
+               $date = date2sql($date);
+               $sql .= " AND trans_date > '$date'";
+       }
+       $sql .= " GROUP BY trans_date ORDER BY trans_date ASC";
+
+       $history = db_query($sql, "cannot retrieve cash account history");
+
+       while ($trans = db_fetch($history)) {
+               $balance += $trans['amount'];
+               if ($balance < 0)
+               {
+                       $trans['amount'] = $balance;
+                       return $trans;
+               }
+       }
+
+       return null;
+}
+
+/**
+*      Check bank transfer, deposit or customer deposit before voiding.
+**/
+function check_void_bank_trans($type, $type_no)
+{
+       $moves = get_bank_trans($type, $type_no);
+       while ($trans = db_fetch($moves)) {
+               if ($trans['amount'] > 0) { // skip transfer input part
+                       return check_bank_account_history(-$trans['amount'], $trans['bank_act'], sql2date($trans['trans_date'])) == null;
+               }
+       }
+       return true;
+}
 
-?>
\ No newline at end of file