Gecko [ www.foryou-vip.com ]

Name	Size	Permission	Date
accounting.lib.php	7.08 KB	-rw-r--r--	2020-10-12 13:32
admin.lib.php	67.53 KB	-rw-r--r--	2020-10-12 13:32
agenda.lib.php	19.97 KB	-rw-r--r--	2020-10-12 13:32
ajax.lib.php	28.77 KB	-rw-r--r--	2020-10-12 13:32
asset.lib.php	4.76 KB	-rw-r--r--	2020-10-12 13:32
bank.lib.php	13.29 KB	-rw-r--r--	2020-10-12 13:32
barcode.lib.php	14.29 KB	-rw-r--r--	2020-10-12 13:32
categories.lib.php	3.41 KB	-rw-r--r--	2020-10-12 13:32
company.lib.php	79.51 KB	-rw-r--r--	2020-10-12 13:32
contact.lib.php	4.66 KB	-rw-r--r--	2020-10-12 13:33
contract.lib.php	4.78 KB	-rw-r--r--	2020-10-12 13:32
cron.lib.php	4.4 KB	-rw-r--r--	2020-10-12 13:32
date.lib.php	34.54 KB	-rw-r--r--	2020-10-12 13:32
doc.lib.php	6.7 KB	-rw-r--r--	2020-10-12 13:32
doleditor.lib.php	4.29 KB	-rw-r--r--	2020-10-12 13:32
donation.lib.php	3.59 KB	-rw-r--r--	2020-10-12 13:32
ecm.lib.php	3.84 KB	-rw-r--r--	2020-10-12 13:33
emailing.lib.php	2.25 KB	-rw-r--r--	2020-10-12 13:32
expedition.lib.php	3.79 KB	-rw-r--r--	2020-10-12 13:32
expensereport.lib.php	5.69 KB	-rw-r--r--	2020-10-12 13:32
fichinter.lib.php	6.48 KB	-rw-r--r--	2020-10-12 13:32
files.lib.php	111.69 KB	-rw-r--r--	2020-10-12 13:32
fiscalyear.lib.php	1.86 KB	-rw-r--r--	2020-10-12 13:32
format_cards.lib.php	2.9 KB	-rw-r--r--	2020-10-12 13:32
fourn.lib.php	9.17 KB	-rw-r--r--	2020-10-12 13:33
functions.lib.php	360.25 KB	-rw-r--r--	2020-10-12 13:32
functions2.lib.php	93.61 KB	-rw-r--r--	2020-10-12 13:33
functions_ch.lib.php	3.66 KB	-rw-r--r--	2020-10-12 13:32
functionsnumtoword.lib.php	9.88 KB	-rw-r--r--	2020-10-12 13:32
geturl.lib.php	8.88 KB	-rw-r--r--	2020-10-12 13:33
holiday.lib.php	3.38 KB	-rw-r--r--	2020-10-12 13:32
hrm.lib.php	2.86 KB	-rw-r--r--	2020-10-12 13:32
images.lib.php	23.42 KB	-rw-r--r--	2020-10-12 13:32
import.lib.php	1.75 KB	-rw-r--r--	2020-10-12 13:32
index.html	0 B	-rw-r--r--	2020-10-12 13:32
invoice.lib.php	7.37 KB	-rw-r--r--	2020-10-12 13:32
invoice2.lib.php	8.84 KB	-rw-r--r--	2020-10-12 13:32
json.lib.php	11.53 KB	-rw-r--r--	2020-10-12 13:32
ldap.lib.php	5.19 KB	-rw-r--r--	2020-10-12 13:32
loan.lib.php	3.08 KB	-rw-r--r--	2020-10-12 13:32
mailmanspip.lib.php	1.24 KB	-rw-r--r--	2020-10-12 13:33
member.lib.php	10.04 KB	-rw-r--r--	2020-10-12 13:32
memory.lib.php	7.71 KB	-rw-r--r--	2020-10-12 13:32
modulebuilder.lib.php	12.2 KB	-rw-r--r--	2020-10-12 13:32
multicurrency.lib.php	1.85 KB	-rw-r--r--	2020-10-12 13:32
oauth.lib.php	6.77 KB	-rw-r--r--	2020-10-12 13:33
order.lib.php	5.64 KB	-rw-r--r--	2020-10-12 13:32
parsemd.lib.php	2.73 KB	-rw-r--r--	2020-10-12 13:32
payments.lib.php	13.75 KB	-rw-r--r--	2020-10-12 13:32
pdf.lib.php	96.37 KB	-rw-r--r--	2020-10-12 13:32
prelevement.lib.php	2.86 KB	-rw-r--r--	2020-10-12 13:33
price.lib.php	20.92 KB	-rw-r--r--	2020-10-12 13:33
product.lib.php	22.17 KB	-rw-r--r--	2020-10-12 13:32
project.lib.php	102.22 KB	-rw-r--r--	2020-10-12 13:33
propal.lib.php	5.27 KB	-rw-r--r--	2020-10-12 13:32
receiptprinter.lib.php	2.19 KB	-rw-r--r--	2020-10-12 13:33
reception.lib.php	3.69 KB	-rw-r--r--	2020-10-12 13:32
report.lib.php	3.78 KB	-rw-r--r--	2020-10-12 13:32
resource.lib.php	4.67 KB	-rw-r--r--	2020-10-12 13:32
salaries.lib.php	3.57 KB	-rw-r--r--	2020-10-12 13:33
security.lib.php	29.91 KB	-rw-r--r--	2020-10-12 13:32
security2.lib.php	17.25 KB	-rw-r--r--	2020-10-12 13:33
sendings.lib.php	16.23 KB	-rw-r--r--	2020-10-12 13:33
signature.lib.php	2.81 KB	-rw-r--r--	2020-10-12 13:32
stock.lib.php	3.67 KB	-rw-r--r--	2020-10-12 13:32
supplier_proposal.lib.php	4.85 KB	-rw-r--r--	2020-10-12 13:32
takepos.lib.php	1.96 KB	-rw-r--r--	2020-10-12 13:33
tax.lib.php	49.87 KB	-rw-r--r--	2020-10-12 13:32
ticket.lib.php	39.15 KB	-rw-r--r--	2020-10-12 13:32
treeview.lib.php	9.27 KB	-rw-r--r--	2020-10-12 13:32
trip.lib.php	1.98 KB	-rw-r--r--	2020-10-12 13:33
usergroups.lib.php	41.61 KB	-rw-r--r--	2020-10-12 13:32
vat.lib.php	2.55 KB	-rw-r--r--	2020-10-12 13:33
website.lib.php	47.84 KB	-rw-r--r--	2020-10-12 13:32
website2.lib.php	20.4 KB	-rw-r--r--	2020-10-12 13:32
ws.lib.php	3.52 KB	-rw-r--r--	2020-10-12 13:32
xcal.lib.php	16.59 KB	-rw-r--r--	2020-10-12 13:32

