alxarafe / alixar

htdocs/zapier/class/hook.class.php

Indentation +2 added lines, -2 removed lines

@@ -576,7 +576,7 @@ 
         return $this->LibStatut($this->status, $mode);
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Return the status
      *
@@ -587,7 +587,7 @@ 
      */
     public function LibStatut($status, $mode = 0)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $langs;
 
         if (empty($this->labelStatus) || empty($this->labelStatusShort)) {

htdocs/zapier/class/api_zapier.class.php

Indentation +27 added lines, -27 removed lines

@@ -295,7 +295,7 @@ 
         );
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
     /**
      * Clean sensible object datas
      *
@@ -304,30 +304,30 @@ 
      */
     public function _cleanObjectDatas($object)
     {
-		// phpcs:disable
-		$object = parent::_cleanObjectDatas($object);
-
-		return $object;
-	}
-
-	/**
-	 * Validate fields before create or update object
-	 *
-	 * @param   array       $data       Array of data to validate
-	 * @param   array       $fields     Array of fields needed
-	 * @return  array
-	 *
-	 * @throws  RestException
-	 */
-	private function validate($data, $fields)
-	{
-		$hook = array();
-		foreach ($fields as $field) {
-			if (!isset($data[$field])) {
-				throw new RestException(400, $field." field missing");
-			}
-			$hook[$field] = $data[$field];
-		}
-		return $hook;
-	}
+        // phpcs:disable
+        $object = parent::_cleanObjectDatas($object);
+
+        return $object;
+    }
+
+    /**
+     * Validate fields before create or update object
+     *
+     * @param   array       $data       Array of data to validate
+     * @param   array       $fields     Array of fields needed
+     * @return  array
+     *
+     * @throws  RestException
+     */
+    private function validate($data, $fields)
+    {
+        $hook = array();
+        foreach ($fields as $field) {
+            if (!isset($data[$field])) {
+                throw new RestException(400, $field." field missing");
+            }
+            $hook[$field] = $data[$field];
+        }
+        return $hook;
+    }
 }

Spacing +1 added lines, -1 removed lines

@@ -324,7 +324,7 @@
 		$hook = array();
 		foreach ($fields as $field) {
 			if (!isset($data[$field])) {
-				throw new RestException(400, $field." field missing");
+				throw new RestException(400, $field . " field missing");
 			}
 			$hook[$field] = $data[$field];
 		}

htdocs/bookcal/class/calendar.class.php

Indentation +2 added lines, -2 removed lines

@@ -837,7 +837,7 @@ 
         return $this->LibStatut($this->status, $mode);
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Return the label of a given status
      *
