data
014a943f78
- HKEKA v3/v4/v5 Segmente fuer phpFinTS implementiert (VR Bank unterstuetzt kein HKEKP) - GetElectronicStatement Action mit Base64-Erkennung und Quittungscode - PDF-Deduplizierung per MD5 (Bank sendet identische Saldenmitteilungen) - Saldenmitteilungen ohne Auszugsnummer werden uebersprungen - Datums-Validierung: 30.02. (Bank-Konvention) wird auf 28.02. korrigiert - Numerische Sortierung fuer statement_number (CAST statt String-Sort) - Jahr-Filter: statement_year=0 ausgeschlossen - Menue/Button: "Kontoauszuege" -> "Umsaetze" (statements.php zeigt MT940, nicht PDFs) - Redirect nach FinTS-Abruf auf aktuelles Jahr statt year=0 Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
1260 lines
47 KiB
PHP
Executable file
1260 lines
47 KiB
PHP
Executable file
<?php
|
|
/* Copyright (C) 2026 Eduard Wisch <data@data-it-solution.de>
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*/
|
|
|
|
/**
|
|
* \file bankimport/pdfstatements.php
|
|
* \ingroup bankimport
|
|
* \brief Page to upload and manage PDF bank statements
|
|
*/
|
|
|
|
// Load Dolibarr environment
|
|
$res = 0;
|
|
if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) {
|
|
$res = @include $_SERVER["CONTEXT_DOCUMENT_ROOT"]."/main.inc.php";
|
|
}
|
|
$tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME'];
|
|
$tmp2 = realpath(__FILE__);
|
|
$i = strlen($tmp) - 1;
|
|
$j = strlen($tmp2) - 1;
|
|
while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) {
|
|
$i--;
|
|
$j--;
|
|
}
|
|
if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) {
|
|
$res = @include substr($tmp, 0, ($i + 1))."/main.inc.php";
|
|
}
|
|
if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) {
|
|
$res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php";
|
|
}
|
|
if (!$res && file_exists("../main.inc.php")) {
|
|
$res = @include "../main.inc.php";
|
|
}
|
|
if (!$res && file_exists("../../main.inc.php")) {
|
|
$res = @include "../../main.inc.php";
|
|
}
|
|
if (!$res) {
|
|
die("Include of main fails");
|
|
}
|
|
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
|
|
dol_include_once('/bankimport/class/bankstatement.class.php');
|
|
dol_include_once('/bankimport/class/fints.class.php');
|
|
dol_include_once('/bankimport/lib/bankimport.lib.php');
|
|
|
|
/**
|
|
* @var Conf $conf
|
|
* @var DoliDB $db
|
|
* @var Translate $langs
|
|
* @var User $user
|
|
*/
|
|
|
|
$langs->loadLangs(array("bankimport@bankimport", "banks", "other"));
|
|
|
|
$action = GETPOST('action', 'aZ09');
|
|
$confirm = GETPOST('confirm', 'alpha');
|
|
$year = GETPOSTISSET('year') ? GETPOSTINT('year') : (int) date('Y');
|
|
|
|
// Security check
|
|
if (!$user->hasRight('bankimport', 'read')) {
|
|
accessforbidden();
|
|
}
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
$statement = new BankImportStatement($db);
|
|
|
|
// FinTS: Elektronische Kontoauszuege automatisch abrufen (HKEKP)
|
|
if ($action == 'fetchfints') {
|
|
dol_syslog("BankImport HKEKP: ========== START fetchfints Action ==========", LOG_DEBUG);
|
|
dol_syslog("BankImport HKEKP: User=".$user->login." (ID ".$user->id."), Zeitpunkt=".date('Y-m-d H:i:s'), LOG_DEBUG);
|
|
|
|
if (!$user->hasRight('bankimport', 'write')) {
|
|
dol_syslog("BankImport HKEKP: Zugriff verweigert - User hat kein Schreibrecht", LOG_WARNING);
|
|
accessforbidden();
|
|
}
|
|
|
|
$fints = new BankImportFinTS($db);
|
|
|
|
dol_syslog("BankImport HKEKP: FinTS-Objekt erstellt, isConfigured=".($fints->isConfigured() ? 'JA' : 'NEIN')
|
|
.", isLibraryAvailable=".($fints->isLibraryAvailable() ? 'JA' : 'NEIN'), LOG_DEBUG);
|
|
dol_syslog("BankImport HKEKP: Konfiguration - URL=".getDolGlobalString('BANKIMPORT_FINTS_URL')
|
|
.", BLZ=".getDolGlobalString('BANKIMPORT_FINTS_BLZ')
|
|
.", IBAN=".getDolGlobalString('BANKIMPORT_FINTS_IBAN')
|
|
.", User=".getDolGlobalString('BANKIMPORT_FINTS_USERNAME'), LOG_DEBUG);
|
|
|
|
if (!$fints->isConfigured()) {
|
|
dol_syslog("BankImport HKEKP: ABBRUCH - FinTS nicht konfiguriert", LOG_WARNING);
|
|
setEventMessages($langs->trans("FinTSNotConfigured"), null, 'errors');
|
|
} elseif (!$fints->isLibraryAvailable()) {
|
|
dol_syslog("BankImport HKEKP: ABBRUCH - phpFinTS Library fehlt", LOG_WARNING);
|
|
setEventMessages($langs->trans("FinTSLibraryMissing"), null, 'errors');
|
|
} else {
|
|
// Login
|
|
dol_syslog("BankImport HKEKP: Starte login()...", LOG_DEBUG);
|
|
$loginResult = $fints->login();
|
|
dol_syslog("BankImport HKEKP: login() Ergebnis=".$loginResult." (1=OK, 0=TAN, -1=Fehler)", LOG_DEBUG);
|
|
|
|
if ($loginResult == -1) {
|
|
dol_syslog("BankImport HKEKP: Login FEHLGESCHLAGEN - ".$fints->error, LOG_ERR);
|
|
setEventMessages('FinTS Login fehlgeschlagen: '.$fints->error, null, 'errors');
|
|
}
|
|
|
|
if ($loginResult == 0) {
|
|
// TAN benoetigt - Decoupled-Polling
|
|
$tanConfirmed = false;
|
|
$maxWait = 120; // Max 2 Minuten warten
|
|
$waited = 0;
|
|
|
|
if ($fints->selectedTanMode && $fints->selectedTanMode->isDecoupled()) {
|
|
dol_syslog("BankImport HKEKP: TAN-Modus: ".$fints->selectedTanMode->getName()
|
|
." (ID ".$fints->selectedTanMode->getId().", Decoupled=JA)", LOG_DEBUG);
|
|
dol_syslog("BankImport HKEKP: Starte Decoupled-TAN-Polling (max ".$maxWait."s, Intervall 3s)...", LOG_DEBUG);
|
|
setEventMessages($langs->trans("WaitingForTanConfirmation"), null, 'mesgs');
|
|
|
|
while ($waited < $maxWait) {
|
|
sleep(3);
|
|
$waited += 3;
|
|
$tanStatus = $fints->checkDecoupledTan();
|
|
dol_syslog("BankImport HKEKP: TAN-Poll nach ".$waited."s - Status=".$tanStatus." (1=OK, 0=Wartend, -1=Fehler)", LOG_DEBUG);
|
|
|
|
if ($tanStatus == 1) {
|
|
$tanConfirmed = true;
|
|
dol_syslog("BankImport HKEKP: TAN BESTAETIGT nach ".$waited."s", LOG_DEBUG);
|
|
break;
|
|
} elseif ($tanStatus < 0) {
|
|
dol_syslog("BankImport HKEKP: TAN-Pruefung FEHLGESCHLAGEN: ".$fints->error, LOG_ERR);
|
|
setEventMessages($langs->trans("TanCheckFailed").': '.$fints->error, null, 'errors');
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (!$tanConfirmed && $waited >= $maxWait) {
|
|
dol_syslog("BankImport HKEKP: TAN-TIMEOUT nach ".$waited."s", LOG_WARNING);
|
|
setEventMessages($langs->trans("TanTimeout"), null, 'errors');
|
|
}
|
|
} else {
|
|
$tanModeName = $fints->selectedTanMode ? $fints->selectedTanMode->getName() : 'UNBEKANNT';
|
|
$tanModeDecoupled = $fints->selectedTanMode ? ($fints->selectedTanMode->isDecoupled() ? 'JA' : 'NEIN') : '?';
|
|
dol_syslog("BankImport HKEKP: TAN-Modus: ".$tanModeName." (Decoupled=".$tanModeDecoupled.") - Manuell benoetigt!", LOG_DEBUG);
|
|
dol_syslog("BankImport HKEKP: TAN-Challenge: ".$fints->tanChallenge, LOG_DEBUG);
|
|
setEventMessages($langs->trans("TanRequired").': '.$fints->tanChallenge, null, 'warnings');
|
|
}
|
|
|
|
if (!$tanConfirmed) {
|
|
dol_syslog("BankImport HKEKP: TAN nicht bestaetigt, schliesse Verbindung", LOG_DEBUG);
|
|
$fints->close();
|
|
$action = '';
|
|
} else {
|
|
$loginResult = 1; // Weiter mit Abruf
|
|
}
|
|
}
|
|
|
|
if ($loginResult == 1) {
|
|
// Kontoauszuege abrufen
|
|
$fetchYear = GETPOST('fetch_year', 'alpha') ?: null;
|
|
dol_syslog("BankImport HKEKP: Login erfolgreich, starte fetchBankStatements(year="
|
|
.($fetchYear ?: 'ALLE').")", LOG_DEBUG);
|
|
|
|
$result = $fints->fetchBankStatements(null, $fetchYear);
|
|
dol_syslog("BankImport HKEKP: fetchBankStatements() Ergebnis-Typ=".gettype($result)
|
|
.(is_array($result) ? " count=".$result['count'] : " val=".$result), LOG_DEBUG);
|
|
|
|
if ($result === 0) {
|
|
dol_syslog("BankImport HKEKP: fetchBankStatements benoetigt TAN", LOG_WARNING);
|
|
setEventMessages($langs->trans("TanRequiredForStatements"), null, 'warnings');
|
|
} elseif ($result === -1) {
|
|
dol_syslog("BankImport HKEKP: fetchBankStatements FEHLGESCHLAGEN: ".$fints->error, LOG_ERR);
|
|
setEventMessages($langs->trans("FetchStatementsFailed").': '.$fints->error, null, 'errors');
|
|
} elseif (is_array($result)) {
|
|
$pdfCount = $result['count'];
|
|
$savedCount = 0;
|
|
$errorCountFints = 0;
|
|
|
|
dol_syslog("BankImport HKEKP: ".$pdfCount." PDFs empfangen, IBAN=".$result['iban'], LOG_DEBUG);
|
|
|
|
if ($pdfCount == 0) {
|
|
dol_syslog("BankImport HKEKP: Keine Auszuege verfuegbar", LOG_DEBUG);
|
|
setEventMessages($langs->trans("NoStatementsAvailable"), null, 'warnings');
|
|
} else {
|
|
// PDFs speichern ueber die bestehende bankstatement-Logik
|
|
$dir = BankImportStatement::getStorageDir();
|
|
dol_syslog("BankImport HKEKP: Speicher-Verzeichnis: ".$dir, LOG_DEBUG);
|
|
|
|
// Identische PDFs deduplizieren (Bank sendet teilweise Duplikate)
|
|
$seenHashes = [];
|
|
$uniquePdfs = [];
|
|
foreach ($result['pdfs'] as $pdfData) {
|
|
$hash = md5($pdfData);
|
|
if (!isset($seenHashes[$hash])) {
|
|
$seenHashes[$hash] = true;
|
|
$uniquePdfs[] = $pdfData;
|
|
} else {
|
|
dol_syslog("BankImport HKEKP: Duplikat-PDF uebersprungen (Hash=".substr($hash, 0, 8)."...)", LOG_DEBUG);
|
|
}
|
|
}
|
|
$result['pdfs'] = $uniquePdfs;
|
|
$pdfCount = count($uniquePdfs);
|
|
$skippedCount = 0;
|
|
|
|
foreach ($result['pdfs'] as $idx => $pdfData) {
|
|
dol_syslog("BankImport HKEKP: --- PDF ".($idx+1)."/".$pdfCount." ---", LOG_DEBUG);
|
|
dol_syslog("BankImport HKEKP: PDF-Groesse=".strlen($pdfData)." Bytes, Erste 20 Bytes=".bin2hex(substr($pdfData, 0, 20)), LOG_DEBUG);
|
|
dol_syslog("BankImport HKEKP: PDF startet mit: ".substr($pdfData, 0, 10), LOG_DEBUG);
|
|
|
|
// PDF in Temp-Datei schreiben fuer Metadaten-Extraktion
|
|
$tmpFile = tempnam(sys_get_temp_dir(), 'fints_stmt_');
|
|
file_put_contents($tmpFile, $pdfData);
|
|
dol_syslog("BankImport HKEKP: Temp-Datei: ".$tmpFile." (".filesize($tmpFile)." Bytes)", LOG_DEBUG);
|
|
|
|
// Metadaten aus PDF parsen
|
|
dol_syslog("BankImport HKEKP: Starte parsePdfMetadata()...", LOG_DEBUG);
|
|
$parsed = BankImportStatement::parsePdfMetadata($tmpFile);
|
|
|
|
if ($parsed) {
|
|
dol_syslog("BankImport HKEKP: Metadaten erkannt: IBAN=".$parsed['iban']
|
|
.", Nr=".$parsed['statement_number'].", Jahr=".$parsed['statement_year']
|
|
.", Datum=".$parsed['statement_date']
|
|
.", Von=".$parsed['date_from'].", Bis=".$parsed['date_to']
|
|
.", Saldo_Start=".$parsed['opening_balance'].", Saldo_Ende=".$parsed['closing_balance'], LOG_DEBUG);
|
|
} else {
|
|
dol_syslog("BankImport HKEKP: Metadaten NICHT erkannt - verwende Fallback", LOG_WARNING);
|
|
}
|
|
|
|
$stmt = new BankImportStatement($db);
|
|
if ($parsed && !empty($parsed['statement_number'])) {
|
|
// Vollstaendige Metadaten mit Auszugsnummer
|
|
$stmt->iban = $parsed['iban'] ?: $result['iban'];
|
|
$stmt->statement_number = $parsed['statement_number'];
|
|
$stmt->statement_year = $parsed['statement_year'];
|
|
$stmt->statement_date = $parsed['statement_date'];
|
|
$stmt->date_from = $parsed['date_from'];
|
|
$stmt->date_to = $parsed['date_to'];
|
|
$stmt->opening_balance = $parsed['opening_balance'];
|
|
$stmt->closing_balance = $parsed['closing_balance'];
|
|
} elseif ($parsed && !empty($parsed['iban'])) {
|
|
// IBAN erkannt aber keine Auszugsnummer (z.B. Saldenmitteilung)
|
|
// Ueberspringe solche PDFs - ohne Nummer nicht sinnvoll speicherbar
|
|
dol_syslog("BankImport HKEKP: PDF uebersprungen - IBAN erkannt aber keine Auszugsnummer (wahrscheinlich Saldenmitteilung)", LOG_WARNING);
|
|
$skippedCount++;
|
|
@unlink($tmpFile);
|
|
continue;
|
|
} else {
|
|
// Keinerlei Metadaten - Fallback mit Index
|
|
$stmt->iban = $result['iban'];
|
|
$stmt->statement_number = (string) ($idx + 1);
|
|
$stmt->statement_year = (int) date('Y');
|
|
}
|
|
|
|
$stmt->import_key = 'fints_'.date('YmdHis').'_'.$user->id;
|
|
dol_syslog("BankImport HKEKP: import_key=".$stmt->import_key, LOG_DEBUG);
|
|
|
|
// Duplikat-Pruefung
|
|
if ($stmt->statement_number && $stmt->exists()) {
|
|
dol_syslog("BankImport HKEKP: DUPLIKAT - Auszug ".$stmt->statement_number."/".$stmt->statement_year." existiert bereits, ueberspringe", LOG_DEBUG);
|
|
@unlink($tmpFile);
|
|
continue;
|
|
}
|
|
|
|
// Dateiname generieren
|
|
if ($parsed) {
|
|
$newFilename = BankImportStatement::generateFilename($parsed);
|
|
} else {
|
|
$newFilename = sprintf('Kontoauszug_FinTS_%s_%d_%03d.pdf',
|
|
preg_replace('/[^A-Z0-9]/', '', strtoupper($stmt->iban)),
|
|
$stmt->statement_year,
|
|
$idx + 1
|
|
);
|
|
}
|
|
dol_syslog("BankImport HKEKP: Dateiname=".$newFilename, LOG_DEBUG);
|
|
|
|
$stmt->filepath = $dir.'/'.$newFilename;
|
|
|
|
// Kollisionsvermeidung
|
|
if (file_exists($stmt->filepath)) {
|
|
$newFilename = pathinfo($newFilename, PATHINFO_FILENAME).'_'.date('His').'.pdf';
|
|
$stmt->filepath = $dir.'/'.$newFilename;
|
|
dol_syslog("BankImport HKEKP: Datei existiert bereits, neuer Name: ".$newFilename, LOG_DEBUG);
|
|
}
|
|
|
|
$stmt->filename = $newFilename;
|
|
|
|
// PDF von Temp nach Ziel verschieben
|
|
if (!rename($tmpFile, $stmt->filepath)) {
|
|
dol_syslog("BankImport HKEKP: rename() fehlgeschlagen, verwende copy()", LOG_DEBUG);
|
|
copy($tmpFile, $stmt->filepath);
|
|
@unlink($tmpFile);
|
|
}
|
|
|
|
$stmt->filesize = filesize($stmt->filepath);
|
|
dol_syslog("BankImport HKEKP: Datei gespeichert: ".$stmt->filepath." (".$stmt->filesize." Bytes)", LOG_DEBUG);
|
|
|
|
// In DB speichern
|
|
dol_syslog("BankImport HKEKP: Starte DB create()...", LOG_DEBUG);
|
|
$dbResult = $stmt->create($user);
|
|
dol_syslog("BankImport HKEKP: DB create() Ergebnis=".$dbResult." (>0=ID, <0=Fehler)", LOG_DEBUG);
|
|
|
|
if ($dbResult > 0) {
|
|
dol_syslog("BankImport HKEKP: DB-Eintrag erstellt mit ID=".$dbResult, LOG_DEBUG);
|
|
|
|
// FinTS-Transaktionen verknuepfen
|
|
dol_syslog("BankImport HKEKP: Starte linkTransactions()...", LOG_DEBUG);
|
|
$linkResult = $stmt->linkTransactions();
|
|
dol_syslog("BankImport HKEKP: linkTransactions() Ergebnis=".$linkResult, LOG_DEBUG);
|
|
|
|
// PDF-Einzelbuchungen parsen
|
|
dol_syslog("BankImport HKEKP: Starte parsePdfTransactions()...", LOG_DEBUG);
|
|
$pdfLines = $stmt->parsePdfTransactions();
|
|
dol_syslog("BankImport HKEKP: parsePdfTransactions() ergab ".(is_array($pdfLines) ? count($pdfLines) : 0)." Buchungszeilen", LOG_DEBUG);
|
|
if (!empty($pdfLines)) {
|
|
$stmt->saveStatementLines($pdfLines);
|
|
dol_syslog("BankImport HKEKP: saveStatementLines() abgeschlossen", LOG_DEBUG);
|
|
}
|
|
|
|
// PDF in Dolibarr Bank-Verzeichnis kopieren
|
|
$uploadBankAccountId = getDolGlobalInt('BANKIMPORT_BANK_ACCOUNT_ID');
|
|
dol_syslog("BankImport HKEKP: BANKIMPORT_BANK_ACCOUNT_ID=".$uploadBankAccountId, LOG_DEBUG);
|
|
if ($uploadBankAccountId > 0) {
|
|
dol_syslog("BankImport HKEKP: Starte copyToDolibarrStatementDir()...", LOG_DEBUG);
|
|
$stmt->copyToDolibarrStatementDir($uploadBankAccountId);
|
|
dol_syslog("BankImport HKEKP: Starte reconcileBankEntries()...", LOG_DEBUG);
|
|
$reconcileResult = $stmt->reconcileBankEntries($user, $uploadBankAccountId);
|
|
dol_syslog("BankImport HKEKP: reconcileBankEntries() Ergebnis=".$reconcileResult, LOG_DEBUG);
|
|
}
|
|
|
|
$savedCount++;
|
|
} else {
|
|
$errorCountFints++;
|
|
dol_syslog("BankImport HKEKP: DB-FEHLER bei create(): ".$stmt->error, LOG_ERR);
|
|
if (file_exists($stmt->filepath)) {
|
|
@unlink($stmt->filepath);
|
|
}
|
|
}
|
|
}
|
|
|
|
dol_syslog("BankImport HKEKP: Zusammenfassung: ".$savedCount." gespeichert, ".$errorCountFints." Fehler, ".$skippedCount." uebersprungen von ".$pdfCount." PDFs", LOG_DEBUG);
|
|
|
|
if ($savedCount > 0) {
|
|
setEventMessages($langs->trans("StatementsDownloaded", $savedCount, $pdfCount), null, 'mesgs');
|
|
}
|
|
if ($errorCountFints > 0) {
|
|
setEventMessages($langs->trans("StatementsDownloadErrors", $errorCountFints), null, 'warnings');
|
|
}
|
|
if ($skippedCount > 0) {
|
|
setEventMessages($langs->trans("StatementsSkippedNoNumber", $skippedCount), null, 'warnings');
|
|
}
|
|
}
|
|
}
|
|
|
|
$fints->close();
|
|
dol_syslog("BankImport HKEKP: FinTS-Verbindung geschlossen", LOG_DEBUG);
|
|
}
|
|
|
|
dol_syslog("BankImport HKEKP: ========== ENDE fetchfints Action ==========", LOG_DEBUG);
|
|
header("Location: ".$_SERVER['PHP_SELF']."?year=".date('Y'));
|
|
exit;
|
|
}
|
|
}
|
|
|
|
// Upload PDF (supports multiple files)
|
|
if ($action == 'upload' && !empty($_FILES['pdffile'])) {
|
|
$uploadMode = GETPOST('upload_mode', 'alpha');
|
|
$isAutoMode = ($uploadMode !== 'manual');
|
|
|
|
// Normalize $_FILES for multi-upload: always work with arrays
|
|
$fileNames = is_array($_FILES['pdffile']['name']) ? $_FILES['pdffile']['name'] : array($_FILES['pdffile']['name']);
|
|
$fileTmps = is_array($_FILES['pdffile']['tmp_name']) ? $_FILES['pdffile']['tmp_name'] : array($_FILES['pdffile']['tmp_name']);
|
|
$fileSizes = is_array($_FILES['pdffile']['size']) ? $_FILES['pdffile']['size'] : array($_FILES['pdffile']['size']);
|
|
$fileCount = count($fileNames);
|
|
|
|
$uploadedCount = 0;
|
|
$errorCount = 0;
|
|
$totalLinked = 0;
|
|
$lastYear = (int) date('Y');
|
|
|
|
for ($fi = 0; $fi < $fileCount; $fi++) {
|
|
$error = 0;
|
|
|
|
// Skip empty file slots
|
|
if (empty($fileNames[$fi]) || empty($fileTmps[$fi])) {
|
|
continue;
|
|
}
|
|
|
|
// Validate uploaded file
|
|
if (!is_uploaded_file($fileTmps[$fi])) {
|
|
setEventMessages($langs->trans("ErrorNoFileUploaded").': '.$fileNames[$fi], null, 'errors');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
|
|
// Check MIME type
|
|
$finfo = finfo_open(FILEINFO_MIME_TYPE);
|
|
$mimeType = finfo_file($finfo, $fileTmps[$fi]);
|
|
finfo_close($finfo);
|
|
if ($mimeType !== 'application/pdf') {
|
|
setEventMessages($langs->trans("ErrorOnlyPDFAllowed").': '.$fileNames[$fi], null, 'errors');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
|
|
// Check file size (max 10MB)
|
|
if ($fileSizes[$fi] > 10 * 1024 * 1024) {
|
|
setEventMessages($langs->trans("ErrorFileTooLarge").': '.$fileNames[$fi], null, 'errors');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
|
|
// Parse PDF metadata automatically
|
|
$parsed = BankImportStatement::parsePdfMetadata($fileTmps[$fi]);
|
|
|
|
// Determine values: auto mode uses parsed data, manual mode uses form fields
|
|
if ($isAutoMode && $parsed) {
|
|
$statementNumber = $parsed['statement_number'];
|
|
$statementYear = $parsed['statement_year'];
|
|
$iban = $parsed['iban'];
|
|
} else {
|
|
// Manual mode (only for single file upload)
|
|
$statementNumber = GETPOST('statement_number', 'alpha');
|
|
$statementYear = GETPOSTINT('statement_year');
|
|
$iban = GETPOST('iban', 'alpha');
|
|
// Auto-fill from parsed data if form fields are empty
|
|
if ($parsed) {
|
|
if (empty($statementNumber) && !empty($parsed['statement_number'])) {
|
|
$statementNumber = $parsed['statement_number'];
|
|
}
|
|
if (empty($statementYear) && !empty($parsed['statement_year'])) {
|
|
$statementYear = $parsed['statement_year'];
|
|
}
|
|
if (empty($iban) && !empty($parsed['iban'])) {
|
|
$iban = $parsed['iban'];
|
|
}
|
|
}
|
|
}
|
|
|
|
// Show auto-detection info
|
|
if ($parsed) {
|
|
$autoMsg = $langs->trans("PdfAutoDetected").': '.$fileNames[$fi];
|
|
if (!empty($statementNumber)) {
|
|
$autoMsg .= ' | '.$statementNumber.'/'.$statementYear;
|
|
}
|
|
if (!empty($parsed['pdf_number'])) {
|
|
$autoMsg .= ' (PDF-Nr. '.$parsed['pdf_number'].'/'.$parsed['pdf_year'].')';
|
|
}
|
|
if (!empty($parsed['iban'])) {
|
|
$autoMsg .= ' | IBAN: '.$parsed['iban'];
|
|
}
|
|
if ($parsed['date_from'] && $parsed['date_to']) {
|
|
$autoMsg .= ' | '.$langs->trans("Period").': '.dol_print_date($parsed['date_from'], 'day').' - '.dol_print_date($parsed['date_to'], 'day');
|
|
}
|
|
setEventMessages($autoMsg, null, 'mesgs');
|
|
}
|
|
|
|
// Validate required fields
|
|
if (empty($statementNumber)) {
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("StatementNumber")).': '.$fileNames[$fi], null, 'errors');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
if (empty($statementYear)) {
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("Year")).': '.$fileNames[$fi], null, 'errors');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
|
|
// Create new statement object for each file
|
|
$stmt = new BankImportStatement($db);
|
|
$stmt->iban = $iban;
|
|
$stmt->statement_number = $statementNumber;
|
|
$stmt->statement_year = $statementYear;
|
|
|
|
// Date fields
|
|
if ($isAutoMode && $parsed) {
|
|
$stmt->statement_date = $parsed['statement_date'];
|
|
$stmt->date_from = $parsed['date_from'];
|
|
$stmt->date_to = $parsed['date_to'];
|
|
$stmt->opening_balance = $parsed['opening_balance'];
|
|
$stmt->closing_balance = $parsed['closing_balance'];
|
|
} else {
|
|
$statementDate = dol_mktime(0, 0, 0, GETPOSTINT('statement_datemonth'), GETPOSTINT('statement_dateday'), GETPOSTINT('statement_dateyear'));
|
|
$dateFrom = dol_mktime(0, 0, 0, GETPOSTINT('date_frommonth'), GETPOSTINT('date_fromday'), GETPOSTINT('date_fromyear'));
|
|
$dateTo = dol_mktime(0, 0, 0, GETPOSTINT('date_tomonth'), GETPOSTINT('date_today'), GETPOSTINT('date_toyear'));
|
|
$stmt->statement_date = $statementDate ?: ($parsed ? $parsed['statement_date'] : null);
|
|
$stmt->date_from = $dateFrom ?: ($parsed ? $parsed['date_from'] : null);
|
|
$stmt->date_to = $dateTo ?: ($parsed ? $parsed['date_to'] : null);
|
|
$openBal = GETPOST('opening_balance', 'alpha');
|
|
$closeBal = GETPOST('closing_balance', 'alpha');
|
|
$stmt->opening_balance = ($openBal !== '' && $openBal !== null) ? (float) price2num($openBal) : ($parsed ? $parsed['opening_balance'] : null);
|
|
$stmt->closing_balance = ($closeBal !== '' && $closeBal !== null) ? (float) price2num($closeBal) : ($parsed ? $parsed['closing_balance'] : null);
|
|
}
|
|
|
|
$stmt->import_key = date('YmdHis').'_'.$user->id;
|
|
|
|
// Check duplicate
|
|
if ($stmt->exists()) {
|
|
setEventMessages($langs->trans("StatementAlreadyExists").': '.$statementNumber.'/'.$statementYear, null, 'warnings');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
|
|
// Generate filename and save file
|
|
$dir = BankImportStatement::getStorageDir();
|
|
|
|
if ($parsed) {
|
|
$newFilename = BankImportStatement::generateFilename($parsed);
|
|
} else {
|
|
$ibanPart = !empty($stmt->iban) ? preg_replace('/[^A-Z0-9]/', '', strtoupper($stmt->iban)) : 'KONTO';
|
|
$newFilename = sprintf('Kontoauszug_%s_%d_%s.pdf',
|
|
$ibanPart,
|
|
$stmt->statement_year,
|
|
str_pad($stmt->statement_number, 3, '0', STR_PAD_LEFT)
|
|
);
|
|
}
|
|
|
|
$stmt->filepath = $dir.'/'.$newFilename;
|
|
|
|
// Avoid overwriting existing files
|
|
if (file_exists($stmt->filepath)) {
|
|
$newFilename = pathinfo($newFilename, PATHINFO_FILENAME).'_'.date('His').'.pdf';
|
|
$stmt->filepath = $dir.'/'.$newFilename;
|
|
}
|
|
|
|
$stmt->filename = $newFilename;
|
|
|
|
// Move uploaded file
|
|
if (!move_uploaded_file($fileTmps[$fi], $stmt->filepath)) {
|
|
setEventMessages($langs->trans("ErrorFailedToSaveFile").': '.$fileNames[$fi], null, 'errors');
|
|
$errorCount++;
|
|
continue;
|
|
}
|
|
|
|
$stmt->filesize = filesize($stmt->filepath);
|
|
|
|
// Save to database
|
|
$result = $stmt->create($user);
|
|
|
|
if ($result > 0) {
|
|
// Link matching FinTS transactions to this statement
|
|
$linked = $stmt->linkTransactions();
|
|
$totalLinked += max(0, $linked);
|
|
|
|
// Parse PDF transaction lines and save to database
|
|
$pdfLines = $stmt->parsePdfTransactions();
|
|
if (!empty($pdfLines)) {
|
|
$linesSaved = $stmt->saveStatementLines($pdfLines);
|
|
if ($linesSaved > 0) {
|
|
setEventMessages($langs->trans("StatementLinesExtracted", $linesSaved, $stmt->statement_number.'/'.$stmt->statement_year), null, 'mesgs');
|
|
}
|
|
}
|
|
|
|
// Copy PDF to Dolibarr's bank statement document directory
|
|
$uploadBankAccountId = getDolGlobalInt('BANKIMPORT_BANK_ACCOUNT_ID');
|
|
if ($uploadBankAccountId > 0) {
|
|
$stmt->copyToDolibarrStatementDir($uploadBankAccountId);
|
|
}
|
|
|
|
// Reconcile bank entries if bank account is configured
|
|
if ($uploadBankAccountId > 0) {
|
|
$reconciledCount = $stmt->reconcileBankEntries($user, $uploadBankAccountId);
|
|
if ($reconciledCount > 0) {
|
|
setEventMessages($langs->trans("BankEntriesReconciled", $reconciledCount, $stmt->statement_number.'/'.$stmt->statement_year), null, 'mesgs');
|
|
}
|
|
}
|
|
|
|
$uploadedCount++;
|
|
$lastYear = $stmt->statement_year;
|
|
} else {
|
|
setEventMessages($stmt->error, null, 'errors');
|
|
$errorCount++;
|
|
// Clean up file on DB error
|
|
if (file_exists($stmt->filepath)) {
|
|
@unlink($stmt->filepath);
|
|
}
|
|
}
|
|
}
|
|
|
|
// Summary message
|
|
if ($uploadedCount > 0) {
|
|
if ($uploadedCount == 1) {
|
|
$msg = $langs->trans("StatementUploaded");
|
|
} else {
|
|
$msg = $langs->trans("StatementsUploaded", $uploadedCount);
|
|
}
|
|
if ($totalLinked > 0) {
|
|
$msg .= ' | '.$langs->trans("TransactionsLinked", $totalLinked);
|
|
}
|
|
setEventMessages($msg, null, 'mesgs');
|
|
// Redirect: for single upload use the year, for multi-upload show all
|
|
if ($uploadedCount == 1) {
|
|
header("Location: ".$_SERVER['PHP_SELF']."?year=".$lastYear);
|
|
} else {
|
|
header("Location: ".$_SERVER['PHP_SELF']."?year=0");
|
|
}
|
|
exit;
|
|
}
|
|
}
|
|
|
|
// Download PDF
|
|
if ($action == 'download') {
|
|
$id = GETPOSTINT('id');
|
|
|
|
if ($statement->fetch($id) > 0) {
|
|
$filepath = $statement->getFilePath();
|
|
|
|
if ($filepath && file_exists($filepath)) {
|
|
header('Content-Type: application/pdf');
|
|
header('Content-Disposition: attachment; filename="'.basename($statement->filename).'"');
|
|
header('Content-Length: '.filesize($filepath));
|
|
header('Cache-Control: private');
|
|
readfile($filepath);
|
|
exit;
|
|
} else {
|
|
setEventMessages($langs->trans("FileNotFound"), null, 'errors');
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("RecordNotFound"), null, 'errors');
|
|
}
|
|
}
|
|
|
|
// View PDF (inline)
|
|
if ($action == 'view') {
|
|
$id = GETPOSTINT('id');
|
|
|
|
if ($statement->fetch($id) > 0) {
|
|
$filepath = $statement->getFilePath();
|
|
|
|
if ($filepath && file_exists($filepath)) {
|
|
header('Content-Type: application/pdf');
|
|
header('Content-Disposition: inline; filename="'.basename($statement->filename).'"');
|
|
header('Content-Length: '.filesize($filepath));
|
|
header('Cache-Control: private');
|
|
readfile($filepath);
|
|
exit;
|
|
} else {
|
|
setEventMessages($langs->trans("FileNotFound"), null, 'errors');
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("RecordNotFound"), null, 'errors');
|
|
}
|
|
}
|
|
|
|
// Reconcile single statement
|
|
if ($action == 'reconcile') {
|
|
if (!$user->hasRight('bankimport', 'write')) {
|
|
accessforbidden();
|
|
}
|
|
$id = GETPOSTINT('id');
|
|
$reconcileBankAccountId = getDolGlobalInt('BANKIMPORT_BANK_ACCOUNT_ID');
|
|
|
|
if (empty($reconcileBankAccountId)) {
|
|
setEventMessages($langs->trans("ErrorNoBankAccountConfigured"), null, 'errors');
|
|
} elseif ($statement->fetch($id) > 0) {
|
|
// Parse statement lines if not yet done
|
|
$existingLines = $statement->getStatementLines();
|
|
if (is_array($existingLines) && empty($existingLines)) {
|
|
$pdfLines = $statement->parsePdfTransactions();
|
|
if (!empty($pdfLines)) {
|
|
$statement->saveStatementLines($pdfLines);
|
|
}
|
|
}
|
|
|
|
$reconciledCount = $statement->reconcileBankEntries($user, $reconcileBankAccountId);
|
|
if ($reconciledCount > 0) {
|
|
setEventMessages($langs->trans("BankEntriesReconciled", $reconciledCount, $statement->statement_number.'/'.$statement->statement_year), null, 'mesgs');
|
|
} else {
|
|
setEventMessages($langs->trans("NoBankEntriesToReconcile"), null, 'warnings');
|
|
}
|
|
}
|
|
$action = '';
|
|
}
|
|
|
|
// Reconcile all statements
|
|
if ($action == 'reconcileall') {
|
|
if (!$user->hasRight('bankimport', 'write')) {
|
|
accessforbidden();
|
|
}
|
|
$reconcileBankAccountId = getDolGlobalInt('BANKIMPORT_BANK_ACCOUNT_ID');
|
|
|
|
if (empty($reconcileBankAccountId)) {
|
|
setEventMessages($langs->trans("ErrorNoBankAccountConfigured"), null, 'errors');
|
|
} else {
|
|
$allStatements = $statement->fetchAll('statement_year,statement_number', 'ASC', 0, 0, array());
|
|
$totalReconciled = 0;
|
|
$stmtCount = 0;
|
|
|
|
if (is_array($allStatements)) {
|
|
foreach ($allStatements as $stmt) {
|
|
// Parse statement lines if not yet done
|
|
$existingLines = $stmt->getStatementLines();
|
|
if (is_array($existingLines) && empty($existingLines)) {
|
|
$pdfLines = $stmt->parsePdfTransactions();
|
|
if (!empty($pdfLines)) {
|
|
$stmt->saveStatementLines($pdfLines);
|
|
}
|
|
}
|
|
|
|
$count = $stmt->reconcileBankEntries($user, $reconcileBankAccountId);
|
|
if ($count > 0) {
|
|
$totalReconciled += $count;
|
|
$stmtCount++;
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($totalReconciled > 0) {
|
|
setEventMessages($langs->trans("BankEntriesReconciledTotal", $totalReconciled, $stmtCount), null, 'mesgs');
|
|
} else {
|
|
setEventMessages($langs->trans("NoBankEntriesToReconcile"), null, 'warnings');
|
|
}
|
|
}
|
|
$action = '';
|
|
}
|
|
|
|
// Confirm a pending reconciliation match
|
|
if ($action == 'confirmreconcile') {
|
|
if (!$user->hasRight('bankimport', 'write')) {
|
|
accessforbidden();
|
|
}
|
|
$lineId = GETPOSTINT('lineid');
|
|
$bankId = GETPOSTINT('bankid');
|
|
$reconcileBankAccountId = getDolGlobalInt('BANKIMPORT_BANK_ACCOUNT_ID');
|
|
|
|
if ($lineId > 0 && $bankId > 0 && $reconcileBankAccountId > 0) {
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
|
|
|
|
// Get statement info from line
|
|
$sqlLine = "SELECT sl.fk_statement, s.statement_number, s.statement_year";
|
|
$sqlLine .= " FROM ".MAIN_DB_PREFIX."bankimport_statement_line sl";
|
|
$sqlLine .= " JOIN ".MAIN_DB_PREFIX."bankimport_statement s ON s.rowid = sl.fk_statement";
|
|
$sqlLine .= " WHERE sl.rowid = ".((int) $lineId);
|
|
$resLine = $db->query($sqlLine);
|
|
|
|
if ($resLine && $db->num_rows($resLine) > 0) {
|
|
$lineObj = $db->fetch_object($resLine);
|
|
$numReleve = $lineObj->statement_number.'/'.$lineObj->statement_year;
|
|
|
|
// Reconcile the bank entry
|
|
$bankLine = new AccountLine($db);
|
|
$bankLine->fetch($bankId);
|
|
$bankLine->num_releve = $numReleve;
|
|
|
|
$result = $bankLine->update_conciliation($user, 0, 1);
|
|
if ($result >= 0) {
|
|
// Update statement line status
|
|
$sqlUpd = "UPDATE ".MAIN_DB_PREFIX."bankimport_statement_line SET";
|
|
$sqlUpd .= " match_status = 'reconciled'";
|
|
$sqlUpd .= " WHERE rowid = ".((int) $lineId);
|
|
$db->query($sqlUpd);
|
|
|
|
setEventMessages($langs->trans("ReconciliationConfirmed"), null, 'mesgs');
|
|
} else {
|
|
setEventMessages($langs->trans("Error"), null, 'errors');
|
|
}
|
|
}
|
|
}
|
|
$action = '';
|
|
}
|
|
|
|
// Delete confirmation
|
|
if ($action == 'delete' && $confirm == 'yes') {
|
|
$id = GETPOSTINT('id');
|
|
|
|
if ($statement->fetch($id) > 0) {
|
|
$result = $statement->delete($user);
|
|
|
|
if ($result > 0) {
|
|
setEventMessages($langs->trans("RecordDeleted"), null, 'mesgs');
|
|
} else {
|
|
setEventMessages($statement->error, null, 'errors');
|
|
}
|
|
}
|
|
$action = '';
|
|
}
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
$form = new Form($db);
|
|
|
|
$title = $langs->trans("PDFStatements");
|
|
llxHeader('', $title, '', '', 0, 0, '', '', '', 'mod-bankimport page-pdfstatements');
|
|
|
|
print load_fiche_titre($title, '', 'bank');
|
|
|
|
// Reminder: check if statements are outdated
|
|
$reminderEnabled = getDolGlobalString('BANKIMPORT_REMINDER_ENABLED', '1');
|
|
if ($reminderEnabled) {
|
|
$reminderMonths = getDolGlobalInt('BANKIMPORT_REMINDER_MONTHS') ?: 3;
|
|
$lastEndDate = $statement->getLatestStatementEndDate();
|
|
$thresholdDate = dol_time_plus_duree(dol_now(), -$reminderMonths, 'm');
|
|
|
|
if ($lastEndDate === null) {
|
|
print '<div class="warning">';
|
|
print img_warning().' '.$langs->trans("ReminderNoStatements");
|
|
print '</div><br>';
|
|
} elseif ($lastEndDate < $thresholdDate) {
|
|
$monthsAgo = (int) round((dol_now() - $lastEndDate) / (30 * 24 * 3600));
|
|
print '<div class="warning">';
|
|
print img_warning().' '.$langs->trans("ReminderOutdatedStatements", dol_print_date($lastEndDate, 'day'), $monthsAgo);
|
|
print '</div><br>';
|
|
}
|
|
}
|
|
|
|
// Info box
|
|
print '<div class="info" style="margin-bottom: 15px;">';
|
|
print '<strong>'.$langs->trans("PDFStatementsInfo").'</strong><br>';
|
|
print $langs->trans("PDFStatementsInfoDesc");
|
|
print '</div>';
|
|
|
|
// FinTS-Abruf Button (wenn konfiguriert)
|
|
$fintsCheck = new BankImportFinTS($db);
|
|
if ($fintsCheck->isConfigured() && $fintsCheck->isLibraryAvailable() && $user->hasRight('bankimport', 'write')) {
|
|
print '<div class="center" style="margin-bottom: 15px; padding: 10px; background: #f0f8ff; border: 1px solid #b0d4f1; border-radius: 5px;">';
|
|
print '<strong>'.img_picto('', 'bank', 'class="pictofixedwidth"').$langs->trans("AutoFetchStatements").'</strong><br>';
|
|
print '<span class="opacitymedium">'.$langs->trans("AutoFetchStatementsDesc").'</span><br><br>';
|
|
print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=fetchfints&token='.newToken().'">';
|
|
print img_picto('', 'download', 'class="pictofixedwidth"').$langs->trans("FetchFromBank");
|
|
print '</a>';
|
|
print '</div>';
|
|
}
|
|
|
|
// Delete confirmation dialog
|
|
if ($action == 'delete') {
|
|
$id = GETPOSTINT('id');
|
|
$stmt = new BankImportStatement($db);
|
|
$stmt->fetch($id);
|
|
|
|
$formconfirm = $form->formconfirm(
|
|
$_SERVER["PHP_SELF"].'?id='.$id.'&year='.$year,
|
|
$langs->trans('DeleteStatement'),
|
|
$langs->trans('ConfirmDeleteStatement', $stmt->statement_number.'/'.$stmt->statement_year),
|
|
'delete',
|
|
'',
|
|
0,
|
|
1
|
|
);
|
|
print $formconfirm;
|
|
}
|
|
|
|
// Upload form
|
|
$defaultMode = getDolGlobalString('BANKIMPORT_UPLOAD_MODE') ?: 'auto';
|
|
$uploadMode = GETPOST('upload_mode', 'alpha') ?: $defaultMode;
|
|
|
|
print '<div class="fichecenter">';
|
|
print '<div class="fichehalfleft">';
|
|
|
|
print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'" enctype="multipart/form-data" id="uploadform">';
|
|
print '<input type="hidden" name="token" value="'.newToken().'">';
|
|
print '<input type="hidden" name="action" value="upload">';
|
|
|
|
print '<table class="noborder centpercent">';
|
|
print '<tr class="liste_titre">';
|
|
print '<td colspan="2">'.$langs->trans("UploadPDFStatement").'</td>';
|
|
print '</tr>';
|
|
|
|
// Upload mode selection
|
|
print '<tr class="oddeven">';
|
|
print '<td class="titlefield">'.$langs->trans("UploadMode").'</td>';
|
|
print '<td>';
|
|
print '<label style="margin-right: 15px;"><input type="radio" name="upload_mode" value="auto" id="mode_auto"'.($uploadMode == 'auto' ? ' checked' : '').' onchange="toggleUploadMode()"> '.$langs->trans("UploadModeAuto").'</label>';
|
|
print '<label><input type="radio" name="upload_mode" value="manual" id="mode_manual"'.($uploadMode == 'manual' ? ' checked' : '').' onchange="toggleUploadMode()"> '.$langs->trans("UploadModeManual").'</label>';
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// PDF file (always visible, multiple in auto mode)
|
|
print '<tr class="oddeven">';
|
|
print '<td class="fieldrequired">'.$langs->trans("File").'</td>';
|
|
print '<td>';
|
|
print '<input type="file" name="pdffile[]" id="pdffile_input" accept=".pdf,application/pdf" multiple required>';
|
|
print '<br><span class="opacitymedium small" id="multi_hint">'.$langs->trans("MultipleFilesHint").'</span>';
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// --- Manual fields (hidden when auto mode) ---
|
|
|
|
// IBAN
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td>'.$langs->trans("IBAN").'</td>';
|
|
print '<td>';
|
|
print '<input type="text" class="flat minwidth200" name="iban" value="'.dol_escape_htmltag(GETPOST('iban', 'alpha')).'" placeholder="DE89 3704 0044 0532 0130 00">';
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Year
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td class="fieldrequired">'.$langs->trans("Year").'</td>';
|
|
print '<td>';
|
|
$years = array();
|
|
for ($y = (int) date('Y'); $y >= ((int) date('Y') - 10); $y--) {
|
|
$years[$y] = $y;
|
|
}
|
|
print $form->selectarray('statement_year', $years, GETPOSTISSET('statement_year') ? GETPOSTINT('statement_year') : $year, 0, 0, 0, '', 0, 0, 0, '', 'minwidth100');
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Statement number
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td class="fieldrequired">'.$langs->trans("StatementNumber").'</td>';
|
|
print '<td>';
|
|
$nextNum = $statement->getNextStatementNumber($year);
|
|
print '<input type="text" class="flat width75" name="statement_number" value="'.dol_escape_htmltag(GETPOSTISSET('statement_number') ? GETPOST('statement_number', 'alpha') : '').'">';
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Statement date
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td>'.$langs->trans("StatementDate").'</td>';
|
|
print '<td>';
|
|
print $form->selectDate(GETPOSTISSET('statement_dateday') ? dol_mktime(0, 0, 0, GETPOSTINT('statement_datemonth'), GETPOSTINT('statement_dateday'), GETPOSTINT('statement_dateyear')) : -1, 'statement_date', 0, 0, 1, '', 1, 0);
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Period from
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td>'.$langs->trans("DateFrom").'</td>';
|
|
print '<td>';
|
|
print $form->selectDate(GETPOSTISSET('date_fromday') ? dol_mktime(0, 0, 0, GETPOSTINT('date_frommonth'), GETPOSTINT('date_fromday'), GETPOSTINT('date_fromyear')) : -1, 'date_from', 0, 0, 1, '', 1, 0);
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Period to
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td>'.$langs->trans("DateTo").'</td>';
|
|
print '<td>';
|
|
print $form->selectDate(GETPOSTISSET('date_today') ? dol_mktime(0, 0, 0, GETPOSTINT('date_tomonth'), GETPOSTINT('date_today'), GETPOSTINT('date_toyear')) : -1, 'date_to', 0, 0, 1, '', 1, 0);
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Opening balance
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td>'.$langs->trans("OpeningBalance").'</td>';
|
|
print '<td>';
|
|
print '<input type="text" class="flat width100" name="opening_balance" value="'.dol_escape_htmltag(GETPOST('opening_balance', 'alpha')).'" placeholder="1.234,56">';
|
|
print ' EUR';
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Closing balance
|
|
print '<tr class="oddeven manual-field">';
|
|
print '<td>'.$langs->trans("ClosingBalance").'</td>';
|
|
print '<td>';
|
|
print '<input type="text" class="flat width100" name="closing_balance" value="'.dol_escape_htmltag(GETPOST('closing_balance', 'alpha')).'" placeholder="1.345,67">';
|
|
print ' EUR';
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
print '</table>';
|
|
|
|
print '<div class="center" style="margin-top: 10px;">';
|
|
print '<input type="submit" class="button button-save" value="'.$langs->trans("Upload").'">';
|
|
print '</div>';
|
|
|
|
print '</form>';
|
|
|
|
// JavaScript for toggling upload modes
|
|
print '<script type="text/javascript">
|
|
function toggleUploadMode() {
|
|
var isManual = document.getElementById("mode_manual").checked;
|
|
var manualFields = document.querySelectorAll(".manual-field");
|
|
var fileInput = document.getElementById("pdffile_input");
|
|
var multiHint = document.getElementById("multi_hint");
|
|
for (var i = 0; i < manualFields.length; i++) {
|
|
manualFields[i].style.display = isManual ? "" : "none";
|
|
}
|
|
// In manual mode: single file only. In auto mode: multiple files allowed
|
|
if (isManual) {
|
|
fileInput.removeAttribute("multiple");
|
|
multiHint.style.display = "none";
|
|
} else {
|
|
fileInput.setAttribute("multiple", "multiple");
|
|
multiHint.style.display = "";
|
|
}
|
|
}
|
|
// Initial state
|
|
document.addEventListener("DOMContentLoaded", function() { toggleUploadMode(); });
|
|
</script>';
|
|
|
|
print '</div>'; // fichehalfleft
|
|
print '</div>'; // fichecenter
|
|
|
|
print '<div class="clearboth"></div><br>';
|
|
|
|
// Year filter for list - only show years that have statements
|
|
$yearsFilter = array(0 => $langs->trans("AllStatements"));
|
|
$availableYears = $statement->getAvailableYears();
|
|
foreach ($availableYears as $yKey => $yVal) {
|
|
$yearsFilter[$yKey] = $yVal;
|
|
}
|
|
// If current year not in list, add it
|
|
if (!isset($yearsFilter[(int) date('Y')])) {
|
|
$yearsFilter[(int) date('Y')] = (string) date('Y');
|
|
krsort($yearsFilter);
|
|
}
|
|
print '<form method="GET" action="'.$_SERVER["PHP_SELF"].'">';
|
|
print '<div class="center" style="margin-bottom: 15px;">';
|
|
print '<strong>'.$langs->trans("Year").':</strong> ';
|
|
print $form->selectarray('year', $yearsFilter, $year, 0, 0, 0, '', 0, 0, 0, '', 'minwidth100');
|
|
print ' <input type="submit" class="button smallpaddingimp" value="'.$langs->trans("Filter").'">';
|
|
print '</div>';
|
|
print '</form>';
|
|
|
|
// Reconcile All button
|
|
$reconcileBankAccountId = getDolGlobalInt('BANKIMPORT_BANK_ACCOUNT_ID');
|
|
if (!empty($reconcileBankAccountId)) {
|
|
print '<div class="right" style="margin-bottom: 10px;">';
|
|
print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=reconcileall&year='.$year.'&token='.newToken().'">';
|
|
print img_picto('', 'bank', 'class="pictofixedwidth"').$langs->trans("ReconcileAllStatements");
|
|
print '</a>';
|
|
print '</div>';
|
|
} else {
|
|
print '<div class="warning" style="margin-bottom: 10px;">';
|
|
print img_warning().' '.$langs->trans("NoBankAccountConfigured");
|
|
print ' <a href="'.dol_buildpath('/bankimport/admin/setup.php', 1).'">'.$langs->trans("GoToSetup").'</a>';
|
|
print '</div>';
|
|
}
|
|
|
|
// List of existing PDF statements
|
|
print '<div class="div-table-responsive">';
|
|
print '<table class="noborder centpercent">';
|
|
print '<tr class="liste_titre">';
|
|
print '<th class="center" width="80">'.$langs->trans("StatementNumber").'</th>';
|
|
print '<th>'.$langs->trans("IBAN").'</th>';
|
|
print '<th class="center">'.$langs->trans("StatementDate").'</th>';
|
|
print '<th class="center">'.$langs->trans("Period").'</th>';
|
|
print '<th class="right">'.$langs->trans("OpeningBalance").'</th>';
|
|
print '<th class="right">'.$langs->trans("ClosingBalance").'</th>';
|
|
print '<th class="right">'.$langs->trans("Size").'</th>';
|
|
print '<th class="center">'.$langs->trans("DateCreation").'</th>';
|
|
print '<th class="center" width="200">'.$langs->trans("Actions").'</th>';
|
|
print '</tr>';
|
|
|
|
$filter = array();
|
|
if ($year > 0) {
|
|
$filter['year'] = $year;
|
|
}
|
|
$records = $statement->fetchAll('statement_year,statement_number', 'DESC', 100, 0, $filter);
|
|
|
|
if (is_array($records) && count($records) > 0) {
|
|
foreach ($records as $obj) {
|
|
print '<tr class="oddeven">';
|
|
|
|
// Statement number
|
|
print '<td class="center nowraponall">';
|
|
print '<strong>'.dol_escape_htmltag($obj->statement_number).'</strong>/'.$obj->statement_year;
|
|
print '</td>';
|
|
|
|
// IBAN
|
|
print '<td>';
|
|
if ($obj->iban) {
|
|
print dol_escape_htmltag($obj->iban);
|
|
} else {
|
|
print '<span class="opacitymedium">-</span>';
|
|
}
|
|
print '</td>';
|
|
|
|
// Statement date
|
|
print '<td class="center">';
|
|
if ($obj->statement_date) {
|
|
print dol_print_date($obj->statement_date, 'day');
|
|
} else {
|
|
print '<span class="opacitymedium">-</span>';
|
|
}
|
|
print '</td>';
|
|
|
|
// Period
|
|
print '<td class="center nowraponall">';
|
|
if ($obj->date_from && $obj->date_to) {
|
|
print dol_print_date($obj->date_from, 'day').' - '.dol_print_date($obj->date_to, 'day');
|
|
} elseif ($obj->date_from) {
|
|
print $langs->trans("From").' '.dol_print_date($obj->date_from, 'day');
|
|
} elseif ($obj->date_to) {
|
|
print $langs->trans("To").' '.dol_print_date($obj->date_to, 'day');
|
|
} else {
|
|
print '<span class="opacitymedium">-</span>';
|
|
}
|
|
print '</td>';
|
|
|
|
// Opening balance
|
|
print '<td class="right nowraponall">';
|
|
if ($obj->opening_balance !== null) {
|
|
$color = $obj->opening_balance >= 0 ? '' : 'color: red;';
|
|
print '<span style="'.$color.'">'.price($obj->opening_balance, 0, $langs, 1, -1, 2, 'EUR').'</span>';
|
|
} else {
|
|
print '<span class="opacitymedium">-</span>';
|
|
}
|
|
print '</td>';
|
|
|
|
// Closing balance
|
|
print '<td class="right nowraponall">';
|
|
if ($obj->closing_balance !== null) {
|
|
$color = $obj->closing_balance >= 0 ? '' : 'color: red;';
|
|
print '<span style="'.$color.'">'.price($obj->closing_balance, 0, $langs, 1, -1, 2, 'EUR').'</span>';
|
|
} else {
|
|
print '<span class="opacitymedium">-</span>';
|
|
}
|
|
print '</td>';
|
|
|
|
// Size
|
|
print '<td class="right">';
|
|
if ($obj->filesize) {
|
|
print dol_print_size($obj->filesize, 1);
|
|
} else {
|
|
print '-';
|
|
}
|
|
print '</td>';
|
|
|
|
// Creation date
|
|
print '<td class="center nowraponall">';
|
|
print dol_print_date($obj->datec, 'day');
|
|
print '</td>';
|
|
|
|
// Actions
|
|
print '<td class="center nowraponall" style="white-space: nowrap;">';
|
|
if ($obj->filepath && file_exists($obj->filepath)) {
|
|
// View (inline)
|
|
print '<a style="margin: 0 6px;" href="'.$_SERVER["PHP_SELF"].'?action=view&id='.$obj->id.'&token='.newToken().'" target="_blank" title="'.$langs->trans("View").'">';
|
|
print img_picto($langs->trans("View"), 'eye');
|
|
print '</a>';
|
|
|
|
// Download
|
|
print '<a style="margin: 0 6px;" href="'.$_SERVER["PHP_SELF"].'?action=download&id='.$obj->id.'&token='.newToken().'" title="'.$langs->trans("Download").'">';
|
|
print img_picto($langs->trans("Download"), 'download');
|
|
print '</a>';
|
|
}
|
|
|
|
// Reconcile
|
|
if (!empty($reconcileBankAccountId) && $obj->date_from && $obj->date_to) {
|
|
print '<a style="margin: 0 6px;" href="'.$_SERVER["PHP_SELF"].'?action=reconcile&id='.$obj->id.'&year='.$year.'&token='.newToken().'" title="'.$langs->trans("ReconcileStatement").'">';
|
|
print img_picto($langs->trans("ReconcileStatement"), 'bank');
|
|
print '</a>';
|
|
}
|
|
|
|
// Delete
|
|
print '<a style="margin: 0 6px;" href="'.$_SERVER["PHP_SELF"].'?action=delete&id='.$obj->id.'&year='.$year.'&token='.newToken().'" title="'.$langs->trans("Delete").'">';
|
|
print img_picto($langs->trans("Delete"), 'delete');
|
|
print '</a>';
|
|
|
|
print '</td>';
|
|
|
|
print '</tr>';
|
|
}
|
|
} else {
|
|
print '<tr class="oddeven"><td colspan="9" class="opacitymedium center">';
|
|
print $langs->trans("NoPDFStatementsFound");
|
|
print '</td></tr>';
|
|
}
|
|
|
|
print '</table>';
|
|
print '</div>';
|
|
|
|
// Pending review matches
|
|
$sqlPending = "SELECT sl.rowid as line_id, sl.fk_statement, sl.line_number, sl.date_booking, sl.amount as stmt_amount,";
|
|
$sqlPending .= " sl.name as stmt_name, sl.fk_bank,";
|
|
$sqlPending .= " b.rowid as bank_id, b.datev, b.amount as bank_amount, b.label as bank_label,";
|
|
$sqlPending .= " s.statement_number, s.statement_year";
|
|
$sqlPending .= " FROM ".MAIN_DB_PREFIX."bankimport_statement_line sl";
|
|
$sqlPending .= " JOIN ".MAIN_DB_PREFIX."bankimport_statement s ON s.rowid = sl.fk_statement";
|
|
$sqlPending .= " JOIN ".MAIN_DB_PREFIX."bank b ON b.rowid = sl.fk_bank";
|
|
$sqlPending .= " WHERE sl.match_status = 'pending_review'";
|
|
$sqlPending .= " AND sl.entity = ".((int) $conf->entity);
|
|
$sqlPending .= " ORDER BY s.statement_year, s.statement_number, sl.line_number";
|
|
|
|
$resPending = $db->query($sqlPending);
|
|
if ($resPending && $db->num_rows($resPending) > 0) {
|
|
print '<br>';
|
|
print '<div class="div-table-responsive">';
|
|
print '<table class="noborder centpercent">';
|
|
print '<tr class="liste_titre">';
|
|
print '<td colspan="8">';
|
|
print img_warning().' <strong>'.$langs->trans("PendingReconciliationMatches").'</strong>';
|
|
print ' - '.$langs->trans("PendingReconciliationMatchesDesc");
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
print '<tr class="liste_titre">';
|
|
print '<th class="center">'.$langs->trans("StatementNumber").'</th>';
|
|
print '<th class="center">'.$langs->trans("BookingDate").'</th>';
|
|
print '<th>'.$langs->trans("Name").'</th>';
|
|
print '<th class="right">'.$langs->trans("AmountStatement").'</th>';
|
|
print '<th class="right">'.$langs->trans("AmountDolibarr").'</th>';
|
|
print '<th class="right">'.$langs->trans("Difference").'</th>';
|
|
print '<th class="center">'.$langs->trans("BankEntry").'</th>';
|
|
print '<th class="center">'.$langs->trans("Action").'</th>';
|
|
print '</tr>';
|
|
|
|
while ($pendObj = $db->fetch_object($resPending)) {
|
|
$diff = abs(abs((float) $pendObj->stmt_amount) - abs((float) $pendObj->bank_amount));
|
|
$diffColor = ($diff > 10) ? 'color: red; font-weight: bold;' : 'color: #e68a00;';
|
|
|
|
print '<tr class="oddeven">';
|
|
|
|
// Statement number
|
|
print '<td class="center nowraponall">'.$pendObj->statement_number.'/'.$pendObj->statement_year.'</td>';
|
|
|
|
// Booking date
|
|
print '<td class="center">'.dol_print_date($db->jdate($pendObj->date_booking), 'day').'</td>';
|
|
|
|
// Name
|
|
print '<td>'.dol_escape_htmltag($pendObj->stmt_name).'</td>';
|
|
|
|
// Amount from PDF statement
|
|
print '<td class="right nowraponall">';
|
|
$stmtColor = $pendObj->stmt_amount >= 0 ? '' : 'color: red;';
|
|
print '<span style="'.$stmtColor.'">'.price($pendObj->stmt_amount, 0, $langs, 1, -1, 2, 'EUR').'</span>';
|
|
print '</td>';
|
|
|
|
// Amount from Dolibarr bank
|
|
print '<td class="right nowraponall">';
|
|
$bankColor = $pendObj->bank_amount >= 0 ? '' : 'color: red;';
|
|
print '<span style="'.$bankColor.'">'.price($pendObj->bank_amount, 0, $langs, 1, -1, 2, 'EUR').'</span>';
|
|
print '</td>';
|
|
|
|
// Difference
|
|
print '<td class="right nowraponall">';
|
|
print '<span style="'.$diffColor.'">'.price($diff, 0, $langs, 1, -1, 2, 'EUR').'</span>';
|
|
print '</td>';
|
|
|
|
// Bank entry link
|
|
print '<td class="center">';
|
|
print '<a href="'.DOL_URL_ROOT.'/compta/bank/line.php?rowid='.$pendObj->bank_id.'" target="_blank">#'.$pendObj->bank_id.'</a>';
|
|
print '</td>';
|
|
|
|
// Action: confirm button
|
|
print '<td class="center nowraponall">';
|
|
print '<a class="butAction butActionSmall" href="'.$_SERVER["PHP_SELF"].'?action=confirmreconcile&lineid='.$pendObj->line_id.'&bankid='.$pendObj->bank_id.'&year='.$year.'&token='.newToken().'">';
|
|
print $langs->trans("Confirm");
|
|
print '</a>';
|
|
print '</td>';
|
|
|
|
print '</tr>';
|
|
}
|
|
|
|
print '</table>';
|
|
print '</div>';
|
|
}
|
|
$db->free($resPending);
|
|
|
|
// Statistics
|
|
$totalCount = $statement->fetchAll('', '', 0, 0, array(), 'count');
|
|
$yearCount = is_array($records) ? count($records) : 0;
|
|
|
|
print '<div class="opacitymedium" style="margin-top: 10px;">';
|
|
if ($year > 0) {
|
|
print $langs->trans("Total").': <strong>'.$yearCount.'</strong> '.$langs->trans("StatementsInYear", $year);
|
|
print ' | '.$langs->trans("AllStatements").': <strong>'.$totalCount.'</strong>';
|
|
} else {
|
|
print $langs->trans("Total").': <strong>'.$totalCount.'</strong> '.$langs->trans("AllStatements");
|
|
}
|
|
print '</div>';
|
|
|
|
llxFooter();
|
|
$db->close();
|