Debut externalisation des fonctions gestion des charges en dehors du module compta (La gestion actuelle fait de la tr�sorerie et non de compta).

2025-02-20 13:46:52 +01:00 · 2006-06-25 17:15:07 +00:00 · 2006-06-25 17:15:07 +00:00 · e9f3853458
commit e9f3853458
parent 977c42402f
15 changed files with 78 additions and 24 deletions
--- a/htdocs/adherents/adherent.class.php
+++ b/htdocs/adherents/adherent.class.php
@ -919,7 +919,7 @@ class Adherent
 	  defined('ADHERENT_SPIP_DB') && ADHERENT_SPIP_DB != ''
 	  ){
 	$mdpass=md5($this->pass);
-	$htpass=crypt($this->pass,initialiser_sel());
+	$htpass=crypt($this->pass,makesalt());
 	$query = "INSERT INTO spip_auteurs (nom, email, login, pass, htpass, alea_futur, statut) VALUES(\"".$this->prenom." ".$this->nom."\",\"".$this->email."\",\"".$this->login."\",\"$mdpass\",\"$htpass\",FLOOR(32000*RAND()),\"1comite\")";
 	//      $mydb=new Db('mysql',ADHERENT_SPIP_SERVEUR,ADHERENT_SPIP_USER,ADHERENT_SPIP_PASS,ADHERENT_SPIP_DB);
      $mydb=new DoliDb('mysql',ADHERENT_SPIP_SERVEUR,ADHERENT_SPIP_USER,ADHERENT_SPIP_PASS,ADHERENT_SPIP_DB);
--- a/htdocs/adherents/htpasswd.php
+++ b/htdocs/adherents/htpasswd.php
@ -65,7 +65,7 @@ if ($result)
  while ($i < $num)
    {
      $objp = $db->fetch_object($result);
-      $htpass=crypt($objp->pass,initialiser_sel());
+      $htpass=crypt($objp->pass,makesalt());
      print $objp->login.":".$htpass."<BR>\n";
      $i++;
    }
--- a/htdocs/admin/compta.php
+++ b/htdocs/admin/compta.php
@ -91,7 +91,7 @@ print "</tr>\n";
 print '<tr '.$bc[false].'><td width="200"><input type="radio" name="compta_mode" value="RECETTES-DEPENSES"'.($compta_mode != 'CREANCES-DETTES' ? ' checked' : '').'> '.$langs->trans('OptionModeTrue').'</td>';
 print '<td colspan="2">'.nl2br($langs->trans('OptionModeTrueDesc'))."</td></tr>\n";
 print '<tr '.$bc[true].'><td width="200"><input type="radio" name="compta_mode" value="CREANCES-DETTES"'.($compta_mode == 'CREANCES-DETTES' ? ' checked' : '').'> '.$langs->trans('OptionModeVirtual').'</td>';
-print '<td colspan="2">'.$langs->trans('OptionModeVirtualDesc')."</td></tr>\n";
+print '<td colspan="2">'.nl2br($langs->trans('OptionModeVirtualDesc'))."</td></tr>\n";
 print '</form>';

 print "</table>\n";
--- a/htdocs/conf/conf.class.php
+++ b/htdocs/conf/conf.class.php
@ -177,6 +177,10 @@ class Conf
 		// Module commercial
 		$this->commercial->enabled=defined("MAIN_MODULE_COMMERCIAL")?MAIN_MODULE_COMMERCIAL:0;
 		$this->commercial->dir_output=DOL_DATA_ROOT."/rapport";
+		// Module charges sociales
+		$this->charges->enabled=1;
+		$this->charges->dir_output=DOL_DATA_ROOT."/socialcontrib";
+		$this->charges->dir_images=DOL_DATA_ROOT."/socialcontrib/images";
 		// Module comptaexpert
 		$this->comptaexpert->enabled=defined("MAIN_MODULE_COMPTABILITE_EXPERT")?MAIN_MODULE_COMPTABILITE_EXPERT:0;
 		$this->comptaexpert->dir_output=DOL_DATA_ROOT."/comptaexpert";
--- a/htdocs/includes/menus/barre_left/eldy_backoffice.php
+++ b/htdocs/includes/menus/barre_left/eldy_backoffice.php
@ -355,12 +355,13 @@ class MenuLeft {
                }
                
                // Charges
-                if ($conf->compta->enabled || $conf->comptaexpert->enabled)
+                if ($conf->charges->enabled)
                {
-                  $newmenu->add(DOL_URL_ROOT."/compta/charges/index.php?leftmenu=charges&mainmenu=accountancy",$langs->trans("Charges"), 0, $user->rights->compta->charges->lire);
-                  if ($leftmenu=="charges") $newmenu->add_submenu(DOL_URL_ROOT."/compta/sociales/index.php",$langs->trans("SocialContributions"), 1, $user->rights->compta->charges->creer);
-                }
-                
+					$newmenu->add(DOL_URL_ROOT."/compta/charges/index.php?leftmenu=charges&mainmenu=accountancy",$langs->trans("Charges"), 0, $user->rights->compta->charges->lire);
+					if ($leftmenu=="charges") $newmenu->add_submenu(DOL_URL_ROOT."/compta/sociales/index.php",$langs->trans("SocialContributions"), 1, $user->rights->compta->charges->creer);
+        		}
+        		
+        		// Compta tva        
                if (($conf->compta->enabled || $conf->comptaexpert->enabled) && $conf->compta->tva && $user->societe_id == 0)
                {
                  $newmenu->add(DOL_URL_ROOT."/compta/tva/index.php?leftmenu=vat&mainmenu=accountancy",$langs->trans("VAT"),0,$user->rights->compta->charges->lire);
--- a/htdocs/includes/menus/barre_left/eldy_frontoffice.php
+++ b/htdocs/includes/menus/barre_left/eldy_frontoffice.php
@ -375,12 +375,15 @@ class MenuLeft {
                
                // Charges
 /*
-                if ($conf->compta->enabled || $conf->comptaexpert->enabled)
+                if ($conf->charges->enabled)
                {
                  $newmenu->add(DOL_URL_ROOT."/compta/charges/index.php?leftmenu=charges&mainmenu=accountancy",$langs->trans("Charges"), 0, $user->rights->compta->charges->lire);
                  if ($leftmenu=="charges") $newmenu->add_submenu(DOL_URL_ROOT."/compta/sociales/index.php",$langs->trans("SocialContributions"), 1, $user->rights->compta->charges->creer);
-                }
-                
+				}
+*/				
+
+				// Compa TVA                
+/*
                if (($conf->compta->enabled || $conf->comptaexpert->enabled) && $conf->compta->tva && $user->societe_id == 0)
                {
                  $newmenu->add(DOL_URL_ROOT."/compta/tva/index.php?leftmenu=vat&mainmenu=accountancy",$langs->trans("VAT"),0,$user->rights->compta->charges->lire);
--- a/htdocs/includes/modules/mailings/modules_mailings.php
+++ b/htdocs/includes/modules/mailings/modules_mailings.php
@ -92,7 +92,7 @@ class MailingTargets
     */
    function formFilter()
    {
-        return '&nbsp;';
+        return '';
    }
    
    /**
--- a/htdocs/langs/en_US/companies.lang
+++ b/htdocs/langs/en_US/companies.lang
@ -19,6 +19,10 @@ Company=Company
 CompanyName=Company name
 Companies=Companies
 ThirdParty=Third party
+ThirdPartyProspects=Prospects
+ThirdPartyCustomers=Customers
+ThirdPartyCustomersWithIdProf12=Customers with %s or %s
+ThirdPartySuppliers=Suppliers
 ParentCompany=Parent company
 CivilityCode=Civility code
 RegisteredOffice=Registered office
--- a/htdocs/langs/en_US/compta.lang
+++ b/htdocs/langs/en_US/compta.lang
@ -4,11 +4,11 @@ AccountancyCard=Accountancy card
 Treasury=Treasury
 MenuFinancial=Financial
 OptionMode=Option for accountancy
-OptionModeTrue=Option Recettes-Dépenses
-OptionModeVirtual=Option Créances-Dettes
+OptionModeTrue=Option Input-Ouput
+OptionModeVirtual=Option Credits-Debts
 OptionModeTrueDesc=Dans ce mode, le CA est calculé sur la base des factures payées.\nLa validité des chiffres n'est donc assurée que si la tenue de la comptabilité passe rigoureusement par des entrées/sorties sur les comptes via des factures.\nRemarque, dans cette version, Dolibarr utilise la date de passage de la facture à l'état 'Validé' et non la date de passage à l'état 'Payé'.
 OptionModeVirtualDesc=Dans ce mode, le CA est calculé sur la base des factures validées. Qu'elles soient ou non payés, dès lors qu'elles sont dues, elles apparaissent dans le résultat.
-FeatureIsSupportedInInOutModeOnly=Feature only available in IN-OUT accountancy mode (See Accountancy module configuration)
+FeatureIsSupportedInInOutModeOnly=Feature only available in CREDITS-DEBTS accountancy mode (See Accountancy module configuration)
 Param=Setup
 AccountsGeneral=Accounts
 Account=Account
--- a/htdocs/langs/en_US/mails.lang
+++ b/htdocs/langs/en_US/mails.lang
@ -49,9 +49,10 @@ NoTargetYet=No recipients defined yet
 AddRecipients=Add recipients
 RemoveRecipient=Remove recipient
 CommonSubstitutions=Common substitutions
+YouCanAddYourOwnPredefindedListHere=You can add your own mails selector module here. For this take a look at the file htdocs/includes/mailings/README.

 # Libelle des modules de liste de destinataires mailing
-MailingModuleDescContactCompanies=Unique contacts with emails, in all companies
+MailingModuleDescContactCompanies=Unique contacts of all third parties
 MailingModuleDescDolibarrUsers=All Dolibarr users with emails
 MailingModuleDescFundationMembers=Fundation members with emails

--- a/htdocs/langs/fr_FR/companies.lang
+++ b/htdocs/langs/fr_FR/companies.lang
@ -19,6 +19,10 @@ Company=Soci
 CompanyName=Raison sociale
 Companies=Sociétés
 ThirdParty=Tiers
+ThirdPartyProspects=Prospets
+ThirdPartyCustomers=Clients
+ThirdPartyCustomersWithIdProf12=Clients avec %s ou %s
+ThirdPartySuppliers=Fournisseurs
 ParentCompany=Maison mère
 CivilityCode=Code civilité
 RegisteredOffice=Siège sociale
--- a/htdocs/langs/fr_FR/compta.lang
+++ b/htdocs/langs/fr_FR/compta.lang
@ -8,7 +8,7 @@ OptionModeTrue=Option Recettes-D
 OptionModeVirtual=Option Créances-Dettes
 OptionModeTrueDesc=Dans ce mode, le CA est calculé sur la base des factures payées.\nLa validité des chiffres n'est donc assurée que si la tenue de la comptabilité passe rigoureusement par des entrées/sorties sur les comptes via des factures.\nRemarque : dans cette version, Dolibarr utilise la date de passage de la facture à l'état 'Validée' et non la date de passage à l'état 'Payée'.
 OptionModeVirtualDesc=Dans ce mode, le CA est calculé sur la base des factures validées. Payées ou non, elles apparaissent dans le résultat dès qu'elles sont dues.
-FeatureIsSupportedInInOutModeOnly=Fonction disponible uniquement en mode compta RECETTE-DEPENSE (Voir configuration du module compta)
+FeatureIsSupportedInInOutModeOnly=Fonction disponible uniquement en mode compta CREANCES-DETTES (Voir configuration du module compta)
 Param=Paramétrage
 AccountsGeneral=Comptes généraux
 Account=Compte
--- a/htdocs/langs/fr_FR/mails.lang
+++ b/htdocs/langs/fr_FR/mails.lang
@ -49,9 +49,10 @@ NoTargetYet=Aucun destinataire d
 AddRecipients=Ajout de destinataires
 RemoveRecipient=Supprime destinataire
 CommonSubstitutions=Substitutions communes
+YouCanAddYourOwnPredefindedListHere=Vous pouvez ajouter votre propre module de sélection/import de mails. Pour cela, voir le fichier htdocs/includes/mailings/README.

 # Libelle des modules de liste de destinataires mailing
-MailingModuleDescContactCompanies=Contacts avec e-mail des sociétés (prospects, clients, fournisseurs...)
+MailingModuleDescContactCompanies=Contacts des tiers (prospects, clients, fournisseurs...)
 MailingModuleDescDolibarrUsers=Utilisateurs de Dolibarr ayant un e-mail
 MailingModuleDescFundationMembers=Adhérents ayant un e-mail

--- a/htdocs/lib/functions.inc.php
+++ b/htdocs/lib/functions.inc.php
@ -959,6 +959,23 @@ function img_allow($allow)
    }
 }

+
+/**
+        \brief      Affiche info admin
+        \param      text		Texte info
+*/
+function info_admin($texte)
+{
+	global $conf,$langs;
+	$s='<div class="info">';
+	$s.=img_picto($langs->trans("InfoAdmin"),'star');
+	$s.=' ';
+	$s.=$texte;
+	$s.='</div>';
+	return $s;
+}
+
+
 /**
 		\brief      Affiche formulaire de login
 		\remarks    il faut changer le code html dans cette fonction pour changer le design
@ -1792,13 +1809,25 @@ function creer_pass_aleatoire($longueur = 8, $sel = "") {
 }

 /**
-		\brief      Fonction pour initialiser sel
-		\remarks    la fonction a été prise sur http://www.uzine.net/spip
+		\brief      Fonction pour initialiser un salt pour la fonction crypt
+		\param		$type		2=>renvoi un salt pour cryptage DES
+		                        8=>renvoi un salt pour cryptage MD5
+		                        0=>renvoi un salt pour cryptage par defaut
+		\return		string		Chaine salt
 */
-function initialiser_sel() {
-  global $htsalt;
-
-  $htsalt = '$1$'.creer_pass_aleatoire();
+function makesalt($type=CRYPT_SALT_LENGTH)
+{
+	switch($type)
+	{
+		case 8:
+			$saltlen=8; $saltprefix='$1$'; $saltsuffix='$'; break;
+		case 2:
+		default: 	// by default, fall back on Standard DES (should work everywhere)
+			$saltlen=2; $saltprefix=''; $saltsuffix=''; break;
+	}
+	$salt='';
+	while(strlen($salt) < $saltlen) $salt.=chr(rand(64,126));
+	return $saltprefix.$salt.$saltsuffix;
 }

 /**
--- a/htdocs/theme/eldy/eldy.css.php
+++ b/htdocs/theme/eldy/eldy.css.php
@ -784,6 +784,13 @@ div.error {
  border: 1px solid #8C9CAB;
 }

+div.info {
+  color: #999999;
+  padding: 0.2em 0.2em 0.2em 0.2em;
+  margin: 0.5em 0em 0.5em 0em;
+  border: 1px solid #ACACAB;
+}
+

 /*
 *   Liens Payes/Non payes