EXCELIA_DBARR/custom/financialreport/core/actions_addupdatedelete.inc.php

<?php
/* Copyright (C) 2017-2019 Laurent Destailleur  <eldy@users.sourceforge.net>
 *
 * 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.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 * or see https://www.gnu.org/
 */

/**
 *	\file			htdocs/core/actions_addupdatedelete.inc.php
 *  \brief			Code for common actions cancel / add / update / update_extras / delete / deleteline / validate / cancel / reopen / clone
 */


// $action or $cancel must be defined
// $object must be defined
// $permissiontoadd must be defined
// $permissiontodelete must be defined
// $backurlforlist must be defined
// $backtopage may be defined
// $noback may be defined
// $triggermodname may be defined

$hidedetails = isset ($hidedetails) ? $hidedetails : '';
$hidedesc = isset ($hidedesc) ? $hidedesc : '';
$hideref = isset ($hideref) ? $hideref : '';


if (!empty ($permissionedit) && empty ($permissiontoadd)) {
	$permissiontoadd = $permissionedit; // For backward compatibility
}

if ($cancel) {
	/*var_dump($cancel);var_dump($backtopage);var_dump($backtopageforcancel);exit;*/
	if (!empty ($backtopageforcancel)) {
		header("Location: " . $backtopageforcancel);
		exit;
	} elseif (!empty ($backtopage)) {
		header("Location: " . $backtopage);
		exit;
	}
	$action = '';
}

if ($action == 'confirm_checkoutclosure_settlement') {
	$checkoutClosure = new Checkoutclosure($db);

	$data = explode('_', $datastring);

	$idmenu = $data[0];
	$entity = $data[1];
	$from = $data[2];
	$sumHUFCash = 0;
	$sumEURCash = 0;
	$to = date("Y-m-d H:i:s", dol_now());
	$HUFCash = $factureStat->sumSaleInHufCash($from, $to, $entity);
	$EURCash = $factureStat->sumSaleInEurCash($from, $to, $entity);
	foreach ($HUFCash as $huf) {
		$sumHUFCash += $huf['multicurrency_total_ttc'];
	}
	foreach ($EURCash as $eur) {
		$sumEURCash += $eur['multicurrency_total_ttc'];
	}

	$sumByVAT = $helper->getSumByVAT($from, $entity);
	$JSONDataArray = [
		'sumHUFCash' => $sumHUFCash,
		'sumEURCash' => $sumEURCash,
		'sumByVAT' => $sumByVAT,
		'entity' => $entity,
		'from' => $from,
		'to' => $to
	];

	$html = $helper->createHTMLForDailyClosingCheckoutClosure($entity, 'Mr NILSZ Kft.', $from, $sumHUFCash, $sumEURCash);
	$pdf = new SettlementsPDFPrint($html);
	$checkoutclosurePDF = $pdf->generateDailyClosuingCheckoutClosurePDF();

	//exit;
	$checkoutClosure->entity = $entity;
	$checkoutClosure->label = 'Checkout closure';
	$checkoutClosure->status = 1;
	$checkoutClosure->model_pdf = $checkoutclosurePDF;
	$checkoutClosure->checkout_json = json_encode($JSONDataArray);
	$checkoutClosure->date_closing = $to;
	$checkoutClosure->create($user);

	$urltogo = '/custom/financialreport/checkoutclosureindex.php?idmenu=' . $idmenu . '&mainmenu=financialreport&leftmenu=';
	header("Location: " . $urltogo);
	exit;
}

if ($action == 'confirm_payment') {
	$userinvoice = new UserInvoice($db);
	$result = $userinvoice->fetch($id);
	$now = date("Y-m-d H:i:s", dol_now());
	if ($result > 0) {
		$userinvoice->payed = 1;
		$userinvoice->paymentdate = $now;
		$userinvoice->receipt_pdf = $fullpath;

		$updated = $userinvoice->update($user);
		if ($updated > 0) {
			$urltogo = '/custom/financialreport/userinvoice_card.php?id=' . $id . '&user_id=' . $user_id . '&payment_type=' . $payment_type . '&idmenu=&save_lastsearch_values=1';
			setEventMessage($langs->trans("CommissionUpdateSucces"), 'mesgs');
			header("Location: " . $urltogo);
			exit;
		} else {
			$urltogo = '/custom/financialreport/userinvoice_card.php?id=' . $id . '&user_id=' . $user_id . '&payment_type=' . $payment_type . '&idmenu=&save_lastsearch_values=1';
			setEventMessage($langs->trans("CommissionUpdateFailed"), 'error');
			header("Location: " . $urltogo);
			exit;
		}
	} else {
		$urltogo = '/custom/financialreport/userinvoice_card.php?id=' . $id . '&user_id=' . $user_id . '&payment_type=' . $payment_type . '&idmenu=&save_lastsearch_values=1';
		setEventMessage($langs->trans("CommisonFaultyRecord"), 'error');
		header("Location: " . $urltogo);
		exit;
	}


}


