mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-08 02:28:23 +01:00
897 lines
31 KiB
PHP
897 lines
31 KiB
PHP
<?php
|
|
/* Copyright (C) 2002-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2003 Jean-Louis Bergamo <jlb@j1b.org>
|
|
* Copyright (C) 2004-2016 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2005-2009 Regis Houssin <regis.houssin@capnetworks.com>
|
|
* Copyright (C) 2013 Peter Fontaine <contact@peterfontaine.fr>
|
|
* Copyright (C) 2015-2016 Marcos García <marcosgdf@gmail.com>
|
|
*
|
|
* 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 <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/societe/rib.php
|
|
* \ingroup societe
|
|
* \brief BAN tab for companies
|
|
*/
|
|
|
|
require '../main.inc.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/bank.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/prelevement/class/bonprelevement.class.php';
|
|
|
|
$langs->load("companies");
|
|
$langs->load("commercial");
|
|
$langs->load("banks");
|
|
$langs->load("bills");
|
|
|
|
// Security check
|
|
$socid = GETPOST("socid","int");
|
|
if ($user->societe_id) $socid=$user->societe_id;
|
|
$result = restrictedArea($user, 'societe','','');
|
|
|
|
$id=GETPOST("id","int");
|
|
$ribid=GETPOST("ribid","int");
|
|
$action=GETPOST("action", 'alpha', 3);
|
|
|
|
$object = new Societe($db);
|
|
$object->fetch($socid);
|
|
|
|
$account = new CompanyBankAccount($db);
|
|
$prelevement = new BonPrelevement($db);
|
|
|
|
$extrafields = new ExtraFields($db);
|
|
|
|
// fetch optionals attributes and labels
|
|
$extralabels=$extrafields->fetch_name_optionals_label($object->table_element);
|
|
|
|
// Initialize technical object to manage hooks of thirdparties. Note that conf->hooks_modules contains array array
|
|
$hookmanager->initHooks(array('thirdpartybancard','globalcard'));
|
|
|
|
|
|
// Initialize technical object to manage hooks of thirdparties. Note that conf->hooks_modules contains array array
|
|
$hookmanager->initHooks(array('thirdpartybancard'));
|
|
|
|
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
$parameters=array('id'=>$socid, 'objcanvas'=>$objcanvas);
|
|
$reshook=$hookmanager->executeHooks('doActions',$parameters,$object,$action); // Note that $action and $object may have been modified by some hooks
|
|
if ($reshook < 0) setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
|
|
|
|
if (empty($reshook))
|
|
{
|
|
if ($cancel)
|
|
{
|
|
$action='';
|
|
if (! empty($backtopage))
|
|
{
|
|
header("Location: ".$backtopage);
|
|
exit;
|
|
}
|
|
}
|
|
|
|
|
|
if ($action == 'update' && ! $_POST["cancel"])
|
|
{
|
|
// Modification
|
|
if (! GETPOST('label'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors');
|
|
$action='update';
|
|
$error++;
|
|
}
|
|
if (! GETPOST('bank'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BankName")), null, 'errors');
|
|
$action='update';
|
|
$error++;
|
|
}
|
|
if ($account->needIBAN() == 1)
|
|
{
|
|
if (! GETPOST('iban'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("IBAN")), null, 'errors');
|
|
$action='update';
|
|
$error++;
|
|
}
|
|
if (! GETPOST('bic'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BIC")), null, 'errors');
|
|
$action='update';
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
$account->fetch($id);
|
|
if (! $error)
|
|
{
|
|
$account->socid = $object->id;
|
|
|
|
$account->bank = GETPOST('bank','alpha');
|
|
$account->label = GETPOST('label','alpha');
|
|
$account->courant = GETPOST('courant','alpha');
|
|
$account->clos = GETPOST('clos','alpha');
|
|
$account->code_banque = GETPOST('code_banque','alpha');
|
|
$account->code_guichet = GETPOST('code_guichet','alpha');
|
|
$account->number = GETPOST('number','alpha');
|
|
$account->cle_rib = GETPOST('cle_rib','alpha');
|
|
$account->bic = GETPOST('bic','alpha');
|
|
$account->iban = GETPOST('iban','alpha');
|
|
$account->domiciliation = GETPOST('domiciliation','alpha');
|
|
$account->proprio = GETPOST('proprio','alpha');
|
|
$account->owner_address = GETPOST('owner_address','alpha');
|
|
$account->frstrecur = GETPOST('frstrecur','alpha');
|
|
$account->rum = GETPOST('rum','alpha');
|
|
if (empty($account->rum))
|
|
{
|
|
$account->rum = $prelevement->buildRumNumber($object->code_client, $account->datec, $account->id);
|
|
$account->date_rum = dol_now();
|
|
}
|
|
|
|
$result = $account->update($user);
|
|
if (! $result)
|
|
{
|
|
setEventMessages($account->error, $account->errors, 'errors');
|
|
}
|
|
else
|
|
{
|
|
// If this account is the default bank account, we disable others
|
|
if ($account->default_rib)
|
|
{
|
|
$account->setAsDefault($id); // This will make sure there is only one default rib
|
|
}
|
|
|
|
$url=DOL_URL_ROOT.'/societe/rib.php?socid='.$object->id;
|
|
header('Location: '.$url);
|
|
exit;
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($action == 'add' && ! $_POST["cancel"])
|
|
{
|
|
$error=0;
|
|
|
|
if (! GETPOST('label'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label")), null, 'errors');
|
|
$action='create';
|
|
$error++;
|
|
}
|
|
if (! GETPOST('bank'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BankName")), null, 'errors');
|
|
$action='create';
|
|
$error++;
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
// Ajout
|
|
$account = new CompanyBankAccount($db);
|
|
|
|
$account->socid = $object->id;
|
|
|
|
$account->bank = GETPOST('bank','alpha');
|
|
$account->label = GETPOST('label','alpha');
|
|
$account->courant = GETPOST('courant','alpha');
|
|
$account->clos = GETPOST('clos','alpha');
|
|
$account->code_banque = GETPOST('code_banque','alpha');
|
|
$account->code_guichet = GETPOST('code_guichet','alpha');
|
|
$account->number = GETPOST('number','alpha');
|
|
$account->cle_rib = GETPOST('cle_rib','alpha');
|
|
$account->bic = GETPOST('bic','alpha');
|
|
$account->iban = GETPOST('iban','alpha');
|
|
$account->domiciliation = GETPOST('domiciliation','alpha');
|
|
$account->proprio = GETPOST('proprio','alpha');
|
|
$account->owner_address = GETPOST('owner_address','alpha');
|
|
$account->frstrecur = GETPOST('frstrecur');
|
|
|
|
// This test can be done only once properties were set
|
|
if ($account->needIBAN() == 1)
|
|
{
|
|
if (! GETPOST('iban'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("IBAN")), null, 'errors');
|
|
$action='create';
|
|
$error++;
|
|
}
|
|
if (! GETPOST('bic'))
|
|
{
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("BIC")), null, 'errors');
|
|
$action='create';
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
if (empty($account->rum))
|
|
{
|
|
$account->rum = $prelevement->buildRumNumber($object->code_client, $account->datec, $account->id);
|
|
$account->date_rum = dol_now();
|
|
}
|
|
|
|
$result = $account->update($user); // This will set the UMR number.
|
|
// TODO Use create and include update into create method
|
|
if (! $result)
|
|
{
|
|
setEventMessages($account->error, $account->errors, 'errors');
|
|
$_GET["action"]='create'; // Force chargement page création
|
|
}
|
|
else
|
|
{
|
|
$url=DOL_URL_ROOT.'/societe/rib.php?socid='.$object->id;
|
|
header('Location: '.$url);
|
|
exit;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($action == 'setasdefault')
|
|
{
|
|
$account = new CompanyBankAccount($db);
|
|
$res = $account->setAsDefault(GETPOST('ribid','int'));
|
|
if ($res)
|
|
{
|
|
$url=DOL_URL_ROOT.'/societe/rib.php?socid='.$object->id;
|
|
header('Location: '.$url);
|
|
exit;
|
|
}
|
|
else
|
|
{
|
|
setEventMessages($db->lasterror, null, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($action == 'confirm_delete' && $_GET['confirm'] == 'yes')
|
|
{
|
|
$account = new CompanyBankAccount($db);
|
|
if ($account->fetch($ribid?$ribid:$id))
|
|
{
|
|
$result = $account->delete($user);
|
|
if ($result > 0)
|
|
{
|
|
$url = $_SERVER['PHP_SELF']."?socid=".$object->id;
|
|
header('Location: '.$url);
|
|
exit;
|
|
}
|
|
else
|
|
{
|
|
setEventMessages($account->error, $account->errors, 'errors');
|
|
}
|
|
}
|
|
else
|
|
{
|
|
setEventMessages($account->error, $account->errors, 'errors');
|
|
}
|
|
}
|
|
|
|
$savid=$id;
|
|
|
|
// Actions to build doc
|
|
if ($action == 'builddocrib')
|
|
{
|
|
$action = 'builddoc';
|
|
$moreparams = array(
|
|
'use_companybankid'=>GETPOST('companybankid'),
|
|
'force_dir_output'=>$conf->societe->dir_output.'/'.dol_sanitizeFileName($object->id)
|
|
);
|
|
$_POST['lang_id'] = GETPOST('lang_idrib'.GETPOST('companybankid'));
|
|
$_POST['model'] = GETPOST('modelrib'.GETPOST('companybankid'));
|
|
}
|
|
$id = $socid;
|
|
$upload_dir = $conf->societe->dir_output;
|
|
$permissioncreate=$user->rights->societe->creer;
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php';
|
|
|
|
$id = $savid;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
$form = new Form($db);
|
|
$formfile = new FormFile($db);
|
|
|
|
llxHeader();
|
|
|
|
$head=societe_prepare_head($object);
|
|
|
|
if (! $id)
|
|
$account->fetch(0,$object->id);
|
|
else
|
|
$account->fetch($id);
|
|
if (empty($account->socid)) $account->socid=$object->id;
|
|
|
|
if ($socid && $action == 'edit' && $user->rights->societe->creer)
|
|
{
|
|
print '<form action="rib.php?socid='.$object->id.'" method="post">';
|
|
print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
|
|
print '<input type="hidden" name="action" value="update">';
|
|
print '<input type="hidden" name="id" value="'.$_GET["id"].'">';
|
|
}
|
|
if ($socid && $action == 'create' && $user->rights->societe->creer)
|
|
{
|
|
print '<form action="rib.php?socid='.$object->id.'" method="post">';
|
|
print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
|
|
print '<input type="hidden" name="action" value="add">';
|
|
}
|
|
|
|
|
|
// View
|
|
if ($socid && $action != 'edit' && $action != "create")
|
|
{
|
|
dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company');
|
|
|
|
// Confirm delete third party
|
|
if ($action == 'delete')
|
|
{
|
|
print $form->formconfirm($_SERVER["PHP_SELF"]."?socid=".$object->id."&ribid=".($ribid?$ribid:$id), $langs->trans("DeleteARib"), $langs->trans("ConfirmDeleteRib", $account->getRibLabel()), "confirm_delete", '', 0, 1);
|
|
}
|
|
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>';
|
|
|
|
dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom');
|
|
|
|
print '<div class="fichecenter">';
|
|
|
|
print load_fiche_titre($langs->trans("DefaultRIB"), '', '');
|
|
|
|
print '<div class="underbanner clearboth"></div>';
|
|
print '<table class="border centpercent">';
|
|
|
|
print '<tr><td class="titlefield">'.$langs->trans("LabelRIB").'</td>';
|
|
print '<td colspan="4">'.$account->label.'</td></tr>';
|
|
|
|
print '<tr><td>'.$langs->trans("BankName").'</td>';
|
|
print '<td colspan="4">'.$account->bank.'</td></tr>';
|
|
|
|
// Show fields of bank account
|
|
foreach($account->getFieldsToShow(1) as $val)
|
|
{
|
|
if ($val == 'BankCode') {
|
|
$content = $account->code_banque;
|
|
} elseif ($val == 'DeskCode') {
|
|
$content = $account->code_guichet;
|
|
} elseif ($val == 'BankAccountNumber') {
|
|
$content = $account->number;
|
|
if (! empty($account->label)) {
|
|
if (! checkBanForAccount($account)) {
|
|
$content.= ' '.img_picto($langs->trans("ValueIsNotValid"),'warning');
|
|
} else {
|
|
$content.= ' '.img_picto($langs->trans("ValueIsValid"),'info');
|
|
}
|
|
}
|
|
} elseif ($val == 'BankAccountNumberKey') {
|
|
$content = $account->cle_rib;
|
|
} elseif ($val == 'IBAN') {
|
|
$content = $account->iban;
|
|
if (! empty($account->iban)) {
|
|
if (! checkIbanForAccount($account)) {
|
|
$content.= ' '.img_picto($langs->trans("ValueIsNotValid"),'warning');
|
|
} else {
|
|
$content.= ' '.img_picto($langs->trans("ValueIsValid"),'info');
|
|
}
|
|
}
|
|
} elseif ($val == 'BIC') {
|
|
$content = $account->bic;
|
|
if (! empty($account->bic)) {
|
|
if (! checkSwiftForAccount($account)) {
|
|
$content.= ' '.img_picto($langs->trans("ValueIsNotValid"),'warning');
|
|
} else {
|
|
$content.= ' '.img_picto($langs->trans("ValueIsValid"),'info');
|
|
}
|
|
}
|
|
}
|
|
|
|
print '<tr><td>'.$langs->trans($val).'</td>';
|
|
print '<td colspan="4">'.$content.'</td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td colspan="4">';
|
|
print $account->domiciliation;
|
|
print "</td></tr>\n";
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountOwner").'</td><td colspan="4">';
|
|
print $account->proprio;
|
|
print "</td></tr>\n";
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td colspan="4">';
|
|
print $account->owner_address;
|
|
print "</td></tr>\n";
|
|
|
|
print '</table>';
|
|
|
|
print "</div>";
|
|
|
|
dol_fiche_end();
|
|
|
|
|
|
/*
|
|
* List of bank accounts
|
|
*/
|
|
|
|
print load_fiche_titre($langs->trans("AllRIB"));
|
|
|
|
$rib_list = $object->get_all_rib();
|
|
$var = false;
|
|
if (is_array($rib_list))
|
|
{
|
|
print '<table class="liste" width="100%">';
|
|
|
|
print '<tr class="liste_titre">';
|
|
print_liste_field_titre($langs->trans("LabelRIB"));
|
|
print_liste_field_titre($langs->trans("Bank"));
|
|
print_liste_field_titre($langs->trans("RIB"));
|
|
print_liste_field_titre($langs->trans("IBAN"));
|
|
print_liste_field_titre($langs->trans("BIC"));
|
|
if (! empty($conf->prelevement->enabled))
|
|
{
|
|
print print_liste_field_titre($langs->trans("RUM"));
|
|
print print_liste_field_titre($langs->trans("WithdrawMode"));
|
|
}
|
|
print_liste_field_titre($langs->trans("DefaultRIB"), '', '', '', '', 'align="center"');
|
|
print_liste_field_titre('', '', '', '', '', 'align="center"');
|
|
print_liste_field_titre('',$_SERVER["PHP_SELF"],"",'','','',$sortfield,$sortorder,'maxwidthsearch ');
|
|
print "</tr>\n";
|
|
|
|
foreach ($rib_list as $rib)
|
|
{
|
|
print "<tr ".$bc[$var].">";
|
|
// Label
|
|
print '<td>'.$rib->label.'</td>';
|
|
// Bank name
|
|
print '<td>'.$rib->bank.'</td>';
|
|
// Account number
|
|
print '<td>';
|
|
$string='';
|
|
foreach ($rib->getFieldsToShow() as $val) {
|
|
|
|
if ($val == 'BankCode') {
|
|
$string .= $rib->code_banque.' ';
|
|
} elseif ($val == 'BankAccountNumber') {
|
|
$string .= $rib->number.' ';
|
|
} elseif ($val == 'DeskCode') {
|
|
$string .= $rib->code_guichet.' ';
|
|
} elseif ($val == 'BankAccountNumberKey') {
|
|
$string .= $rib->cle_rib.' ';
|
|
/* Already output after
|
|
}elseif ($val == 'BIC') {
|
|
$string .= $rib->bic.' ';
|
|
}elseif ($val == 'IBAN') {
|
|
$string .= $rib->iban.' ';*/
|
|
}
|
|
}
|
|
print $string;
|
|
print '</td>';
|
|
// IBAN
|
|
print '<td>'.$rib->iban;
|
|
if (! empty($rib->iban)) {
|
|
if (! checkIbanForAccount($rib)) {
|
|
print ' '.img_picto($langs->trans("IbanNotValid"),'warning');
|
|
} else {
|
|
print ' '.img_picto($langs->trans("IbanValid"),'info');
|
|
}
|
|
}
|
|
print '</td>';
|
|
// BIC
|
|
print '<td>'.$rib->bic;
|
|
if (! empty($rib->bic)) {
|
|
if (! checkSwiftForAccount($rib)) {
|
|
print ' '.img_picto($langs->trans("SwiftNotValid"),'warning');
|
|
} else {
|
|
print ' '.img_picto($langs->trans("SwiftValid"),'info');
|
|
}
|
|
}
|
|
print '</td>';
|
|
|
|
if (! empty($conf->prelevement->enabled))
|
|
{
|
|
// RUM
|
|
//print '<td>'.$prelevement->buildRumNumber($object->code_client, $rib->datec, $rib->id).'</td>';
|
|
print '<td>'.$rib->rum.'</td>';
|
|
|
|
// FRSTRECUR
|
|
print '<td>'.$rib->frstrecur.'</td>';
|
|
}
|
|
|
|
// Default
|
|
print '<td align="center" width="70">';
|
|
if (!$rib->default_rib) {
|
|
print '<a href="'.DOL_URL_ROOT.'/societe/rib.php?socid='.$object->id.'&ribid='.$rib->id.'&action=setasdefault">';
|
|
print img_picto($langs->trans("Disabled"),'off');
|
|
print '</a>';
|
|
} else {
|
|
print img_picto($langs->trans("Enabled"),'on');
|
|
}
|
|
print '</td>';
|
|
|
|
// Generate doc
|
|
print '<td align="center">';
|
|
|
|
$buttonlabel = $langs->trans("BuildDoc");
|
|
$forname='builddocrib'.$rib->id;
|
|
|
|
include_once DOL_DOCUMENT_ROOT.'/core/modules/bank/modules_bank.php';
|
|
$modellist=ModeleBankAccountDoc::liste_modeles($db);
|
|
$out = '';
|
|
if (is_array($modellist) && count($modellist))
|
|
{
|
|
$out.= '<form action="'.$urlsource.(empty($conf->global->MAIN_JUMP_TAG)?'':'#builddoc').'" name="'.$forname.'" id="'.$forname.'_form" method="post">';
|
|
$out.= '<input type="hidden" name="action" value="builddocrib">';
|
|
$out.= '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
|
|
$out.= '<input type="hidden" name="socid" value="'.$object->id.'">';
|
|
$out.= '<input type="hidden" name="companybankid" value="'.$rib->id.'">';
|
|
|
|
if (is_array($modellist) && count($modellist) == 1) // If there is only one element
|
|
{
|
|
$arraykeys=array_keys($modellist);
|
|
$modelselected=$arraykeys[0];
|
|
}
|
|
$out.= $form->selectarray('modelrib'.$rib->id, $modellist, $modelselected, $showempty, 0, 0, '', 0, 0, 0, '', 'minwidth100');
|
|
$out.= ajax_combobox('modelrib'.$rib->id);
|
|
|
|
// Language code (if multilang)
|
|
if ($conf->global->MAIN_MULTILANGS)
|
|
{
|
|
include_once DOL_DOCUMENT_ROOT.'/core/class/html.formadmin.class.php';
|
|
$formadmin=new FormAdmin($db);
|
|
$defaultlang=$codelang?$codelang:$langs->getDefaultLang();
|
|
$morecss='maxwidth150';
|
|
if (! empty($conf->browser->phone)) $morecss='maxwidth100';
|
|
$out.= $formadmin->select_language($defaultlang, 'lang_idrib'.$rib->id, 0, 0, 0, 0, 0, $morecss);
|
|
}
|
|
// Button
|
|
$genbutton = '<input class="button buttongen" id="'.$forname.'_generatebutton" name="'.$forname.'_generatebutton"';
|
|
$genbutton.= ' type="submit" value="'.$buttonlabel.'"';
|
|
if (! $allowgenifempty && ! is_array($modellist) && empty($modellist)) $genbutton.= ' disabled';
|
|
$genbutton.= '>';
|
|
if ($allowgenifempty && ! is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid')
|
|
{
|
|
$langs->load("errors");
|
|
$genbutton.= ' '.img_warning($langs->transnoentitiesnoconv("WarningNoDocumentModelActivated"));
|
|
}
|
|
if (! $allowgenifempty && ! is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') $genbutton='';
|
|
if (empty($modellist) && ! $showempty && $modulepart != 'unpaid') $genbutton='';
|
|
$out.= $genbutton;
|
|
$out.= '</form>';
|
|
}
|
|
print $out;
|
|
print '</td>';
|
|
|
|
// Edit/Delete
|
|
print '<td align="right">';
|
|
if ($user->rights->societe->creer)
|
|
{
|
|
print '<a href="'.DOL_URL_ROOT.'/societe/rib.php?socid='.$object->id.'&id='.$rib->id.'&action=edit">';
|
|
print img_picto($langs->trans("Modify"),'edit');
|
|
print '</a>';
|
|
|
|
print ' ';
|
|
|
|
print '<a href="'.DOL_URL_ROOT.'/societe/rib.php?socid='.$object->id.'&id='.$rib->id.'&action=delete">';
|
|
print img_picto($langs->trans("Delete"),'delete');
|
|
print '</a>';
|
|
}
|
|
print '</td>';
|
|
|
|
print '</tr>';
|
|
}
|
|
|
|
if (count($rib_list) == 0)
|
|
{
|
|
$colspan=8;
|
|
if (! empty($conf->prelevement->enabled)) $colspan+=2;
|
|
print '<tr '.$bc[0].'><td colspan="'.$colspan.'" align="center">'.$langs->trans("NoBANRecord").'</td></tr>';
|
|
}
|
|
|
|
print '</table>';
|
|
} else {
|
|
dol_print_error($db);
|
|
}
|
|
|
|
|
|
if ($socid && $action != 'edit' && $action != 'create')
|
|
{
|
|
/*
|
|
* Barre d'actions
|
|
*/
|
|
print '<div class="tabsAction">';
|
|
|
|
if ($user->rights->societe->creer)
|
|
{
|
|
print '<a class="butAction" href="rib.php?socid='.$object->id.'&action=create">'.$langs->trans("Add").'</a>';
|
|
}
|
|
|
|
print '</div>';
|
|
}
|
|
|
|
|
|
|
|
|
|
if (empty($conf->global->SOCIETE_DISABLE_BUILDDOC))
|
|
{
|
|
print '<div class="fichecenter"><div class="fichehalfleft">';
|
|
print '<a name="builddoc"></a>'; // ancre
|
|
|
|
/*
|
|
* Documents generes
|
|
*/
|
|
$filedir=$conf->societe->multidir_output[$object->entity].'/'.$object->id;
|
|
$urlsource=$_SERVER["PHP_SELF"]."?socid=".$object->id;
|
|
$genallowed=$user->rights->societe->creer;
|
|
$delallowed=$user->rights->societe->supprimer;
|
|
|
|
$var=true;
|
|
|
|
print $formfile->showdocuments('company', $object->id, $filedir, $urlsource, $genallowed, $delallowed, $object->modelpdf, 0, 0, 0, 28, 0, '', 0, '', $object->default_lang);
|
|
|
|
print '</div><div class="fichehalfright"><div class="ficheaddleft">';
|
|
|
|
|
|
print '</div></div></div>';
|
|
|
|
print '<br>';
|
|
}
|
|
/*
|
|
include_once DOL_DOCUMENT_ROOT.'/core/modules/bank/modules_bank.php';
|
|
$modellist=ModeleBankAccountDoc::liste_modeles($db);
|
|
//print '<td>';
|
|
if (is_array($modellist) && count($modellist) == 1) // If there is only one element
|
|
{
|
|
$arraykeys=array_keys($modellist);
|
|
$modelselected=$arraykeys[0];
|
|
}
|
|
$out.= $form->selectarray('model', $modellist, $modelselected, 0, 0, 0, '', 0, 0, 0, '', 'minwidth100');
|
|
$out.= ajax_combobox('model');
|
|
//print $out;
|
|
$buttonlabel=$langs->trans("Generate");
|
|
$genbutton = '<input class="button buttongen" id="'.$forname.'_generatebutton" name="'.$forname.'_generatebutton"';
|
|
$genbutton.= ' type="submit" value="'.$buttonlabel.'"';
|
|
$genbutton.= '>';
|
|
print $genbutton;
|
|
//print '</td>'; // TODO Add link to generate doc
|
|
*/
|
|
}
|
|
|
|
// Edit
|
|
if ($socid && $action == 'edit' && $user->rights->societe->creer)
|
|
{
|
|
dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company');
|
|
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>';
|
|
|
|
dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom');
|
|
|
|
print '<div class="fichecenter">';
|
|
|
|
print '<div class="underbanner clearboth"></div>';
|
|
print '<table class="border centpercent">';
|
|
|
|
print '<tr><td class="titlefield fieldrequired">'.$langs->trans("LabelRIB").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="label" value="'.$account->label.'"></td></tr>';
|
|
|
|
print '<tr><td class="fieldrequired">'.$langs->trans("BankName").'</td>';
|
|
print '<td><input size="30" type="text" name="bank" value="'.$account->bank.'"></td></tr>';
|
|
|
|
// Show fields of bank account
|
|
foreach ($account->getFieldsToShow(1) as $val) {
|
|
|
|
$require=false;
|
|
if ($val == 'BankCode') {
|
|
$name = 'code_banque';
|
|
$size = 8;
|
|
$content = $account->code_banque;
|
|
} elseif ($val == 'DeskCode') {
|
|
$name = 'code_guichet';
|
|
$size = 8;
|
|
$content = $account->code_guichet;
|
|
} elseif ($val == 'BankAccountNumber') {
|
|
$name = 'number';
|
|
$size = 18;
|
|
$content = $account->number;
|
|
} elseif ($val == 'BankAccountNumberKey') {
|
|
$name = 'cle_rib';
|
|
$size = 3;
|
|
$content = $account->cle_rib;
|
|
} elseif ($val == 'IBAN') {
|
|
$name = 'iban';
|
|
$size = 30;
|
|
$content = $account->iban;
|
|
if ($account->needIBAN()) $require=true;
|
|
} elseif ($val == 'BIC') {
|
|
$name = 'bic';
|
|
$size = 12;
|
|
$content = $account->bic;
|
|
if ($account->needIBAN()) $require=true;
|
|
}
|
|
|
|
print '<tr><td'.($require?' class="fieldrequired" ':'').'>'.$langs->trans($val).'</td>';
|
|
print '<td><input size="'.$size.'" type="text" class="flat" name="'.$name.'" value="'.$content.'"></td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td colspan="4">';
|
|
print '<textarea name="domiciliation" rows="4" cols="40" maxlength="255">';
|
|
print $account->domiciliation;
|
|
print "</textarea></td></tr>";
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountOwner").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="proprio" value="'.$account->proprio.'"></td></tr>';
|
|
print "</td></tr>\n";
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td colspan="4">';
|
|
print "<textarea name=\"owner_address\" rows=\"4\" cols=\"40\" maxlength=\"255\">";
|
|
print $account->owner_address;
|
|
print "</textarea></td></tr>";
|
|
|
|
print '</table>';
|
|
|
|
if ($conf->prelevement->enabled)
|
|
{
|
|
print '<br>';
|
|
|
|
print '<table class="border" width="100%">';
|
|
|
|
if (empty($account->rum)) $account->rum = $prelevement->buildRumNumber($object->code_client, $account->datec, $account->id);
|
|
|
|
// RUM
|
|
print '<tr><td class="titlefield">'.$langs->trans("RUM").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="rum" value="'.dol_escape_htmltag($account->rum).'"></td></tr>';
|
|
|
|
// FRSTRECUR
|
|
print '<tr><td>'.$langs->trans("WithdrawMode").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="frstrecur" value="'.dol_escape_htmltag(GETPOST('frstrecur')?GETPOST('frstrecur'):$account->frstrecur).'"></td></tr>';
|
|
|
|
print '</table>';
|
|
}
|
|
|
|
print '</div>';
|
|
|
|
dol_fiche_end();
|
|
|
|
print '<div align="center">';
|
|
print '<input class="button" value="'.$langs->trans("Modify").'" type="submit">';
|
|
print ' ';
|
|
print '<input class="button" name="cancel" value="'.$langs->trans("Cancel").'" type="submit">';
|
|
print '</div>';
|
|
}
|
|
|
|
|
|
// Create
|
|
if ($socid && $action == 'create' && $user->rights->societe->creer)
|
|
{
|
|
dol_fiche_head($head, 'rib', $langs->trans("ThirdParty"),0,'company');
|
|
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/societe/list.php">'.$langs->trans("BackToList").'</a>';
|
|
|
|
dol_banner_tab($object, 'socid', $linkback, ($user->societe_id?0:1), 'rowid', 'nom');
|
|
|
|
print '<div class="fichecenter">';
|
|
|
|
print '<div class="underbanner clearboth"></div>';
|
|
print '<table class="border centpercent">';
|
|
|
|
print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans("LabelRIB").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="label" value="'.GETPOST('label').'"></td></tr>';
|
|
|
|
print '<tr><td class="fieldrequired">'.$langs->trans("Bank").'</td>';
|
|
print '<td><input size="30" type="text" name="bank" value="'.GETPOST('bank').'"></td></tr>';
|
|
|
|
// BBAN
|
|
if ($account->useDetailedBBAN() == 1)
|
|
{
|
|
print '<tr><td>'.$langs->trans("BankCode").'</td>';
|
|
print '<td><input size="8" type="text" class="flat" name="code_banque" value="'.GETPOST('code_banque').'"></td>';
|
|
print '</tr>';
|
|
|
|
print '<tr><td>'.$langs->trans("DeskCode").'</td>';
|
|
print '<td><input size="8" type="text" class="flat" name="code_guichet" value="'.GETPOST('code_guichet').'"></td>';
|
|
print '</tr>';
|
|
}
|
|
if ($account->useDetailedBBAN() == 2)
|
|
{
|
|
print '<tr><td>'.$langs->trans("BankCode").'</td>';
|
|
print '<td><input size="8" type="text" class="flat" name="code_banque" value="'.GETPOST('code_banque').'"></td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
print '<td>'.$langs->trans("BankAccountNumber").'</td>';
|
|
print '<td><input size="15" type="text" class="flat" name="number" value="'.GETPOST('number').'"></td>';
|
|
print '</tr>';
|
|
|
|
if ($account->useDetailedBBAN() == 1)
|
|
{
|
|
print '<td>'.$langs->trans("BankAccountNumberKey").'</td>';
|
|
print '<td><input size="3" type="text" class="flat" name="cle_rib" value="'.GETPOST('value').'"></td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
// IBAN
|
|
print '<tr><td'.($account->needIBAN()?' class="fieldrequired" ':'').'>'.$langs->trans("IBAN").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="iban" value="'.GETPOST('iban').'"></td></tr>';
|
|
|
|
print '<tr><td'.($account->needIBAN()?' class="fieldrequired" ':'').'>'.$langs->trans("BIC").'</td>';
|
|
print '<td colspan="4"><input size="12" type="text" name="bic" value="'.GETPOST('bic').'"></td></tr>';
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountDomiciliation").'</td><td colspan="4">';
|
|
print '<textarea name="domiciliation" rows="4" cols="40" maxlength="255">';
|
|
print GETPOST('domiciliation');
|
|
print "</textarea></td></tr>";
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountOwner").'</td>';
|
|
print '<td colspan="4"><input size="30" type="text" name="proprio" value="'.GETPOST('proprio').'"></td></tr>';
|
|
print "</td></tr>\n";
|
|
|
|
print '<tr><td>'.$langs->trans("BankAccountOwnerAddress").'</td><td colspan="4">';
|
|
print '<textarea name="owner_address" rows="4" cols="40" maxlength="255">';
|
|
print GETPOST('owner_address');
|
|
print "</textarea></td></tr>";
|
|
|
|
print '</table>';
|
|
|
|
if ($conf->prelevement->enabled)
|
|
{
|
|
print '<br>';
|
|
|
|
print '<table class="border" width="100%">';
|
|
|
|
// RUM
|
|
print '<tr><td class="titlefieldcreate">'.$langs->trans("RUM").'</td>';
|
|
print '<td>'.$langs->trans("RUMWillBeGenerated").'</td></tr>';
|
|
|
|
// FRSTRECUR
|
|
print '<tr><td>'.$langs->trans("WithdrawMode").'</td>';
|
|
print '<td><input size="30" type="text" name="frstrecur" value="'.(isset($_POST['frstrecur'])?GETPOST('frstrecur'):'FRST').'"></td></tr>';
|
|
|
|
print '</table>';
|
|
}
|
|
|
|
print '</div>';
|
|
|
|
dol_fiche_end();
|
|
|
|
print '<div class="center">';
|
|
print '<input class="button" value="'.$langs->trans("Add").'" type="submit">';
|
|
print ' ';
|
|
print '<input name="cancel" class="button" value="'.$langs->trans("Cancel").'" type="submit">';
|
|
print '</div>';
|
|
}
|
|
|
|
if ($socid && $action == 'edit' && $user->rights->societe->creer)
|
|
{
|
|
print '</form>';
|
|
}
|
|
if ($socid && $action == 'create' && $user->rights->societe->creer)
|
|
{
|
|
print '</form>';
|
|
}
|
|
|
|
|
|
llxFooter();
|
|
|
|
$db->close();
|