vignesh/dolibarr
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Debug v18

Browse source
This commit is contained in:
Laurent Destailleur 2023-07-19 23:07:38 +02:00
parent a9039588fe
commit 98e9e9340b
1 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
htdocs/core/modules/facture/modules_facture.php
View file

@ -89,6 +89,8 @@ abstract class ModelePDFFactures extends CommonDocGenerator
*/
private function getSwissQrBill(Facture $object, Translate $langs)
{
global $conf;
if (getDolGlobalString('INVOICE_ADD_SWISS_QR_CODE') != 'bottom') {
return false;
}
@ -124,9 +126,9 @@ abstract class ModelePDFFactures extends CommonDocGenerator
// Get IBAN from account.
$account = new Account($this->db);
$account->fetch($object->fk_account);
$creditorInformation = SwissQrBill\DataGroup\Element\CreditorInformation::create($account->iban);
if (!$creditorInformation->isValid()) {
$langs->load("errors");
$this->error = $langs->transnoentities("SwissQrCreditorInformationInvalid", $account->iban, (string) $creditorInformation->getViolations());
return false;
}
@ -145,8 +147,10 @@ abstract class ModelePDFFactures extends CommonDocGenerator
)
);
$currencyinvoicecode = $object->multicurrency_code ? $object->multicurrency_code : $conf->currency;
// Add payment amount, with currency
$pai = SwissQrBill\DataGroup\Element\PaymentAmountInformation::create($object->multicurrency_code, $object->total_ttc);
$pai = SwissQrBill\DataGroup\Element\PaymentAmountInformation::create($currencyinvoicecode, $object->total_ttc);
if (!$pai->isValid()) {
$this->error = $langs->transnoentities("SwissQrPaymentInformationInvalid", $object->total_ttc, (string) $pai->getViolations());
return false;