if ($action == 'confirm_settlement') {
	$isMinCommissionActice = false;

	$commissionhandler = new CommissionHandler();
	$selectedDataByOptionsArray = [];
	$data = explode('@', $commissions);
	$selectedOptions = explode("@", $optionsString);
	foreach ($selectedOptions as $itemtmp) {
		$array = explode('|', $itemtmp);
		$arrayTMP[$array[0]] = $array[1];
	}
	$summaHUF = 0;

	foreach ($data as $dataKey => $dataValue) {
		$tmpDataArray = explode("_", $dataValue);
		$logoutDate = $helper->checklogoutRecordInUserNaplo($tmpDataArray[0], $tmpDataArray[1], $id);
		$to = $logoutDate != '' ? $logoutDate : date('Y-m-d H:i:s', dol_now());
		$totalCommission = $commmissionhandler->getTotalCommission($tmpDataArray[0], $tmpDataArray[1], $to);
		$tmpDataArray[1] = $tmpDataArray[1] . '||' . $to;
		$tmpDataArray[2] = $totalCommission;
		$dataValue = implode("_", $tmpDataArray);
		if (in_array($dataKey, $selectedOptions)) {
			$selectedDataByOptionsArray[] = $dataValue;
		}
	}

	foreach ($selectedDataByOptionsArray as $item) {
		$itemData = explode('_', $item);
		$interval = explode('||', $itemData[1]);
		$usersDataDateArrayFrom[][$itemData[0]] = $interval[0];
		$usersDataDateArrayTo[][$itemData[0]] = $interval[1];
		$usersDateArray[][$itemData[0]] = $itemData[1];
	}

	foreach ($usersDateArray as $record) {
		foreach ($record as $recordKey => $recordValue) {
			$usersDateArrayTMP[][$recordKey] = explode('||', $recordValue);
		}
	}

	$usersArray = $helper->getUsersArray($selectedDataByOptionsArray);

	$usersArrayTMP = $usersArray;
	$allUsersString = implode(',', $usersArray);
	$settledInvoicesArray = [];
	$usersAmountArray = [];
	$validatorArray = [];
	$usersInvoicesArray = [];
	$usersString = '';
	$invocesRowidString = '';

	$queryArray = $helper->getQueryArray($usersDataDateArrayFrom, $usersDataDateArrayTo);

	foreach ($usersArray as $userRecord) {
		$usersAmountArray[$userRecord]['amount'] = 0;
		$usersAmountArray[$userRecord]['invoices'] = '';
	}

	foreach ($queryArray as $value) {
		$invocesRowidString = '';
		$from = $value['from'];
		$to = $value['to'];
		$exception = $helper->getAllComissionInvoicesOfUserInTheGroupFromUserInvoiceCreated($allUsersString, $queryArray[0]['from'], $queryArray[count($queryArray) - 1]['to']);
		$invocesRowidString = $helper->getInvoicesRowidFromFactureInAnIntervalByEveryUser($allUsersString, $from, $to, $exception);
		if($invocesRowidString != ''){
			$invocesRowidString .= ",";
		}
		$allFactures = $helper->getInvoicesRowidFromFactureInAnIntervalByEveryUserWithoutInvoicePrinting($allUsersString, $from, $to, $exception);
		$invocesRowidString .= $helper->getCrossShoppingInvoicesRowidFromFacture($allFactures, $from, $to);
		$usrCount = 0;
		$index = 0;
		$usersArrayFilteredUsers = [];
		$usersArrayFilteredUsersFrom = [];
		foreach ($usersDateArrayTMP as $usrDate) {

			foreach ($usrDate as $key => $value1) {
				if ($value1[0] == $from && $value1[1] > $to) {
					$usrCount++;
					$validatorArray[$key]['valid'] = true;
				} elseif ($value1[0] < $from && $value1[1] > $to) {
					$usrCount++;
					$validatorArray[$key]['valid'] = true;
				} elseif ($value1[0] < $from && $value1[1] == $to) {
					$usrCount++;
					$validatorArray[$key]['valid'] = true;
				} elseif ($value1[0] == $from && $value1[1] == $to) {
					$usrCount++;
					$validatorArray[$key]['valid'] = true;
				} else {
					$validatorArray[$key]['valid'] = false;
				}
				if ($validatorArray[$key]['valid']) {
					$usersArrayFilteredUsers[] = $key;
				}
				$usersArrayFilteredUsersFrom[$key] = $value1[0];
			}

		}
		$usersString = implode(',', $usersArrayFilteredUsers);

		if ($usersString != '') {
			$invocesRowidString = $helper->getInvoicesRowidFromFactureInAnIntervalByEveryUser($usersString, $from, $to, $exception);
			$allFactures = $helper->getInvoicesRowidFromFactureInAnIntervalByEveryUserWithoutInvoicePrinting($allUsersString, $from, $to, $exception);
			$crossShoppingString = $helper->getCrossShoppingInvoicesRowidFromFacture($allFactures, $from, $to);
			if($invocesRowidString != '' && $crossShoppingString != ''){
				$invocesRowidString .= ",";
			}
			$invocesRowidString .= $crossShoppingString;
			$allComissionInvoicesOfUserInTheGroupFromUserInvoice = '';
			$commissionHUF = $commmissionhandler->getAllCommission($usersString, 'HUF', $from, $to, $exception);
			$commissionEUR = $commmissionhandler->getAllCommission($usersString, 'EUR', $from, $to, $exception);
			$osszeg = $commissionHUF + $commissionEUR;
			if ($usrCount > 0) {
				$amount = $osszeg / $usrCount;
			}
		}

		foreach ($usersArrayFilteredUsers as $filteredUser) {
			$usersAmountArray[$filteredUser]['amount'] += $amount;
			if ($invocesRowidString != '') {
				if ($usersAmountArray[$filteredUser]['invoices'] != '') {
					$usersAmountArray[$filteredUser]['invoices'] .= ',';
				}
				$usersAmountArray[$filteredUser]['invoices'] .= $invocesRowidString;
				$usersAmountArray[$filteredUser]['namedata'] .= $helper->getNamedataFoTheUser($filteredUser);
			}
		}
	}

	$summaHUF = saveUserInvoiceRecordAndSetSummaHUF($commissionhandler, $usersAmountArray, $helper, $usersArrayFilteredUsersFrom, $isMinCommissionActice);

	$dataArray = array(
		'GroupName' => $helper->getGroupLabelById($id),
		'UsersData' => $usersAmountArray,
		'FullAmount' => $summaHUF,
		'Interval' => $helper->getFirstDateFromUserNaplo($id) . ' - ' . date('Y-m-d H:i:s'),
	);

	insertCommissionSettlementObj($dataArray, $groupEntity, $summaHUF, $helper);

	$urltogo = getUrltogo($hotelgroup, $id);
	header("Location: " . $urltogo);
	exit;
}


