function printSupp() { # Set up table to display in global $PRDMON; $cur = date("m"); $from = getMonthName($PRDMON[1]) . " " . getYearOfFinMon($PRDMON[1]); $to = getMonthName($cur) . " " . getYearOfFinMon($cur); $printSupp = "\n\t\t<h3>Creditors Age Analysis</h3>\n\t\t<h4>Period: {$from} to {$to}</h4>\n\t\t<li class='err'>Please note that because age analysis is calculated and stored as is displayed below it is not\n\t\tpossible to change the period for which you wish to see the age analysis.</li>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Acc no.</th>\n\t\t\t\t<th>Suppliers</th>\n\t\t\t\t<th>Current</th>\n\t\t\t\t<th>30 days</th>\n\t\t\t\t<th>60 days</th>\n\t\t\t\t<th>90 days</th>\n\t\t\t\t<th>120 days</th>\n\t\t\t\t<th>Total Outstanding</th>\n\t\t\t</tr>"; # connect to database db_connect(); # Query server $i = 0; $sql = "SELECT * FROM suppliers WHERE div = '" . USER_DIV . "' ORDER BY supname ASC"; $suppRslt = db_exec($sql) or errDie("Unable to retrieve Suppliers from database."); if (pg_numrows($suppRslt) < 1) { return "<li>There are no Suppliers in Cubit.</li>"; } # totals $totcurr = 0; $tot30 = 0; $tot60 = 0; $tot90 = 0; $tot120 = 0; $alltot = 0; while ($supp = pg_fetch_array($suppRslt)) { # Get all ages $curr = age($supp['supid'], 29); $age30 = age($supp['supid'], 59); $age60 = age($supp['supid'], 89); $age90 = age($supp['supid'], 119); $age120 = age($supp['supid'], 149); # Suppliers total $supptot = sprint($curr + $age30 + $age60 + $age90 + $age120); if ($supptot < $supp['balance']) { $curr = sprint($curr + ($supp['balance'] - $supptot)); $supptot = sprint($supptot + $supp['balance'] - $supptot); } $printSupp .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$supp['supno']}</td>\n\t\t\t\t<td>{$supp['supname']}</td>\n\t\t\t\t<td>" . CUR . " {$curr}</td>\n\t\t\t\t<td>" . CUR . " {$age30}</td>\n\t\t\t\t<td>" . CUR . " {$age60}</td>\n\t\t\t\t<td>" . CUR . " {$age90}</td>\n\t\t\t\t<td>" . CUR . " {$age120}</td>\n\t\t\t\t<td>" . CUR . " {$supptot}</td>\n\t\t\t</tr>"; # hold totals $totcurr += $curr; $tot30 += $age30; $tot60 += $age60; $tot90 += $age90; $tot120 += $age120; $alltot += $supptot; $i++; } $totcurr = sprint($totcurr); $tot30 = sprint($tot30); $tot60 = sprint($tot60); $tot90 = sprint($tot90); $tot120 = sprint($tot120); $alltot = sprint($alltot); $printSupp .= "\n\t\t<tr><td><br></td></tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='2'><b>Totals</b></td>\n\t\t\t<td><b>" . CUR . " {$totcurr}</b></td>\n\t\t\t<td><b>" . CUR . " {$tot30}</b></td>\n\t\t\t<td><b>" . CUR . " {$tot60}</b></td>\n\t\t\t<td><b>" . CUR . " {$tot90}</b></td>\n\t\t\t<td><b>" . CUR . " {$tot120}</b></td>\n\t\t\t<td><b>" . CUR . " {$alltot}</b></td>\n\t\t</tr>\n\t\t<tr><td><br></td></tr>\n\t\t<tr>\n\t\t\t<td align='center' colspan='10'>\n\t\t\t\t<form action='../xls/cred-age-analysis-xls.php' method='POST' name='form'>\n\t\t\t\t\t<input type='submit' name='xls' value='Export to spreadsheet'>\n\t\t\t\t</form>\n\t\t\t</td>\n\t\t</tr>\n\t</table>\n\t<p>\n\t<table " . TMPL_tblDflts . " width='15%'>\n\t\t<tr><td><br></td></tr>\n\t\t<tr>\n\t\t\t<th>Quick Links</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><a href='index-reports.php'>Financials</a></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><a href='index-reports-debtcred.php'>Debtors & Creditors Reports</a></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><a href='../supp-new.php'>Add Supplier</a></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><a href='../supp-view.php'>View Suppliers</a></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td><a href='../main.php'>Main Menu</a></td>\n\t\t</tr>\n\t</table>"; return $printSupp; }
function add_tbdata(&$oc, $schema, $yearsback = 0) { global $MONPRD, $PRDMON; /* fetch prev year trial bal data */ $tb = new dbSelect("trial_bal_actual", $schema, grp(m("where", "period!='0'"), m("order", "period, acctype, topacc, accnum"))); $tb->run(); $cprd = false; $cprd_name = false; while ($row = $tb->fetch_array()) { /* the period in the table data changed */ if ($cprd != $row["period"]) { $cprd = $row["period"]; $year = getYearOfFinMon($PRDMON[$cprd]) - $yearsback; $mon = getMonthNameS($PRDMON[$cprd]); $cprd_name = "{$mon} {$year}"; $oc[$cprd_name] = array(); } if ($row["period"] == 1 && $row["acctype"] != "B") { $hcode = new dbSelect("trial_bal", $schema, grp(m("where", "period='1' AND accid='{$row['accid']}'"), m("limit", 1))); $hcode->run(); $row = $hcode->fetch_array(); } else { if ($row["period"] == 1 && $row["topacc"] == "5200" && $row["accnum"] == "000") { /* calculate previous year profit/loss */ $sql = "SELECT SUM(tb.credit) AS credit, SUM(tb.debit) AS debit\n\t\t\t\t\tFROM core.accounts acc LEFT JOIN {$schema}.trial_bal tb\n\t\t\t\t\t\tON acc.accid=tb.accid AND acc.div=tb.div\n\t\t\t\t\tWHERE (acc.acctype='I' OR acc.acctype='E') AND acc.div='" . USER_DIV . "'\n\t\t\t\t\t\tAND tb.period='0'"; $qry = new dbSql($sql); $qry->run(); /* then deduct from debit/credit of retained income/accumulated loss */ $qry->fetch_array(); $row["debit"] -= $qry->d["debit"]; $row["credit"] -= $qry->d["credit"]; } } /* store data */ $oc[$cprd_name]["{$row['topacc']}/{$row['accnum']} {$row['accname']}"] = array("debit" => $row["debit"], "credit" => $row["credit"]); } #sort array to make some sense $oc = natksort($oc); }
function printAgeInv($_POST, $pure = TRUE) { extract($_POST); # Set up table to display in global $PRDMON; $from = getMonthName($PRDMON[1]) . " " . getYearOfFinMon($PRDMON[1]); $to = getMonthName($PRDMON[12]) . " " . getYearOfFinMon($PRDMON[12]); $sel1 = ""; $sel2 = ""; $sel3 = ""; if (isset($show_zero) and strlen($show_zero) > 0) { $sel1 = "checked='yes'"; } if (isset($show_large) and strlen($show_large) > 0) { $sel2 = "checked='yes'"; } if (isset($show_old) and strlen($show_old) > 0) { $sel3 = "checked='yes'"; } if ($pure) { $show_filter = "\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Filter/Sort Age Analysis</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='checkbox' name='show_zero' onClick='javascript:document.form1.submit();' value='yes' {$sel1}> Show Zero Balances</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='checkbox' name='show_large' onClick='javascript:document.form1.submit();' value='yes' {$sel2}> Show Largest Balances First</td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='checkbox' name='show_old' onClick='javascript:document.form1.submit();' value='yes' {$sel3}> Show Oldest Balances First</td>\n\t\t\t\t</tr>\n\t\t\t\t" . TBL_BR . "\n\t\t\t</table>"; $show_quicklinks = "\n\t\t\t<p>\n\t\t\t<table " . TMPL_tblDflts . " width='15%'>\n\t\t " . TBL_BR . "\n\t\t <tr>\n\t\t \t<th>Quick Links</th>\n\t\t </tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='index-reports.php'>Financials</a></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='index-reports-debtcred.php'>Debtors & Creditors Reports</a></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='../customers-new.php'>Add Customer</a></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='../customers-view.php'>View Customers</a></td>\n\t\t\t\t</tr>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><a href='../main.php'>Main Menu</a></td>\n\t\t\t\t</tr>\n\t\t\t</table>"; } else { $show_filter = ""; $show_quicklinks = ""; } # Set up table to display in $printCust = "\n\t\t<h3>Debtors Age Analysis</h3>\n\t\t<h4>Period: {$from} to {$to}</h4>\n\t\t<form action='" . SELF . "' method='POST' name='form1'>\n\t\t{$show_filter}\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th><font size='1'>Acc no.</font></th>\n\t\t\t\t<th><font size='1'>Customer</font></th>\n\t\t\t\t<th><font size='1'>Sales Rep</font></th>\n\t\t\t\t<th><font size='1'>Contact Name</font></th>\n\t\t\t\t<th><font size='1'>Tel No.</font></th>\n\t\t\t\t<th><font size='1'>Current</font></th>\n\t\t\t\t<th><font size='1'>30 days</font></th>\n\t\t\t\t<th><font size='1'>60 days</font></th>\n\t\t\t\t<th><font size='1'>90 days</font></th>\n\t\t\t\t<th><font size='1'>120 days + </font></th>\n\t\t\t\t<th><font size='1'>Total Outstanding</font></th>\n\t\t\t</tr>"; # Connect to database db_connect(); # Query server $i = 0; $entries = array(); $sql = "SELECT * FROM customers WHERE div = '" . USER_DIV . "' OR ddiv = '" . USER_DIV . "' ORDER BY accno ASC"; $custRslt = db_exec($sql) or errDie("Unable to retrieve Customers from database."); if (pg_numrows($custRslt) < 1) { return "<li>There are no Customers in Cubit.</li>"; } # Totals $totcurr = 0; $tot30 = 0; $tot60 = 0; $tot90 = 0; $tot120 = 0; $alltot = 0; while ($cust = pg_fetch_array($custRslt)) { # Get all ages $to_month = date("m"); $to_date = "now"; $from_date = date("Y-m-d", mktime(0, 0, 0, date("m"), "01", date("Y"))); $curr = cust_age($cust['cusnum'], 29, $cust['fcid'], $cust['location'], $to_month, $to_date, $from_date); $age30 = cust_age($cust['cusnum'], 59, $cust['fcid'], $cust['location'], $to_month, $to_date, $from_date); $age60 = cust_age($cust['cusnum'], 89, $cust['fcid'], $cust['location'], $to_month, $to_date, $from_date); $age90 = cust_age($cust['cusnum'], 119, $cust['fcid'], $cust['location'], $to_month, $to_date, $from_date); $age120 = cust_age($cust['cusnum'], 149, $cust['fcid'], $cust['location'], $to_month, $to_date, $from_date); # Customer total $custtot = sprint($curr + $age30 + $age60 + $age90 + $age120); db_con("exten"); # sales rep $get_salsp = "SELECT salesp FROM salespeople WHERE salespid = '{$cust['sales_rep']}' LIMIT 1"; $run_salsp = db_exec($get_salsp) or errDie("Unable to get sales person information."); if (pg_numrows($run_salsp) > 0) { $sarr = pg_fetch_array($run_salsp); $salesperson = $sarr['salesp']; } else { $salesperson = ""; } $col1[] = $cust['accno']; $col2[] = $cust['surname']; $col22[] = $salesperson; $col3[] = $cust['contname']; $col4[] = $cust['bustel']; $col5[] = $curr; $col6[] = $age30; $col7[] = $age60; $col8[] = $age90; $col9[] = $age120; $col10[] = $custtot; $col11[] = $cust['cusnum']; } if (!isset($show_zero) or isset($show_zero) and strlen($show_zero) > 0) { #get key of zero entries foreach ($col10 as $each => $own) { if ($own == 0) { unset($col1[$each]); unset($col2[$each]); unset($col22[$each]); unset($col3[$each]); unset($col4[$each]); unset($col5[$each]); unset($col6[$each]); unset($col7[$each]); unset($col8[$each]); unset($col9[$each]); unset($col10[$each]); } } } if (isset($show_large) and strlen($show_large) > 0) { arsort($col10); $sortarr = $col10; } if (isset($show_old) and strlen($show_old) > 0) { arsort($col9); $sortarr = $col9; if (array_sum($sortarr) == 0) { arsort($col8); $sortarr = $col8; if (array_sum($sortarr) == 0) { arsort($col7); $sortarr = $col7; if (array_sum($sortarr) == 0) { arsort($col6); $sortarr = $col6; } } } } if (!isset($sortarr) or !is_array($sortarr)) { $sortarr = $col1; } $counter = 0; foreach ($sortarr as $key => $value) { if ($counter == 20 and $pure) { $printCust .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<th><font size='1'>Acc no.</font></th>\n\t\t\t\t\t<th><font size='1'>Customer</font></th>\n\t\t\t\t\t<th><font size='1'>Sales Rep</font></th>\n\t\t\t\t\t<th><font size='1'>Contact Name</font></th>\n\t\t\t\t\t<th><font size='1'>Tel No.</font></th>\n\t\t\t\t\t<th><font size='1'>Current</font></th>\n\t\t\t\t\t<th><font size='1'>30 days</font></th>\n\t\t\t\t\t<th><font size='1'>60 days</font></th>\n\t\t\t\t\t<th><font size='1'>90 days</font></th>\n\t\t\t\t\t<th><font size='1'>120 days + </font></th>\n\t\t\t\t\t<th><font size='1'>Total Outstanding</font></th>\n\t\t\t\t</tr>"; $counter = 0; } $printCust .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td nowrap><font size='1'>{$col1[$key]}</font></td>\n\t\t\t\t<td nowrap><a href='#' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'><font size='1'>{$col2[$key]}</font></a></td>\n\t\t\t\t<td nowrap><font size='1'>{$col22[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1'>{$col3[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1'>{$col4[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'>" . CUR . " {$col5[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'>" . CUR . " {$col6[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'>" . CUR . " {$col7[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'>" . CUR . " {$col8[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'>" . CUR . " {$col9[$key]}</font></td>\n\t\t\t\t<td nowrap><font size='1' onClick='popupSized(\"../cust-stmnt.php?cusnum={$col11[$key]}\",\"window1\",800,700)'>" . CUR . " {$col10[$key]}</font></td>\n\t\t\t</tr>"; $counter++; } $totcurr = sprint(array_sum($col5)); $tot30 = sprint(array_sum($col6)); $tot60 = sprint(array_sum($col7)); $tot90 = sprint(array_sum($col8)); $tot120 = sprint(array_sum($col9)); $alltot = sprint(array_sum($col10)); $printCust .= "\n\t\t\t" . TBL_BR . "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='5'><font size='1'><b>Totals</b></font></td>\n\t\t\t\t<td nowrap><font size='1'><b>" . CUR . " {$totcurr}</b></font></td>\n\t\t\t\t<td nowrap><font size='1'><b>" . CUR . " {$tot30}</b></font></td>\n\t\t\t\t<td nowrap><font size='1'><b>" . CUR . " {$tot60}</b></font></td>\n\t\t\t\t<td nowrap><font size='1'><b>" . CUR . " {$tot90}</b></font></td>\n\t\t\t\t<td nowrap><font size='1'><b>" . CUR . " {$tot120}</b></font></td>\n\t\t\t\t<td nowrap><font size='1'><b>" . CUR . " {$alltot}</b></font></td>\n\t\t\t</tr>\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td align='center' colspan='10'>\n\t\t\t\t\t<form action='../xls/debt-age-analysis-xls.php' method='POST' name='form'>\n\t\t\t\t\t\t<input type='submit' name='xls' value='Export to spreadsheet'>\n\t\t\t\t\t</form>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t {$show_quicklinks}"; return $printCust; }
function printCenter($_GET) { # Get vars extract($_GET); if (!isset($ccid) or strlen($ccid) < 1) { return "<li class='err'>Invalid Cost Center. Cost Center Not Found.</li>"; } # Query server db_connect(); $sql = "SELECT * FROM costcenters WHERE ccid = '{$ccid}'"; $ccRslt = db_exec($sql) or errDie("Unable to retrieve Cost centers from database."); if (pg_numrows($ccRslt) < 1) { return "<li class='err'> - Invalid Cost Center.</li>"; } $cc = pg_fetch_array($ccRslt); $sp4 = " "; # get income $income = ""; $income = "\n\t\t<tr>\n\t\t\t<td colspan='4'><h3>Income</h3></td>\n\t\t</tr>"; #create selection date range $from_finyear = getYearOfFinMon($from_prd); $to_finyear = getYearOfFinMon($to_prd); //print "$from_prd -> $to_prd<br>"; $from_month = date("m", mktime(0, 0, 0, $from_prd, 1, $from_finyear)); $to_month = date("m", mktime(0, 0, 0, $to_prd, 1, $to_finyear)); $search = "edate >= '{$from_finyear}-{$from_month}-01' AND edate <= '{$to_finyear}-{$to_month}-" . date("d", mktime(0, 0, 0, $to_prd + 1, -1, $to_finyear)) . "' AND "; // $search = "edate >= '$from_finyear-$from_prd-01' AND edate <= '$to_finyear-$to_prd-".date("d",mktime(0,0,0,$to_prd,-1,$to_finyear))."' AND "; $flag = TRUE; $x = $from_prd; while ($flag) { // for($x=$from_prd;$x<=$to_prd;$x++){ if ($x == 13) { $x = 1; } db_conn($x); $sql = "SELECT * FROM cctran WHERE {$search} ccid = '{$cc['ccid']}' AND trantype = 'dt'"; $recRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); $tottotinc = 0; if (pg_numrows($recRslt) > 0) { $income .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='5'>" . date("F", mktime(0, 0, 0, $x, 1, date("Y"))) . "</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Type</th>\n\t\t\t\t\t<th>Date</th>\n\t\t\t\t\t<th>Description</th>\n\t\t\t\t\t<th>Amount</th>\n\t\t\t\t\t<th>Posted By</th>\n\t\t\t\t</tr>"; $totinc = 0; for ($i = 0; $rec = pg_fetch_array($recRslt); $i++) { $totinc += $rec['amount']; $rec['edate'] = ext_rdate($rec['edate']); $income .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$rec['typename']}</td>\n\t\t\t\t\t\t<td>{$sp4} {$rec['edate']} {$sp4}</td>\n\t\t\t\t\t\t<td>{$rec['description']}</td>\n\t\t\t\t\t\t<td align='right'>{$sp4}" . CUR . " {$rec['amount']}</td>\n\t\t\t\t\t\t<td>{$rec['username']}</td>\n\t\t\t\t\t</tr>"; } $totinc = sprint($totinc); $income .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='3' align='right'><b>Total</b></td>\n\t\t\t\t\t<td align='right'><b>" . CUR . " {$totinc}</b></td>\n\t\t\t\t\t<td><br></td>\n\t\t\t\t</tr>"; } if ($x == $to_prd) { $flag = FALSE; } $x++; } #get expenses $expense = ""; $expense = "\n\t\t<tr><td><br></td></tr>\n\t\t<tr>\n\t\t\t<td colspan='4'><h3>Expenses</h3></td>\n\t\t</tr>"; $flag = TRUE; $x = $from_prd; while ($flag) { // for($x=$from_prd;$x<=$to_prd;$x++){ if ($x == 13) { $x = 1; } db_conn($x); $sql = "SELECT * FROM cctran WHERE {$search} ccid = '{$cc['ccid']}' AND trantype = 'ct'"; $recRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); if (pg_numrows($recRslt) > 0) { $expense .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<th colspan='5'>" . date("F", mktime(0, 0, 0, $x, 1, date("Y"))) . "</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Type</th>\n\t\t\t\t\t<th>Date</th>\n\t\t\t\t\t<th>Description</th>\n\t\t\t\t\t<th>Amount</th>\n\t\t\t\t\t<th>Posted By</th>\n\t\t\t\t</tr>"; $totexp = 0; for ($i = 0; $rec = pg_fetch_array($recRslt); $i++) { $totexp += $rec['amount']; $rec['edate'] = ext_rdate($rec['edate']); $expense .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$rec['typename']}</td>\n\t\t\t\t\t\t<td>{$sp4} {$rec['edate']} {$sp4}</td>\n\t\t\t\t\t\t<td>{$rec['description']}</td>\n\t\t\t\t\t\t<td align='right'>{$sp4}" . CUR . " {$rec['amount']}</td>\n\t\t\t\t\t\t<td>{$rec['username']}</td>\n\t\t\t\t\t</tr>"; } $totexp = sprint($totexp); $expense .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='3' align='right'><b>Total</b></td>\n\t\t\t\t\t<td align='right'><b>" . CUR . " {$totexp}</b></td>\n\t\t\t\t</tr>"; } if ($x == $to_prd) { $flag = FALSE; } $x++; } $printCenter = "\n\t\t<center>\n\t\t<h3>Cost Centers Detailed Period Review</h3>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th>Cost Center</th>\n\t\t\t<tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$sp4} {$cc['centername']} ({$cc['centercode']}) {$sp4}</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t{$income}\n\t\t\t{$expense}\n\t\t</table>\n\t\t<p>\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='export'>\n\t\t\t<input type='hidden' name='ccid' value='{$ccid}'>\n\t\t\t<input type='hidden' name='from_prd' value='{$from_prd}'>\n\t\t\t<input type='hidden' name='to_prd' value='{$to_prd}'>\n\t\t\t<input type='submit' value='Export To Spreadsheet'>\n\t\t</form>\n\t\t<p>\n\t\t<p>\n\t\t<input type='button' value='[X] Close' onClick='javascript:window.close();'>"; return $printCenter; }
function viewtran($_POST) { # Get vars extract($_POST); # validate input require_lib("validate"); $v = new validate(); $v->isOk($fprd, "string", 1, 14, "Invalid from period number."); $v->isOk($tprd, "string", 1, 14, "Invalid to period number."); if (isset($accnt)) { if ($accnt == 'slct') { if (isset($supids)) { foreach ($supids as $key => $supid) { $v->isOk($supid, "num", 1, 20, "Invalid Supplier number."); } } else { return "<li class='err'>Please select at least one Creditor.</li>" . slctacc(); } } } else { $v->isOk("###", "num", 0, 0, "ERROR : Invalid Accounts Selection."); } # display errors, if any if ($v->isError()) { $confirm = ""; $errors = $v->getErrors(); foreach ($errors as $e) { $confirm .= "<li class='err'>" . $e["msg"] . "</li>"; } $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>"; return $confirm; } # Get the ids if ($accnt == 'all') { $supids = array(); db_connect(); $sql = "SELECT supid FROM suppliers WHERE div = '" . USER_DIV . "'"; $rs = db_exec($sql); if (pg_num_rows($rs) > 0) { while ($ac = pg_fetch_array($rs)) { $supids[] = $ac['supid']; } } else { return "<li calss='err'> There are no suppliers yet in Cubit.</li>"; } } $prds = array(); if ($tprd < $fprd) { for ($i = $fprd; $i <= 12; ++$i) { $prds[] = $i; } for ($i = 1; $i <= $tprd; ++$i) { $prds[] = $i; } } else { for ($i = $fprd; $i <= $tprd; ++$i) { $prds[] = $i; } } $hide = ""; $sp = " "; $trans = ""; foreach ($supids as $key => $supid) { $supRs = get("cubit", "supname, supno, balance", "suppliers", "supid", $supid); $sup = pg_fetch_array($supRs); $hide .= "<input type='hidden' name='supids[]' value='{$supid}'>"; $trans .= "\n\t\t<tr>\n\t\t\t<td colspan='8' align='center'><h3>{$sup['supname']}</h3></td>\n\t\t</tr>"; foreach ($prds as $prd) { $prdname = prdname($prd); $trans .= "\n\t\t\t<tr>\n\t\t\t\t<th colspan='8'>{$prdname}</th>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>{$sp}</th>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Reference</th>\n\t\t\t\t<th>Description</th>\n\t\t\t\t<th>Debit</th>\n\t\t\t\t<th>Credit</th>\n\t\t\t\t<th>Balance</th>\n\t\t\t\t<th>Contra Acc</th>\n\t\t\t</tr>"; $idRs = get($prd, "min(id)", "suppledger", "supid", $supid); $id = pg_fetch_array($idRs); if ($id['min'] != 0) { $balRs = get($prd, "(cbalance-credit) AS cbalance,(dbalance-debit) AS dbalance", "suppledger", "id", $id['min']); $bal = pg_fetch_array($balRs); $bal['cbalance'] += 0; $bal['dbalance'] += 0; } else { $balRs = get("cubit", "balance", "suppliers", "supid", $supid); $bal = pg_fetch_array($balRs); $bal['balance'] += 0; if ($bal['balance'] < 0) { $bal['dbalance'] = $bal['balance']; $bal['cbalance'] = 0; } else { $bal['cbalance'] = $bal['balance']; $bal['dbalance'] = 0; } //$bal['dbalance'] += $amount; } /* show the balance as a debit/credit, and not the individual balances of both */ if ($bal['dbalance'] > $bal['cbalance']) { $bal['dbalance'] = $bal['dbalance'] - $bal['cbalance']; $bal['cbalance'] = 0; } elseif ($bal['cbalance'] > $bal['dbalance']) { $bal['cbalance'] = $bal['cbalance'] - $bal['dbalance']; $bal['dbalance'] = 0; } else { $bal['cbalance'] = 0; $bal['dbalance'] = 0; } $bal['credit'] = sprint($bal['cbalance']); $bal['debit'] = sprint($bal['dbalance']); $balance = sprint($bal['cbalance'] - $bal['dbalance']); $trans .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td colspan='8'><b>{$sup['supno']} - {$sup['supname']} </b></td>\n\t\t\t\t\t\t\t</tr>"; $bbf_date = date("t-M-Y", mktime(0, 0, 0, $prd - 1, 1, getYearOfFinMon($prd))); $trans .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td colspan='2' align='right'>{$bbf_date}</td>\n\t\t\t\t\t\t\t\t<td>Br/Forwd</td>\n\t\t\t\t\t\t\t\t<td>Brought Forward</td>\n\t\t\t\t\t\t\t\t<td align='right'>{$bal['debit']}</td>\n\t\t\t\t\t\t\t\t<td align='right'>{$bal['credit']}</td>\n\t\t\t\t\t\t\t\t<td align='right'>{$balance}</td>\n\t\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t</tr>"; # --> Transaction reading comes here <--- # $dbal['debit'] = 0; $dbal['credit'] = 0; if ($t == "s") { $tranRs = get($prd, "*", "suppledger", "supid", $supid, "ORDER BY id"); } else { $tranRs = get($prd, "*", "suppledger", "supid", $supid, "ORDER BY edate,id"); } while ($tran = pg_fetch_array($tranRs)) { $caccRs = get("core", "accname, accid, topacc, accnum", "accounts", "accid", $tran['contra']); $cacc = pg_fetch_array($caccRs); $tran['debit'] = sprint($tran['debit']); $tran['credit'] = sprint($tran['credit']); $dbal['debit'] += $tran['debit']; $dbal['credit'] += $tran['credit']; if ($t == "s") { $cbalance = sprint($tran['cbalance'] - $tran['dbalance']); } else { $cbalance = sprint($dbal['credit'] + $bal['credit'] - ($dbal['debit'] + $bal['debit'])); } if ($t == "s") { $tran['edate'] = $tran['sdate']; } # Format date $tran['edate'] = explode("-", $tran['edate']); $tran['edate'] = $tran['edate'][2] . "-" . $tran['edate'][1] . "-" . $tran['edate'][0]; $trans .= "<tr class='bg-odd'><td><br></td><td>{$tran['edate']}</td><td>{$tran['eref']}</td><td>{$tran['descript']}</td><td align=right>{$tran['debit']}</td><td align=right>{$tran['credit']}</td><td align=right>{$cbalance}</td><td>{$cacc['topacc']}/{$cacc['accnum']} - {$cacc['accname']}</td></tr>"; } # Total balance changes if ($dbal['debit'] > $dbal['credit']) { $dbal['debit'] = sprint($dbal['debit'] - $dbal['credit']); $dbal['credit'] = ""; } elseif ($dbal['credit'] > $dbal['debit']) { $dbal['credit'] = sprint($dbal['credit'] - $dbal['debit']); $dbal['debit'] = ""; } else { $dbal['credit'] = ""; $dbal['debit'] = "0.00"; } $trans .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td colspan='2'><br></td>\n\t\t\t\t\t\t\t\t<td>A/C Total</td>\n\t\t\t\t\t\t\t\t<td>Total for period {$prdname} to Date :</td>\n\t\t\t\t\t\t\t\t<td align='right'>{$dbal['debit']}</td>\n\t\t\t\t\t\t\t\t<td align='right'>{$dbal['credit']}</td>\n\t\t\t\t\t\t\t\t<td align='right'></td>\n\t\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<td colspan='8'><br></td>\n\t\t\t\t\t\t\t</tr>"; } } $view = "\n\t\t\t\t<center>\n\t\t\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t\t\t<input type='hidden' name='key' value='viewtran'>\n\t\t\t\t\t<input type='hidden' name='accnt' value='{$accnt}'>\n\t\t\t\t\t<input type='hidden' name='prd' value='{$prd}'>\n\t\t\t\t\t<input type='hidden' name='t' value='{$t}'>\n\t\t\t\t\t<input type='hidden' name='fprd' value='{$fprd}'>\n\t\t\t\t\t<input type='hidden' name='tprd' value='{$tprd}'>\n\t\t\t\t\t{$hide}\n\t\t\t\t\t<h3>Creditors Ledger</h3>\n\t\t\t\t<table " . TMPL_tblDflts . " width='75%'>\n\t\t\t\t\t{$trans}\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='8' align='center'><input type='submit' name='export' value='Export to Spreadsheet'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t</table>\n\t\t\t\t</from>"; return $view; }
function printCenter($_POST) { # Get vars extract($_POST); $search1 = ""; if (isset($project1) and strlen($project1) > 0 and $project1 != 0) { $search1 .= "AND project1 = '{$project1}' "; } if (isset($project2) and strlen($project2) > 0 and $project2 != 0) { $search1 .= "AND project2 = '{$project2}' "; } if (isset($project3) and strlen($project3) > 0 and $project3 != 0) { $search1 .= "AND project3 = '{$project3}'"; } if (!isset($preject1)) { $project1 = ""; } if (!isset($preject2)) { $project2 = ""; } # Set up table to display in $printCenter = "\n\t\t<h3>Cost Ledger</h3>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='export'>\n\t\t\t<input type='hidden' name='prd' value='{$prd}'>\n\t\t\t<input type='hidden' name='old_project1' value='{$project1}'>\n\t\t\t<input type='hidden' name='old_project2' value='{$project2}'>\n\t\t\t<tr>\n\t\t\t\t<th>Cost Center Code</th>\n\t\t\t\t<th>Cost Center Name</th>\n\t\t\t\t<th>Project</th>\n\t\t\t\t<th>Sub-Section</th>\n\t\t\t\t<th>Sub-Sub-Section</th>\n\t\t\t\t<th>Total Income</th>\n\t\t\t\t<th>Total Expense</th>\n\t\t\t\t<th>Total Profit / Loss</th>\n\t\t\t</tr>"; # connect to database db_connect(); # Query server $i = 0; $sql = "SELECT * FROM costcenters_links WHERE id > '0' {$search1} ORDER BY id ASC"; $ccRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); if (pg_numrows($ccRslt) < 1) { return "<li class='err'>No Cost Centers Were Found With Selected Criteria.</li>"; } #create selection date range $finyear = getYearOfFinMon($prd); $search = "edate >= '{$finyear}-{$prd}-01' AND edate <= '{$finyear}-{$prd}-" . date("d", mktime(0, 0, 0, $prd + 1, -0, $finyear)) . "' AND "; $totinc = 0; $totexp = 0; $totprof = 0; while ($cc = pg_fetch_array($ccRslt)) { db_conn($prd); $sql = "SELECT sum(amount) as inc FROM cctran WHERE {$search} (project = '{$cc['project1']}' OR project = '0') AND ccid = '{$cc['ccid']}' AND trantype = 'dt'"; $ibalRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); $ibal = pg_fetch_array($ibalRslt); $sql = "SELECT sum(amount) as exp FROM cctran WHERE {$search} (project = '{$cc['project1']}' OR project = '0') AND ccid = '{$cc['ccid']}' AND trantype = 'ct'"; $ebalRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); $ebal = pg_fetch_array($ebalRslt); db_connect(); #get the project information $get_pro1 = "SELECT project_name FROM projects WHERE id = '{$cc['project1']}'"; $run_pro1 = db_exec($get_pro1) or errDie("Unable to get project information."); if (pg_numrows($run_pro1) < 1) { $project1_name = ""; } else { $p1arr = pg_fetch_array($run_pro1); $project1_name = $p1arr['project_name']; } #get the project 2 information $get_pro2 = "SELECT sub_project_name FROM sub_projects WHERE id = '{$cc['project2']}'"; $run_pro2 = db_exec($get_pro2) or errDie("Unable to get project information."); if (pg_numrows($run_pro2) < 1) { $project2_name = ""; } else { $p2arr = pg_fetch_array($run_pro2); $project2_name = $p2arr['sub_project_name']; } #get the project 3 information $get_pro3 = "SELECT sub_sub_project_name FROM sub_sub_projects WHERE id = '{$cc['project3']}'"; $run_pro3 = db_exec($get_pro3) or errDie("Unable to get project information."); if (pg_numrows($run_pro3) < 1) { $project3_name = ""; } else { $p3arr = pg_fetch_array($run_pro3); $project3_name = $p3arr['sub_sub_project_name']; } # alternate bgcolor $cc['inc'] = sprint($ibal['inc']); $cc['exp'] = sprint($ebal['exp']); $prof = $ibal['inc'] - $ebal['exp']; $totinc += $ibal['inc']; $totexp += $ebal['exp']; $totprof += $prof; #get costcenter info $get_cc2 = "SELECT * FROM costcenters WHERE ccid = '{$cc['ccid']}' LIMIT 1"; $run_cc2 = db_exec($get_cc2) or errDie("Unable to get cost center information."); if (pg_numrows($run_cc2) < 1) { $centercode = ""; $centername = ""; } else { $cc2arr = pg_fetch_array($run_cc2); $centercode = $cc2arr['centercode']; $centername = $cc2arr['centername']; } $printCenter .= "\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<td>{$centercode}</td>\n\t\t\t\t\t\t<td>{$centername}</td>\n\t\t\t\t\t\t<td>{$project1_name}</td>\n\t\t\t\t\t\t<td>{$project2_name}</td>\n\t\t\t\t\t\t<td>{$project3_name}</td>\n\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($cc['inc']) . "</td>\n\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($cc['exp']) . "</td>\n\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($prof) . "</td>\n\t\t\t\t\t\t<td><a href='#bottom' onclick='openwindowbg(\"costcenter-rep-det.php?ccid={$cc['ccid']}&prd={$prd}\")'>Detailed</a></td>\n\t\t\t\t\t</tr>"; $i++; } $totinc = sprint($totinc); $totexp = sprint($totexp); $totprof = sprint($totprof); $printCenter .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td align='right' colspan='2'><b>Total</b></td>\n\t\t\t\t\t\t\t\t<td align='right'><b>" . CUR . " {$totinc}</b></td>\n\t\t\t\t\t\t\t\t<td align='right'><b>" . CUR . " {$totexp}</b></td>\n\t\t\t\t\t\t\t\t<td align='right'><b>" . CUR . " {$totprof}</b></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<td colspan='6' align='center'><input type='submit' value='Export To Spreadsheet'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</form>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t"; return $printCenter; }
function printCenter($_POST) { # Get vars extract($_POST); $search = ""; if (isset($project1) and strlen($project1) > 0 and $project1 != 0) { $search .= "AND project1 = '{$project1}' "; } if (isset($project2) and strlen($project2) > 0 and $project2 != 0) { $search .= "AND project2 = '{$project2}' "; } if (isset($project3) and strlen($project3) > 0 and $project3 != 0) { $search .= "AND project3 = '{$project3}'"; } if (!isset($project1)) { $project1 = ""; } if (!isset($project2)) { $project2 = ""; } # Set up table to display in $printCenter = "\n\t\t<h3>Cost Centers Period Review</h3>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='export'>\n\t\t\t<input type='hidden' name='from_prd' value='{$from_prd}'>\n\t\t\t<input type='hidden' name='to_prd' value='{$to_prd}'>\n\t\t\t<input type='hidden' name='old_project1' value='{$project1}'>\n\t\t\t<input type='hidden' name='old_project2' value='{$project2}'>\n\t\t\t<tr>\n\t\t\t\t<th>Cost Center Code</th>\n\t\t\t\t<th>Cost Center Name</th>\n\t\t\t\t<th>Total Income</th>\n\t\t\t\t<th>Total Expense</th>\n\t\t\t\t<th>Total Profit / Loss</th>\n\t\t\t</tr>"; # connect to database db_connect(); # Query server $i = 0; $sql = "SELECT * FROM costcenters_links WHERE id > '0' {$search} ORDER BY id ASC"; $ccRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); if (pg_numrows($ccRslt) < 1) { return "<li class='err'>There are no Cost Centers in Cubit.</li>"; } #create selection date range $from_finyear = getYearOfFinMon($from_prd); $to_finyear = getYearOfFinMon($to_prd); $search = "edate >= '{$from_finyear}-{$from_prd}-01' AND edate <= '" . date("Y-m-d", mktime(0, 0, 0, $to_prd + 1, 0, $to_finyear)) . "' AND "; $prds = array(); if ($to_prd < $from_prd) { for ($i = $from_prd; $i <= 12; ++$i) { $prds[] = $i; } for ($i = 1; $i <= $to_prd; ++$i) { $prds[] = $i; } } else { for ($i = $from_prd; $i <= $to_prd; ++$i) { $prds[] = $i; } } $totinc = 0; $totexp = 0; $totprof = 0; while ($cc = pg_fetch_array($ccRslt)) { $cc['inc'] = 0; $cc['exp'] = 0; foreach ($prds as $x) { db_conn($x); $sql = "SELECT sum(amount) as inc FROM cctran WHERE {$search} (project = '{$cc['project1']}' OR project = '0') AND ccid = '{$cc['ccid']}' AND trantype = 'dt'"; $ibalRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); $ibal = pg_fetch_array($ibalRslt); $sql = "SELECT sum(amount) as exp FROM cctran WHERE {$search} (project = '{$cc['project1']}' OR project = '0') AND ccid = '{$cc['ccid']}' AND trantype = 'ct'"; $ebalRslt = db_exec($sql) or errDie("Unable to retrieve Cost Centers from database."); $ebal = pg_fetch_array($ebalRslt); $cc['inc'] = $cc['inc'] + sprint($ibal['inc']); $cc['exp'] = $cc['exp'] + sprint($ebal['exp']); $prof = $ibal['inc'] - $ebal['exp']; $totinc += $ibal['inc']; $totexp += $ebal['exp']; $totprof += $prof; } $cc['inc'] = sprint($cc['inc']); db_connect(); #get costcenter info $get_cc2 = "SELECT * FROM costcenters WHERE ccid = '{$cc['ccid']}' LIMIT 1"; $run_cc2 = db_exec($get_cc2) or errDie("Unable to get cost center information."); if (pg_numrows($run_cc2) < 1) { $centercode = ""; $centername = ""; } else { $cc2arr = pg_fetch_array($run_cc2); $centercode = $cc2arr['centercode']; $centername = $cc2arr['centername']; } $printCenter .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>{$centercode}</td>\n\t\t\t\t\t\t\t<td>{$centername}</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($cc['inc']) . "</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($cc['exp']) . "</td>\n\t\t\t\t\t\t\t<td align='right'>" . CUR . " " . sprint($prof) . "</td>\n\t\t\t\t\t\t\t<td><a href='#bottom' onclick='openwindowbg(\"costcenter-rep-prd-det.php?ccid={$cc['ccid']}&from_prd={$from_prd}&to_prd={$to_prd}\")'>Detailed</a></td>\n\t\t\t\t\t\t</tr>"; $i++; } $totinc = sprint($totinc); $totexp = sprint($totexp); $totprof = sprint($totprof); $printCenter .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td align='right' colspan='2'><b>Total</b></td>\n\t\t\t\t\t\t\t\t<td align='right'><b>" . CUR . " {$totinc}</b></td>\n\t\t\t\t\t\t\t\t<td align='right'><b>" . CUR . " {$totexp}</b></td>\n\t\t\t\t\t\t\t\t<td align='right'><b>" . CUR . " {$totprof}</b></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<td colspan='6' align='center'><input type='submit' value='Export To Spreadsheet'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</form>\n\t\t\t\t\t\t</table>\n\t\t\t\t\t"; return $printCenter; }
function write_data($_POST) { extract($_POST); if (isset($back)) { return enter_data2($_POST); } db_conn('core'); $Sl = "SELECT accnum FROM salesacc WHERE name='VATIN'"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) > 0) { $vd = pg_fetch_array($Ri); $vatin = $vd['accnum']; } else { $vatin = 0; } $Sl = "SELECT accnum FROM salesacc WHERE name='VATOUT'"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) > 0) { $vd = pg_fetch_array($Ri); $vatout = $vd['accnum']; } else { $vatout = 0; } db_conn('cubit'); $Sl = "SELECT * FROM vatcodes WHERE del='Yes'"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) < 1) { $Sl = "SELECT * FROM vatcodes WHERE zero='Yes'"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) < 1) { return "Please set up your vatcodes first."; } } $vcd = pg_fetch_array($Ri); db_conn('exten'); $Sl = "SELECT debtacc FROM departments"; $Ri = db_exec($Sl); $dd = pg_fetch_array($Ri); $cc = $dd['debtacc']; db_conn('core'); $Sl = "SELECT * FROM accounts WHERE accname='Opening Balances / Suspense Account'"; $Ri = db_exec($Sl) or errDie("Unable to get account."); if (pg_num_rows($Ri) < 1) { return "<li class='err'>There is no account called 'Opening Balances / Suspense Account'. <br>\n\t\tI Need that account.<br>\n\t\tPlease create it. <br><br>\n\t\tThank you.</li>"; } $ad = pg_fetch_array($Ri); $bala = $ad['accid']; db_conn(PRD_DB); # get last ref number pglib_transaction("BEGIN"); $refnum = getrefnum(); /* check for main accounts whose sub accounts add up to same total, then clear main account check for main accounts whose sub accounts dont add up, then unblock main accounts */ $sql = "SELECT * FROM cubit.import_data"; $rslt = db_exec($sql) or errDie("Error validating data."); $acsub = $acmain = array(); while ($fd = pg_fetch_array($rslt)) { $n = explode("/", $fd["des1"]); if (!isset($n[1]) || $n[1] == "000") { $n[1] = "000"; } $a = array("num" => $fd["des1"], "name" => $fd["des2"], "dt" => $fd["des3"], "ct" => $fd["des4"]); if ($n[1] == "000") { $acmain["{$n['0']}"] = $a; } else { if (!isset($acsub[$n[0]])) { $acsub[$n[0]] = array(); } $acsub[$n[0]][] = $a; } } /* match subs with mains */ $unblock_main = false; foreach ($acmain as $k => $v) { $totdt = 0; $totct = 0; if (isset($acsub[$k])) { foreach ($acsub[$k] as $sk => $sv) { $totdt += $sv["dt"]; $totct += $sv["ct"]; } if ($totdt - $totct != $v["dt"] - $v["ct"]) { $unblock_main = true; } else { $sql = "UPDATE cubit.import_data SET des3='0', des4='0'\n\t\t\t\t\t\tWHERE des1='{$v['num']}' AND des2='{$v['name']}'"; $rslt = db_exec($sql) or errDie("Error balancing main account with sub accounts: {$v['num']} - {$v['name']} with {$sv['num']} - {$sv['name']}."); } } } if ($unblock_main) { $sql = "UPDATE cubit.set SET value = 'nuse', descript = 'Dont block main accounts'\n\t\t\t\tWHERE label = 'BLOCK' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Error unblocking main accounts."); } /* continue importing (validated/fixed) data */ db_conn('cubit'); $Sl = "SELECT * FROM import_data"; $Ri = db_exec($Sl); $i = 0; $tot_debit = 0; $tot_credit = 0; $date = mkdate(getYearOfFinMon($prd), $prd, 1); db_conn('core'); while ($fd = pg_fetch_array($Ri)) { $fid = $fd['id']; $accs = explode('/', $fd['des1']); $topacc = $accs[0]; $topacc = str_pad($topacc, 4, "0"); if (isset($accs[1])) { $accnum = $accs[1]; } else { $accnum = "000"; } db_conn('core'); if ($accounts[$fid] == 0) { $catss = explode(":", $cat[$fid]); if ($catss[0] == "other_income" || $catss[0] == "sales") { $catT = "I10"; $type = "I"; } elseif ($catss[0] == "expenses" || $catss[0] == "cost_of_sales") { $catT = "E10"; $type = "E"; } else { $catT = "B10"; $type = "B"; } $Sl = "\n\t\t\t\tINSERT INTO accounts (\n\t\t\t\t\ttopacc, accnum, catid, accname, vat, \n\t\t\t\t\tdiv, toptype, acctype\n\t\t\t\t) VALUES (\n\t\t\t\t\t'{$topacc}', '{$accnum}', '{$catT}', '{$fd['des2']}', 'f', \n\t\t\t\t\t'" . USER_DIV . "', '{$catss['0']}', '{$type}'\n\t\t\t\t)"; $Rl = db_exec($Sl); $accname = $fd['des2']; $accid = pglib_lastid("accounts", "accid"); // $query = "INSERT INTO trial_bal(accid, topacc, accnum, accname, div) VALUES('$accid', '$topacc', '$accnum', '$fd[des2]', '".USER_DIV."')"; // $trialRslt = db_exec($query); global $MONPRD; insert_trialbal($accid, $topacc, $accnum, $accname, $type, 'f', USER_DIV); for ($i = 1; $i <= 12; $i++) { $periodname = getMonthName($i); $sql = "INSERT INTO " . YR_DB . ".{$periodname} (accid, topacc, accnum, accname,\n\t\t\t\t\t\t\tdebit, credit, div)\n\t\t\t\t\t\tSELECT accid, topacc, accnum, accname, debit, credit, div\n\t\t\t\t\t\tFROM core.trial_bal WHERE month='{$i}' AND accid='{$accid}'"; db_exec($sql) or die($sql); $sql = "INSERT INTO \"{$i}\".openbal (accid, accname, debit, credit, div)\n\t\t\t\t\t\tSELECT accid, accname, debit, credit, div\n\t\t\t\t\t\tFROM core.trial_bal WHERE month='{$i}' AND accid='{$accid}'"; db_exec($sql) or die($sql); $sql = "INSERT INTO \"{$i}\".ledger (acc, contra, edate, eref, descript,\n\t\t\t\t\t\t\tcredit, debit, div, caccname, ctopacc, caccnum, cbalance, dbalance)\n\t\t\t\t\t\tSELECT accid, accid, CURRENT_DATE, '0', 'Balance', '0', '0', div,\n\t\t\t\t\t\t\taccname, topacc, accnum, credit, debit\n\t\t\t\t\t\tFROM core.trial_bal WHERE month='{$i}' AND accid='{$accid}'"; db_exec($sql) or die($sql); } $accounts[$fid] = $accid; } else { $Sl = "UPDATE accounts SET topacc='{$topacc}',accnum='{$accnum}',accname='{$fd['des2']}' WHERE accid='{$accounts[$fid]}'"; $Rl = db_exec($Sl); $Sl = "UPDATE trial_bal SET topacc='{$topacc}',accnum='{$accnum}',accname='{$fd['des2']}' WHERE accid='{$accounts[$fid]}'"; $Rl = db_exec($Sl); } $Sl = "SELECT accid,accname FROM accounts WHERE accid='{$accounts[$fid]}'"; $Rx = db_exec($Sl); $ad = pg_fetch_array($Rx); $i++; $debit = $fd['des3']; $credit = $fd['des4']; if ($debit > 0) { writetrans($ad['accid'], $bala, $date, $refnum, sprint($debit), "Opening balance imported"); } if ($credit > 0) { writetrans($bala, $ad['accid'], $date, $refnum, sprint($credit), "Opening balance imported"); } $tot_debit += $fd['des3']; $tot_credit += $fd['des4']; if ($ad['accid'] == $vatin) { vatr($vcd['id'], $date, "INPUT", $vcd['code'], $refnum, "Opening balance VAT imported", sprint($credit - $debit), sprint($credit - $debit)); } if ($ad['accid'] == $vatout) { vatr($vcd['id'], $date, "OUTPUT", $vcd['code'], $refnum, "Opening balance VAT imported", sprint($credit - $debit), sprint($credit - $debit)); } } $tot_debit = sprint($tot_debit); $tot_credit = sprint($tot_credit); if ($cc_tot > 0) { $tot = array_sum($cbalance); if (sprint($cc_tot) != sprint($tot)) { return enter_data2($_POST) . "<li class='err'>The total amount for balances for customers you entered is: " . CUR . " {$tot}, the\n\t\t\ttotal for the control account is: " . sprint($cc_tot) . ". These need to be the same.</li>"; } db_conn('cubit'); $Sl = "SELECT cusnum,accno,surname FROM customers ORDER BY surname"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) < 1) { return "<li class='err'>If you want to import your customer control account you need to add customers first</li>"; } $tot = 0; while ($cd = pg_fetch_array($Ri)) { $cid = $cd['cusnum']; $cbalance[$cid] = sprint($cbalance[$cid]); if ($cbalance[$cid] > 0) { db_conn('cubit'); # Update the customer (make balance more) $sql = "UPDATE customers SET balance = (balance + '{$cbalance[$cid]}') WHERE cusnum = '{$cid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to update invoice in Cubit.", SELF); $sql = "\n\t\t\t\t\tINSERT INTO stmnt (\n\t\t\t\t\t\tcusnum, invid, amount, date, type, \n\t\t\t\t\t\tst, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$cid}', '0', '{$cbalance[$cid]}', '{$date}', 'Opening Balance Imported', \n\t\t\t\t\t\t'n', '" . USER_DIV . "'\n\t\t\t\t\t)"; $stmntRslt = db_exec($sql) or errDie("Unable to Insert statement record in Cubit.", SELF); $sql = "\n\t\t\t\t\tINSERT INTO open_stmnt (\n\t\t\t\t\t\tcusnum, invid, amount, balance, date, \n\t\t\t\t\t\ttype, st, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$cid}', '0', '{$cbalance[$cid]}', '{$cbalance[$cid]}', '{$date}', \n\t\t\t\t\t\t'Opening Balance Imported', 'n', '" . USER_DIV . "'\n\t\t\t\t\t)"; $stmntRslt = db_exec($sql) or errDie("Unable to Insert statement record in Cubit.", SELF); crecordDT($cbalance[$cid], $cid, $date); custledger($cid, $bala, $date, 0, "Opening Balance Imported", $cbalance[$cid], "d"); } elseif ($cbalance[$cid] < 0) { db_conn('cubit'); # Update the customer (make balance more) $sql = "UPDATE customers SET balance = (balance + '{$cbalance[$cid]}') WHERE cusnum = '{$cid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to update invoice in Cubit.", SELF); $sql = "\n\t\t\t\t\tINSERT INTO stmnt (\n\t\t\t\t\t\tcusnum, invid, amount, date, type, \n\t\t\t\t\t\tst, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$cid}', '0', '{$cbalance[$cid]}', '{$date}', 'Opening Balance Imported', \n\t\t\t\t\t\t'n', '" . USER_DIV . "'\n\t\t\t\t\t)"; $stmntRslt = db_exec($sql) or errDie("Unable to Insert statement record in Cubit.", SELF); $sql = "\n\t\t\t\t\tINSERT INTO open_stmnt (\n\t\t\t\t\t\tcusnum, invid, amount, balance, date, \n\t\t\t\t\t\ttype, st, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$cid}', '0', '{$cbalance[$cid]}', '{$cbalance[$cid]}', '{$date}', \n\t\t\t\t\t\t'Opening Balance Imported', 'n', '" . USER_DIV . "'\n\t\t\t\t\t)"; $stmntRslt = db_exec($sql) or errDie("Unable to Insert statement record in Cubit.", SELF); crecordCT(-$cbalance[$cid], $cid, $date); custledger($cid, $bala, $date, 0, "Opening Balance Imported", -$cbalance[$cid], "c"); } $i++; $tot += $cbalance[$cid]; } } if ($sc_tot > 0) { db_conn('cubit'); $Sl = "SELECT supid,supno,supname FROM suppliers ORDER BY supname"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) < 1) { return "<li class='err'>If you want to import your supplier control account you need to add suppliers first</li>"; } $tot = 0; while ($cd = pg_fetch_array($Ri)) { $sid = $cd['supid']; $sbalance[$sid] += 0; if ($sbalance[$sid] > 0) { db_conn('cubit'); $sql = "UPDATE suppliers SET balance = (balance + '{$sbalance[$sid]}') WHERE supid = '{$sid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to update supplier in Cubit.", SELF); $sql = "\n\t\t\t\t\tINSERT INTO sup_stmnt (\n\t\t\t\t\t\tsupid, edate, ref, cacc, descript, \n\t\t\t\t\t\tamount, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$sid}', '{$date}', '0', '{$bala}', 'Opening balance imported', \n\t\t\t\t\t\t'{$sbalance[$sid]}', '" . USER_DIV . "'\n\t\t\t\t\t)"; $stmntRslt = db_exec($sql) or errDie("Unable to Insert statement record in Cubit.", SELF); recordCT(-$sbalance[$sid], $sid, $date); suppledger($sid, $bala, $date, $refnum, "Opening balance imported", $sbalance[$sid], "c"); } elseif ($sbalance[$sid] < 0) { db_conn('cubit'); $sql = "UPDATE suppliers SET balance = (balance + '{$sbalance[$sid]}') WHERE supid = '{$sid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to update supplier in Cubit.", SELF); $sql = "\n\t\t\t\t\tINSERT INTO sup_stmnt (\n\t\t\t\t\t\tsupid, edate, ref, cacc, descript, amount, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$sid}', '{$date}', '0', '{$bala}', 'Opening balance imported', \n\t\t\t\t\t\t'{$sbalance[$sid]}', '" . USER_DIV . "'\n\t\t\t\t\t)"; $stmntRslt = db_exec($sql) or errDie("Unable to Insert statement record in Cubit.", SELF); recordDT(-$sbalance[$sid], $sid, $date); suppledger($sid, $bala, $date, $refnum, "Opening balance imported", $sbalance[$sid], "d"); } $i++; $tot += $sbalance[$sid]; } if (sprint($sc_tot) != sprint($tot)) { return enter_data2($_POST) . "<li class='err'>The total amount for balances for suppliers you entered is: " . CUR . " {$tot}, the\n\t\t\ttotal for the control account is: " . sprint($sc_tot) . ". These need to be the same.</li>"; } } if ($sal_tot > 0) { db_conn('cubit'); $Sl = "SELECT empnum,enum,sname,fnames FROM employees ORDER BY sname,fnames"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) < 1) { return "<li class='err'>If you want to import your employee control account you need to add employees first</li>"; } $tot = 0; while ($cd = pg_fetch_array($Ri)) { $eid = $cd['empnum']; if (!isset($ebalance[$eid])) { $ebalance[$eid] = ""; } $ebalance[$eid] = sprint($ebalance[$eid]); db_conn('cubit'); $Sl = "UPDATE employees SET balance=balance+'{$ebalance[$eid]}' WHERE empnum = '{$eid}' AND div = '" . USER_DIV . "'"; $Rt = db_exec($Sl) or errDie("Unable to get employee details."); if ($ebalance[$eid] > 0) { empledger($eid, $bala, $date, $refnum, "Opening balance imported", $ebalance[$eid], "c"); } else { empledger($eid, $bala, $date, $refnum, "Opening balance imported", abs($ebalance[$eid]), "d"); } $i++; $tot += $ebalance[$eid]; } if (sprint($sal_tot) != sprint($tot)) { return enter_data2($_POST) . "<li class='err'>The total amount for balances for employees you entered is: " . CUR . " {$tot}, the\n\t\t\ttotal for the control account is: " . sprint($sal_tot) . ". These need to be the same.</li>"; } } if ($i_tot > 0) { db_conn('cubit'); $Sl = "SELECT stkid,stkcod,stkdes FROM stock ORDER BY stkcod"; $Ri = db_exec($Sl); if (pg_num_rows($Ri) < 1) { return "<li class='err'>If you want to import your inventory control account you need to add stock first</li>"; } $tot = 0; while ($cd = pg_fetch_array($Ri)) { $iid = $cd['stkid']; if (!isset($ibalance[$iid])) { $ibalance[$iid] = ""; } if ($ibalance[$iid] > 0) { $unitnum = $units[$iid]; db_connect(); $sql = "UPDATE stock SET csamt = (csamt + '{$ibalance[$iid]}'), units = (units + '{$unitnum}') WHERE stkid = '{$iid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to insert stock to Cubit.", SELF); stockrec($cd['stkid'], $cd['stkcod'], $cd['stkdes'], 'dt', $date, $unitnum, $ibalance[$iid], "Inventory balance imported"); db_connect(); $cspric = sprint($ibalance[$iid] / $unitnum); //$cspric = sprint(0); $sql = "\n\t\t\t\t\tINSERT INTO stockrec (\n\t\t\t\t\t\tedate, stkid, stkcod, stkdes, trantype, qty, \n\t\t\t\t\t\tcsprice, csamt, details, div\n\t\t\t\t\t) VALUES (\n\t\t\t\t\t\t'{$date}', '{$cd['stkid']}', '{$cd['stkcod']}', '{$cd['stkdes']}', 'inc', '{$unitnum}', \n\t\t\t\t\t\t'{$ibalance[$iid]}', '{$cspric}', 'Inventory balance imported', '" . USER_DIV . "'\n\t\t\t\t\t)"; $recRslt = db_exec($sql); db_connect(); $sql = "SELECT * FROM stock WHERE stkid = '{$iid}' AND div = '" . USER_DIV . "'"; $stkRslt = db_exec($sql) or errDie("Unable to access databse.", SELF); if (pg_numrows($stkRslt) < 1) { return "<li> Invalid Stock ID.</li>"; } else { $stk = pg_fetch_array($stkRslt); } if ($stk['units'] != 0) { $sql = "UPDATE stock SET csprice = (csamt/units) WHERE stkid = '{$iid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to insert stock to Cubit.", SELF); } else { $sql = "UPDATE stock SET csprice = '{$csprice}' WHERE stkid = '{$iid}' AND div = '" . USER_DIV . "'"; $rslt = db_exec($sql) or errDie("Unable to insert stock to Cubit.", SELF); } } $tot += $ibalance[$iid]; $i++; } if (sprint($i_tot) != sprint($tot)) { return enter_data2($_POST) . "<li class='err'>The total amount for balances for inventory you entered is: " . CUR . " {$tot}, the\n\t\t\ttotal for the control account is: " . sprint($sal_tot) . ". These need to be the same.</li>"; } } $out = "\n\t\t<table " . TMPL_tblDflts . " width='50%'>\n\t\t\t<tr>\n\t\t\t\t<th>Data Imported</th>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td>Trial balance, has been successfully imported.</td>\n\t\t\t</tr>\n\t\t</table>"; pglib_transaction("COMMIT") or errDie("Unable to commit a database transaction.", SELF); block(); return $out; }
function printSupp($_POST, $err = "") { extract($_POST); # Set up table to display in global $PRDMON; $cur = date("m"); $from = getMonthName($PRDMON[1]) . " " . getYearOfFinMon($PRDMON[1]); $to = getMonthName($cur) . " " . getYearOfFinMon($cur); $sel1 = ""; $sel2 = ""; $sel3 = ""; $sel4 = ""; $sel5 = ""; $sel6 = ""; if (isset($search)) { switch ($search) { case "cur": $sel2 = "selected"; break; case "30": $sel3 = "selected"; break; case "60": $sel4 = "selected"; break; case "90": $sel5 = "selected"; break; case "120": $sel6 = "selected"; break; default: $sel1 = "selected"; } } else { $sel1 = "selected"; } if (!isset($creditor)) { $creditor = ""; } if (!isset($bankid)) { $bankid = ""; } $csel1 = ""; $csel3 = ""; if ($creditor == "0") { $csel1 = "selected"; } if ($creditor == "2") { $csel3 = "selected"; } db_connect(); $get_bankaccs = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "' ORDER BY accname,bankname"; $run_bankaccs = db_exec($get_bankaccs) or errDie("Unable to get bank account information"); if (pg_numrows($run_bankaccs) < 1) { $bankacclist = "No Bank Accounts Found."; } else { $bankacclist = "<select name='bankid'>"; while ($barr = pg_fetch_array($run_bankaccs)) { if ($bankid == $barr['bankid']) { $bankacclist .= "<option value='{$barr['bankid']}' selected>{$barr['accname']} - {$barr['bankname']} ({$barr['acctype']})</option>"; } else { $bankacclist .= "<option value='{$barr['bankid']}'>{$barr['accname']} - {$barr['bankname']} ({$barr['acctype']})</option>"; } } $bankacclist .= "</select>"; } $get_subs = "SELECT * FROM supp_groups WHERE id != '0' ORDER BY groupname"; $run_subs = db_exec($get_subs) or errDie("Unable to get supplier group information"); if (pg_numrows($run_subs) < 1) { $sub_list = "No Groups Found."; } else { $sub_list = "\n\t\t\t\t\t\t<select name='creditor' onChange='document.form1.submit();'>\n\t\t\t\t\t\t\t<option value='' disabled selected>Select Sub Contractor Type</option>\n\t\t\t\t\t\t\t<option value='0' {$csel1}>Sub Contractors</option>\n\t\t\t\t\t\t\t<option value='2' {$csel3}>Creditors</option>\n\t\t\t\t\t\t</select>"; } if ($creditor == "0") { $age_heading = ""; } else { $age_heading = "\n\t\t\t\t\t\t\t<th>30 days</th>\n\t\t\t\t\t\t\t<th>60 days</th>\n\t\t\t\t\t\t\t<th>90 days</th>\n\t\t\t\t\t\t\t<th>120 days</th>\n\t\t\t\t\t"; } $printSupp = "\n\t\t\t\t\t<h3>Creditors Payment Run</h3>\n\t\t\t\t\t{$err}\n\t\t\t\t\t<h4>Period: {$from} to {$to}</h4>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t<form action='" . SELF . "' method='POST' name='form1'>\n\t\t\t\t\t\t<input type='hidden' name='key' value='do_process'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='4'>Show Only</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='4'>{$sub_list}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='4'>Date Range (With Balances)</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='4'>\n\t\t\t\t\t\t\t\t<select name='search' onChange='document.form1.submit();'>\n\t\t\t\t\t\t\t\t\t<option value='' disabled {$sel1}>Select An Option</option>\n\t\t\t\t\t\t\t\t\t<option value='cur' {$sel2}>Current</option>\n\t\t\t\t\t\t\t\t\t<option value='30' {$sel3}>30 Days</option>\n\t\t\t\t\t\t\t\t\t<option value='60' {$sel4}>60 Days</option>\n\t\t\t\t\t\t\t\t\t<option value='90' {$sel5}>90 Days</option>\n\t\t\t\t\t\t\t\t\t<option value='120' {$sel6}>120 Days</option>\n\t\t\t\t\t\t\t\t</select>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t" . TBL_BR . "\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='4'>Select Bank Account To Use</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='4'>{$bankacclist}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th colspan='4'>Process Date</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='4'>" . mkDateSelect("date") . "</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t" . TBL_BR . "\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td colspan='8'></td>\n\t\t\t\t\t\t\t<th>Cheque Starting Number</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td colspan='8'></td>\n\t\t\t\t\t\t\t<td class='" . bg_class() . "' align='center'><input type='text' size='5' name='cheq_start'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t" . TBL_BR . "\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th>Acc no.</th>\n\t\t\t\t\t\t\t<th>Suppliers</th>\n\t\t\t\t\t\t\t<th>Current</th>\n\t\t\t\t\t\t\t{$age_heading}\n\t\t\t\t\t\t\t<th>Total Outstanding</th>\n\t\t\t\t\t\t\t<th>Potential Settlement Discount</th>\n\t\t\t\t\t\t\t<th>Amount To Pay</th>\n\t\t\t\t\t\t\t<th>Remarks</th>\n\t\t\t\t\t\t\t<th>Process</th>\n\t\t\t\t\t\t</tr>"; # connect to database db_connect(); $cred_search = ""; if (strlen($creditor) > 0) { switch ($creditor) { case "0": $groups = "grpid = '3' OR grpid = '4'"; break; case "2": $groups = "grpid = '2'"; break; default: $groups = ""; } $get_creds = "SELECT supid FROM supp_grpowners WHERE {$groups}"; $run_creds = db_exec($get_creds) or errDie("Unable to get supplier groups"); if (pg_numrows($run_creds) > 0) { while ($arr = pg_fetch_array($run_creds)) { $cred_search .= "supid = '{$arr['supid']}' OR "; } } else { $cred_search = "supid = '0' AND"; } } else { $cred_search = "supid > '0' AND "; } if (strlen($cred_search) > 1) { $cred_search = substr($cred_search, 0, -4); } # Query server $i = 0; $sql = "SELECT * FROM suppliers WHERE {$cred_search} ORDER BY supname ASC"; $suppRslt = db_exec($sql) or errDie("Unable to retrieve Suppliers from database."); if (pg_numrows($suppRslt) < 1) { unset($_POST['creditor']); // return printsupp($_POST,"<li class='err'>No Suppliers matching requirement found.</li>"); } # totals $totcurr = 0; $tot30 = 0; $tot60 = 0; $tot90 = 0; $tot120 = 0; $alltot = 0; $i = 0; $newarr = array(); while ($supp = pg_fetch_array($suppRslt)) { $setdate = date("Y-m-d", mktime(0, 0, 0, date("m"), date("d") - $supp['setdays'], date("Y"))); $get_spurch = "SELECT sum(balance) FROM suppurch WHERE supid = '{$supp['supid']}' AND pdate >= '{$setdate}' AND pdate <= 'now'"; $run_spurch = db_exec($get_spurch) or errDie("Unable to get outstanding supplier balance information."); if (pg_numrows($run_spurch) < 1) { $supp['setamt'] = sprint(0); } else { $sparr = pg_fetch_array($run_spurch); $setsave = sprint($sparr['sum'] / 100 * $supp['setdisc']); $supp['setamt'] = $setsave; } $newarr[$setsave] = $supp; } krsort($newarr); if (isset($creditor) and strlen($creditor) > 0) { foreach ($newarr as $setsave => $supp) { # Get all ages $curr = age($supp['supid'], 29); $age30 = age($supp['supid'], 59); $age60 = age($supp['supid'], 89); $age90 = age($supp['supid'], 119); $age120 = age($supp['supid'], 149); # Suppliers total $supptot = sprint($curr + $age30 + $age60 + $age90 + $age120); if ($supptot < $supp['balance']) { $curr = sprint($curr + ($supp['balance'] - $supptot)); $supptot = sprint($supptot + $supp['balance'] - $supptot); } if (isset($search)) { switch ($search) { case "curr": if ($curr < 0.01) { continue 2; } break; case "30": if ($age30 < 0.01) { continue 2; } break; case "60": if ($age60 < 0.01) { continue 2; } break; case "90": if ($age90 < 0.01) { continue 2; } break; case "120": if ($age120 < 0.01) { continue 2; } break; default: } } if ($creditor == "0") { $age_entries = ""; } else { $age_entries = "\n\t\t\t\t\t\t\t\t<td>" . CUR . " {$age30}</td>\n\t\t\t\t\t\t\t\t<td>" . CUR . " {$age60}</td>\n\t\t\t\t\t\t\t\t<td>" . CUR . " {$age90}</td>\n\t\t\t\t\t\t\t\t<td>" . CUR . " {$age120}</td>\n\t\t\t\t\t\t"; } //for settlement disc ... we check suppurch for outstanding amounts/date if ($supp['setdays'] != "0") { $setdate = date("Y-m-d", mktime(0, 0, 0, date("m"), date("d") - $supp['setdays'], date("Y"))); #get suppurch $get_spurch = "SELECT sum(balance) FROM suppurch WHERE supid = '{$supp['supid']}' AND pdate >= '{$setdate}' AND pdate <= 'now'"; $run_spurch = db_exec($get_spurch) or errDie("Unable to get outstanding supplier balance information."); if (pg_numrows($run_spurch) < 1) { #no entries ... we owe him nothing ... $payamount = 0.0; $setsave = sprint(0); $parr['supid'] = "0"; $parr['purid'] = "0"; $parr['remit'] = "0"; $remarks = ""; } else { $sparr = pg_fetch_array($run_spurch); $payamount = 0.0; $setsave = sprint($sparr['sum'] / 100 * $supp['setdisc']); $parr['supid'] = "0"; $parr['purid'] = "0"; $parr['remit'] = "0"; $remarks = ""; } } else { $payamount = 0.0; $setsave = sprint(0); $parr['supid'] = "0"; $parr['purid'] = "0"; $parr['remit'] = "0"; $remarks = ""; } $dochecked = ""; if (isset($runids[$i])) { $dochecked = "checked='yes'"; } ##PTH/CUBIT $printSupp .= "\n\t\t\t\t\t\t<input type='hidden' name='supno[]' value='{$supp['supid']}'>\n\t\t\t\t\t\t<input type='hidden' name='conid[]' value='{$parr['purid']}'>\n\t\t\t\t\t\t<input type='hidden' name='remit[]' value='0'>\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td>{$supp['supno']}</td>\n\t\t\t\t\t\t\t<td><a target='_blank' href='recon_statement_ct.php?key=display&supid={$supp['supid']}'>{$supp['supname']}</a></td>\n\t\t\t\t\t\t\t<td>" . CUR . " {$curr}</td>\n\t\t\t\t\t\t\t{$age_entries}\n\t\t\t\t\t\t\t<td>" . CUR . " {$supptot}</td>\n\t\t\t\t\t\t\t<td nowrap>" . CUR . " {$setsave}</td>\n\t\t\t\t\t\t\t<td><input type='text' size='8' name='amt[]' value='{$payamount}'></td>\n\t\t\t\t\t\t\t<td><textarea name='remarks[]' cols='20' rows='2'>" . nl2br($remarks) . "</textarea></td>\n\t\t\t\t\t\t\t<td><input type='checkbox' {$dochecked} name='runids[]' value='{$i}'></td>\n\t\t\t\t\t\t</tr>"; # hold totals $totcurr += $curr; $tot30 += $age30; $tot60 += $age60; $tot90 += $age90; $tot120 += $age120; $alltot += $supptot; $i++; } } $totcurr = sprint($totcurr); $tot30 = sprint($tot30); $tot60 = sprint($tot60); $tot90 = sprint($tot90); $tot120 = sprint($tot120); $alltot = sprint($alltot); $printSupp .= "\n\t\t\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td colspan='2'><b>Totals</b></td>\n\t\t\t\t\t\t\t\t<td nowrap><b>" . CUR . " {$totcurr}</b></td>\n\t\t\t\t\t\t\t\t<td nowrap><b>" . CUR . " {$tot30}</b></td>\n\t\t\t\t\t\t\t\t<td nowrap><b>" . CUR . " {$tot60}</b></td>\n\t\t\t\t\t\t\t\t<td nowrap><b>" . CUR . " {$tot90}</b></td>\n\t\t\t\t\t\t\t\t<td nowrap><b>" . CUR . " {$tot120}</b></td>\n\t\t\t\t\t\t\t\t<td nowrap><b>" . CUR . " {$alltot}</b></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t\t<tr><td><br></td></tr>\n\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t<td colspan='9' align='right'><input type='submit' name='process' value='Process Selected'></td>\n\t\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</form>\n\t\t\t\t\t\t</table>"; return $printSupp; }
function viewtran($_POST) { extract($_POST); require_lib("validate"); $v = new validate(); $v->isOk($prd, "string", 1, 14, "Invalid Period number."); $v->isOk($accnt, "string", 1, 10, "Invalid Accounts Selection."); $v->isOk($acc_first, "string", 1, 20, "Invalid accounts display selection"); if ($accnt == 'slct') { if (isset($accids)) { foreach ($accids as $key => $accid) { $v->isOk($accid, "num", 1, 20, "Invalid Account number."); } } else { return "<li class='err'>Please select at least one account.</li>" . slctacc(); } } # display errors, if any if ($v->isError()) { $confirm = ""; $errors = $v->getErrors(); foreach ($errors as $e) { $confirm .= "<li class='err'>" . $e["msg"] . "</li>"; } $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>"; return $confirm; } // Was the 'All Accounts' option selected? if ($accnt == 'all') { $accids = array(); // Retrieve the main accounts db_conn("core"); $sql = "SELECT * FROM accounts WHERE div='" . USER_DIV . "' AND accnum='000' ORDER BY topacc ASC"; $macc_rslt = db_exec($sql) or errDie("Unable to retrieve main accounts from Cubit."); while ($macc_data = pg_fetch_array($macc_rslt)) { // Retrieve sub accounts from Cubit $sql = "SELECT * FROM accounts WHERE div='" . USER_DIV . "' AND topacc='{$macc_data['topacc']}' AND accnum!='000' ORDER BY topacc ASC"; $sacc_rslt = db_exec($sql) or errDie("Unable to retrieve sub accounts from Cubit."); // List the main accounts without any sub accounts if (!pg_num_rows($sacc_rslt)) { $accids[] = $macc_data["accid"]; // List the sub accounts } else { while ($sacc_data = pg_fetch_array($sacc_rslt)) { $accids[] = $sacc_data["accid"]; } } } } else { if ($accnt == "allactive") { $accids = array(); $sql = "SELECT accid FROM core.trial_bal\n\t\t\t\tWHERE (debit!=0 OR credit!=0) AND div='" . USER_DIV . "' AND month='{$prd}'"; $rslt = db_exec($sql) or errDie("Error fetching active account list."); while ($macc_data = pg_fetch_array($rslt)) { $accids[] = $macc_data["accid"]; } } } # Period name $prdname = prdname($prd); $trans = ""; $hide = ""; $i = 0; $curr_topacc = ""; foreach ($accids as $key => $accid) { $accRs = get("core", "accname, accid, topacc, accnum", "accounts", "accid", $accid); $acc = pg_fetch_array($accRs); # Get balances $idRs = get($prd, "max(id), min(id)", "ledger", "acc", $accid); $id = pg_fetch_array($idRs); if ($id['min'] != 0) { $balRs = get($prd, "(cbalance-credit) as cbalance,(dbalance-debit) as dbalance", "ledger", "id", $id['min']); $bal = pg_fetch_array($balRs); $cbalRs = get($prd, "cbalance,dbalance", "ledger", "id", $id['max']); $cbal = pg_fetch_array($cbalRs); } else { db_conn("core"); $balSql = "SELECT credit as cbalance, debit as dbalance FROM trial_bal WHERE accid='{$acc['accid']}' AND period='{$prd}'"; $balRs = db_exec($balSql) or errDie("Error reading trial balance."); $bal = pg_fetch_array($balRs); $cbal['cbalance'] = 0; $cbal['dbalance'] = 0; } if ($bal['dbalance'] > $bal['cbalance']) { $bal['dbalance'] = sprint($bal['dbalance'] - $bal['cbalance']); $bal['cbalance'] = ""; $balance = $bal['dbalance']; $fl = "DR"; } elseif ($bal['cbalance'] > $bal['dbalance']) { $bal['cbalance'] = sprint($bal['cbalance'] - $bal['dbalance']); $bal['dbalance'] = ""; $balance = $bal['cbalance']; $fl = "CR"; } else { $bal['cbalance'] = ""; $bal['dbalance'] = ""; $balance = "0.00"; $fl = ""; } $balance = sprint($balance); $bal['cbalance'] = sprint($bal['cbalance']); $bal['dbalance'] = sprint($bal['dbalance']); if ($acc_first == "accnum") { $account_name = "{$acc['topacc']}/{$acc['accnum']} - {$acc['accname']}"; } else { $account_name = "{$acc['accname']} - {$acc['topacc']}/{$acc['accnum']}"; } $hide .= "<input type='hidden' name='accids[]' value='{$acc['accid']}'>"; $heading = ""; if ($acc["accnum"] != "000") { if (!$i && $acc["topacc"] != $curr_topacc) { db_conn("core"); $sql = "SELECT * FROM accounts WHERE div='" . USER_DIV . "' AND topacc='{$acc['topacc']}' AND accnum='000'"; $hacc_rslt = db_exec($sql) or errDie("Unable to retrieve main account from Cubit."); $hacc_data = pg_fetch_array($hacc_rslt); if ($acc_first == "accnum") { $heading_name = "{$hacc_data['topacc']}/{$hacc_data['accnum']} - {$hacc_data['accname']}"; } else { $heading_name = "{$hacc_data['accname']} - {$hacc_data['topacc']}/{$hacc_data['accnum']}"; } $heading = "<tr><th colspan='8' align='left'>{$heading_name}</th></tr>"; $curr_topacc = $acc["topacc"]; } } elseif ($acc["topacc"] == $curr_topacc) { ++$i; } $trans .= "{$heading}\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='8'><b>{$account_name}</b></td>\n\t\t</tr>"; // make the date of the last day of the previous prd $bbf_date = date("t-M-Y", mktime(0, 0, 0, $prd - 1, 1, getYearOfFinMon($prd))); $trans .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='2' align='right'>{$bbf_date}</td>\n\t\t\t<td>Br/Forwd</td>\n\t\t\t<td>Brought Forward</td>\n\t\t\t<td align='right'>{$bal['dbalance']}</td>\n\t\t\t<td align='right'>{$bal['cbalance']}</td>\n\t\t\t<td align='right'>{$balance} {$fl}</td>\n\t\t\t<td> </td>\n\t\t</tr>"; # --> transactio reding comes here <--- # $dbal['debit'] = 0; $dbal['credit'] = 0; if ($t == "s") { $tranRs = get($prd, "*", "ledger", "acc", $accid); } else { $tranRs = get($prd, "*", "ledger", "acc", $accid, "ORDER BY edate,id"); } while ($tran = pg_fetch_array($tranRs)) { $dbal['debit'] += $tran['debit']; $dbal['credit'] += $tran['credit']; if ($t == "t") { $tran['dbalance'] = $dbal['debit'] + $bal['dbalance']; $tran['cbalance'] = $dbal['credit'] + $bal['cbalance']; } # Current(Running) balance if ($tran['dbalance'] > $tran['cbalance']) { $tran['dbalance'] = sprint($tran['dbalance'] - $tran['cbalance']); $tran['cbalance'] = ""; $cbalance = $tran['dbalance']; $cfl = "DR"; } elseif ($tran['cbalance'] > $tran['dbalance']) { $tran['cbalance'] = sprint($tran['cbalance'] - $tran['dbalance']); $tran['dbalance'] = ""; $cbalance = $tran['cbalance']; $cfl = "CR"; } else { $tran['cbalance'] = ""; $tran['dbalance'] = ""; $cbalance = "0.00"; $cfl = ""; } if ($t == "s") { $tran['edate'] = $tran['sdate']; } # Format date $tran['edate'] = explode("-", $tran['edate']); $tran['edate'] = $tran['edate'][2] . "-" . $tran['edate'][1] . "-" . $tran['edate'][0]; $tran['debit'] = sprint($tran['debit']); $tran['credit'] = sprint($tran['credit']); if ($tran["debit"] != 0) { $trans .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2' nowrap>{$tran['edate']}</td>\n\t\t\t\t\t<td>{$tran['eref']}</td>\n\t\t\t\t\t<td>{$tran['descript']}</td>\n\t\t\t\t\t<td align='right' nowrap>{$tran['debit']}</td>\n\t\t\t\t\t<td align='right'></td>\n\t\t\t\t\t<td align='right' nowrap>{$cbalance} {$cfl}</td>\n\t\t\t\t\t<td align='right'>{$tran['ctopacc']}/{$tran['caccnum']} - {$tran['caccname']}</td>\n\t\t\t\t</tr>"; } elseif ($tran["credit"] != 0) { $trans .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td colspan='2' nowrap>{$tran['edate']}</td>\n\t\t\t\t\t<td>{$tran['eref']}</td>\n\t\t\t\t\t<td>{$tran['descript']}</td>\n\t\t\t\t\t<td align='right'></td>\n\t\t\t\t\t<td align='right' nowrap>{$tran['credit']}</td>\n\t\t\t\t\t<td align='right' nowrap>{$cbalance} {$cfl}</td>\n\t\t\t\t\t<td align='right'>{$tran['ctopacc']}/{$tran['caccnum']} - {$tran['caccname']}</td>\n\t\t\t\t</tr>"; } } # Total balance changes if ($dbal['debit'] > $dbal['credit']) { $dbal['debit'] = sprint($dbal['debit'] - $dbal['credit']); $dbal['credit'] = ""; } elseif ($dbal['credit'] > $dbal['debit']) { $dbal['credit'] = sprint($dbal['credit'] - $dbal['debit']); $dbal['debit'] = ""; } else { $dbal['credit'] = ""; $dbal['debit'] = "0.00"; } $trans .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td colspan='2'><br></td>\n\t\t\t<td>A/C Total</td>\n\t\t\t<td>Total for period {$prdname} to Date :</td>\n\t\t\t<td align='right' nowrap>{$dbal['debit']}</td>\n\t\t\t<td align='right' nowrap>{$dbal['credit']}</td>\n\t\t\t<td align='right' nowrap></td>\n\t\t\t<td> </td>\n\t\t</tr>"; $trans .= "<tr><td colspan='8'><br></td></tr>"; } $sp = " "; $view = "\n\t\t\t\t<center>\n\t\t\t\t<h3>General Ledger</h3>\n\t\t\t\t<form action='../xls/ledger-xls.php' method='POST'>\n\t\t\t\t\t<input type='hidden' name='key' value='viewtran'>\n\t\t\t\t\t<input type='hidden' name='prd' value='{$prd}'>\n\t\t\t\t\t<input type='hidden' name='t' value='{$t}'>\n\t\t\t\t\t<input type='hidden' name=accnt value='{$accnt}'>\n\t\t\t\t\t{$hide}\n\t\t\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='8' align='center'><input type='submit' value='Export to Spreadsheet'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr><td colspan='8'><br></td></tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th colspan='2'>Date</th>\n\t\t\t\t\t\t<th>Reference</th>\n\t\t\t\t\t\t<th>Description</th>\n\t\t\t\t\t\t<th width='10%'>Debit</th>\n\t\t\t\t\t\t<th width='10%'>Credit</th>\n\t\t\t\t\t\t<th width='10%'>Balance</th>\n\t\t\t\t\t\t<th>Contra Acc</th>\n\t\t\t\t\t</tr>\n\t\t\t\t\t{$trans}\n\t\t\t\t\t<tr><td colspan='8'><br></td></tr>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td colspan='8' align='center'><input type='submit' value='Export to Spreadsheet'></td>\n\t\t\t\t\t</tr>\n\t\t\t\t<table>\n\t\t\t\t</form>" . mkQuickLinks(ql("index-reports.php", "Financials"), ql("index-reports-journal.php", "Current Year Details General Ledger Reports"), ql("../core/acc-new2.php", "Add New Account")); return $view; }
function viewtrans($_POST) { # get vars extract($_POST); # validate input require_lib("validate"); $v = new validate(); if (!isset($accid)) { $accid = 0; } else { $accid += 0; } #make sure we dont get previous period entries $act_year = getYearOfFinMon($prd); if ($accid > 0) { $exw = " AND (date >= '{$act_year}-01-01' AND date <= '{$act_year}-12-31') AND (debit = '{$accid}' OR credit = '{$accid}') "; } else { $exw = " AND (date >= '{$act_year}-01-01' AND date <= '{$act_year}-12-31')"; } # Search by date if ($search == "date") { $v->isOk($from_day, "num", 1, 2, "Invalid from Date day."); $v->isOk($from_month, "num", 1, 2, "Invalid from Date month."); $v->isOk($from_year, "num", 1, 4, "Invalid from Date Year."); $v->isOk($to_day, "num", 1, 2, "Invalid to Date day."); $v->isOk($to_month, "num", 1, 2, "Invalid to Date month."); $v->isOk($to_year, "num", 1, 4, "Invalid to Date Year."); # mix dates $fromdate = $from_year . "-" . $from_month . "-" . $from_day; $todate = $to_year . "-" . $to_month . "-" . $to_day; if (!checkdate($from_month, $from_day, $from_year)) { $v->isOk($fromdate, "num", 1, 1, "Invalid from date."); } if (!checkdate($to_month, $to_day, $to_year)) { $v->isOk($todate, "num", 1, 1, "Invalid to date."); } $hide = "\n\t\t\t<input type='hidden' name='prd' value='{$prd}'>\n\t\t\t<input type='hidden' name='search' value='{$search}'>\n\t\t\t<input type='hidden' name='fday' value='{$from_day}'>\n\t\t\t<input type='hidden' name='fmon' value='{$from_month}'>\n\t\t\t<input type='hidden' name='fyear' value='{$from_year}'>\n\t\t\t<input type='hidden' name='today' value='{$to_day}'>\n\t\t\t<input type='hidden' name='tomon' value='{$to_month}'>\n\t\t\t<input type='hidden' name='toyear' value='{$to_year}'>"; # Create the Search SQL $search = "SELECT * FROM transect WHERE date >= '{$fromdate}' AND date <= '{$todate}' AND div = '" . USER_DIV . "' {$exw} ORDER BY refnum ASC"; } # Search by refnum if ($search == "refnum") { $v->isOk($fromnum, "num", 1, 20, "Invalid 'from' ref number."); $v->isOk($tonum, "num", 1, 20, "Invalid 'to' ref number."); $hide = "\n\t\t\t<input type='hidden' name='prd' value='{$prd}'>\n\t\t\t<input type='hidden' name='search' value='{$search}'>\n\t\t\t<input type='hidden' name='fromnum' value='{$fromnum}'>\n\t\t\t<input type='hidden' name='tonum' value='{$tonum}'>"; # Create the Search SQL $search = "SELECT * FROM transect WHERE refnum >= {$fromnum} AND refnum <= {$tonum} AND div = '" . USER_DIV . "' {$exw} ORDER BY refnum ASC"; } # View all if ($search == "all") { $hide = "\n\t\t\t<input type='hidden' name='prd' value='{$prd}'>\n\t\t\t<input type='hidden' name='search' value='{$search}'>"; # Create the Search SQL $search = "SELECT * FROM transect WHERE div = '" . USER_DIV . "' {$exw} ORDER BY refnum ASC"; } # display errors, if any if ($v->isError()) { $confirm = ""; $errors = $v->getErrors(); foreach ($errors as $e) { $confirm .= "<li class='err'>" . $e["msg"] . "</li>"; } return $confirm . view(); } // Layout $OUTPUT = "\n\t\t<center>\n\t\t<h3>Journal Entries Report</h3>\n\t\t<table " . TMPL_tblDflts . " width='100%'>\n\t\t\t<tr>\n\t\t\t\t<td width='50%' align='left' colspan='4'><h3>" . COMP_NAME . "</h3></td>\n\t\t\t\t<td width='50%' align='right' colspan='4'><h3>" . date("Y-m-d") . "</h3></td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>System Date</th>\n\t\t\t\t<th>Debit</th>\n\t\t\t\t<th>Credit</th>\n\t\t\t\t<th>Ref No</th>\n\t\t\t\t<th>Amount</th>\n\t\t\t\t<th>Details</th>\n\t\t\t\t<th>User</th>\n\t\t\t</tr>"; db_conn($prd); $tranRslt = db_exec($search) or errDie("ERROR: Unable to retrieve Transaction details from database.", SELF); if (pg_numrows($tranRslt) < 1) { return "<li> There are no Transactions in the selected Period.</li><br>\n\t\t<table " . TMPL_tblDflts . " width='25%'>\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a target=_blank href='../core/acc-new2.php'>Add account (New Window)</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='index-reports-journal.php'>Current Year Details General Ledger Reports</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='../main.php'>Main Menu</td>\n\t\t\t</tr>\n\t\t</table>"; } $total_amount = 0; # display all transaction while ($tran = pg_fetch_array($tranRslt)) { # get vars from tran as the are in db foreach ($tran as $key => $value) { ${$key} = $value; } # format date $date = explode("-", $date); $date = $date[2] . "-" . $date[1] . "-" . $date[0]; $sdate = explode("-", $sdate); if (isset($sdate[2])) { $sdate = $sdate[2] . "-" . $sdate[1] . "-" . $sdate[0]; } else { $sdate = $date; } /* # Get account names $deb = get("core","accname, topacc, accnum","accounts","accid",$debit); $debacc = pg_fetch_array($deb); $ct = get("core","accname, topacc,accnum","accounts","accid",$credit); $ctacc = pg_fetch_array($ct); */ $amount = sprint($amount); $OUTPUT .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$date}</td>\n\t\t\t\t<td>{$sdate}</td>\n\t\t\t\t<td>{$dtopacc}/{$daccnum} {$daccname}</td>\n\t\t\t\t<td>{$ctopacc}/{$caccnum} {$caccname}</td>\n\t\t\t\t<td align='right'>{$custom_refnum}</td>\n\t\t\t\t<td align='right' nowrap>" . CUR . " {$amount}</td>\n\t\t\t\t<td>{$details}</td>\n\t\t\t\t<td>{$author}</td>\n\t\t\t</tr>"; $total_amount += $amount; } $OUTPUT .= "\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<td align='center' colspan='10'>\n\t\t\t\t\t<form action='../xls/alltrans-xls.php' method='POST' name='form'>\n\t\t\t\t\t\t<input type='hidden' name='key' value='viewtrans'>\n\t\t\t\t\t\t<input type='hidden' name='accid' value='{$accid}'>\n\t\t\t\t\t\t{$hide}\n\t\t\t\t\t\t<input type='submit' name='xls' value='Export to spreadsheet'>\n\t\t\t\t\t</form>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t<table " . TMPL_tblDflts . " width='25%'>\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a target=_blank href='../core/acc-new2.php'>Add account (New Window)</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='index-reports-journal.php'>Current Year Details General Ledger Reports</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td align='center'><a href='../main.php'>Main Menu</td>\n\t\t\t</tr>\n\t\t</table>"; return $OUTPUT; }
function viewtran($_POST, $pure = false) { # Get vars extract($_POST); # validate input require_lib("validate"); $v = new validate(); $v->isOk($fprd, "string", 1, 14, "Invalid from period number."); $v->isOk($tprd, "string", 1, 14, "Invalid to period number."); if (isset($accnt)) { if ($accnt == 'slct') { if (isset($cusnums)) { foreach ($cusnums as $key => $cusnum) { $v->isOk($cusnum, "num", 1, 20, "Invalid Customer number."); } } else { return "<li class='err'>Please select at least one Debtor.</li>" . slctacc(); } } } else { $v->isOk("###", "num", 0, 0, "ERROR : Invalid Accounts Selection."); } # display errors, if any if ($v->isError()) { $confirm = ""; $errors = $v->getErrors(); foreach ($errors as $e) { $confirm .= "<li class='err'>" . $e["msg"] . "</li>"; } $confirm .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>"; return $confirm; } # Get the ids if ($accnt == 'all') { $cusnums = array(); db_connect(); $sql = "SELECT cusnum FROM customers WHERE div = '" . USER_DIV . "'"; $rs = db_exec($sql); if (pg_num_rows($rs) > 0) { while ($ac = pg_fetch_array($rs)) { $cusnums[] = $ac['cusnum']; } } else { return "<li calss='err'> There are no customers yet in Cubit.</li>"; } } $prds = array(); if ($tprd < $fprd) { for ($i = $fprd; $i <= 12; ++$i) { $prds[] = $i; } for ($i = 1; $i <= $tprd; ++$i) { $prds[] = $i; } } else { for ($i = $fprd; $i <= $tprd; ++$i) { $prds[] = $i; } } # Period name $hide = ""; $sp = " "; $trans = ""; foreach ($cusnums as $key => $cusnum) { $cusRs = get("cubit", "cusname, surname, accno, balance", "customers", "cusnum", $cusnum); $cus = pg_fetch_array($cusRs); $trans .= "\n\t\t<tr>\n\t\t\t<td colspan='8' align='center'><h3>{$cus['surname']}</h3></td>\n\t\t</tr>"; $hide .= "<input type='hidden' name='cusnums[]' value='{$cusnum}'>"; foreach ($prds as $prd) { $prdname = prdname($prd); $trans .= "\n\t\t\t<tr>\n\t\t\t\t<th colspan='8'>{$prdname}</th>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>{$sp}</th>\n\t\t\t\t<th>Date</th>\n\t\t\t\t<th>Reference</th>\n\t\t\t\t<th>Description</th>\n\t\t\t\t<th>Debit</th>\n\t\t\t\t<th>Credit</th>\n\t\t\t\t<th>Balance</th>\n\t\t\t\t<th>Contra Acc</th>\n\t\t\t</tr>"; $idRs = get($prd, "min(id)", "custledger", "cusnum", $cusnum); $id = pg_fetch_array($idRs); if ($id['min'] != 0) { $balRs = get($prd, "(cbalance-credit) AS cbalance,(dbalance-debit) AS dbalance", "custledger", "id", $id['min']); $bal = pg_fetch_array($balRs); $bal['cbalance'] += 0; $bal['dbalance'] += 0; } else { $balRs = get("cubit", "balance", "customers", "cusnum", $cusnum); $bal = pg_fetch_array($balRs); $bal['balance'] += 0; if ($bal['balance'] > 0) { $bal['dbalance'] = $bal['balance']; $bal['cbalance'] = 0; } else { $bal['cbalance'] = $bal['balance'] * -1; $bal['dbalance'] = 0; } //$bal['dbalance'] += $amount; } # Total balance changes if ($bal['dbalance'] > $bal['cbalance']) { $bal['dbalance'] = $bal['dbalance'] - $bal['cbalance']; $bal['cbalance'] = 0; } else { if ($bal['cbalance'] > $bal['dbalance']) { $bal['cbalance'] = $bal['cbalance'] - $bal['dbalance']; $bal['dbalance'] = 0; } else { $bal['cbalance'] = 0; $bal['dbalance'] = 0; } } $bal['credit'] = sprint($bal['cbalance']); $bal['debit'] = sprint($bal['dbalance']); $balance = sprint($bal['dbalance'] - $bal['cbalance']); $trans .= "\n\t\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t\t<td colspan='8'><b>{$cus['accno']} - {$cus['cusname']} {$cus['surname']}</b></td>\n\t\t\t\t\t\t\t</tr>"; $bbf_date = date("t-M-Y", mktime(0, 0, 0, $prd - 1, 1, getYearOfFinMon($prd))); $trans .= "\n\t\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t\t<td colspan='2' align='right'>{$bbf_date}</td>\n\t\t\t\t\t\t\t<td>Br/Forwd</td>\n\t\t\t\t\t\t\t<td>Brought Forward</td>\n\t\t\t\t\t\t\t<td align='right'>{$bal['debit']}</td>\n\t\t\t\t\t\t\t<td align='right'>{$bal['credit']}</td>\n\t\t\t\t\t\t\t<td align='right'>{$balance}</td>\n\t\t\t\t\t\t\t<td> </td>\n\t\t\t\t\t\t</tr>"; # --> Transaction reading comes here <--- # $dbal['debit'] = 0; $dbal['credit'] = 0; if ($t == "s") { $tranRs = get($prd, "*", "custledger", "cusnum", $cusnum, "ORDER BY id"); } else { $tranRs = get($prd, "*", "custledger", "cusnum", $cusnum, "ORDER BY edate,id"); } while ($tran = pg_fetch_array($tranRs)) { if ($tran["descript"] == "BBF" && $tran["debit"] == "0" && $tran["credit"] == "0") { continue; } $caccRs = get("core", "accname, accid, topacc, accnum", "accounts", "accid", $tran['contra']); $cacc = pg_fetch_array($caccRs); $dbal['debit'] += $tran['debit']; $dbal['credit'] += $tran['credit']; if ($t == "s") { $balance = sprint($tran['dbalance'] - $tran['cbalance']); } else { $balance = sprint($dbal['debit'] + $bal['debit'] - ($dbal['credit'] + $bal['credit'])); } if ($t == "t") { $tran['sdate'] = $tran['edate']; } # Format date $tran['sdate'] = explode("-", $tran['sdate']); $tran['sdate'] = $tran['sdate'][2] . "-" . $tran['sdate'][1] . "-" . $tran['sdate'][0]; $trans .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td>{$tran['sdate']}</td>\n\t\t\t\t\t<td>{$tran['eref']}</td>\n\t\t\t\t\t<td>{$tran['descript']}</td>\n\t\t\t\t\t<td align='right'>" . sprint($tran['debit']) . "</td>\n\t\t\t\t\t<td align='right'>" . sprint($tran['credit']) . "</td>\n\t\t\t\t\t<td align='right'>{$balance}</td>\n\t\t\t\t\t<td>{$cacc['topacc']}/{$cacc['accnum']} - {$cacc['accname']}</td>\n\t\t\t\t</tr>"; } # Total balance changes if ($dbal['debit'] > $dbal['credit']) { $dbal['debit'] = sprint($dbal['debit'] - $dbal['credit']); $dbal['credit'] = ""; } elseif ($dbal['credit'] > $dbal['debit']) { $dbal['credit'] = sprint($dbal['credit'] - $dbal['debit']); $dbal['debit'] = ""; } else { $dbal['credit'] = ""; $dbal['debit'] = "0.00"; } $trans .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='2'> </td>\n\t\t\t\t<td>A/C Total</td>\n\t\t\t\t<td>Total for period {$prdname} to Date :</td>\n\t\t\t\t<td align='right'>{$dbal['debit']}</td>\n\t\t\t\t<td align='right'>{$dbal['credit']}</td>\n\t\t\t\t<td align='right'> </td>\n\t\t\t\t<td> </td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='8'> </td>\n\t\t\t</tr>"; } } $view = ""; if (!$pure) { $view .= "\n\t\t<center>\n\t\t<form action='" . SELF . "' method='POST'>\n\t\t\t<input type='hidden' name='key' value='excel'>\n\t\t\t<input type='hidden' name='accnt' value='{$accnt}'>\n\t\t\t<input type='hidden' name='fprd' value='{$fprd}'>\n\t\t\t<input type='hidden' name='tprd' value='{$tprd}'>\n\t\t\t<input type='hidden' name='accnt' value='{$accnt}'>\n\t\t\t<input type='hidden' name='t' value='{$t}'>\n\t\t\t{$hide}\n\t\t\t<h3>Debtors Ledger</h3>"; } $view .= "\n\t<table " . TMPL_tblDflts . " width='75%'>\n\t{$trans}"; if (!$pure) { $view .= "\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td colspan='8' align='center'><input type='submit' value='Export to Spreadsheet'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</from>"; } $view .= "\n\t</table>"; if (!$pure) { $view .= "\n\t\t<p>\n\t\t<table " . TMPL_tblDflts . " width='25%'>\n\t\t\t" . TBL_BR . "\n\t\t\t<tr>\n\t\t\t\t<th>Quick Links</th>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a target=_blank href='../core/acc-new2.php'>Add account (New Window)</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='index-reports.php'>Financials</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='index-reports-debtcred.php'>Debtors & Creditors Reports</a></td>\n\t\t\t</tr>\n\t\t\t<tr class='datacell'>\n\t\t\t\t<td align='center'><a href='../main.php'>Main Menu</td>\n\t\t\t</tr>\n\t\t</table>"; } return $view; }
function process($_POST, $err = "") { global $PRDMON; extract($_POST); # validate input require_lib("validate"); $v = new validate(); $proc_date = mkdate($proc_year, $proc_month, $proc_day); $v->isOk($empnum, "num", 1, 20, "Invalid employee number."); $v->isOk($MON, "num", 1, 2, "Invalid month."); $v->isOk($proc_date, "date", 1, 1, "Invalid date selected."); $salyr = getYearOfEmpMon($MON); $curyr = getActiveFinYear(); if ($salyr > $curyr || $salyr == $curyr && $MON > $PRDMON[12]) { $v->addError("", "Cannot do transaction in future financial year. You need\n\t\t\tto close your year first before you can continue."); } # display errors, if any if ($v->isError()) { return slctEmployee($v->genErrors()); return $confirmCust; } # CHECK IF THIS DATE IS IN THE BLOCKED RANGE $blocked_date_from = getCSetting("BLOCKED_FROM"); $blocked_date_to = getCSetting("BLOCKED_TO"); if (strtotime($proc_date) >= strtotime($blocked_date_from) and strtotime($proc_date) <= strtotime($blocked_date_to) and !user_is_admin(USER_ID)) { return "<li class='err'>Period Range Is Blocked. Only an administrator can process entries within this period.</li>"; } // first check if all the selected employees with EFT pay types have banking information // and their id numbers are valid $emp_err = array(); $emp_nam = array(); /* previously selected to remove this employee from process */ if (isset($rememp[$empnum])) { unset($emps[$empnum]); continue; } db_connect(); $sql = "\n\t\t\tSELECT fnames, sname, paytype, bankname, bankaccno, idnum, flag, hiredate, payprd \n\t\t\tFROM employees \n\t\t\tWHERE div='" . USER_DIV . "' AND empnum='{$empnum}'"; $rslt = db_exec($sql) or errDie("error checking employee payment types."); $e_info = pg_fetch_array($rslt); /* if the employee's pay period doesn't match the selected button, don't include employee in checklist */ if (isset($d) && $e_info["payprd"] != "d") { continue; } else { if (isset($w) && $e_info["payprd"] != "w") { continue; } else { if (isset($b) && $e_info["payprd"] != "f") { continue; } else { if (isset($m) && $e_info["payprd"] != "m") { continue; } } } } $empnum += 0; $emp_err[$empnum] = 0; $emp_nam[$empnum] = "{$e_info['fnames']} {$e_info['sname']}"; if ($e_info["paytype"] == "EFT" && (empty($e_info["bankname"]) || empty($e_info["bankaccno"]))) { $emp_err[$empnum] |= 0x1; } if (!empty($e_info["idnum"])) { $bd_year = substr($e_info["idnum"], 0, 2); $bd_month = substr($e_info["idnum"], 2, 2); $bd_day = substr($e_info["idnum"], 4, 2); if (!checkdate($bd_month, $bd_day, $bd_year)) { $emp_err[$empnum] |= 0x2; } } if ($e_info["flag"] == "2.5EMP") { $emp_err[$empnum] |= 0x4; $special_error = 0x1; } if ($e_info["flag"] == "272PREVEMP") { $emp_err[$empnum] |= 0x4; $special_error = 0x2; } /* check hiredate after process date */ explodeDate($e_info["hiredate"], $hd_year, $hd_month, $hd_day); $MONempyear = getYearOfEmpMon($MON); if ($hd_year > $MONempyear || $hd_year == $MONempyear && $hd_month > $MON) { $emp_err[$empnum] |= 0x8; } // list the employee information problems if (array_sum($emp_err) > 0) { $out = "<h3>Process Salaries</h3>\n\t\t\t<form method='POST' action='" . SELF . "'>"; foreach ($_POST as $key => $value) { if (is_array($value)) { foreach ($value as $akey => $avalue) { $out .= "<input type='hidden' name='{$key}" . "[{$akey}]' value='{$avalue}'>"; } } else { $out .= "<input type='hidden' name='{$key}' value='{$value}'>"; } } if (isset($special_error)) { switch ($special_error) { case 0x1: $out .= "\n\t\t\t\t\t<li class='err'><strong>NOTICE:</strong> Due to changes in employee functionality from Cubit 2.5 to Cubit 2.6 <br>\n\t\t\t\t\t\tyou need to edit your employees' salary/deduction/allowance information</li>\n\t\t\t\t\t\t<br />"; break; case 0x2: $out .= "\n\t\t\t\t\t<li class='err'><strong>NOTICE:</strong> Due to the changes from Cubit 2.71 to Cubit 2.72 you should first update your employee's\n\t\t\t\t\t\tprevious employment information in the employee edit form.</li>\n\t\t\t\t\t\t<br />"; break; } } $out .= "\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='3' class='err'>There are problems with the employee.<br />\n\t\t\t\t\t\tPlease edit the information first.<br /><br />\n\t\t\t\t\t\tClick the 'Done' button when ready to proceed.</td>\n\t\t\t\t</tr>"; $out .= "\n\t\t\t<tr>\n\t\t\t\t<th>Name</th>\n\t\t\t\t<th>Message</th>\n\t\t\t</tr>"; $i = 0; foreach ($emp_err as $e_empnum => $err_val) { $out .= "\n\t\t\t\t<tr bgcolor='" . bgcolor($i) . "'>\n\t\t\t\t\t<h1></h1>\n\t\t\t\t\t<th>{$emp_nam[$e_empnum]}</td>"; if ($err_val & 0x4) { $specerr_msg = "(See above notice for this employee)"; } else { $specerr_msg = ""; } if ($err_val & 0x1 && $err_val & 0x2) { $out .= "<td class='err'>Banking info and ID number {$specerr_msg}</td>"; } else { if ($err_val & 0x1) { $out .= "<td class='err'>Banking info {$specerr_msg}</td>"; } else { if ($err_val & 0x2) { $out .= "<td class='err'>ID number {$specerr_msg}</td>"; } else { if ($err_val & 0x8) { $out .= "<td class='err'>Employee was not employed in the period requested {$specerr_msg}</td>"; } else { $out .= "<td>Employee Info Correct {$specerr_msg}</td>"; } } } } if ($err_val && !($err_val == 0x8)) { $out .= "<td class='err'><a target='_blank' href='../admin-employee-edit.php?empnum={$e_empnum}'>Edit Employee</a></td>"; } $out .= "\n\t\t\t</tr>"; } $out .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='3' align='right'><input type='submit' value='Done' /></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</form>"; return $out; } # Get employee details db_conn('cubit'); $sql = "SELECT * FROM employees WHERE empnum='{$empnum}' AND div = '" . USER_DIV . "'"; $empRslt = db_exec($sql) or errDie("Unable to select employees from database."); if (pg_numrows($empRslt) < 1) { return "Invalid employee ID."; } $myEmp = pg_fetch_array($empRslt); if ($myEmp["flag"] == "2.5EMP") { $OUTPUT = "\n\t\t\t<h3>Process Employee Salary</h3>\n\t\t\t<li class='err'>\n\t\t\t\tDue to the changes from Cubit 2.5 to Cubit 2.6.1 you should first update your employee's\n\t\t\t\tsalary/deduction/allowance information in the employee edit form.\n\t\t\t\tClick <a href='../admin-employee-edit.php?empnum={$empnum}'>here</a> to do so.\n\t\t\t</li>"; return $OUTPUT; } if (!empty($idnum)) { $bd_year = substr($myEmp["idnum"], 0, 2); $bd_month = substr($myEmp["idnum"], 2, 2); $bd_day = substr($myEmp["idnum"], 4, 2); if (!checkdate($bd_month, $bd_day, $bd_year)) { $OUTPUT = "\n\t\t\t<h3>Process Employee Salary</h3>\n\t\t\t<li class='err'>\n\t\t\t\tSelected employee does not have a valid id number and therefore his age cannot be\n\t\t\t\tcalculated.<br>\n\t\t\t\tPlease update this information in the employee <a href='../admin-employee-edit.php?empnum={$empnum}'>edit</a> form.\n\t\t\t</li>"; return $OUTPUT; } } /* check for flag notices */ if ($myEmp["flag"] == "272PREVEMP") { $OUTPUT = "\n\t\t<h3>Process Employee Salary</h3>\n\t\t<li class='err'>\n\t\t\tDue to the changes from Cubit 2.71 to Cubit 2.72 you should first update your employee's\n\t\t\tprevious employment information in the employee edit form.\n\t\t\tClick <a href='../admin-employee-edit.php?empnum={$empnum}'>here</a> to do so.\n\t\t</li>"; } /* check if hiredate after process date */ explodeDate($myEmp["hiredate"], $hd_year, $hd_month, $hd_day); if ($hd_year > getYearOfEmpMon($MON) || $hd_year == getYearOfEmpMon($MON) && $hd_month > $MON) { return slctEmployee("<li class='err'>Employee was not employed in the period\n\t\t\trequested.</li>"); } if ($myEmp["paytype"] == "EFT" && (empty($myEmp["bankname"]) || empty($myEmp["bankaccno"]))) { return "Employee banking information not entered.<br>\n\t\t\tClick <a href='../admin-employee-edit.php?empnum={$empnum}'>here</a> employee banking information."; } $grossal = $myEmp["basic_sal"] + $myEmp["commission"] + $myEmp["bonus"]; $yy = date("Y"); $mm = $MON; $mm += 0; if ($myEmp['payprd'] == "m") { $Sl = "SELECT * FROM salpaid WHERE empnum='{$empnum}' AND month='{$mm}' AND cyear='" . EMP_YEAR . "'"; $Ri = db_exec($Sl); $paid = pg_num_rows($Ri); $Sl = "SELECT * FROM salr WHERE empnum='{$empnum}' AND month='{$mm}' AND cyear='" . EMP_YEAR . "'"; $Ri = db_exec($Sl); $upaid = pg_num_rows($Ri); $upaid += 0; $paid -= $upaid; } if (isset($paid) && $paid > 0) { return slctEmployee("<li class='err'>You have already processed a salary for that period.</li>"); } /* calculate basic salary divisors and multipliers * used for calculating deductions/allowances/etc. when the * salary type and payment period differs in length */ switch ($myEmp["saltyp"]) { case "h": $divisor = 1; switch ($myEmp["payprd"]) { case "d": $multiplier = $myEmp["hpweek"] / 5; break; case "w": $multiplier = $myEmp["hpweek"]; break; case "f": $multiplier = $myEmp["hpweek"] * 2; break; case "m": $multiplier = $myEmp["hpweek"] * 52 / 12; break; } break; case "m": $divisor = 1; switch ($myEmp["payprd"]) { case "d": $multiplier = 12 / (5 * 52); break; case "w": $multiplier = 12 / 52; break; case "f": $multiplier = 12 / 26; break; case "m": $multiplier = 1; break; } break; case "w": $divisor = 52 / 12; switch ($myEmp["payprd"]) { case "d": $multiplier = 1 / 5; break; case "w": $multiplier = 1; break; case "f": $multiplier = 2; break; case "m": $multiplier = 52 / 12; break; } break; case "f": $divisor = 26 / 12; switch ($myEmp["payprd"]) { case "d": $multiplier = 1 / 10; break; case "w": $multiplier = 1 / 2; break; case "f": $multiplier = 1; break; case "m": $multiplier = 26 / 12; break; } break; } # fringe benefits $fringes = ""; $i = 0; $sql = "SELECT * FROM fringebens WHERE div = '" . USER_DIV . "' ORDER BY fringeben"; $rslt = db_exec($sql) or errDie("Unable to select allowances from database."); if (pg_num_rows($rslt) < 1) { $fringes = "<tr><td class='" . bg_class() . "' colspan='2' align='center'>None found in database.</td></tr>\n"; } else { while ($myFringe = pg_fetch_array($rslt)) { # check if employee has allowance $sql = "SELECT * FROM empfringe WHERE fringeid='{$myFringe['id']}' AND empnum='{$myEmp['empnum']}' AND div = '" . USER_DIV . "'"; $empRslt = db_exec($sql) or errDie("Unable to retrieve fringe benefit info from database."); if (pg_numrows($empRslt) > 0) { $empFringe = pg_fetch_array($empRslt); if (substr($empFringe["type"], 0, 4) == "Perc") { $empFringe["amount"] = sprint($myEmp["basic_sal"] * ($empFringe["amount"] / 100) / $divisor); } else { $empFringe['amount'] = sprint($empFringe['amount'] / $divisor); } $grossal += $empFringe["amount"]; $tmp_fringeaccs = $empFringe["accid"]; $tmp_fringebens = $empFringe["amount"]; } else { $tmp_fringeaccs = "0"; $tmp_fringebens = "0.00"; } $fringes .= "\n\t\t\t<input type='hidden' name='fringeid[]' value='{$myFringe['id']}'>\n\t\t\t<input type='hidden' name='fringename[]' value='{$myFringe['fringeben']}'>\n\t\t\t<input type='hidden' name='fringeaccs[]' value='{$tmp_fringeaccs}'>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$myFringe['fringeben']}</td>\n\t\t\t\t<td align='center'>" . CUR . "<input type='text' size='10' name='fringebens[]' value='{$tmp_fringebens}'></td>\n\t\t\t</tr>"; $i++; } } # get allowances $allowances = ""; $i = 0; $sql = "SELECT * FROM allowances WHERE div = '" . USER_DIV . "' ORDER BY allowance"; $allowRslt = db_exec($sql) or errDie("Unable to select allowances from database."); if (pg_numrows($allowRslt) < 1) { $allowances = "<tr><td class='" . bg_class() . "' colspan='2' align='center'>None found in database.</td></tr>\n"; } else { while ($myAllow = pg_fetch_array($allowRslt)) { # check if employee has allowance $sql = "SELECT * FROM empallow WHERE allowid='{$myAllow['id']}' AND empnum='{$myEmp['empnum']}' AND div = '" . USER_DIV . "'"; $empAllowRslt = db_exec($sql) or errDie("Unable to select allowance info from database."); if (pg_numrows($empAllowRslt) > 0) { $myEmpAllow = pg_fetch_array($empAllowRslt); if (substr($myEmpAllow["type"], 0, 4) == "Perc") { $myEmpAllow["amount"] = sprint($myEmp["basic_sal"] * ($myEmpAllow["amount"] / 100) / $divisor); } else { $myEmpAllow['amount'] = sprint($myEmpAllow['amount'] / $divisor); } $grossal += $myEmpAllow["amount"]; $tmp_allowaccs = $myEmpAllow["accid"]; $tmp_allowances = $myEmpAllow["amount"]; } else { $tmp_allowaccs = $myAllow["accid"]; $tmp_allowances = "0.00"; } $allowances .= "\n\t\t\t<input type='hidden' size='10' name='allowid[]' value='{$myAllow['id']}'>\n\t\t\t<input type='hidden' size='30' name='allowname[]' value='{$myAllow['allowance']}'>\n\t\t\t<input type='hidden' size='10' name='allowtax[]' value='{$myAllow['add']}'>\n\t\t\t<input type='hidden' name='allowaccs[]' value='{$tmp_allowaccs}'>\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>{$myAllow['allowance']}</td>\n\t\t\t\t<td align='center'>" . CUR . " <input type='text' size='10' name='allowances[]' value='{$tmp_allowances}'></td>\n\t\t\t</tr>"; $i++; } } $subsistence = ""; $subslst = new dbSelect("subsistence", "cubit", array("where" => "div='" . USER_DIV . "'", "order" => "name")); $subslst->run(); $subs_int = false; if ($subslst->num_rows() > 0) { $i = 0; $subsistence .= "\n\t\t<tr><td colspan='10'>\n\t\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<th>Name</th>\n\t\t\t<th>Amount</th>\n\t\t\t<th>Days</th>\n\t\t\t<th></th>\n\t\t</tr>"; $empsubs = new dbSelect("emp_subsistence", "cubit"); while ($subs = $subslst->fetch_array()) { $sid = $subs["id"]; $empsubs->setOpt(array("where" => wgrp(m("empnum", $empnum), m("subid", $sid)))); $empsubs->run(); if ($empsubs->num_rows() <= 0) { $si["amount"] = "0.00"; $si["days"] = "0"; $si["accid"] = $subs["accid"]; } else { $si = $empsubs->fetch_array(); } if ($subs["in_republic"] != "yes") { $subs_int = true; } $subsistence .= "\n\t\t\t<input type='hidden' name='subsname[{$sid}]' value='{$subs['name']}'>\n\t\t\t<input type='hidden' name='subsacc[{$sid}]' value='{$si['accid']}'>\n\t\t\t<input type='hidden' name='subsrep[{$sid}]' value='{$subs['in_republic']}'>\n\t\t\t<input type='hidden' name='subsmeal[{$sid}]' value='{$subs['meals']}'>\n\t\t\t<tr bgcolor='" . bgcolor($i) . "'>\n\t\t\t\t<td>{$subs['name']}</td>\n\t\t\t\t<td>" . CUR . " <input type='text' name='subsamt[{$sid}]' value='{$si['amount']}'></td>\n\t\t\t\t<td><input type='text' name='subsdays[{$sid}]' value='{$si['days']}'></td>\n\t\t\t</tr>"; } if ($subs_int) { $subsistence .= "\n\t\t\t\t<input type='hidden' name='subs_exch' value='1'>\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='3'><li class='err'>Please calculate the rand amount prior to completing the amount above.</li></td>\n\t\t\t\t</tr>"; // <tr bgcolor='".bgcolor($i)."'> // <td colspan='2'>Exchange (ZAR-USD):</td> // <td><input type='text' name='subs_exch' value='".xrate_get("USD")."'></td> // </tr>"; } $subsistence .= "\n\t\t\t</table>\n\t\t\t</td></tr>"; } # Deductions $deductions = ""; $i = 0; $sql = "SELECT * FROM salded WHERE div = '" . USER_DIV . "' ORDER BY deduction"; $deductRslt = db_exec($sql) or errDie("Unable to select deductions from database."); if (pg_numrows($deductRslt) < 1) { $deductions = "<tr><td class='" . bg_class() . "' colspan='2' align='center'>None found in database.</td></tr>\n"; } else { while ($myDeduct = pg_fetch_array($deductRslt)) { # check if employee has deduction $sql = "SELECT * FROM empdeduct WHERE dedid='{$myDeduct['id']}' AND empnum='{$myEmp['empnum']}' AND div = '" . USER_DIV . "'"; $empDeductRslt = db_exec($sql) or errDie("Unable to select Deduction info from database."); if (pg_numrows($empDeductRslt) > 0) { $myEmpDeduct = pg_fetch_array($empDeductRslt); if ($myEmpDeduct["grosdeduct"] == "y") { $deductions_msg = "(Deducted from Gross Salary)"; $sal_calcfrom = $grossal; } else { $deductions_msg = ""; $sal_calcfrom = $myEmp['basic_sal']; } if ($myEmpDeduct['type'] == "Amount") { $myEmpDeduct['amount'] = sprint($myEmpDeduct['amount'] / $divisor); } else { $myEmpDeduct['amount'] = sprint($sal_calcfrom * $myEmpDeduct['amount'] / 100 / $divisor); } // calculate employer contribution to deduction if ($myEmpDeduct["employer_type"] == "Amount") { $myEmpDeduct["employer_amount"] = sprint($myEmpDeduct["employer_amount"] / $divisor); } else { $myEmpDeduct["employer_amount"] = sprint($myEmpDeduct["amount"] * $myEmpDeduct["employer_amount"] / 100 / $divisor); } $tmp_deductions = $myEmpDeduct["amount"]; $tmp_dedaccs = $myEmpDeduct["accid"]; $tmp_emp_ded = $myEmpDeduct["employer_amount"]; $tmp_grosdeduct = $myEmpDeduct["grosdeduct"]; } else { $tmp_deductions = "0.00"; $tmp_emp_ded = "0.00"; $tmp_dedaccs = $myDeduct["accid"] != 0 ? $myDeduct["accid"] : $myDeduct["expaccid"]; $tmp_grosdeduct = "n"; $deductions_msg = ""; } # check if we should be using deductions if ($myEmp['emp_usescales'] == "1" and $myDeduct['type'] == "Percentage") { # check if this deduction has scales $get_scales = "SELECT * FROM salded_scales WHERE saldedid = '{$myDeduct['id']}' LIMIT 1"; $run_scales = db_exec($get_scales) or errDie("Unable to get deduction scale information."); if (pg_numrows($run_scales) > 0) { # scales exist $get_perc = "\n\t\t\t\t\t\tSELECT * FROM salded_scales \n\t\t\t\t\t\tWHERE scale_from <= '{$myEmp['basic_sal']}' AND scale_to >= '{$myEmp['basic_sal']}' AND saldedid = '{$myDeduct['id']}' \n\t\t\t\t\t\tLIMIT 1"; $run_perc = db_exec($get_perc) or errDie("Unable to get deduction scale information."); if (pg_numrows($run_perc) > 0) { # found a matching scale for this scaled duduction for a customer using scales .... $scale_arr = pg_fetch_array($run_perc); $tmp_deductions = sprint($myEmp['basic_sal'] / 100 * $scale_arr['scale_amount']); } } } $deductions .= "\n\t\t\t\t<input type='hidden' size='10' name='employer_deductions[]' value='{$tmp_emp_ded}'>\n\t\t\t\t<input type='hidden' size='10' name='deducttax[]' value='{$myDeduct['add']}'>\n\t\t\t\t<input type='hidden' name='grosdeduct[]' value='{$tmp_grosdeduct}'>\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td>{$myDeduct['deduction']} {$deductions_msg}</td>\n\t\t\t\t\t<td align='center'>\n\t\t\t\t\t\t" . CUR . "<input type='hidden' size='10' name='deductid[]' value='{$myDeduct['id']}'>\n\t\t\t\t\t\t<input type='hidden' size='30' name='deductname[]' value='{$myDeduct['deduction']}'>\n\t\t\t\t\t\t<input type='text' size='10' name='deductions[]' value='{$tmp_deductions}'>\n\t\t\t\t\t\t<input type='hidden' name='dedaccs[]' value='{$tmp_dedaccs}'>\n\t\t\t\t\t</td>\n\t\t\t\t</tr>"; $i++; } } $deductions .= ""; $salarr = array("m" => "Per Month", "w" => "Per Week", "f" => "Fortnightly", "h" => "Per Hour"); $salnarr = array("d" => "Day(s)", "h" => "Hour(s)"); $saltype = $salarr[$myEmp['saltyp']]; db_conn('cubit'); $Sl = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "' ORDER BY accname ASC"; $Ry = db_exec($Sl) or errDie("Unable to get bank account."); if (pg_numrows($Ry) < 1) { return "<li class='err'> There are no bank accounts found in Cubit.\n\t\t<p><input type='button' onClick='JavaScript:history.back();' value='« Correct Selection'>"; } $banks = "<select name='accid'>"; while ($acc = pg_fetch_array($Ry)) { $banks .= "<option value='{$acc['bankid']}'>{$acc['accname']} ({$acc['acctype']})</option>"; } $banks .= "</select>"; $myEmp['loaninstall'] += 0; if ($myEmp['paytype'] == "Cash") { $paydetails = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td colspan='2'>Employee paid cash</td>\n\t\t\t</tr>\n\t\t\t<input type='hidden' name='accid' value='0'>"; } elseif ($myEmp['paytype'] == "Ledger Account") { db_conn('core'); $Sl = "SELECT accid,accname FROM accounts ORDER BY accname"; $Ri = db_exec($Sl); $accounts = "<select name='account'>\n\t\t\t<option value='#'>Select Account</option>"; while ($ad = pg_fetch_array($Ri)) { if (isset($account) && $account == $ad['accid']) { $sel = "selected"; } else { $sel = ""; } $accounts .= "<option value='{$ad['accid']}'>{$ad['accname']}</option>"; } $accounts .= "</select>"; $paydetails = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Ledger Account for payment</td>\n\t\t\t\t<td>{$accounts}</td>\n\t\t\t</tr>\n\t\t\t<input type='hidden' name='accid' value='0'>"; } else { $paydetails = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Bank Account</td>\n\t\t\t\t<td valign='center'>{$banks}</td>\n\t\t\t</tr>"; } $h1 = ""; $h2 = ""; $db = array("comp_pension" => $myEmp["comp_pension"], "emp_pension" => $myEmp["emp_pension"], "comp_provident" => $myEmp["comp_provident"], "emp_provident" => $myEmp["emp_provident"], "comp_uif" => $myEmp["comp_uif"], "emp_uif" => $myEmp["emp_uif"], "comp_other" => $myEmp["comp_other"], "emp_other" => $myEmp["emp_other"]); if (isset($basic_sal)) { $myEmp['basic_sal'] = $basic_sal; $myEmp['all_travel'] = $all_travel; $myEmp['bonus'] = $bonus; $myEmp['commission'] = $commission; $myEmp['abonus'] = $abonus; $myEmp['loaninstall'] = $loaninstall; $myEmp['comp_pension'] = $comp_pension; $myEmp['emp_pension'] = $emp_pension; $myEmp["comp_provident"] = $comp_provident; $myEmp["emp_provident"] = $emp_provident; //$myEmp["comp_uif"] = $comp_uif; //$myEmp["emp_uif"] = $emp_uif; $myEmp["comp_other"] = $comp_other; $myEmp["emp_other"] = $emp_other; $myEmp['comp_medical'] = $comp_medical; $myEmp['emp_medical'] = $emp_medical; $myEmp['comp_ret'] = $comp_ret; $myEmp['emp_ret'] = $emp_ret; $h1 = $novert; $h2 = $hovert; } else { if ($myEmp["payprd"] == "w" || $myEmp["payprd"] == "f") { $tmpmon = date("j"); $daycount = date("t"); $dayweek = date("D"); if (strtolower($dayweek) == $myEmp["payprd_day"] && $day + 7 > $daycount) { $process_comp_deductions = true; } else { $process_comp_deductions = false; } } else { $process_comp_deductions = true; } $effective_basicsal = $myEmp["basic_sal"] * $multiplier; /* we only changing basic sal for non hourly employees, because for hourly employees we change the hours ($mutli) */ if ($myEmp["saltyp"] != "h") { $myEmp["basic_sal"] *= $multiplier; } if ($myEmp["loaninstall"] > $myEmp["loanamt"]) { $myEmp["loaninstall"] = $myEmp["loanamt"]; } $myEmp["emp_pension"] = sprint($effective_basicsal * ($myEmp["emp_pension"] / 100)); $myEmp["comp_pension"] = sprint($effective_basicsal * ($myEmp["comp_pension"] / 100)); $myEmp["emp_provident"] = sprint($effective_basicsal * ($myEmp["emp_provident"] / 100)); $myEmp["comp_provident"] = sprint($effective_basicsal * ($myEmp["comp_provident"] / 100)); $myEmp["emp_medical"] = sprint($myEmp["emp_medical"] / $divisor); $myEmp["comp_medical"] = sprint($myEmp["comp_medical"] / $divisor); $myEmp["emp_ret"] = sprint($myEmp["emp_ret"] / $divisor); $myEmp["comp_ret"] = sprint($myEmp["comp_ret"] / $divisor); $myEmp["loaninstall"] = sprint($myEmp["loaninstall"] / $divisor); $myEmp["all_travel"] = sprint($myEmp["all_travel"] / $divisor); if (isset($myEmp["loandate"]) and strlen($myEmp["loandate"]) > 0) { explodeDate($myEmp["loandate"], $loana_year, $loana_month, $loana_day); if ($loana_year > $salyr || $loana_year == $salyr && $loana_month > $MON) { $myEmp["loanint"] = 0; $myEmp["loaninstall"] = 0; } } } if (!isset($multi)) { $multi = $myEmp["saltyp"] == "h" ? $multiplier : 1; } $multi = round($multi); if ($myEmp['saltyp'] == 'd' || $myEmp['saltyp'] == 'h') { $salntype = $salnarr[$myEmp['saltyp']]; $multi_show = "x <input type='text' size='3' name='multi' value='{$multi}'> {$salntype}"; } else { $multi_show = "<input type='hidden' name='multi' value='{$multi}'>"; $saltype = ""; } /* db_conn('cubit'); $sql = "SELECT value FROM settings WHERE constant='UIF_MAX'"; $percrslt = db_exec($sql); $perc = pg_fetch_array($percrslt); $uifmax = $perc['value']; if ( $myEmp["emp_uif"] > $uifmax ) { $myEmp["emp_uif"] = $uifmax; } if ( $myEmp["comp_uif"] > $uifmax ) { $myEmp["comp_uif"] = $uifmax; } */ $Sl = "SELECT * FROM cubit.rbs ORDER BY name"; $Ri = db_exec($Sl) or errDie("Unable to get data."); $i = 0; $rt = ""; if (pg_num_rows($Ri) > 0) { while ($td = pg_fetch_array($Ri)) { if (!isset($rbsa[$td['id']])) { $rbsa[$td['id']] = ""; } $rt .= "\n\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t<td><input type='hidden' name='rbs[{$td['id']}]' value='{$td['id']}'>{$td['name']}</td>\n\t\t\t\t\t<td>" . CUR . " <input type='text' size='10' name='rbsa[{$td['id']}]' value='" . $rbsa[$td['id']] . "' class=right></td>\n\t\t\t\t</tr>"; $i++; } } else { $rt .= "<tr class='" . bg_class() . "'><td colspan='2' align='center'>There are no reimbursements</td></tr>"; } if ($myEmp['payprd'] == "w") { $weekends = ""; $weeks = "\n\t\t<select name='week'>"; $stdate = mktime(0, 0, 0, $MON, 1, DATE_YEAR); $endate = mktime(0, 0, 0, $MON, DATE_DAYS, DATE_YEAR); $i = 1; while ($stdate <= $endate) { if (date("w", $stdate) == 5) { $weekends .= "<input type='hidden' name='weekends[{$i}]' value='" . date("j", $stdate) . "' />"; if (isset($week) && $week == $i) { $sel = "selected"; } else { $sel = ""; } $weeks .= "<option {$sel} value='{$i}'>Week {$i} (" . date("j M", $stdate) . ")</option>"; ++$i; } /* next day */ $stdate += 24 * 60 * 60; } /*<option value='1'>Week 1</option> <option value='2'>Week 2</option> <option value='3'>Week 3</option> <option value='4'>Week 4</option> <option value='5'>Week 5</option>*/ $weeks .= "\n\t\t</select>"; $row = "{$weekends}<tr class='" . bg_class() . "'><td>Period</td><td>{$weeks}</td></tr>"; } elseif ($myEmp['payprd'] == "f") { $weekends = ""; $weeks = "\n\t\t<select name='week'>"; $i = 1; /* find first friday of tax year */ $stdate = mktime(0, 0, 0, 3, 1, getYearOfEmpMon(3)); while (date("w", $stdate) != 5) { $stdate = mktime(0, 0, 0, 3, ++$i, getYearOfEmpMon(3)); } // hack: go one week back so the +14 increases are easier $stdate -= 7 * 24 * 3600; /* end on the last day of the selected month */ $endate = mktime(0, 0, 0, $MON + 1, 0, getYearOfEmpMon($MON)); /* count weeks from start of tax year */ $i = 1; $c = 0; while ($stdate <= $endate) { if (date("m", $stdate) == $MON && date("Y", $stdate) == getYearOfEmpMon($MON)) { $c += 2; $cd = $c - 1 . "-{$c}"; $weekends .= "<input type='hidden' name='weekends[{$i}]' value='" . date("j", $stdate) . "' />"; if (isset($week) && $week == $i) { $sel = "selected"; } else { $sel = ""; } $weeks .= "<option {$sel} value='{$i}'>Week {$cd} (" . date("j M", $stdate) . ")</option>"; ++$i; } /* next day */ $stdate += 24 * 60 * 60 * 14; } /*<option value='1'>Week 1</option> <option value='2'>Week 2</option> <option value='3'>Week 3</option> <option value='4'>Week 4</option> <option value='5'>Week 5</option>*/ $weeks .= "\n\t\t</select>"; $row = "{$weekends}<tr class='" . bg_class() . "'><td>Period</td><td>{$weeks}</td></tr>"; } else { if ($myEmp["payprd"] == "d") { $x = date("t", mktime(0, 0, 0, $MON, 1, getYearOfFinMon($MON))); $MONstr = getMonthNameS($MON); if (!isset($pday)) { $pday = $proc_day; } $days = "<select name='pday'>"; for ($i = 1; $i <= $x; ++$i) { if ($i == $pday) { $sel = "selected='t'"; } else { $sel = ""; } $days .= "<option {$sel} value='{$i}'>{$i} {$MONstr}</option>"; } $days .= "</select>"; $row = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Day for Payment</td>\n\t\t\t\t<td>{$days}</td>\n\t\t\t</tr>"; } else { $weeks = ""; $row = "<input type='hidden' name='week' value='0'>"; } } if (!isset($abonus) && $myEmp["sal_bonus_month"] == $MON) { $abonus = $myEmp["sal_bonus"]; } else { if (!isset($abonus)) { $abonus = 0; } } if ($myEmp["payprd"] == "m" || $myEmp["payprd"] == "h") { // count the amount of weekdays in this month $workdays = 0; for ($i = 1; $i <= date("t", mktime(0, 0, 0, $MON, 1, date("Y"))); ++$i) { $wd = date("w", mktime(0, 0, 0, $MON, $i, date("Y"))); if ($wd != 0 && $wd != 6) { ++$workdays; } } // hours per day calculation $hpd = $myEmp["hpweek"] / 5; if (!isset($wh_total)) { $wh_total = $workdays * $hpd; } if (!isset($wh_actual)) { $wh_actual = $wh_total; } } if ($myEmp["payprd"] == "w") { if (!isset($wh_total)) { $wh_total = $myEmp["hpweek"]; } if (!isset($wh_actual)) { $wh_actual = $wh_total; } } if ($myEmp["payprd"] == "f") { if (!isset($wh_total)) { $wh_total = $myEmp["hpweek"] * 2; } if (!isset($wh_actual)) { $wh_actual = $wh_total; } } $js_workhours = "\n\t<script>\n\t\tsf = document.getElementById('salfrm');\n\n\t\tf_sal\t\t= sf.elements['basic_sal'];\n\t\tf_whtot\t\t= sf.elements['wh_total'];\n\t\tf_whact\t\t= sf.elements['wh_actual'];\n\t\tf_cpension\t= sf.elements['comp_pension'];\n\t\tf_epension \t= sf.elements['emp_pension'];\n\t\tf_cprov\t\t= sf.elements['comp_provident'];\n\t\tf_eprov\t\t= sf.elements['emp_provident'];\n\t\t//f_cuif\t= sf.elements['comp_uif'];\n\t\t//f_euif\t= sf.elements['emp_uif'];\n\t\tf_cother\t= sf.elements['comp_other'];\n\t\tf_eother\t= sf.elements['emp_other'];\n\n\t\tdb_cpension\t= " . $db["comp_pension"] . ";\n\t\tdb_epension\t= " . $db["emp_pension"] . ";\n\t\tdb_cprov\t= " . $db["comp_provident"] . ";\n\t\tdb_eprov\t= " . $db["emp_provident"] . ";\n\t\t//db_cuif\t= " . $db["comp_uif"] . ";\n\t\t//db_euif\t= " . $db["emp_uif"] . ";\n\t\tdb_cother\t= " . $db["comp_other"] . ";\n\t\tdb_eother\t= " . $db["emp_other"] . ";\n\n\t\tval_sal \t\t= -1;\n\n\t\t// changing the workhours\n\t\tfunction workhours() {\n\t\t\tif ( val_sal < 0 ) val_sal = parseFloat(f_sal.value);\n\n\t\t\tval_whtot\t= parseFloat(f_whtot.value);\n\t\t\tval_whact\t= parseFloat(f_whact.value);\n\n\t\t\tif ( val_whtot >= val_whact ) {\n\t\t\t\tp = val_whact / val_whtot;\n\n\t\t\t\t// calculate the new basic salary\n\t\t\t\tx = val_sal * p;\n\t\t\t\tx = x.toFixed(2);\n\t\t\t\tf_sal.value = x;\n\n\t\t\t\t// calculate the new values\n\t\t\t\tval_cpension \t= x * db_cpension / 100;\n\t\t\t\tval_epension \t= x * db_epension / 100;\n\t\t\t\tval_cprov\t\t= x * db_cprov / 100;\n\t\t\t\tval_eprov\t\t= x * db_eprov / 100;\n\t\t\t\t//val_cuif\t\t= x * db_cuif / 100;\n\t\t\t\t//val_euif\t\t= x * db_euif / 100;\n\t\t\t\tval_cother\t\t= x * db_cother / 100;\n\t\t\t\tval_eother\t\t= x * db_eother / 100;\n\n\t\t\t\tval_cpension \t= val_cpension.toFixed(2);\n\t\t\t\tval_epension \t= val_epension.toFixed(2);\n\t\t\t\tval_cprov \t\t= val_cprov.toFixed(2);\n\t\t\t\tval_eprov\t\t= val_eprov.toFixed(2);\n\t\t\t\t//val_cuif\t\t= val_cuif.toFixed(2);\n\t\t\t\t//val_euif\t\t= val_euif.toFixed(2);\n\t\t\t\tval_cother\t\t= val_cother.toFixed(2);\n\t\t\t\tval_eother\t\t= val_eother.toFixed(2);\n\n\t\t\t\tf_cpension.value\t= val_cpension;\n\t\t\t\tf_epension.value \t= val_epension;\n\t\t\t\tf_cprov.value \t\t= val_cprov;\n\t\t\t\tf_eprov.value\t\t= val_eprov;\n\t\t\t\t//f_cuif.value\t\t= val_cuif;\n\t\t\t\t//f_euif.value\t\t= val_euif;\n\t\t\t\tf_cother.value\t\t= val_cother;\n\t\t\t\tf_eother.value\t\t= val_eother;\n\t\t\t}\n\t\t}\n\n\t\tfunction changedfield() {\n\t\t\tval_whtot\t= parseFloat(f_whtot.value);\n\t\t\tval_whact\t= parseFloat(f_whact.value);\n\n\t\t\tp = val_whtot / val_whact;\n\n\t\t\tval_sal = parseFloat(f_sal.value) * p;\n\t\t\tval_sal = val_sal.toFixed(2);\n\t\t}\n\t</script>"; vsprint($myEmp["basic_sal"]); /* payprd message */ $dispmsg = getCSetting("EMP_SALMSG"); if (strpos($dispmsg, $myEmp["payprd"]) === false) { $payprd_msg_ch = ""; } else { $payprd_msg_ch = "checked='t'"; } $payprd_msg = get_payprdmsg($myEmp["payprd"]); /* print payslip on/off */ $printslip = getCSetting("EMP_PRINTSLIP"); $process = "\n\t<script>\n\t\tfunction update_salmsg(obj) {\n\t\t\tajaxRequest('payprdmsg.php', 'payprd_msg', AJAX_SET,\n\t\t\t\t'payprd={$myEmp['payprd']}&newval=' + obj.checked);\n\t\t}\n\t</script>\n\t<h3>Process Salary for {$myEmp['sname']}, {$myEmp['fnames']}</h3>\n\t<li class='err'>NOTE that Cubit is configured to compute employees' tax\n\t\tduring the employees' tax year that<br />\n\t\tstarts in March and ends in February,\n\t\tirrespective of the employer's financial year end.</li>\n\t<br />\n\t<form action='" . SELF . "' method='POST' id='salfrm'>\n\t\t<input type='hidden' name='key' value='confirm' />\n\t\t<input type='hidden' name='empnum' value='{$empnum}' />\n\t\t<input type='hidden' name='MON' value='{$MON}' />\n\t\t<input type='hidden' name='proc_day' value='{$proc_day}' />\n\t\t<input type='hidden' name='proc_month' value='{$proc_month}' />\n\t\t<input type='hidden' name='proc_year' value='{$proc_year}' />\n\t\t<input type='hidden' name='day' value='{$proc_day}' />\n\t\t<input type='hidden' name='mon' value='{$proc_month}' />\n\t\t<input type='hidden' name='year' value='{$proc_year}' />\n\t\t<input type='hidden' name='saltyp' value='{$myEmp['saltyp']}' />\n\t\t<input type='hidden' name='loanint' value='{$myEmp['loanint']}' />\n\t\t<input type='hidden' name='process_comp_deductions' value='{$process_comp_deductions}' />\n\t\t<input type='hidden' name='divisor' value='{$divisor}' />\n\t<table " . TMPL_tblDflts . " width='500'>\n\t\t<tr>\n\t\t\t<td id='payprd_msg'>{$payprd_msg}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th align='right'>Salary Help Message: <input type='checkbox' onclick='update_salmsg(this);' name='payprd_dispmsg' {$payprd_msg_ch} /></th>\n\t\t</tr>\n\t</table>\n\t<table " . TMPL_tblDflts . ">\n\t\t<tr>\n\t\t\t<td><input type='submit' name='back' value='« Correction'></td>\n\t\t\t<td align='right'><input type='submit' value='Confirm »'></td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<td colspan='2'>{$err}</td>\n\t\t</tr>\n\t\t<tr>\n\t\t\t<th colspan='2'>Salary Details for the Pay Period</th>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap='t'>Print Salary Advice</td>\n\t\t\t<td>\n\t\t\t<select name='printslip'>\n\t\t\t\t<option value='y' " . ($printslip != "n" ? "selected='t'" : "") . ">Yes</option>\n\t\t\t\t<option value='n' " . ($printslip == "n" ? "selected='t'" : "") . ">No</option>\n\t\t\t</select>\n\t\t\t</td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Basic salary</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='basic_sal' value='{$myEmp['basic_sal']}' class=right onChange='changedfield();'> {$saltype} {$multi_show}</td>\n\t\t</tr>"; if ($myEmp["payprd"] == "d") { $process .= "\n\t\t\t<input type='hidden' name='wh_total' value='1'>\n\t\t\t<input type='hidden' name='wh_actual' value='1'>"; } else { $process .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Total Work Hours:</td>\n\t\t\t<td><input type='text' size='10' name='wh_total' value='{$wh_total}' class='right' onChange='workhours();'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Actual Hours Worked:</td>\n\t\t\t<td><input type='text' size='10' name='wh_actual' value='{$wh_actual}' class='right' onChange='workhours();'></td>\n\t\t</tr>"; } if (!isset($annual)) { $annual = ""; } $process .= "\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Normal Overtime</td>\n\t\t\t<td nowrap><input type='text' size='5' name='novert' value='{$h1}' class='right'> Hrs</td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Public Holiday Overtime</td>\n\t\t\t<td nowrap><input type='text' size='5' name='hovert' value='{$h2}' class='right'> Hrs</td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<!--<td>Special Bonus/Additional Salary</td>-->\n\t\t\t<td>Annual Bonus</td>\n\t\t\t<td>" . CUR . " <input type='text' size='10' name='abonus' value='{$abonus}' class='right'></td>\n\t\t\t<!--<td rowspan='2' class='err'>An amount entered here (Special Bonus/Additional\n\t\t\t\tSalary) will be treated as a recurring bonus/payment per pay period for PAYE\n\t\t\t\tpurposes, the amount will not be treated as an annual payment. If the\n\t\t\t\tamount paid as a bonus is a once off/annual payment please use the\n\t\t\t\tBonus(Annual Payments) option. In other cases PAYE has to be manually\n\t\t\t\tadjusted <u>per directive</u> from SARS when processing salary.\n\t\t\t</td>-->\n\t\t</tr>\n\t\t<input type='hidden' name='annual' value='0' />\n\t\t<!--<tr class='" . bg_class() . "'>\n\t\t\t<td>Bonus(Annual/Once Off Payments)</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='annual' value='{$annual}' class='right'></td>\n\t\t</tr>-->\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Commission</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='commission' value='{$myEmp['commission']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Low or interest-free loan installment</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='loaninstall' value='{$myEmp['loaninstall']}' class='right'></td>\n\t\t\t<td class='err'>In the event that the employee repays more than the installment -\n\t\t\t\tenter that amount, plus interest that is remitted, here.\n\t\t\t</td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Travel Allowance</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='all_travel' value='{$myEmp['all_travel']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Pension: Company Contribution</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='comp_pension' value='{$myEmp['comp_pension']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Pension: Employee Deduction</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='emp_pension' value='{$myEmp['emp_pension']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Provident: Company Contribution</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='comp_provident' value='{$myEmp['comp_provident']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Provident: Employee Deduction</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='emp_provident' value='{$myEmp['emp_provident']}' class='right'></td>\n\t\t</tr>\n\t\t<!--\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>UIF: Company Contribution</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='comp_uif' value='{$myEmp['comp_uif']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>UIF: Employee Deduction</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='emp_uif' value='{$myEmp['emp_uif']}' class='right'></td>\n\t\t</tr>\n\t\t//-->\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Retirement Annuity: Company Contribution</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='comp_ret' value='{$myEmp['comp_ret']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Retirement Annuity: Employee Deduction</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='emp_ret' value='{$myEmp['emp_ret']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Medical Contribution: Company</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='comp_medical' value='{$myEmp['comp_medical']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td nowrap>Medical Contribution: Employee</td>\n\t\t\t<td nowrap>" . CUR . " <input type='text' size='10' name='emp_medical' value='{$myEmp['emp_medical']}' class='right'></td>\n\t\t</tr>\n\t\t<input type=hidden name='comp_other' value='0'>\n\t\t<input type=hidden name='emp_other' value='0'>\n\t\t<!--\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Other: Company Contribution</td>\n\t\t\t<td>" . CUR . " <input type='text' size='10' name='comp_other' value='{$myEmp['comp_other']}' class='right'></td>\n\t\t</tr>\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Other: Employee Deduction</td>\n\t\t\t<td>" . CUR . " <input type='text' size='10' name='emp_other' value='{$myEmp['emp_other']}' class='right'></td>\n\t\t</tr>\n\t\t//-->\n\t\t{$paydetails}\n\t\t<tr class='" . bg_class() . "'>\n\t\t\t<td>Override PAYE <input type='checkbox' name='mpaye'></td>\n\t\t\t<td>" . CUR . " <input type='text' size='10' name='mpaye_amount'></td>\n\t\t</tr>\n\t\t{$row}\n\t\t<tr><th colspan='2'>Fringe Benefits</th></tr>\n\t\t{$fringes}\n\t\t<tr><th colspan='2'>Allowances</th></tr>\n\t\t{$allowances}\n\t\t<tr><th colspan='2'>Subsistence Allowances</th></tr>\n\t\t{$subsistence}\n\t\t<tr><th colspan='2'>Deductions</th></tr>\n\t\t{$deductions}\n\t\t{$rt}\n\t\t<tr>\n\t\t\t<td><input type='submit' name='back' value='« Correction'></td>\n\t\t\t<td align='right'><input type='submit' value='Confirm »'></td>\n\t\t</tr>\n\t\t</form>\n\t\t{$js_workhours}\n\t\t</table>"; return $process; }
function enter($_POST, $err = "") { extract($_POST); global $PRDMON, $MONPRD; $salyr = getYearOfEmpMon($month); $curyr = getActiveFinYear(); if ($salyr > $curyr || $salyr == $curyr && $month > $PRDMON[12]) { header("Location: ../admin-employee-view.php?err=Cannot do transaction in future financial year. You need to close your year first before you can continue.&" . array2get($_POST)); exit; } if (!isset($emps) || !is_array($emps)) { header("Location: ../admin-employee-view.php?err=Please select at least one employee."); exit; } // first check if all the selected employees with EFT pay types have banking information // and their id numbers are valid $emp_err = array(); $emp_nam = array(); foreach ($emps as $e_empnum => $e_val) { /* previously selected to remove this employee from process */ if (isset($rememp[$e_empnum])) { unset($emps[$e_empnum]); continue; } $sql = "\n\t\t\tSELECT fnames, sname, paytype, bankname, bankaccno, idnum, flag, hiredate, payprd \n\t\t\tFROM employees \n\t\t\tWHERE div='" . USER_DIV . "' AND empnum='{$e_empnum}'"; $rslt = db_exec($sql) or errDie("error checking employee payment types."); $e_info = pg_fetch_array($rslt); /* if the employee's pay period doesn't match the selected button, don't include employee in checklist */ if (isset($d) && $e_info["payprd"] != "d") { continue; } else { if (isset($w) && $e_info["payprd"] != "w") { continue; } else { if (isset($b) && $e_info["payprd"] != "f") { continue; } else { if (isset($m) && $e_info["payprd"] != "m") { continue; } } } } $e_empnum += 0; $emp_err[$e_empnum] = 0; $emp_nam[$e_empnum] = "{$e_info['fnames']} {$e_info['sname']}"; if ($e_info["paytype"] == "EFT" && (empty($e_info["bankname"]) || empty($e_info["bankaccno"]))) { $emp_err[$e_empnum] |= 0x1; } if (!empty($e_info["idnum"])) { $bd_year = substr($e_info["idnum"], 0, 2); $bd_month = substr($e_info["idnum"], 2, 2); $bd_day = substr($e_info["idnum"], 4, 2); if (!checkdate($bd_month, $bd_day, $bd_year)) { $emp_err[$e_empnum] |= 0x2; } } if ($e_info["flag"] == "2.5EMP") { $emp_err[$e_empnum] |= 0x4; $special_error = 0x1; } if ($e_info["flag"] == "272PREVEMP") { $emp_err[$e_empnum] |= 0x4; $special_error = 0x2; } /* check hiredate after process date */ explodeDate($e_info["hiredate"], $hd_year, $hd_month, $hd_day); $MONempyear = getYearOfEmpMon($month); if ($hd_year > $MONempyear || $hd_year == $MONempyear && $hd_month > $month) { $emp_err[$e_empnum] |= 0x8; } } // list the employee information problems if (array_sum($emp_err) > 0) { $out = "\n\t\t\t<h3>Batch Salaries</h3>\n\t\t\t\t<form method='POST' action='" . SELF . "'>"; foreach ($_POST as $key => $value) { if (is_array($value)) { foreach ($value as $akey => $avalue) { $out .= "<input type='hidden' name='{$key}" . "[{$akey}]' value='{$avalue}'>"; } } else { $out .= "<input type='hidden' name='{$key}' value='{$value}'>"; } } if (isset($special_error)) { switch ($special_error) { case 0x1: $out .= "\n\t\t\t\t\t<li class='err'><strong>NOTICE:</strong> Due to changes in employee functionality from Cubit 2.5 to Cubit 2.6 <br>\n\t\t\t\t\t\tyou need to edit your employees' salary/deduction/allowance information</li>\n\t\t\t\t\t\t<br />"; break; case 0x2: $out .= "\n\t\t\t\t\t<li class='err'><strong>NOTICE:</strong> Due to the changes from Cubit 2.71 to Cubit 2.72 you should first update your employee's\n\t\t\t\t\t\tprevious employment information in the employee edit form.</li>\n\t\t\t\t\t\t<br />"; break; } } $out .= "\n\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='3' class='err'>There are problems with the following employees.<br />\n\t\t\t\t\t\tEdit their information or to remove an employee from the process select\n\t\t\t\t\t\tthe checkbox next to employee's name.<br /><br />\n\t\t\t\t\t\tClick the 'Done' button when ready to proceed.</td>\n\t\t\t\t</tr>"; $out .= "\n\t\t\t<tr>\n\t\t\t\t<td> </td>\n\t\t\t\t<th>Name</th>\n\t\t\t\t<th>Message</th>\n\t\t\t</tr>"; $i = 0; foreach ($emp_err as $e_empnum => $err_val) { $out .= "\n\t\t\t\t<tr bgcolor='" . bgcolor($i) . "'>\n\t\t\t\t\t<td><input type='checkbox' name='rememp[{$e_empnum}]' /></td>\n\t\t\t\t\t<th>{$emp_nam[$e_empnum]}</td>"; if ($err_val & 0x4) { $specerr_msg = "(See above notice for this employee)"; } else { $specerr_msg = ""; } if ($err_val & 0x1 && $err_val & 0x2) { $out .= "<td class='err'>Banking info and ID number {$specerr_msg}</td>"; } else { if ($err_val & 0x1) { $out .= "<td class='err'>Banking info {$specerr_msg}</td>"; } else { if ($err_val & 0x2) { $out .= "<td class='err'>ID number {$specerr_msg}</td>"; } else { if ($err_val & 0x8) { $out .= "<td class='err'>Employee was not employed in the period\n\t\t\t\t\trequested {$specerr_msg}</td>"; } else { $out .= "<td>Employee Info Correct {$specerr_msg}</td>"; } } } } if ($err_val && !($err_val == 0x8)) { $out .= "<td class='err'><a target='_blank' href='../admin-employee-edit.php?empnum={$e_empnum}'>Edit Employee</a></td>"; } $out .= "</tr>"; } $out .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<td colspan='3' align='right'><input type='submit' value='Done' /></td>\n\t\t\t\t</tr>\n\t\t\t</table>\n\t\t\t</form>"; return $out; } if (!isset($date_day)) { $date_day = date("d"); $date_month = date("m"); $date_year = date("Y"); } if (!isset($date_month)) { $date_month = date("m"); } /* make week/day selections */ if (isset($w)) { $weekends = ""; $weeks = "<select name='week'>"; $stdate = mktime(0, 0, 0, $month, 1, DATE_YEAR); $endate = mktime(0, 0, 0, $month, DATE_DAYS, DATE_YEAR); $i = 1; while ($stdate <= $endate) { if (date("w", $stdate) == 5) { $weekends .= "<input type='hidden' name='weekends[{$i}]' value='" . date("j", $stdate) . "' />"; if (isset($week) && $week == $i) { $sel = "selected"; } else { $sel = ""; } $weeks .= "<option {$sel} value='{$i}'>Week {$i} (" . date("j M", $stdate) . ")</option>"; ++$i; } /* next day */ $stdate += 24 * 60 * 60; } /*<option value='1'>Week 1</option> <option value='2'>Week 2</option> <option value='3'>Week 3</option> <option value='4'>Week 4</option> <option value='5'>Week 5</option>*/ $weeks .= "</select>"; $weeks = "\n\t\t\t<th>Week</th>\n\t\t\t<td>{$weekends}{$weeks}</td>\n\t\t\t<td class='err'>Period salaries are processed for</td>"; } else { if (isset($b)) { $weekends = ""; $weeks = "<select name='week'>"; $i = 1; /* find first friday of tax year */ $stdate = mktime(0, 0, 0, 3, 1, getYearOfEmpMon(3)); while (date("w", $stdate) != 5) { $stdate = mktime(0, 0, 0, 3, ++$i, getYearOfEmpMon(3)); } // hack: go one week back so the +14 increases are easier $stdate -= 7 * 24 * 3600; /* end on the last day of the selected month */ $endate = mktime(0, 0, 0, $month + 1, 0, getYearOfEmpMon($month)); /* count weeks from start of tax year */ $i = 1; $c = 0; while ($stdate <= $endate) { if (date("m", $stdate) == $month && date("Y", $stdate) == getYearOfEmpMon($month)) { $c += 2; $cd = $c - 1 . "-{$c}"; $weekends .= "<input type='hidden' name='weekends[{$i}]' value='" . date("j", $stdate) . "' />"; if (isset($week) && $week == $i) { $sel = "selected"; } else { $sel = ""; } $weeks .= "<option {$sel} value='{$i}'>Week {$cd} (" . date("j M", $stdate) . ")</option>"; ++$i; } /* next day */ $stdate += 24 * 60 * 60 * 14; } /*<option value='1'>Week 1</option> <option value='2'>Week 2</option> <option value='3'>Week 3</option> <option value='4'>Week 4</option> <option value='5'>Week 5</option>*/ $weeks .= "\n\t\t</select>"; $weeks = "\n\t\t\t<th>Week</th>\n\t\t\t<td>{$weekends}{$weeks}</td>\n\t\t\t<td class='err'>Period salaries are processed for</td>"; } else { if (isset($d)) { $x = date("t", mktime(0, 0, 0, $month, 1, getYearOfFinMon($month))); $MONstr = getMonthNameS($month); if (!isset($proc_day)) { $proc_day = 0; } if (!isset($pday)) { $pday = $proc_day; } $days = "<select name='pday'>"; for ($i = 1; $i <= $x; ++$i) { if ($i == $pday) { $sel = "selected='t'"; } else { $sel = ""; } $days .= "<option {$sel} value='{$i}'>{$i} {$MONstr}</option>"; } $days .= "</select>"; $weeks = "\n\t\t\t<th>Day for Payment</th>\n\t\t\t<td>{$days}</td>\n\t\t\t<td class='err'>Period salaries are processed for</td>"; } else { $weeks = "<input type='hidden' name='week' value='0'>"; } } } /* payprd message */ if (isset($d)) { $cpayprd = "d"; } else { if (isset($w)) { $cpayprd = "w"; } else { if (isset($b)) { $cpayprd = "f"; } else { if (isset($m)) { $cpayprd = "m"; } else { invalid_use("Invalid payment type selected."); } } } } $dispmsg = getCSetting("EMP_SALMSG"); if (strpos($dispmsg, $cpayprd) === false) { $payprd_msg_ch = ""; } else { $payprd_msg_ch = "checked='t'"; } $payprd_msg = get_payprdmsg($cpayprd); /* print payslip on/off */ $printslip = getCSetting("EMP_PRINTSLIP"); $out = "\n\t\t<script>\n\t\t\tfunction update_salmsg(obj) {\n\t\t\t\tajaxRequest('payprdmsg.php', 'payprd_msg', AJAX_SET,'payprd={$cpayprd}&newval=' + obj.checked);\n\t\t\t}\n\t\t</script>\n\t\t<form action='" . SELF . "' method='POST' id='salfrm'>\n\t\t\t<input type='hidden' name='key' value='confirm' />\n\t\t\t<input type='hidden' name='month' value='{$month}' />\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<td colspan='9'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td><h3>Processing Batch Salaries</h3></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t\t<li class='err'>NOTE that Cubit is configured to compute employees' tax\n\t\t\t\t\t\t\t\t\tduring the employees' tax year that<br />\n\t\t\t\t\t\t\t\t\tstarts in March and ends in February,\n\t\t\t\t\t\t\t\t\tirrespective of the employer's financial year end.</li>\n\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td id='payprd_msg' colspan='2'>{$payprd_msg}</td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<th align='right'>Salary Help Message: <input type='checkbox' onclick='update_salmsg(this);' name='payprd_dispmsg' {$payprd_msg_ch} /></th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='6' valign='top' rowspan='2'>\n\t\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t{$weeks}\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<th>Processing Date:</th>\n\t\t\t\t\t\t<td nowrap>" . mkDateSelect("date", $date_year, $date_month, $date_day) . "</td>\n\t\t\t\t\t\t<td colspan='2' class='err'>Date used by Cubit for the ledgers.</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t\t\t<th nowrap='t'>Print Salary Advice</th\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t<select name='printslip'>\n\t\t\t\t\t\t\t<option value='y' " . ($printslip != "n" ? "selected='t'" : "") . ">Yes</option>\n\t\t\t\t\t\t\t<option value='n' " . ($printslip == "n" ? "selected='t'" : "") . ">No</option>\n\t\t\t\t\t\t</select>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t</tr>\n\t\t\t\t\t\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td colspan='3' align='right' nowrap='t'>\n\t\t\t\t\t<input type='submit' name='btn_back' value='« Correction'>\n\t\t\t\t\t<input type='submit' value='Confirm »'>\n\t\t\t\t</td>\n\t\t\t\t<td colspan='10' align='right' nowrap='t'>\n\t\t\t\t\t<input type='submit' name='btn_back' value='« Correction'>\n\t\t\t\t\t<input type='submit' value='Confirm »'>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<!--<td align='center' colspan='3' class='err'>An amount entered here (Special Bonus/Additional\n\t\t\t\t\tSalary) will be treated as a recurring bonus/payment per pay period for PAYE\n\t\t\t\t\tpurposes, the amount will not be treated as an annual payment. If the\n\t\t\t\t\tamount paid as a bonus is a once off/annual payment please use the\n\t\t\t\t\tBonus(Annual Payments) option. In other cases PAYE has to be manually\n\t\t\t\t\tadjusted <u>per directive</u> from SARS when processing salary.</td>-->\n\t\t\t\t<td colspan='3'> </td>\n\t\t\t\t<td colspan='3' class='err'><strong>LOAN NOTE:</strong><br />In the event that the employee repays more than the installment -\n\t\t\t\t\tenter that amount, plus interest that is remitted, in the \"Loan Repayment\" field below.\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='10'>{$err}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<th>Nr.</th>\n\t\t\t\t<th>Name</th>\n\t\t\t\t<th>Remuneration</th>"; if (!isset($d)) { $out .= "\n\t\t\t<th>Total Work Hours</th>\n\t\t\t<th>Actual Hours Worked</th>"; } $out .= "\n\t\t\t<th>Normal Overtime</th>\n\t\t\t<th>Public Holiday Overtime</th>\n\t\t\t<th>Annual Bonus</th>\n\t\t\t<!--\n\t\t\t<th>Special Bonus/Additional Salary</th>\n\t\t\t<th>Annual/Once Off Bonus</th>\n\t\t\t-->\n\t\t\t<th>Commission</th>\n\t\t\t<th>Travel Allowance</th>\n\t\t\t<th>Loan Repayment</th>\n\t\t\t<th>Pension: Company Contribution</th>\n\t\t\t<th>Pension: Employee Deduction</th>\n\t\t\t<th>Provident: Company Contribution</th>\n\t\t\t<th>Provident: Employee Deduction</th>\n\t\t\t<!--\n\t\t\t<th>UIF: Company Contribution</th>\n\t\t\t<th>UIF: Employee Deduction</th>\n\t\t\t//-->\n\t\t\t<th>Retirement Annuity: Company Contribution</th>\n\t\t\t<th>Retirement Annuity: Employee Deduction</th>\n\t\t\t<th>Medical Contribution: Company</th>\n\t\t\t<th>Medical Contribution: Employee</th>\n\t\t\t<!--\n\t\t\t<th>Other: Company Contribution</th>\n\t\t\t<th>Other: Employee Deduction</th>\n\t\t\t//-->\n\t\t\t<th>Method of Payment</th>\n\t \t\t<th>Override PAYE</th>\n\t \t\t<th>Fringe Ben.</th>\n\t \t\t<th>Allowances</th>\n\t \t\t<th>Subsistence</th>\n\t \t\t<th>Deductions</th>\n\t \t\t<th>Reimbursements</th>\n\t\t</tr>"; db_conn('cubit'); $i = 0; $Sl = "SELECT * FROM employees WHERE div='" . USER_DIV . "' ORDER BY sname,fnames"; $Ri = db_exec($Sl) or errDie("Unable to get data."); $jsbonus_clear = array(); $uif_calc = array(); $jsbonus = array(1 => array(), 2 => array(), 3 => array(), 4 => array(), 5 => array(), 6 => array(), 7 => array(), 8 => array(), 9 => array(), 10 => array(), 11 => array(), 12 => array()); $js_workhours_fields = ""; $subs_int = false; // whether there are internation subsistence allowances $counter = 0; while ($data = pg_fetch_array($Ri)) { if ($counter == 8) { #show headings... $out .= "\n\t\t\t\t<tr>\n\t\t\t\t\t<th>Nr.</th>\n\t\t\t\t\t<th>Name</th>\n\t\t\t\t\t<th>Remuneration</th>"; if (!isset($d)) { $out .= "\n\t\t\t\t\t<th>Total Work Hours</th>\n\t\t\t\t\t<th>Actual Hours Worked</th>"; } $out .= "\n\t\t\t\t\t<th>Normal Overtime</th>\n\t\t\t\t\t<th>Public Holiday Overtime</th>\n\t\t\t\t\t<th>Annual Bonus</th>\n\t\t\t\t\t<!--\n\t\t\t\t\t<th>Special Bonus/Additional Salary</th>\n\t\t\t\t\t<th>Annual/Once Off Bonus</th>\n\t\t\t\t\t-->\n\t\t\t\t\t<th>Commission</th>\n\t\t\t\t\t<th>Travel Allowance</th>\n\t\t\t\t\t<th>Loan Repayment</th>\n\t\t\t\t\t<th>Pension: Company Contribution</th>\n\t\t\t\t\t<th>Pension: Employee Deduction</th>\n\t\t\t\t\t<th>Provident: Company Contribution</th>\n\t\t\t\t\t<th>Provident: Employee Deduction</th>\n\t\t\t\t\t<!--\n\t\t\t\t\t<th>UIF: Company Contribution</th>\n\t\t\t\t\t<th>UIF: Employee Deduction</th>\n\t\t\t\t\t//-->\n\t\t\t\t\t<th>Retirement Annuity: Company Contribution</th>\n\t\t\t\t\t<th>Retirement Annuity: Employee Deduction</th>\n\t\t\t\t\t<th>Medical Contribution: Company</th>\n\t\t\t\t\t<th>Medical Contribution: Employee</th>\n\t\t\t\t\t<!--\n\t\t\t\t\t<th>Other: Company Contribution</th>\n\t\t\t\t\t<th>Other: Employee Deduction</th>\n\t\t\t\t\t//-->\n\t\t\t\t\t<th>Method of Payment</th>\n\t\t\t \t\t<th>Override PAYE</th>\n\t\t\t \t\t<th>Fringe Ben.</th>\n\t\t\t \t\t<th>Allowances</th>\n\t\t\t \t\t<th>Subsistence</th>\n\t\t\t \t\t<th>Deductions</th>\n\t\t\t \t\t<th>Reimbursements</th>\n\t\t\t\t</tr>"; $counter = 0; } $counter++; if (!isset($emps[$data['empnum']])) { continue; } $bgcolor = bgcolorc($i); $send = ""; $grossal = $data["basic_sal"] + $data["commission"] + $data["all_travel"] / 2 + $data["bonus"]; if (isset($d)) { $send = "<input type='hidden' name='d' value=''>"; if ($data['payprd'] != "d") { continue; } } elseif (isset($w)) { $send = "<input type='hidden' name='w' value=''>"; if ($data['payprd'] != "w") { continue; } } elseif (isset($m)) { $send = "<input type='hidden' name='m' value=''>"; if ($data['payprd'] != "m") { continue; } } elseif (isset($b)) { $send = "<input type='hidden' name='b' value=''>"; if ($data['payprd'] != "f") { continue; } } else { continue; } /* set employee id */ $id = $data['empnum']; /* calculate basic salary divisors and multipliers * used for calculating deductions/allowances/etc. when the * salary type and payment period differs in length */ switch ($data["saltyp"]) { case "h": $divisor = 1; switch ($data["payprd"]) { case "d": $multiplier = $data["hpweek"] / 5; break; case "w": $multiplier = $data["hpweek"]; break; case "f": $multiplier = $data["hpweek"] * 2; break; case "m": $multiplier = $data["hpweek"] * 52 / 12; break; } break; case "m": $divisor = 1; switch ($data["payprd"]) { case "d": $multiplier = 12 / (5 * 52); break; case "w": $multiplier = 12 / 52; break; case "f": $multiplier = 12 / 26; break; case "m": $multiplier = 1; break; } break; case "w": $divisor = 52 / 12; switch ($data["payprd"]) { case "d": $multiplier = 1 / 5; break; case "w": $multiplier = 1; break; case "f": $multiplier = 2; break; case "m": $multiplier = 52 / 12; break; } break; case "f": $divisor = 26 / 12; switch ($data["payprd"]) { case "d": $multiplier = 1 / 10; break; case "w": $multiplier = 1 / 2; break; case "f": $multiplier = 1; break; case "m": $multiplier = 26 / 12; break; } break; } $bon_month = round($data["sal_bonus_month"]); $jsbonus_clear[] = "document.getElementById('salfrm').elements['bonus[{$id}]'].value='0.00';"; $jsbonus[$bon_month][] = "document.getElementById('salfrm').elements['bonus[{$id}]'].value = '{$data['sal_bonus']}';"; /* $uif_calc[] = " tmp_calc = parseFloat(document.getElementById('salfrm').elements['basic_sal[$id]'].value) + parseFloat(document.getElementById('salfrm').elements['annual[$id]'].value) + parseFloat(document.getElementById('salfrm').elements['all_travel[$id]'].value); tmp_calc_emp = tmp_calc * $data[emp_uif] / 100; tmp_calc_comp = tmp_calc * $data[comp_uif] / 100; tmp_calc_emp = tmp_calc_emp.toFixed(2); tmp_calc_comp = tmp_calc_comp.toFixed(2); document.getElementById('salfrm').elements['emp_uif[$id]'].value = tmp_calc_emp; document.getElementById('salfrm').elements['comp_uif[$id]'].value = tmp_calc_comp;";*/ $db = array("comp_pension" => $data["comp_pension"], "emp_pension" => $data["emp_pension"], "comp_provident" => $data["comp_provident"], "emp_provident" => $data["emp_provident"], "comp_uif" => $data["comp_uif"], "emp_uif" => $data["emp_uif"], "comp_other" => $data["comp_other"], "emp_other" => $data["emp_other"]); if (isset($basic_sal[$id])) { $data['basic_sal'] = $basic_sal[$id]; $data['bonus'] = $bonus[$id]; $data['commission'] = $commission[$id]; $date['abonus'] = $abonus[$id]; $data['all_travel'] = $all_travel[$id]; $data['loaninstall'] = $loaninstall[$id]; $data['comp_pension'] = $comp_pension[$id]; $data['emp_pension'] = $emp_pension[$id]; $data['comp_provident'] = $comp_provident[$id]; $data['emp_provident'] = $emp_provident[$id]; //$data['comp_uif']=$comp_uif[$id]; //$data['emp_uif']=$emp_uif[$id]; $data['comp_ret'] = $comp_ret[$id]; $data['emp_ret'] = $emp_ret[$id]; $data['comp_medical'] = $comp_medical[$id]; $data['emp_medical'] = $emp_medical[$id]; $data['comp_other'] = $comp_other[$id]; $data['emp_other'] = $emp_other[$id]; } else { if ($data["sal_bonus_month"] == $month) { $annual[$id] = sprint($data["sal_bonus"]); } else { $annual[$id] = "0.00"; } $novert[$id] = ""; $hovert[$id] = ""; $mpaye_amount[$id] = ""; if ($data["payprd"] == "w" || $data["payprd"] == "f") { $tmpmon = date("j"); $daycount = date("t"); $dayweek = date("D"); if (strtolower($dayweek) == $data["payprd_day"] && $date_day + 7 > $daycount) { $process_comp_deductions = true; } else { $process_comp_deductions = false; } } else { $process_comp_deductions = true; } //$data["emp_uif"] = sprint(($data["basic_sal"] + $data["all_travel"]) * ($data["emp_uif"]/100)); $effective_basicsal = $data["basic_sal"] * $multiplier; /* we only changing basic sal for non hourly employees, because for hourly employees we change the hours ($mutli) */ if ($data["saltyp"] != "h") { $data["basic_sal"] *= $multiplier; } if ($data["loaninstall"] > $data["loanamt"]) { $data["loaninstall"] = $data["loanamt"]; } $data["comp_pension"] = sprint($effective_basicsal * ($data["comp_pension"] / 100)); $data["comp_provident"] = sprint($effective_basicsal * ($data["comp_provident"] / 100)); $data["emp_pension"] = sprint($effective_basicsal * ($data["emp_pension"] / 100)); $data["emp_provident"] = sprint($effective_basicsal * ($data["emp_provident"] / 100)); $data["emp_medical"] = sprint($data["emp_medical"] / $divisor); $data["comp_medical"] = sprint($data["comp_medical"] / $divisor); $data["emp_ret"] = sprint($data["emp_ret"] / $divisor); $data["comp_ret"] = sprint($data["comp_ret"] / $divisor); $data["loaninstall"] = sprint($data["loaninstall"] / $divisor); $data["all_travel"] = sprint($data["all_travel"] / $divisor); explodeDate($data["loandate"], $loana_year, $loana_month, $loana_day); if ($loana_year > $salyr || $loana_year == $salyr && $loana_month > $month) { $data["loanint"] = 0; $data["loaninstall"] = 0; } } if ($data['paytype'] == "Cash") { $paydetails = "Cash\n\t\t\t<input type='hidden' name='accid[{$id}]' value='0'>"; } elseif ($data['paytype'] == "Ledger Account") { db_conn('core'); $Sl = "SELECT accid,accname FROM accounts ORDER BY accname"; $Rl = db_exec($Sl); $accounts = "<select name='account[{$id}]'>"; while ($ad = pg_fetch_array($Rl)) { if (isset($account[$id]) && $account[$id] == $ad['accid']) { $sel = "selected"; } else { $sel = ""; } $accounts .= "<option value='{$ad['accid']}' {$sel}>{$ad['accname']}</option>"; } $accounts .= "</select>"; $paydetails = "{$accounts}\n\t\t\t\t<input type='hidden' name='accid[{$id}]' value='0'>"; } else { db_conn('cubit'); $Sl = "SELECT * FROM bankacct WHERE btype != 'int' AND div = '" . USER_DIV . "' ORDER BY accname ASC"; $Ry = db_exec($Sl) or errDie("Unable to get bank account."); if (pg_numrows($Ry) < 1) { return "<li class='err'> There are no bank accounts found in Cubit.\n\t\t\t\t<p><input type='button' onClick='JavaScript:history.back();' value='« Correct Selection'>"; } $banks = "<select name='accid[{$id}]'>"; while ($acc = pg_fetch_array($Ry)) { $banks .= "<option value='{$acc['bankid']}'>{$acc['accname']} ({$acc['acctype']})</option>"; } $banks .= "</select>"; $paydetails = "{$banks}"; } # fringe benefits $i = 0; db_conn("cubit"); $sql = "SELECT * FROM fringebens WHERE div = '" . USER_DIV . "' ORDER BY fringeben"; $rslt = db_exec($sql) or errDie("Unable to select fringe benefits from database."); if (pg_num_rows($rslt) < 1) { $fringes = "<table " . TMPL_tblDflts . ">"; $fringes .= "<tr><td class='" . bg_class() . "' colspan='2' align='center'>None found in database.</td></tr>"; $fringes .= "</table>"; } else { $fringes = "<table " . TMPL_tblDflts . ">"; while ($myFringe = pg_fetch_array($rslt)) { # check if employee has allowance $sql = "SELECT * FROM empfringe WHERE fringeid='{$myFringe['id']}' AND empnum='{$data['empnum']}' AND div = '" . USER_DIV . "'"; $empRslt = db_exec($sql) or errDie("Unable to retrieve fringe benefit info from database."); if (pg_numrows($empRslt) > 0) { $empFringe = pg_fetch_array($empRslt); if (substr($empFringe["type"], 0, 4) == "Perc") { $empFringe["amount"] = sprint($data["basic_sal"] * ($empFringe["amount"] / 100) / $divisor); } else { $empFringe['amount'] = sprint($empFringe['amount'] / $divisor); } $grossal += $empFringe["amount"]; $tmp_fringeaccs = $empFringe["accid"]; $tmp_fringebens = $empFringe["amount"]; } else { $tmp_fringeaccs = "0"; $tmp_fringebens = "0.00"; } $fringes .= "\n\t\t\t\t\t<input type='hidden' name='fringeaccs[{$id}][]' value='{$tmp_fringeaccs}'>\n\t\t\t\t\t<input type='hidden' name='fringeid[{$id}][]' value='{$myFringe['id']}'>\n\t\t\t\t\t<input type='hidden' name='fringename[{$id}][]' value='{$myFringe['fringeben']}'>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td>{$myFringe['fringeben']}</td>\n\t\t\t\t\t\t<td>" . CUR . "</td>\n\t\t\t\t\t\t<td><input type='text' size='10' name='fringebens[{$id}][]' value='{$tmp_fringebens}'></td>\n\t\t\t\t\t</tr>"; $i++; } $fringes .= "</table>"; } # get allowances $i = 0; db_conn('cubit'); $sql = "SELECT * FROM allowances WHERE div = '" . USER_DIV . "' ORDER BY allowance"; $allowRslt = db_exec($sql) or errDie("Unable to select allowances from database."); if (pg_numrows($allowRslt) < 1) { $allowances = "<table " . TMPL_tblDflts . ">"; $allowances .= "<tr><td>None</td></tr>"; $allowances .= "</table>"; } else { $allowances = "<table " . TMPL_tblDflts . ">"; while ($myAllow = pg_fetch_array($allowRslt)) { # check if employee has allowance $sql = "SELECT * FROM empallow WHERE allowid='{$myAllow['id']}' AND empnum='{$data['empnum']}' AND div = '" . USER_DIV . "'"; $empAllowRslt = db_exec($sql) or errDie("Unable to select allowance info from database."); if (pg_numrows($empAllowRslt) > 0) { $dataAllow = pg_fetch_array($empAllowRslt); $dataAllow['amount'] = sprint($dataAllow['amount'] / $divisor); $grossal += $dataAllow["amount"]; $tmp_allowaccs = $dataAllow["accid"]; $tmp_allowances = $dataAllow["amount"]; } else { $tmp_allowaccs = $myAllow["accid"]; $tmp_allowances = "0.00"; } $allowances .= "\n\t\t\t\t\t<input type='hidden' name='allowid[{$id}][]' value='{$myAllow['id']}'>\n\t\t\t\t\t<input type='hidden' name='allowname[{$id}][]' value='{$myAllow['allowance']}'>\n\t\t\t\t\t<input type='hidden' name='allowtax[{$id}][]' value='{$myAllow['add']}'>\n\t\t\t\t\t<input type='hidden' name='allowaccs[{$id}][]' value='{$tmp_allowaccs}'>\n\t\t\t\t\t<tr><td>{$myAllow['allowance']}</td>\n\t\t\t\t\t\t<td>" . CUR . "</td>\n\t\t\t\t\t\t<td><input type='text' size='10' name='allowances[{$id}][]' value='{$tmp_allowances}'></td>\n\t\t\t\t\t</tr>"; $i++; } $allowances .= "</table>"; } $subsistence = ""; $subslst = new dbSelect("subsistence", "cubit", array("where" => "div='" . USER_DIV . "'", "order" => "name")); $subslst->run(); if ($subslst->num_rows() > 0) { $i = 0; $subsistence .= "\n\t\t\t\t<table " . TMPL_tblDflts . ">\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th>Name</th>\n\t\t\t\t\t\t<th>Amount</th>\n\t\t\t\t\t\t<th>Days</th>\n\t\t\t\t\t</tr>"; $empsubs = new dbSelect("emp_subsistence", "cubit"); while ($subs = $subslst->fetch_array()) { $sid = $subs["id"]; $empsubs->setOpt(array("where" => "empnum='{$data['empnum']}' AND subid='{$sid}'")); $empsubs->run(); if ($empsubs->num_rows() <= 0) { $si["amount"] = "0.00"; $si["days"] = "0"; $si["accid"] = $subs["accid"]; } else { $si = $empsubs->fetch_array(); } if ($subs["in_republic"] != "yes") { $subs_int = true; } $subsistence .= "\n\t\t\t\t\t<input type='hidden' name='subsname[{$id}][{$sid}]' value='{$subs['name']}'>\n\t\t\t\t\t<input type='hidden' name='subsacc[{$id}][{$sid}]' value='{$si['accid']}'>\n\t\t\t\t\t<input type='hidden' name='subsrep[{$id}][{$sid}]' value='{$subs['in_republic']}'>\n\t\t\t\t\t<input type='hidden' name='subsmeal[{$id}][{$sid}]' value='{$subs['meals']}'>\n\t\t\t\t\t<tr bgcolor='" . bgcolor($i) . "'>\n\t\t\t\t\t\t<td>{$subs['name']}</td>\n\t\t\t\t\t\t<td nowrap>" . CUR . " <input type='text' size='5' name='subsamt[{$id}][{$sid}]' value='{$si['amount']}'></td>\n\t\t\t\t\t\t<td><input type='text' size='2' name='subsdays[{$id}][{$sid}]' value='{$si['days']}'></td>\n\t\t\t\t\t</tr>"; } $subsistence .= "\n\t\t\t\t</table>"; } # Deductions $i = 0; db_conn('cubit'); $sql = "SELECT * FROM salded WHERE div = '" . USER_DIV . "' ORDER BY deduction"; $deductRslt = db_exec($sql) or errDie("Unable to select deductions from database."); if (pg_numrows($deductRslt) < 1) { $deductions = "<table " . TMPL_tblDflts . ">"; $deductions .= "<tr><td>None</td></tr>"; $deductions .= "</table>"; } else { $deductions = "<table " . TMPL_tblDflts . ">"; while ($myDeduct = pg_fetch_array($deductRslt)) { # check if employee has deduction $sql = "SELECT * FROM empdeduct WHERE dedid='{$myDeduct['id']}' AND empnum='{$data['empnum']}' AND div = '" . USER_DIV . "'"; $empDeductRslt = db_exec($sql) or errDie("Unable to select Deduction info from database."); if (pg_numrows($empDeductRslt) > 0) { $dataDeduct = pg_fetch_array($empDeductRslt); if ($dataDeduct["grosdeduct"] == "y") { $deductions_msg = "(Before PAYE)"; $sal_calcfrom = $grossal; } else { $deductions_msg = ""; $sal_calcfrom = $data["basic_sal"]; } if ($dataDeduct['type'] == "Amount") { $dataDeduct['amount'] = sprint($dataDeduct['amount'] / $divisor); } else { $dataDeduct['amount'] = sprint($sal_calcfrom * $dataDeduct['amount'] / 100 / $divisor); } // calculate employer contribution to deduction if ($dataDeduct["employer_type"] == "Amount") { $dataDeduct["employer_amount"] = sprint($dataDeduct["employer_amount"] / $divisor); } else { $dataDeduct["employer_amount"] = sprint($dataDeduct["amount"] * $dataDeduct["employer_amount"] / 100 / $divisor); } $tmp_deductions = $dataDeduct["amount"]; $tmp_dedaccs = $dataDeduct["accid"]; $tmp_emp_ded = $dataDeduct["employer_amount"]; } else { $tmp_deductions = "0.00"; $tmp_emp_ded = "0.00"; $tmp_dedaccs = $myDeduct["accid"] != 0 ? $myDeduct["accid"] : $myDeduct["expaccid"]; $deductions_msg = ""; } # check if we should be using deductions if ($data['emp_usescales'] == "1" and $myDeduct['type'] == "Percentage") { # check if this deduction has scales $get_scales = "SELECT * FROM salded_scales WHERE saldedid = '{$myDeduct['id']}' LIMIT 1"; $run_scales = db_exec($get_scales) or errDie("Unable to get deduction scale information."); if (pg_numrows($run_scales) > 0) { # scales exist $get_perc = "\n\t\t\t\t\t\t\tSELECT * FROM salded_scales \n\t\t\t\t\t\t\tWHERE scale_from <= '{$data['basic_sal']}' AND scale_to >= '{$data['basic_sal']}' AND saldedid = '{$myDeduct['id']}' \n\t\t\t\t\t\t\tLIMIT 1"; $run_perc = db_exec($get_perc) or errDie("Unable to get deduction scale information."); if (pg_numrows($run_perc) > 0) { # found a matching scale for this scaled duduction for a customer using scales .... $scale_arr = pg_fetch_array($run_perc); $tmp_deductions = sprint($data['basic_sal'] / 100 * $scale_arr['scale_amount']); } } } $deductions .= "\n\t\t\t\t\t<input type='hidden' size='10' name='deductid[{$id}][]' value='{$myDeduct['id']}'>\n\t\t\t\t\t<input type='hidden' size='30' name='deductname[{$id}][]' value='{$myDeduct['deduction']}'>\n\t\t\t\t\t<input type='hidden' size='10' name='deducttax[{$id}][]' value='{$myDeduct['add']}'>\n\t\t\t\t\t<input type='hidden' name='dedaccs[{$id}][]' value='{$tmp_dedaccs}'>\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td>{$myDeduct['deduction']} {$deductions_msg}</td>\n\t\t\t\t\t\t<td>" . CUR . "</td>\n\t\t\t\t\t\t<td><input type='text' size='10' name='deductions[{$id}][]' value='{$tmp_deductions}'></td>\n\t\t\t\t\t\t<td>" . CUR . "</td>\n\t\t\t\t\t\t<td><input type='hidden' size='10' name='employer_deductions[{$id}][]' value='{$tmp_emp_ded}'></td>\n\t\t\t\t\t</tr>"; $i++; } $deductions .= "</table>"; } $rt = ""; db_conn('cubit'); $Sl = "SELECT * FROM rbs ORDER BY name"; $Rl = db_exec($Sl) or errDie("Unable to get data."); $i = 0; if (pg_num_rows($Rl) > 0) { $rt = "<table " . TMPL_tblDflts . ">"; while ($td = pg_fetch_array($Rl)) { if (!isset($rbsa[$id][$td['id']])) { $rbsa[$id][$td['id']] = ""; } $rt .= "\n\t\t\t\t\t<tr>\n\t\t\t\t\t\t<td><input type='hidden' name='rbs[{$id}][{$td['id']}]' value='{$td['id']}'>{$td['name']}</td>\n\t\t\t\t\t\t<td>" . CUR . "</td>\n\t\t\t\t\t\t<td><input type='text' size='10' name='rbsa[{$id}][{$td['id']}]' value='" . $rbsa[$id][$td['id']] . "' class='right'></td>\n\t\t\t\t\t</tr>"; $i++; } $rt .= "</table>"; } else { $rt .= "None"; } $salarr = array("m" => "Per Month", "w" => "Per Week", "f" => "Fortnightly", "h" => "Per Hour"); $salnarr = array("d" => "Day(s)", "h" => "Hour(s)"); $saltype = $salarr[$data['saltyp']]; if (!isset($multi[$id])) { $multi[$id] = $data["saltyp"] == "h" ? $multiplier : 1; } $multi[$id] = round($multi[$id]); if ($data['saltyp'] == 'd' || $data['saltyp'] == 'h') { $salntype = $salnarr[$data['saltyp']]; $multi_show = "x <input type='text' size='3' name='multi[{$id}]' value='{$multi[$id]}'> {$salntype}"; } else { $multi_show = "<input type='hidden' name='multi[{$id}]' value='{$multi[$id]}'>"; $saltype = ""; } if (isset($mpaye[$id])) { $ch = "checked=yes"; } else { $ch = ""; } if ($data["payprd"] == "m" || $data["payprd"] == "d") { // count the amount of weekdays in this month $workdays = 0; for ($i = 1; $i <= date("t", mktime(0, 0, 0, $month, 1, date("Y"))); ++$i) { $wd = date("w", mktime(0, 0, 0, $month, $i, date("Y"))); if ($wd != 0 && $wd != 6) { ++$workdays; } } // hours per day calculation $hpd = $data["hpweek"] / 5; if (!isset($wh_total[$id])) { $wh_total[$id] = $workdays * $hpd; } if (!isset($wh_actual[$id])) { $wh_actual[$id] = $wh_total[$id]; } } if ($data["payprd"] == "w") { if (!isset($wh_total[$id])) { $wh_total[$id] = $data["hpweek"]; } if (!isset($wh_actual[$id])) { $wh_actual[$id] = $wh_total[$id]; } } if ($data["payprd"] == "f") { if (!isset($wh_total[$id])) { $wh_total[$id] = $data["hpweek"] * 2; } if (!isset($wh_actual[$id])) { $wh_actual[$id] = $wh_total[$id]; } } $js_workhours_fields .= "\n\t\t\t<script>\n\t\t\t\tf_sal[{$id}]\t\t= sf.elements['basic_sal[{$id}]'];\n\t\t\t\tf_salbonus[{$id}] = sf.elements['sal_bonus[{$id}]'];\n\t\t\t\tf_whtot[{$id}]\t= sf.elements['wh_total[{$id}]'];\n\t\t\t\tf_whact[{$id}]\t= sf.elements['wh_actual[{$id}]'];\n\t\t\t\tf_cpension[{$id}]\t= sf.elements['comp_pension[{$id}]'];\n\t\t\t\tf_epension[{$id}] = sf.elements['emp_pension[{$id}]'];\n\t\t\t\tf_cprov[{$id}]\t= sf.elements['comp_provident[{$id}]'];\n\t\t\t\tf_eprov[{$id}]\t= sf.elements['emp_provident[{$id}]'];\n\t\t\t\t//f_cuif[{$id}]\t\t= sf.elements['comp_uif[{$id}]'];\n\t\t\t\t//f_euif[{$id}]\t\t= sf.elements['emp_uif[{$id}]'];\n\t\t\t\tf_cother[{$id}]\t= sf.elements['comp_other[{$id}]'];\n\t\t\t\tf_eother[{$id}]\t= sf.elements['emp_other[{$id}]'];\n\n\t\t\t\tdb_cpension[{$id}]\t= " . $db["comp_pension"] . ";\n\t\t\t\tdb_epension[{$id}]\t= " . $db["emp_pension"] . ";\n\t\t\t\tdb_cprov[{$id}]\t\t= " . $db["comp_provident"] . ";\n\t\t\t\tdb_eprov[{$id}]\t\t= " . $db["emp_provident"] . ";\n\t\t\t\t//db_cuif[{$id}]\t\t= " . $db["comp_uif"] . ";\n\t\t\t\t//db_euif[{$id}]\t\t= " . $db["emp_uif"] . ";\n\t\t\t\tdb_cother[{$id}]\t= " . $db["comp_other"] . ";\n\t\t\t\tdb_eother[{$id}]\t= " . $db["emp_other"] . ";\n\n\t\t\t\tval_sal[{$id}] = -1;\n\t\t\t</script>"; vsprint($data["basic_sal"]); $out .= "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<input type='hidden' name='emps[{$id}]' value='{$id}'>\n\t\t\t\t<input type='hidden' name='saltyp[{$id}]' value='{$data['saltyp']}'>\n\t\t\t\t<input type='hidden' name='process_comp_deductions[{$id}]' value='{$process_comp_deductions}'>\n\t\t\t\t<input type='hidden' name='divisor[{$id}]' value='{$divisor}'>\n\t\t\t\t<td nowrap>{$data['enum']}</td>\n\t\t\t\t<td>{$data['sname']}, {$data['fnames']}</td>\n\t\t\t\t<td nowrap><input type='text' size='8' name='basic_sal[{$id}]' value='{$data['basic_sal']}' class='right' onChange='changedfield({$id});'>{$saltype} {$multi_show}</td>"; if (isset($d)) { $out .= "\n\t\t\t\t<input type='hidden' name='wh_total' value='1'>\n\t\t\t\t<input type='hidden' name='wh_actual' value='1'>"; } else { $out .= "\n\t\t\t\t<td nowrap><input type='text' size='10' name='wh_total[{$id}]' value='{$wh_total[$id]}' class='right' onChange='workhours({$id});'></td>\n\t\t\t\t<td nowrap><input type='text' size='10' name='wh_actual[{$id}]' value='{$wh_actual[$id]}' class='right' onChange='workhours({$id});'></td>"; } if (!isset($abonus[$id])) { $abonus = 0; } $out .= "\n\t\t\t\t<td nowrap><input type='text' size='5' name='novert[{$id}]' value='{$novert[$id]}' class='right'> Hrs</td>\n\t\t\t\t<td nowrap><input type='text' size='5' name='hovert[{$id}]' value='{$hovert[$id]}' class='right'> Hrs</td>\n\t\t\t\t<td nowrap><input type='hidden' size='8' name='bonus[{$id}]' value='0' class='right'><input type='text' size='8' name='abonus[{$id}]' value='{$abonus[$id]}' class='right'></td>\n\t\t\t\t<input type='hidden' name='annual[{$id}]' value='0' />\n\t\t\t\t<!--<td nowrap><input type='text' size='8' name='annual[{$id}]' value='{$annual[$id]}' class='right'></td>-->\n\t\t\t\t<td nowrap><input type='text' size='8' name='commission[{$id}]' value='{$data['commission']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='all_travel[{$id}]' value='{$data['all_travel']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='loaninstall[{$id}]' value='{$data['loaninstall']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='comp_pension[{$id}]' value='{$data['comp_pension']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='emp_pension[{$id}]' value='{$data['emp_pension']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='comp_provident[{$id}]' value='{$data['comp_provident']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='emp_provident[{$id}]' value='{$data['emp_provident']}' class='right'></td>\n\t\t\t\t<!--\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='comp_uif[{$id}]' value='{$data['comp_uif']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='emp_uif[{$id}]' value='{$data['emp_uif']}' class='right'></td>\n\t\t\t\t//-->\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='comp_ret[{$id}]' value='{$data['comp_ret']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='emp_ret[{$id}]' value='{$data['emp_ret']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='comp_medical[{$id}]' value='{$data['comp_medical']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='emp_medical[{$id}]' value='{$data['emp_medical']}' class='right'></td>\n\t\t\t\t<input type=hidden name='comp_other[{$id}]' value='0'>\n\t\t\t\t<input type=hidden name='emp_other[{$id}]' value='0'>\n\t\t\t\t<!--\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='comp_other[{$id}]' value='{$data['comp_other']}' class='right'></td>\n\t\t\t\t<td nowrap>R<input type='text' size='8' name='emp_other[{$id}]' value='{$data['emp_other']}' class='right'></td>\n\t\t\t\t//-->\n\t\t\t\t<td>{$paydetails}</td>\n\t\t\t\t<td>\n\t\t\t\t\t<table>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t<td><input type='checkbox' name='mpaye[{$id}]' {$ch}></td>\n\t\t\t\t\t\t\t<td><input type='text' size='8' name='mpaye_amount[{$id}]' value='{$mpaye_amount[$id]}'></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t</table>\n\t\t\t\t</td>\n\t\t\t\t<td>{$fringes}</td>\n\t\t\t\t<td>{$allowances}</td>\n\t\t\t\t<td>{$subsistence}<!--%%EXCHANGE%%--></td>\n\t\t\t\t<td>{$deductions}</td>\n\t\t\t\t<td>{$rt}</td>\n\t\t\t</tr>"; } if (!isset($id)) { header("Location: ../admin-employee-view.php?err=Please select at least one employee."); exit; } // replace the exchange rate place holder with the exchange rate form field if ($subs_int) { $exch = "\n\t\t\t<input type='hidden' name='subs_exch' value='1'>\n\t\t\t<li class='err'>Please calculate the rand amount prior to completing the amount above.</li>"; // <tr class='".bg_class()."'> // <th class='".bg_class()."'>Exchange (ZAR-USD):</th> // <td><input type='text' name='subs_exch' value='".xrate_get("USD")."'></td> // </tr>"; $out = str_replace("<!--%%EXCHANGE%%-->", $exch, $out); } $out .= "\n\t\t\t<tr><td><br></td></tr>\n\t\t\t{$send}\n\t\t\t<tr>\n\t\t\t\t<td colspan='9' align='right' nowrap='t'>\n\t\t\t\t\t<input type='submit' name='btn_back' value='« Correction'>\n\t\t\t\t\t<input type='submit' value='Confirm »'>\n\t\t\t\t</td>\n\t\t\t\t<td colspan='10' align='right' nowrap='t'>\n\t\t\t\t\t<input type='submit' name='btn_back' value='« Correction'>\n\t\t\t\t\t<input type='submit' value='Confirm »'>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>\n\t\t<script>\n\t\t\tfunction monthchange(mondd) {\n\t\t\t\t" . implode("\n", $jsbonus_clear) . "\n\t\t\t\tswitch ( mondd.value ) {\n\t\t\t\tcase '1':\n\t\t\t\t\t" . implode("\n", $jsbonus[1]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '2':\n\t\t\t\t\t" . implode("\n", $jsbonus[2]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '3':\n\t\t\t\t\t" . implode("\n", $jsbonus[3]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '4':\n\t\t\t\t\t" . implode("\n", $jsbonus[4]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '5':\n\t\t\t\t\t" . implode("\n", $jsbonus[5]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '6':\n\t\t\t\t\t" . implode("\n", $jsbonus[6]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '7':\n\t\t\t\t\t" . implode("\n", $jsbonus[7]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '8':\n\t\t\t\t\t" . implode("\n", $jsbonus[8]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '9':\n\t\t\t\t\t" . implode("\n", $jsbonus[9]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '10':\n\t\t\t\t\t" . implode("\n", $jsbonus[10]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '11':\n\t\t\t\t\t" . implode("\n", $jsbonus[11]) . "\n\t\t\t\t\tbreak;\n\t\t\t\tcase '12':\n\t\t\t\t\t" . implode("\n", $jsbonus[12]) . "\n\t\t\t\t\tbreak;\n\t\t\t\t}"; //".implode("\n", $uif_calc)." $out .= "\n\t\t\t}\n\t\t</script>\n\t\t<script>\n\t\t\tsf = document.getElementById('salfrm');\n\t\t\tf_sal = new Array();\n\t\t\tf_salbonus = new Array();\n\t\t\tf_whtot = new Array();\n\t\t\tf_whact = new Array();\n\t\t\tf_cpension = new Array();\n\t\t\tf_epension = new Array();\n\t\t\tf_cprov = new Array();\n\t\t\tf_eprov = new Array();\n\t\t\t//f_cuif = new Array();\n\t\t\t//f_euif = new Array();\n\t\t\tf_cother = new Array();\n\t\t\tf_eother = new Array();\n\n\t\t\tdb_cpension = new Array();\n\t\t\tdb_epension = new Array();\n\t\t\tdb_cprov = new Array();\n\t\t\tdb_eprov = new Array();\n\t\t\t//db_cuif = new Array();\n\t\t\t//db_euif = new Array();\n\t\t\tdb_cother = new Array();\n\t\t\tdb_eother = new Array();\n\n\t\t\tval_sal = new Array();\n\t\t</script>\n \t\t{$js_workhours_fields}\n\t\t<script>\n\t\t\t// changing the workhours\n\t\t\tfunction workhours(id) {\n\t\t\t\tif ( val_sal[id] < 0 ) val_sal[id] = parseFloat(f_sal[id].value);\n\n\t\t\t\tval_whtot\t= parseFloat(f_whtot[id].value);\n\t\t\t\tval_whact\t= parseFloat(f_whact[id].value);\n\n\t\t\t\tif ( val_whtot >= val_whact ) {\n\t\t\t\t\tp = val_whact / val_whtot;\n\n\t\t\t\t\t// calculate the new basic salary\n\t\t\t\t\tx = val_sal[id] * p;\n\t\t\t\t\tx = x.toFixed(2);\n\t\t\t\t\tf_sal[id].value = x;\n\n\t\t\t\t\t// calculate the new values\n\t\t\t\t\tval_cpension \t= x * db_cpension[id] / 100;\n\t\t\t\t\tval_epension \t= x * db_epension[id] / 100;\n\t\t\t\t\tval_cprov\t\t= x * db_cprov[id] / 100;\n\t\t\t\t\tval_eprov\t\t= x * db_eprov[id] / 100;\n\t\t\t\t\t//val_cuif\t\t= x * db_cuif[id] / 100;\n\t\t\t\t\t//val_euif\t\t= x * db_euif[id] / 100;\n\t\t\t\t\tval_cother\t\t= x * db_cother[id] / 100;\n\t\t\t\t\tval_eother\t\t= x * db_eother[id] / 100;\n\n\t\t\t\t\tval_cpension \t= val_cpension.toFixed(2);\n\t\t\t\t\tval_epension \t= val_epension.toFixed(2);\n\t\t\t\t\tval_cprov \t\t= val_cprov.toFixed(2);\n\t\t\t\t\tval_eprov\t\t= val_eprov.toFixed(2);\n\t\t\t\t\t//val_cuif\t\t= val_cuif.toFixed(2);\n\t\t\t\t\t//val_euif\t\t= val_euif.toFixed(2);\n\t\t\t\t\tval_cother\t\t= val_cother.toFixed(2);\n\t\t\t\t\tval_eother\t\t= val_eother.toFixed(2);\n\n\t\t\t\t\tf_cpension[id].value\t= val_cpension;\n\t\t\t\t\tf_epension[id].value \t= val_epension;\n\t\t\t\t\tf_cprov[id].value \t\t= val_cprov;\n\t\t\t\t\tf_eprov[id].value\t\t= val_eprov;\n\t\t\t\t\t//f_cuif[id].value\t\t= val_cuif;\n\t\t\t\t\t//f_euif[id].value\t\t= val_euif;\n\t\t\t\t\tf_cother[id].value\t\t= val_cother;\n\t\t\t\t\tf_eother[id].value\t\t= val_eother;\n\t\t\t\t}\n\t\t\t}\n\n\t\t\tfunction changedfield(id) {\n\t\t\t\tval_whtot\t= parseFloat(f_whtot[id].value);\n\t\t\t\tval_whact\t= parseFloat(f_whact[id].value);\n\n\t\t\t\tp = val_whtot / val_whact;\n\n\t\t\t\tval_sal[id] = parseFloat(f_sal[id].value) * p;\n\t\t\t\tval_sal[id] = val_sal[id].toFixed(2);\n\t\t\t}\n\n\t\t\tmonthchange(document.getElementById('salfrm').elements['month']);\n\t\t</script>"; return $out; }
function slctPrd($err = "") { extract($_REQUEST); # validate input require_lib("validate"); $v = new validate(); $v->isOk($empnum, "num", 1, 20, "Invalid employee number."); $v->isOk($MON, "num", 1, 2, "Invalid month."); # display errors, if any if ($v->isError()) { $confirmCust = ""; $errors = $v->getErrors(); foreach ($errors as $e) { $confirmCust .= "<li class='err'>" . $e["msg"] . "</li>"; } $confirmCust .= "<p><input type='button' onClick='JavaScript:history.back();' value='« Correct submission'>"; return $confirmCust; } db_conn('cubit'); $sql = "SELECT * FROM employees WHERE empnum='{$empnum}' AND div = '" . USER_DIV . "'"; $empRslt = db_exec($sql) or errDie("Unable to select employees from database."); if (pg_numrows($empRslt) < 1) { return "Invalid employee ID."; } $myEmp = pg_fetch_array($empRslt); if ($myEmp['payprd'] == "w") { $weeks = "<select name='week'>"; $stdate = mktime(0, 0, 0, $MON, 1, DATE_YEAR); $endate = mktime(0, 0, 0, $MON, DATE_DAYS, DATE_YEAR); $i = 1; while ($stdate <= $endate) { if (date("w", $stdate) == 5) { if (isset($week) && $week == $i) { $sel = "selected='t'"; } else { $sel = ""; } $weeks .= "<option {$sel} value='{$i}'>Week {$i} (" . date("j M", $stdate) . ")</option>"; ++$i; } /* next day */ $stdate += 24 * 60 * 60; } /*<option value='1'>Week 1</option> <option value='2'>Week 2</option> <option value='3'>Week 3</option> <option value='4'>Week 4</option> <option value='5'>Week 5</option>*/ $weeks .= "</select>"; $row = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Period</td>\n\t\t\t\t<td>{$weeks}</td>\n\t\t\t</tr>"; } elseif ($myEmp['payprd'] == "f") { $weeks = "<select name='week'>"; $i = 1; /* find first friday of tax year */ $stdate = mktime(0, 0, 0, 3, 1, getYearOfEmpMon(3)); while (date("w", $stdate) != 5) { $stdate = mktime(0, 0, 0, 3, ++$i, getYearOfEmpMon(3)); } // hack: go one week back so the +14 increases are easier $stdate -= 7 * 24 * 3600; /* end on the last day of the selected month */ $endate = mktime(0, 0, 0, $MON + 1, 0, getYearOfEmpMon($MON)); /* count weeks from start of tax year */ $i = 1; $c = 0; while ($stdate <= $endate) { if (date("m", $stdate) == $MON && date("Y", $stdate) == getYearOfEmpMon($MON)) { $c += 2; $cd = $c - 1 . "-{$c}"; $weekends .= "<input type='hidden' name='weekends[{$i}]' value='" . date("j", $stdate) . "' />"; if (isset($week) && $week == $i) { $sel = "selected"; } else { $sel = ""; } $weeks .= "<option {$sel} value='{$i}'>Week {$cd} (" . date("j M", $stdate) . ")</option>"; ++$i; } /* next day */ $stdate += 24 * 60 * 60 * 14; } /*<option value='1'>Week 1</option> <option value='2'>Week 2</option> <option value='3'>Week 3</option> <option value='4'>Week 4</option> <option value='5'>Week 5</option>*/ $weeks .= "</select>"; $row = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Period</td>\n\t\t\t\t<td>{$weeks}</td>\n\t\t\t</tr>"; } else { if ($myEmp["payprd"] == "d") { $x = date("t", mktime(0, 0, 0, $MON, 1, getYearOfFinMon($MON))); $MONstr = getMonthNameS($MON); if (!isset($pday)) { $pday = $proc_day; } $days = "<select name='pday'>"; for ($i = 1; $i <= $x; ++$i) { if (isset($pday) && $i == $pday) { $sel = "selected='t'"; } else { $sel = ""; } $days .= "<option {$sel} value='{$i}'>{$i} {$MONstr}</option>"; } $days .= "</select>"; $row = "\n\t\t\t<tr class='" . bg_class() . "'>\n\t\t\t\t<td>Day for Payment</td>\n\t\t\t\t<td>{$days}</td>\n\t\t\t</tr>"; } else { if (isset($back) || !empty($err)) { return slctEmployee($err); } else { return process($_REQUEST); } } } $OUT = "\n\t\t<h3>Reverse Employee Salary</h3>\n\t\t{$err}\n\t\t<form method='POST' action='" . SELF . "'>\n\t\t\t<input type='hidden' name='key' value='process' />\n\t\t\t<input type='hidden' name='MON' value='{$MON}' />\n\t\t\t<input type='hidden' name='empnum' value='{$empnum}' />\n\t\t\t<input type='hidden' name='date_day' value='{$date_day}' />\n\t\t\t<input type='hidden' name='date_month' value='{$date_month}' />\n\t\t\t<input type='hidden' name='date_year' value='{$date_year}' />\n\t\t<table " . TMPL_tblDflts . ">\n\t\t\t<tr>\n\t\t\t\t<th colspan='2'>Select Period</th>\n\t\t\t</tr>\n\t\t\t{$row}\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='right'>\n\t\t\t\t\t<input type='submit' name='btn_correction' value='« Correction' />\n\t\t\t\t\t<input type='submit' value='Next' />\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form>"; return $OUT; }