@@ -847,7 +847,7 @@ 
      */
     public function LibStatut($status, $mode = 0)
     {
-		// phpcs:enable
+        // phpcs:enable
         if (empty($this->labelStatus) || empty($this->labelStatusShort)) {
             global $langs;
 

htdocs/bookcal/class/availabilities.class.php

Indentation +2 added lines, -2 removed lines

@@ -847,7 +847,7 @@ 
         return $this->LibStatut($this->status, $mode);
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Return the status
      *
@@ -857,7 +857,7 @@ 
      */
     public function LibStatut($status, $mode = 0)
     {
-		// phpcs:enable
+        // phpcs:enable
         if (empty($this->labelStatus) || empty($this->labelStatusShort)) {
             global $langs;
             //$langs->load("agenda");

htdocs/contact/canvas/actions_contactcard_common.class.php

Indentation +4 added lines, -4 removed lines

@@ -81,7 +81,7 @@ 
         return $object;
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Set content of ->tpl array, to use into template
      *
@@ -91,7 +91,7 @@ 
      */
     public function assign_values(&$action, $id)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $conf, $langs, $user, $canvas;
         global $form, $formcompany, $objsoc;
 
@@ -275,7 +275,7 @@ 
         }
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Assign POST values into object
      *
@@ -283,7 +283,7 @@ 
      */
     private function assign_post()
     {
-		// phpcs:enable
+        // phpcs:enable
         global $langs, $mysoc;
 
         $this->object->socid = GETPOSTINT("socid");

htdocs/contact/canvas/default/actions_contactcard_default.class.php

Indentation +2 added lines, -2 removed lines

@@ -74,7 +74,7 @@ 
         return $out;
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Assign custom values for canvas
      *
@@ -84,7 +84,7 @@ 
      */
     public function assign_values(&$action, $id)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $conf, $db, $langs, $user;
         global $form;
 

htdocs/contact/class/contact.class.php

Indentation +14 added lines, -14 removed lines

@@ -754,8 +754,8 @@ 
     }
 
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
     /**
      *  Return DN string complete in the LDAP directory for the object
      *
@@ -767,7 +767,7 @@ 
      */
     public function _load_ldap_dn($info, $mode = 0)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $conf;
         $dn = '';
         if ($mode == 0) {
@@ -781,8 +781,8 @@ 
     }
 
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
     /**
      *  Initialize info table (LDAP attributes table)
      *
@@ -790,7 +790,7 @@ 
      */
     public function _load_ldap_info()
     {
-		// phpcs:enable
+        // phpcs:enable
         global $conf, $langs;
 
         $info = array();
@@ -891,7 +891,7 @@ 
     }
 
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Update field alert birthday
      *
@@ -902,7 +902,7 @@ 
      */
     public function update_perso($id, $user = null, $notrigger = 0)
     {
-		// phpcs:enable
+        // phpcs:enable
         $error = 0;
         $result = false;
 
@@ -1186,7 +1186,7 @@ 
         }
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Load number of elements the contact is used as a link for
      *  ref_facturation
@@ -1198,7 +1198,7 @@ 
      */
     public function load_ref_elements()
     {
-		// phpcs:enable
+        // phpcs:enable
         // Count the elements for which it is contact
         $sql = "SELECT tc.element, count(ec.rowid) as nb";
         $sql .= " FROM " . MAIN_DB_PREFIX . "element_contact as ec, " . MAIN_DB_PREFIX . "c_type_contact as tc";
@@ -1582,7 +1582,7 @@ 
         return $this->LibStatut($this->statut, $mode);
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Return the label of a given status
      *
@@ -1592,7 +1592,7 @@ 
      */
     public function LibStatut($status, $mode)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $langs;
 
         $labelStatus = array(
@@ -1620,7 +1620,7 @@ 
     }
 
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      *  Return translated label of Public or Private
      *
@@ -1629,7 +1629,7 @@ 
      */
     public function LibPubPriv($status)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $langs;
         if ($status == '1') {
             return $langs->trans('ContactPrivate');

Spacing +5 added lines, -5 removed lines

@@ -215,8 +215,8 @@ 
     /**
      * @var int Thirdparty ID
      */
-    public $socid;      // both socid and fk_soc are used
-    public $fk_soc;     // both socid and fk_soc are used
+    public $socid; // both socid and fk_soc are used
+    public $fk_soc; // both socid and fk_soc are used
 
     /**
      * @var string Thirdparty name
@@ -1067,8 +1067,8 @@ 
                 $this->country_code = $obj->country_id ? $obj->country_code : '';
                 $this->country      = $obj->country_id ? ($langs->trans('Country' . $obj->country_code) != 'Country' . $obj->country_code ? $langs->transnoentities('Country' . $obj->country_code) : $obj->country) : '';
 
-                $this->fk_soc       = $obj->fk_soc;     // Both fk_soc and socid are used
-                $this->socid        = $obj->fk_soc;     // Both fk_soc and socid are used
+                $this->fk_soc       = $obj->fk_soc; // Both fk_soc and socid are used
+                $this->socid        = $obj->fk_soc; // Both fk_soc and socid are used
                 $this->socname      = $obj->socname;
                 $this->poste        = $obj->poste;
                 $this->statut       = $obj->statut;
@@ -1876,7 +1876,7 @@ 
         $error = 0;
 
         if (!isset($this->roles)) {
-            return 0;   // Avoid to loose roles when property not set
+            return 0; // Avoid to loose roles when property not set
         }
 
         $this->db->begin();

htdocs/cron/class/cronjob.class.php

Indentation +6 added lines, -6 removed lines

@@ -1151,7 +1151,7 @@ 
     }
 
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      * Run a job.
      * Once job is finished, status and nb of run is updated.
@@ -1162,7 +1162,7 @@ 
      */
     public function run_jobs(string $userlogin)
     {
-		// phpcs:enable
+        // phpcs:enable
         global $langs, $conf, $hookmanager;
 
         $hookmanager->initHooks(array('cron'));
@@ -1442,7 +1442,7 @@ 
     }
 
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      * Reprogram a job
      *
@@ -1452,7 +1452,7 @@ 
      */
     public function reprogram_jobs(string $userlogin, int $now)
     {
-		// phpcs:enable
+        // phpcs:enable
         dol_syslog(get_class($this) . "::reprogram_jobs userlogin:$userlogin", LOG_DEBUG);
 
         require_once DOL_DOCUMENT_ROOT . '/user/class/user.class.php';
@@ -1533,7 +1533,7 @@ 
         return $this->LibStatut($this->status, $mode, $this->processing, $this->lastresult);
     }
 
-	// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
+    // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
     /**
      * Return label of a giver status
      *
@@ -1545,7 +1545,7 @@ 
      */
     public function LibStatut(int $status, int $mode = 0, int $processing = 0, string $lastResult = '')
     {
-		// phpcs:enable
+        // phpcs:enable
         $this->labelStatus = array(); // Force reset o array because label depends on other fields
         $this->labelStatusShort = array();
 

Spacing +2 added lines, -2 removed lines

@@ -1015,7 +1015,7 @@ 
         $datas['ref'] = '<br><b>' . $langs->trans('Ref') . ':</b> ' . dol_escape_htmltag($this->ref);
         $datas['label'] = '<br><b>' . $langs->trans('Title') . ':</b> ' . $langs->trans($this->label);
         if ($this->label != $langs->trans($this->label)) {
-            $datas['label']  .= ' <span class="opacitymedium">(' . $this->label . ')</span>';
+            $datas['label'] .= ' <span class="opacitymedium">(' . $this->label . ')</span>';
         }
         if (!empty($this->params)) {
             $datas['params'] = '<br><b>' . $langs->trans('Parameters') . ':</b> ' . dol_escape_htmltag($this->params);
@@ -1435,7 +1435,7 @@ 
             $msg = $langs->trans("ErrorInBatch", $this->label);
             $from = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
             $cmailfile = new CMailFile($subject, $this->email_alert, $from, $msg);
-            $result = $cmailfile->sendfile();   // Do not test result
+            $result = $cmailfile->sendfile(); // Do not test result
         }
 
         return $error ? -1 : 1;

htdocs/accountancy/journal/bankjournal.php

Indentation +1084 added lines, -1084 removed lines

@@ -352,236 +352,236 @@ 
                     // We save tabtype for a future use, to remember what kind of payment it is
                     $tabpay[$obj->rowid]['type'] = $links[$key]['type'];
                     $tabtype[$obj->rowid] = $links[$key]['type'];
-					/* phpcs:disable -- Code does nothing at this moment -> commented
+                    /* phpcs:disable -- Code does nothing at this moment -> commented
 					} elseif (in_array($links[$key]['type'], array('company', 'user'))) {
 						if ($tabpay[$obj->rowid]['type'] == 'unknown') {
 							// We can guess here it is a bank record for a thirdparty company or a user.
 							// But we won't be able to record somewhere else than into a waiting account, because there is no other journal to record the contreparty.
 						}
 					*/ // phpcs::enable
-				}
-
-				// Special case to ask later to add more request to get information for old links without company link.
-				if ($links[$key]['type'] == 'withdraw') {
-					$tabmoreinfo[$obj->rowid]['withdraw'] = 1;
-				}
+                }
 
-				if ($links[$key]['type'] == 'payment') {
-					$paymentstatic->id = $links[$key]['url_id'];
-					$paymentstatic->ref = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentstatic->getNomUrl(2, '', ''); // TODO Do not include list of invoice in tooltip, the dol_string_nohtmltag is ko with this
-					$tabpay[$obj->rowid]["paymentid"] = $paymentstatic->id;
-				} elseif ($links[$key]['type'] == 'payment_supplier') {
-					$paymentsupplierstatic->id = $links[$key]['url_id'];
-					$paymentsupplierstatic->ref = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentsupplierstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentsupplierid"] = $paymentsupplierstatic->id;
-				} elseif ($links[$key]['type'] == 'company') {
-					$societestatic->id = $links[$key]['url_id'];
-					$societestatic->name = $links[$key]['label'];
-					$societestatic->email = $tabcompany[$obj->rowid]['email'];
-					$tabpay[$obj->rowid]["soclib"] = $societestatic->getNomUrl(1, '', 30);
-					if ($compta_soc) {
-						if (empty($tabtp[$obj->rowid][$compta_soc])) {
-							$tabtp[$obj->rowid][$compta_soc] = $amounttouse;
-						} else {
-							$tabtp[$obj->rowid][$compta_soc] += $amounttouse;
-						}
-					}
-				} elseif ($links[$key]['type'] == 'user') {
-					$userstatic->id = $links[$key]['url_id'];
-					$userstatic->name = $links[$key]['label'];
-					$userstatic->email = $tabuser[$obj->rowid]['email'];
-					$userstatic->firstname = $tabuser[$obj->rowid]['firstname'];
-					$userstatic->lastname = $tabuser[$obj->rowid]['lastname'];
-					$userstatic->statut = $tabuser[$obj->rowid]['status'];
-					$userstatic->status = $tabuser[$obj->rowid]['status'];
-					$userstatic->accountancy_code = $tabuser[$obj->rowid]['accountancy_code'];
-					if ($userstatic->id > 0) {
-						$tabpay[$obj->rowid]["soclib"] = $userstatic->getNomUrl(1, 'accountancy', 0);
-					} else {
-						$tabpay[$obj->rowid]["soclib"] = '???'; // Should not happen, but happens with old data when id of user was not saved on expense report payment.
-					}
-					if ($compta_user) {
-						$tabtp[$obj->rowid][$compta_user] += $amounttouse;
-					}
-				} elseif ($links[$key]['type'] == 'sc') {
-					$chargestatic->id = $links[$key]['url_id'];
-					$chargestatic->ref = $links[$key]['url_id'];
-
-					$tabpay[$obj->rowid]["lib"] .= ' '.$chargestatic->getNomUrl(2);
-					$reg = array();
-					if (preg_match('/^\((.*)\)$/i', $links[$key]['label'], $reg)) {
-						if ($reg[1] == 'socialcontribution') {
-							$reg[1] = 'SocialContribution';
-						}
-						$chargestatic->label = $langs->trans($reg[1]);
-					} else {
-						$chargestatic->label = $links[$key]['label'];
-					}
-					$chargestatic->ref = $chargestatic->label;
-					$tabpay[$obj->rowid]["soclib"] = $chargestatic->getNomUrl(1, 30);
-					$tabpay[$obj->rowid]["paymentscid"] = $chargestatic->id;
-
-					// Retrieve the accounting code of the social contribution of the payment from link of payment.
-					// Note: We have the social contribution id, it can be faster to get accounting code from social contribution id.
-					$sqlmid = "SELECT cchgsoc.accountancy_code";
-					$sqlmid .= " FROM ".MAIN_DB_PREFIX."c_chargesociales cchgsoc";
-					$sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."chargesociales as chgsoc ON chgsoc.fk_type = cchgsoc.id";
-					$sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."paiementcharge as paycharg ON paycharg.fk_charge = chgsoc.rowid";
-					$sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."bank_url as bkurl ON bkurl.url_id=paycharg.rowid AND bkurl.type = 'payment_sc'";
-					$sqlmid .= " WHERE bkurl.fk_bank = ".((int) $obj->rowid);
-
-					dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=".$sqlmid, LOG_DEBUG);
-					$resultmid = $db->query($sqlmid);
-					if ($resultmid) {
-						$objmid = $db->fetch_object($resultmid);
-						$tabtp[$obj->rowid][$objmid->accountancy_code] += $amounttouse;
-					}
-				} elseif ($links[$key]['type'] == 'payment_donation') {
-					$paymentdonstatic->id = $links[$key]['url_id'];
-					$paymentdonstatic->ref = $links[$key]['url_id'];
-					$paymentdonstatic->fk_donation = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentdonstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentdonationid"] = $paymentdonstatic->id;
-					$tabtp[$obj->rowid][$account_pay_donation] += $amounttouse;
-				} elseif ($links[$key]['type'] == 'member') {
-					$paymentsubscriptionstatic->id = $links[$key]['url_id'];
-					$paymentsubscriptionstatic->ref = $links[$key]['url_id'];
-					$paymentsubscriptionstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentsubscriptionstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentsubscriptionid"] = $paymentsubscriptionstatic->id;
-					$paymentsubscriptionstatic->fetch($paymentsubscriptionstatic->id);
-					$tabtp[$obj->rowid][$account_pay_subscription] += $amounttouse;
-				} elseif ($links[$key]['type'] == 'payment_vat') {				// Payment VAT
-					$paymentvatstatic->id = $links[$key]['url_id'];
-					$paymentvatstatic->ref = $links[$key]['url_id'];
-					$paymentvatstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentvatstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentvatid"] = $paymentvatstatic->id;
-					$tabtp[$obj->rowid][$account_pay_vat] += $amounttouse;
-				} elseif ($links[$key]['type'] == 'payment_salary') {
-					$paymentsalstatic->id = $links[$key]['url_id'];
-					$paymentsalstatic->ref = $links[$key]['url_id'];
-					$paymentsalstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentsalstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentsalid"] = $paymentsalstatic->id;
-
-					// This part of code is no more required. it is here to solve case where a link were missing (with v14.0.0) and keep writing in accountancy complete.
-					// Note: A better way to fix this is to delete payment of salary and recreate it, or to fix the bookkeeping table manually after.
-					if (getDolGlobalString('ACCOUNTANCY_AUTOFIX_MISSING_LINK_TO_USER_ON_SALARY_BANK_PAYMENT')) {
-						$tmpsalary = new Salary($db);
-						$tmpsalary->fetch($paymentsalstatic->id);
-						$tmpsalary->fetch_user($tmpsalary->fk_user);
-
-						$userstatic->id = $tmpsalary->user->id;
-						$userstatic->name = $tmpsalary->user->name;
-						$userstatic->email = $tmpsalary->user->email;
-						$userstatic->firstname = $tmpsalary->user->firstname;
-						$userstatic->lastname = $tmpsalary->user->lastname;
-						$userstatic->statut = $tmpsalary->user->status;
-						$userstatic->accountancy_code = $tmpsalary->user->accountancy_code;
-
-						if ($userstatic->id > 0) {
-							$tabpay[$obj->rowid]["soclib"] = $userstatic->getNomUrl(1, 'accountancy', 0);
-						} else {
-							$tabpay[$obj->rowid]["soclib"] = '???'; // Should not happen
-						}
+                // Special case to ask later to add more request to get information for old links without company link.
+                if ($links[$key]['type'] == 'withdraw') {
+                    $tabmoreinfo[$obj->rowid]['withdraw'] = 1;
+                }
 
-						if (empty($obj->typeop_user)) {	// Add test to avoid to add amount twice if a link already exists also on user.
-							$compta_user = $userstatic->accountancy_code;
-							if ($compta_user) {
-								$tabtp[$obj->rowid][$compta_user] += $amounttouse;
-								$tabuser[$obj->rowid] = array(
-								'id' => $userstatic->id,
-								'name' => dolGetFirstLastname($userstatic->firstname, $userstatic->lastname),
-								'lastname' => $userstatic->lastname,
-								'firstname' => $userstatic->firstname,
-								'email' => $userstatic->email,
-								'accountancy_code' => $compta_user,
-								'status' => $userstatic->status
-								);
-							}
-						}
-					}
-				} elseif ($links[$key]['type'] == 'payment_expensereport') {
-					$paymentexpensereportstatic->id = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= $paymentexpensereportstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentexpensereport"] = $paymentexpensereportstatic->id;
-				} elseif ($links[$key]['type'] == 'payment_various') {
-					$paymentvariousstatic->id = $links[$key]['url_id'];
-					$paymentvariousstatic->ref = $links[$key]['url_id'];
-					$paymentvariousstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentvariousstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentvariousid"] = $paymentvariousstatic->id;
-					$paymentvariousstatic->fetch($paymentvariousstatic->id);
-					$account_various = (!empty($paymentvariousstatic->accountancy_code) ? $paymentvariousstatic->accountancy_code : 'NotDefined'); // NotDefined is a reserved word
-					$account_subledger = (!empty($paymentvariousstatic->subledger_account) ? $paymentvariousstatic->subledger_account : ''); // NotDefined is a reserved word
-					$tabpay[$obj->rowid]["account_various"] = $account_various;
-					$tabtp[$obj->rowid][$account_subledger] += $amounttouse;
-				} elseif ($links[$key]['type'] == 'payment_loan') {
-					$paymentloanstatic->id = $links[$key]['url_id'];
-					$paymentloanstatic->ref = $links[$key]['url_id'];
-					$paymentloanstatic->fk_loan = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentloanstatic->getNomUrl(2);
-					$tabpay[$obj->rowid]["paymentloanid"] = $paymentloanstatic->id;
-					//$tabtp[$obj->rowid][$account_pay_loan] += $amounttouse;
-					$sqlmid = 'SELECT pl.amount_capital, pl.amount_insurance, pl.amount_interest, l.accountancy_account_capital, l.accountancy_account_insurance, l.accountancy_account_interest';
-					$sqlmid .= ' FROM '.MAIN_DB_PREFIX.'payment_loan as pl, '.MAIN_DB_PREFIX.'loan as l';
-					$sqlmid .= ' WHERE l.rowid = pl.fk_loan AND pl.fk_bank = '.((int) $obj->rowid);
-
-					dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=".$sqlmid, LOG_DEBUG);
-					$resultmid = $db->query($sqlmid);
-					if ($resultmid) {
-						$objmid = $db->fetch_object($resultmid);
-						$tabtp[$obj->rowid][$objmid->accountancy_account_capital] -= $objmid->amount_capital;
-						$tabtp[$obj->rowid][$objmid->accountancy_account_insurance] -= $objmid->amount_insurance;
-						$tabtp[$obj->rowid][$objmid->accountancy_account_interest] -= $objmid->amount_interest;
-					}
-				} elseif ($links[$key]['type'] == 'banktransfert') {
-					$accountLinestatic->fetch($links[$key]['url_id']);
-					$tabpay[$obj->rowid]["lib"] .= ' '.$langs->trans("BankTransfer").'- '.$accountLinestatic ->getNomUrl(1);
-					$tabtp[$obj->rowid][$account_transfer] += $amounttouse;
-					$bankaccountstatic->fetch($tabpay[$obj->rowid]['fk_bank_account']);
-					$tabpay[$obj->rowid]["soclib"] = $bankaccountstatic->getNomUrl(2);
-				}
-			}
-		}
+                if ($links[$key]['type'] == 'payment') {
+                    $paymentstatic->id = $links[$key]['url_id'];
+                    $paymentstatic->ref = $links[$key]['url_id'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentstatic->getNomUrl(2, '', ''); // TODO Do not include list of invoice in tooltip, the dol_string_nohtmltag is ko with this
+                    $tabpay[$obj->rowid]["paymentid"] = $paymentstatic->id;
+                } elseif ($links[$key]['type'] == 'payment_supplier') {
+                    $paymentsupplierstatic->id = $links[$key]['url_id'];
+                    $paymentsupplierstatic->ref = $links[$key]['url_id'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentsupplierstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentsupplierid"] = $paymentsupplierstatic->id;
+                } elseif ($links[$key]['type'] == 'company') {
+                    $societestatic->id = $links[$key]['url_id'];
+                    $societestatic->name = $links[$key]['label'];
+                    $societestatic->email = $tabcompany[$obj->rowid]['email'];
+                    $tabpay[$obj->rowid]["soclib"] = $societestatic->getNomUrl(1, '', 30);
+                    if ($compta_soc) {
+                        if (empty($tabtp[$obj->rowid][$compta_soc])) {
+                            $tabtp[$obj->rowid][$compta_soc] = $amounttouse;
+                        } else {
+                            $tabtp[$obj->rowid][$compta_soc] += $amounttouse;
+                        }
+                    }
+                } elseif ($links[$key]['type'] == 'user') {
+                    $userstatic->id = $links[$key]['url_id'];
+                    $userstatic->name = $links[$key]['label'];
+                    $userstatic->email = $tabuser[$obj->rowid]['email'];
+                    $userstatic->firstname = $tabuser[$obj->rowid]['firstname'];
+                    $userstatic->lastname = $tabuser[$obj->rowid]['lastname'];
+                    $userstatic->statut = $tabuser[$obj->rowid]['status'];
+                    $userstatic->status = $tabuser[$obj->rowid]['status'];
+                    $userstatic->accountancy_code = $tabuser[$obj->rowid]['accountancy_code'];
+                    if ($userstatic->id > 0) {
+                        $tabpay[$obj->rowid]["soclib"] = $userstatic->getNomUrl(1, 'accountancy', 0);
+                    } else {
+                        $tabpay[$obj->rowid]["soclib"] = '???'; // Should not happen, but happens with old data when id of user was not saved on expense report payment.
+                    }
+                    if ($compta_user) {
+                        $tabtp[$obj->rowid][$compta_user] += $amounttouse;
+                    }
+                } elseif ($links[$key]['type'] == 'sc') {
+                    $chargestatic->id = $links[$key]['url_id'];
+                    $chargestatic->ref = $links[$key]['url_id'];
+
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$chargestatic->getNomUrl(2);
+                    $reg = array();
+                    if (preg_match('/^\((.*)\)$/i', $links[$key]['label'], $reg)) {
+                        if ($reg[1] == 'socialcontribution') {
+                            $reg[1] = 'SocialContribution';
+                        }
+                        $chargestatic->label = $langs->trans($reg[1]);
+                    } else {
+                        $chargestatic->label = $links[$key]['label'];
+                    }
+                    $chargestatic->ref = $chargestatic->label;
+                    $tabpay[$obj->rowid]["soclib"] = $chargestatic->getNomUrl(1, 30);
+                    $tabpay[$obj->rowid]["paymentscid"] = $chargestatic->id;
+
+                    // Retrieve the accounting code of the social contribution of the payment from link of payment.
+                    // Note: We have the social contribution id, it can be faster to get accounting code from social contribution id.
+                    $sqlmid = "SELECT cchgsoc.accountancy_code";
+                    $sqlmid .= " FROM ".MAIN_DB_PREFIX."c_chargesociales cchgsoc";
+                    $sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."chargesociales as chgsoc ON chgsoc.fk_type = cchgsoc.id";
+                    $sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."paiementcharge as paycharg ON paycharg.fk_charge = chgsoc.rowid";
+                    $sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."bank_url as bkurl ON bkurl.url_id=paycharg.rowid AND bkurl.type = 'payment_sc'";
+                    $sqlmid .= " WHERE bkurl.fk_bank = ".((int) $obj->rowid);
+
+                    dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=".$sqlmid, LOG_DEBUG);
+                    $resultmid = $db->query($sqlmid);
+                    if ($resultmid) {
+                        $objmid = $db->fetch_object($resultmid);
+                        $tabtp[$obj->rowid][$objmid->accountancy_code] += $amounttouse;
+                    }
+                } elseif ($links[$key]['type'] == 'payment_donation') {
+                    $paymentdonstatic->id = $links[$key]['url_id'];
+                    $paymentdonstatic->ref = $links[$key]['url_id'];
+                    $paymentdonstatic->fk_donation = $links[$key]['url_id'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentdonstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentdonationid"] = $paymentdonstatic->id;
+                    $tabtp[$obj->rowid][$account_pay_donation] += $amounttouse;
+                } elseif ($links[$key]['type'] == 'member') {
+                    $paymentsubscriptionstatic->id = $links[$key]['url_id'];
+                    $paymentsubscriptionstatic->ref = $links[$key]['url_id'];
+                    $paymentsubscriptionstatic->label = $links[$key]['label'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentsubscriptionstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentsubscriptionid"] = $paymentsubscriptionstatic->id;
+                    $paymentsubscriptionstatic->fetch($paymentsubscriptionstatic->id);
+                    $tabtp[$obj->rowid][$account_pay_subscription] += $amounttouse;
+                } elseif ($links[$key]['type'] == 'payment_vat') {				// Payment VAT
+                    $paymentvatstatic->id = $links[$key]['url_id'];
+                    $paymentvatstatic->ref = $links[$key]['url_id'];
+                    $paymentvatstatic->label = $links[$key]['label'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentvatstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentvatid"] = $paymentvatstatic->id;
+                    $tabtp[$obj->rowid][$account_pay_vat] += $amounttouse;
+                } elseif ($links[$key]['type'] == 'payment_salary') {
+                    $paymentsalstatic->id = $links[$key]['url_id'];
+                    $paymentsalstatic->ref = $links[$key]['url_id'];
+                    $paymentsalstatic->label = $links[$key]['label'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentsalstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentsalid"] = $paymentsalstatic->id;
+
+                    // This part of code is no more required. it is here to solve case where a link were missing (with v14.0.0) and keep writing in accountancy complete.
+                    // Note: A better way to fix this is to delete payment of salary and recreate it, or to fix the bookkeeping table manually after.
+                    if (getDolGlobalString('ACCOUNTANCY_AUTOFIX_MISSING_LINK_TO_USER_ON_SALARY_BANK_PAYMENT')) {
+                        $tmpsalary = new Salary($db);
+                        $tmpsalary->fetch($paymentsalstatic->id);
+                        $tmpsalary->fetch_user($tmpsalary->fk_user);
+
+                        $userstatic->id = $tmpsalary->user->id;
+                        $userstatic->name = $tmpsalary->user->name;
+                        $userstatic->email = $tmpsalary->user->email;
+                        $userstatic->firstname = $tmpsalary->user->firstname;
+                        $userstatic->lastname = $tmpsalary->user->lastname;
+                        $userstatic->statut = $tmpsalary->user->status;
+                        $userstatic->accountancy_code = $tmpsalary->user->accountancy_code;
+
+                        if ($userstatic->id > 0) {
+                            $tabpay[$obj->rowid]["soclib"] = $userstatic->getNomUrl(1, 'accountancy', 0);
+                        } else {
+                            $tabpay[$obj->rowid]["soclib"] = '???'; // Should not happen
+                        }
+
+                        if (empty($obj->typeop_user)) {	// Add test to avoid to add amount twice if a link already exists also on user.
+                            $compta_user = $userstatic->accountancy_code;
+                            if ($compta_user) {
+                                $tabtp[$obj->rowid][$compta_user] += $amounttouse;
+                                $tabuser[$obj->rowid] = array(
+                                'id' => $userstatic->id,
+                                'name' => dolGetFirstLastname($userstatic->firstname, $userstatic->lastname),
+                                'lastname' => $userstatic->lastname,
+                                'firstname' => $userstatic->firstname,
+                                'email' => $userstatic->email,
+                                'accountancy_code' => $compta_user,
+                                'status' => $userstatic->status
+                                );
+                            }
+                        }
+                    }
+                } elseif ($links[$key]['type'] == 'payment_expensereport') {
+                    $paymentexpensereportstatic->id = $links[$key]['url_id'];
+                    $tabpay[$obj->rowid]["lib"] .= $paymentexpensereportstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentexpensereport"] = $paymentexpensereportstatic->id;
+                } elseif ($links[$key]['type'] == 'payment_various') {
+                    $paymentvariousstatic->id = $links[$key]['url_id'];
+                    $paymentvariousstatic->ref = $links[$key]['url_id'];
+                    $paymentvariousstatic->label = $links[$key]['label'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentvariousstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentvariousid"] = $paymentvariousstatic->id;
+                    $paymentvariousstatic->fetch($paymentvariousstatic->id);
+                    $account_various = (!empty($paymentvariousstatic->accountancy_code) ? $paymentvariousstatic->accountancy_code : 'NotDefined'); // NotDefined is a reserved word
+                    $account_subledger = (!empty($paymentvariousstatic->subledger_account) ? $paymentvariousstatic->subledger_account : ''); // NotDefined is a reserved word
+                    $tabpay[$obj->rowid]["account_various"] = $account_various;
+                    $tabtp[$obj->rowid][$account_subledger] += $amounttouse;
+                } elseif ($links[$key]['type'] == 'payment_loan') {
+                    $paymentloanstatic->id = $links[$key]['url_id'];
+                    $paymentloanstatic->ref = $links[$key]['url_id'];
+                    $paymentloanstatic->fk_loan = $links[$key]['url_id'];
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$paymentloanstatic->getNomUrl(2);
+                    $tabpay[$obj->rowid]["paymentloanid"] = $paymentloanstatic->id;
+                    //$tabtp[$obj->rowid][$account_pay_loan] += $amounttouse;
+                    $sqlmid = 'SELECT pl.amount_capital, pl.amount_insurance, pl.amount_interest, l.accountancy_account_capital, l.accountancy_account_insurance, l.accountancy_account_interest';
+                    $sqlmid .= ' FROM '.MAIN_DB_PREFIX.'payment_loan as pl, '.MAIN_DB_PREFIX.'loan as l';
+                    $sqlmid .= ' WHERE l.rowid = pl.fk_loan AND pl.fk_bank = '.((int) $obj->rowid);
+
+                    dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=".$sqlmid, LOG_DEBUG);
+                    $resultmid = $db->query($sqlmid);
+                    if ($resultmid) {
+                        $objmid = $db->fetch_object($resultmid);
+                        $tabtp[$obj->rowid][$objmid->accountancy_account_capital] -= $objmid->amount_capital;
+                        $tabtp[$obj->rowid][$objmid->accountancy_account_insurance] -= $objmid->amount_insurance;
+                        $tabtp[$obj->rowid][$objmid->accountancy_account_interest] -= $objmid->amount_interest;
+                    }
+                } elseif ($links[$key]['type'] == 'banktransfert') {
+                    $accountLinestatic->fetch($links[$key]['url_id']);
+                    $tabpay[$obj->rowid]["lib"] .= ' '.$langs->trans("BankTransfer").'- '.$accountLinestatic ->getNomUrl(1);
+                    $tabtp[$obj->rowid][$account_transfer] += $amounttouse;
+                    $bankaccountstatic->fetch($tabpay[$obj->rowid]['fk_bank_account']);
+                    $tabpay[$obj->rowid]["soclib"] = $bankaccountstatic->getNomUrl(2);
+                }
+            }
+        }
 
-		if (empty($tabbq[$obj->rowid][$compta_bank])) {
-			$tabbq[$obj->rowid][$compta_bank] = $amounttouse;
-		} else {
-			$tabbq[$obj->rowid][$compta_bank] += $amounttouse;
-		}
+        if (empty($tabbq[$obj->rowid][$compta_bank])) {
+            $tabbq[$obj->rowid][$compta_bank] = $amounttouse;
+        } else {
+            $tabbq[$obj->rowid][$compta_bank] += $amounttouse;
+        }
 
-		// If no links were found to know the amount on thirdparty, we try to guess it.
-		// This may happens on bank entries without the links lines to 'company'.
-		if (empty($tabtp[$obj->rowid]) && !empty($tabmoreinfo[$obj->rowid]['withdraw'])) {	// If we don't find 'company' link because it is an old 'withdraw' record
-			foreach ($links as $key => $val) {
-				if ($links[$key]['type'] == 'payment') {
-					// Get thirdparty
-					$tmppayment->fetch($links[$key]['url_id']);
-					$arrayofamounts = $tmppayment->getAmountsArray();
-					if (is_array($arrayofamounts)) {
-						foreach ($arrayofamounts as $invoiceid => $amount) {
-							$tmpinvoice->fetch($invoiceid);
-							$tmpinvoice->fetch_thirdparty();
-							if ($tmpinvoice->thirdparty->code_compta_client) {
-								$tabtp[$obj->rowid][$tmpinvoice->thirdparty->code_compta_client] += $amount;
-							}
-						}
-					}
-				}
-			}
-		}
+        // If no links were found to know the amount on thirdparty, we try to guess it.
+        // This may happens on bank entries without the links lines to 'company'.
+        if (empty($tabtp[$obj->rowid]) && !empty($tabmoreinfo[$obj->rowid]['withdraw'])) {	// If we don't find 'company' link because it is an old 'withdraw' record
+            foreach ($links as $key => $val) {
+                if ($links[$key]['type'] == 'payment') {
+                    // Get thirdparty
+                    $tmppayment->fetch($links[$key]['url_id']);
+                    $arrayofamounts = $tmppayment->getAmountsArray();
+                    if (is_array($arrayofamounts)) {
+                        foreach ($arrayofamounts as $invoiceid => $amount) {
+                            $tmpinvoice->fetch($invoiceid);
+                            $tmpinvoice->fetch_thirdparty();
+                            if ($tmpinvoice->thirdparty->code_compta_client) {
+                                $tabtp[$obj->rowid][$tmpinvoice->thirdparty->code_compta_client] += $amount;
+                            }
+                        }
+                    }
+                }
+            }
+        }
 
-		// If no links were found to know the amount on thirdparty/user, we init it to account 'NotDefined'.
-		if (empty($tabtp[$obj->rowid])) {
-			$tabtp[$obj->rowid]['NotDefined'] = $tabbq[$obj->rowid][$compta_bank];
-		}
+        // If no links were found to know the amount on thirdparty/user, we init it to account 'NotDefined'.
+        if (empty($tabtp[$obj->rowid])) {
+            $tabtp[$obj->rowid]['NotDefined'] = $tabbq[$obj->rowid][$compta_bank];
+        }
 
-		// Check account number is ok
-		/*if ($action == 'writebookkeeping')		// Make test now in such a case
+        // Check account number is ok
+        /*if ($action == 'writebookkeeping')		// Make test now in such a case
 		{
 			reset($tabbq[$obj->rowid]);
 			$first_key_tabbq = key($tabbq[$obj->rowid]);
@@ -599,12 +599,12 @@ 
 			}
 		}*/
 
-		// if($obj->socid)$tabtp[$obj->rowid][$compta_soc] += $amounttouse;
+        // if($obj->socid)$tabtp[$obj->rowid][$compta_soc] += $amounttouse;
 
-		$i++;
-	}
+        $i++;
+    }
 } else {
-	dol_print_error($db);
+    dol_print_error($db);
 }
 
 
@@ -616,445 +616,445 @@ 
 
 // Write bookkeeping
 if (!$error && $action == 'writebookkeeping') {
-	$now = dol_now();
-
-	$accountingaccountcustomer = new AccountingAccount($db);
-	$accountingaccountcustomer->fetch(null, getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER'), true);
-
-	$accountingaccountsupplier = new AccountingAccount($db);
-	$accountingaccountsupplier->fetch(null, getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER'), true);
-
-	$accountingaccountpayment = new AccountingAccount($db);
-	$accountingaccountpayment->fetch(null, getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT'), true);
-
-	$accountingaccountsuspense = new AccountingAccount($db);
-	$accountingaccountsuspense->fetch(null, getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'), true);
-
-	$error = 0;
-	foreach ($tabpay as $key => $val) {		// $key is rowid into llx_bank
-		$date = dol_print_date($val["date"], 'day');
-
-		$ref = getSourceDocRef($val, $tabtype[$key]);
-
-		$errorforline = 0;
-
-		$totalcredit = 0;
-		$totaldebit = 0;
-
-		$db->begin();
-
-		// Introduce a protection. Total of tabtp must be total of tabbq
-		//var_dump($tabpay);
-		//var_dump($tabtp);
-		//var_dump($tabbq);exit;
-
-		// Bank
-		if (!$errorforline && is_array($tabbq[$key])) {
-			// Line into bank account
-			foreach ($tabbq[$key] as $k => $mt) {
-				if ($mt) {
-					$accountingaccount->fetch(null, $k, true);	// $k is accounting bank account. TODO We should use a cache here to avoid this fetch
-					$account_label = $accountingaccount->label;
-
-					$reflabel = '';
-					if (!empty($val['lib'])) {
-						$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
-					}
-					$reflabel .= $langs->trans("Bank").' '.dol_string_nohtmltag($val['bank_account_ref']);
-					if (!empty($val['soclib'])) {
-						$reflabel .= " - ".dol_string_nohtmltag($val['soclib']);
-					}
-
-					$bookkeeping = new BookKeeping($db);
-					$bookkeeping->doc_date = $val["date"];
-					$bookkeeping->doc_ref = $ref;
-					$bookkeeping->doc_type = 'bank';
-					$bookkeeping->fk_doc = $key;
-					$bookkeeping->fk_docdet = $val["fk_bank"];
-
-					$bookkeeping->numero_compte = $k;
-					$bookkeeping->label_compte = $account_label;
-
-					$bookkeeping->label_operation = $reflabel;
-					$bookkeeping->montant = $mt;
-					$bookkeeping->sens = ($mt >= 0) ? 'D' : 'C';
-					$bookkeeping->debit = ($mt >= 0 ? $mt : 0);
-					$bookkeeping->credit = ($mt < 0 ? -$mt : 0);
-					$bookkeeping->code_journal = $journal;
-					$bookkeeping->journal_label = $langs->transnoentities($journal_label);
-					$bookkeeping->fk_user_author = $user->id;
-					$bookkeeping->date_creation = $now;
-
-					// No subledger_account value for the bank line but add a specific label_operation
-					$bookkeeping->subledger_account = '';
-					$bookkeeping->label_operation = $reflabel;
-					$bookkeeping->entity = $conf->entity;
-
-					$totaldebit += $bookkeeping->debit;
-					$totalcredit += $bookkeeping->credit;
-
-					$result = $bookkeeping->create($user);
-					if ($result < 0) {
-						if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
-							$error++;
-							$errorforline++;
-							setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
-						} else {
-							$error++;
-							$errorforline++;
-							setEventMessages($bookkeeping->error, $bookkeeping->errors, 'errors');
-						}
-					}
-				}
-			}
-		}
-
-		// Third party
-		if (!$errorforline) {
-			if (is_array($tabtp[$key])) {
-				// Line into thirdparty account
-				foreach ($tabtp[$key] as $k => $mt) {
-					if ($mt) {
-						$lettering = false;
-
-						$reflabel = '';
-						if (!empty($val['lib'])) {
-							$reflabel .= dol_string_nohtmltag($val['lib']).($val['soclib'] ? " - " : "");
-						}
-						if ($tabtype[$key] == 'banktransfert') {
-							$reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount').' '.$account_transfer);
-						} else {
-							$reflabel .= dol_string_nohtmltag($val['soclib']);
-						}
+    $now = dol_now();
+
+    $accountingaccountcustomer = new AccountingAccount($db);
+    $accountingaccountcustomer->fetch(null, getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER'), true);
+
+    $accountingaccountsupplier = new AccountingAccount($db);
+    $accountingaccountsupplier->fetch(null, getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER'), true);
+
+    $accountingaccountpayment = new AccountingAccount($db);
+    $accountingaccountpayment->fetch(null, getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT'), true);
+
+    $accountingaccountsuspense = new AccountingAccount($db);
+    $accountingaccountsuspense->fetch(null, getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'), true);
+
+    $error = 0;
+    foreach ($tabpay as $key => $val) {		// $key is rowid into llx_bank
+        $date = dol_print_date($val["date"], 'day');
+
+        $ref = getSourceDocRef($val, $tabtype[$key]);
+
+        $errorforline = 0;
+
+        $totalcredit = 0;
+        $totaldebit = 0;
+
+        $db->begin();
+
+        // Introduce a protection. Total of tabtp must be total of tabbq
+        //var_dump($tabpay);
+        //var_dump($tabtp);
+        //var_dump($tabbq);exit;
+
+        // Bank
+        if (!$errorforline && is_array($tabbq[$key])) {
+            // Line into bank account
+            foreach ($tabbq[$key] as $k => $mt) {
+                if ($mt) {
+                    $accountingaccount->fetch(null, $k, true);	// $k is accounting bank account. TODO We should use a cache here to avoid this fetch
+                    $account_label = $accountingaccount->label;
+
+                    $reflabel = '';
+                    if (!empty($val['lib'])) {
+                        $reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+                    }
+                    $reflabel .= $langs->trans("Bank").' '.dol_string_nohtmltag($val['bank_account_ref']);
+                    if (!empty($val['soclib'])) {
+                        $reflabel .= " - ".dol_string_nohtmltag($val['soclib']);
+                    }
+
+                    $bookkeeping = new BookKeeping($db);
+                    $bookkeeping->doc_date = $val["date"];
+                    $bookkeeping->doc_ref = $ref;
+                    $bookkeeping->doc_type = 'bank';
+                    $bookkeeping->fk_doc = $key;
+                    $bookkeeping->fk_docdet = $val["fk_bank"];
+
+                    $bookkeeping->numero_compte = $k;
+                    $bookkeeping->label_compte = $account_label;
+
+                    $bookkeeping->label_operation = $reflabel;
+                    $bookkeeping->montant = $mt;
+                    $bookkeeping->sens = ($mt >= 0) ? 'D' : 'C';
+                    $bookkeeping->debit = ($mt >= 0 ? $mt : 0);
+                    $bookkeeping->credit = ($mt < 0 ? -$mt : 0);
+                    $bookkeeping->code_journal = $journal;
+                    $bookkeeping->journal_label = $langs->transnoentities($journal_label);
+                    $bookkeeping->fk_user_author = $user->id;
+                    $bookkeeping->date_creation = $now;
+
+                    // No subledger_account value for the bank line but add a specific label_operation
+                    $bookkeeping->subledger_account = '';
+                    $bookkeeping->label_operation = $reflabel;
+                    $bookkeeping->entity = $conf->entity;
+
+                    $totaldebit += $bookkeeping->debit;
+                    $totalcredit += $bookkeeping->credit;
+
+                    $result = $bookkeeping->create($user);
+                    if ($result < 0) {
+                        if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
+                            $error++;
+                            $errorforline++;
+                            setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
+                        } else {
+                            $error++;
+                            $errorforline++;
+                            setEventMessages($bookkeeping->error, $bookkeeping->errors, 'errors');
+                        }
+                    }
+                }
+            }
+        }
 
-						$bookkeeping = new BookKeeping($db);
-						$bookkeeping->doc_date = $val["date"];
-						$bookkeeping->doc_ref = $ref;
-						$bookkeeping->doc_type = 'bank';
-						$bookkeeping->fk_doc = $key;
-						$bookkeeping->fk_docdet = $val["fk_bank"];
-
-						$bookkeeping->label_operation = $reflabel;
-						$bookkeeping->montant = $mt;
-						$bookkeeping->sens = ($mt < 0) ? 'D' : 'C';
-						$bookkeeping->debit = ($mt < 0 ? -$mt : 0);
-						$bookkeeping->credit = ($mt >= 0) ? $mt : 0;
-						$bookkeeping->code_journal = $journal;
-						$bookkeeping->journal_label = $langs->transnoentities($journal_label);
-						$bookkeeping->fk_user_author = $user->id;
-						$bookkeeping->date_creation = $now;
-
-						if ($tabtype[$key] == 'payment') {	// If payment is payment of customer invoice, we get ref of invoice
-							$lettering = true;
-							$bookkeeping->subledger_account = $k; // For payment, the subledger account is stored as $key of $tabtp
-							$bookkeeping->subledger_label = $tabcompany[$key]['name']; // $tabcompany is defined only if we are sure there is 1 thirdparty for the bank transaction
-							$bookkeeping->numero_compte = getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER');
-							$bookkeeping->label_compte = $accountingaccountcustomer->label;
-						} elseif ($tabtype[$key] == 'payment_supplier') {	// If payment is payment of supplier invoice, we get ref of invoice
-							$lettering = true;
-							$bookkeeping->subledger_account = $k; // For payment, the subledger account is stored as $key of $tabtp
-							$bookkeeping->subledger_label = $tabcompany[$key]['name']; // $tabcompany is defined only if we are sure there is 1 thirdparty for the bank transaction
-							$bookkeeping->numero_compte = getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER');
-							$bookkeeping->label_compte = $accountingaccountsupplier->label;
-						} elseif ($tabtype[$key] == 'payment_expensereport') {
-							$bookkeeping->subledger_account = $tabuser[$key]['accountancy_code'];
-							$bookkeeping->subledger_label = $tabuser[$key]['name'];
-							$bookkeeping->numero_compte = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
-							$bookkeeping->label_compte = $accountingaccountpayment->label;
-						} elseif ($tabtype[$key] == 'payment_salary') {
-							$bookkeeping->subledger_account = $tabuser[$key]['accountancy_code'];
-							$bookkeeping->subledger_label = $tabuser[$key]['name'];
-							$bookkeeping->numero_compte = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
-							$bookkeeping->label_compte = $accountingaccountpayment->label;
-						} elseif (in_array($tabtype[$key], array('sc', 'payment_sc'))) {   // If payment is payment of social contribution
-							$bookkeeping->subledger_account = '';
-							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);	// TODO Use a cache
-							$bookkeeping->numero_compte = $k;
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} elseif ($tabtype[$key] == 'payment_vat') {
-							$bookkeeping->subledger_account = '';
-							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
-							$bookkeeping->numero_compte = $k;
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} elseif ($tabtype[$key] == 'payment_donation') {
-							$bookkeeping->subledger_account = '';
-							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
-							$bookkeeping->numero_compte = $k;
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} elseif ($tabtype[$key] == 'member') {
-							$bookkeeping->subledger_account = '';
-							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
-							$bookkeeping->numero_compte = $k;
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} elseif ($tabtype[$key] == 'payment_loan') {
-							$bookkeeping->subledger_account = '';
-							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
-							$bookkeeping->numero_compte = $k;
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} elseif ($tabtype[$key] == 'payment_various') {
-							$bookkeeping->subledger_account = $k;
-							$bookkeeping->subledger_label = $tabcompany[$key]['name'];
-							$accountingaccount->fetch(null, $tabpay[$key]["account_various"], true);	// TODO Use a cache
-							$bookkeeping->numero_compte = $tabpay[$key]["account_various"];
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} elseif ($tabtype[$key] == 'banktransfert') {
-							$bookkeeping->subledger_account = '';
-							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
-							$bookkeeping->numero_compte = $k;
-							$bookkeeping->label_compte = $accountingaccount->label;
-						} else {
-							if ($tabtype[$key] == 'unknown') {	// Unknown transaction, we will use a waiting account for thirdparty.
-								// Temporary account
-								$bookkeeping->subledger_account = '';
-								$bookkeeping->subledger_label = '';
-								$bookkeeping->numero_compte = getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE');
-								$bookkeeping->label_compte = $accountingaccountsuspense->label;
-							}
-						}
-						$bookkeeping->label_operation = $reflabel;
-						$bookkeeping->entity = $conf->entity;
-
-						$totaldebit += $bookkeeping->debit;
-						$totalcredit += $bookkeeping->credit;
-
-						$result = $bookkeeping->create($user);
-						if ($result < 0) {
-							if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
-								$error++;
-								$errorforline++;
-								setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
-							} else {
-								$error++;
-								$errorforline++;
-								setEventMessages($bookkeeping->error, $bookkeeping->errors, 'errors');
-							}
-						} else {
-							if ($lettering && getDolGlobalInt('ACCOUNTING_ENABLE_LETTERING') && getDolGlobalInt('ACCOUNTING_ENABLE_AUTOLETTERING')) {
-								require_once DOL_DOCUMENT_ROOT . '/accountancy/class/lettering.class.php';
-								$lettering_static = new Lettering($db);
-								$nb_lettering = $lettering_static->bookkeepingLetteringAll(array($bookkeeping->id));
-							}
-						}
-					}
-				}
-			} else {	// If thirdparty unknown, output the waiting account
-				foreach ($tabbq[$key] as $k => $mt) {
-					if ($mt) {
-						$reflabel = '';
-						if (!empty($val['lib'])) {
-							$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
-						}
-						$reflabel .= dol_string_nohtmltag('WaitingAccount');
-
-						$bookkeeping = new BookKeeping($db);
-						$bookkeeping->doc_date = $val["date"];
-						$bookkeeping->doc_ref = $ref;
-						$bookkeeping->doc_type = 'bank';
-						$bookkeeping->fk_doc = $key;
-						$bookkeeping->fk_docdet = $val["fk_bank"];
-						$bookkeeping->montant = $mt;
-						$bookkeeping->sens = ($mt < 0) ? 'D' : 'C';
-						$bookkeeping->debit = ($mt < 0 ? -$mt : 0);
-						$bookkeeping->credit = ($mt >= 0) ? $mt : 0;
-						$bookkeeping->code_journal = $journal;
-						$bookkeeping->journal_label = $langs->transnoentities($journal_label);
-						$bookkeeping->fk_user_author = $user->id;
-						$bookkeeping->date_creation = $now;
-						$bookkeeping->label_compte = '';
-						$bookkeeping->label_operation = $reflabel;
-						$bookkeeping->entity = $conf->entity;
-
-						$totaldebit += $bookkeeping->debit;
-						$totalcredit += $bookkeeping->credit;
-
-						$result = $bookkeeping->create($user);
-
-						if ($result < 0) {
-							if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
-								$error++;
-								$errorforline++;
-								setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
-							} else {
-								$error++;
-								$errorforline++;
-								setEventMessages($bookkeeping->error, $bookkeeping->errors, 'errors');
-							}
-						}
-					}
-				}
-			}
-		}
+        // Third party
+        if (!$errorforline) {
+            if (is_array($tabtp[$key])) {
+                // Line into thirdparty account
+                foreach ($tabtp[$key] as $k => $mt) {
+                    if ($mt) {
+                        $lettering = false;
+
+                        $reflabel = '';
+                        if (!empty($val['lib'])) {
+                            $reflabel .= dol_string_nohtmltag($val['lib']).($val['soclib'] ? " - " : "");
+                        }
+                        if ($tabtype[$key] == 'banktransfert') {
+                            $reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount').' '.$account_transfer);
+                        } else {
+                            $reflabel .= dol_string_nohtmltag($val['soclib']);
+                        }
+
+                        $bookkeeping = new BookKeeping($db);
+                        $bookkeeping->doc_date = $val["date"];
+                        $bookkeeping->doc_ref = $ref;
+                        $bookkeeping->doc_type = 'bank';
+                        $bookkeeping->fk_doc = $key;
+                        $bookkeeping->fk_docdet = $val["fk_bank"];
+
+                        $bookkeeping->label_operation = $reflabel;
+                        $bookkeeping->montant = $mt;
+                        $bookkeeping->sens = ($mt < 0) ? 'D' : 'C';
+                        $bookkeeping->debit = ($mt < 0 ? -$mt : 0);
+                        $bookkeeping->credit = ($mt >= 0) ? $mt : 0;
+                        $bookkeeping->code_journal = $journal;
+                        $bookkeeping->journal_label = $langs->transnoentities($journal_label);
+                        $bookkeeping->fk_user_author = $user->id;
+                        $bookkeeping->date_creation = $now;
+
+                        if ($tabtype[$key] == 'payment') {	// If payment is payment of customer invoice, we get ref of invoice
+                            $lettering = true;
+                            $bookkeeping->subledger_account = $k; // For payment, the subledger account is stored as $key of $tabtp
+                            $bookkeeping->subledger_label = $tabcompany[$key]['name']; // $tabcompany is defined only if we are sure there is 1 thirdparty for the bank transaction
+                            $bookkeeping->numero_compte = getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER');
+                            $bookkeeping->label_compte = $accountingaccountcustomer->label;
+                        } elseif ($tabtype[$key] == 'payment_supplier') {	// If payment is payment of supplier invoice, we get ref of invoice
+                            $lettering = true;
+                            $bookkeeping->subledger_account = $k; // For payment, the subledger account is stored as $key of $tabtp
+                            $bookkeeping->subledger_label = $tabcompany[$key]['name']; // $tabcompany is defined only if we are sure there is 1 thirdparty for the bank transaction
+                            $bookkeeping->numero_compte = getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER');
+                            $bookkeeping->label_compte = $accountingaccountsupplier->label;
+                        } elseif ($tabtype[$key] == 'payment_expensereport') {
+                            $bookkeeping->subledger_account = $tabuser[$key]['accountancy_code'];
+                            $bookkeeping->subledger_label = $tabuser[$key]['name'];
+                            $bookkeeping->numero_compte = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
+                            $bookkeeping->label_compte = $accountingaccountpayment->label;
+                        } elseif ($tabtype[$key] == 'payment_salary') {
+                            $bookkeeping->subledger_account = $tabuser[$key]['accountancy_code'];
+                            $bookkeeping->subledger_label = $tabuser[$key]['name'];
+                            $bookkeeping->numero_compte = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
+                            $bookkeeping->label_compte = $accountingaccountpayment->label;
+                        } elseif (in_array($tabtype[$key], array('sc', 'payment_sc'))) {   // If payment is payment of social contribution
+                            $bookkeeping->subledger_account = '';
+                            $bookkeeping->subledger_label = '';
+                            $accountingaccount->fetch(null, $k, true);	// TODO Use a cache
+                            $bookkeeping->numero_compte = $k;
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } elseif ($tabtype[$key] == 'payment_vat') {
+                            $bookkeeping->subledger_account = '';
+                            $bookkeeping->subledger_label = '';
+                            $accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+                            $bookkeeping->numero_compte = $k;
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } elseif ($tabtype[$key] == 'payment_donation') {
+                            $bookkeeping->subledger_account = '';
+                            $bookkeeping->subledger_label = '';
+                            $accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+                            $bookkeeping->numero_compte = $k;
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } elseif ($tabtype[$key] == 'member') {
+                            $bookkeeping->subledger_account = '';
+                            $bookkeeping->subledger_label = '';
+                            $accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+                            $bookkeeping->numero_compte = $k;
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } elseif ($tabtype[$key] == 'payment_loan') {
+                            $bookkeeping->subledger_account = '';
+                            $bookkeeping->subledger_label = '';
+                            $accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+                            $bookkeeping->numero_compte = $k;
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } elseif ($tabtype[$key] == 'payment_various') {
+                            $bookkeeping->subledger_account = $k;
+                            $bookkeeping->subledger_label = $tabcompany[$key]['name'];
+                            $accountingaccount->fetch(null, $tabpay[$key]["account_various"], true);	// TODO Use a cache
+                            $bookkeeping->numero_compte = $tabpay[$key]["account_various"];
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } elseif ($tabtype[$key] == 'banktransfert') {
+                            $bookkeeping->subledger_account = '';
+                            $bookkeeping->subledger_label = '';
+                            $accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+                            $bookkeeping->numero_compte = $k;
+                            $bookkeeping->label_compte = $accountingaccount->label;
+                        } else {
+                            if ($tabtype[$key] == 'unknown') {	// Unknown transaction, we will use a waiting account for thirdparty.
+                                // Temporary account
+                                $bookkeeping->subledger_account = '';
+                                $bookkeeping->subledger_label = '';
+                                $bookkeeping->numero_compte = getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE');
+                                $bookkeeping->label_compte = $accountingaccountsuspense->label;
+                            }
+                        }
+                        $bookkeeping->label_operation = $reflabel;
+                        $bookkeeping->entity = $conf->entity;
+
+                        $totaldebit += $bookkeeping->debit;
+                        $totalcredit += $bookkeeping->credit;
+
+                        $result = $bookkeeping->create($user);
+                        if ($result < 0) {
+                            if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
+                                $error++;
+                                $errorforline++;
+                                setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
+                            } else {
+                                $error++;
+                                $errorforline++;
+                                setEventMessages($bookkeeping->error, $bookkeeping->errors, 'errors');
+                            }
+                        } else {
+                            if ($lettering && getDolGlobalInt('ACCOUNTING_ENABLE_LETTERING') && getDolGlobalInt('ACCOUNTING_ENABLE_AUTOLETTERING')) {
+                                require_once DOL_DOCUMENT_ROOT . '/accountancy/class/lettering.class.php';
+                                $lettering_static = new Lettering($db);
+                                $nb_lettering = $lettering_static->bookkeepingLetteringAll(array($bookkeeping->id));
+                            }
+                        }
+                    }
+                }
+            } else {	// If thirdparty unknown, output the waiting account
+                foreach ($tabbq[$key] as $k => $mt) {
+                    if ($mt) {
+                        $reflabel = '';
+                        if (!empty($val['lib'])) {
+                            $reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+                        }
+                        $reflabel .= dol_string_nohtmltag('WaitingAccount');
+
+                        $bookkeeping = new BookKeeping($db);
+                        $bookkeeping->doc_date = $val["date"];
+                        $bookkeeping->doc_ref = $ref;
+                        $bookkeeping->doc_type = 'bank';
+                        $bookkeeping->fk_doc = $key;
+                        $bookkeeping->fk_docdet = $val["fk_bank"];
+                        $bookkeeping->montant = $mt;
+                        $bookkeeping->sens = ($mt < 0) ? 'D' : 'C';
+                        $bookkeeping->debit = ($mt < 0 ? -$mt : 0);
+                        $bookkeeping->credit = ($mt >= 0) ? $mt : 0;
+                        $bookkeeping->code_journal = $journal;
+                        $bookkeeping->journal_label = $langs->transnoentities($journal_label);
+                        $bookkeeping->fk_user_author = $user->id;
+                        $bookkeeping->date_creation = $now;
+                        $bookkeeping->label_compte = '';
+                        $bookkeeping->label_operation = $reflabel;
+                        $bookkeeping->entity = $conf->entity;
+
+                        $totaldebit += $bookkeeping->debit;
+                        $totalcredit += $bookkeeping->credit;
+
+                        $result = $bookkeeping->create($user);
+
+                        if ($result < 0) {
+                            if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
+                                $error++;
+                                $errorforline++;
+                                setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
+                            } else {
+                                $error++;
+                                $errorforline++;
+                                setEventMessages($bookkeeping->error, $bookkeeping->errors, 'errors');
+                            }
+                        }
+                    }
+                }
+            }
+        }
 
-		if (price2num($totaldebit, 'MT') != price2num($totalcredit, 'MT')) {
-			$error++;
-			$errorforline++;
-			setEventMessages('We tried to insert a non balanced transaction in book for '.$ref.'. Canceled. Surely a bug.', null, 'errors');
-		}
+        if (price2num($totaldebit, 'MT') != price2num($totalcredit, 'MT')) {
+            $error++;
+            $errorforline++;
+            setEventMessages('We tried to insert a non balanced transaction in book for '.$ref.'. Canceled. Surely a bug.', null, 'errors');
+        }
 
-		if (!$errorforline) {
-			$db->commit();
-		} else {
-			//print 'KO for line '.$key.' '.$error.'<br>';
-			$db->rollback();
+        if (!$errorforline) {
+            $db->commit();
+        } else {
+            //print 'KO for line '.$key.' '.$error.'<br>';
+            $db->rollback();
 
-			$MAXNBERRORS = 5;
-			if ($error >= $MAXNBERRORS) {
-				setEventMessages($langs->trans("ErrorTooManyErrorsProcessStopped").' (>'.$MAXNBERRORS.')', null, 'errors');
-				break; // Break in the foreach
-			}
-		}
-	}
-
-	if (empty($error) && count($tabpay) > 0) {
-		setEventMessages($langs->trans("GeneralLedgerIsWritten"), null, 'mesgs');
-	} elseif (count($tabpay) == $error) {
-		setEventMessages($langs->trans("NoNewRecordSaved"), null, 'warnings');
-	} else {
-		setEventMessages($langs->trans("GeneralLedgerSomeRecordWasNotRecorded"), null, 'warnings');
-	}
-
-	$action = '';
-
-	// Must reload data, so we make a redirect
-	if (count($tabpay) != $error) {
-		$param = 'id_journal='.$id_journal;
-		$param .= '&date_startday='.$date_startday;
-		$param .= '&date_startmonth='.$date_startmonth;
-		$param .= '&date_startyear='.$date_startyear;
-		$param .= '&date_endday='.$date_endday;
-		$param .= '&date_endmonth='.$date_endmonth;
-		$param .= '&date_endyear='.$date_endyear;
-		$param .= '&in_bookkeeping='.$in_bookkeeping;
-		header("Location: ".$_SERVER['PHP_SELF'].($param ? '?'.$param : ''));
-		exit;
-	}
+            $MAXNBERRORS = 5;
+            if ($error >= $MAXNBERRORS) {
+                setEventMessages($langs->trans("ErrorTooManyErrorsProcessStopped").' (>'.$MAXNBERRORS.')', null, 'errors');
+                break; // Break in the foreach
+            }
+        }
+    }
+
+    if (empty($error) && count($tabpay) > 0) {
+        setEventMessages($langs->trans("GeneralLedgerIsWritten"), null, 'mesgs');
+    } elseif (count($tabpay) == $error) {
+        setEventMessages($langs->trans("NoNewRecordSaved"), null, 'warnings');
+    } else {
+        setEventMessages($langs->trans("GeneralLedgerSomeRecordWasNotRecorded"), null, 'warnings');
+    }
+
+    $action = '';
+
+    // Must reload data, so we make a redirect
+    if (count($tabpay) != $error) {
+        $param = 'id_journal='.$id_journal;
+        $param .= '&date_startday='.$date_startday;
+        $param .= '&date_startmonth='.$date_startmonth;
+        $param .= '&date_startyear='.$date_startyear;
+        $param .= '&date_endday='.$date_endday;
+        $param .= '&date_endmonth='.$date_endmonth;
+        $param .= '&date_endyear='.$date_endyear;
+        $param .= '&in_bookkeeping='.$in_bookkeeping;
+        header("Location: ".$_SERVER['PHP_SELF'].($param ? '?'.$param : ''));
+        exit;
+    }
 }
 
 
 
 // Export
 if ($action == 'exportcsv') {		// ISO and not UTF8 !
-	$sep = getDolGlobalString('ACCOUNTING_EXPORT_SEPARATORCSV');
-
-	$filename = 'journal';
-	$type_export = 'journal';
-	include DOL_DOCUMENT_ROOT.'/accountancy/tpl/export_journal.tpl.php';
-
-	// CSV header line
-	print '"'.$langs->transnoentitiesnoconv("BankId").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Date").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("PaymentMode").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("AccountAccounting").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("LedgerAccount").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("SubledgerAccount").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Label").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("AccountingDebit").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("AccountingCredit").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Journal").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Note").'"'.$sep;
-	print "\n";
-
-	foreach ($tabpay as $key => $val) {
-		$date = dol_print_date($val["date"], 'day');
-
-		$ref = getSourceDocRef($val, $tabtype[$key]);
-
-		// Bank
-		foreach ($tabbq[$key] as $k => $mt) {
-			if ($mt) {
-				$reflabel = '';
-				if (!empty($val['lib'])) {
-					$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
-				}
-				$reflabel .= $langs->trans("Bank").' '.dol_string_nohtmltag($val['bank_account_ref']);
-				if (!empty($val['soclib'])) {
-					$reflabel .= " - ".dol_string_nohtmltag($val['soclib']);
-				}
-
-				print '"'.$key.'"'.$sep;
-				print '"'.$date.'"'.$sep;
-				print '"'.$val["type_payment"].'"'.$sep;
-				print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
-				print '"'.length_accounta(html_entity_decode($k)).'"'.$sep;
-				print "  ".$sep;
-				print '"'.$reflabel.'"'.$sep;
-				print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
-				print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
-				print '"'.$journal.'"'.$sep;
-				print '"'.dol_string_nohtmltag($ref).'"'.$sep;
-				print "\n";
-			}
-		}
+    $sep = getDolGlobalString('ACCOUNTING_EXPORT_SEPARATORCSV');
+
+    $filename = 'journal';
+    $type_export = 'journal';
+    include DOL_DOCUMENT_ROOT.'/accountancy/tpl/export_journal.tpl.php';
+
+    // CSV header line
+    print '"'.$langs->transnoentitiesnoconv("BankId").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("Date").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("PaymentMode").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("AccountAccounting").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("LedgerAccount").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("SubledgerAccount").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("Label").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("AccountingDebit").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("AccountingCredit").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("Journal").'"'.$sep;
+    print '"'.$langs->transnoentitiesnoconv("Note").'"'.$sep;
+    print "\n";
+
+    foreach ($tabpay as $key => $val) {
+        $date = dol_print_date($val["date"], 'day');
+
+        $ref = getSourceDocRef($val, $tabtype[$key]);
+
+        // Bank
+        foreach ($tabbq[$key] as $k => $mt) {
+            if ($mt) {
+                $reflabel = '';
+                if (!empty($val['lib'])) {
+                    $reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+                }
+                $reflabel .= $langs->trans("Bank").' '.dol_string_nohtmltag($val['bank_account_ref']);
+                if (!empty($val['soclib'])) {
+                    $reflabel .= " - ".dol_string_nohtmltag($val['soclib']);
+                }
 
-		// Third party
-		if (is_array($tabtp[$key])) {
-			foreach ($tabtp[$key] as $k => $mt) {
-				if ($mt) {
-					$reflabel = '';
-					if (!empty($val['lib'])) {
-						$reflabel .= dol_string_nohtmltag($val['lib']).($val['soclib'] ? " - " : "");
-					}
-					if ($tabtype[$key] == 'banktransfert') {
-						$reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount').' '.$account_transfer);
-					} else {
-						$reflabel .= dol_string_nohtmltag($val['soclib']);
-					}
+                print '"'.$key.'"'.$sep;
+                print '"'.$date.'"'.$sep;
+                print '"'.$val["type_payment"].'"'.$sep;
+                print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
+                print '"'.length_accounta(html_entity_decode($k)).'"'.$sep;
+                print "  ".$sep;
+                print '"'.$reflabel.'"'.$sep;
+                print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
+                print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
+                print '"'.$journal.'"'.$sep;
+                print '"'.dol_string_nohtmltag($ref).'"'.$sep;
+                print "\n";
+            }
+        }
 
-					print '"'.$key.'"'.$sep;
-					print '"'.$date.'"'.$sep;
-					print '"'.$val["type_payment"].'"'.$sep;
-					print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
-					if ($tabtype[$key] == 'payment_supplier') {
-						print '"'.getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER').'"'.$sep;
-					} elseif ($tabtype[$key] == 'payment') {
-						print '"'.getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER').'"'.$sep;
-					} elseif ($tabtype[$key] == 'payment_expensereport') {
-						print '"'.getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT').'"'.$sep;
-					} elseif ($tabtype[$key] == 'payment_salary') {
-						print '"'.getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT').'"'.$sep;
-					} else {
-						print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
-					}
-					print '"'.length_accounta(html_entity_decode($k)).'"'.$sep;
-					print '"'.$reflabel.'"'.$sep;
-					print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
-					print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
-					print '"'.$journal.'"'.$sep;
-					print '"'.dol_string_nohtmltag($ref).'"'.$sep;
-					print "\n";
-				}
-			}
-		} else {	// If thirdparty unknown, output the waiting account
-			foreach ($tabbq[$key] as $k => $mt) {
-				if ($mt) {
-					$reflabel = '';
-					if (!empty($val['lib'])) {
-						$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
-					}
-					$reflabel .= dol_string_nohtmltag('WaitingAccount');
-
-					print '"'.$key.'"'.$sep;
-					print '"'.$date.'"'.$sep;
-					print '"'.$val["type_payment"].'"'.$sep;
-					print '"'.length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')).'"'.$sep;
-					print '"'.length_accounta(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')).'"'.$sep;
-					print $sep;
-					print '"'.$reflabel.'"'.$sep;
-					print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
-					print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
-					print '"'.$journal.'"'.$sep;
-					print '"'.dol_string_nohtmltag($ref).'"'.$sep;
-					print "\n";
-				}
-			}
-		}
-	}
+        // Third party
+        if (is_array($tabtp[$key])) {
+            foreach ($tabtp[$key] as $k => $mt) {
+                if ($mt) {
+                    $reflabel = '';
+                    if (!empty($val['lib'])) {
+                        $reflabel .= dol_string_nohtmltag($val['lib']).($val['soclib'] ? " - " : "");
+                    }
+                    if ($tabtype[$key] == 'banktransfert') {
+                        $reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount').' '.$account_transfer);
+                    } else {
+                        $reflabel .= dol_string_nohtmltag($val['soclib']);
+                    }
+
+                    print '"'.$key.'"'.$sep;
+                    print '"'.$date.'"'.$sep;
+                    print '"'.$val["type_payment"].'"'.$sep;
+                    print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
+                    if ($tabtype[$key] == 'payment_supplier') {
+                        print '"'.getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER').'"'.$sep;
+                    } elseif ($tabtype[$key] == 'payment') {
+                        print '"'.getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER').'"'.$sep;
+                    } elseif ($tabtype[$key] == 'payment_expensereport') {
+                        print '"'.getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT').'"'.$sep;
+                    } elseif ($tabtype[$key] == 'payment_salary') {
+                        print '"'.getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT').'"'.$sep;
+                    } else {
+                        print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
+                    }
+                    print '"'.length_accounta(html_entity_decode($k)).'"'.$sep;
+                    print '"'.$reflabel.'"'.$sep;
+                    print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
+                    print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
+                    print '"'.$journal.'"'.$sep;
+                    print '"'.dol_string_nohtmltag($ref).'"'.$sep;
+                    print "\n";
+                }
+            }
+        } else {	// If thirdparty unknown, output the waiting account
+            foreach ($tabbq[$key] as $k => $mt) {
+                if ($mt) {
+                    $reflabel = '';
+                    if (!empty($val['lib'])) {
+                        $reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+                    }
+                    $reflabel .= dol_string_nohtmltag('WaitingAccount');
+
+                    print '"'.$key.'"'.$sep;
+                    print '"'.$date.'"'.$sep;
+                    print '"'.$val["type_payment"].'"'.$sep;
+                    print '"'.length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')).'"'.$sep;
+                    print '"'.length_accounta(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')).'"'.$sep;
+                    print $sep;
+                    print '"'.$reflabel.'"'.$sep;
+                    print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
+                    print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
+                    print '"'.$journal.'"'.$sep;
+                    print '"'.dol_string_nohtmltag($ref).'"'.$sep;
+                    print "\n";
+                }
+            }
+        }
+    }
 }
 
 
@@ -1065,108 +1065,108 @@ 
 $form = new Form($db);
 
 if (empty($action) || $action == 'view') {
-	$invoicestatic = new Facture($db);
-	$invoicesupplierstatic = new FactureFournisseur($db);
-	$expensereportstatic = new ExpenseReport($db);
-	$vatstatic = new Tva($db);
-	$donationstatic = new Don($db);
-	$loanstatic = new Loan($db);
-	$salarystatic = new Salary($db);
-	$variousstatic = new PaymentVarious($db);
-
-	$title = $langs->trans("GenerationOfAccountingEntries").' - '.$accountingjournalstatic->getNomUrl(0, 2, 1, '', 1);
-
-	llxHeader('', dol_string_nohtmltag($title));
-
-	$nom = $title;
-	$builddate = dol_now();
-	//$description = $langs->trans("DescFinanceJournal") . '<br>';
-	$description = $langs->trans("DescJournalOnlyBindedVisible").'<br>';
-
-	$listofchoices = array(
-		'notyet' => $langs->trans("NotYetInGeneralLedger"),
-		'already' => $langs->trans("AlreadyInGeneralLedger")
-	);
-	$period = $form->selectDate($date_start ? $date_start : -1, 'date_start', 0, 0, 0, '', 1, 0).' - '.$form->selectDate($date_end ? $date_end : -1, 'date_end', 0, 0, 0, '', 1, 0);
-	$period .= ' -  '.$langs->trans("JournalizationInLedgerStatus").' '.$form->selectarray('in_bookkeeping', $listofchoices, $in_bookkeeping, 1);
-
-	$varlink = 'id_journal='.$id_journal;
-	$periodlink = '';
-	$exportlink = '';
-
-	journalHead($nom, '', $period, $periodlink, $description, $builddate, $exportlink, array('action' => ''), '', $varlink);
-
-	$desc = '';
-
-	if (getDolGlobalString('ACCOUNTANCY_FISCAL_PERIOD_MODE') != 'blockedonclosed') {
-		// Test that setup is complete (we are in accounting, so test on entity is always on $conf->entity only, no sharing allowed)
-		// Fiscal period test
-		$sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."accounting_fiscalyear WHERE entity = ".((int) $conf->entity);
-		$resql = $db->query($sql);
-		if ($resql) {
-			$obj = $db->fetch_object($resql);
-			if ($obj->nb == 0) {
-				print '<br><div class="warning">'.img_warning().' '.$langs->trans("TheFiscalPeriodIsNotDefined");
-				$desc = ' : '.$langs->trans("AccountancyAreaDescFiscalPeriod", 4, '{link}');
-				$desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("FiscalPeriod").'</strong>', $desc);
-				print $desc;
-				print '</div>';
-			}
-		} else {
-			dol_print_error($db);
-		}
-	}
-
-	// Bank test
-	$sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."bank_account WHERE entity = ".((int) $conf->entity)." AND fk_accountancy_journal IS NULL AND clos=0";
-	$resql = $db->query($sql);
-	if ($resql) {
-		$obj = $db->fetch_object($resql);
-		if ($obj->nb > 0) {
-			print '<br><div class="warning">'.img_warning().' '.$langs->trans("TheJournalCodeIsNotDefinedOnSomeBankAccount");
-			$desc = ' : '.$langs->trans("AccountancyAreaDescBank", 6, '{link}');
-			$desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("BankAccounts").'</strong>', $desc);
-			print $desc;
-			print '</div>';
-		}
-	} else {
-		dol_print_error($db);
-	}
-
-
-	// Button to write into Ledger
-	if (getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == '-1'
-		|| getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == '-1'
-		|| getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') == "" || getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') == '-1') {
-		print($desc ? '' : '<br>').'<div class="warning">'.img_warning().' '.$langs->trans("SomeMandatoryStepsOfSetupWereNotDone");
-		$desc = ' : '.$langs->trans("AccountancyAreaDescMisc", 4, '{link}');
-		$desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("MenuDefaultAccounts").'</strong>', $desc);
-		print $desc;
-		print '</div>';
-	}
-
-
-	print '<br><div class="tabsAction tabsActionNoBottom centerimp">';
-
-	if (getDolGlobalString('ACCOUNTING_ENABLE_EXPORT_DRAFT_JOURNAL') && $in_bookkeeping == 'notyet') {
-		print '<input type="button" class="butAction" name="exportcsv" value="'.$langs->trans("ExportDraftJournal").'" onclick="launch_export();" />';
-	}
-
-	if (getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == '-1'
-		|| getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == '-1') {
-		print '<input type="button" class="butActionRefused classfortooltip" title="'.dol_escape_htmltag($langs->trans("SomeMandatoryStepsOfSetupWereNotDone")).'" value="'.$langs->trans("WriteBookKeeping").'" />';
-	} else {
-		if ($in_bookkeeping == 'notyet') {
-			print '<input type="button" class="butAction" name="writebookkeeping" value="'.$langs->trans("WriteBookKeeping").'" onclick="writebookkeeping();" />';
-		} else {
-			print '<a class="butActionRefused classfortooltip" name="writebookkeeping">'.$langs->trans("WriteBookKeeping").'</a>';
-		}
-	}
+    $invoicestatic = new Facture($db);
+    $invoicesupplierstatic = new FactureFournisseur($db);
+    $expensereportstatic = new ExpenseReport($db);
+    $vatstatic = new Tva($db);
+    $donationstatic = new Don($db);
+    $loanstatic = new Loan($db);
+    $salarystatic = new Salary($db);
+    $variousstatic = new PaymentVarious($db);
+
+    $title = $langs->trans("GenerationOfAccountingEntries").' - '.$accountingjournalstatic->getNomUrl(0, 2, 1, '', 1);
+
+    llxHeader('', dol_string_nohtmltag($title));
+
+    $nom = $title;
+    $builddate = dol_now();
+    //$description = $langs->trans("DescFinanceJournal") . '<br>';
+    $description = $langs->trans("DescJournalOnlyBindedVisible").'<br>';
+
+    $listofchoices = array(
+        'notyet' => $langs->trans("NotYetInGeneralLedger"),
+        'already' => $langs->trans("AlreadyInGeneralLedger")
+    );
+    $period = $form->selectDate($date_start ? $date_start : -1, 'date_start', 0, 0, 0, '', 1, 0).' - '.$form->selectDate($date_end ? $date_end : -1, 'date_end', 0, 0, 0, '', 1, 0);
+    $period .= ' -  '.$langs->trans("JournalizationInLedgerStatus").' '.$form->selectarray('in_bookkeeping', $listofchoices, $in_bookkeeping, 1);
+
+    $varlink = 'id_journal='.$id_journal;
+    $periodlink = '';
+    $exportlink = '';
+
+    journalHead($nom, '', $period, $periodlink, $description, $builddate, $exportlink, array('action' => ''), '', $varlink);
+
+    $desc = '';
+
+    if (getDolGlobalString('ACCOUNTANCY_FISCAL_PERIOD_MODE') != 'blockedonclosed') {
+        // Test that setup is complete (we are in accounting, so test on entity is always on $conf->entity only, no sharing allowed)
+        // Fiscal period test
+        $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."accounting_fiscalyear WHERE entity = ".((int) $conf->entity);
+        $resql = $db->query($sql);
+        if ($resql) {
+            $obj = $db->fetch_object($resql);
+            if ($obj->nb == 0) {
+                print '<br><div class="warning">'.img_warning().' '.$langs->trans("TheFiscalPeriodIsNotDefined");
+                $desc = ' : '.$langs->trans("AccountancyAreaDescFiscalPeriod", 4, '{link}');
+                $desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("FiscalPeriod").'</strong>', $desc);
+                print $desc;
+                print '</div>';
+            }
+        } else {
+            dol_print_error($db);
+        }
+    }
+
+    // Bank test
+    $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."bank_account WHERE entity = ".((int) $conf->entity)." AND fk_accountancy_journal IS NULL AND clos=0";
+    $resql = $db->query($sql);
+    if ($resql) {
+        $obj = $db->fetch_object($resql);
+        if ($obj->nb > 0) {
+            print '<br><div class="warning">'.img_warning().' '.$langs->trans("TheJournalCodeIsNotDefinedOnSomeBankAccount");
+            $desc = ' : '.$langs->trans("AccountancyAreaDescBank", 6, '{link}');
+            $desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("BankAccounts").'</strong>', $desc);
+            print $desc;
+            print '</div>';
+        }
+    } else {
+        dol_print_error($db);
+    }
+
+
+    // Button to write into Ledger
+    if (getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == '-1'
+        || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == '-1'
+        || getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') == "" || getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') == '-1') {
+        print($desc ? '' : '<br>').'<div class="warning">'.img_warning().' '.$langs->trans("SomeMandatoryStepsOfSetupWereNotDone");
+        $desc = ' : '.$langs->trans("AccountancyAreaDescMisc", 4, '{link}');
+        $desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("MenuDefaultAccounts").'</strong>', $desc);
+        print $desc;
+        print '</div>';
+    }
+
+
+    print '<br><div class="tabsAction tabsActionNoBottom centerimp">';
+
+    if (getDolGlobalString('ACCOUNTING_ENABLE_EXPORT_DRAFT_JOURNAL') && $in_bookkeeping == 'notyet') {
+        print '<input type="button" class="butAction" name="exportcsv" value="'.$langs->trans("ExportDraftJournal").'" onclick="launch_export();" />';
+    }
+
+    if (getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == '-1'
+        || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == '-1') {
+        print '<input type="button" class="butActionRefused classfortooltip" title="'.dol_escape_htmltag($langs->trans("SomeMandatoryStepsOfSetupWereNotDone")).'" value="'.$langs->trans("WriteBookKeeping").'" />';
+    } else {
+        if ($in_bookkeeping == 'notyet') {
+            print '<input type="button" class="butAction" name="writebookkeeping" value="'.$langs->trans("WriteBookKeeping").'" onclick="writebookkeeping();" />';
+        } else {
+            print '<a class="butActionRefused classfortooltip" name="writebookkeeping">'.$langs->trans("WriteBookKeeping").'</a>';
+        }
+    }
 
