147 lines
6.1 KiB
PHP
147 lines
6.1 KiB
PHP
|
<?php
|
||
|
|
/*********************************************************************************
|
||
|
|
*
|
||
|
|
* TimeTrex is a Workforce Management program developed by
|
||
|
|
* TimeTrex Software Inc. Copyright (C) 2003 - 2021 TimeTrex Software Inc.
|
||
|
|
*
|
||
|
|
* This program is free software; you can redistribute it and/or modify it under
|
||
|
|
* the terms of the GNU Affero General Public License version 3 as published by
|
||
|
|
* the Free Software Foundation with the addition of the following permission
|
||
|
|
* added to Section 15 as permitted in Section 7(a): FOR ANY PART OF THE COVERED
|
||
|
|
* WORK IN WHICH THE COPYRIGHT IS OWNED BY TIMETREX, TIMETREX DISCLAIMS THE
|
||
|
|
* WARRANTY OF NON INFRINGEMENT OF THIRD PARTY RIGHTS.
|
||
|
|
*
|
||
|
|
* 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 Affero General Public License for more
|
||
|
|
* details.
|
||
|
|
*
|
||
|
|
*
|
||
|
|
* You should have received a copy of the GNU Affero General Public License along
|
||
|
|
* with this program; if not, see http://www.gnu.org/licenses or write to the Free
|
||
|
|
* Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
|
||
|
|
* 02110-1301 USA.
|
||
|
|
*
|
||
|
|
*
|
||
|
|
* You can contact TimeTrex headquarters at Unit 22 - 2475 Dobbin Rd. Suite
|
||
|
|
* #292 West Kelowna, BC V4T 2E9, Canada or at email address info@timetrex.com.
|
||
|
|
*
|
||
|
|
*
|
||
|
|
* The interactive user interfaces in modified source and object code versions
|
||
|
|
* of this program must display Appropriate Legal Notices, as required under
|
||
|
|
* Section 5 of the GNU Affero General Public License version 3.
|
||
|
|
*
|
||
|
|
*
|
||
|
|
* In accordance with Section 7(b) of the GNU Affero General Public License
|
||
|
|
* version 3, these Appropriate Legal Notices must retain the display of the
|
||
|
|
* "Powered by TimeTrex" logo. If the display of the logo is not reasonably
|
||
|
|
* feasible for technical reasons, the Appropriate Legal Notices must display
|
||
|
|
* the words "Powered by TimeTrex".
|
||
|
|
*
|
||
|
|
********************************************************************************/
|
||
|
|
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @package Module_Install
|
||
|
|
*/
|
||
|
|
class InstallSchema_1063A extends InstallSchema_Base {
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @return bool
|
||
|
|
*/
|
||
|
|
function preInstall() {
|
||
|
|
Debug::text( 'preInstall: ' . $this->getVersion(), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
|
||
|
|
$plf = new PunchListFactory();
|
||
|
|
$punch_control_ids = $plf->db->GetCol( 'SELECT distinct punch_control_id FROM punch WHERE deleted = 0 GROUP BY punch_control_id,status_id HAVING count(*) > 1' );
|
||
|
|
|
||
|
|
if ( is_array( $punch_control_ids ) ) {
|
||
|
|
Debug::text( 'Duplicate Punch Records: ' . count( $punch_control_ids ), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
foreach ( $punch_control_ids as $punch_control_id ) {
|
||
|
|
Debug::text( ' Punch Control ID: ' . $punch_control_id, __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
|
||
|
|
//Handle duplicate punch timestamps...
|
||
|
|
$plf->getByPunchControlId( $punch_control_id, null, [ 'time_stamp' => 'asc' ] );
|
||
|
|
if ( $plf->getRecordCount() > 2 ) {
|
||
|
|
Debug::text( ' Found Punches: ' . $plf->getRecordCount(), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
|
||
|
|
//If there are more than two duplicate punches, delete ones with identical timestamps.
|
||
|
|
$prev_time_stamp = false;
|
||
|
|
$i = 0;
|
||
|
|
foreach ( $plf as $p_obj ) {
|
||
|
|
if ( $prev_time_stamp !== false && $prev_time_stamp == $p_obj->getTimeStamp() ) {
|
||
|
|
Debug::text( ' Found Duplicate TimeStamp: ' . $p_obj->getTimeStamp() . '(' . $p_obj->getID() . ') Deleting...', __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
$plf->db->Execute( 'UPDATE punch SET deleted = 1 WHERE id = \'' . TTUUID::castUUID( $p_obj->getID() ) . '\'' );
|
||
|
|
$i++;
|
||
|
|
}
|
||
|
|
|
||
|
|
$prev_time_stamp = $p_obj->getTimeStamp();
|
||
|
|
}
|
||
|
|
|
||
|
|
//If there are more than two duplicate punches and no duplicate timestamps, delete ones with duplicate status_ids in timestamp order.
|
||
|
|
//Check for duplicate statuses not in a row too, ie: 10, 20, 10.
|
||
|
|
if ( $i == 0 ) {
|
||
|
|
$prev_status_id = [];
|
||
|
|
foreach ( $plf as $p_obj ) {
|
||
|
|
if ( $prev_status_id !== false && in_array( $p_obj->getStatus(), $prev_status_id ) ) {
|
||
|
|
Debug::text( ' Found Duplicate Status: ' . $p_obj->getStatus() . '(' . $p_obj->getID() . ') Deleting...', __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
$plf->db->Execute( 'UPDATE punch SET deleted = 1 WHERE id = \'' . TTUUID::castUUID( $p_obj->getID() ) . '\'' );
|
||
|
|
$i++;
|
||
|
|
}
|
||
|
|
|
||
|
|
$prev_status_id[] = $p_obj->getStatus();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
//Handle punches with the same status_id
|
||
|
|
$plf->getByPunchControlId( $punch_control_id, null, [ 'time_stamp' => 'asc' ] );
|
||
|
|
if ( $plf->getRecordCount() == 2 ) {
|
||
|
|
Debug::text( ' Checking Duplicate Status Punches: ' . $plf->getRecordCount(), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
$x = 0;
|
||
|
|
foreach ( $plf as $p_obj ) {
|
||
|
|
if ( $x == 0 && $p_obj->getStatus() != 10 ) {
|
||
|
|
Debug::text( ' Found Duplicate IN punches: ' . $p_obj->getID() . ' Correcting...', __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
$plf->db->Execute( 'UPDATE punch SET status_id = 10 WHERE id = \'' . TTUUID::castUUID( $p_obj->getID() ) . '\'' );
|
||
|
|
} else if ( $x == 1 && $p_obj->getStatus() != 20 ) {
|
||
|
|
Debug::text( ' Found Duplicate OUT punches: ' . $p_obj->getID() . ' Correcting...', __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
$plf->db->Execute( 'UPDATE punch SET status_id = 20 WHERE id = \'' . TTUUID::castUUID( $p_obj->getID() ) . '\'' );
|
||
|
|
}
|
||
|
|
$x++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
Debug::text( 'preInstall Done: ' . $this->getVersion(), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @return bool
|
||
|
|
*/
|
||
|
|
function postInstall() {
|
||
|
|
Debug::text( 'postInstall: ' . $this->getVersion(), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
|
||
|
|
$clf = TTNew( 'CompanyListFactory' ); /** @var CompanyListFactory $clf */
|
||
|
|
$clf->getAll();
|
||
|
|
if ( $clf->getRecordCount() > 0 ) {
|
||
|
|
$x = 0;
|
||
|
|
foreach ( $clf as $company_obj ) {
|
||
|
|
//Go through each permission group, and enable schedule, view_open for for anyone who has schedule, view
|
||
|
|
Debug::text( 'Company: ' . $company_obj->getName() . ' X: ' . $x . ' of :' . $clf->getRecordCount(), __FILE__, __LINE__, __METHOD__, 9 );
|
||
|
|
|
||
|
|
//Populate currency rate table.
|
||
|
|
CurrencyFactory::updateCurrencyRates( $company_obj->getId() );
|
||
|
|
|
||
|
|
$x++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
?>
|