+ global $transaction_level;
+
+ if ($transaction_level) {
+ db_query("ROLLBACK", "could not cancel a transaction");
+ }
+ $transaction_level = 0;
+}
+
+//-----------------------------------------------------------------------------
+// Update record activity status.
+//
+function update_record_status($id, $status, $table, $key) {
+ $sql = "UPDATE ".TB_PREF.$table." SET inactive = "
+ . ((int)$status)." WHERE $key=".db_escape($id);
+
+ db_query($sql, "Can't update record status");
+}
+//-----------------------------------------------------------------------------
+//
+// Helper for sql subquery returning running totals from delta tables like stock_moves or bank_trans
+//
+// $table - table name with optional WHERE clause
+// $column - delta column
+// $index - comma delimited list of columns for total grouping and order
+// Returns running totals with respective index column
+//
+function running_total_sql($table, $column, $index)
+{
+
+ return "SELECT daily.$index, daily.$column, (@total:=@total+daily.$column) total
+ FROM
+ (SELECT $index, sum($column) $column FROM $table GROUP BY $index ORDER BY $index) daily,
+ (SELECT @total:=0) total_var";
+}
+
+/*
+ Return number of records in tables, where some foreign key $id is used.
+ $id - searched key value
+ $tables - array of table names (without prefix); when table name is used as a key, then
+ value is name of foreign key field. For numeric keys $stdkey field name is used.
+ $stdkey - standard name of foreign key.
+*/
+function key_in_foreign_table($id, $tables, $stdkey)
+{
+
+ if (!is_array($tables))
+ $tables = array($tables);
+
+ $sqls = array();
+ foreach ($tables as $tbl => $key) {
+ if (is_numeric($tbl)) {
+ $tbl = $key;
+ $key = $stdkey;
+ }
+ $sqls[] = "(SELECT COUNT(*) as cnt FROM `".TB_PREF."$tbl` WHERE `$key`=".db_escape($id).")\n";
+ }
+
+ $sql = "SELECT sum(cnt) FROM (". implode(' UNION ', $sqls).") as counts";
+
+ $result = db_query($sql, "check relations for ".implode(',',$tables)." failed");
+ $count = db_fetch($result);
+
+ return $count[0];