-	print '</div>';
+    print '</div>';
 
-	// TODO Avoid using js. We can use a direct link with $param
-	print '
+    // TODO Avoid using js. We can use a direct link with $param
+    print '
 	<script type="text/javascript">
 		function launch_export() {
 			console.log("Set value into form and submit");
@@ -1182,259 +1182,259 @@ 
 		}
 	</script>';
 
-	/*
+    /*
 	 * Show result array
 	 */
-	print '<br>';
-
-	$i = 0;
-	print '<div class="div-table-responsive">';
-	print '<table class="noborder centpercent">';
-	print '<tr class="liste_titre">';
-	print "<td>".$langs->trans("Date")."</td>";
-	print "<td>".$langs->trans("Piece").' ('.$langs->trans("ObjectsRef").")</td>";
-	print "<td>".$langs->trans("AccountAccounting")."</td>";
-	print "<td>".$langs->trans("SubledgerAccount")."</td>";
-	print "<td>".$langs->trans("LabelOperation")."</td>";
-	print '<td class="center">'.$langs->trans("PaymentMode")."</td>";
-	print '<td class="right">'.$langs->trans("AccountingDebit")."</td>";
-	print '<td class="right">'.$langs->trans("AccountingCredit")."</td>";
-	print "</tr>\n";
-
-	$r = '';
-
-	foreach ($tabpay as $key => $val) {			  // $key is rowid in llx_bank
-		$date = dol_print_date($val["date"], 'day');
-
-		$ref = getSourceDocRef($val, $tabtype[$key]);
-
-		// Bank
-		foreach ($tabbq[$key] as $k => $mt) {
-			if ($mt) {
-				$reflabel = '';
-				if (!empty($val['lib'])) {
-					$reflabel .= $val['lib']." - ";
-				}
-				$reflabel .= $langs->trans("Bank").' '.$val['bank_account_ref'];
-				if (!empty($val['soclib'])) {
-					$reflabel .= " - ".$val['soclib'];
-				}
+    print '<br>';
 
-				//var_dump($tabpay[$key]);
-				print '<!-- Bank bank.rowid='.$key.' type='.$tabpay[$key]['type'].' ref='.$tabpay[$key]['ref'].'-->';
-				print '<tr class="oddeven">';
+    $i = 0;
+    print '<div class="div-table-responsive">';
+    print '<table class="noborder centpercent">';
+    print '<tr class="liste_titre">';
+    print "<td>".$langs->trans("Date")."</td>";
+    print "<td>".$langs->trans("Piece").' ('.$langs->trans("ObjectsRef").")</td>";
+    print "<td>".$langs->trans("AccountAccounting")."</td>";
+    print "<td>".$langs->trans("SubledgerAccount")."</td>";
+    print "<td>".$langs->trans("LabelOperation")."</td>";
+    print '<td class="center">'.$langs->trans("PaymentMode")."</td>";
+    print '<td class="right">'.$langs->trans("AccountingDebit")."</td>";
+    print '<td class="right">'.$langs->trans("AccountingCredit")."</td>";
+    print "</tr>\n";
+
+    $r = '';
+
+    foreach ($tabpay as $key => $val) {			  // $key is rowid in llx_bank
+        $date = dol_print_date($val["date"], 'day');
+
+        $ref = getSourceDocRef($val, $tabtype[$key]);
+
+        // Bank
+        foreach ($tabbq[$key] as $k => $mt) {
+            if ($mt) {
+                $reflabel = '';
+                if (!empty($val['lib'])) {
+                    $reflabel .= $val['lib']." - ";
+                }
+                $reflabel .= $langs->trans("Bank").' '.$val['bank_account_ref'];
+                if (!empty($val['soclib'])) {
+                    $reflabel .= " - ".$val['soclib'];
+                }
 
-				// Date
-				print "<td>".$date."</td>";
+                //var_dump($tabpay[$key]);
+                print '<!-- Bank bank.rowid='.$key.' type='.$tabpay[$key]['type'].' ref='.$tabpay[$key]['ref'].'-->';
+                print '<tr class="oddeven">';
 
-				// Ref
-				print "<td>".dol_escape_htmltag($ref)."</td>";
+                // Date
+                print "<td>".$date."</td>";
 
-				// Ledger account
-				$accounttoshow = length_accountg($k);
-				if (empty($accounttoshow) || $accounttoshow == 'NotDefined') {
-					$accounttoshow = '<span class="error">'.$langs->trans("BankAccountNotDefined").'</span>';
-				}
-				print '<td class="maxwidth300" title="'.dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)).'">';
-				print $accounttoshow;
-				print "</td>";
+                // Ref
+                print "<td>".dol_escape_htmltag($ref)."</td>";
+
+                // Ledger account
+                $accounttoshow = length_accountg($k);
+                if (empty($accounttoshow) || $accounttoshow == 'NotDefined') {
+                    $accounttoshow = '<span class="error">'.$langs->trans("BankAccountNotDefined").'</span>';
+                }
+                print '<td class="maxwidth300" title="'.dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)).'">';
+                print $accounttoshow;
+                print "</td>";
 
-				// Subledger account
-				print '<td class="maxwidth300">';
-				/*$accounttoshow = length_accountg($k);
+                // Subledger account
+                print '<td class="maxwidth300">';
+                /*$accounttoshow = length_accountg($k);
 				if (empty($accounttoshow) || $accounttoshow == 'NotDefined')
 				{
 					print '<span class="error">'.$langs->trans("BankAccountNotDefined").'</span>';
 				}
 				else print $accounttoshow;*/
-				print "</td>";
+                print "</td>";
 
-				// Label operation
-				print '<td>';
-				print $reflabel;	// This is already html escaped content
-				print "</td>";
+                // Label operation
+                print '<td>';
+                print $reflabel;	// This is already html escaped content
+                print "</td>";
 
-				print '<td class="center">'.$val["type_payment"]."</td>";
-				print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
-				print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
-				print "</tr>";
+                print '<td class="center">'.$val["type_payment"]."</td>";
+                print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
+                print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
+                print "</tr>";
 
-				$i++;
-			}
-		}
-
-		// Third party
-		if (is_array($tabtp[$key])) {
-			foreach ($tabtp[$key] as $k => $mt) {
-				if ($mt) {
-					$reflabel = '';
-					if (!empty($val['lib'])) {
-						$reflabel .= $val['lib'].($val['soclib'] ? " - " : "");
-					}
-					if ($tabtype[$key] == 'banktransfert') {
-						$reflabel .= $langs->trans('TransitionalAccount').' '.$account_transfer;
-					} else {
-						$reflabel .= $val['soclib'];
-					}
-
-					print '<!-- Thirdparty bank.rowid='.$key.' -->';
-					print '<tr class="oddeven">';
-
-					// Date
-					print "<td>".$date."</td>";
-
-					// Ref
-					print "<td>".dol_escape_htmltag($ref)."</td>";
-
-					// Ledger account
-					$account_ledger = $k;
-					// Try to force general ledger account depending on type
-					if ($tabtype[$key] == 'payment') {
-						$account_ledger = getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER');
-					}
-					if ($tabtype[$key] == 'payment_supplier') {
-						$account_ledger = getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER');
-					}
-					if ($tabtype[$key] == 'payment_expensereport') {
-						$account_ledger = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
-					}
-					if ($tabtype[$key] == 'payment_salary') {
-						$account_ledger = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
-					}
-					if ($tabtype[$key] == 'payment_vat') {
-						$account_ledger = getDolGlobalString('ACCOUNTING_VAT_PAY_ACCOUNT');
-					}
-					if ($tabtype[$key] == 'member') {
-						$account_ledger = getDolGlobalString('ADHERENT_SUBSCRIPTION_ACCOUNTINGACCOUNT');
-					}
-					if ($tabtype[$key] == 'payment_various') {
-						$account_ledger = $tabpay[$key]["account_various"];
-					}
-					$accounttoshow = length_accountg($account_ledger);
-					if (empty($accounttoshow) || $accounttoshow == 'NotDefined') {
-						if ($tabtype[$key] == 'unknown') {
-							// We will accept writing, but into a waiting account
-							if (!getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE') || getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE') == '-1') {
-								$accounttoshow = '<span class="error small">'.$langs->trans('UnknownAccountForThirdpartyAndWaitingAccountNotDefinedBlocking').'</span>';
-							} else {
-								$accounttoshow = '<span class="warning small">'.$langs->trans('UnknownAccountForThirdparty', length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'))).'</span>'; // We will use a waiting account
-							}
-						} else {
-							// We will refuse writing
-							$errorstring = 'UnknownAccountForThirdpartyBlocking';
-							if ($tabtype[$key] == 'payment') {
-								$errorstring = 'MainAccountForCustomersNotDefined';
-							}
-							if ($tabtype[$key] == 'payment_supplier') {
-								$errorstring = 'MainAccountForSuppliersNotDefined';
-							}
-							if ($tabtype[$key] == 'payment_expensereport') {
-								$errorstring = 'MainAccountForUsersNotDefined';
-							}
-							if ($tabtype[$key] == 'payment_salary') {
-								$errorstring = 'MainAccountForUsersNotDefined';
-							}
-							if ($tabtype[$key] == 'payment_vat') {
-								$errorstring = 'MainAccountForVatPaymentNotDefined';
-							}
-							if ($tabtype[$key] == 'member') {
-								$errorstring = 'MainAccountForSubscriptionPaymentNotDefined';
-							}
-							$accounttoshow = '<span class="error small">'.$langs->trans($errorstring).'</span>';
-						}
-					}
-					print '<td class="maxwidth300" title="'.dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)).'">';
-					print $accounttoshow;	// This is a HTML string
-					print "</td>";
-
-					// Subledger account
-					$accounttoshowsubledger = '';
-					if (in_array($tabtype[$key], array('payment', 'payment_supplier', 'payment_expensereport', 'payment_salary', 'payment_various'))) {	// Type of payments that uses a subledger
-						$accounttoshowsubledger = length_accounta($k);
-						if ($accounttoshow != $accounttoshowsubledger) {
-							if (empty($accounttoshowsubledger) || $accounttoshowsubledger == 'NotDefined') {
-								//var_dump($tabpay[$key]);
-								//var_dump($tabtype[$key]);
-								//var_dump($tabbq[$key]);
-								//print '<span class="error">'.$langs->trans("ThirdpartyAccountNotDefined").'</span>';
-								if (!empty($tabcompany[$key]['code_compta'])) {
-									if (in_array($tabtype[$key], array('payment_various', 'payment_salary'))) {
-										// For such case, if subledger is not defined, we won't use subledger accounts.
-										$accounttoshowsubledger = '<span class="warning small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownSubledgerIgnored").'</span>';
-									} else {
-										$accounttoshowsubledger = '<span class="warning small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknown", $tabcompany[$key]['code_compta']).'</span>';
-									}
-								} else {
-									$accounttoshowsubledger = '<span class="error small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownBlocking").'</span>';
-								}
-							}
-						} else {
-							$accounttoshowsubledger = '';
-						}
-					}
-					print '<td class="maxwidth300">';
-					print $accounttoshowsubledger;	// This is a html string
-					print "</td>";
-
-					print "<td>".$reflabel."</td>";
-
-					print '<td class="center">'.$val["type_payment"]."</td>";
-
-					print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
-
-					print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
-
-					print "</tr>";
+                $i++;
+            }
+        }
 