function saveUserInvoiceRecordAndSetSummaHUF($commissionhandler, $usersAmountArray, $helper, $usersArrayFilteredUsersFrom, $isMinCommissionActice = false)
{
	$generalDailyCommission = $commissionhandler->getDailyMinimumCommission();
	foreach ($usersAmountArray as $useKey => $userInvoiceRecord) {
		$uniformHUF = (int) $userInvoiceRecord['amount'];
		if ($uniformHUF != 0) {
			if ($isMinCommissionActice) {
				if ($generalDailyCommission > $uniformHUF) {
					$uniformHUF = $generalDailyCommission;
				}
			}
			$uniformInvoices = $userInvoiceRecord['invoices'];
			$helper->saveUserInvoiceRecord($usersArrayFilteredUsersFrom, $useKey, $uniformHUF, $uniformInvoices);
			$summaHUF += $uniformHUF;
		}
	}
	return $summaHUF;
}

function getUrltogo($hotelgroup, $id)
{
	if ($hotelgroup) {
		return '/custom/financialreport/settlementsstatementshotelsindex.php?id=' . $id;
		//} elseif (date("Y-m-d", dol_now()) != $exceptionFrom) {
		//	$urltogo = '/custom/financialreport/settlementsdaterangeindex.php?id=' . $id . '&datepicker=' . $exceptionFrom . ' - ' . $exceptionTo;
	} else {
		return '/custom/financialreport/settlementsstatementsindex.php?id=' . $id;
	}
}

function insertCommissionSettlementObj($dataArray, $groupEntity, $summaHUF, $helper)
{
	global $db, $user;
	$html = $helper->createHTMLForSettlement($dataArray);
	$pdf = new SettlementsPDFPrint($html);
	$CommissionPDF = $pdf->generateCommissionSettlementsPDF();

	$commissionSettlementsObj = new Commissionsettlements($db);
	$jsonData = json_encode($dataArray, JSON_PRETTY_PRINT);

	//exit;
	$sql = "INSERT INTO " . MAIN_DB_PREFIX . $commissionSettlementsObj->table_element . " (entity, ref, label, amount, description, model_pdf, fk_user_creat) VALUES ({$groupEntity}, '" . $helper->generateRef('2') . "', '', '{$summaHUF}', '{$jsonData}', '{$CommissionPDF}', $user->id)";
	$result = $db->query($sql);
}

