Encode TXT export as ISO-8859-1 and use Where instead of DataBaseWhere

- Convert export output to ISO-8859-1 in Txt347Export::export()
- Stream the .347 file directly in the response without writing to MyFiles
- Replace DataBaseWhere with Where::eq/Where::in in the controller
- Add testExportEncodingIsISO88591 to verify byte-level encoding

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>

Author: Carlos Garcia

Controller/Modelo347.php

@@ -1,7 +1,7 @@
 <?php
 /**
  * This file is part of Modelo347 plugin for FacturaScripts
- * Copyright (C) 2020-2025 Carlos Garcia Gomez <carlos@facturascripts.com>
+ * Copyright (C) 2020-2026 Carlos Garcia Gomez <carlos@facturascripts.com>
  *
  * This program is free software: you can redistribute it and/or modify
  * it under the terms of the GNU Lesser General Public License as
@@ -20,10 +20,10 @@
 namespace FacturaScripts\Plugins\Modelo347\Controller;
 
 use FacturaScripts\Core\Base\Controller;
-use FacturaScripts\Core\Base\DataBase\DataBaseWhere;
 use FacturaScripts\Core\DataSrc\Ejercicios;
 use FacturaScripts\Core\DataSrc\Empresas;
 use FacturaScripts\Core\Tools;
+use FacturaScripts\Core\Where;
 use FacturaScripts\Dinamic\Lib\Export\XLSExport;
 use FacturaScripts\Dinamic\Model\Cliente;
 use FacturaScripts\Dinamic\Model\Cuenta;
@@ -252,29 +252,25 @@ protected function downloadTxtAction(): void
         $this->loadCustomersData();
         $this->loadSuppliersData();
 
-        // creamos el archivo txt
-        $exportFile = FS_FOLDER . '/MyFiles/modelo_347_' . $this->codejercicio . '.347';
-        if (false === file_put_contents($exportFile, Txt347Export::export($this->codejercicio, $this->customersData, $this->suppliersData))) {
-            Tools::log()->error('cant-save-file', ['%fileName%' => $exportFile]);
-            return;
-        }
-
-        // descargamos el archivo
-        $this->response->headers->set('Content-Type', 'text/plain; charset=ISO-8859-1');
-        $this->response->headers->set('Content-Disposition', 'attachment; filename="' . basename($exportFile) . '"');
-        $this->response->headers->set('Pragma', 'no-cache');
-        $this->response->headers->set('Expires', '0');
-        $this->response->setContent(file_get_contents($exportFile));
-
-        // eliminamos el archivo
-        unlink($exportFile);
+        // generamos el contenido del archivo
+        $fileName = 'modelo_347_' . $this->codejercicio . '.347';
+        $content = Txt347Export::export($this->codejercicio, $this->customersData, $this->suppliersData);
+
+        // devolvemos el archivo directamente
+        $this->response
+            ->header('Content-Type', 'text/plain; charset=ISO-8859-1')
+            ->header('Content-Disposition', 'attachment; filename="' . $fileName . '"')
+            ->header('Pragma', 'no-cache')
+            ->header('Expires', '0')
+            ->setContent($content);
     }
 
     protected function getAccountingInfo(Cuenta $cuenta, string $column): array
     {
         $ejercicio = Ejercicios::get($this->codejercicio);
 
-        if (strtolower(FS_DB_TYPE) == 'postgresql') {
+        $dbType = Tools::config('db_type');
+        if (strtolower($dbType) == 'postgresql') {
             $sql = "select idsubcuenta, codsubcuenta, to_char(fecha,'FMMM') as mes, sum(" . $column . ") as total from partidas p, asientos a"
                 . " where idsubcuenta IN (select idsubcuenta from subcuentas where idcuenta = " . $this->dataBase->var2str($cuenta->idcuenta) . ")"
                 . " and p.idasiento = a.idasiento"
@@ -314,15 +310,15 @@ protected function getCustomersDataAccounting(): array
         // buscamos las cuentas especiales de clientes de este ejercicio
         $cuentaModel = new Cuenta();
         $where = [
-            new DataBaseWhere('codejercicio', $this->codejercicio),
-            new DataBaseWhere('codcuentaesp', 'CLIENT')
+            Where::eq('codejercicio', $this->codejercicio),
+            Where::eq('codcuentaesp', 'CLIENT'),
         ];
         foreach ($cuentaModel->all($where, [], 0, 0) as $cuenta) {
             // buscamos las partidas de las subcuentas de esta cuenta
             foreach ($this->getAccountingInfo($cuenta, 'debe') as $row) {
                 // buscamos el cliente de la subcuenta
                 $cliente = new Cliente();
-                $where = [new DataBaseWhere('codsubcuenta', $row['codsubcuenta'])];
+                $where = [Where::eq('codsubcuenta', $row['codsubcuenta'])];
                 if (false === $cliente->loadWhere($where)) {
                     // no se ha encontrado el cliente, saltamos
                     continue;
@@ -448,15 +444,15 @@ protected function getSuppliersDataAccounting(): array
         // buscamos las cuentas especiales de proveedores de este ejercicio
         $cuentaModel = new Cuenta();
         $where = [
-            new DataBaseWhere('codejercicio', $this->codejercicio),
-            new DataBaseWhere('codcuentaesp', 'PROVEE,ACREED', 'IN')
+            Where::eq('codejercicio', $this->codejercicio),
+            Where::in('codcuentaesp', ['PROVEE', 'ACREED']),
         ];
         foreach ($cuentaModel->all($where, [], 0, 0) as $cuenta) {
             // consultamos las partidas de cada subcuenta hija
             foreach ($this->getAccountingInfo($cuenta, 'haber') as $row) {
                 // buscamos el proveedor de la subcuenta
                 $proveedor = new Proveedor();
-                $where = [new DataBaseWhere('codsubcuenta', $row['codsubcuenta'])];
+                $where = [Where::eq('codsubcuenta', $row['codsubcuenta'])];
                 if (false === $proveedor->loadWhere($where)) {
                     // no existe, saltamos
                     continue;

Lib/Txt347Export.php

@@ -53,7 +53,7 @@ public static function export(string $codejercicio, array $customersData, array
         $supplierData = self::getSupplierData();
         $companyData = self::getCompanyData();
 
-        return $companyData . $customerData . $supplierData;
+        return mb_convert_encoding($companyData . $customerData . $supplierData, 'ISO-8859-1', 'UTF-8');
     }
 
     protected static function checkCifNif(array $item): string

Test/main/Txt347ExportTest.php

@@ -356,6 +356,32 @@ public function testExportEmptyData(): void
         $this->assertEquals(500, strlen($lines[0]));
     }
 
+    // -------------------------------------------------------------------------
+    // export() — codificación ISO-8859-1
+    // -------------------------------------------------------------------------
+
+    public function testExportEncodingIsISO88591(): void
+    {
+        $exercise = $this->getFirstExercise();
+        if ($exercise === null) {
+            $this->markTestSkipped('No hay ejercicios disponibles');
+        }
+
+        $customer = $this->sampleCustomer();
+        $customer['cliente'] = 'Empresa Española SL';
+
+        $result = Txt347Export::export($exercise->codejercicio, [$customer], []);
+
+        // El contenido no debe ser UTF-8 válido (la Ñ en ISO-8859-1 rompe la secuencia UTF-8)
+        $this->assertFalse(
+            mb_check_encoding($result, 'UTF-8'),
+            'El contenido exportado no debe estar en UTF-8'
+        );
+
+        // La Ñ debe estar codificada como el byte 0xD1 (ISO-8859-1)
+        $this->assertStringContainsString("\xD1", $result, 'La Ñ debe estar codificada como byte 0xD1 (ISO-8859-1)');
+    }
+
     protected function tearDown(): void
     {
         $this->logErrors();

facturascripts.ini

@@ -1,4 +1,4 @@
 name = 'Modelo347'
 description = 'Permite obtener los datos necesarios para el modelo 347 de la hacienda española.'
-version = 3.5
+version = 3.51
 min_version = 2025.6