Update Coala Export

This commit is contained in:
Alexandre SPANGARO 2023-04-29 07:43:48 +02:00
parent c22d5d076e
commit 078be6088f

View File

@ -656,27 +656,36 @@ class AccountancyExport
* Export format : COALA * Export format : COALA
* *
* @param array $objectLines data * @param array $objectLines data
* @param resource $exportFile [=null] File resource to export or print if null
* @return void * @return void
*/ */
public function exportCoala($objectLines) public function exportCoala($objectLines, $exportFile = null)
{ {
// Coala export // Coala export
$separator = ";"; $separator = ";";
$end_line = "\n"; $end_line = "\n";
foreach ($objectLines as $line) { foreach ($objectLines as $line) {
$date = dol_print_date($line->doc_date, '%d/%m/%Y'); $date_document = dol_print_date($line->doc_date, '%d/%m/%Y');
print $date.$separator; $tab = array();
print $line->code_journal.$separator;
print length_accountg($line->numero_compte).$separator; $tab[] = $date_document;
print $line->piece_num.$separator; $tab[] = $line->code_journal;
print $line->doc_ref.$separator; $tab[] = length_accountg($line->numero_compte);
print price($line->debit).$separator; $tab[] = $line->piece_num;
print price($line->credit).$separator; $tab[] = $line->doc_ref;
print 'E'.$separator; $tab[] = price($line->debit);
print length_accounta($line->subledger_account).$separator; $tab[] = price($line->credit);
print $end_line; $tab[] = 'E';
$tab[] = length_accounta($line->subledger_account);
$output = implode($separator, $tab).$end_line;
if ($exportFile) {
fwrite($exportFile, $output);
} else {
print $output;
}
} }
} }