function datumOsszehasonlitas($a, $b)
{
	$idopontA = strtotime($a);
	$idopontB = strtotime($b);

	if ($idopontA == $idopontB) {
		return 0;
	}

	return ($idopontA < $idopontB) ? -1 : 1;
}

if ($action == 'confirm_makeupto') {
	$tempDataArray = explode('|', $datastring);
	$makeUpToDataArray = ['user_id' => $tempDataArray[0], 'amount' => intval($tempDataArray[1]), 'year' => $tempDataArray[2], 'month' => $tempDataArray[3]];
	$date = $makeUpToDataArray['year'] . '-' . $makeUpToDataArray['month'] . '-' . date("t", strtotime("$year-$month-01"));
	$userinvoice = new UserInvoice($db);
	$userinvoice->ref = $helper->generateRef(2);
	$userinvoice->label = 'Jutalék/Commission ' . $date;
	$userinvoice->date_creation = $date;
	$userinvoice->description = 'Összeg / Amount: ' . $helper->correctNumber($makeUpToDataArray['amount']) . ' HUF. Make up to on: ' . $date;
	$userinvoice->user_id = $makeUpToDataArray['user_id'];
	$userinvoice->payment_type = 2;
	$userinvoice->amount = $makeUpToDataArray['amount'];
	$userinvoice->currency = 'HUF';
	$userinvoice->individual = 1;
	$userinvoice->create($user);
	setEventMessage($langs->trans('CommissionSaved'));
	$urltogo = '/custom/financialreport/commissionsummaryindex.php?idmenu=1628&year=' . $makeUpToDataArray['year'] . '&month=' . $makeUpToDataArray['month'] . '&mainmenu=financialreport&leftmenu=';
	header("Location: " . $urltogo);
	exit;
}

if ($action == 'confirm_personal_settlement') {
	$isMinCommissionActice = false;
	$commissionhandler = new CommissionHandler();
	$commissionArray = [];
	$result = explode('_', $commissions);
	$user_id = $result[0];
	$from = $result[1];
	$logoutDate = $helper->checklogoutRecordInUserNaplo($user_id, $from, $id);
	$to = $logoutDate != '' ? $logoutDate : date('Y-m-d H:i:s', dol_now());
	$totalCommission = $commmissionhandler->getTotalCommission($user_id, $from, $to);
	$result[2] = $totalCommission;
	$commissionArray['HUF'] = $result[2];

	if ($commissionArray['HUF'] > 0) {
		$invocesRowidString = '';
		$allFactures = $helper->getAllFacturesOfThisUser($user_id, $from, $to);
		$invocesRowidString = $helper->getInvoicesRowidFromFacture($user_id, $from, $to);
		$crossShoppingString = $helper->getCrossShoppingInvoicesRowidFromFacture($allFactures, $from, $to);
		if($invocesRowidString != '' && $crossShoppingString != ''){
			$invocesRowidString .= ",";
		}
		$invocesRowidString .= $crossShoppingString;
	}
	$exceptionFrom = $exceptionTo = date("Y-m-d", strtotime($from));

	foreach ($commissionArray as $key => $amount) {
		if ($amount > 0) {
			if ($isMinCommissionActice) {
				$generalDailyCommission = $commissionhandler->getDailyMinimumCommission();
				if ($generalDailyCommission > $amount) {
					$amount = $generalDailyCommission;
				}
			}
			$userinvoice = new UserInvoice($db);
			$currency = $key == 'HUF' ? 0 : 1;
			$userinvoice->ref = $helper->generateRef(2);
			$userinvoice->label = 'Jutalék/Commission ' . date("Y-m-d", strtotime($from));
			$userinvoice->description = 'Összeg / Amount: ' . $amount . ' ' . $key;
			$userinvoice->user_id = $user_id;
			$userinvoice->payment_type = 2;
			$userinvoice->amount = $amount;
			$userinvoice->currency = $currency;
			$userinvoice->individual = 1;
			$userinvoice->invoices = $invocesRowidString;
			$userinvoice->date_creation = strtotime($from);
			$userinvoice->create($user);
		}
	}
	//if (date("Y-m-d", dol_now()) != $exceptionFrom) {
	//	$urltogo = '/custom/financialreport/settlementsdaterangeindex.php?id=' . $id . '&datepicker=' . $exceptionFrom . ' - ' . $exceptionTo;
	//} else {
	$urltogo = '/custom/financialreport/settlementsstatementsindex.php?id=' . $id;
	//}
	header("Location: " . $urltogo);
	exit;
}

