dolibarr.metallzuschlag/admin/setup.php

<?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    metallzuschlag/admin/setup.php
 * \ingroup metallzuschlag
 * \brief   Metallzuschlag Konfigurationsseite
 */

// Dolibarr Umgebung laden
$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/admin.lib.php";
require_once '../lib/metallzuschlag.lib.php';

/**
 * @var Conf $conf
 * @var DoliDB $db
 * @var HookManager $hookmanager
 * @var Translate $langs
 * @var User $user
 */

$langs->loadLangs(array("admin", "metallzuschlag@metallzuschlag"));

// Zugriffskontrolle
if (!$user->admin) {
	accessforbidden();
}

$action = GETPOST('action', 'aZ09');
$backtopage = GETPOST('backtopage', 'alpha');

/*
 * Actions
 */

if ($action == 'update' && !empty($user->admin)) {
	$apiUrl = GETPOST('METALLZUSCHLAG_API_URL', 'alpha');
	$autoFetch = GETPOSTINT('METALLZUSCHLAG_AUTO_FETCH');

	dolibarr_set_const($db, 'METALLZUSCHLAG_API_URL', trim($apiUrl), 'chaine', 0, '', $conf->entity);
	dolibarr_set_const($db, 'METALLZUSCHLAG_AUTO_FETCH', $autoFetch, 'chaine', 0, '', $conf->entity);

	setEventMessages($langs->trans("SetupSaved"), null, 'mesgs');
	$action = '';
}


/*
 * View
 */

$form = new Form($db);

$title = "MetallzuschlagSetup";
llxHeader('', $langs->trans($title), '', '', 0, 0, '', '', '', 'mod-metallzuschlag page-admin');

$linkback = '<a href="'.($backtopage ? $backtopage : DOL_URL_ROOT.'/admin/modules.php?restore_lastsearch_values=1').'">'.$langs->trans("BackToModuleList").'</a>';
print load_fiche_titre($langs->trans($title), $linkback, 'title_setup');

$head = metallzuschlagAdminPrepareHead();
print dol_get_fiche_head($head, 'settings', $langs->trans($title), -1, 'fa-coins');

print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'">';
print '<input type="hidden" name="token" value="'.newToken().'">';
print '<input type="hidden" name="action" value="update">';

print '<table class="noborder centpercent">';

// API Basis-URL
print '<tr class="liste_titre"><td colspan="2">'.$langs->trans("MetallzuschlagApiUrl").'</td></tr>';
print '<tr class="oddeven">';
print '<td class="titlefield">'.$langs->trans("MetallzuschlagApiUrl");
print ' '.$form->textwithpicto('', $langs->trans("MetallzuschlagApiUrlHelp"));
print '</td>';
print '<td>';
print '<input type="text" class="flat minwidth500" name="METALLZUSCHLAG_API_URL" value="'.dol_escape_htmltag(getDolGlobalString('METALLZUSCHLAG_API_URL', 'https://www.sonepar.de/api/content/metalnote')).'">';
print '</td></tr>';

// Automatischer Abruf
print '<tr class="liste_titre"><td colspan="2">'.$langs->trans("MetallzuschlagAutoFetch").'</td></tr>';
print '<tr class="oddeven">';
print '<td>'.$langs->trans("MetallzuschlagAutoFetch");
print ' '.$form->textwithpicto('', $langs->trans("MetallzuschlagAutoFetchHelp"));
print '</td>';
print '<td>';
print $form->selectyesno('METALLZUSCHLAG_AUTO_FETCH', getDolGlobalInt('METALLZUSCHLAG_AUTO_FETCH', 1), 1);
print '</td></tr>';

print '</table>';

print '<div class="center"><input type="submit" class="button" value="'.$langs->trans("Save").'"></div>';
print '</form>';

// Lieferanten mit Metallzuschlag-Quelle anzeigen
print '<br>';
print load_fiche_titre($langs->trans("MetallzuschlagSuppliers"), '', '');

$sql = "SELECT s.rowid, s.nom as name, se.metallzuschlag_source, se.metallzuschlag_cu, se.metallzuschlag_al, se.metallzuschlag_date";
$sql .= " FROM ".$db->prefix()."societe as s";
$sql .= " INNER JOIN ".$db->prefix()."societe_extrafields as se ON se.fk_object = s.rowid";
$sql .= " WHERE se.metallzuschlag_source IS NOT NULL AND se.metallzuschlag_source != ''";
$sql .= " ORDER BY s.nom ASC";

$resql = $db->query($sql);
if ($resql) {
	$num = $db->num_rows($resql);

	print '<table class="noborder centpercent">';
	print '<tr class="liste_titre">';
	print '<td>'.$langs->trans("Company").'</td>';
	print '<td>'.$langs->trans("MetallzuschlagSource").'</td>';
	print '<td class="right">'.$langs->trans("MetallzuschlagCUShort").'</td>';
	print '<td class="right">'.$langs->trans("MetallzuschlagALShort").'</td>';
	print '<td class="right">'.$langs->trans("MetallzuschlagDate").'</td>';
	print '</tr>';

	if ($num > 0) {
		while ($obj = $db->fetch_object($resql)) {
			print '<tr class="oddeven">';
			print '<td><a href="'.DOL_URL_ROOT.'/societe/card.php?socid='.$obj->rowid.'">'.dol_escape_htmltag($obj->name).'</a></td>';
			print '<td>'.dol_escape_htmltag($obj->metallzuschlag_source).'</td>';
			print '<td class="right">'.(!empty($obj->metallzuschlag_cu) ? price($obj->metallzuschlag_cu, 0, '', 1, -1, 2).' €/100kg' : '-').'</td>';
			print '<td class="right">'.(!empty($obj->metallzuschlag_al) ? price($obj->metallzuschlag_al, 0, '', 1, -1, 2).' €/100kg' : '-').'</td>';
			print '<td class="right">'.(!empty($obj->metallzuschlag_date) ? dol_print_date($db->jdate($obj->metallzuschlag_date), 'day') : '-').'</td>';
			print '</tr>';
		}
	} else {
		print '<tr class="oddeven"><td colspan="5" class="opacitymedium">'.$langs->trans("MetallzuschlagNoSuppliers").'</td></tr>';
	}
	print '</table>';
} else {
	// Tabelle existiert evtl. noch nicht
	print '<div class="opacitymedium">'.$langs->trans("MetallzuschlagNoSuppliers").'</div>';
}

print '<br><div class="opacitymedium">';
print $langs->trans("MetallzuschlagSupplierMappingHelp");
print '</div>';

print dol_get_fiche_end();

llxFooter();
$db->close();