<?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 Modules\Install
 */
class InstallSchema_1054A extends InstallSchema_Base {

	/**
	 * @return bool
	 */
	function preInstall() {
		Debug::text( 'preInstall: ' . $this->getVersion(), __FILE__, __LINE__, __METHOD__, 9 );

		return true;
	}

	/**
	 * @return bool
	 */
	function postInstall() {
		Debug::text( 'postInstall: ' . $this->getVersion(), __FILE__, __LINE__, __METHOD__, 9 );

		//Update Social Security rates. Can't do this in the 1020T as that is executed before 1031A, which will cause an error due to missing columns.
		$clf = TTnew( 'CompanyListFactory' ); /** @var CompanyListFactory $clf */
		$clf->getAll();
		if ( $clf->getRecordCount() > 0 ) {
			foreach ( $clf as $c_obj ) {
				Debug::text( 'Company: ' . $c_obj->getName(), __FILE__, __LINE__, __METHOD__, 9 );
				if ( $c_obj->getStatus() != 30 && $c_obj->getCountry() == 'US' ) {
					//Get PayStub Link accounts
					$pseallf = TTnew( 'PayStubEntryAccountLinkListFactory' ); /** @var PayStubEntryAccountLinkListFactory $pseallf */
					$pseallf->getByCompanyId( $c_obj->getID() );
					if ( $pseallf->getRecordCount() > 0 ) {
						$psea_obj = $pseallf->getCurrent();
					} else {

						// @codingStandardsIgnoreStart
						Debug::text( 'Failed getting PayStubEntryLink for Company ID: ' . $c_obj->getId(), __FILE__, __LINE__, __METHOD__, 10 );
						//leaving debugs alone.
						// @codingStandardsIgnoreEnd
						continue;
					}

					$include_pay_stub_accounts = false;
					$exclude_pay_stub_accounts = false;

					$cdlf = TTnew( 'CompanyDeductionListFactory' ); /** @var CompanyDeductionListFactory $cdlf */
					$cdlf->getByCompanyIdAndName( $c_obj->getID(), 'Medicare - Employee' );
					if ( $cdlf->getRecordCount() == 1 ) {
						$cd_obj = $cdlf->getCurrent();
						Debug::text( 'Found Medicare Employee Tax / Deduction, ID: ' . $c_obj->getID(), __FILE__, __LINE__, __METHOD__, 9 );
						if ( $cd_obj->getCalculation() == 10 ) {
							//Copy filing status from Federal Income Tax.
							$cdlf = TTnew( 'CompanyDeductionListFactory' ); /** @var CompanyDeductionListFactory $cdlf */
							$cdlf->getByCompanyIdAndName( $c_obj->getID(), 'Federal Income Tax' );
							if ( $cdlf->getRecordCount() == 1 ) {
								$tmp_cd_obj = $cdlf->getCurrent();
							} else {
								$cdlf = TTnew( 'CompanyDeductionListFactory' ); /** @var CompanyDeductionListFactory $cdlf */
								$cdlf->getByCompanyIdAndName( $c_obj->getID(), 'US - Federal Income Tax' );
								if ( $cdlf->getRecordCount() == 1 ) {
									$tmp_cd_obj = $cdlf->getCurrent();
								}
							}

							$filing_status = [];
							if ( is_object( $tmp_cd_obj ) ) {
								$udlf = TTnew( 'UserDeductionListFactory' ); /** @var UserDeductionListFactory $udlf */
								$udlf->getByCompanyIdAndCompanyDeductionId( $c_obj->getID(), $tmp_cd_obj->getID() );
								if ( $udlf->getRecordCount() > 0 ) {
									foreach ( $udlf as $ud_obj ) {
										$filing_status[$ud_obj->getUser()] = $ud_obj->getUserValue1();
									}
								}
							}
							unset( $udlf, $ud_obj );

							$cd_obj->setCalculation( 82 );
							$cd_obj->setUserValue1( 10 ); //Single
							$cd_obj->setUserValue2( '' );
							Debug::text( 'Medicare Employee Tax / Deduction Matches... Adjusting specific formula Percent...', __FILE__, __LINE__, __METHOD__, 9 );
							$include_pay_stub_accounts = $cd_obj->getIncludePayStubEntryAccount();
							$exclude_pay_stub_accounts = $cd_obj->getExcludePayStubEntryAccount();

							if ( $cd_obj->isValid() ) {
								//Delete existing UserDeduction rows, so we can create new ones.
								$udlf = TTnew( 'UserDeductionListFactory' ); /** @var UserDeductionListFactory $udlf */
								$udlf->getByCompanyIdAndCompanyDeductionId( $c_obj->getID(), $cd_obj->getID() );
								if ( $udlf->getRecordCount() > 0 ) {
									Debug::text( 'Deleting ' . $udlf->getRecordCount() . ' User Deductions assigned to Company Deduction ID: ' . $cd_obj->getID(), __FILE__, __LINE__, __METHOD__, 9 );
									foreach ( $udlf as $ud_obj ) {
										$ud_obj->setUserValue1( ( isset( $filing_status[$ud_obj->getUser()] ) ) ? $filing_status[$ud_obj->getUser()] : 10 ); //Default to single.
										$ud_obj->setUserValue2( '' );

										$ud_obj->ignore_column_list = true; //Prevents SQL errors due to new columns being added later on.
										if ( $ud_obj->isValid() ) {
											$ud_obj->Save();
										}
									}
								}
								unset( $udlf, $ud_obj );

								$cd_obj->ignore_column_list = true; //Prevents SQL errors due to new columns being added later on.
								if ( $cd_obj->isValid() ) {
									$cd_obj->Save();
								}
							}
						}
					} else {
						Debug::text( 'Failed to find Medicare Employee Tax / Deduction for Company: ' . $c_obj->getName(), __FILE__, __LINE__, __METHOD__, 9 );
					}
					unset( $cdlf, $cd_obj );

					$cdlf = TTnew( 'CompanyDeductionListFactory' ); /** @var CompanyDeductionListFactory $cdlf */
					$cdlf->getByCompanyIdAndName( $c_obj->getID(), 'Medicare - Employer' );
					if ( $cdlf->getRecordCount() == 1 ) {
						$cd_obj = $cdlf->getCurrent();
						Debug::text( 'Found Medicare Employer Tax / Deduction, ID: ' . $c_obj->getID(), __FILE__, __LINE__, __METHOD__, 9 );
						if ( $cd_obj->getCalculation() == 10 ) {
							$cd_obj->setCalculation( 83 );
							$cd_obj->setUserValue1( '' );
							$cd_obj->setUserValue2( '' );
							Debug::text( 'Medicare Employer Tax / Deduction Matches... Adjusting specific formula Percent...', __FILE__, __LINE__, __METHOD__, 9 );
							$include_pay_stub_accounts = $cd_obj->getIncludePayStubEntryAccount();
							$exclude_pay_stub_accounts = $cd_obj->getExcludePayStubEntryAccount();

							$cd_obj->ignore_column_list = true; //Prevents SQL errors due to new columns being added later on.
							if ( $cd_obj->isValid() ) {
								$cd_obj->Save();
							}
						}
					} else {
						Debug::text( 'Failed to find Medicare Employer Tax / Deduction for Company: ' . $c_obj->getName(), __FILE__, __LINE__, __METHOD__, 9 );
					}
					unset( $cdlf, $cd_obj );

					$cdlf = TTnew( 'CompanyDeductionListFactory' ); /** @var CompanyDeductionListFactory $cdlf */
					$cdlf->getByCompanyIdAndName( $c_obj->getID(), 'Social Security - Employee' );
					if ( $cdlf->getRecordCount() == 1 ) {
						$cd_obj = $cdlf->getCurrent();
						Debug::text( 'Found SS Employee Tax / Deduction, ID: ' . $c_obj->getID(), __FILE__, __LINE__, __METHOD__, 9 );
						if ( $cd_obj->getCalculation() == 15 ) {
							$cd_obj->setCalculation( 84 );
							$cd_obj->setUserValue1( '' );
							$cd_obj->setUserValue2( '' );
							Debug::text( 'SS Employee Tax / Deduction Matches... Adjusting specific formula Percent...', __FILE__, __LINE__, __METHOD__, 9 );
							$include_pay_stub_accounts = $cd_obj->getIncludePayStubEntryAccount();
							$exclude_pay_stub_accounts = $cd_obj->getExcludePayStubEntryAccount();

							$cd_obj->ignore_column_list = true; //Prevents SQL errors due to new columns being added later on.
							if ( $cd_obj->isValid() ) {
								$cd_obj->Save();
							}
						}
					} else {
						Debug::text( 'Failed to find SS Employee Tax / Deduction for Company: ' . $c_obj->getName(), __FILE__, __LINE__, __METHOD__, 9 );
					}
					unset( $cdlf, $cd_obj );

					$cdlf = TTnew( 'CompanyDeductionListFactory' ); /** @var CompanyDeductionListFactory $cdlf */
					$cdlf->getByCompanyIdAndName( $c_obj->getID(), 'Social Security - Employer' );
					if ( $cdlf->getRecordCount() == 1 ) {
						$cd_obj = $cdlf->getCurrent();

						Debug::text( 'Found SS Employer Tax / Deduction, ID: ' . $c_obj->getID() . ' Percent: ' . $cd_obj->getUserValue1() . ' Wage Base: ' . $cd_obj->getUserValue2(), __FILE__, __LINE__, __METHOD__, 9 );

						if ( ( $cd_obj->getCalculation() == 10 ) || ( $cd_obj->getCalculation() == 15 ) ) {
							$cd_obj->setCalculation( 85 );
							$cd_obj->setUserValue1( '' );
							$cd_obj->setUserValue2( '' );
							Debug::text( 'SS Employer Tax / Deduction Matches... Adjusting specific formula Percent...', __FILE__, __LINE__, __METHOD__, 9 );
							if ( $include_pay_stub_accounts !== false ) {
								Debug::text( 'Matching Include/Exclude accounts with SS Employee Entry...', __FILE__, __LINE__, __METHOD__, 9 );
								//Match include accounts with SS employee entry.
								$cd_obj->setIncludePayStubEntryAccount( $include_pay_stub_accounts );
								$cd_obj->setExcludePayStubEntryAccount( $exclude_pay_stub_accounts );
							} else {
								Debug::text( 'NOT Matching Include/Exclude accounts with SS Employee Entry...', __FILE__, __LINE__, __METHOD__, 9 );
								$cd_obj->setIncludePayStubEntryAccount( [ $psea_obj->getTotalGross() ] );
							}

							$cd_obj->ignore_column_list = true; //Prevents SQL errors due to new columns being added later on.
							if ( $cd_obj->isValid() ) {
								$cd_obj->Save();
							}
						}
					} else {
						Debug::text( 'Failed to find SS Employer Tax / Deduction for Company: ' . $c_obj->getName(), __FILE__, __LINE__, __METHOD__, 9 );
					}
				}
			}
		}

		return true;
	}
}

?>