// Action to add record
if ($action == 'add' && !empty ($permissiontoadd)) {
	foreach ($object->fields as $key => $val) {
		if ($object->fields[$key]['type'] == 'duration') {
			if (GETPOST($key . 'hour') == '' && GETPOST($key . 'min') == '') {
				continue; // The field was not submited to be saved
			}
		} else {
			if (!GETPOSTISSET($key)) {
				continue; // The field was not submited to be saved
			}
		}
		// Ignore special fields
		if (in_array($key, array('rowid', 'entity', 'import_key'))) {
			continue;
		}
		if (in_array($key, array('date_creation', 'tms', 'fk_user_creat', 'fk_user_modif'))) {
			if (!in_array(abs($val['visible']), array(1, 3))) {
				continue; // Only 1 and 3 that are case to create
			}
		}

		// Set value to insert
		if (in_array($object->fields[$key]['type'], array('text', 'html'))) {
			$value = GETPOST($key, 'restricthtml');
		} elseif ($object->fields[$key]['type'] == 'date') {
			$value = dol_mktime(12, 0, 0, GETPOST($key . 'month', 'int'), GETPOST($key . 'day', 'int'), GETPOST($key . 'year', 'int')); // for date without hour, we use gmt
		} elseif ($object->fields[$key]['type'] == 'datetime') {
			$value = dol_mktime(GETPOST($key . 'hour', 'int'), GETPOST($key . 'min', 'int'), GETPOST($key . 'sec', 'int'), GETPOST($key . 'month', 'int'), GETPOST($key . 'day', 'int'), GETPOST($key . 'year', 'int'), 'tzuserrel');
		} elseif ($object->fields[$key]['type'] == 'duration') {
			$value = 60 * 60 * GETPOST($key . 'hour', 'int') + 60 * GETPOST($key . 'min', 'int');
		} elseif (preg_match('/^(integer|price|real|double)/', $object->fields[$key]['type'])) {
			$value = price2num(GETPOST($key, 'alphanohtml')); // To fix decimal separator according to lang setup
		} elseif ($object->fields[$key]['type'] == 'boolean') {
			$value = ((GETPOST($key) == '1' || GETPOST($key) == 'on') ? 1 : 0);
		} elseif ($object->fields[$key]['type'] == 'reference') {
			$tmparraykey = array_keys($object->param_list);
			$value = $tmparraykey[GETPOST($key)] . ',' . GETPOST($key . '2');
		} else {
			if ($key == 'lang') {
				$value = GETPOST($key, 'aZ09') ? GETPOST($key, 'aZ09') : "";
			} else {
				$value = GETPOST($key, 'alphanohtml');
			}
		}
		if (preg_match('/^integer:/i', $object->fields[$key]['type']) && $value == '-1') {
			$value = ''; // This is an implicit foreign key field
		}
		if (!empty ($object->fields[$key]['foreignkey']) && $value == '-1') {
			$value = ''; // This is an explicit foreign key field
		}

		//var_dump($key.' '.$value.' '.$object->fields[$key]['type']);
		$object->$key = $value;
		if (!empty ($val['notnull']) && $val['notnull'] > 0 && $object->$key == '' && isset ($val['default']) && $val['default'] == '(PROV)') {
			$object->$key = '(PROV)';
		}
		if (!empty ($val['notnull']) && $val['notnull'] > 0 && $object->$key == '' && !isset ($val['default'])) {
			$error++;
			setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv($val['label'])), null, 'errors');
		}

		// Validation of fields values
		if (getDolGlobalInt('MAIN_FEATURES_LEVEL') >= 2 || !empty ($conf->global->MAIN_ACTIVATE_VALIDATION_RESULT)) {
			if (!$error && !empty ($val['validate']) && is_callable(array($object, 'validateField'))) {
				if (!$object->validateField($object->fields, $key, $value)) {
					$error++;
				}
			}
		}
	}

	// Fill array 'array_options' with data from add form
	if (!$error) {
		$ret = $extrafields->setOptionalsFromPost(null, $object, '', 1);
		if ($ret < 0) {
			$error++;
		}
	}

	if (!$error) {
		$result = $object->create($user);
		if ($result > 0) {
			// Creation OK
			if (isModEnabled('categorie') && method_exists($object, 'setCategories')) {
				$categories = GETPOST('categories', 'array:int');
				$object->setCategories($categories);
			}
			$backtopage .= '?id=' . $object->id . '&user_id=' . $user_id . '&payment_type=' . $payment_type . '&idmenu=' . $idmenu . '&save_lastsearch_values=1';
			$urltogo = $backtopage ? str_replace('__ID__', $result, $backtopage) : $backurlforlist;
			$urltogo = preg_replace('/--IDFORBACKTOPAGE--/', $object->id, $urltogo); // New method to autoselect project after a New on another form object creation

			if (empty ($noback)) {
				header("Location: " . $urltogo);
				exit;
			}
		} else {
			$error++;
			// Creation KO
			if (!empty ($object->errors)) {
				setEventMessages(null, $object->errors, 'errors');
			} else {
				setEventMessages($object->error, null, 'errors');
			}
			$action = 'create';
		}
	} else {
		$action = 'create';
	}
}

