* Copyright (C) 2013-2014 Olivier Geffroy * Copyright (C) 2013-2016 Alexandre Spangaro * Copyright (C) 2015 Ari Elbaz (elarifr) * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /** * \file htdocs/accountancy/class/html.formventilation.class.php * \ingroup Accounting Expert * \brief File of class with all html predefined components */ /** * Class to manage generation of HTML components for bank module */ class FormVentilation extends Form { var $db; var $error; /** * Constructor * * @param DoliDB $db Database handler */ public function __construct($db) { $this->db = $db; } /** * Return select filter with date of transaction * * @param string $htmlname Name of select field * @param string $selectedkey Value * @return string HTML edit field */ function select_bookkeeping_importkey($htmlname = 'importkey', $selectedkey = '') { $sql = 'SELECT DISTINCT import_key from ' . MAIN_DB_PREFIX . 'accounting_bookkeeping'; $sql .= ' ORDER BY import_key DESC'; $out = ''; dol_syslog(get_class($this) . "::select_bookkeeping_importkey sql=" . $sql, LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { $i = 0; $num = $this->db->num_rows($resql); while ( $i < $num ) { $obj = $this->db->fetch_object($resql); $selected = ''; if ($selectedkey == $obj->import_key) { $selected = ' selected '; } $out .= '' . dol_print_date($obj->import_key, 'dayhourtext') . ''; $i ++; } } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::select_bookkeeping_importkey " . $this->error, LOG_ERR); return - 1; } $out .= ''; return $out; } /** * Return list of accounts with label by chart of accounts * * @param string $selectid Preselected chart of accounts * @param string $htmlname Name of field in html form * @param int $showempty Add an empty field * @param array $event Event options * @param int $select_in $selectid value is a aa.rowid (0 default) or aa.account_number (1) * @param int $select_out set value returned by select 0=rowid (default), 1=account_number * @param int $aabase set accounting_account base class to display empty=all or from 1 to 8 will display only account beginning by this number * * @return string String with HTML select */ function select_account($selectid, $htmlname = 'account', $showempty = 0, $event = array(), $select_in = 0, $select_out = 0, $aabase = '') { global $conf; require_once DOL_DOCUMENT_ROOT . '/core/lib/accounting.lib.php'; $out = ''; $sql = "SELECT DISTINCT aa.account_number, aa.label, aa.rowid, aa.fk_pcg_version"; $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_account as aa"; $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version"; $sql .= " AND asy.rowid = " . $conf->global->CHARTOFACCOUNTS; $sql .= " AND aa.active = 1"; $sql .= " ORDER BY aa.account_number"; dol_syslog(get_class($this) . "::select_account sql=" . $sql, LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { $out .= ajax_combobox($htmlname, $event); $out .= ''; if ($showempty) $out .= ''; $num = $this->db->num_rows($resql); $trunclength = defined('ACCOUNTING_LENGTH_DESCRIPTION_ACCOUNT') ? $conf->global->ACCOUNTING_LENGTH_DESCRIPTION_ACCOUNT : '50'; $i = 0; if ($num) { while ( $i < $num ) { $obj = $this->db->fetch_object($resql); $label = length_accountg($obj->account_number) . ' - ' . $obj->label; $label = dol_trunc($label, $trunclength); if ($select_in == 0) $select_value_in = $obj->rowid; if ($select_in == 1) $select_value_in = $obj->account_number; if ($select_out == 0) $select_value_out = $obj->rowid; if ($select_out == 1) $select_value_out = $obj->account_number; // Remember guy's we store in database llx_facturedet the rowid of accounting_account and not the account_number // Because same account_number can be share between different accounting_system and do have the same meaning if (($selectid != '') && $selectid == $select_value_in) { // $out .= '' . $label . ''; $out .= '' . $label . ''; } else { // $out .= '' . $label . ''; $out .= '' . $label . ''; } $i ++; } } $out .= ''; } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::select_account " . $this->error, LOG_ERR); return - 1; } $this->db->free($resql); return $out; } /** * Return list of accounts with label by class of accounts * * @param string $selectid Preselected pcg_type * @param string $htmlname Name of field in html form * @param int $showempty Add an empty field * @param array $event Event options * * @return string String with HTML select */ function select_pcgtype($selectid, $htmlname = 'pcg_type', $showempty = 0, $event = array()) { global $conf; $out = ''; $sql = "SELECT DISTINCT pcg_type "; $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_account as aa"; $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version"; $sql .= " AND asy.rowid = " . $conf->global->CHARTOFACCOUNTS; $sql .= " ORDER BY pcg_type"; dol_syslog(get_class($this) . "::select_pcgtype sql=" . $sql, LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { $out .= ajax_combobox($htmlname, $event); $out .= ''; if ($showempty) $out .= ''; $num = $this->db->num_rows($resql); $i = 0; if ($num) { while ( $i < $num ) { $obj = $this->db->fetch_object($resql); $label = $obj->pcg_type; if (($selectid != '') && $selectid == $obj->pcg_type) { $out .= '' . $label . ''; } else { $out .= '' . $label . ''; } $i ++; } } $out .= ''; } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::select_pcgtype " . $this->error, LOG_ERR); return - 1; } $this->db->free($resql); return $out; } /** * Return list of accounts with label by sub_class of accounts * * @param string $selectid Preselected pcg_type * @param string $htmlname Name of field in html form * @param int $showempty Add an empty field * @param array $event Event options * * @return string String with HTML select */ function select_pcgsubtype($selectid, $htmlname = 'pcg_subtype', $showempty = 0, $event = array()) { global $conf; $out = ''; $sql = "SELECT DISTINCT pcg_subtype "; $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_account as aa"; $sql .= " INNER JOIN " . MAIN_DB_PREFIX . "accounting_system as asy ON aa.fk_pcg_version = asy.pcg_version"; $sql .= " AND asy.rowid = " . $conf->global->CHARTOFACCOUNTS; $sql .= " ORDER BY pcg_subtype"; dol_syslog(get_class($this) . "::select_pcgsubtype sql=" . $sql, LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { $out .= ajax_combobox($htmlname, $event); $out .= ''; if ($showempty) $out .= ''; $num = $this->db->num_rows($resql); $i = 0; if ($num) { while ( $i < $num ) { $obj = $this->db->fetch_object($resql); $label = $obj->pcg_subtype; if (($selectid != '') && $selectid == $obj->pcg_subtype) { $out .= '' . $label . ''; } else { $out .= '' . $label . ''; } $i ++; } } $out .= ''; } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::select_pcgsubtype " . $this->error, LOG_ERR); return - 1; } $this->db->free($resql); return $out; } /** * Return list of auxilary thirdparty accounts * * @param string $selectid Preselected pcg_type * @param string $htmlname Name of field in html form * @param int $showempty Add an empty field * @param array $event Event options * * @return string String with HTML select */ function select_auxaccount($selectid, $htmlname = 'account_num_aux', $showempty = 0, $event = array()) { global $conf; $out = ''; $aux_account = array (); // Auxiliary customer account $sql = "SELECT DISTINCT code_compta, nom "; $sql .= " FROM " . MAIN_DB_PREFIX . "societe"; $sql .= " ORDER BY code_compta"; dol_syslog(get_class($this) . "::select_auxaccount", LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { while ( $obj = $this->db->fetch_object($resql) ) { if (! empty($obj->code_compta)) { $aux_account[$obj->code_compta] = $obj->code_compta . ' (' . $obj->nom . ')'; } } } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::select_pcgsubtype " . $this->error, LOG_ERR); return - 1; } $this->db->free($resql); // Auxiliary supplier account $sql = "SELECT DISTINCT code_compta_fournisseur, nom "; $sql .= " FROM " . MAIN_DB_PREFIX . "societe"; $sql .= " ORDER BY code_compta"; dol_syslog(get_class($this) . "::select_auxaccount", LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { while ( $obj = $this->db->fetch_object($resql) ) { if (! empty($obj->code_compta_fournisseur)) { $aux_account[$obj->code_compta_fournisseur] = $obj->code_compta_fournisseur . ' (' . $obj->nom . ')'; } } } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::select_pcgsubtype " . $this->error, LOG_ERR); return - 1; } $this->db->free($resql); // Build select if (count($aux_account) > 0) { $out .= ajax_combobox($htmlname, $event); $out .= ''; if ($showempty) $out .= ''; foreach ( $aux_account as $key => $val ) { if (($selectid != '') && $selectid == $key) { $out .= '' . $val . ''; } else { $out .= '' . $val . ''; } } $out .= ''; } return $out; } /** * Return HTML combo list of years existing into book keepping * * @param string $selected Preselected value * @param string $htmlname Name of HTML select object * @param int $useempty Affiche valeur vide dans liste * @param string $output_format (html/opton (for option html only)/array (to return options arrays * @return string/array */ function selectyear_accountancy_bookkepping($selected = '', $htmlname = 'yearid', $useempty = 0, $output_format = 'html') { $out = ''; $out_array = array (); if ($output_format == 'html') { $out .= ''; } if ($useempty) { $selected_html = ''; if ($selected == '') { $selected_html = ' selected'; } if ($output_format == 'html' || $output_format == 'options') { $out .= ' '; } elseif ($output_format == 'array') { $out_array[''] = ''; } } $sql = "SELECT DISTINCT date_format(doc_date,'%Y') as dtyear"; $sql .= " FROM " . MAIN_DB_PREFIX . "accounting_bookkeeping"; $sql .= " ORDER BY doc_date"; dol_syslog(get_class($this) . "::" . __METHOD__, LOG_DEBUG); $resql = $this->db->query($sql); if ($resql) { while ( $obj = $this->db->fetch_object($resql) ) { $selected_html = ''; if ($selected > 0 && $obj->dtyear == $selected) $selected_html = ' selected'; if ($output_format == 'html' || $output_format == 'options') { $out .= '' . $obj->dtyear . ''; } elseif ($output_format == 'array') { $out_array[$obj->dtyear] = $obj->dtyear; } } } else { $this->error = "Error " . $this->db->lasterror(); dol_syslog(get_class($this) . "::" . __METHOD__ . $this->error, LOG_ERR); return - 1; } $this->db->free($resql); if ($output_format == 'html') { $out .= "\n"; } if ($output_format == 'html' || $output_format == 'options') { return $out; } elseif ($output_format == 'array') { return $out_array; } } }