-					$i++;
-				}
-			}
-		} else {	// Waiting account
-			foreach ($tabbq[$key] as $k => $mt) {
-				if ($mt) {
-					$reflabel = '';
-					if (!empty($val['lib'])) {
-						$reflabel .= $val['lib']." - ";
-					}
-					$reflabel .= 'WaitingAccount';
-
-					print '<!-- Wait bank.rowid='.$key.' -->';
-					print '<tr class="oddeven">';
-					print "<td>".$date."</td>";
-					print "<td>".$ref."</td>";
-					// Ledger account
-					print "<td>";
-					/*if (empty($accounttoshow) || $accounttoshow == 'NotDefined')
+        // Third party
+        if (is_array($tabtp[$key])) {
+            foreach ($tabtp[$key] as $k => $mt) {
+                if ($mt) {
+                    $reflabel = '';
+                    if (!empty($val['lib'])) {
+                        $reflabel .= $val['lib'].($val['soclib'] ? " - " : "");
+                    }
+                    if ($tabtype[$key] == 'banktransfert') {
+                        $reflabel .= $langs->trans('TransitionalAccount').' '.$account_transfer;
+                    } else {
+                        $reflabel .= $val['soclib'];
+                    }
+
+                    print '<!-- Thirdparty bank.rowid='.$key.' -->';
+                    print '<tr class="oddeven">';
+
+                    // Date
+                    print "<td>".$date."</td>";
+
+                    // Ref
+                    print "<td>".dol_escape_htmltag($ref)."</td>";
+
+                    // Ledger account
+                    $account_ledger = $k;
+                    // Try to force general ledger account depending on type
+                    if ($tabtype[$key] == 'payment') {
+                        $account_ledger = getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER');
+                    }
+                    if ($tabtype[$key] == 'payment_supplier') {
+                        $account_ledger = getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER');
+                    }
+                    if ($tabtype[$key] == 'payment_expensereport') {
+                        $account_ledger = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
+                    }
+                    if ($tabtype[$key] == 'payment_salary') {
+                        $account_ledger = getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT');
+                    }
+                    if ($tabtype[$key] == 'payment_vat') {
+                        $account_ledger = getDolGlobalString('ACCOUNTING_VAT_PAY_ACCOUNT');
+                    }
+                    if ($tabtype[$key] == 'member') {
+                        $account_ledger = getDolGlobalString('ADHERENT_SUBSCRIPTION_ACCOUNTINGACCOUNT');
+                    }
+                    if ($tabtype[$key] == 'payment_various') {
+                        $account_ledger = $tabpay[$key]["account_various"];
+                    }
+                    $accounttoshow = length_accountg($account_ledger);
+                    if (empty($accounttoshow) || $accounttoshow == 'NotDefined') {
+                        if ($tabtype[$key] == 'unknown') {
+                            // We will accept writing, but into a waiting account
+                            if (!getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE') || getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE') == '-1') {
+                                $accounttoshow = '<span class="error small">'.$langs->trans('UnknownAccountForThirdpartyAndWaitingAccountNotDefinedBlocking').'</span>';
+                            } else {
+                                $accounttoshow = '<span class="warning small">'.$langs->trans('UnknownAccountForThirdparty', length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'))).'</span>'; // We will use a waiting account
+                            }
+                        } else {
+                            // We will refuse writing
+                            $errorstring = 'UnknownAccountForThirdpartyBlocking';
+                            if ($tabtype[$key] == 'payment') {
+                                $errorstring = 'MainAccountForCustomersNotDefined';
+                            }
+                            if ($tabtype[$key] == 'payment_supplier') {
+                                $errorstring = 'MainAccountForSuppliersNotDefined';
+                            }
+                            if ($tabtype[$key] == 'payment_expensereport') {
+                                $errorstring = 'MainAccountForUsersNotDefined';
+                            }
+                            if ($tabtype[$key] == 'payment_salary') {
+                                $errorstring = 'MainAccountForUsersNotDefined';
+                            }
+                            if ($tabtype[$key] == 'payment_vat') {
+                                $errorstring = 'MainAccountForVatPaymentNotDefined';
+                            }
+                            if ($tabtype[$key] == 'member') {
+                                $errorstring = 'MainAccountForSubscriptionPaymentNotDefined';
+                            }
+                            $accounttoshow = '<span class="error small">'.$langs->trans($errorstring).'</span>';
+                        }
+                    }
+                    print '<td class="maxwidth300" title="'.dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)).'">';
+                    print $accounttoshow;	// This is a HTML string
+                    print "</td>";
+
+                    // Subledger account
+                    $accounttoshowsubledger = '';
+                    if (in_array($tabtype[$key], array('payment', 'payment_supplier', 'payment_expensereport', 'payment_salary', 'payment_various'))) {	// Type of payments that uses a subledger
+                        $accounttoshowsubledger = length_accounta($k);
+                        if ($accounttoshow != $accounttoshowsubledger) {
+                            if (empty($accounttoshowsubledger) || $accounttoshowsubledger == 'NotDefined') {
+                                //var_dump($tabpay[$key]);
+                                //var_dump($tabtype[$key]);
+                                //var_dump($tabbq[$key]);
+                                //print '<span class="error">'.$langs->trans("ThirdpartyAccountNotDefined").'</span>';
+                                if (!empty($tabcompany[$key]['code_compta'])) {
+                                    if (in_array($tabtype[$key], array('payment_various', 'payment_salary'))) {
+                                        // For such case, if subledger is not defined, we won't use subledger accounts.
+                                        $accounttoshowsubledger = '<span class="warning small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownSubledgerIgnored").'</span>';
+                                    } else {
+                                        $accounttoshowsubledger = '<span class="warning small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknown", $tabcompany[$key]['code_compta']).'</span>';
+                                    }
+                                } else {
+                                    $accounttoshowsubledger = '<span class="error small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownBlocking").'</span>';
+                                }
+                            }
+                        } else {
+                            $accounttoshowsubledger = '';
+                        }
+                    }
+                    print '<td class="maxwidth300">';
+                    print $accounttoshowsubledger;	// This is a html string
+                    print "</td>";
+
+                    print "<td>".$reflabel."</td>";
+
+                    print '<td class="center">'.$val["type_payment"]."</td>";
+
+                    print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
+
+                    print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
+
+                    print "</tr>";
+
+                    $i++;
+                }
+            }
+        } else {	// Waiting account
+            foreach ($tabbq[$key] as $k => $mt) {
+                if ($mt) {
+                    $reflabel = '';
+                    if (!empty($val['lib'])) {
+                        $reflabel .= $val['lib']." - ";
+                    }
+                    $reflabel .= 'WaitingAccount';
+
+                    print '<!-- Wait bank.rowid='.$key.' -->';
+                    print '<tr class="oddeven">';
+                    print "<td>".$date."</td>";
+                    print "<td>".$ref."</td>";
+                    // Ledger account
+                    print "<td>";
+                    /*if (empty($accounttoshow) || $accounttoshow == 'NotDefined')
 					{
 						print '<span class="error">'.$langs->trans("WaitAccountNotDefined").'</span>';
 					}
 					else */
-					print length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'));
-					print "</td>";
-					// Subledger account
-					print "<td>";
-					print "</td>";
-					print "<td>".dol_escape_htmltag($reflabel)."</td>";
-					print '<td class="center">'.$val["type_payment"]."</td>";
-					print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
-					print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
-					print "</tr>";
-
-					$i++;
-				}
-			}
-		}
-	}
+                    print length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'));
+                    print "</td>";
+                    // Subledger account
+                    print "<td>";
+                    print "</td>";
+                    print "<td>".dol_escape_htmltag($reflabel)."</td>";
+                    print '<td class="center">'.$val["type_payment"]."</td>";
+                    print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
+                    print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
+                    print "</tr>";
+
+                    $i++;
+                }
+            }
+        }
+    }
 