// Action to update record
if ($action == 'update' && !empty ($permissiontoadd)) {
	$backtopage .= '?id=' . $id . '&user_id=' . $user_id . '&payment_type=' . $payment_type . '&idmenu=' . $idmenu . '&save_lastsearch_values=1';
	foreach ($object->fields as $key => $val) {
		// Check if field was submited to be edited
		if ($object->fields[$key]['type'] == 'duration') {
			if (!GETPOSTISSET($key . 'hour') || !GETPOSTISSET($key . 'min')) {
				continue; // The field was not submited to be saved
			}
		} elseif ($object->fields[$key]['type'] == 'boolean') {
			if (!GETPOSTISSET($key)) {
				$object->$key = 0; // use 0 instead null if the field is defined as not null
				continue;
			}
		} else {
			if (!GETPOSTISSET($key)) {
				continue; // The field was not submited to be saved
			}
		}
		// Ignore special fields
		if (in_array($key, array('rowid', 'entity', 'import_key'))) {
			continue;
		}
		if (in_array($key, array('date_creation', 'tms', 'fk_user_creat', 'fk_user_modif'))) {
			if (!in_array(abs($val['visible']), array(1, 3, 4))) {
				continue; // Only 1 and 3 and 4, that are cases to update
			}
		}

		// Set value to update
		if (preg_match('/^(text|html)/', $object->fields[$key]['type'])) {
			$tmparray = explode(':', $object->fields[$key]['type']);
			if (!empty ($tmparray[1])) {
				$value = GETPOST($key, $tmparray[1]);
			} else {
				$value = GETPOST($key, 'restricthtml');
			}
		} elseif ($object->fields[$key]['type'] == 'date') {
			$value = dol_mktime(12, 0, 0, GETPOST($key . 'month', 'int'), GETPOST($key . 'day', 'int'), GETPOST($key . 'year', 'int')); // for date without hour, we use gmt
		} elseif ($object->fields[$key]['type'] == 'datetime') {
			$value = dol_mktime(GETPOST($key . 'hour', 'int'), GETPOST($key . 'min', 'int'), GETPOST($key . 'sec', 'int'), GETPOST($key . 'month', 'int'), GETPOST($key . 'day', 'int'), GETPOST($key . 'year', 'int'), 'tzuserrel');
		} elseif ($object->fields[$key]['type'] == 'duration') {
			if (GETPOST($key . 'hour', 'int') != '' || GETPOST($key . 'min', 'int') != '') {
				$value = 60 * 60 * GETPOST($key . 'hour', 'int') + 60 * GETPOST($key . 'min', 'int');
			} else {
				$value = '';
			}
		} elseif (preg_match('/^(integer|price|real|double)/', $object->fields[$key]['type'])) {
			$value = price2num(GETPOST($key, 'alphanohtml')); // To fix decimal separator according to lang setup
		} elseif ($object->fields[$key]['type'] == 'boolean') {
			$value = ((GETPOST($key, 'aZ09') == 'on' || GETPOST($key, 'aZ09') == '1') ? 1 : 0);
		} elseif ($object->fields[$key]['type'] == 'reference') {
			$value = array_keys($object->param_list)[GETPOST($key)] . ',' . GETPOST($key . '2');
		} else {
			if ($key == 'lang') {
				$value = GETPOST($key, 'aZ09');
			} else {
				$value = GETPOST($key, 'alphanohtml');
			}
		}
		if (preg_match('/^integer:/i', $object->fields[$key]['type']) && $value == '-1') {
			$value = ''; // This is an implicit foreign key field
		}
		if (!empty ($object->fields[$key]['foreignkey']) && $value == '-1') {
			$value = ''; // This is an explicit foreign key field
		}

		$object->$key = $value;
		if ($val['notnull'] > 0 && $object->$key == '' && is_null($val['default'])) {
			$error++;
			setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv($val['label'])), null, 'errors');
		}

		// Validation of fields values
		if (getDolGlobalInt('MAIN_FEATURES_LEVEL') >= 2 || !empty ($conf->global->MAIN_ACTIVATE_VALIDATION_RESULT)) {
			if (!$error && !empty ($val['validate']) && is_callable(array($object, 'validateField'))) {
				if (!$object->validateField($object->fields, $key, $value)) {
					$error++;
				}
			}
		}

		if (isModEnabled('categorie')) {
			$categories = GETPOST('categories', 'array');
			if (method_exists($object, 'setCategories')) {
				$object->setCategories($categories);
			}
		}
	}

	// Fill array 'array_options' with data from add form
	if (!$error) {
		$ret = $extrafields->setOptionalsFromPost(null, $object, '@GETPOSTISSET');
		if ($ret < 0) {
			$error++;
		}
	}

	if (!$error) {
		$result = $object->update($user);
		if ($result > 0) {
			$action = 'view';
			$urltogo = $backtopage ? str_replace('__ID__', $result, $backtopage) : $backurlforlist;
			$urltogo = preg_replace('/--IDFORBACKTOPAGE--/', $object->id, $urltogo); // New method to autoselect project after a New on another form object creation
			if ($urltogo && !$noback) {
				header("Location: " . $urltogo);
				exit;
			}
		} else {
			$error++;
			// Creation KO
			setEventMessages($object->error, $object->errors, 'errors');
			$action = 'edit';
		}
	} else {
		$action = 'edit';
	}
}

