function print_list_of_journal_entries()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$systype = $_REQUEST['PARAM_2'];
$comments = $_REQUEST['PARAM_3'];
$dec = user_price_dec();
$cols = array(0, 100, 240, 300, 400, 460, 520, 580);
$headers = array(tr('Type/Account'), tr('Account Name'), tr('Date/Dim.'), tr('Person/Item/Memo'), tr('Debit'), tr('Credit'));
$aligns = array('left', 'left', 'left', 'left', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Type'), 'from' => systypes::name($systype), 'to' => ''));
$rep = new FrontReport(tr('List of Journal Entries'), "JournalEntries.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->Header();
if ($systype == -1) {
$systype = null;
}
$trans = get_gl_transactions($from, $to, -1, null, 0, $systype);
$typeno = 0;
while ($myrow = db_fetch($trans)) {
if ($typeno != $myrow['type_no']) {
if ($typeno != 0) {
$rep->Line($rep->row + 4);
$rep->NewLine();
}
$typeno = $myrow['type_no'];
$TransName = systypes::name($myrow['type']);
$rep->TextCol(0, 2, $TransName . " # " . $myrow['type_no']);
$rep->TextCol(2, 3, sql2date($myrow['tran_date']));
$coms = payment_person_types::person_name($myrow["person_type_id"], $myrow["person_id"]);
$memo = get_comments_string($myrow['type'], $myrow['type_no']);
if ($memo != '') {
$coms .= $coms != "" ? "/" : "" . $memo;
}
$rep->TextCol(3, 6, $coms);
$rep->NewLine(2);
}
$rep->TextCol(0, 1, $myrow['account']);
$rep->TextCol(1, 2, $myrow['account_name']);
$dim_str = get_dimension_string($myrow['dimension_id']);
$dim_str2 = get_dimension_string($myrow['dimension2_id']);
if ($dim_str2 != "") {
$dim_str .= "/" . $dim_str2;
}
$rep->TextCol(2, 3, $dim_str);
$rep->TextCol(3, 4, $myrow['memo_']);
if ($myrow['amount'] > 0.0) {
$rep->TextCol(4, 5, number_format2(abs($myrow['amount']), $dec));
} else {
$rep->TextCol(5, 6, number_format2(abs($myrow['amount']), $dec));
}
$rep->NewLine(1, 2);
}
$rep->Line($rep->row + 4);
$rep->End();
}
function print_purchases_cost()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$destination = $_POST['PARAM_2'];
$orientation = $_POST['PARAM_3'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$dec = user_price_dec();
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
$cols = array(0, 20, 55, 85, 125, 200, 230, 260, 290, 325, 350, 375, 425, 475);
//14 headers + 1 lagi dapat for cols
//todo: format date paid to 2 digits representation only i.e. 12/12/12
$headers = array(_('CV#'), _('Date Paid'), _('OR #'), _('Supplier'), _('Title of Book'), _('Quantity'), _('Unit Cost'), _('Amount'), _('With Tax'), _('Net'), _('PO #'), _('Stock Supplied'), _('Stock Amount'), _('Total Amount'));
//todo: Date Paid, OR(official receipt number) Amount, w/tax, net, Stock supplied, stock amount and total amount
// Possible tables to read on: grn_batch and grn_items
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left');
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Category'), 'from' => $cat, 'to' => ''));
$rep = new FrontReport(_('Summary of Purchases at Cost Report'), "SummaryPurchasesCostReport", user_pagesize(), 8, 'L');
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($from, $to);
$total = $grandtotal = 0.0;
$total1 = $grandtotal1 = 0.0;
$total2 = $grandtotal2 = 0.0;
$catt = '';
while ($trans = db_fetch($res)) {
$rep->NewLine();
$rep->fontSize -= 2;
$rep->TextCol(3, 4, $trans['supp_name']);
$rep->TextCol(4, 5, $trans['description']);
$rep->AmountCol(5, 6, $trans['quantity_ordered']);
$rep->AmountCol(6, 7, $trans['unit_price']);
$rep->AmountCol(10, 11, $trans['order_no']);
}
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine(2, 1);
$rep->TextCol(0, 4, _('Grand Total'));
$rep->AmountCol(4, 5, $grandtotal, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_Chart_of_Accounts()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$showbalance = $_REQUEST['PARAM_0'];
$comments = $_REQUEST['PARAM_1'];
$dec = 0;
$cols = array(0, 50, 300, 425, 500);
$headers = array(tr('Account'), tr('Account Name'), tr('Account Code'), tr('Balance'));
$aligns = array('left', 'left', 'left', 'right');
$params = array(0 => $comments);
$rep = new FrontReport(tr('Chart of Accounts'), "ChartOfAccounts.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->Header();
$classname = '';
$group = '';
$accounts = get_gl_accounts_all();
while ($account = db_fetch($accounts)) {
if ($showbalance == 1) {
$begin = begin_fiscalyear();
if (is_account_balancesheet($account["account_code"])) {
$begin = "";
}
$balance = get_gl_trans_from_to($begin, ToDay(), $account["account_code"], 0);
}
if ($account['AccountTypeName'] != $group) {
if ($classname != '') {
$rep->row -= 4;
}
if ($account['AccountClassName'] != $classname) {
$rep->Font('bold');
$rep->TextCol(0, 4, $account['AccountClassName']);
$rep->Font();
$rep->row -= $rep->lineHeight + 4;
}
$group = $account['AccountTypeName'];
$rep->TextCol(0, 4, $account['AccountTypeName']);
//$rep->Line($rep->row - 4);
$rep->row -= $rep->lineHeight + 4;
}
$classname = $account['AccountClassName'];
$rep->TextCol(0, 1, $account['account_code']);
$rep->TextCol(1, 2, $account['account_name']);
$rep->TextCol(2, 3, $account['account_code2']);
if ($showbalance == 1) {
$rep->TextCol(3, 4, number_format2($balance, $dec));
}
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + 3 * $rep->lineHeight) {
$rep->Line($rep->row - 2);
$rep->Header();
}
}
$rep->Line($rep->row);
$rep->End();
}
function print_summary()
{
global $path_to_root;
$imc = $_POST['PARAM_0'];
$comments = $_POST['PARAM_1'];
$orientation = $_POST['PARAM_2'];
$destination = $_POST['PARAM_3'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(0, 10, 100, 150, 200, 250, 300, 350, 400, 450, 520);
//$headers = array(_('IMC'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left');
//$params = array( 0 => $comments, 1 => array( 'text' => _('Period'), 'from' => $from));
$aligns2 = $aligns;
$summary = 1;
$rep = new FrontReport(_('Client List'), "ClientList", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$cols2 = $cols;
$rep->Font();
$rep->Info(null, $cols, null, $aligns);
$rep->NewPage();
$salesman = 0;
$result = getList($imc);
while ($myrow = db_fetch($result)) {
$previous == '';
$salesman = get_salesman_name($myrow['salesman']);
$current = $salesman;
if ($salesman != "") {
if ($previous == $current) {
$salesman = '';
$rep->TextCol(1, 10, $myrow['br_name']);
$rep->NewLine();
} else {
$rep->Font('bold');
$rep->NewLine(2);
$rep->Line($rep->row + 10);
$rep->TextCol(0, 2, $salesman);
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->Font();
$rep->TextCol(1, 10, $myrow['br_name']);
$rep->NewLine();
}
$previous = $current;
}
}
$rep->NewLine();
$rep->End();
}
function print_bill_of_material()
{
global $path_to_root;
$frompart = $_POST['PARAM_0'];
$topart = $_POST['PARAM_1'];
$comments = $_POST['PARAM_2'];
$orientation = $_POST['PARAM_3'];
$destination = $_POST['PARAM_4'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$cols = array(0, 50, 305, 375, 445, 515);
$headers = array(_('Component'), _('Description'), _('Loc'), _('Wrk Ctr'), _('Quantity'));
$aligns = array('left', 'left', 'left', 'left', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Component'), 'from' => $frompart, 'to' => $topart));
$rep = new FrontReport(_('Bill of Material Listing'), "BillOfMaterial", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($frompart, $topart);
$parent = '';
while ($trans = db_fetch($res)) {
if ($parent != $trans['parent']) {
if ($parent != '') {
$rep->Line($rep->row - 2);
$rep->NewLine(2, 3);
}
$rep->TextCol(0, 1, $trans['parent']);
$desc = get_item($trans['parent']);
$rep->TextCol(1, 2, $desc['description']);
$parent = $trans['parent'];
$rep->NewLine();
}
$rep->NewLine();
$dec = get_qty_dec($trans['component']);
$rep->TextCol(0, 1, $trans['component']);
$rep->TextCol(1, 2, $trans['CompDescription']);
//$rep->TextCol(2, 3, $trans['loc_code']);
//$rep->TextCol(3, 4, $trans['workcentre_added']);
$wc = get_work_centre($trans['workcentre_added']);
$rep->TextCol(2, 3, get_location_name($trans['loc_code']));
$rep->TextCol(3, 4, $wc['name']);
$rep->AmountCol(4, 5, $trans['quantity'], $dec);
}
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_assets_list()
{
global $path_to_root;
$frompart = $_POST['PARAM_0'];
$topart = $_POST['PARAM_1'];
$comments = $_POST['PARAM_2'];
$destination = $_POST['PARAM_3'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$cols = array(0, 50, 305, 375, 445, 515);
$headers = array(_('Asset Type'), _('Asset name'), _('Serial Number'), _('Purchase Date'), _('Purchase Value'));
$aligns = array('left', 'left', 'left', 'left', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Component'), 'from' => $frompart, 'to' => $topart));
$rep = new FrontReport(_('Assets Listing'), "AssetList", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($frompart, $topart);
$parent = '';
while ($trans = db_fetch($res)) {
if ($parent != $trans['asset_type_name']) {
if ($parent != '') {
$rep->Line($rep->row - 2);
$rep->NewLine(2, 3);
}
$rep->TextCol(0, 2, $trans['asset_type_name']);
$desc = get_item($trans['asset_type_name']);
$parent = $trans['asset_type_name'];
$rep->NewLine();
}
$rep->NewLine();
$dec = get_qty_dec($trans['asset_id']);
$rep->TextCol(0, 1, $trans['asset_type_name']);
$rep->TextCol(1, 2, $trans['asset_name']);
$rep->TextCol(2, 3, $trans['asset_serial']);
$rep->TextCol(3, 4, $trans['purchase_date']);
$rep->AmountCol(4, 5, $trans['purchase_value'], $dec);
}
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_royalty_sales()
{
$item_id = $_POST['PARAM_0'];
global $path_to_root, $systypes_array;
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$result = fetchRoyalty($item_id);
$name = "";
while ($book = db_fetch($result)) {
$name = $book[1];
}
$params = array(0 => $comments, 1 => array('text' => _('Item'), 'from' => $name));
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(0, 150, 250, 350, 450);
$headers = array(_('Name'), _('ID #'), _('Date'), _('Quantity'), _('Status'));
$aligns = array('left', 'left', 'left', 'left', 'left');
$usr = get_user($user);
$user_id = $usr['user_id'];
$rep = new FrontReport(_('Royalty Sales'), "RoyaltySales", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->SetHeaderType('Header');
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$rep->TextCol(0, 1, $item_id);
$rep->TextCol(2, 4, fetchTitle($item_id));
$rep->NewLine();
$rep->NewLine();
$result = fetchRoyalty($item_id);
while ($myrow = db_fetch($result)) {
$rep->TextCol(0, 1, $myrow[0]);
$rep->TextCol(1, 2, ' ' . $myrow[1]);
$rep->TextCol(2, 3, $myrow[2]);
$rep->TextCol(3, 4, $myrow[3]);
$rep->TextCol(4, 5, 'Closed');
$rep->NewLine();
}
$result1 = fetchCreditMemo($item_id);
while ($myrow1 = db_fetch($result1)) {
if ($myrow1[3] > 0) {
$rep->TextCol(0, 1, $myrow1[0]);
$rep->TextCol(1, 2, ' ' . $myrow1[1]);
$rep->TextCol(2, 3, $myrow1[2]);
$rep->TextCol(3, 4, '- ' . $myrow1[3]);
$rep->TextCol(4, 5, 'Closed');
$rep->NewLine();
}
}
$rep->Line($rep->row + 4);
$rep->End();
}
function print_audit_trail()
{
global $path_to_root, $systypes_array;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$systype = $_POST['PARAM_2'];
$user = $_POST['PARAM_3'];
$comments = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
$destination = $_POST['PARAM_6'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(0, 60, 120, 180, 240, 340, 400, 460, 520);
$headers = array(_('Date'), _('Time'), _('User'), _('Trans Date'), _('Type'), _('#'), _('Action'), _('Amount'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'left', 'right');
$usr = get_user($user);
$user_id = $usr['user_id'];
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Type'), 'from' => $systype != -1 ? $systypes_array[$systype] : _('All'), 'to' => ''), 3 => array('text' => _('User'), 'from' => $user != -1 ? $user_id : _('All'), 'to' => ''));
$rep = new FrontReport(_('Audit Trail'), "AuditTrail", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$trans = getTransactions($from, $to, $systype, $user);
while ($myrow = db_fetch($trans)) {
$rep->TextCol(0, 1, sql2date(date("Y-m-d", $myrow['unix_stamp'])));
if (user_date_format() == 0) {
$rep->TextCol(1, 2, date("h:i:s a", $myrow['unix_stamp']));
} else {
$rep->TextCol(1, 2, date("H:i:s", $myrow['unix_stamp']));
}
$rep->TextCol(2, 3, $myrow['user_id']);
$rep->TextCol(3, 4, sql2date($myrow['gl_date']));
$rep->TextCol(4, 5, $systypes_array[$myrow['type']]);
$rep->TextCol(5, 6, $myrow['trans_no']);
if ($myrow['gl_seq'] == null) {
$action = _('Changed');
} else {
$action = _('Closed');
}
$rep->TextCol(6, 7, $action);
if ($myrow['amount'] != null) {
$rep->AmountCol(7, 8, $myrow['amount'], $dec);
}
$rep->NewLine(1, 2);
}
$rep->Line($rep->row + 4);
$rep->End();
}
function print_bill_of_material()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$frompart = $_REQUEST['PARAM_0'];
$topart = $_REQUEST['PARAM_1'];
$comments = $_REQUEST['PARAM_2'];
$dec = user_qty_dec();
$cols = array(0, 50, 305, 375, 445, 515);
$headers = array(tr('Component'), tr('Description'), tr('Loc'), tr('Wrk Ctr'), tr('Quantity'));
$aligns = array('left', 'left', 'left', 'left', 'right');
$params = array(0 => $comments, 1 => array('text' => tr('Component'), 'from' => $frompart, 'to' => $topart));
$rep = new FrontReport(tr('Bill of Material Listing'), "BillOfMaterial.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->Header();
$res = getTransactions($frompart, $topart);
$parent = '';
while ($trans = db_fetch($res)) {
if ($parent != $trans['parent']) {
if ($parent != '') {
$rep->Line($rep->row - 2);
$rep->NewLine(2, 3);
}
$rep->TextCol(0, 1, $trans['parent']);
$desc = get_item($trans['parent']);
$rep->TextCol(1, 2, $desc['description']);
$parent = $trans['parent'];
$rep->NewLine();
}
$rep->NewLine();
$rep->TextCol(0, 1, $trans['component']);
$rep->TextCol(1, 2, $trans['CompDescription']);
$rep->TextCol(2, 3, $trans['loc_code']);
$rep->TextCol(3, 4, $trans['workcentre_added']);
$rep->TextCol(4, 5, number_format2($trans['quantity'], $dec));
}
$rep->Line($rep->row - 4);
$rep->End();
}
function print_dimension_summary()
{
global $path_to_root;
$fromdim = $_POST['PARAM_0'];
$todim = $_POST['PARAM_1'];
$showbal = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$cols = array(0, 50, 210, 250, 320, 395, 465, 515);
$headers = array(_('Reference'), _('Name'), _('Type'), _('Date'), _('Due Date'), _('Closed'), _('YTD'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Dimension'), 'from' => get_dimension_string($fromdim), 'to' => get_dimension_string($todim)));
$rep = new FrontReport(_('Dimension Summary'), "DimensionSummary", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($fromdim, $todim);
while ($trans = db_fetch($res)) {
$rep->TextCol(0, 1, $trans['reference']);
$rep->TextCol(1, 2, $trans['name']);
$rep->TextCol(2, 3, $trans['type_']);
$rep->DateCol(3, 4, $trans['date_'], true);
$rep->DateCol(4, 5, $trans['due_date'], true);
if ($trans['closed']) {
$str = _('Yes');
} else {
$str = _('No');
}
$rep->TextCol(5, 6, $str);
if ($showbal) {
$balance = getYTD($trans['id']);
$rep->AmountCol(6, 7, $balance, 0);
}
$rep->NewLine(1, 2);
}
$rep->Line($rep->row);
$rep->End();
}
function print_dimension_summary()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$fromdim = $_REQUEST['PARAM_0'];
$todim = $_REQUEST['PARAM_1'];
$showbal = $_REQUEST['PARAM_2'];
$comments = $_REQUEST['PARAM_3'];
$cols = array(0, 50, 210, 250, 320, 395, 465, 515);
$headers = array(tr('Reference'), tr('Name'), tr('Type'), tr('Date'), tr('Due Date'), tr('Closed'), tr('YTD'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'right');
$params = array(0 => $comments, 1 => array('text' => tr('Dimension'), 'from' => $fromdim, 'to' => $todim));
$rep = new FrontReport(tr('Dimension Summary'), "DimensionSummary.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->Header();
$res = getTransactions($fromdim, $todim);
while ($trans = db_fetch($res)) {
$rep->TextCol(0, 1, $trans['reference']);
$rep->TextCol(1, 2, $trans['name']);
$rep->TextCol(2, 3, $trans['type_']);
$rep->TextCol(3, 4, $trans['date_']);
$rep->TextCol(4, 5, $trans['due_date']);
if ($trans['closed']) {
$str = tr('Yes');
} else {
$str = tr('No');
}
$rep->TextCol(5, 6, $str);
if ($showbal) {
$balance = getYTD($trans['id']);
$rep->TextCol(6, 7, number_format2($balance, 0));
}
$rep->NewLine(1, 2);
}
$rep->Line($rep->row);
$rep->End();
}
function print_inventory_planning()
{
global $path_to_root;
$category = $_POST['PARAM_0'];
$location = $_POST['PARAM_1'];
$comments = $_POST['PARAM_2'];
$orientation = $_POST['PARAM_3'];
$destination = $_POST['PARAM_4'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
if ($location == ALL_TEXT) {
$location = 'all';
}
if ($location == 'all') {
$loc = _('All');
} else {
$loc = get_location_name($location);
}
$cols = array(0, 50, 150, 180, 210, 240, 270, 300, 330, 390, 435, 480, 525);
$per0 = strftime('%b', mktime(0, 0, 0, date('m'), 1, date('Y')));
$per1 = strftime('%b', mktime(0, 0, 0, date('m') - 1, 1, date('Y')));
$per2 = strftime('%b', mktime(0, 0, 0, date('m') - 2, 1, date('Y')));
$per3 = strftime('%b', mktime(0, 0, 0, date('m') - 3, 1, date('Y')));
$per4 = strftime('%b', mktime(0, 0, 0, date('m') - 4, 1, date('Y')));
$headers = array(_('Category'), '', $per4, $per3, $per2, $per1, $per0, '3*M', _('QOH'), _('Cust Ord'), _('Supp Ord'), _('Sugg Ord'));
$aligns = array('left', 'left', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Category'), 'from' => $cat, 'to' => ''), 2 => array('text' => _('Location'), 'from' => $loc, 'to' => ''));
$rep = new FrontReport(_('Inventory Planning Report'), "InventoryPlanning", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($category, $location);
$catt = '';
while ($trans = db_fetch($res)) {
if ($catt != $trans['cat_description']) {
if ($catt != '') {
$rep->Line($rep->row - 2);
$rep->NewLine(2, 3);
}
$rep->TextCol(0, 1, $trans['category_id']);
$rep->TextCol(1, 2, $trans['cat_description']);
$catt = $trans['cat_description'];
$rep->NewLine();
}
if ($location == 'all') {
$loc_code = "";
} else {
$loc_code = $location;
}
$custqty = get_demand_qty($trans['stock_id'], $loc_code);
$custqty += get_demand_asm_qty($trans['stock_id'], $loc_code);
$suppqty = get_on_porder_qty($trans['stock_id'], $loc_code);
$suppqty += get_on_worder_qty($trans['stock_id'], $loc_code);
$period = getPeriods($trans['stock_id'], $trans['loc_code']);
$rep->NewLine();
$dec = get_qty_dec($trans['stock_id']);
$rep->TextCol(0, 1, $trans['stock_id']);
$rep->TextCol(1, 2, $trans['description'] . ($trans['inactive'] == 1 ? " (" . _("Inactive") . ")" : ""), -1);
$rep->AmountCol(2, 3, $period['prd0'], $dec);
$rep->AmountCol(3, 4, $period['prd1'], $dec);
$rep->AmountCol(4, 5, $period['prd2'], $dec);
$rep->AmountCol(5, 6, $period['prd3'], $dec);
$rep->AmountCol(6, 7, $period['prd4'], $dec);
$MaxMthSales = Max($period['prd0'], $period['prd1'], $period['prd2'], $period['prd3']);
$IdealStockHolding = $MaxMthSales * 3;
$rep->AmountCol(7, 8, $IdealStockHolding, $dec);
$rep->AmountCol(8, 9, $trans['qty_on_hand'], $dec);
$rep->AmountCol(9, 10, $custqty, $dec);
$rep->AmountCol(10, 11, $suppqty, $dec);
$SuggestedTopUpOrder = $IdealStockHolding - $trans['qty_on_hand'] + $custqty - $suppqty;
if ($SuggestedTopUpOrder < 0.0) {
$SuggestedTopUpOrder = 0.0;
}
$rep->AmountCol(11, 12, $SuggestedTopUpOrder, $dec);
}
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_inventory_planning()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$category = $_REQUEST['PARAM_0'];
$location = $_REQUEST['PARAM_1'];
$comments = $_REQUEST['PARAM_2'];
$dec = user_qty_dec();
if ($category == reserved_words::get_all_numeric()) {
$category = 0;
}
if ($category == 0) {
$cat = tr('All');
} else {
$cat = get_category_name($category);
}
if ($location == reserved_words::get_all()) {
$location = 'all';
}
if ($location == 'all') {
$loc = tr('All');
} else {
$loc = $location;
}
$cols = array(0, 50, 150, 180, 210, 240, 270, 300, 330, 390, 435, 480, 525);
$per0 = strftime('%b', mktime(0, 0, 0, date('m'), date('d'), date('Y')));
$per1 = strftime('%b', mktime(0, 0, 0, date('m') - 1, date('d'), date('Y')));
$per2 = strftime('%b', mktime(0, 0, 0, date('m') - 2, date('d'), date('Y')));
$per3 = strftime('%b', mktime(0, 0, 0, date('m') - 3, date('d'), date('Y')));
$per4 = strftime('%b', mktime(0, 0, 0, date('m') - 4, date('d'), date('Y')));
$headers = array(tr('Category'), '', $per4, $per3, $per2, $per1, $per0, '3*M', tr('QOH'), tr('Cust Ord'), tr('Supp Ord'), tr('Sugg Ord'));
$aligns = array('left', 'left', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => tr('Category'), 'from' => $cat, 'to' => ''), 2 => array('text' => tr('Location'), 'from' => $loc, 'to' => ''));
$rep = new FrontReport(tr('Inventory Planning Report'), "InventoryPlanning.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->Header();
$res = getTransactions($category, $location);
$catt = '';
while ($trans = db_fetch($res)) {
if ($catt != $trans['cat_description']) {
if ($catt != '') {
$rep->Line($rep->row - 2);
$rep->NewLine(2, 3);
}
$rep->TextCol(0, 1, $trans['category_id']);
$rep->TextCol(1, 2, $trans['cat_description']);
$catt = $trans['cat_description'];
$rep->NewLine();
}
$custqty = getCustQty($trans['stock_id'], $trans['loc_code']);
$custqty += getCustAsmQty($trans['stock_id'], $trans['loc_code']);
$suppqty = getSuppQty($trans['stock_id'], $trans['loc_code']);
$period = getPeriods($trans['stock_id'], $trans['loc_code']);
$rep->NewLine();
$rep->TextCol(0, 1, $trans['stock_id']);
$rep->TextCol(1, 2, $trans['description']);
$rep->TextCol(2, 3, number_format2($period['prd0'], $dec));
$rep->TextCol(3, 4, number_format2($period['prd1'], $dec));
$rep->TextCol(4, 5, number_format2($period['prd2'], $dec));
$rep->TextCol(5, 6, number_format2($period['prd3'], $dec));
$rep->TextCol(6, 7, number_format2($period['prd4'], $dec));
$MaxMthSales = Max($period['prd0'], $period['prd1'], $period['prd2'], $period['prd3']);
$IdealStockHolding = $MaxMthSales * 3;
$rep->TextCol(7, 8, number_format2($IdealStockHolding, $dec));
$rep->TextCol(8, 9, number_format2($trans['qty_on_hand'], $dec));
$rep->TextCol(9, 10, number_format2($custqty, $dec));
$rep->TextCol(10, 11, number_format2($suppqty, $dec));
$SuggestedTopUpOrder = $IdealStockHolding - $trans['qty_on_hand'] + $custqty - $suppqty;
if ($SuggestedTopUpOrder < 0.0) {
$SuggestedTopUpOrder = 0.0;
}
$rep->TextCol(11, 12, number_format2($SuggestedTopUpOrder, $dec));
}
$rep->Line($rep->row - 4);
$rep->End();
}
function print_salesman_list()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$summary = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
if ($summary == 0) {
$sum = _("No");
} else {
$sum = _("Yes");
}
$dec = user_price_dec();
$cols = array(0, 60, 150, 220, 325, 385, 450, 515);
$headers = array(_('Invoice'), _('Customer'), _('Branch'), _('Customer Ref'), _('Inv Date'), _('Total'), _('Provision'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'right', 'right');
$headers2 = array(_('Salesman'), " ", _('Phone'), _('Email'), _('Provision'), _('Break Pt.'), _('Provision') . " 2");
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Summary Only'), 'from' => $sum, 'to' => ''));
$aligns2 = $aligns;
$rep = new FrontReport(_('Salesman Listing'), "SalesmanListing", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$cols2 = $cols;
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
$rep->NewPage();
$salesman = 0;
$subtotal = $total = $subprov = $provtotal = 0;
$result = GetSalesmanTrans($from, $to);
while ($myrow = db_fetch($result)) {
$rep->NewLine(0, 2, false, $salesman);
if ($salesman != $myrow['salesman_code']) {
if ($salesman != 0) {
$rep->Line($rep->row - 8);
$rep->NewLine(2);
$rep->TextCol(0, 3, _('Total'));
$rep->AmountCol(5, 6, $subtotal, $dec);
$rep->AmountCol(6, 7, $subprov, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine(2);
}
$rep->TextCol(0, 2, $myrow['salesman_code'] . " " . $myrow['salesman_name']);
$rep->TextCol(2, 3, $myrow['salesman_phone']);
$rep->TextCol(3, 4, $myrow['salesman_email']);
$rep->TextCol(4, 5, number_format2($myrow['provision'], user_percent_dec()) . " %");
$rep->AmountCol(5, 6, $myrow['break_pt'], $dec);
$rep->TextCol(6, 7, number_format2($myrow['provision2'], user_percent_dec()) . " %");
$rep->NewLine(2);
$salesman = $myrow['salesman_code'];
$total += $subtotal;
$provtotal += $subprov;
$subtotal = 0;
$subprov = 0;
}
$rate = $myrow['rate'];
$amt = $myrow['InvoiceTotal'] * $rate;
if ($subprov > $myrow['break_pt'] && $myrow['provision2'] != 0) {
$prov = $myrow['provision2'] * $amt / 100;
} else {
$prov = $myrow['provision'] * $amt / 100;
}
if (!$summary) {
$rep->TextCol(0, 1, $myrow['trans_no']);
$rep->TextCol(1, 2, $myrow['DebtorName']);
$rep->TextCol(2, 3, $myrow['br_name']);
$rep->TextCol(3, 4, $myrow['contact_name']);
$rep->DateCol(4, 5, $myrow['tran_date'], true);
$rep->AmountCol(5, 6, $amt, $dec);
$rep->AmountCol(6, 7, $prov, $dec);
$rep->NewLine();
}
$subtotal += $amt;
$subprov += $prov;
}
if ($salesman != 0) {
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->TextCol(0, 3, _('Total'));
$rep->AmountCol(5, 6, $subtotal, $dec);
$rep->AmountCol(6, 7, $subprov, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$total += $subtotal;
$provtotal += $subprov;
}
$rep->fontSize += 2;
$rep->TextCol(0, 3, _('Grand Total'));
$rep->fontSize -= 2;
$rep->AmountCol(5, 6, $total, $dec);
$rep->AmountCol(6, 7, $provtotal, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_invoices()
{
global $path_to_root, $alternative_tax_include_on_docs, $suppress_tax_rates, $no_zero_lines_amount;
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$currency = $_POST['PARAM_2'];
$email = $_POST['PARAM_3'];
$pay_service = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$customer = $_POST['PARAM_6'];
$orientation = $_POST['PARAM_7'];
if (!$from || !$to) {
return;
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$fno = explode("-", $from);
$tno = explode("-", $to);
$from = min($fno[0], $tno[0]);
$to = max($fno[0], $tno[0]);
$cols = array(4, 40, 60, 100, 200, 250, 300, 320, 400, 450);
// $headers in doctext.inc
$aligns = array('left', 'left', 'left', 'left', 'right', 'right', 'right', 'right', 'right', 'right', 'right');
//$params = array('comments' => $comments);
$cur = get_company_Pref('curr_default');
if ($email == 0) {
$rep = new FrontReport(_('INVOICE'), "InvoiceBulk", user_pagesize(), 9, $orientation);
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
for ($i = $from; $i <= $to; $i++) {
if (!exists_customer_trans(ST_SALESINVOICE, $i)) {
continue;
}
$sign = 1;
$myrow = get_customer_trans($i, ST_SALESINVOICE);
if ($customer && $myrow['debtor_no'] != $customer) {
continue;
}
$baccount = get_default_bank_account($myrow['curr_code']);
$params['bankaccount'] = $baccount['id'];
$branch = get_branch($myrow["branch_code"]);
$sales_order = get_sales_order_header($myrow["order_"], ST_SALESORDER);
if ($email == 1) {
$rep = new FrontReport("", "", user_pagesize(), 9, $orientation);
//$rep->title = _('INVOICE');
$rep->filename = "Invoice" . $myrow['reference'] . ".pdf";
}
$rep->SetHeaderType(0);
$rep->currency = $cur;
$rep->Font();
$rep->Info($null, $cols, null, $aligns);
//$contacts = get_branch_contacts($branch['branch_code'], 'invoice', $branch['debtor_no'], true);
//$baccount['payment_service'] = $pay_service;
$salesman = get_imc_code($branch['branch_code']);
$pay_term = get_payment_terms($myrow['payment_terms']);
$rep->NewPage();
$result = get_customer_trans_details(ST_SALESINVOICE, $i);
$SubTotal = 0;
$rep->NewLine(12);
$rep->TextCol(2, 7, _("Customer Name : " . $branch['br_name']));
$rep->TextCol(8, 9, _("Discount : "));
$rep->NewLine();
$rep->TextCol(2, 5, _("Customer Code : " . $branch['branch_ref']));
$rep->TextCol(7, 9, _("IMC Code : " . $salesman));
$rep->NewLine();
$rep->TextCol(2, 5, _("Contact Person : "));
$rep->TextCol(7, 9, _("Terms : " . $pay_term['terms']));
$rep->NewLine();
$rep->TextCol(2, 5, _("Address : " . $branch['br_address']));
$rep->NewLine(5);
$rep->Font('bold');
$rep->Line($rep->row + 10);
$rep->TextCol(2, 5, _("Item Description"));
$rep->TextCol(5, 6, _("Quantity"));
$rep->TextCol(7, 8, _("Unit Price"));
$rep->TextCol(9, 10, _("Total Amount"));
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->Font();
while ($myrow2 = db_fetch($result)) {
if ($myrow2["quantity"] == 0) {
continue;
}
$Net = round2($sign * ((1 - $myrow2["discount_percent"]) * $myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$Net2 = round2($sign * ($myrow2["unit_price"] * $myrow2["quantity"]), user_price_dec());
$SubTotal += $Net;
$DisplayPrice = number_format2($myrow2["unit_price"], $dec);
$DisplayQty = number_format2($sign * $myrow2["quantity"], get_qty_dec($myrow2['stock_id']));
$DisplayNet = number_format2($Net, $dec);
$dNet = number_format2($Net2, $dec);
/*if ($myrow2["discount_percent"]==0)
$DisplayDiscount ="";
else
$DisplayDiscount = number_format2($myrow2["discount_percent"]*100,user_percent_dec()) . "%";*/
if ($myrow["ov_discount"] == 0) {
$DisplayDiscount = "";
} else {
$DisplayDiscount = number_format2($myrow["ov_discount"] / $myrow["ov_amount"] * 100, user_percent_dec()) . "%";
}
$rep->TextCol(0, 2, $myrow2['stock_id'], -2);
$oldrow = $rep->row;
$rep->TextColLines(2, 4, $myrow2['StockDescription'], -2);
$newrow = $rep->row;
$rep->row = $oldrow;
if ($Net != 0.0 || !is_service($myrow2['mb_flag']) || !isset($no_zero_lines_amount) || $no_zero_lines_amount == 0) {
$rep->TextCol(5, 6, $DisplayQty . " " . $myrow2['units']);
//$rep->TextCol(5, 6, $myrow2['units'], -2);
$rep->TextCol(7, 8, $DisplayPrice, -2);
//$rep->TextCol(5, 6, $DisplayDiscount, -2);
$rep->TextCol(8, 10, $dNet, -2);
}
$rep->row = $newrow;
//$rep->NewLine(1);
if ($rep->row < $rep->bottomMargin + 15 * $rep->lineHeight) {
$rep->NewPage();
}
}
$memo = get_comments_string(ST_SALESINVOICE, $i);
if ($memo != "") {
$rep->NewLine();
$rep->TextColLines(1, 5, $memo, -2);
}
$DisplayNet = number_format2($SubTotal - $myrow["ov_discount"], $dec);
$DisplaySubTot = number_format2($SubTotal, $dec);
$DisplayFreight = number_format2($sign * $myrow["ov_freight"], $dec);
$rep->row = $rep->bottomMargin + 15 * $rep->lineHeight;
$doctype = ST_SALESINVOICE;
$rep->NewLine();
$rep->Font('bold');
$rep->TextCol(8, 9, _("Shipping : "), -2);
$rep->TextCol(9, 10, $DisplayFreight, -2);
$rep->NewLine();
$rep->TextCol(8, 9, _("Less : "));
$rep->TextCol(9, 10, $DisplayDiscount, -2);
$rep->NewLine();
$rep->TextCol(8, 9, _("Net Amount : "), -2);
$rep->TextCol(9, 10, $DisplayNet, -2);
$rep->NewLine();
/*$tax_items = get_trans_tax_details(ST_SALESINVOICE, $i);
$first = true;
while ($tax_item = db_fetch($tax_items))
{
if ($tax_item['amount'] == 0)
continue;
$DisplayTax = number_format2($sign*$tax_item['amount'], $dec);
if (isset($suppress_tax_rates) && $suppress_tax_rates == 1)
$tax_type_name = $tax_item['tax_type_name'];
else
$tax_type_name = $tax_item['tax_type_name']." (".$tax_item['rate']."%) ";
if ($tax_item['included_in_price'])
{
if (isset($alternative_tax_include_on_docs) && $alternative_tax_include_on_docs == 1)
{
if ($first)
{
$rep->TextCol(3, 6, _("Total Tax Excluded"), -2);
$rep->TextCol(6, 7, number_format2($sign*$tax_item['net_amount'], $dec), -2);
$rep->NewLine();
}
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
$first = false;
}
else
$rep->TextCol(3, 7, _("Included") . " " . $tax_type_name . _("Amount") . ": " . $DisplayTax, -2);
}
else
{
$rep->TextCol(3, 6, $tax_type_name, -2);
$rep->TextCol(6, 7, $DisplayTax, -2);
}
$rep->NewLine();
}
$rep->NewLine();
$DisplayTotal = number_format2($sign*($myrow["ov_freight"] + $myrow["ov_gst"] +
$myrow["ov_amount"]+$myrow["ov_freight_tax"]),$dec);*/
//$rep->Font('bold');
//$rep->TextCol(3, 6, _("TOTAL INVOICE"), - 2);
//$rep->TextCol(6, 7, $DisplayTotal, -2);
//$words = price_in_words($myrow['Total'], ST_SALESINVOICE);
//if ($words != "")
//{
// $rep->NewLine(1);
// $rep->TextCol(1, 7, $myrow['curr_code'] . ": " . $words, - 2);
//}
//$rep->Font();
if ($email == 1) {
$rep->End($email);
}
}
if ($email == 0) {
$rep->End();
}
}
function print_sales_summary_report()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$tax_id = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($tax_id == 0) {
$tid = _('No');
} else {
$tid = _('Yes');
}
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$rep = new FrontReport(_('Sales Summary Report'), "SalesSummaryReport", user_pagesize(), 9, $orientation);
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Tax Id Only'), 'from' => $tid, 'to' => ''));
$cols = array(0, 130, 180, 270, 350, 400, 500);
$headers = array(_('Customer'), _('Total ex. Tax'), _('Tax'), _('Total'), _('Balance'), _('Due'));
$aligns = array('left', 'left', 'right', 'right', 'right', 'right');
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$totalnet = 0.0;
$totaltax = 0.0;
$transactions = getTaxTransactions($from, $to, $tax_id);
$rep->TextCol(0, 4, _('Balances in Home Currency'));
$rep->NewLine(2);
$custno = 0;
$tax = $total = 0;
$custname = $tax_id = "";
while ($trans = db_fetch($transactions)) {
$customer_record = get_customer_details($custno);
$customer_crm = getPhone($custno);
if ($custno != $trans['debtor_no']) {
if ($custno != 0) {
$rep->TextCol(0, 1, $custname);
//$rep->TextCol(1, 2, $tax_id);
$rep->TextCol(1, 2, $custno, $dec);
$rep->TextCol(2, 3, $trans['debtor_no'], $dec);
$rep->TextCol(3, 4, $customer_crm['phone'], $dec);
$rep->AmountCol(4, 5, $tax + $total, $dec);
$rep->AmountCol(5, 6, $customer_record["Balance"], $dec);
$totalnet += $total;
$totaltax += $tax;
$total = $tax = 0;
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + $rep->lineHeight) {
$rep->Line($rep->row - 2);
$rep->NewPage();
}
}
$custno = $trans['debtor_no'];
$custname = $trans['cust_name'];
$tax_id = $trans['tax_id'];
}
$taxes = getTaxes($trans['type'], $trans['trans_no']);
if ($taxes != null) {
if ($taxes['included_in_price']) {
$trans['total'] -= $taxes['tax'];
}
$tax += $taxes['tax'];
}
$total += $trans['total'];
}
if ($custno != 0) {
$customer_record = get_customer_details($custno);
$rep->TextCol(0, 1, $custname);
//$rep->TextCol(1, 2, $tax_id);
$rep->AmountCol(1, 2, $total, $dec);
$rep->AmountCol(2, 3, $tax, $dec);
$rep->AmountCol(3, 4, $tax + $total, $dec);
$rep->AmountCol(4, 5, $customer_record["Balance"], $dec);
$rep->AmountCol(5, 6, $customer_record["Due"], $dec);
$totalnet += $total;
$totaltax += $tax;
$rep->NewLine();
}
$rep->Font('bold');
$rep->NewLine();
$rep->Line($rep->row + $rep->lineHeight);
$rep->TextCol(0, 1, _("Total"));
$rep->AmountCol(1, 2, $totalnet, $dec);
$rep->AmountCol(2, 3, $totaltax, $dec);
$rep->AmountCol(3, 4, $totaltax + $totalnet, $dec);
$rep->Line($rep->row - 5);
$rep->Font();
$rep->End();
}
function print_purchases_cost()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$destination = $_POST['PARAM_1'];
$orientation = $_POST['PARAM_2'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$dec = user_price_dec();
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
$cols = array(0, 50, 100, 150, 200, 250, 300, 350);
$headers = array(_('Invoice'), _('Client Name'), _('IMC'), _('Charge'), _('Sales'), _('Date of'));
//$header2 = array(_('Date'), '', '', _('Invoice'), _('Amount'), _('Credit Memo'), _('Memo No.'), _(' Return'), _('%'), _('%'), _('Sales'), _('Provisional Receipt'), _('Receipt No.'), _('Payment'), _('Remittance'), _('Commission'), _('Percentage'), '', _('W/holding Tax'), _('Commission'));
$aligns = array('left', 'left', 'left', 'left');
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Category'), 'from' => $cat, 'to' => ''));
$rep = new FrontReport(_('Summary of Purchases at Cost Report'), "SummaryPurchasesCostReport", user_pagesize(), 8, 'L');
$rep->Font();
$rep->Info($params, $cols, $header2, $aligns);
$rep->NewPage();
$res = getTransactions($category, $from, $to);
$total = $grandtotal = 0.0;
$total1 = $grandtotal1 = 0.0;
$total2 = $grandtotal2 = 0.0;
$catt = '';
while ($trans = db_fetch($res)) {
if ($catt != $trans['cat_description']) {
if ($catt != '') {
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine();
$total = $total1 = $total2 = 0.0;
}
$rep->TextCol(0, 1, $trans['category_id']);
$rep->TextCol(1, 7, $trans['cat_description']);
$catt = $trans['cat_description'];
$rep->NewLine();
}
$rep->NewLine();
$rep->fontSize -= 2;
$rep->TextCol(0, 1, $trans['stock_id']);
$rep->TextCol(1, 2, $trans['description']);
$rep->AmountCol(2, 3, $trans['quantity'], get_qty_dec($trans['stock_id']));
$rep->AmountCol(3, 4, $trans['unit_price'], $dec);
$rep->AmountCol(4, 5, $trans['quantity'] * $trans['unit_price'], $dec);
if ($trans['unit_price'] == 0) {
$rep->TextCol(6, 7, _('Gift'));
}
$rep->fontSize += 2;
$total += $trans['quantity'] * $trans['unit_price'];
$grandtotal += $trans['quantity'] * $trans['unit_price'];
}
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine(2, 1);
$rep->TextCol(0, 4, _('Grand Total'));
$rep->AmountCol(4, 5, $grandtotal, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_GL_transactions()
{
global $path_to_root, $systypes_array;
$dim = get_company_pref('use_dimension');
$dimension = $dimension2 = 0;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$fromacc = $_POST['PARAM_2'];
$toacc = $_POST['PARAM_3'];
if ($dim == 2) {
$dimension = $_POST['PARAM_4'];
$dimension2 = $_POST['PARAM_5'];
$comments = $_POST['PARAM_6'];
$orientation = $_POST['PARAM_7'];
$destination = $_POST['PARAM_8'];
} else {
if ($dim == 1) {
$dimension = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
$destination = $_POST['PARAM_7'];
} else {
$comments = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
$destination = $_POST['PARAM_6'];
}
}
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$rep = new FrontReport(_('GL Account Transactions'), "GLAccountTransactions", user_pagesize(), 9, $orientation);
$dec = 2;
//$cols = array(0, 80, 100, 150, 210, 280, 340, 400, 450, 510, 570);
$cols = array(0, 65, 105, 125, 175, 230, 290, 345, 405, 465, 525);
//------------0--1---2---3----4----5----6----7----8----9----10-------
//-----------------------dim1-dim2-----------------------------------
//-----------------------dim1----------------------------------------
//-------------------------------------------------------------------
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'left', 'right', 'right', 'right');
if ($dim == 2) {
$headers = array(_('Type'), _('Ref'), _('#'), _('Date'), _('Dimension') . " 1", _('Dimension') . " 2", _('Person/Item'), _('Debit'), _('Credit'), _('Balance'));
} elseif ($dim == 1) {
$headers = array(_('Type'), _('Ref'), _('#'), _('Date'), _('Dimension'), "", _('Person/Item'), _('Debit'), _('Credit'), _('Balance'));
} else {
$headers = array(_('Type'), _('Ref'), _('#'), _('Date'), "", "", _('Person/Item'), _('Debit'), _('Credit'), _('Balance'));
}
if ($dim == 2) {
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Accounts'), 'from' => $fromacc, 'to' => $toacc), 3 => array('text' => _('Dimension') . " 1", 'from' => get_dimension_string($dimension), 'to' => ''), 4 => array('text' => _('Dimension') . " 2", 'from' => get_dimension_string($dimension2), 'to' => ''));
} else {
if ($dim == 1) {
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Accounts'), 'from' => $fromacc, 'to' => $toacc), 3 => array('text' => _('Dimension'), 'from' => get_dimension_string($dimension), 'to' => ''));
} else {
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Accounts'), 'from' => $fromacc, 'to' => $toacc));
}
}
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$accounts = get_gl_accounts($fromacc, $toacc);
while ($account = db_fetch($accounts)) {
if (is_account_balancesheet($account["account_code"])) {
$begin = "";
} else {
$begin = get_fiscalyear_begin_for_date($from);
if (date1_greater_date2($begin, $from)) {
$begin = $from;
}
$begin = add_days($begin, -1);
}
$prev_balance = get_gl_balance_from_to($begin, $from, $account["account_code"], $dimension, $dimension2);
$trans = get_gl_transactions($from, $to, -1, $account['account_code'], $dimension, $dimension2);
$rows = db_num_rows($trans);
if ($prev_balance == 0.0 && $rows == 0) {
continue;
}
$rep->Font('bold');
$rep->TextCol(0, 4, $account['account_code'] . " " . $account['account_name'], -2);
$rep->TextCol(4, 6, _('Opening Balance'));
if ($prev_balance > 0.0) {
$rep->AmountCol(7, 8, abs($prev_balance), $dec);
} else {
$rep->AmountCol(8, 9, abs($prev_balance), $dec);
}
$rep->Font();
$total = $prev_balance;
$rep->NewLine(2);
if ($rows > 0) {
while ($myrow = db_fetch($trans)) {
$total += $myrow['amount'];
$type_name = $systypes_array[$myrow["type"]];
if ($type_name == "Customer Payment") {
$rep->TextCol(0, 1, "CRB", -2);
}
if ($type_name == "Cash Disbursement/Check Voucher") {
$rep->TextCol(0, 1, "CDB", -2);
}
if ($type_name == "Journal Entry") {
$rep->TextCol(0, 1, "JB", -2);
}
if ($type_name == "Customer Credit Note") {
$type_name = "Credit Memo";
}
if ($type_name == "Sales Invoice") {
$type_name = "Invoice";
} else {
if ($type_name != "Customer Payment" && $type_name != "Cash Disbursement/Check Voucher" && $type_name != "Journal Entry") {
$rep->TextCol(0, 1, $type_name, -2);
}
}
$reference = get_reference($myrow["type"], $myrow["type_no"]);
$rep->TextCol(1, 2, $reference);
$rep->TextCol(2, 3, $myrow['type_no'], -2);
$rep->DateCol(3, 4, $myrow["tran_date"], true);
if ($dim >= 1) {
$rep->TextCol(4, 5, get_dimension_string($myrow['dimension_id']));
}
if ($dim > 1) {
$rep->TextCol(5, 6, get_dimension_string($myrow['dimension2_id']));
}
$txt = payment_person_name($myrow["person_type_id"], $myrow["person_id"], false);
$memo = $myrow['memo_'];
if ($txt != "") {
if ($memo != "") {
$txt = $txt . "/" . $memo;
}
} else {
$txt = $memo;
}
$rep->TextCol(6, 7, $txt, -2);
if ($myrow['amount'] > 0.0) {
$rep->AmountCol(7, 8, abs($myrow['amount']), $dec);
} else {
$rep->AmountCol(8, 9, abs($myrow['amount']), $dec);
}
$rep->TextCol(9, 10, number_format2($total, $dec));
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + $rep->lineHeight) {
$rep->Line($rep->row - 2);
$rep->NewPage();
}
}
$rep->NewLine();
}
$rep->Font('bold');
$rep->TextCol(4, 6, _("Ending Balance"));
if ($total > 0.0) {
$rep->AmountCol(7, 8, abs($total), $dec);
} else {
$rep->AmountCol(8, 9, abs($total), $dec);
}
$rep->Font();
$rep->Line($rep->row - $rep->lineHeight + 4);
$rep->NewLine(2, 1);
}
$rep->End();
}
function print_outstanding_GRN()
{
global $path_to_root;
$fromsupp = $_POST['PARAM_0'];
$comments = $_POST['PARAM_1'];
$orientation = $_POST['PARAM_2'];
$destination = $_POST['PARAM_3'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
if ($fromsupp == ALL_TEXT) {
$from = _('All');
} else {
$from = get_supplier_name($fromsupp);
}
$dec = user_price_dec();
$cols = array(0, 40, 80, 190, 250, 320, 385, 450, 515);
$headers = array(_('GRN'), _('Order'), _('Item') . '/' . _('Description'), _('Qty Recd'), _('qty Inv'), _('Balance'), _('Act Price'), _('Value'));
$aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Supplier'), 'from' => $from, 'to' => ''));
$rep = new FrontReport(_('Outstanding GRNs Report'), "OutstandingGRN", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$Tot_Val = 0;
$Supplier = '';
$SuppTot_Val = 0;
$res = getTransactions($fromsupp);
while ($GRNs = db_fetch($res)) {
$dec2 = get_qty_dec($GRNs['item_code']);
if ($Supplier != $GRNs['supplier_id']) {
if ($Supplier != '') {
$rep->NewLine(2);
$rep->TextCol(0, 7, _('Total'));
$rep->AmountCol(7, 8, $SuppTot_Val, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine(3);
$SuppTot_Val = 0;
}
$rep->TextCol(0, 6, $GRNs['supp_name']);
$Supplier = $GRNs['supplier_id'];
}
$rep->NewLine();
$rep->TextCol(0, 1, $GRNs['id']);
$rep->TextCol(1, 2, $GRNs['order_no']);
$rep->TextCol(2, 3, $GRNs['item_code'] . '-' . $GRNs['description']);
$rep->AmountCol(3, 4, $GRNs['qty_recd'], $dec2);
$rep->AmountCol(4, 5, $GRNs['quantity_inv'], $dec2);
$QtyOstg = $GRNs['qty_recd'] - $GRNs['quantity_inv'];
$Value = ($GRNs['qty_recd'] - $GRNs['quantity_inv']) * $GRNs['act_price'];
$rep->AmountCol(5, 6, $QtyOstg, $dec2);
$rep->AmountCol(6, 7, $GRNs['act_price'], $dec);
$rep->AmountCol(7, 8, $Value, $dec);
$Tot_Val += $Value;
$SuppTot_Val += $Value;
$rep->NewLine(0, 1);
}
if ($Supplier != '') {
$rep->NewLine();
$rep->TextCol(0, 7, _('Total'));
$rep->AmountCol(7, 8, $SuppTot_Val, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine(3);
$SuppTot_Val = 0;
}
$rep->NewLine(2);
$rep->TextCol(0, 7, _('Grand Total'));
$rep->AmountCol(7, 8, $Tot_Val, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->End();
}
function print_inventory_sales()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$category = $_POST['PARAM_2'];
$location = $_POST['PARAM_3'];
$fromcust = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
$destination = $_POST['PARAM_7'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
if ($location == '') {
$loc = _('All');
} else {
$loc = get_location_name($location);
}
if ($fromcust == '') {
$fromc = _('All');
} else {
$fromc = get_customer_name($fromcust);
}
$cols = array(0, 75, 175, 250, 300, 375, 450, 515);
$headers = array(_('Category'), _('Description'), _('Customer'), _('Qty'), _('Sales'), _('Cost'), _('Contribution'));
if ($fromcust != '') {
$headers[2] = '';
}
$aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Category'), 'from' => $cat, 'to' => ''), 3 => array('text' => _('Location'), 'from' => $loc, 'to' => ''), 4 => array('text' => _('Customer'), 'from' => $fromc, 'to' => ''));
$rep = new FrontReport(_('Inventory Sales Report'), "InventorySalesReport", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($category, $location, $fromcust, $from, $to);
$total = $grandtotal = 0.0;
$total1 = $grandtotal1 = 0.0;
$total2 = $grandtotal2 = 0.0;
$catt = '';
while ($trans = db_fetch($res)) {
if ($catt != $trans['cat_description']) {
if ($catt != '') {
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->AmountCol(5, 6, $total1, $dec);
$rep->AmountCol(6, 7, $total2, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine();
$total = $total1 = $total2 = 0.0;
}
$rep->TextCol(0, 1, $trans['category_id']);
$rep->TextCol(1, 6, $trans['cat_description']);
$catt = $trans['cat_description'];
$rep->NewLine();
}
$curr = get_customer_currency($trans['debtor_no']);
$rate = get_exchange_rate_from_home_currency($curr, sql2date($trans['tran_date']));
$trans['amt'] *= $rate;
$cb = $trans['amt'] - $trans['cost'];
$rep->NewLine();
$rep->fontSize -= 2;
$rep->TextCol(0, 1, $trans['stock_id']);
if ($fromcust == ALL_TEXT) {
$rep->TextCol(1, 2, $trans['description'] . ($trans['inactive'] == 1 ? " (" . _("Inactive") . ")" : ""), -1);
$rep->TextCol(2, 3, $trans['debtor_name']);
} else {
$rep->TextCol(1, 3, $trans['description'] . ($trans['inactive'] == 1 ? " (" . _("Inactive") . ")" : ""), -1);
}
$rep->AmountCol(3, 4, $trans['qty'], get_qty_dec($trans['stock_id']));
$rep->AmountCol(4, 5, $trans['amt'], $dec);
$rep->AmountCol(5, 6, $trans['cost'], $dec);
$rep->AmountCol(6, 7, $cb, $dec);
$rep->fontSize += 2;
$total += $trans['amt'];
$total1 += $trans['cost'];
$total2 += $cb;
$grandtotal += $trans['amt'];
$grandtotal1 += $trans['cost'];
$grandtotal2 += $cb;
}
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->AmountCol(5, 6, $total1, $dec);
$rep->AmountCol(6, 7, $total2, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine(2, 1);
$rep->TextCol(0, 4, _('Grand Total'));
$rep->AmountCol(4, 5, $grandtotal, $dec);
$rep->AmountCol(5, 6, $grandtotal1, $dec);
$rep->AmountCol(6, 7, $grandtotal2, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_royalty_sales()
{
$imc = $_POST['PARAM_0'];
$destination = $_POST['PARAM_2'];
$orientation = $_POST['PARAM_1'];
global $path_to_root, $systypes_array;
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$params = array(0 => $comments, 1 => array('text' => _('Item'), 'from' => $name));
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(0, 100, 150, 250, 300, 350, 400, 450, 520);
$headers = array(_('IMC/Client'), _('Address'), '', _('Contact Person'), '', _('Contact No.'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'left', 'left', 'left', 'left');
$usr = get_user($user);
$user_id = $usr['user_id'];
$rep = new FrontReport(_('Client Listing'), "Client Listing", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->SetHeaderType('Header');
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$salesman = 0;
$result = getList($imc);
while ($myrow = db_fetch($result)) {
$previous == '';
$salesman = get_salesman_name($myrow['salesman']);
$current = $salesman;
if ($salesman != "") {
if ($previous == $current) {
$salesman = '';
$name = $myrow['name'] . " " . $myrow['name2'];
$rep->TextCol(0, 2, $myrow['br_name']);
$rep->NewLine();
$rep->TextCol(1, 7, "Address: " . $myrow['br_address']);
$rep->TextCol(7, 15, "Contact Person: " . $name);
$rep->NewLine();
if ($myrow['phone'] != NULL && $myrow['phone2'] != NULL) {
$rep->TextCol(1, 5, "Contact Nos. " . $myrow['phone'] . "/" . $myrow['phone2']);
}
if ($myrow['phone2'] == NULL) {
$rep->TextCol(1, 5, "Contact Nos. " . $myrow['phone']);
}
if ($myrow['fax'] != NULL) {
$rep->TextCol(6, 8, "Fax" . $myrow['fax']);
}
if ($myrow['email'] != NULL) {
$rep->TextCol(9, 15, "Email" . $myrow['email']);
}
$rep->NewLine();
} else {
$name = $myrow['name'] . " " . $myrow['name2'];
$rep->Font('bold');
$rep->NewLine(2);
$rep->Line($rep->row + 10);
$rep->TextCol(0, 10, $salesman);
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->Font();
$rep->TextCol(0, 2, $myrow['br_name']);
$rep->NewLine();
$rep->TextCol(1, 7, "Address: " . $myrow['br_address']);
$rep->TextCol(7, 15, "Contact Person: " . $name);
$rep->NewLine();
if ($myrow['phone'] != NULL && $myrow['phone2'] != NULL) {
$rep->TextCol(1, 5, "Contact Nos. " . $myrow['phone'] . "/" . $myrow['phone2']);
}
if ($myrow['phone2'] == NULL) {
$rep->TextCol(1, 5, "Contact Nos. " . $myrow['phone']);
}
if ($myrow['fax'] != NULL) {
$rep->TextCol(6, 8, "Fax" . $myrow['fax']);
}
if ($myrow['email'] != NULL) {
$rep->TextCol(9, 15, "Email" . $myrow['email']);
}
$rep->NewLine();
}
$previous = $current;
}
}
$rep->NewLine();
$rep->End();
}
function print_customer_details_listing()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$area = $_POST['PARAM_1'];
$folk = $_POST['PARAM_2'];
$more = $_POST['PARAM_3'];
$less = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
$orientation = $_POST['PARAM_6'];
$destination = $_POST['PARAM_7'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = 0;
if ($area == ALL_NUMERIC) {
$area = 0;
}
if ($folk == ALL_NUMERIC) {
$folk = 0;
}
if ($area == 0) {
$sarea = _('All Areas');
} else {
$sarea = get_area_name($area);
}
if ($folk == 0) {
$salesfolk = _('All Sales Folk');
} else {
$salesfolk = get_salesman_name($folk);
}
if ($more != '') {
$morestr = _('Greater than ') . number_format2($more, $dec);
} else {
$morestr = '';
}
if ($less != '') {
$lessstr = _('Less than ') . number_format2($less, $dec);
} else {
$lessstr = '';
}
$more = (double) $more;
$less = (double) $less;
$cols = array(0, 150, 300, 425, 550);
$headers = array(_('Customer Postal Address'), _('Price/Turnover'), _('Branch Contact Information'), _('Branch Delivery Address'));
$aligns = array('left', 'left', 'left', 'left');
$params = array(0 => $comments, 1 => array('text' => _('Activity Since'), 'from' => $from, 'to' => ''), 2 => array('text' => _('Sales Areas'), 'from' => $sarea, 'to' => ''), 3 => array('text' => _('Sales Folk'), 'from' => $salesfolk, 'to' => ''), 4 => array('text' => _('Activity'), 'from' => $morestr, 'to' => $lessstr . " " . get_company_pref("curr_default")));
$rep = new FrontReport(_('Customer Details Listing'), "CustomerDetailsListing", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$result = get_customer_details_for_report($area, $folk);
$carea = '';
$sman = '';
while ($myrow = db_fetch($result)) {
$printcustomer = true;
if ($more != '' || $less != '') {
$turnover = getTransactions($myrow['debtor_no'], $myrow['branch_code'], $from);
if ($more != 0.0 && $turnover <= (double) $more) {
$printcustomer = false;
}
if ($less != 0.0 && $turnover >= (double) $less) {
$printcustomer = false;
}
}
if ($printcustomer) {
if ($carea != $myrow['description']) {
$rep->fontSize += 2;
$rep->NewLine(2, 7);
$rep->Font('bold');
$rep->TextCol(0, 3, _('Customers in') . " " . $myrow['description']);
$carea = $myrow['description'];
$rep->fontSize -= 2;
$rep->Font();
$rep->NewLine();
}
if ($sman != $myrow['salesman_name']) {
$rep->fontSize += 2;
$rep->NewLine(1, 7);
$rep->Font('bold');
$rep->TextCol(0, 3, $myrow['salesman_name']);
$sman = $myrow['salesman_name'];
$rep->fontSize -= 2;
$rep->Font();
$rep->NewLine();
}
$rep->NewLine();
// Here starts the new report lines 2010-11-02 Joe Hunt
$contacts = get_contacts_for_branch($myrow['branch_code']);
$rep->TextCol(0, 1, $myrow['name']);
$rep->TextCol(1, 2, _('Price List') . ": " . $myrow['sales_type']);
$rep->TextCol(2, 3, $myrow['br_name']);
$rep->NewLine();
$adr = Explode("\n", $myrow['address']);
if ($myrow['br_post_address'] == '') {
$adr2 = Explode("\n", $myrow['br_address']);
} else {
$adr2 = Explode("\n", $myrow['br_post_address']);
}
$count1 = count($adr);
$count2 = count($adr2);
$count1 = max($count1, $count2);
$count1 = max($count1, 4);
if (isset($adr[0])) {
$rep->TextCol(0, 1, $adr[0]);
}
$rep->TextCol(1, 2, _('Currency') . ": " . $myrow['curr_code']);
if (isset($contacts[0])) {
$rep->TextCol(2, 3, $contacts[0]['name'] . " " . $contacts[0]['name2']);
}
if (isset($adr2[0])) {
$rep->TextCol(3, 4, $adr2[0]);
}
$rep->NewLine();
if (isset($adr[1])) {
$rep->TextCol(0, 1, $adr[1]);
}
if ($myrow['dimension_id'] != 0) {
$dim = get_dimension($myrow['dimension_id']);
$rep->TextCol(1, 2, _('Dimension') . ": " . $dim['name']);
}
if (isset($contacts[0])) {
$rep->TextCol(2, 3, _('Ph') . ": " . $contacts[0]['phone']);
}
if (isset($adr2[1])) {
$rep->TextCol(3, 4, $adr2[1]);
}
$rep->NewLine();
if (isset($adr[2])) {
$rep->TextCol(0, 1, $adr[2]);
}
if ($myrow['dimension2_id'] != 0) {
$dim = get_dimension($myrow['dimension2_id']);
$rep->TextCol(1, 2, _('Dimension') . " 2: " . $dim['name']);
}
if (isset($contacts[0])) {
$rep->TextCol(2, 3, _('Fax') . ": " . $contacts[0]['fax']);
}
if (isset($adr2[2])) {
$rep->TextCol(3, 4, $adr2[2]);
}
if ($more != 0.0 || $less != 0.0) {
$rep->TextCol(1, 2, _('Turnover') . ": " . number_format2($turnover, $dec));
}
for ($i = 3; $i < $count1; $i++) {
$rep->NewLine();
if (isset($adr[$i])) {
$rep->TextCol(0, 1, $adr[$i]);
}
if ($i == 3 && isset($contacts[0]) && isset($contacts[0]['email'])) {
$rep->TextCol(2, 3, _('Email') . ": " . $contacts[0]['email']);
}
if (isset($adr2[$i])) {
$rep->TextCol(3, 4, $adr2[$i]);
}
}
$rep->NewLine();
/*
$rep->TextCol(0, 1, $myrow['name']);
$adr = Explode("\n", $myrow['address']);
$count1 = count($adr);
for ($i = 0; $i < $count1; $i++)
$rep->TextCol(0, 1, $adr[$i], 0, ($i + 1) * $rep->lineHeight);
$count1++;
$rep->TextCol(1, 2, _('Price List') . ": " . $myrow['sales_type']);
if ($more != 0.0 || $less != 0.0)
$rep->TextCol(1, 2, _('Turnover') . ": " . number_format2($turnover, $dec), 0, $rep->lineHeight);
$rep->TextCol(2, 3, $myrow['br_name']);
$contacts = get_branch_contacts($myrow['branch_code']);
if (isset($contacts[0]))
{
$rep->TextCol(2, 3, $contacts[0]['name'], 0, $rep->lineHeight);
$rep->TextCol(2, 3, _('Ph') . ": " . $contacts[0]['phone'], 0, 2 * $rep->lineHeight);
$rep->TextCol(2, 3, _('Fax') . ": " . $contacts[0]['fax'], 0, 3 * $rep->lineHeight);
}
$adr = Explode("\n", $myrow['br_address']);
$count2 = count($adr);
for ($i = 0; $i < $count2; $i++)
$rep->TextCol(3, 4, $adr[$i], 0, ($i + 1) * $rep->lineHeight);
//$rep->TextCol(3, 4, $myrow['email'], 0, ($count2 + 1) * $rep->lineHeight);
$count2++;
$count1 = Max($count1, $count2);
$count1 = Max($count1, 4);
$rep->NewLine($count3);
*/
$rep->Line($rep->row + 8);
$rep->NewLine(0, 3);
}
}
$rep->End();
}
function print_order_status_list()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$category = $_REQUEST['PARAM_2'];
$location = $_REQUEST['PARAM_3'];
$backorder = $_REQUEST['PARAM_4'];
$comments = $_REQUEST['PARAM_5'];
$dec = user_qty_dec();
if ($category == reserved_words::get_all_numeric()) {
$category = 0;
}
if ($location == reserved_words::get_all()) {
$location = null;
}
if ($category == 0) {
$cat = tr('All');
} else {
$cat = get_category_name($category);
}
if ($location == null) {
$loc = tr('All');
} else {
$loc = $location;
}
if ($backorder == 0) {
$back = tr('All Orders');
} else {
$back = tr('Back Orders Only');
}
$cols = array(0, 60, 150, 260, 325, 385, 450, 515);
$headers2 = array(tr('Order'), tr('Customer'), tr('Branch'), tr('Customer Ref'), tr('Ord Date'), tr('Del Date'), tr('Loc'));
$aligns = array('left', 'left', 'right', 'right', 'right', 'right', 'right');
$headers = array(tr('Code'), tr('Description'), tr('Ordered'), tr('Invoiced'), tr('Outstanding'), '');
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Category'), 'from' => $cat, 'to' => ''), 3 => array('text' => tr('Location'), 'from' => $loc, 'to' => ''), 4 => array('text' => tr('Selection'), 'from' => $back, 'to' => ''));
$cols2 = $cols;
$aligns2 = $aligns;
$rep = new FrontReport(tr('Order Status Listing'), "OrderStatusListing.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
$rep->Header();
$orderno = 0;
$result = GetSalesOrders($from, $to, $category, $location, $backorder);
while ($myrow = db_fetch($result)) {
if ($rep->row < $rep->bottomMargin + 2 * $rep->lineHeight) {
$orderno = 0;
$rep->Header();
}
$rep->NewLine(0, 2, false, $orderno);
if ($orderno != $myrow['order_no']) {
if ($orderno != 0) {
$rep->Line($rep->row);
$rep->NewLine();
}
$rep->TextCol(0, 1, $myrow['order_no']);
$rep->TextCol(1, 2, get_customer_name($myrow['debtor_no']));
$rep->TextCol(2, 3, get_branch_name($myrow['branch_code']));
$rep->TextCol(3, 4, $myrow['customer_ref']);
$rep->TextCol(4, 5, sql2date($myrow['ord_date']));
$rep->TextCol(5, 6, sql2date($myrow['delivery_date']));
$rep->TextCol(6, 7, $myrow['from_stk_loc']);
$rep->NewLine(2);
$orderno = $myrow['order_no'];
}
$rep->TextCol(0, 1, $myrow['stk_code']);
$rep->TextCol(1, 2, $myrow['description']);
$rep->TextCol(2, 3, number_format2($myrow['quantity'], $dec));
$rep->TextCol(3, 4, number_format2($myrow['qty_sent'], $dec));
$rep->TextCol(4, 5, number_format2($myrow['quantity'] - $myrow['qty_sent'], $dec));
if ($myrow['quantity'] - $myrow['qty_sent'] > 0) {
$rep->Font('italic');
$rep->TextCol(5, 6, tr('Outstanding'));
$rep->Font();
}
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + 2 * $rep->lineHeight) {
$orderno = 0;
$rep->Header();
}
}
$rep->Line($rep->row);
$rep->End();
}
function print_inventory_sales()
{
global $path_to_root;
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$category = $_POST['PARAM_2'];
$comments = $_POST['PARAM_3'];
$orientation = $_POST['PARAM_4'];
$destination = $_POST['PARAM_5'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
$cols = array(0, 100, 260, 300, 350, 425, 430, 515);
$headers = array(_('Item/Category'), _('Description'), _('Qty'), _('Unit Price'), _('Sales'), '', _('Remark'));
$aligns = array('left', 'left', 'right', 'right', 'right', 'right', 'left');
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => _('Category'), 'from' => $cat, 'to' => ''));
$rep = new FrontReport(_('Item Sales Summary Report'), "ItemSalesSummaryReport", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($category, $from, $to);
$total = $grandtotal = 0.0;
$total1 = $grandtotal1 = 0.0;
$total2 = $grandtotal2 = 0.0;
$catt = '';
while ($trans = db_fetch($res)) {
if ($catt != $trans['cat_description']) {
if ($catt != '') {
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine();
$total = $total1 = $total2 = 0.0;
}
$rep->TextCol(0, 1, $trans['category_id']);
$rep->TextCol(1, 7, $trans['cat_description']);
$catt = $trans['cat_description'];
$rep->NewLine();
}
$rep->NewLine();
$rep->fontSize -= 2;
$rep->TextCol(0, 1, $trans['stock_id']);
$rep->TextCol(1, 2, $trans['description']);
$rep->AmountCol(2, 3, $trans['quantity'], get_qty_dec($trans['stock_id']));
$rep->AmountCol(3, 4, $trans['unit_price'], $dec);
$rep->AmountCol(4, 5, $trans['quantity'] * $trans['unit_price'], $dec);
if ($trans['unit_price'] == 0) {
$rep->TextCol(6, 7, _('Gift'));
}
$rep->fontSize += 2;
$total += $trans['quantity'] * $trans['unit_price'];
$grandtotal += $trans['quantity'] * $trans['unit_price'];
}
$rep->NewLine(2, 3);
$rep->TextCol(0, 4, _('Total'));
$rep->AmountCol(4, 5, $total, $dec);
$rep->Line($rep->row - 2);
$rep->NewLine();
$rep->NewLine(2, 1);
$rep->TextCol(0, 4, _('Grand Total'));
$rep->AmountCol(4, 5, $grandtotal, $dec);
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_stock_check()
{
global $path_to_root, $pic_height;
$category = $_POST['PARAM_0'];
$location = $_POST['PARAM_1'];
$pictures = $_POST['PARAM_2'];
$check = $_POST['PARAM_3'];
$shortage = $_POST['PARAM_4'];
$no_zeros = $_POST['PARAM_5'];
$like = $_POST['PARAM_6'];
$comments = $_POST['PARAM_7'];
$orientation = $_POST['PARAM_8'];
$destination = $_POST['PARAM_9'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
if ($location == ALL_TEXT) {
$location = 'all';
}
if ($location == 'all') {
$loc = _('All');
} else {
$loc = get_location_name($location);
}
if ($shortage) {
$short = _('Yes');
$available = _('Shortage');
} else {
$short = _('No');
$available = _('Available');
}
if ($no_zeros) {
$nozeros = _('Yes');
} else {
$nozeros = _('No');
}
if ($check) {
$cols = array(0, 75, 225, 250, 295, 345, 390, 445, 515);
$headers = array(_('Stock ID'), _('Description'), _('UOM'), _('Quantity'), _('Check'), _('Demand'), $available, _('On Order'));
$aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right', 'right');
} else {
$cols = array(0, 75, 225, 250, 315, 380, 445, 515);
$headers = array(_('Stock ID'), _('Description'), _('UOM'), _('Quantity'), _('Demand'), $available, _('On Order'));
$aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right');
}
$params = array(0 => $comments, 1 => array('text' => _('Category'), 'from' => $cat, 'to' => ''), 2 => array('text' => _('Location'), 'from' => $loc, 'to' => ''), 3 => array('text' => _('Only Shortage'), 'from' => $short, 'to' => ''), 4 => array('text' => _('Suppress Zeros'), 'from' => $nozeros, 'to' => ''));
if ($pictures) {
$user_comp = user_company();
} else {
$user_comp = "";
}
$rep = new FrontReport(_('Stock Check Sheets'), "StockCheckSheet", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$res = getTransactions($category, $location, $like);
$catt = '';
while ($trans = db_fetch($res)) {
if ($location == 'all') {
$loc_code = "";
} else {
$loc_code = $location;
}
$demandqty = get_demand_qty($trans['stock_id'], $loc_code);
$demandqty += get_demand_asm_qty($trans['stock_id'], $loc_code);
$onorder = get_on_porder_qty($trans['stock_id'], $loc_code);
$flag = get_mb_flag($trans['stock_id']);
if ($flag == 'M') {
$onorder += get_on_worder_qty($trans['stock_id'], $loc_code);
}
if ($no_zeros && $trans['QtyOnHand'] == 0 && $demandqty == 0 && $onorder == 0) {
continue;
}
if ($shortage && $trans['QtyOnHand'] - $demandqty >= 0) {
continue;
}
if ($catt != $trans['cat_description']) {
if ($catt != '') {
$rep->Line($rep->row - 2);
$rep->NewLine(2, 3);
}
$rep->TextCol(0, 1, $trans['category_id']);
$rep->TextCol(1, 2, $trans['cat_description']);
$catt = $trans['cat_description'];
$rep->NewLine();
}
$rep->NewLine();
$dec = get_qty_dec($trans['stock_id']);
$rep->TextCol(0, 1, $trans['stock_id']);
$rep->TextCol(1, 2, $trans['description'] . ($trans['inactive'] == 1 ? " (" . _("Inactive") . ")" : ""), -1);
$rep->TextCol(2, 3, $trans['units']);
$rep->AmountCol(3, 4, $trans['QtyOnHand'], $dec);
if ($check) {
$rep->TextCol(4, 5, "_________");
$rep->AmountCol(5, 6, $demandqty, $dec);
$rep->AmountCol(6, 7, $trans['QtyOnHand'] - $demandqty, $dec);
$rep->AmountCol(7, 8, $onorder, $dec);
} else {
$rep->AmountCol(4, 5, $demandqty, $dec);
$rep->AmountCol(5, 6, $trans['QtyOnHand'] - $demandqty, $dec);
$rep->AmountCol(6, 7, $onorder, $dec);
}
if ($pictures) {
$image = company_path() . '/images/' . item_img_name($trans['stock_id']) . '.jpg';
if (file_exists($image)) {
$rep->NewLine();
if ($rep->row - $pic_height < $rep->bottomMargin) {
$rep->NewPage();
}
$rep->AddImage($image, $rep->cols[1], $rep->row - $pic_height, 0, $pic_height);
$rep->row -= $pic_height;
$rep->NewLine();
}
}
}
$rep->Line($rep->row - 4);
$rep->NewLine();
$rep->End();
}
function print_trial_balance()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$dim = get_company_pref('use_dimension');
$dimension = $dimension2 = 0;
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$zero = $_REQUEST['PARAM_2'];
if ($dim == 2) {
$dimension = $_REQUEST['PARAM_3'];
$dimension2 = $_REQUEST['PARAM_4'];
$comments = $_REQUEST['PARAM_5'];
} else {
if ($dim == 1) {
$dimension = $_REQUEST['PARAM_3'];
$comments = $_REQUEST['PARAM_4'];
} else {
$comments = $_REQUEST['PARAM_3'];
}
}
$dec = user_price_dec();
$cols2 = array(0, 50, 230, 330, 430, 530);
//-------------0--1---2----3----4----5--
$headers2 = array('', '', tr('Brought Forward'), tr('This Period'), tr('Balance'));
$aligns2 = array('left', 'left', 'left', 'left', 'left');
$cols = array(0, 50, 200, 250, 300, 350, 400, 450, 500, 550);
//------------0--1---2----3----4----5----6----7----8----9--
$headers = array(tr('Account'), tr('Account Name'), tr('Debit'), tr('Credit'), tr('Debit'), tr('Credit'), tr('Debit'), tr('Credit'));
$aligns = array('left', 'left', 'right', 'right', 'right', 'right', 'right', 'right');
if ($dim == 2) {
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Dimension') . " 1", 'from' => get_dimension_string($dimension), 'to' => ''), 3 => array('text' => tr('Dimension') . " 2", 'from' => get_dimension_string($dimension2), 'to' => ''));
} else {
if ($dim == 1) {
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Dimension'), 'from' => get_dimension_string($dimension), 'to' => ''));
} else {
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to));
}
}
$rep = new FrontReport(tr('Trial Balance'), "TrialBalance.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
$rep->Header();
$accounts = get_gl_accounts();
while ($account = db_fetch($accounts)) {
if (is_account_balancesheet($account["account_code"])) {
$begin = "";
} else {
if ($from < $begin) {
$begin = add_days($from, -1);
} else {
$begin = add_days(begin_fiscalyear(), -1);
}
}
$prev_balance = get_gl_balance_from_to($begin, $from, $account["account_code"], $dimension, $dimension2);
$curr_balance = get_gl_trans_from_to($from, $to, $account["account_code"], $dimension, $dimension2);
if ($zero == 0 && !$prev_balance && !$curr_balance) {
continue;
}
$rep->TextCol(0, 1, $account['account_code']);
$rep->TextCol(1, 2, $account['account_name']);
if ($prev_balance > 0.0) {
$rep->TextCol(2, 3, number_format2(abs($prev_balance), $dec));
} else {
$rep->TextCol(3, 4, number_format2(abs($prev_balance), $dec));
}
if ($curr_balance > 0.0) {
$rep->TextCol(4, 5, number_format2(abs($curr_balance), $dec));
} else {
$rep->TextCol(5, 6, number_format2(abs($curr_balance), $dec));
}
if ($curr_balance + $prev_balance > 0.0) {
$rep->TextCol(6, 7, number_format2(abs($curr_balance + $prev_balance), $dec));
} else {
$rep->TextCol(7, 8, number_format2(abs($curr_balance + $prev_balance), $dec));
}
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + $rep->lineHeight) {
$rep->Line($rep->row - 2);
$rep->Header();
}
}
$rep->Line($rep->row);
$rep->End();
}
function inventory_movements()
{
global $path_to_root;
$from_date = $_POST['PARAM_0'];
$to_date = $_POST['PARAM_1'];
$category = $_POST['PARAM_2'];
$location = $_POST['PARAM_3'];
$comments = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
$destination = $_POST['PARAM_6'];
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$orientation = $orientation ? 'L' : 'P';
if ($category == ALL_NUMERIC) {
$category = 0;
}
if ($category == 0) {
$cat = _('All');
} else {
$cat = get_category_name($category);
}
if ($location == '') {
$loc = _('All');
} else {
$loc = get_location_name($location);
}
$cols = array(0, 60, 130, 160, 185, 215, 250, 275, 305, 340, 365, 395, 430, 455, 485, 520);
$headers = array(_('Category'), _('Description'), _('UOM'), '', '', _('OpeningStock'), '', '', _('StockIn'), '', '', _('Delivery'), '', '', _('ClosingStock'));
$headers2 = array("", "", "", _("QTY"), _("Rate"), _("Value"), _("QTY"), _("Rate"), _("Value"), _("QTY"), _("Rate"), _("Value"), _("QTY"), _("Rate"), _("Value"));
$aligns = array('left', 'left', 'left', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right', 'right');
$params = array(0 => $comments, 1 => array('text' => _('Period'), 'from' => $from_date, 'to' => $to_date), 2 => array('text' => _('Category'), 'from' => $cat, 'to' => ''), 3 => array('text' => _('Location'), 'from' => $loc, 'to' => ''));
$rep = new FrontReport(_('Costed Inventory Movements'), "CostedInventoryMovements", user_pagesize(), 8, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->Font();
$rep->Info($params, $cols, $headers2, $aligns, $cols, $headers, $aligns);
$rep->NewPage();
$totval_open = $totval_in = $totval_out = $totval_close = 0;
$result = fetch_items($category);
$dec = user_price_dec();
$catgor = '';
while ($myrow = db_fetch($result)) {
if ($catgor != $myrow['description']) {
$rep->NewLine(2);
$rep->fontSize += 2;
$rep->TextCol(0, 3, $myrow['category_id'] . " - " . $myrow['description']);
$catgor = $myrow['description'];
$rep->fontSize -= 2;
$rep->NewLine();
}
$rep->NewLine();
$rep->TextCol(0, 1, $myrow['stock_id']);
$rep->TextCol(1, 2, $myrow['name']);
$rep->TextCol(2, 3, $myrow['units']);
$qoh_start = get_qoh_on_date($myrow['stock_id'], $location, add_days($from_date, -1));
$qoh_end = get_qoh_on_date($myrow['stock_id'], $location, $to_date);
$inward = trans_qty($myrow['stock_id'], $location, $from_date, $to_date);
$outward = trans_qty($myrow['stock_id'], $location, $from_date, $to_date, false);
$openCost = avg_unit_cost($myrow['stock_id'], $location, $from_date);
$unitCost = avg_unit_cost($myrow['stock_id'], $location, add_days($to_date, 1));
$rep->AmountCol(3, 4, $qoh_start, get_qty_dec($myrow['stock_id']));
$rep->AmountCol(4, 5, $openCost, $dec);
$openCost *= $qoh_start;
$totval_open += $openCost;
$rep->AmountCol(5, 6, $openCost);
if ($inward > 0) {
$rep->AmountCol(6, 7, $inward, get_qty_dec($myrow['stock_id']));
$unitCost_in = trans_qty_unit_cost($myrow['stock_id'], $location, $from_date, $to_date);
$rep->AmountCol(7, 8, $unitCost_in, $dec);
$unitCost_in *= $inward;
$totval_in += $unitCost_in;
$rep->AmountCol(8, 9, $unitCost_in);
}
if ($outward > 0) {
$rep->AmountCol(9, 10, $outward, get_qty_dec($myrow['stock_id']));
$unitCost_out = trans_qty_unit_cost($myrow['stock_id'], $location, $from_date, $to_date, false);
$rep->AmountCol(10, 11, $unitCost_out, $dec);
$unitCost_out *= $outward;
$totval_out += $unitCost_out;
$rep->AmountCol(11, 12, $unitCost_out);
}
$rep->AmountCol(12, 13, $qoh_end, get_qty_dec($myrow['stock_id']));
$rep->AmountCol(13, 14, $unitCost, $dec);
$unitCost *= $qoh_end;
$totval_close += $unitCost;
$rep->AmountCol(14, 15, $unitCost);
$rep->NewLine(0, 1);
}
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->TextCol(0, 1, _("Total"));
$rep->AmountCol(5, 6, $totval_open);
$rep->AmountCol(8, 9, $totval_in);
$rep->AmountCol(11, 12, $totval_out);
$rep->AmountCol(14, 15, $totval_close);
$rep->Line($rep->row - 4);
$rep->End();
}
function print_salesman_list()
{
global $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$summary = $_REQUEST['PARAM_2'];
$comments = $_REQUEST['PARAM_3'];
if ($summary == 0) {
$sum = tr("No");
} else {
$sum = tr("Yes");
}
$dec = user_qty_dec();
$cols = array(0, 60, 150, 220, 325, 385, 450, 515);
$headers = array(tr('Invoice'), tr('Customer'), tr('Branch'), tr('Customer Ref'), tr('Inv Date'), tr('Total'), tr('Provision'));
$aligns = array('left', 'left', 'left', 'left', 'left', 'right', 'right');
$headers2 = array(tr('Salesman'), " ", tr('Phone'), tr('Email'), tr('Provision'), tr('Break Pt.'), tr('Provision') . " 2");
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Summary Only'), 'from' => $sum, 'to' => ''));
$cols2 = $cols;
$aligns2 = $aligns;
$rep = new FrontReport(tr('Salesman Listing'), "SalesmanListing.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
$rep->Header();
$salesman = 0;
$subtotal = $total = $subprov = $provtotal = 0;
$result = GetSalesmanTrans($from, $to);
while ($myrow = db_fetch($result)) {
if ($rep->row < $rep->bottomMargin + 2 * $rep->lineHeight) {
$salesman = 0;
$rep->Header();
}
$rep->NewLine(0, 2, false, $salesman);
if ($salesman != $myrow['salesman_code']) {
if ($salesman != 0) {
$rep->Line($rep->row - 8);
$rep->NewLine(2);
$rep->TextCol(0, 3, tr('Total'));
$rep->TextCol(5, 6, number_format2($subtotal, $dec));
$rep->TextCol(6, 7, number_format2($subprov, $dec));
$rep->Line($rep->row - 4);
$rep->NewLine(2);
//$rep->Line($rep->row);
}
$rep->TextCol(0, 2, $myrow['salesman_code'] . " " . $myrow['salesman_name']);
$rep->TextCol(2, 3, $myrow['salesman_phone']);
$rep->TextCol(3, 4, $myrow['salesman_email']);
$rep->TextCol(4, 5, number_format2($myrow['provision'], user_percent_dec()) . " %");
$rep->TextCol(5, 6, number_format2($myrow['break_pt'], $dec));
$rep->TextCol(6, 7, number_format2($myrow['provision2'], user_percent_dec()) . " %");
$rep->NewLine(2);
$salesman = $myrow['salesman_code'];
$total += $subtotal;
$provtotal += $subprov;
$subtotal = 0;
$subprov = 0;
}
$date = sql2date($myrow['tran_date']);
$rate = get_exchange_rate_from_home_currency($myrow['curr_code'], $date);
$amt = $myrow['InvoiceTotal'] * $rate;
if ($subprov > $myrow['break_pt'] && $myrow['provision2'] != 0) {
$prov = $myrow['provision2'] * $amt / 100;
} else {
$prov = $myrow['provision'] * $amt / 100;
}
if (!$summary) {
$rep->TextCol(0, 1, $myrow['trans_no']);
$rep->TextCol(1, 2, $myrow['DebtorName']);
$rep->TextCol(2, 3, $myrow['br_name']);
$rep->TextCol(3, 4, $myrow['contact_name']);
$rep->TextCol(4, 5, $date);
$rep->TextCol(5, 6, number_format2($amt, $dec));
$rep->TextCol(6, 7, number_format2($prov, $dec));
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + 2 * $rep->lineHeight) {
$salesman = 0;
$rep->Header();
}
}
$subtotal += $amt;
$subprov += $prov;
}
if ($salesman != 0) {
$rep->Line($rep->row - 4);
$rep->NewLine(2);
$rep->TextCol(0, 3, tr('Total'));
$rep->TextCol(5, 6, number_format2($subtotal, $dec));
$rep->TextCol(6, 7, number_format2($subprov, $dec));
$rep->Line($rep->row - 4);
$rep->NewLine(2);
//$rep->Line($rep->row);
$total += $subtotal;
$provtotal += $subprov;
}
$rep->fontSize += 2;
$rep->TextCol(0, 3, tr('Grand Total'));
$rep->fontSize -= 2;
$rep->TextCol(5, 6, number_format2($total, $dec));
$rep->TextCol(6, 7, number_format2($provtotal, $dec));
$rep->Line($rep->row - 4);
$rep->End();
}
function print_royalty_sales()
{
$from = $_POST['PARAM_0'];
$to = $_POST['PARAM_1'];
$item = $_POST['PARAM_2'];
$status = $_POST['PARAM_3'];
$destination = $_POST['PARAM_4'];
$orientation = $_POST['PARAM_5'];
global $path_to_root, $systypes_array;
if ($destination) {
include_once $path_to_root . "/reporting/includes/excel_report.inc";
} else {
include_once $path_to_root . "/reporting/includes/pdf_report.inc";
}
$result = fetchRoyalty($item);
$name = "";
while ($book = db_fetch($result)) {
$name = $book[1];
}
$params = array(0 => $comments, 1 => array('text' => _('Item'), 'from' => $name));
$orientation = $orientation ? 'L' : 'P';
$dec = user_price_dec();
$cols = array(0, 200, 210, 300, 310, 360, 380, 430, 440, 490, 500, 550);
$headers = array(_('Client'), '', _('IMC'), '', _('Invoice/CM #'), '', _('Date'), '', _('Quantity'), '', _('Status'));
$aligns = array('left', 'left', 'left', 'left', 'right', 'right');
$usr = get_user($user);
$user_id = $usr['user_id'];
$rep = new FrontReport(_('Royalty Sales'), "RoyaltySales", user_pagesize(), 9, $orientation);
if ($orientation == 'L') {
recalculate_cols($cols);
}
$rep->SetHeaderType('Header');
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
if ($item == '') {
$no_title_print = false;
$enter = true;
} else {
$no_title_print = true;
$enter = false;
}
if ($no_title_print) {
$rep->Font('bold');
$rep->TextCol(0, 1, $item);
$rep->TextCol(2, 10, fetchTitle($item));
$rep->Font();
}
$total = 0;
$total_invoice_qty = 0;
$total_credit_qty = 0;
$rep->NewLine();
if ($item == "") {
$code = array();
$ItemCode = fetchItemCode();
while ($r = db_fetch($ItemCode)) {
array_push($code, $r[0]);
}
$total = 0;
$total_invoice_qty = 0;
$total_credit_qty = 0;
foreach ($code as $codes) {
$result = fetchRoyalty($codes, $status, $from, $to);
$bookname = fetchTitle($codes);
$rep->Font('bold');
$rep->TextCol(0, 5, $codes . "-" . $bookname);
$rep->Font();
$rep->NewLine();
while ($myrow = db_fetch($result)) {
if ($myrow['alloc'] == $myrow['ov_amount']) {
$stat = 'Closed';
}
if ($myrow['alloc'] < $myrow['ov_amount']) {
$stat = 'Open';
}
$scode = get_code($myrow['salesman']);
$salesman = get_salesman_name($myrow['salesman']);
$total_invoice_qty += $myrow[3];
$clientName = get_customer_name($myrow[0]);
$rep->TextCol(0, 1, $clientName);
$rep->TextCol(2, 3, $scode);
$rep->TextCol(4, 5, ' ' . $myrow['customized_no']);
$rep->TextCol(6, 7, $myrow['tranDate']);
$rep->TextCol(8, 9, $myrow['quantity']);
$rep->TextCol(10, 11, $stat);
$rep->NewLine();
}
$result1 = fetchCreditMemo($codes, $status, $from, $to);
while ($myrow1 = db_fetch($result1)) {
if ($myrow1[3] > 0) {
if ($myrow1['alloc'] == $myrow1['ov_amount']) {
$stat = 'Closed';
}
if ($myrow1['alloc'] < $myrow1['ov_amount']) {
$stat = 'Open';
}
}
$qty = -$myrow1['quantity'];
$total_credit_qty += $qty;
$scode = get_code($myrow1['salesman']);
$clientName2 = get_customer_name($myrow1[0]);
$rep->TextCol(0, 1, $clientName2);
$rep->TextCol(2, 3, $scode);
$rep->TextCol(4, 5, ' ' . $myrow1['customized_no']);
$rep->TextCol(6, 7, $myrow1['tranDate']);
$rep->TextCol(8, 9, $qty);
$rep->TextCol(10, 11, $stat);
$rep->NewLine();
}
$rep->NewLine(1);
$total = $total_invoice_qty + $total_credit_qty;
$rep->Font('bold');
$rep->TextCol(6, 7, _("Total"));
$rep->TextCol(8, 9, $total);
$rep->Line($rep->row + 10);
$rep->Font();
$rep->NewLine();
$total = 0;
$total_invoice_qty = 0;
$total_credit_qty = 0;
}
} else {
$result = fetchRoyalty($item, $status, $from, $to);
while ($myrow = db_fetch($result)) {
if ($myrow['alloc'] == $myrow['ov_amount']) {
$stat = 'Closed';
}
if ($myrow['alloc'] < $myrow['ov_amount']) {
$stat = 'Open';
}
$scode = get_code($myrow['salesman']);
$salesman = get_salesman_name($myrow['salesman']);
$total_invoice_qty += $myrow[3];
$clientName = get_customer_name($myrow[0]);
$rep->TextCol(0, 1, $clientName);
$rep->TextCol(2, 3, $scode);
$rep->TextCol(4, 5, ' ' . $myrow['customized_no']);
$rep->TextCol(6, 7, $myrow['tranDate']);
$rep->TextCol(8, 9, $myrow['quantity']);
$rep->TextCol(10, 11, $stat);
$rep->NewLine();
}
$result1 = fetchCreditMemo($item, $status, $from, $to);
while ($myrow1 = db_fetch($result1)) {
if ($myrow1[3] > 0) {
if ($myrow1['alloc'] == $myrow1['ov_amount']) {
$stat = 'Closed';
}
if ($myrow1['alloc'] < $myrow1['ov_amount']) {
$stat = 'Open';
}
$qty = -$myrow1['quantity'];
$total_credit_qty += $qty;
$scode = get_code($myrow1['salesman']);
$clientName2 = get_customer_name($myrow1[0]);
$rep->TextCol(0, 1, $clientName2);
$rep->TextCol(2, 3, $scode);
$rep->TextCol(4, 5, ' ' . $myrow1['customized_no']);
$rep->TextCol(6, 7, $myrow1['tranDate']);
$rep->TextCol(8, 9, $qty);
$rep->TextCol(10, 11, $stat);
$rep->NewLine();
}
}
$rep->NewLine(1);
$total = $total_invoice_qty + $total_credit_qty;
$rep->Font('bold');
$rep->TextCol(6, 7, _("Total"));
$rep->TextCol(8, 9, $total);
$rep->Line($rep->row + 10);
$rep->NewLine();
$total = 0;
$total_invoice_qty = 0;
$total_credit_qty = 0;
}
$rep->End();
}
function print_profit_and_loss_statement()
{
global $comp_path, $path_to_root;
include_once $path_to_root . "reporting/includes/pdf_report.inc";
$dim = get_company_pref('use_dimension');
$dimension = $dimension2 = 0;
$from = $_REQUEST['PARAM_0'];
$to = $_REQUEST['PARAM_1'];
$compare = $_REQUEST['PARAM_2'];
if ($dim == 2) {
$dimension = $_REQUEST['PARAM_3'];
$dimension2 = $_REQUEST['PARAM_4'];
$graphics = $_REQUEST['PARAM_5'];
$comments = $_REQUEST['PARAM_6'];
} else {
if ($dim == 1) {
$dimension = $_REQUEST['PARAM_3'];
$graphics = $_REQUEST['PARAM_4'];
$comments = $_REQUEST['PARAM_5'];
} else {
$graphics = $_REQUEST['PARAM_3'];
$comments = $_REQUEST['PARAM_4'];
}
}
if ($graphics) {
include_once $path_to_root . "reporting/includes/class.graphic.inc";
$pg = new graph();
}
$dec = 0;
$pdec = user_percent_dec();
$cols = array(0, 50, 200, 350, 425, 500);
//------------0--1---2----3----4----5--
$headers = array(tr('Account'), tr('Account Name'), tr('Period'), tr('Accumulated'), tr('Achieved %'));
$aligns = array('left', 'left', 'right', 'right', 'right');
if ($dim == 2) {
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Dimension') . " 1", 'from' => get_dimension_string($dimension), 'to' => ''), 3 => array('text' => tr('Dimension') . " 2", 'from' => get_dimension_string($dimension2), 'to' => ''));
} else {
if ($dim == 1) {
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to), 2 => array('text' => tr('Dimension'), 'from' => get_dimension_string($dimension), 'to' => ''));
} else {
$params = array(0 => $comments, 1 => array('text' => tr('Period'), 'from' => $from, 'to' => $to));
}
}
if ($compare == 0 || $compare == 2) {
$end = $to;
if ($compare == 2) {
$begin = $from;
$headers[3] = tr('Budget');
} else {
$begin = begin_fiscalyear();
}
} elseif ($compare == 1) {
$begin = add_months($from, -12);
$end = add_months($to, -12);
$headers[3] = tr('Period Y-1');
}
$rep = new FrontReport(tr('Profit and Loss Statement'), "ProfitAndLoss.pdf", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->Header();
$classname = '';
$group = '';
$totalper = 0.0;
$totalacc = 0.0;
$classper = 0.0;
$classacc = 0.0;
$salesper = 0.0;
$salesacc = 0.0;
$accounts = get_gl_accounts_all(0);
while ($account = db_fetch($accounts)) {
$per_balance = get_gl_trans_from_to($from, $to, $account["account_code"], $dimension, $dimension2);
if ($compare == 2) {
$acc_balance = get_budget_trans_from_to($begin, $end, $account["account_code"], $dimension, $dimension2);
} else {
$acc_balance = get_gl_trans_from_to($begin, $end, $account["account_code"], $dimension, $dimension2);
}
if (!$per_balance && !$acc_balance) {
continue;
}
if ($account['AccountClassName'] != $classname) {
if ($classname != '') {
$closeclass = true;
}
}
if ($account['AccountTypeName'] != $group) {
if ($group != '') {
$rep->Line($rep->row + 6);
$rep->row -= 6;
$rep->TextCol(0, 2, tr('Total') . " " . $group);
$rep->TextCol(2, 3, number_format2($totalper, $dec));
$rep->TextCol(3, 4, number_format2($totalacc, $dec));
$rep->TextCol(4, 5, number_format2(Achieve($totalper, $totalacc), $pdec));
if ($graphics) {
$pg->x[] = $group;
$pg->y[] = abs($totalper);
$pg->z[] = abs($totalacc);
}
$totalper = $totalacc = 0.0;
$rep->row -= $rep->lineHeight + 4;
if ($closeclass) {
$rep->Line($rep->row + 6);
$rep->row -= 6;
$rep->Font('bold');
$rep->TextCol(0, 2, tr('Total') . " " . $classname);
$rep->TextCol(2, 3, number_format2($classper, $dec));
$rep->TextCol(3, 4, number_format2($classacc, $dec));
$rep->TextCol(4, 5, number_format2(Achieve($classper, $classacc), $pdec));
$rep->Font();
$salesper += $classper;
$salesacc += $classacc;
$classper = $classacc = 0.0;
$rep->NewLine(3);
$closeclass = false;
}
}
if ($account['AccountClassName'] != $classname) {
$rep->Font('bold');
$rep->TextCol(0, 5, $account['AccountClassName']);
$rep->Font();
$rep->row -= $rep->lineHeight + 4;
}
$group = $account['AccountTypeName'];
$rep->TextCol(0, 5, $account['AccountTypeName']);
$rep->Line($rep->row - 4);
$rep->row -= $rep->lineHeight + 4;
}
$classname = $account['AccountClassName'];
$per_balance *= -1;
$acc_balance *= -1;
$totalper += $per_balance;
$totalacc += $acc_balance;
$classper += $per_balance;
$classacc += $acc_balance;
$rep->TextCol(0, 1, $account['account_code']);
$rep->TextCol(1, 2, $account['account_name']);
$rep->TextCol(2, 3, number_format2($per_balance, $dec));
$rep->TextCol(3, 4, number_format2($acc_balance, $dec));
$rep->TextCol(4, 5, number_format2(Achieve($per_balance, $acc_balance), $pdec));
$rep->NewLine();
if ($rep->row < $rep->bottomMargin + 3 * $rep->lineHeight) {
$rep->Line($rep->row - 2);
$rep->Header();
}
}
if ($account['AccountClassName'] != $classname) {
if ($classname != '') {
$closeclass = true;
}
}
if ($account['AccountTypeName'] != $group) {
if ($group != '') {
$rep->Line($rep->row + 6);
$rep->row -= 6;
$rep->TextCol(0, 2, tr('Total') . " " . $group);
$rep->TextCol(2, 3, number_format2($totalper, $dec));
$rep->TextCol(3, 4, number_format2($totalacc, $dec));
$rep->TextCol(4, 5, number_format2(Achieve($totalper, $totalacc), $pdec));
if ($graphics) {
$pg->x[] = $group;
$pg->y[] = abs($totalper);
$pg->z[] = abs($totalacc);
}
$rep->row -= $rep->lineHeight + 4;
if ($closeclass) {
$rep->Line($rep->row + 6);
$calculateper = $salesper + $classper;
$calculateacc = $salesacc + $classacc;
$rep->row -= 6;
$rep->Font('bold');
$rep->TextCol(0, 2, tr('Total') . " " . $classname);
$rep->TextCol(2, 3, number_format2($classper, $dec));
$rep->TextCol(3, 4, number_format2($classacc, $dec));
$rep->TextCol(4, 5, number_format2(Achieve($classper, $classacc), $pdec));
$rep->row -= $rep->lineHeight + 8;
$rep->TextCol(0, 2, tr('Calculated Return'));
$rep->TextCol(2, 3, number_format2($calculateper, $dec));
$rep->TextCol(3, 4, number_format2($calculateacc, $dec));
$rep->TextCol(4, 5, number_format2(Achieve($calculateper, $calculateacc), $pdec));
if ($graphics) {
$pg->x[] = tr('Calculated Return');
$pg->y[] = abs($calculateper);
$pg->z[] = abs($calculateacc);
}
$rep->Font();
$rep->NewLine();
}
}
}
$rep->Line($rep->row);
if ($graphics) {
global $decseps, $graph_skin;
$pg->title = $rep->title;
$pg->axis_x = tr("Group");
$pg->axis_y = tr("Amount");
$pg->graphic_1 = $headers[2];
$pg->graphic_2 = $headers[3];
$pg->type = $graphics;
$pg->skin = $graph_skin;
$pg->built_in = false;
$pg->fontfile = $path_to_root . "reporting/fonts/Vera.ttf";
$pg->latin_notation = $decseps[$_SESSION["wa_current_user"]->prefs->dec_sep()] != ".";
$filename = $comp_path . '/' . user_company() . "/pdf_files/test.png";
$pg->display($filename, true);
$w = $pg->width / 1.5;
$h = $pg->height / 1.5;
$x = ($rep->pageWidth - $w) / 2;
$rep->NewLine(2);
if ($rep->row - $h < $rep->bottomMargin) {
$rep->Header();
}
$rep->AddImage($filename, $x, $rep->row - $h, $w, $h);
}
$rep->End();
}