-	if (!$i) {
-		$colspan = 8;
-		print '<tr class="oddeven"><td colspan="'.$colspan.'"><span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span></td></tr>';
-	}
+    if (!$i) {
+        $colspan = 8;
+        print '<tr class="oddeven"><td colspan="'.$colspan.'"><span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span></td></tr>';
+    }
 
-	print "</table>";
-	print '</div>';
+    print "</table>";
+    print '</div>';
 
-	llxFooter();
+    llxFooter();
 }
 
 $db->close();
@@ -1450,110 +1450,110 @@ 
  */
 function getSourceDocRef($val, $typerecord)
 {
-	global $db, $langs;
-
-	// Defined the docref into $ref (We start with $val['ref'] by default and we complete according to other data)
-	// WE MUST HAVE SAME REF FOR ALL LINES WE WILL RECORD INTO THE BOOKKEEPING
-	$ref = $val['ref'];
-	if ($ref == '(SupplierInvoicePayment)' || $ref == '(SupplierInvoicePaymentBack)') {
-		$ref = $langs->transnoentitiesnoconv('Supplier');
-	}
-	if ($ref == '(CustomerInvoicePayment)' || $ref == '(CustomerInvoicePaymentBack)') {
-		$ref = $langs->transnoentitiesnoconv('Customer');
-	}
-	if ($ref == '(SocialContributionPayment)') {
-		$ref = $langs->transnoentitiesnoconv('SocialContribution');
-	}
-	if ($ref == '(DonationPayment)') {
-		$ref = $langs->transnoentitiesnoconv('Donation');
-	}
-	if ($ref == '(SubscriptionPayment)') {
-		$ref = $langs->transnoentitiesnoconv('Subscription');
-	}
-	if ($ref == '(ExpenseReportPayment)') {
-		$ref = $langs->transnoentitiesnoconv('Employee');
-	}
-	if ($ref == '(LoanPayment)') {
-		$ref = $langs->transnoentitiesnoconv('Loan');
-	}
-	if ($ref == '(payment_salary)') {
-		$ref = $langs->transnoentitiesnoconv('Employee');
-	}
-
-	$sqlmid = '';
-	if ($typerecord == 'payment') {
-		if (getDolGlobalInt('FACTURE_DEPOSITS_ARE_JUST_PAYMENTS')) {
-			$sqlmid = "SELECT payfac.fk_facture as id, ".$db->ifsql('f1.rowid IS NULL', 'f.ref', 'f1.ref')." as ref";
-			$sqlmid .= " FROM ".$db->prefix()."paiement_facture as payfac";
-			$sqlmid .= " LEFT JOIN ".$db->prefix()."facture as f ON f.rowid = payfac.fk_facture";
-			$sqlmid .= " LEFT JOIN ".$db->prefix()."societe_remise_except as sre ON sre.fk_facture_source = payfac.fk_facture";
-			$sqlmid .= " LEFT JOIN ".$db->prefix()."facture as f1 ON f1.rowid = sre.fk_facture";
-			$sqlmid .= " WHERE payfac.fk_paiement=".((int) $val['paymentid']);
-		} else {
-			$sqlmid = "SELECT payfac.fk_facture as id, f.ref as ref";
-			$sqlmid .= " FROM ".$db->prefix()."paiement_facture as payfac";
-			$sqlmid .= " INNER JOIN ".$db->prefix()."facture as f ON f.rowid = payfac.fk_facture";
-			$sqlmid .= " WHERE payfac.fk_paiement=".((int) $val['paymentid']);
-		}
-		$ref = $langs->transnoentitiesnoconv("Invoice");
-	} elseif ($typerecord == 'payment_supplier') {
-		$sqlmid = 'SELECT payfac.fk_facturefourn as id, f.ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."paiementfourn_facturefourn as payfac, ".MAIN_DB_PREFIX."facture_fourn as f";
-		$sqlmid .= " WHERE payfac.fk_facturefourn = f.rowid AND payfac.fk_paiementfourn=".((int) $val["paymentsupplierid"]);
-		$ref = $langs->transnoentitiesnoconv("SupplierInvoice");
-	} elseif ($typerecord == 'payment_expensereport') {
-		$sqlmid = 'SELECT e.rowid as id, e.ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_expensereport as pe, ".MAIN_DB_PREFIX."expensereport as e";
-		$sqlmid .= " WHERE pe.rowid=".((int) $val["paymentexpensereport"])." AND pe.fk_expensereport = e.rowid";
-		$ref = $langs->transnoentitiesnoconv("ExpenseReport");
-	} elseif ($typerecord == 'payment_salary') {
-		$sqlmid = 'SELECT s.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_salary as s";
-		$sqlmid .= " WHERE s.rowid=".((int) $val["paymentsalid"]);
-		$ref = $langs->transnoentitiesnoconv("SalaryPayment");
-	} elseif ($typerecord == 'sc') {
-		$sqlmid = 'SELECT sc.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."paiementcharge as sc";
-		$sqlmid .= " WHERE sc.rowid=".((int) $val["paymentscid"]);
-		$ref = $langs->transnoentitiesnoconv("SocialContribution");
-	} elseif ($typerecord == 'payment_vat') {
-		$sqlmid = 'SELECT v.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."tva as v";
-		$sqlmid .= " WHERE v.rowid=".((int) $val["paymentvatid"]);
-		$ref = $langs->transnoentitiesnoconv("PaymentVat");
-	} elseif ($typerecord == 'payment_donation') {
-		$sqlmid = 'SELECT payd.fk_donation as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_donation as payd";
-		$sqlmid .= " WHERE payd.fk_donation=".((int) $val["paymentdonationid"]);
-		$ref = $langs->transnoentitiesnoconv("Donation");
-	} elseif ($typerecord == 'payment_loan') {
-		$sqlmid = 'SELECT l.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_loan as l";
-		$sqlmid .= " WHERE l.rowid=".((int) $val["paymentloanid"]);
-		$ref = $langs->transnoentitiesnoconv("LoanPayment");
-	} elseif ($typerecord == 'payment_various') {
-		$sqlmid = 'SELECT v.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_various as v";
-		$sqlmid .= " WHERE v.rowid=".((int) $val["paymentvariousid"]);
-		$ref = $langs->transnoentitiesnoconv("VariousPayment");
-	}
-	// Add warning
-	if (empty($sqlmid)) {
-		dol_syslog("Found a typerecord=".$typerecord." not supported", LOG_WARNING);
-	}
-
-	if ($sqlmid) {
-		dol_syslog("accountancy/journal/bankjournal.php::sqlmid=".$sqlmid, LOG_DEBUG);
-		$resultmid = $db->query($sqlmid);
-		if ($resultmid) {
-			while ($objmid = $db->fetch_object($resultmid)) {
-				$ref .= ' '.$objmid->ref;
-			}
-		} else {
-			dol_print_error($db);
-		}
-	}
+    global $db, $langs;
+
+    // Defined the docref into $ref (We start with $val['ref'] by default and we complete according to other data)
+    // WE MUST HAVE SAME REF FOR ALL LINES WE WILL RECORD INTO THE BOOKKEEPING
+    $ref = $val['ref'];
+    if ($ref == '(SupplierInvoicePayment)' || $ref == '(SupplierInvoicePaymentBack)') {
+        $ref = $langs->transnoentitiesnoconv('Supplier');
+    }
+    if ($ref == '(CustomerInvoicePayment)' || $ref == '(CustomerInvoicePaymentBack)') {
+        $ref = $langs->transnoentitiesnoconv('Customer');
+    }
+    if ($ref == '(SocialContributionPayment)') {
+        $ref = $langs->transnoentitiesnoconv('SocialContribution');
+    }
+    if ($ref == '(DonationPayment)') {
+        $ref = $langs->transnoentitiesnoconv('Donation');
+    }
+    if ($ref == '(SubscriptionPayment)') {
+        $ref = $langs->transnoentitiesnoconv('Subscription');
+    }
+    if ($ref == '(ExpenseReportPayment)') {
+        $ref = $langs->transnoentitiesnoconv('Employee');
+    }
+    if ($ref == '(LoanPayment)') {
+        $ref = $langs->transnoentitiesnoconv('Loan');
+    }
+    if ($ref == '(payment_salary)') {
+        $ref = $langs->transnoentitiesnoconv('Employee');
+    }
+
+    $sqlmid = '';
+    if ($typerecord == 'payment') {
+        if (getDolGlobalInt('FACTURE_DEPOSITS_ARE_JUST_PAYMENTS')) {
+            $sqlmid = "SELECT payfac.fk_facture as id, ".$db->ifsql('f1.rowid IS NULL', 'f.ref', 'f1.ref')." as ref";
+            $sqlmid .= " FROM ".$db->prefix()."paiement_facture as payfac";
+            $sqlmid .= " LEFT JOIN ".$db->prefix()."facture as f ON f.rowid = payfac.fk_facture";
+            $sqlmid .= " LEFT JOIN ".$db->prefix()."societe_remise_except as sre ON sre.fk_facture_source = payfac.fk_facture";
+            $sqlmid .= " LEFT JOIN ".$db->prefix()."facture as f1 ON f1.rowid = sre.fk_facture";
+            $sqlmid .= " WHERE payfac.fk_paiement=".((int) $val['paymentid']);
+        } else {
+            $sqlmid = "SELECT payfac.fk_facture as id, f.ref as ref";
+            $sqlmid .= " FROM ".$db->prefix()."paiement_facture as payfac";
+            $sqlmid .= " INNER JOIN ".$db->prefix()."facture as f ON f.rowid = payfac.fk_facture";
+            $sqlmid .= " WHERE payfac.fk_paiement=".((int) $val['paymentid']);
+        }
+        $ref = $langs->transnoentitiesnoconv("Invoice");
+    } elseif ($typerecord == 'payment_supplier') {
+        $sqlmid = 'SELECT payfac.fk_facturefourn as id, f.ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."paiementfourn_facturefourn as payfac, ".MAIN_DB_PREFIX."facture_fourn as f";
+        $sqlmid .= " WHERE payfac.fk_facturefourn = f.rowid AND payfac.fk_paiementfourn=".((int) $val["paymentsupplierid"]);
+        $ref = $langs->transnoentitiesnoconv("SupplierInvoice");
+    } elseif ($typerecord == 'payment_expensereport') {
+        $sqlmid = 'SELECT e.rowid as id, e.ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_expensereport as pe, ".MAIN_DB_PREFIX."expensereport as e";
+        $sqlmid .= " WHERE pe.rowid=".((int) $val["paymentexpensereport"])." AND pe.fk_expensereport = e.rowid";
+        $ref = $langs->transnoentitiesnoconv("ExpenseReport");
+    } elseif ($typerecord == 'payment_salary') {
+        $sqlmid = 'SELECT s.rowid as ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_salary as s";
+        $sqlmid .= " WHERE s.rowid=".((int) $val["paymentsalid"]);
+        $ref = $langs->transnoentitiesnoconv("SalaryPayment");
+    } elseif ($typerecord == 'sc') {
+        $sqlmid = 'SELECT sc.rowid as ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."paiementcharge as sc";
+        $sqlmid .= " WHERE sc.rowid=".((int) $val["paymentscid"]);
+        $ref = $langs->transnoentitiesnoconv("SocialContribution");
+    } elseif ($typerecord == 'payment_vat') {
+        $sqlmid = 'SELECT v.rowid as ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."tva as v";
+        $sqlmid .= " WHERE v.rowid=".((int) $val["paymentvatid"]);
+        $ref = $langs->transnoentitiesnoconv("PaymentVat");
+    } elseif ($typerecord == 'payment_donation') {
+        $sqlmid = 'SELECT payd.fk_donation as ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_donation as payd";
+        $sqlmid .= " WHERE payd.fk_donation=".((int) $val["paymentdonationid"]);
+        $ref = $langs->transnoentitiesnoconv("Donation");
+    } elseif ($typerecord == 'payment_loan') {
+        $sqlmid = 'SELECT l.rowid as ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_loan as l";
+        $sqlmid .= " WHERE l.rowid=".((int) $val["paymentloanid"]);
+        $ref = $langs->transnoentitiesnoconv("LoanPayment");
+    } elseif ($typerecord == 'payment_various') {
+        $sqlmid = 'SELECT v.rowid as ref';
+        $sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_various as v";
+        $sqlmid .= " WHERE v.rowid=".((int) $val["paymentvariousid"]);
+        $ref = $langs->transnoentitiesnoconv("VariousPayment");
+    }
+    // Add warning
+    if (empty($sqlmid)) {
+        dol_syslog("Found a typerecord=".$typerecord." not supported", LOG_WARNING);
+    }
+
+    if ($sqlmid) {
+        dol_syslog("accountancy/journal/bankjournal.php::sqlmid=".$sqlmid, LOG_DEBUG);
+        $resultmid = $db->query($sqlmid);
+        if ($resultmid) {
+            while ($objmid = $db->fetch_object($resultmid)) {
+                $ref .= ' '.$objmid->ref;
+            }
+        } else {
+            dol_print_error($db);
+        }
+    }
 
-	$ref = dol_trunc($langs->transnoentitiesnoconv("BankId").' '.$val['fk_bank'].' - '.$ref, 295); // 295 + 3 dots (...) is < than max size of 300
-	return $ref;
+    $ref = dol_trunc($langs->transnoentitiesnoconv("BankId").' '.$val['fk_bank'].' - '.$ref, 295); // 295 + 3 dots (...) is < than max size of 300
+    return $ref;
 }