// Action to update one extrafield
if ($action == "update_extras" && !empty ($permissiontoadd)) {
	$object->fetch(GETPOST('id', 'int'));

	$attributekey = GETPOST('attribute', 'alpha');
	$attributekeylong = 'options_' . $attributekey;

	if (GETPOSTISSET($attributekeylong . 'day') && GETPOSTISSET($attributekeylong . 'month') && GETPOSTISSET($attributekeylong . 'year')) {
		// This is properties of a date
		$object->array_options['options_' . $attributekey] = dol_mktime(GETPOST($attributekeylong . 'hour', 'int'), GETPOST($attributekeylong . 'min', 'int'), GETPOST($attributekeylong . 'sec', 'int'), GETPOST($attributekeylong . 'month', 'int'), GETPOST($attributekeylong . 'day', 'int'), GETPOST($attributekeylong . 'year', 'int'));
		//var_dump(dol_print_date($object->array_options['options_'.$attributekey]));exit;
	} else {
		$object->array_options['options_' . $attributekey] = GETPOST($attributekeylong, 'alpha');
	}

	$result = $object->insertExtraFields(empty ($triggermodname) ? '' : $triggermodname, $user);
	if ($result > 0) {
		setEventMessages($langs->trans('RecordSaved'), null, 'mesgs');
		$action = 'view';
	} else {
		$error++;
		setEventMessages($object->error, $object->errors, 'errors');
		$action = 'edit_extras';
	}
}

// Action to delete
if ($action == 'confirm_delete' && !empty ($permissiontodelete)) {
	if (!($object->id > 0)) {
		dol_print_error('', 'Error, object must be fetched before being deleted');
		exit;
	}

	$result = $object->delete($user);

	if ($result > 0) {
		// Delete OK
		setEventMessages("RecordDeleted", null, 'mesgs');

		if (empty ($noback)) {
			header("Location: " . $backurlforlist);
			exit;
		}
	} else {
		$error++;
		if (!empty ($object->errors)) {
			setEventMessages(null, $object->errors, 'errors');
		} else {
			setEventMessages($object->error, null, 'errors');
		}
	}

	$action = '';
}

