function createAccrualBalance($user_id, $accrual_policy_id, $type = 30) { $af = new AccrualFactory(); $af->setUser($user_id); $af->setType($type); //Awarded $af->setAccrualPolicyID($accrual_policy_id); $af->setAmount(rand(3600 * 8, 3600 * 24)); $af->setTimeStamp(time() - 86400 * 3); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $insert_id = $af->Save(); Debug::Text('Accrual ID: ' . $insert_id, __FILE__, __LINE__, __METHOD__, 10); return $insert_id; } Debug::Text('Failed Creating Accrual Balance!', __FILE__, __LINE__, __METHOD__, 10); return FALSE; }
} $af = new AccrualFactory(); $action = Misc::findSubmitButton(); $action = strtolower($action); switch ($action) { case 'submit': Debug::Text('Submit!', __FILE__, __LINE__, __METHOD__, 10); $af->setId($data['id']); $af->setUser($data['user_id']); $af->setType($data['type_id']); $af->setAccrualPolicyID($data['accrual_policy_id']); $af->setAmount($data['amount']); $af->setTimeStamp($data['time_stamp']); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $af->Save(); Redirect::Page(URLBuilder::getURL(array('filter_user_id' => $data['user_id']), 'UserAccrualBalanceList.php')); break; } default: if (isset($id)) { BreadCrumb::setCrumb($title); $alf = new AccrualListFactory(); $alf->getById($id); foreach ($alf as $a_obj) { //Debug::Arr($station,'Department', __FILE__, __LINE__, __METHOD__,10); $data = array('id' => $a_obj->getId(), 'user_id' => $a_obj->getUser(), 'accrual_policy_id' => $a_obj->getAccrualPolicyID(), 'type_id' => $a_obj->getType(), 'amount' => $a_obj->getAmount(), 'time_stamp' => $a_obj->getTimeStamp(), 'user_date_total_id' => $a_obj->getUserDateTotalID(), 'created_date' => $a_obj->getCreatedDate(), 'created_by' => $a_obj->getCreatedBy(), 'updated_date' => $a_obj->getUpdatedDate(), 'updated_by' => $a_obj->getUpdatedBy(), 'deleted_date' => $a_obj->getDeletedDate(), 'deleted_by' => $a_obj->getDeletedBy()); } } elseif ($action != 'submit') { if ($user_id == '') { $user_id = $filter_user_id;
function addAccrualPolicyTime($epoch = NULL, $offset = 79200, $daily_total_time = NULL) { //22hr offset if ($epoch == '') { $epoch = TTDate::getTime(); } Debug::Text('Accrual Policy ID: ' . $this->getId() . ' Current EPOCH: ' . TTDate::getDate('DATE+TIME', $epoch), __FILE__, __LINE__, __METHOD__, 10); $pglf = new PolicyGroupListFactory(); $pglf->StartTransaction(); $pglf->getSearchByCompanyIdAndArrayCriteria($this->getCompany(), array('accrual_policy_id' => array($this->getId()))); if ($pglf->getRecordCount() > 0) { Debug::Text('Found Policy Group...', __FILE__, __LINE__, __METHOD__, 10); foreach ($pglf as $pg_obj) { //Get all users assigned to this policy group. $policy_group_users = $pg_obj->getUser(); if (is_array($policy_group_users) and count($policy_group_users) > 0) { Debug::Text('Found Policy Group Users: ' . count($policy_group_users), __FILE__, __LINE__, __METHOD__, 10); foreach ($policy_group_users as $user_id) { Debug::Text('Policy Group User ID: ' . $user_id, __FILE__, __LINE__, __METHOD__, 10); //Get User Object $ulf = new UserListFactory(); $ulf->getByIDAndCompanyID($user_id, $this->getCompany()); if ($ulf->getRecordCount() == 1) { $u_obj = $ulf->getCurrent(); Debug::Text('User: '******' Status: ' . $u_obj->getStatus(), __FILE__, __LINE__, __METHOD__, 10); //Make sure only active employees accrue time. Will this negative affect //Employees who may be on leave? if ($u_obj->getStatus() == 10 and ($this->getMinimumEmployedDays() == 0 or TTDate::getDays($epoch - $u_obj->getHireDate()) >= $this->getMinimumEmployedDays())) { Debug::Text(' User is active and has been employed long enough.', __FILE__, __LINE__, __METHOD__, 10); $annual_pay_periods = 0; $in_apply_frequency_window = FALSE; $accrual_balance = 0; $accrual_amount = 0; if ($this->getType() == 30) { Debug::Text(' Accrual policy is hour based, real-time window.', __FILE__, __LINE__, __METHOD__, 10); //Hour based, apply frequency is real-time. $in_apply_frequency_window = TRUE; } else { if ($this->getApplyFrequency() == 10) { //Because of pay period frequencies, and users being assigned to different //pay period schedules we need to get the last pay period of each user individually. //This will return the pay period that just ended in the offset time. $pplf = new PayPeriodListFactory(); $pplf->getByUserIdAndEndDate($user_id, $epoch - $offset); if ($pplf->getRecordCount() > 0) { foreach ($pplf as $pp_obj) { Debug::Text(' Pay Period End Date: ' . TTDate::getDate('DATE+TIME', $pp_obj->getEndDate()), __FILE__, __LINE__, __METHOD__, 10); if ($this->inApplyFrequencyWindow($epoch, $offset, $pp_obj->getEndDate()) == TRUE) { $in_apply_frequency_window = TRUE; $annual_pay_periods = $pp_obj->getPayPeriodScheduleObject()->getAnnualPayPeriods(); break; } else { Debug::Text(' User not in Apply Frequency Window: ', __FILE__, __LINE__, __METHOD__, 10); } } } else { Debug::Text(' No Pay Period Found.', __FILE__, __LINE__, __METHOD__, 10); } } elseif ($this->inApplyFrequencyWindow($epoch, $offset) == TRUE) { Debug::Text(' User IS in NON-PayPeriod Apply Frequency Window.', __FILE__, __LINE__, __METHOD__, 10); $in_apply_frequency_window = TRUE; } else { Debug::Text(' User is not in Apply Frequency Window.', __FILE__, __LINE__, __METHOD__, 10); $in_apply_frequency_window = FALSE; } } if ($in_apply_frequency_window == TRUE) { $milestone_obj = $this->getActiveMilestoneObject($u_obj, $epoch); if (isset($milestone_obj) and is_object($milestone_obj)) { Debug::Text(' Found Matching Milestone, Accrual Rate: (ID: ' . $milestone_obj->getId() . ') ' . $milestone_obj->getAccrualRate() . '/year', __FILE__, __LINE__, __METHOD__, 10); $accrual_balance = $this->getCurrentAccrualBalance($user_id, $this->getId()); if ($accrual_balance < $milestone_obj->getMaximumTime()) { $accrual_amount = $this->calcAccrualAmount($milestone_obj, 0, $annual_pay_periods); if ($accrual_amount > 0) { $new_accrual_balance = bcadd($accrual_balance, $accrual_amount); //If Maximum time is set to 0, make that unlimited. if ($milestone_obj->getMaximumTime() > 0 and $new_accrual_balance > $milestone_obj->getMaximumTime()) { $accrual_amount = bcsub($milestone_obj->getMaximumTime(), $accrual_balance, 0); } Debug::Text(' Min/Max Adjusted Accrual Amount: ' . $accrual_amount . ' Limits: Min: ' . $milestone_obj->getMinimumTime() . ' Max: ' . $milestone_obj->getMaximumTime(), __FILE__, __LINE__, __METHOD__, 10); //Check to make sure there isn't an identical entry already made. $alf = new AccrualListFactory(); $alf->getByCompanyIdAndUserIdAndAccrualPolicyIDAndTimeStampAndAmount($u_obj->getCompany(), $user_id, $this->getId(), TTDate::getMiddleDayEpoch($epoch), $accrual_amount); if ($alf->getRecordCount() == 0) { //Round to nearest 1min $af = new AccrualFactory(); $af->setUser($user_id); $af->setType(75); //Accrual Policy $af->setAccrualPolicyID($this->getId()); $af->setAmount($accrual_amount); $af->setTimeStamp(TTDate::getMiddleDayEpoch($epoch)); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $af->Save(); } } else { Debug::Text(' Found duplicate accrual entry, skipping...', __FILE__, __LINE__, __METHOD__, 10); } unset($accrual_amount, $accrual_balance, $new_accrual_balance); } else { Debug::Text(' Accrual Amount is 0...', __FILE__, __LINE__, __METHOD__, 10); } } else { Debug::Text(' Accrual Balance is outside Milestone Range. Skipping...', __FILE__, __LINE__, __METHOD__, 10); } } else { Debug::Text(' DID NOT Find Matching Milestone.', __FILE__, __LINE__, __METHOD__, 10); } unset($milestone_obj); } } else { Debug::Text(' User is not active (Status: ' . $u_obj->getStatus() . ') or has only been employed: ' . TTDate::getDays($epoch - $u_obj->getHireDate()) . ' Days, not enough.', __FILE__, __LINE__, __METHOD__, 10); } } else { Debug::Text('No User Found. Company ID: ' . $this->getCompany(), __FILE__, __LINE__, __METHOD__, 10); } } } } } $pglf->CommitTransaction(); return TRUE; }
function calcAccrualPolicy() { //FIXME: There is a minor bug for hour based accruals that if a milestone has a maximum limit, // and an employee recalculates there timesheet, and the limit is reached midweek, if its recalculated // again, the days that get the accrual time won't always be in order because the accrual balance is deleted // only for the day currently being calculated, so on Monday it will delete 1hr of accrual, but the balance will // still include Tue,Wed,Thu and the limit may already be reached. //We still need to calculate accruals even if the total time is 0, because we may want to override a //policy to 0hrs, and if we skip entries with TotalTime() == 0, the accruals won't be updated. if ($this->getDeleted() == FALSE) { Debug::text('Calculating Accrual Policies... Total Time: ' . $this->getTotalTime() . ' Date: ' . TTDate::getDate('DATE', $this->getUserDateObject()->getDateStamp()), __FILE__, __LINE__, __METHOD__, 10); //Calculate accrual policies assigned to other overtime/premium/absence policies //Debug::text('ID: '. $this->getId() .' Overtime Policy ID: '. (int)$this->getOverTimePolicyID() .' Premium Policy ID: '. (int)$this->getPremiumPolicyID() .' Absence Policy ID: '. (int)$this->getAbsencePolicyID(), __FILE__, __LINE__, __METHOD__, 10); //If overtime, premium or absence policy is an accrual, handle that now. if ($this->getOverTimePolicyID() != FALSE) { $accrual_policy_id = $this->getOverTimePolicyObject()->getAccrualPolicyID(); Debug::text('Over Time Accrual Policy ID: ' . $accrual_policy_id, __FILE__, __LINE__, __METHOD__, 10); if ($accrual_policy_id > 0) { Debug::text('Over Time Accrual Rate: ' . $this->getOverTimePolicyObject()->getAccrualRate() . ' Policy ID: ' . $this->getOverTimePolicyObject()->getAccrualPolicyID(), __FILE__, __LINE__, __METHOD__, 10); $af = new AccrualFactory(); $af->setUser($this->getUserDateObject()->getUser()); $af->setAccrualPolicyID($accrual_policy_id); $af->setUserDateTotalID($this->getID()); $accrual_amount = bcmul($this->getTotalTime(), $this->getOverTimePolicyObject()->getAccrualRate()); if ($accrual_amount > 0) { $af->setType(10); //Banked } else { $af->setType(20); //Used } $af->setAmount($accrual_amount); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $af->Save(); } unset($accrual_amount); } else { Debug::text('Skipping Over Time Accrual Policy ID: ' . $accrual_policy_id, __FILE__, __LINE__, __METHOD__, 10); } } if ($this->getPremiumPolicyID() != FALSE) { $accrual_policy_id = $this->getPremiumPolicyObject()->getAccrualPolicyID(); Debug::text('Premium Accrual Policy ID: ' . $accrual_policy_id, __FILE__, __LINE__, __METHOD__, 10); if ($accrual_policy_id > 0) { $af = new AccrualFactory(); $af->setUser($this->getUserDateObject()->getUser()); $af->setAccrualPolicyID($accrual_policy_id); $af->setUserDateTotalID($this->getID()); $accrual_amount = bcmul($this->getTotalTime(), $this->getPremiumPolicyObject()->getAccrualRate()); if ($accrual_amount > 0) { $af->setType(10); //Banked } else { $af->setType(20); //Used } $af->setAmount($accrual_amount); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $af->Save(); } unset($accrual_amount); } } if ($this->getAbsencePolicyID() != FALSE) { $accrual_policy_id = $this->getAbsencePolicyObject()->getAccrualPolicyID(); Debug::text('Absence Accrual Policy ID: ' . $accrual_policy_id, __FILE__, __LINE__, __METHOD__, 10); if ($accrual_policy_id > 0) { $af = new AccrualFactory(); $af->setUser($this->getUserDateObject()->getUser()); $af->setAccrualPolicyID($accrual_policy_id); $af->setUserDateTotalID($this->getID()); //By default we withdraw from accrual policy, so if there is a negative rate, deposit instead. $accrual_amount = bcmul($this->getTotalTime(), bcmul($this->getAbsencePolicyObject()->getAccrualRate(), -1)); if ($accrual_amount > 0) { $af->setType(10); //Banked } else { $af->setType(20); //Used } $af->setAmount($accrual_amount); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $af->Save(); } } } unset($af, $accrual_policy_id); //Calculate any hour based accrual policies. //if ( $this->getType() == 10 AND $this->getStatus() == 10 ) { if ($this->getStatus() == 10 and in_array($this->getType(), array(20, 30))) { //Calculate hour based accruals on regular/overtime only. $aplf = new AccrualPolicyListFactory(); $aplf->getByPolicyGroupUserIdAndType($this->getUserDateObject()->getUser(), 30); if ($aplf->getRecordCount() > 0) { Debug::text('Found Hour Based Accrual Policies to apply.', __FILE__, __LINE__, __METHOD__, 10); foreach ($aplf as $ap_obj) { if ($ap_obj->getMinimumEmployedDays() == 0 or TTDate::getDays($this->getUserDateObject()->getDateStamp() - $this->getUserDateObject()->getUserObject()->getHireDate()) >= $ap_obj->getMinimumEmployedDays()) { Debug::Text(' User has been employed long enough.', __FILE__, __LINE__, __METHOD__, 10); $milestone_obj = $ap_obj->getActiveMilestoneObject($this->getUserDateObject()->getUserObject(), $this->getUserDateObject()->getDateStamp()); $accrual_balance = $ap_obj->getCurrentAccrualBalance($this->getUserDateObject()->getUserObject()->getId(), $ap_obj->getId()); //If Maximum time is set to 0, make that unlimited. if (is_object($milestone_obj) and ($milestone_obj->getMaximumTime() == 0 or $accrual_balance < $milestone_obj->getMaximumTime())) { $accrual_amount = $ap_obj->calcAccrualAmount($milestone_obj, $this->getTotalTime(), 0); if ($accrual_amount > 0) { $new_accrual_balance = bcadd($accrual_balance, $accrual_amount); //If Maximum time is set to 0, make that unlimited. if ($milestone_obj->getMaximumTime() > 0 and $new_accrual_balance > $milestone_obj->getMaximumTime()) { $accrual_amount = bcsub($milestone_obj->getMaximumTime(), $accrual_balance, 4); } Debug::Text(' Min/Max Adjusted Accrual Amount: ' . $accrual_amount . ' Limits: Min: ' . $milestone_obj->getMinimumTime() . ' Max: ' . $milestone_obj->getMaximumTime(), __FILE__, __LINE__, __METHOD__, 10); $af = new AccrualFactory(); $af->setUser($this->getUserDateObject()->getUserObject()->getId()); $af->setType(75); //Accrual Policy $af->setAccrualPolicyID($ap_obj->getId()); $af->setUserDateTotalID($this->getID()); $af->setAmount($accrual_amount); $af->setTimeStamp($this->getUserDateObject()->getDateStamp()); $af->setEnableCalcBalance(TRUE); if ($af->isValid()) { $af->Save(); } unset($accrual_amount, $accrual_balance, $new_accrual_balance); } else { Debug::Text(' Accrual Amount is 0...', __FILE__, __LINE__, __METHOD__, 10); } } else { Debug::Text(' Accrual Balance is outside Milestone Range. Or no milestone found. Skipping...', __FILE__, __LINE__, __METHOD__, 10); } } else { Debug::Text(' User has only been employed: ' . TTDate::getDays($this->getUserDateObject()->getDateStamp() - $this->getUserDateObject()->getUserObject()->getHireDate()) . ' Days, not enough.', __FILE__, __LINE__, __METHOD__, 10); } } } else { Debug::text('No Hour Based Accrual Policies to apply.', __FILE__, __LINE__, __METHOD__, 10); } } else { Debug::text('No worked time on this day or not proper type/status, skipping hour based accrual policies...', __FILE__, __LINE__, __METHOD__, 10); } } /* //FIXME: Figure a better way to re-calculate accrual policies assigned to absences to update accrual balances if ( $this->getEnableCalcAccrualPolicy() == TRUE ) { Debug::text('Recalculating Accruals assigned to absence policies...', __FILE__, __LINE__, __METHOD__, 10); $udtlf = new UserDateTotalListFactory(); $udtlf->getByUserDateIdAndStatus( $this->getUserDateID(), 30 ); //Absences only if ( $udtlf->getRecordCount() > 0 ) { foreach( $udtlf as $udt_obj ) { $accrual_policy_id = $udt_obj->getAbsencePolicyObject()->getAccrualPolicyID(); Debug::text('Absence Accrual Policy ID: '. $accrual_policy_id, __FILE__, __LINE__, __METHOD__, 10); if ( $accrual_policy_id > 0 AND $this->getTotalTime() > 0 ) { $af = new AccrualFactory(); $af->setUser( $this->getUserDateObject()->getUser() ); $af->setAccrualPolicyID( $accrual_policy_id ); $af->setType(20); $af->setUserDateTotalID( $udt_obj->getID() ); $af->setAmount( bcmul( $udt_obj->getTotalTime(), -1 ) ); $af->setEnableCalcBalance(TRUE); if ( $af->isValid() ) { $af->Save(); } } } } } else { Debug::text('NOT Recalculating Accruals assigned to absence policies...', __FILE__, __LINE__, __METHOD__, 10); } */ return TRUE; }