Spacing +197 added lines, -197 removed lines

@@ -369,12 +369,12 @@ 
 				if ($links[$key]['type'] == 'payment') {
 					$paymentstatic->id = $links[$key]['url_id'];
 					$paymentstatic->ref = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentstatic->getNomUrl(2, '', ''); // TODO Do not include list of invoice in tooltip, the dol_string_nohtmltag is ko with this
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentstatic->getNomUrl(2, '', ''); // TODO Do not include list of invoice in tooltip, the dol_string_nohtmltag is ko with this
 					$tabpay[$obj->rowid]["paymentid"] = $paymentstatic->id;
 				} elseif ($links[$key]['type'] == 'payment_supplier') {
 					$paymentsupplierstatic->id = $links[$key]['url_id'];
 					$paymentsupplierstatic->ref = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentsupplierstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentsupplierstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentsupplierid"] = $paymentsupplierstatic->id;
 				} elseif ($links[$key]['type'] == 'company') {
 					$societestatic->id = $links[$key]['url_id'];
@@ -409,7 +409,7 @@ 
 					$chargestatic->id = $links[$key]['url_id'];
 					$chargestatic->ref = $links[$key]['url_id'];
 
-					$tabpay[$obj->rowid]["lib"] .= ' '.$chargestatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $chargestatic->getNomUrl(2);
 					$reg = array();
 					if (preg_match('/^\((.*)\)$/i', $links[$key]['label'], $reg)) {
 						if ($reg[1] == 'socialcontribution') {
@@ -426,13 +426,13 @@ 
 					// Retrieve the accounting code of the social contribution of the payment from link of payment.
 					// Note: We have the social contribution id, it can be faster to get accounting code from social contribution id.
 					$sqlmid = "SELECT cchgsoc.accountancy_code";
-					$sqlmid .= " FROM ".MAIN_DB_PREFIX."c_chargesociales cchgsoc";
-					$sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."chargesociales as chgsoc ON chgsoc.fk_type = cchgsoc.id";
-					$sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."paiementcharge as paycharg ON paycharg.fk_charge = chgsoc.rowid";
-					$sqlmid .= " INNER JOIN ".MAIN_DB_PREFIX."bank_url as bkurl ON bkurl.url_id=paycharg.rowid AND bkurl.type = 'payment_sc'";
-					$sqlmid .= " WHERE bkurl.fk_bank = ".((int) $obj->rowid);
+					$sqlmid .= " FROM " . MAIN_DB_PREFIX . "c_chargesociales cchgsoc";
+					$sqlmid .= " INNER JOIN " . MAIN_DB_PREFIX . "chargesociales as chgsoc ON chgsoc.fk_type = cchgsoc.id";
+					$sqlmid .= " INNER JOIN " . MAIN_DB_PREFIX . "paiementcharge as paycharg ON paycharg.fk_charge = chgsoc.rowid";
+					$sqlmid .= " INNER JOIN " . MAIN_DB_PREFIX . "bank_url as bkurl ON bkurl.url_id=paycharg.rowid AND bkurl.type = 'payment_sc'";
+					$sqlmid .= " WHERE bkurl.fk_bank = " . ((int) $obj->rowid);
 
-					dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=".$sqlmid, LOG_DEBUG);
+					dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=" . $sqlmid, LOG_DEBUG);
 					$resultmid = $db->query($sqlmid);
 					if ($resultmid) {
 						$objmid = $db->fetch_object($resultmid);
@@ -442,14 +442,14 @@ 
 					$paymentdonstatic->id = $links[$key]['url_id'];
 					$paymentdonstatic->ref = $links[$key]['url_id'];
 					$paymentdonstatic->fk_donation = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentdonstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentdonstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentdonationid"] = $paymentdonstatic->id;
 					$tabtp[$obj->rowid][$account_pay_donation] += $amounttouse;
 				} elseif ($links[$key]['type'] == 'member') {
 					$paymentsubscriptionstatic->id = $links[$key]['url_id'];
 					$paymentsubscriptionstatic->ref = $links[$key]['url_id'];
 					$paymentsubscriptionstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentsubscriptionstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentsubscriptionstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentsubscriptionid"] = $paymentsubscriptionstatic->id;
 					$paymentsubscriptionstatic->fetch($paymentsubscriptionstatic->id);
 					$tabtp[$obj->rowid][$account_pay_subscription] += $amounttouse;
@@ -457,14 +457,14 @@ 
 					$paymentvatstatic->id = $links[$key]['url_id'];
 					$paymentvatstatic->ref = $links[$key]['url_id'];
 					$paymentvatstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentvatstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentvatstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentvatid"] = $paymentvatstatic->id;
 					$tabtp[$obj->rowid][$account_pay_vat] += $amounttouse;
 				} elseif ($links[$key]['type'] == 'payment_salary') {
 					$paymentsalstatic->id = $links[$key]['url_id'];
 					$paymentsalstatic->ref = $links[$key]['url_id'];
 					$paymentsalstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentsalstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentsalstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentsalid"] = $paymentsalstatic->id;
 
 					// This part of code is no more required. it is here to solve case where a link were missing (with v14.0.0) and keep writing in accountancy complete.
@@ -512,7 +512,7 @@ 
 					$paymentvariousstatic->id = $links[$key]['url_id'];
 					$paymentvariousstatic->ref = $links[$key]['url_id'];
 					$paymentvariousstatic->label = $links[$key]['label'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentvariousstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentvariousstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentvariousid"] = $paymentvariousstatic->id;
 					$paymentvariousstatic->fetch($paymentvariousstatic->id);
 					$account_various = (!empty($paymentvariousstatic->accountancy_code) ? $paymentvariousstatic->accountancy_code : 'NotDefined'); // NotDefined is a reserved word
@@ -523,14 +523,14 @@ 
 					$paymentloanstatic->id = $links[$key]['url_id'];
 					$paymentloanstatic->ref = $links[$key]['url_id'];
 					$paymentloanstatic->fk_loan = $links[$key]['url_id'];
-					$tabpay[$obj->rowid]["lib"] .= ' '.$paymentloanstatic->getNomUrl(2);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $paymentloanstatic->getNomUrl(2);
 					$tabpay[$obj->rowid]["paymentloanid"] = $paymentloanstatic->id;
 					//$tabtp[$obj->rowid][$account_pay_loan] += $amounttouse;
 					$sqlmid = 'SELECT pl.amount_capital, pl.amount_insurance, pl.amount_interest, l.accountancy_account_capital, l.accountancy_account_insurance, l.accountancy_account_interest';
-					$sqlmid .= ' FROM '.MAIN_DB_PREFIX.'payment_loan as pl, '.MAIN_DB_PREFIX.'loan as l';
-					$sqlmid .= ' WHERE l.rowid = pl.fk_loan AND pl.fk_bank = '.((int) $obj->rowid);
+					$sqlmid .= ' FROM ' . MAIN_DB_PREFIX . 'payment_loan as pl, ' . MAIN_DB_PREFIX . 'loan as l';
+					$sqlmid .= ' WHERE l.rowid = pl.fk_loan AND pl.fk_bank = ' . ((int) $obj->rowid);
 
-					dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=".$sqlmid, LOG_DEBUG);
+					dol_syslog("accountancy/journal/bankjournal.php:: sqlmid=" . $sqlmid, LOG_DEBUG);
 					$resultmid = $db->query($sqlmid);
 					if ($resultmid) {
 						$objmid = $db->fetch_object($resultmid);
@@ -540,7 +540,7 @@ 
 					}
 				} elseif ($links[$key]['type'] == 'banktransfert') {
 					$accountLinestatic->fetch($links[$key]['url_id']);
-					$tabpay[$obj->rowid]["lib"] .= ' '.$langs->trans("BankTransfer").'- '.$accountLinestatic ->getNomUrl(1);
+					$tabpay[$obj->rowid]["lib"] .= ' ' . $langs->trans("BankTransfer") . '- ' . $accountLinestatic ->getNomUrl(1);
 					$tabtp[$obj->rowid][$account_transfer] += $amounttouse;
 					$bankaccountstatic->fetch($tabpay[$obj->rowid]['fk_bank_account']);
 					$tabpay[$obj->rowid]["soclib"] = $bankaccountstatic->getNomUrl(2);
@@ -653,16 +653,16 @@ 
 			// Line into bank account
 			foreach ($tabbq[$key] as $k => $mt) {
 				if ($mt) {
-					$accountingaccount->fetch(null, $k, true);	// $k is accounting bank account. TODO We should use a cache here to avoid this fetch
+					$accountingaccount->fetch(null, $k, true); // $k is accounting bank account. TODO We should use a cache here to avoid this fetch
 					$account_label = $accountingaccount->label;
 
 					$reflabel = '';
 					if (!empty($val['lib'])) {
-						$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+						$reflabel .= dol_string_nohtmltag($val['lib']) . " - ";
 					}
-					$reflabel .= $langs->trans("Bank").' '.dol_string_nohtmltag($val['bank_account_ref']);
+					$reflabel .= $langs->trans("Bank") . ' ' . dol_string_nohtmltag($val['bank_account_ref']);
 					if (!empty($val['soclib'])) {
-						$reflabel .= " - ".dol_string_nohtmltag($val['soclib']);
+						$reflabel .= " - " . dol_string_nohtmltag($val['soclib']);
 					}
 
 					$bookkeeping = new BookKeeping($db);
@@ -698,7 +698,7 @@ 
 						if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
 							$error++;
 							$errorforline++;
-							setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
+							setEventMessages('Transaction for (' . $bookkeeping->doc_type . ', ' . $bookkeeping->fk_doc . ', ' . $bookkeeping->fk_docdet . ') were already recorded', null, 'warnings');
 						} else {
 							$error++;
 							$errorforline++;
@@ -719,10 +719,10 @@ 
 
 						$reflabel = '';
 						if (!empty($val['lib'])) {
-							$reflabel .= dol_string_nohtmltag($val['lib']).($val['soclib'] ? " - " : "");
+							$reflabel .= dol_string_nohtmltag($val['lib']) . ($val['soclib'] ? " - " : "");
 						}
 						if ($tabtype[$key] == 'banktransfert') {
-							$reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount').' '.$account_transfer);
+							$reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount') . ' ' . $account_transfer);
 						} else {
 							$reflabel .= dol_string_nohtmltag($val['soclib']);
 						}
@@ -769,43 +769,43 @@ 
 						} elseif (in_array($tabtype[$key], array('sc', 'payment_sc'))) {   // If payment is payment of social contribution
 							$bookkeeping->subledger_account = '';
 							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);	// TODO Use a cache
+							$accountingaccount->fetch(null, $k, true); // TODO Use a cache
 							$bookkeeping->numero_compte = $k;
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} elseif ($tabtype[$key] == 'payment_vat') {
 							$bookkeeping->subledger_account = '';
 							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+							$accountingaccount->fetch(null, $k, true); // TODO Use a cache
 							$bookkeeping->numero_compte = $k;
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} elseif ($tabtype[$key] == 'payment_donation') {
 							$bookkeeping->subledger_account = '';
 							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+							$accountingaccount->fetch(null, $k, true); // TODO Use a cache
 							$bookkeeping->numero_compte = $k;
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} elseif ($tabtype[$key] == 'member') {
 							$bookkeeping->subledger_account = '';
 							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+							$accountingaccount->fetch(null, $k, true); // TODO Use a cache
 							$bookkeeping->numero_compte = $k;
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} elseif ($tabtype[$key] == 'payment_loan') {
 							$bookkeeping->subledger_account = '';
 							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+							$accountingaccount->fetch(null, $k, true); // TODO Use a cache
 							$bookkeeping->numero_compte = $k;
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} elseif ($tabtype[$key] == 'payment_various') {
 							$bookkeeping->subledger_account = $k;
 							$bookkeeping->subledger_label = $tabcompany[$key]['name'];
-							$accountingaccount->fetch(null, $tabpay[$key]["account_various"], true);	// TODO Use a cache
+							$accountingaccount->fetch(null, $tabpay[$key]["account_various"], true); // TODO Use a cache
 							$bookkeeping->numero_compte = $tabpay[$key]["account_various"];
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} elseif ($tabtype[$key] == 'banktransfert') {
 							$bookkeeping->subledger_account = '';
 							$bookkeeping->subledger_label = '';
-							$accountingaccount->fetch(null, $k, true);		// TODO Use a cache
+							$accountingaccount->fetch(null, $k, true); // TODO Use a cache
 							$bookkeeping->numero_compte = $k;
 							$bookkeeping->label_compte = $accountingaccount->label;
 						} else {
@@ -828,7 +828,7 @@ 
 							if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
 								$error++;
 								$errorforline++;
-								setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
+								setEventMessages('Transaction for (' . $bookkeeping->doc_type . ', ' . $bookkeeping->fk_doc . ', ' . $bookkeeping->fk_docdet . ') were already recorded', null, 'warnings');
 							} else {
 								$error++;
 								$errorforline++;
@@ -848,7 +848,7 @@ 
 					if ($mt) {
 						$reflabel = '';
 						if (!empty($val['lib'])) {
-							$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+							$reflabel .= dol_string_nohtmltag($val['lib']) . " - ";
 						}
 						$reflabel .= dol_string_nohtmltag('WaitingAccount');
 
@@ -879,7 +879,7 @@ 
 							if ($bookkeeping->error == 'BookkeepingRecordAlreadyExists') {	// Already exists
 								$error++;
 								$errorforline++;
-								setEventMessages('Transaction for ('.$bookkeeping->doc_type.', '.$bookkeeping->fk_doc.', '.$bookkeeping->fk_docdet.') were already recorded', null, 'warnings');
+								setEventMessages('Transaction for (' . $bookkeeping->doc_type . ', ' . $bookkeeping->fk_doc . ', ' . $bookkeeping->fk_docdet . ') were already recorded', null, 'warnings');
 							} else {
 								$error++;
 								$errorforline++;
@@ -894,7 +894,7 @@ 
 		if (price2num($totaldebit, 'MT') != price2num($totalcredit, 'MT')) {
 			$error++;
 			$errorforline++;
-			setEventMessages('We tried to insert a non balanced transaction in book for '.$ref.'. Canceled. Surely a bug.', null, 'errors');
+			setEventMessages('We tried to insert a non balanced transaction in book for ' . $ref . '. Canceled. Surely a bug.', null, 'errors');
 		}
 
 		if (!$errorforline) {
@@ -905,7 +905,7 @@ 
 
 			$MAXNBERRORS = 5;
 			if ($error >= $MAXNBERRORS) {
-				setEventMessages($langs->trans("ErrorTooManyErrorsProcessStopped").' (>'.$MAXNBERRORS.')', null, 'errors');
+				setEventMessages($langs->trans("ErrorTooManyErrorsProcessStopped") . ' (>' . $MAXNBERRORS . ')', null, 'errors');
 				break; // Break in the foreach
 			}
 		}
@@ -923,15 +923,15 @@ 
 
 	// Must reload data, so we make a redirect
 	if (count($tabpay) != $error) {
-		$param = 'id_journal='.$id_journal;
-		$param .= '&date_startday='.$date_startday;
-		$param .= '&date_startmonth='.$date_startmonth;
-		$param .= '&date_startyear='.$date_startyear;
-		$param .= '&date_endday='.$date_endday;
-		$param .= '&date_endmonth='.$date_endmonth;
-		$param .= '&date_endyear='.$date_endyear;
-		$param .= '&in_bookkeeping='.$in_bookkeeping;
-		header("Location: ".$_SERVER['PHP_SELF'].($param ? '?'.$param : ''));
+		$param = 'id_journal=' . $id_journal;
+		$param .= '&date_startday=' . $date_startday;
+		$param .= '&date_startmonth=' . $date_startmonth;
+		$param .= '&date_startyear=' . $date_startyear;
+		$param .= '&date_endday=' . $date_endday;
+		$param .= '&date_endmonth=' . $date_endmonth;
+		$param .= '&date_endyear=' . $date_endyear;
+		$param .= '&in_bookkeeping=' . $in_bookkeeping;
+		header("Location: " . $_SERVER['PHP_SELF'] . ($param ? '?' . $param : ''));
 		exit;
 	}
 }
@@ -944,20 +944,20 @@ 
 
 	$filename = 'journal';
 	$type_export = 'journal';
-	include DOL_DOCUMENT_ROOT.'/accountancy/tpl/export_journal.tpl.php';
+	include DOL_DOCUMENT_ROOT . '/accountancy/tpl/export_journal.tpl.php';
 
 	// CSV header line
-	print '"'.$langs->transnoentitiesnoconv("BankId").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Date").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("PaymentMode").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("AccountAccounting").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("LedgerAccount").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("SubledgerAccount").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Label").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("AccountingDebit").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("AccountingCredit").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Journal").'"'.$sep;
-	print '"'.$langs->transnoentitiesnoconv("Note").'"'.$sep;
+	print '"' . $langs->transnoentitiesnoconv("BankId") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("Date") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("PaymentMode") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("AccountAccounting") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("LedgerAccount") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("SubledgerAccount") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("Label") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("AccountingDebit") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("AccountingCredit") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("Journal") . '"' . $sep;
+	print '"' . $langs->transnoentitiesnoconv("Note") . '"' . $sep;
 	print "\n";
 
 	foreach ($tabpay as $key => $val) {
@@ -970,24 +970,24 @@ 
 			if ($mt) {
 				$reflabel = '';
 				if (!empty($val['lib'])) {
-					$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+					$reflabel .= dol_string_nohtmltag($val['lib']) . " - ";
 				}
-				$reflabel .= $langs->trans("Bank").' '.dol_string_nohtmltag($val['bank_account_ref']);
+				$reflabel .= $langs->trans("Bank") . ' ' . dol_string_nohtmltag($val['bank_account_ref']);
 				if (!empty($val['soclib'])) {
-					$reflabel .= " - ".dol_string_nohtmltag($val['soclib']);
+					$reflabel .= " - " . dol_string_nohtmltag($val['soclib']);
 				}
 
-				print '"'.$key.'"'.$sep;
-				print '"'.$date.'"'.$sep;
-				print '"'.$val["type_payment"].'"'.$sep;
-				print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
-				print '"'.length_accounta(html_entity_decode($k)).'"'.$sep;
-				print "  ".$sep;
-				print '"'.$reflabel.'"'.$sep;
-				print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
-				print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
-				print '"'.$journal.'"'.$sep;
-				print '"'.dol_string_nohtmltag($ref).'"'.$sep;
+				print '"' . $key . '"' . $sep;
+				print '"' . $date . '"' . $sep;
+				print '"' . $val["type_payment"] . '"' . $sep;
+				print '"' . length_accountg(html_entity_decode($k)) . '"' . $sep;
+				print '"' . length_accounta(html_entity_decode($k)) . '"' . $sep;
+				print "  " . $sep;
+				print '"' . $reflabel . '"' . $sep;
+				print '"' . ($mt >= 0 ? price($mt) : '') . '"' . $sep;
+				print '"' . ($mt < 0 ? price(-$mt) : '') . '"' . $sep;
+				print '"' . $journal . '"' . $sep;
+				print '"' . dol_string_nohtmltag($ref) . '"' . $sep;
 				print "\n";
 			}
 		}
@@ -998,35 +998,35 @@ 
 				if ($mt) {
 					$reflabel = '';
 					if (!empty($val['lib'])) {
-						$reflabel .= dol_string_nohtmltag($val['lib']).($val['soclib'] ? " - " : "");
+						$reflabel .= dol_string_nohtmltag($val['lib']) . ($val['soclib'] ? " - " : "");
 					}
 					if ($tabtype[$key] == 'banktransfert') {
-						$reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount').' '.$account_transfer);
+						$reflabel .= dol_string_nohtmltag($langs->transnoentitiesnoconv('TransitionalAccount') . ' ' . $account_transfer);
 					} else {
 						$reflabel .= dol_string_nohtmltag($val['soclib']);
 					}
 
-					print '"'.$key.'"'.$sep;
-					print '"'.$date.'"'.$sep;
-					print '"'.$val["type_payment"].'"'.$sep;
-					print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
+					print '"' . $key . '"' . $sep;
+					print '"' . $date . '"' . $sep;
+					print '"' . $val["type_payment"] . '"' . $sep;
+					print '"' . length_accountg(html_entity_decode($k)) . '"' . $sep;
 					if ($tabtype[$key] == 'payment_supplier') {
-						print '"'.getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER').'"'.$sep;
+						print '"' . getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') . '"' . $sep;
 					} elseif ($tabtype[$key] == 'payment') {
-						print '"'.getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER').'"'.$sep;
+						print '"' . getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') . '"' . $sep;
 					} elseif ($tabtype[$key] == 'payment_expensereport') {
-						print '"'.getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT').'"'.$sep;
+						print '"' . getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') . '"' . $sep;
 					} elseif ($tabtype[$key] == 'payment_salary') {
-						print '"'.getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT').'"'.$sep;
+						print '"' . getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') . '"' . $sep;
 					} else {
-						print '"'.length_accountg(html_entity_decode($k)).'"'.$sep;
+						print '"' . length_accountg(html_entity_decode($k)) . '"' . $sep;
 					}
-					print '"'.length_accounta(html_entity_decode($k)).'"'.$sep;
-					print '"'.$reflabel.'"'.$sep;
-					print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
-					print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
-					print '"'.$journal.'"'.$sep;
-					print '"'.dol_string_nohtmltag($ref).'"'.$sep;
+					print '"' . length_accounta(html_entity_decode($k)) . '"' . $sep;
+					print '"' . $reflabel . '"' . $sep;
+					print '"' . ($mt < 0 ? price(-$mt) : '') . '"' . $sep;
+					print '"' . ($mt >= 0 ? price($mt) : '') . '"' . $sep;
+					print '"' . $journal . '"' . $sep;
+					print '"' . dol_string_nohtmltag($ref) . '"' . $sep;
 					print "\n";
 				}
 			}
@@ -1035,21 +1035,21 @@ 
 				if ($mt) {
 					$reflabel = '';
 					if (!empty($val['lib'])) {
-						$reflabel .= dol_string_nohtmltag($val['lib'])." - ";
+						$reflabel .= dol_string_nohtmltag($val['lib']) . " - ";
 					}
 					$reflabel .= dol_string_nohtmltag('WaitingAccount');
 
-					print '"'.$key.'"'.$sep;
-					print '"'.$date.'"'.$sep;
-					print '"'.$val["type_payment"].'"'.$sep;
-					print '"'.length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')).'"'.$sep;
-					print '"'.length_accounta(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')).'"'.$sep;
+					print '"' . $key . '"' . $sep;
+					print '"' . $date . '"' . $sep;
+					print '"' . $val["type_payment"] . '"' . $sep;
+					print '"' . length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')) . '"' . $sep;
+					print '"' . length_accounta(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE')) . '"' . $sep;
 					print $sep;
-					print '"'.$reflabel.'"'.$sep;
-					print '"'.($mt < 0 ? price(-$mt) : '').'"'.$sep;
-					print '"'.($mt >= 0 ? price($mt) : '').'"'.$sep;
-					print '"'.$journal.'"'.$sep;
-					print '"'.dol_string_nohtmltag($ref).'"'.$sep;
+					print '"' . $reflabel . '"' . $sep;
+					print '"' . ($mt < 0 ? price(-$mt) : '') . '"' . $sep;
+					print '"' . ($mt >= 0 ? price($mt) : '') . '"' . $sep;
+					print '"' . $journal . '"' . $sep;
+					print '"' . dol_string_nohtmltag($ref) . '"' . $sep;
 					print "\n";
 				}
 			}
@@ -1074,23 +1074,23 @@ 
 	$salarystatic = new Salary($db);
 	$variousstatic = new PaymentVarious($db);
 
-	$title = $langs->trans("GenerationOfAccountingEntries").' - '.$accountingjournalstatic->getNomUrl(0, 2, 1, '', 1);
+	$title = $langs->trans("GenerationOfAccountingEntries") . ' - ' . $accountingjournalstatic->getNomUrl(0, 2, 1, '', 1);
 
 	llxHeader('', dol_string_nohtmltag($title));
 
 	$nom = $title;
 	$builddate = dol_now();
 	//$description = $langs->trans("DescFinanceJournal") . '<br>';
-	$description = $langs->trans("DescJournalOnlyBindedVisible").'<br>';
+	$description = $langs->trans("DescJournalOnlyBindedVisible") . '<br>';
 
 	$listofchoices = array(
 		'notyet' => $langs->trans("NotYetInGeneralLedger"),
 		'already' => $langs->trans("AlreadyInGeneralLedger")
 	);
-	$period = $form->selectDate($date_start ? $date_start : -1, 'date_start', 0, 0, 0, '', 1, 0).' - '.$form->selectDate($date_end ? $date_end : -1, 'date_end', 0, 0, 0, '', 1, 0);
-	$period .= ' -  '.$langs->trans("JournalizationInLedgerStatus").' '.$form->selectarray('in_bookkeeping', $listofchoices, $in_bookkeeping, 1);
+	$period = $form->selectDate($date_start ? $date_start : -1, 'date_start', 0, 0, 0, '', 1, 0) . ' - ' . $form->selectDate($date_end ? $date_end : -1, 'date_end', 0, 0, 0, '', 1, 0);
+	$period .= ' -  ' . $langs->trans("JournalizationInLedgerStatus") . ' ' . $form->selectarray('in_bookkeeping', $listofchoices, $in_bookkeeping, 1);
 
-	$varlink = 'id_journal='.$id_journal;
+	$varlink = 'id_journal=' . $id_journal;
 	$periodlink = '';
 	$exportlink = '';
 
@@ -1101,14 +1101,14 @@ 
 	if (getDolGlobalString('ACCOUNTANCY_FISCAL_PERIOD_MODE') != 'blockedonclosed') {
 		// Test that setup is complete (we are in accounting, so test on entity is always on $conf->entity only, no sharing allowed)
 		// Fiscal period test
-		$sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."accounting_fiscalyear WHERE entity = ".((int) $conf->entity);
+		$sql = "SELECT COUNT(rowid) as nb FROM " . MAIN_DB_PREFIX . "accounting_fiscalyear WHERE entity = " . ((int) $conf->entity);
 		$resql = $db->query($sql);
 		if ($resql) {
 			$obj = $db->fetch_object($resql);
 			if ($obj->nb == 0) {
-				print '<br><div class="warning">'.img_warning().' '.$langs->trans("TheFiscalPeriodIsNotDefined");
-				$desc = ' : '.$langs->trans("AccountancyAreaDescFiscalPeriod", 4, '{link}');
-				$desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("FiscalPeriod").'</strong>', $desc);
+				print '<br><div class="warning">' . img_warning() . ' ' . $langs->trans("TheFiscalPeriodIsNotDefined");
+				$desc = ' : ' . $langs->trans("AccountancyAreaDescFiscalPeriod", 4, '{link}');
+				$desc = str_replace('{link}', '<strong>' . $langs->transnoentitiesnoconv("MenuAccountancy") . '-' . $langs->transnoentitiesnoconv("Setup") . "-" . $langs->transnoentitiesnoconv("FiscalPeriod") . '</strong>', $desc);
 				print $desc;
 				print '</div>';
 			}
@@ -1118,14 +1118,14 @@ 
 	}
 
 	// Bank test
-	$sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."bank_account WHERE entity = ".((int) $conf->entity)." AND fk_accountancy_journal IS NULL AND clos=0";
+	$sql = "SELECT COUNT(rowid) as nb FROM " . MAIN_DB_PREFIX . "bank_account WHERE entity = " . ((int) $conf->entity) . " AND fk_accountancy_journal IS NULL AND clos=0";
 	$resql = $db->query($sql);
 	if ($resql) {
 		$obj = $db->fetch_object($resql);
 		if ($obj->nb > 0) {
-			print '<br><div class="warning">'.img_warning().' '.$langs->trans("TheJournalCodeIsNotDefinedOnSomeBankAccount");
-			$desc = ' : '.$langs->trans("AccountancyAreaDescBank", 6, '{link}');
-			$desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("BankAccounts").'</strong>', $desc);
+			print '<br><div class="warning">' . img_warning() . ' ' . $langs->trans("TheJournalCodeIsNotDefinedOnSomeBankAccount");
+			$desc = ' : ' . $langs->trans("AccountancyAreaDescBank", 6, '{link}');
+			$desc = str_replace('{link}', '<strong>' . $langs->transnoentitiesnoconv("MenuAccountancy") . '-' . $langs->transnoentitiesnoconv("Setup") . "-" . $langs->transnoentitiesnoconv("BankAccounts") . '</strong>', $desc);
 			print $desc;
 			print '</div>';
 		}
@@ -1138,9 +1138,9 @@ 
 	if (getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == '-1'
 		|| getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == '-1'
 		|| getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') == "" || getDolGlobalString('SALARIES_ACCOUNTING_ACCOUNT_PAYMENT') == '-1') {
-		print($desc ? '' : '<br>').'<div class="warning">'.img_warning().' '.$langs->trans("SomeMandatoryStepsOfSetupWereNotDone");
-		$desc = ' : '.$langs->trans("AccountancyAreaDescMisc", 4, '{link}');
-		$desc = str_replace('{link}', '<strong>'.$langs->transnoentitiesnoconv("MenuAccountancy").'-'.$langs->transnoentitiesnoconv("Setup")."-".$langs->transnoentitiesnoconv("MenuDefaultAccounts").'</strong>', $desc);
+		print($desc ? '' : '<br>') . '<div class="warning">' . img_warning() . ' ' . $langs->trans("SomeMandatoryStepsOfSetupWereNotDone");
+		$desc = ' : ' . $langs->trans("AccountancyAreaDescMisc", 4, '{link}');
+		$desc = str_replace('{link}', '<strong>' . $langs->transnoentitiesnoconv("MenuAccountancy") . '-' . $langs->transnoentitiesnoconv("Setup") . "-" . $langs->transnoentitiesnoconv("MenuDefaultAccounts") . '</strong>', $desc);
 		print $desc;
 		print '</div>';
 	}
@@ -1149,17 +1149,17 @@ 
 	print '<br><div class="tabsAction tabsActionNoBottom centerimp">';
 
 	if (getDolGlobalString('ACCOUNTING_ENABLE_EXPORT_DRAFT_JOURNAL') && $in_bookkeeping == 'notyet') {
-		print '<input type="button" class="butAction" name="exportcsv" value="'.$langs->trans("ExportDraftJournal").'" onclick="launch_export();" />';
+		print '<input type="button" class="butAction" name="exportcsv" value="' . $langs->trans("ExportDraftJournal") . '" onclick="launch_export();" />';
 	}
 
 	if (getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_CUSTOMER') == '-1'
 		|| getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == "" || getDolGlobalString('ACCOUNTING_ACCOUNT_SUPPLIER') == '-1') {
-		print '<input type="button" class="butActionRefused classfortooltip" title="'.dol_escape_htmltag($langs->trans("SomeMandatoryStepsOfSetupWereNotDone")).'" value="'.$langs->trans("WriteBookKeeping").'" />';
+		print '<input type="button" class="butActionRefused classfortooltip" title="' . dol_escape_htmltag($langs->trans("SomeMandatoryStepsOfSetupWereNotDone")) . '" value="' . $langs->trans("WriteBookKeeping") . '" />';
 	} else {
 		if ($in_bookkeeping == 'notyet') {
-			print '<input type="button" class="butAction" name="writebookkeeping" value="'.$langs->trans("WriteBookKeeping").'" onclick="writebookkeeping();" />';
+			print '<input type="button" class="butAction" name="writebookkeeping" value="' . $langs->trans("WriteBookKeeping") . '" onclick="writebookkeeping();" />';
 		} else {
-			print '<a class="butActionRefused classfortooltip" name="writebookkeeping">'.$langs->trans("WriteBookKeeping").'</a>';
+			print '<a class="butActionRefused classfortooltip" name="writebookkeeping">' . $langs->trans("WriteBookKeeping") . '</a>';
 		}
 	}
 
@@ -1191,14 +1191,14 @@ 
 	print '<div class="div-table-responsive">';
 	print '<table class="noborder centpercent">';
 	print '<tr class="liste_titre">';
-	print "<td>".$langs->trans("Date")."</td>";
-	print "<td>".$langs->trans("Piece").' ('.$langs->trans("ObjectsRef").")</td>";
-	print "<td>".$langs->trans("AccountAccounting")."</td>";
-	print "<td>".$langs->trans("SubledgerAccount")."</td>";
-	print "<td>".$langs->trans("LabelOperation")."</td>";
-	print '<td class="center">'.$langs->trans("PaymentMode")."</td>";
-	print '<td class="right">'.$langs->trans("AccountingDebit")."</td>";
-	print '<td class="right">'.$langs->trans("AccountingCredit")."</td>";
+	print "<td>" . $langs->trans("Date") . "</td>";
+	print "<td>" . $langs->trans("Piece") . ' (' . $langs->trans("ObjectsRef") . ")</td>";
+	print "<td>" . $langs->trans("AccountAccounting") . "</td>";
+	print "<td>" . $langs->trans("SubledgerAccount") . "</td>";
+	print "<td>" . $langs->trans("LabelOperation") . "</td>";
+	print '<td class="center">' . $langs->trans("PaymentMode") . "</td>";
+	print '<td class="right">' . $langs->trans("AccountingDebit") . "</td>";
+	print '<td class="right">' . $langs->trans("AccountingCredit") . "</td>";
 	print "</tr>\n";
 
 	$r = '';
@@ -1213,29 +1213,29 @@ 
 			if ($mt) {
 				$reflabel = '';
 				if (!empty($val['lib'])) {
-					$reflabel .= $val['lib']." - ";
+					$reflabel .= $val['lib'] . " - ";
 				}
-				$reflabel .= $langs->trans("Bank").' '.$val['bank_account_ref'];
+				$reflabel .= $langs->trans("Bank") . ' ' . $val['bank_account_ref'];
 				if (!empty($val['soclib'])) {
-					$reflabel .= " - ".$val['soclib'];
+					$reflabel .= " - " . $val['soclib'];
 				}
 
 				//var_dump($tabpay[$key]);
-				print '<!-- Bank bank.rowid='.$key.' type='.$tabpay[$key]['type'].' ref='.$tabpay[$key]['ref'].'-->';
+				print '<!-- Bank bank.rowid=' . $key . ' type=' . $tabpay[$key]['type'] . ' ref=' . $tabpay[$key]['ref'] . '-->';
 				print '<tr class="oddeven">';
 
 				// Date
-				print "<td>".$date."</td>";
+				print "<td>" . $date . "</td>";
 
 				// Ref
-				print "<td>".dol_escape_htmltag($ref)."</td>";
+				print "<td>" . dol_escape_htmltag($ref) . "</td>";
 
 				// Ledger account
 				$accounttoshow = length_accountg($k);
 				if (empty($accounttoshow) || $accounttoshow == 'NotDefined') {
-					$accounttoshow = '<span class="error">'.$langs->trans("BankAccountNotDefined").'</span>';
+					$accounttoshow = '<span class="error">' . $langs->trans("BankAccountNotDefined") . '</span>';
 				}
-				print '<td class="maxwidth300" title="'.dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)).'">';
+				print '<td class="maxwidth300" title="' . dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)) . '">';
 				print $accounttoshow;
 				print "</td>";
 
@@ -1251,12 +1251,12 @@ 
 
 				// Label operation
 				print '<td>';
-				print $reflabel;	// This is already html escaped content
+				print $reflabel; // This is already html escaped content
 				print "</td>";
 
-				print '<td class="center">'.$val["type_payment"]."</td>";
-				print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
-				print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
+				print '<td class="center">' . $val["type_payment"] . "</td>";
+				print '<td class="right nowraponall amount">' . ($mt >= 0 ? price($mt) : '') . "</td>";
+				print '<td class="right nowraponall amount">' . ($mt < 0 ? price(-$mt) : '') . "</td>";
 				print "</tr>";
 
 				$i++;
@@ -1269,22 +1269,22 @@ 
 				if ($mt) {
 					$reflabel = '';
 					if (!empty($val['lib'])) {
-						$reflabel .= $val['lib'].($val['soclib'] ? " - " : "");
+						$reflabel .= $val['lib'] . ($val['soclib'] ? " - " : "");
 					}
 					if ($tabtype[$key] == 'banktransfert') {
-						$reflabel .= $langs->trans('TransitionalAccount').' '.$account_transfer;
+						$reflabel .= $langs->trans('TransitionalAccount') . ' ' . $account_transfer;
 					} else {
 						$reflabel .= $val['soclib'];
 					}
 
-					print '<!-- Thirdparty bank.rowid='.$key.' -->';
+					print '<!-- Thirdparty bank.rowid=' . $key . ' -->';
 					print '<tr class="oddeven">';
 
 					// Date
-					print "<td>".$date."</td>";
+					print "<td>" . $date . "</td>";
 
 					// Ref
-					print "<td>".dol_escape_htmltag($ref)."</td>";
+					print "<td>" . dol_escape_htmltag($ref) . "</td>";
 
 					// Ledger account
 					$account_ledger = $k;
@@ -1315,9 +1315,9 @@ 
 						if ($tabtype[$key] == 'unknown') {
 							// We will accept writing, but into a waiting account
 							if (!getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE') || getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE') == '-1') {
-								$accounttoshow = '<span class="error small">'.$langs->trans('UnknownAccountForThirdpartyAndWaitingAccountNotDefinedBlocking').'</span>';
+								$accounttoshow = '<span class="error small">' . $langs->trans('UnknownAccountForThirdpartyAndWaitingAccountNotDefinedBlocking') . '</span>';
 							} else {
-								$accounttoshow = '<span class="warning small">'.$langs->trans('UnknownAccountForThirdparty', length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'))).'</span>'; // We will use a waiting account
+								$accounttoshow = '<span class="warning small">' . $langs->trans('UnknownAccountForThirdparty', length_accountg(getDolGlobalString('ACCOUNTING_ACCOUNT_SUSPENSE'))) . '</span>'; // We will use a waiting account
 							}
 						} else {
 							// We will refuse writing
@@ -1340,11 +1340,11 @@ 
 							if ($tabtype[$key] == 'member') {
 								$errorstring = 'MainAccountForSubscriptionPaymentNotDefined';
 							}
-							$accounttoshow = '<span class="error small">'.$langs->trans($errorstring).'</span>';
+							$accounttoshow = '<span class="error small">' . $langs->trans($errorstring) . '</span>';
 						}
 					}
-					print '<td class="maxwidth300" title="'.dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)).'">';
-					print $accounttoshow;	// This is a HTML string
+					print '<td class="maxwidth300" title="' . dol_escape_htmltag(dol_string_nohtmltag($accounttoshow)) . '">';
+					print $accounttoshow; // This is a HTML string
 					print "</td>";
 
 					// Subledger account
@@ -1360,12 +1360,12 @@ 
 								if (!empty($tabcompany[$key]['code_compta'])) {
 									if (in_array($tabtype[$key], array('payment_various', 'payment_salary'))) {
 										// For such case, if subledger is not defined, we won't use subledger accounts.
-										$accounttoshowsubledger = '<span class="warning small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownSubledgerIgnored").'</span>';
+										$accounttoshowsubledger = '<span class="warning small">' . $langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownSubledgerIgnored") . '</span>';
 									} else {
-										$accounttoshowsubledger = '<span class="warning small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknown", $tabcompany[$key]['code_compta']).'</span>';
+										$accounttoshowsubledger = '<span class="warning small">' . $langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknown", $tabcompany[$key]['code_compta']) . '</span>';
 									}
 								} else {
-									$accounttoshowsubledger = '<span class="error small">'.$langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownBlocking").'</span>';
+									$accounttoshowsubledger = '<span class="error small">' . $langs->trans("ThirdpartyAccountNotDefinedOrThirdPartyUnknownBlocking") . '</span>';
 								}
 							}
 						} else {
@@ -1373,16 +1373,16 @@ 
 						}
 					}
 					print '<td class="maxwidth300">';