// Remove a line
if ($action == 'confirm_deleteline' && $confirm == 'yes' && !empty ($permissiontoadd)) {
	if (method_exists($object, 'deleteline')) {
		$result = $object->deleteline($user, $lineid); // For backward compatibility
	} else {
		$result = $object->deleteLine($user, $lineid);
	}
	if ($result > 0) {
		// Define output language
		$outputlangs = $langs;
		$newlang = '';
		if ($conf->global->MAIN_MULTILANGS && empty ($newlang) && GETPOST('lang_id', 'aZ09')) {
			$newlang = GETPOST('lang_id', 'aZ09');
		}
		if ($conf->global->MAIN_MULTILANGS && empty ($newlang) && is_object($object->thirdparty)) {
			$newlang = $object->thirdparty->default_lang;
		}
		if (!empty ($newlang)) {
			$outputlangs = new Translate("", $conf);
			$outputlangs->setDefaultLang($newlang);
		}
		if (empty ($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
			if (method_exists($object, 'generateDocument')) {
				$ret = $object->fetch($object->id); // Reload to get new records
				$object->generateDocument($object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref);
			}
		}

		setEventMessages($langs->trans('RecordDeleted'), null, 'mesgs');

		if (empty ($noback)) {
			header('Location: ' . $_SERVER["PHP_SELF"] . '?id=' . $object->id);
			exit;
		}
	} else {
		$error++;
		setEventMessages($object->error, $object->errors, 'errors');
	}
	$action = '';
}

// Action validate object
if ($action == 'confirm_validate' && $confirm == 'yes' && $permissiontoadd) {
	$result = $object->validate($user);
	if ($result >= 0) {
		// Define output language
		if (empty ($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
			if (method_exists($object, 'generateDocument')) {
				$outputlangs = $langs;
				$newlang = '';
				if (!empty ($conf->global->MAIN_MULTILANGS) && empty ($newlang) && GETPOST('lang_id', 'aZ09')) {
					$newlang = GETPOST('lang_id', 'aZ09');
				}
				if (!empty ($conf->global->MAIN_MULTILANGS) && empty ($newlang)) {
					$newlang = $object->thirdparty->default_lang;
				}
				if (!empty ($newlang)) {
					$outputlangs = new Translate("", $conf);
					$outputlangs->setDefaultLang($newlang);
				}

				$ret = $object->fetch($id); // Reload to get new records

				$model = $object->model_pdf;

				$retgen = $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
				if ($retgen < 0) {
					setEventMessages($object->error, $object->errors, 'warnings');
				}
			}
		}
	} else {
		$error++;
		setEventMessages($object->error, $object->errors, 'errors');
	}
	$action = '';
}

// Action close object
if ($action == 'confirm_close' && $confirm == 'yes' && $permissiontoadd) {
	$result = $object->cancel($user);
	if ($result >= 0) {
		// Define output language
		if (empty ($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
			if (method_exists($object, 'generateDocument')) {
				$outputlangs = $langs;
				$newlang = '';
				if ($conf->global->MAIN_MULTILANGS && empty ($newlang) && GETPOST('lang_id', 'aZ09')) {
					$newlang = GETPOST('lang_id', 'aZ09');
				}
				if ($conf->global->MAIN_MULTILANGS && empty ($newlang)) {
					$newlang = $object->thirdparty->default_lang;
				}
				if (!empty ($newlang)) {
					$outputlangs = new Translate("", $conf);
					$outputlangs->setDefaultLang($newlang);
				}
				$model = $object->model_pdf;
				$ret = $object->fetch($id); // Reload to get new records

				$object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
			}
		}
	} else {
		$error++;
		setEventMessages($object->error, $object->errors, 'errors');
	}
	$action = '';
}

// Action setdraft object
if ($action == 'confirm_setdraft' && $confirm == 'yes' && $permissiontoadd) {
	$result = $object->setDraft($user);
	if ($result >= 0) {
		// Nothing else done
	} else {
		$error++;
		setEventMessages($object->error, $object->errors, 'errors');
	}
	$action = '';
}

// Action reopen object
if ($action == 'confirm_reopen' && $confirm == 'yes' && $permissiontoadd) {
	$result = $object->reopen($user);
	if ($result >= 0) {
		// Define output language
		if (empty ($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
			if (method_exists($object, 'generateDocument')) {
				$outputlangs = $langs;
				$newlang = '';
				if ($conf->global->MAIN_MULTILANGS && empty ($newlang) && GETPOST('lang_id', 'aZ09')) {
					$newlang = GETPOST('lang_id', 'aZ09');
				}
				if ($conf->global->MAIN_MULTILANGS && empty ($newlang)) {
					$newlang = $object->thirdparty->default_lang;
				}
				if (!empty ($newlang)) {
					$outputlangs = new Translate("", $conf);
					$outputlangs->setDefaultLang($newlang);
				}
				$model = $object->model_pdf;
				$ret = $object->fetch($id); // Reload to get new records

				$object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
			}
		}
	} else {
		$error++;
		setEventMessages($object->error, $object->errors, 'errors');
	}
	$action = '';
}

// Action clone object
if ($action == 'confirm_clone' && $confirm == 'yes' && !empty ($permissiontoadd)) {
	if (1 == 0 && !GETPOST('clone_content') && !GETPOST('clone_receivers')) {
		setEventMessages($langs->trans("NoCloneOptionsSpecified"), null, 'errors');
	} else {
		$objectutil = dol_clone($object, 1); // To avoid to denaturate loaded object when setting some properties for clone or if createFromClone modifies the object. We use native clone to keep this->db valid.
		//$objectutil->date = dol_mktime(12, 0, 0, GETPOST('newdatemonth', 'int'), GETPOST('newdateday', 'int'), GETPOST('newdateyear', 'int'));
		// ...
		$result = $objectutil->createFromClone($user, (($object->id > 0) ? $object->id : $id));
		if (is_object($result) || $result > 0) {
			$newid = 0;
			if (is_object($result)) {
				$newid = $result->id;
			} else {
				$newid = $result;
			}

			if (empty ($noback)) {
				header("Location: " . $_SERVER['PHP_SELF'] . '?id=' . $newid); // Open record of new object
				exit;
			}
		} else {
			$error++;
			setEventMessages($objectutil->error, $objectutil->errors, 'errors');
			$action = '';
		}
	}
}