Rename

<?php
/* Copyright (C) 2010 Laurent Destailleur         <eldy@users.sourceforge.net>
 *
 * 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 <https://www.gnu.org/licenses/>.
 * or see https://www.gnu.org/
 */

/**
 *	\file			htdocs/core/lib/functions_ch.lib.php
 *	\brief			A set of swiss functions for Dolibarr
 *					This file contains rare functions.
 */

/**
 * Return if a BVRB number is valid or not (For switzerland)
 *
 * @param	string	$bvrb		BVRB number
 * @return 	boolean				True if OK, false if KO
 */
function dol_ch_controle_bvrb($bvrb)
{
	// Init array for control
	$tableau[0][0] = 0;
	$tableau[0][1] = 9;
	$tableau[0][2] = 4;
	$tableau[0][3] = 6;
	$tableau[0][4] = 8;
	$tableau[0][5] = 2;
	$tableau[0][6] = 7;
	$tableau[0][7] = 1;
	$tableau[0][8] = 3;
	$tableau[0][9] = 5;
	$tableau[0][10] = 0;

$tableau[1][0] = 9;
	$tableau[1][1] = 4;
	$tableau[1][2] = 6;
	$tableau[1][3] = 8;
	$tableau[1][4] = 2;
	$tableau[1][5] = 7;
	$tableau[1][6] = 1;
	$tableau[1][7] = 3;
	$tableau[1][8] = 5;
	$tableau[1][9] = 0;
	$tableau[1][10] = 9;

$tableau[2][0] = 4;
	$tableau[2][1] = 6;
	$tableau[2][2] = 8;
	$tableau[2][3] = 2;
	$tableau[2][4] = 7;
	$tableau[2][5] = 1;
	$tableau[2][6] = 3;
	$tableau[2][7] = 5;
	$tableau[2][8] = 0;
	$tableau[2][9] = 9;
	$tableau[2][10] = 8;

$tableau[3][0] = 6;
	$tableau[3][1] = 8;
	$tableau[3][2] = 2;
	$tableau[3][3] = 7;
	$tableau[3][4] = 1;
	$tableau[3][5] = 3;
	$tableau[3][6] = 5;
	$tableau[3][7] = 0;
	$tableau[3][8] = 9;
	$tableau[3][9] = 4;
	$tableau[3][10] = 7;

$tableau[4][0] = 8;
	$tableau[4][1] = 2;
	$tableau[4][2] = 7;
	$tableau[4][3] = 1;
	$tableau[4][4] = 3;
	$tableau[4][5] = 5;
	$tableau[4][6] = 0;
	$tableau[4][7] = 9;
	$tableau[4][8] = 4;
	$tableau[4][9] = 6;
	$tableau[4][10] = 6;

$tableau[5][0] = 2;
	$tableau[5][1] = 7;
	$tableau[5][2] = 1;
	$tableau[5][3] = 3;
	$tableau[5][4] = 5;
	$tableau[5][5] = 0;
	$tableau[5][6] = 9;
	$tableau[5][7] = 4;
	$tableau[5][8] = 6;
	$tableau[5][9] = 8;
	$tableau[5][10] = 5;

$tableau[6][0] = 7;
	$tableau[6][1] = 1;
	$tableau[6][2] = 3;
	$tableau[6][3] = 5;
	$tableau[6][4] = 0;
	$tableau[6][5] = 9;
	$tableau[6][6] = 4;
	$tableau[6][7] = 6;
	$tableau[6][8] = 8;
	$tableau[6][9] = 2;
	$tableau[6][10] = 4;

$tableau[7][0] = 1;
	$tableau[7][1] = 3;
	$tableau[7][2] = 5;
	$tableau[7][3] = 0;
	$tableau[7][4] = 9;
	$tableau[7][5] = 4;
	$tableau[7][6] = 6;
	$tableau[7][7] = 8;
	$tableau[7][8] = 2;
	$tableau[7][9] = 7;
	$tableau[7][10] = 3;

$tableau[8][0] = 3;
	$tableau[8][1] = 5;
	$tableau[8][2] = 0;
	$tableau[8][3] = 9;
	$tableau[8][4] = 4;
	$tableau[8][5] = 6;
	$tableau[8][6] = 8;
	$tableau[8][7] = 2;
	$tableau[8][8] = 7;
	$tableau[8][9] = 1;
	$tableau[8][10] = 2;

$tableau[9][0] = 5;
	$tableau[9][1] = 0;
	$tableau[9][2] = 9;
	$tableau[9][3] = 4;
	$tableau[9][4] = 6;
	$tableau[9][5] = 8;
	$tableau[9][6] = 2;
	$tableau[9][7] = 7;
	$tableau[9][8] = 1;
	$tableau[9][9] = 3;
	$tableau[9][10] = 1;

// Clean data
	$bv = str_replace(' ', '', $bvrb);

// Make control
	$report = 0;
	while (dol_strlen($bv) > 1)
	{
		$match = substr($bv, 0, 1);
		$report = $tableau[$report][$match];
		$bv = substr($bv, 1);
	}
	$controle = $tableau[$report][10];

return ($controle == $bv);
}