From 96380f01c6170a853602eb7f6ffab777d788073e Mon Sep 17 00:00:00 2001
From: Alexandre SPANGARO <aspangaro.dolibarr@gmail.com>
Date: Mon, 29 Jul 2019 15:41:53 +0200
Subject: [PATCH] Test in progress

---
 .../class/accountancyexport.class.php         | 26 +++++++++++++++----
 1 file changed, 21 insertions(+), 5 deletions(-)

diff --git a/htdocs/accountancy/class/accountancyexport.class.php b/htdocs/accountancy/class/accountancyexport.class.php
index 904388db64d..10ebabc4f8a 100644
--- a/htdocs/accountancy/class/accountancyexport.class.php
+++ b/htdocs/accountancy/class/accountancyexport.class.php
@@ -938,15 +938,22 @@ class AccountancyExport
             $date_document = dol_print_date($line->doc_date, '%Y%m%d');
             $date_creation = dol_print_date($line->date_creation,  '%Y%m%d');
 
+            // TYPE
             $type_enregistrement = 'E'; // For write movement
             print $type_enregistrement . $separator;
+            // JNAL
             print substr($line->code_journal, 0, 2) . $separator;
+            // NECR
             print $line->id . $separator;
+            // NPIE
             print $line->piece_num . $separator;
+            // DATP
             print $date_document . $separator;
+            // LIBE
             print $line->label_operation . $separator;
+            // DATH
             print $line->date_lim_reglement . $separator;
-
+            // CNPI
             if ($line->doc_type == 'supplier_invoice') {
                 if ($line->montant < 0) {
                     $nature_piece = 'AF';
@@ -963,7 +970,8 @@ class AccountancyExport
                 $nature_piece = '';
             }
             print $nature_piece . $separator;
-
+            // RACI
+            /*
             if (! empty($line->subledger_account)) {
                 if ($line->doc_type == 'supplier_invoice') {
                     $racine_subledger_account = '40';
@@ -973,19 +981,27 @@ class AccountancyExport
                     $nature_piece = '';
                 }
                 print $racine_subledger_account . $separator;
+            } else {
+                print $separator;
             }
-
+            */
+            // MONT
             print price(abs($line->montant)) . $separator;
+            // CODC
             print $line->sens . $separator;
+            // CPTG
             print length_accountg($line->numero_compte) . $separator;
+            // DATE
             print $date_creation . $separator;
+            // CLET
             print $line->lettering_code . $separator;
+            // DATL
             print $line->date_lettering . $separator;
-
+            // CPTA
             if (! empty($line->subledger_account)) {
                 print length_accounta($line->subledger_account) . $separator;
             }
-
+            // CNAT
             if ($line->doc_type == 'supplier_invoice' && ! empty($line->subledger_account)) {
                 print 'F';
             } elseif ($line->doc_type == 'customer_invoice' && ! empty($line->subledger_account)) {