lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Synchro

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2004-09-21 16:02:39 +00:00
parent af404b662d
commit 09a8308474
1 changed files with 46 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
htdocs/companybankaccount.class.php
View File

@ -45,7 +45,8 @@ class CompanyBankAccount
$this->soc_id = $soc_id;
$this->clos = 0;
$this->solde = 0;
$this->solde = 0;
$this->error_number = 0;
return 1;
}
@ -177,7 +178,7 @@ class CompanyBankAccount
*/
function error()
{
return $this->error;
return $this->error;
}
/*
@ -187,13 +188,53 @@ class CompanyBankAccount
function verif()
{
require_once DOL_DOCUMENT_ROOT . '/compta/bank/bank.lib.php';
if (! verif_rib($this->code_banque,$this->code_guichet,$this->number,$this->cle_rib,$this->iban_prefix))
if (strlen(trim($this->code_banque)) == 0)
{
return 0;
$this->error_number = 32;
$this->error_message = "Le code banque n'est pas renseigné";
}
if (strlen(trim($this->code_guichet)) == 0)
{
$this->error_number = 33;
$this->error_message = "Le code guichet n'est pas renseigné";
}
if (strlen(trim($this->number)) == 0)
{
$this->error_number = 34;
$this->error_message = "Le numéro de compte n'est pas renseigné";
}
if (strlen(trim($this->cle_rib)) == 0)
{
$this->error_number = 35;
$this->error_message = "La clé n'est pas renseignée";
}
if (strlen(trim($this->iban_prefix)) == 0)
{
$this->error_number = 36;
$this->error_message = "La cle IBAN n'est pas renseignée";
}
if (! verif_rib($this->code_banque, $this->code_guichet, $this->number, $this->cle_rib, $this->iban_prefix))
{
$this->error_number = 12;
$this->error_message = "Le RIB n'est pas valide";
}
if ($this->error_number == 0)
{
return 1;
}
else
{
return 1;
return 0;
}
}
}