-					print $accounttoshowsubledger;	// This is a html string
+					print $accounttoshowsubledger; // This is a html string
 					print "</td>";
 
-					print "<td>".$reflabel."</td>";
+					print "<td>" . $reflabel . "</td>";
 
-					print '<td class="center">'.$val["type_payment"]."</td>";
+					print '<td class="center">' . $val["type_payment"] . "</td>";
 
-					print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
+					print '<td class="right nowraponall amount">' . ($mt < 0 ? price(-$mt) : '') . "</td>";
 
-					print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
+					print '<td class="right nowraponall amount">' . ($mt >= 0 ? price($mt) : '') . "</td>";
 
 					print "</tr>";
 
@@ -1394,14 +1394,14 @@ 
 				if ($mt) {
 					$reflabel = '';
 					if (!empty($val['lib'])) {
-						$reflabel .= $val['lib']." - ";
+						$reflabel .= $val['lib'] . " - ";
 					}
 					$reflabel .= 'WaitingAccount';
 
-					print '<!-- Wait bank.rowid='.$key.' -->';
+					print '<!-- Wait bank.rowid=' . $key . ' -->';
 					print '<tr class="oddeven">';
-					print "<td>".$date."</td>";
-					print "<td>".$ref."</td>";
+					print "<td>" . $date . "</td>";
+					print "<td>" . $ref . "</td>";
 					// Ledger account
 					print "<td>";
 					/*if (empty($accounttoshow) || $accounttoshow == 'NotDefined')
@@ -1414,10 +1414,10 @@ 
 					// Subledger account
 					print "<td>";
 					print "</td>";
-					print "<td>".dol_escape_htmltag($reflabel)."</td>";
-					print '<td class="center">'.$val["type_payment"]."</td>";
-					print '<td class="right nowraponall amount">'.($mt < 0 ? price(-$mt) : '')."</td>";
-					print '<td class="right nowraponall amount">'.($mt >= 0 ? price($mt) : '')."</td>";
+					print "<td>" . dol_escape_htmltag($reflabel) . "</td>";
+					print '<td class="center">' . $val["type_payment"] . "</td>";
+					print '<td class="right nowraponall amount">' . ($mt < 0 ? price(-$mt) : '') . "</td>";
+					print '<td class="right nowraponall amount">' . ($mt >= 0 ? price($mt) : '') . "</td>";
 					print "</tr>";
 
 					$i++;
@@ -1428,7 +1428,7 @@ 
 
 	if (!$i) {
 		$colspan = 8;
-		print '<tr class="oddeven"><td colspan="'.$colspan.'"><span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span></td></tr>';
+		print '<tr class="oddeven"><td colspan="' . $colspan . '"><span class="opacitymedium">' . $langs->trans("NoRecordFound") . '</span></td></tr>';
 	}
 
 	print "</table>";
@@ -1483,77 +1483,77 @@ 
 	$sqlmid = '';
 	if ($typerecord == 'payment') {
 		if (getDolGlobalInt('FACTURE_DEPOSITS_ARE_JUST_PAYMENTS')) {
-			$sqlmid = "SELECT payfac.fk_facture as id, ".$db->ifsql('f1.rowid IS NULL', 'f.ref', 'f1.ref')." as ref";
-			$sqlmid .= " FROM ".$db->prefix()."paiement_facture as payfac";
-			$sqlmid .= " LEFT JOIN ".$db->prefix()."facture as f ON f.rowid = payfac.fk_facture";
-			$sqlmid .= " LEFT JOIN ".$db->prefix()."societe_remise_except as sre ON sre.fk_facture_source = payfac.fk_facture";
-			$sqlmid .= " LEFT JOIN ".$db->prefix()."facture as f1 ON f1.rowid = sre.fk_facture";
-			$sqlmid .= " WHERE payfac.fk_paiement=".((int) $val['paymentid']);
+			$sqlmid = "SELECT payfac.fk_facture as id, " . $db->ifsql('f1.rowid IS NULL', 'f.ref', 'f1.ref') . " as ref";
+			$sqlmid .= " FROM " . $db->prefix() . "paiement_facture as payfac";
+			$sqlmid .= " LEFT JOIN " . $db->prefix() . "facture as f ON f.rowid = payfac.fk_facture";
+			$sqlmid .= " LEFT JOIN " . $db->prefix() . "societe_remise_except as sre ON sre.fk_facture_source = payfac.fk_facture";
+			$sqlmid .= " LEFT JOIN " . $db->prefix() . "facture as f1 ON f1.rowid = sre.fk_facture";
+			$sqlmid .= " WHERE payfac.fk_paiement=" . ((int) $val['paymentid']);
 		} else {
 			$sqlmid = "SELECT payfac.fk_facture as id, f.ref as ref";
-			$sqlmid .= " FROM ".$db->prefix()."paiement_facture as payfac";
-			$sqlmid .= " INNER JOIN ".$db->prefix()."facture as f ON f.rowid = payfac.fk_facture";
-			$sqlmid .= " WHERE payfac.fk_paiement=".((int) $val['paymentid']);
+			$sqlmid .= " FROM " . $db->prefix() . "paiement_facture as payfac";
+			$sqlmid .= " INNER JOIN " . $db->prefix() . "facture as f ON f.rowid = payfac.fk_facture";
+			$sqlmid .= " WHERE payfac.fk_paiement=" . ((int) $val['paymentid']);
 		}
 		$ref = $langs->transnoentitiesnoconv("Invoice");
 	} elseif ($typerecord == 'payment_supplier') {
 		$sqlmid = 'SELECT payfac.fk_facturefourn as id, f.ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."paiementfourn_facturefourn as payfac, ".MAIN_DB_PREFIX."facture_fourn as f";
-		$sqlmid .= " WHERE payfac.fk_facturefourn = f.rowid AND payfac.fk_paiementfourn=".((int) $val["paymentsupplierid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "paiementfourn_facturefourn as payfac, " . MAIN_DB_PREFIX . "facture_fourn as f";
+		$sqlmid .= " WHERE payfac.fk_facturefourn = f.rowid AND payfac.fk_paiementfourn=" . ((int) $val["paymentsupplierid"]);
 		$ref = $langs->transnoentitiesnoconv("SupplierInvoice");
 	} elseif ($typerecord == 'payment_expensereport') {
 		$sqlmid = 'SELECT e.rowid as id, e.ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_expensereport as pe, ".MAIN_DB_PREFIX."expensereport as e";
-		$sqlmid .= " WHERE pe.rowid=".((int) $val["paymentexpensereport"])." AND pe.fk_expensereport = e.rowid";
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "payment_expensereport as pe, " . MAIN_DB_PREFIX . "expensereport as e";
+		$sqlmid .= " WHERE pe.rowid=" . ((int) $val["paymentexpensereport"]) . " AND pe.fk_expensereport = e.rowid";
 		$ref = $langs->transnoentitiesnoconv("ExpenseReport");
 	} elseif ($typerecord == 'payment_salary') {
 		$sqlmid = 'SELECT s.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_salary as s";
-		$sqlmid .= " WHERE s.rowid=".((int) $val["paymentsalid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "payment_salary as s";
+		$sqlmid .= " WHERE s.rowid=" . ((int) $val["paymentsalid"]);
 		$ref = $langs->transnoentitiesnoconv("SalaryPayment");
 	} elseif ($typerecord == 'sc') {
 		$sqlmid = 'SELECT sc.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."paiementcharge as sc";
-		$sqlmid .= " WHERE sc.rowid=".((int) $val["paymentscid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "paiementcharge as sc";
+		$sqlmid .= " WHERE sc.rowid=" . ((int) $val["paymentscid"]);
 		$ref = $langs->transnoentitiesnoconv("SocialContribution");
 	} elseif ($typerecord == 'payment_vat') {
 		$sqlmid = 'SELECT v.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."tva as v";
-		$sqlmid .= " WHERE v.rowid=".((int) $val["paymentvatid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "tva as v";
+		$sqlmid .= " WHERE v.rowid=" . ((int) $val["paymentvatid"]);
 		$ref = $langs->transnoentitiesnoconv("PaymentVat");
 	} elseif ($typerecord == 'payment_donation') {
 		$sqlmid = 'SELECT payd.fk_donation as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_donation as payd";
-		$sqlmid .= " WHERE payd.fk_donation=".((int) $val["paymentdonationid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "payment_donation as payd";
+		$sqlmid .= " WHERE payd.fk_donation=" . ((int) $val["paymentdonationid"]);
 		$ref = $langs->transnoentitiesnoconv("Donation");
 	} elseif ($typerecord == 'payment_loan') {
 		$sqlmid = 'SELECT l.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_loan as l";
-		$sqlmid .= " WHERE l.rowid=".((int) $val["paymentloanid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "payment_loan as l";
+		$sqlmid .= " WHERE l.rowid=" . ((int) $val["paymentloanid"]);
 		$ref = $langs->transnoentitiesnoconv("LoanPayment");
 	} elseif ($typerecord == 'payment_various') {
 		$sqlmid = 'SELECT v.rowid as ref';
-		$sqlmid .= " FROM ".MAIN_DB_PREFIX."payment_various as v";
-		$sqlmid .= " WHERE v.rowid=".((int) $val["paymentvariousid"]);
+		$sqlmid .= " FROM " . MAIN_DB_PREFIX . "payment_various as v";
+		$sqlmid .= " WHERE v.rowid=" . ((int) $val["paymentvariousid"]);
 		$ref = $langs->transnoentitiesnoconv("VariousPayment");
 	}
 	// Add warning
 	if (empty($sqlmid)) {
-		dol_syslog("Found a typerecord=".$typerecord." not supported", LOG_WARNING);
+		dol_syslog("Found a typerecord=" . $typerecord . " not supported", LOG_WARNING);
 	}
 
 	if ($sqlmid) {
-		dol_syslog("accountancy/journal/bankjournal.php::sqlmid=".$sqlmid, LOG_DEBUG);
+		dol_syslog("accountancy/journal/bankjournal.php::sqlmid=" . $sqlmid, LOG_DEBUG);
 		$resultmid = $db->query($sqlmid);
 		if ($resultmid) {
 			while ($objmid = $db->fetch_object($resultmid)) {
-				$ref .= ' '.$objmid->ref;
+				$ref .= ' ' . $objmid->ref;
 			}
 		} else {
 			dol_print_error($db);
 		}
 	}
 
-	$ref = dol_trunc($langs->transnoentitiesnoconv("BankId").' '.$val['fk_bank'].' - '.$ref, 295); // 295 + 3 dots (...) is < than max size of 300
+	$ref = dol_trunc($langs->transnoentitiesnoconv("BankId") . ' ' . $val['fk_bank'] . ' - ' . $ref, 295); // 295 + 3 dots (...) is < than max size of 300
 	return $ref;
 }