nurunpdf.php

<?php 
require_once('nucommon.php'); 
require_once('fpdf/fpdf.php');
define('FPDF_FONTPATH','fpdf/font/');

$GLOBALS['nu_report']       = array();
$GLOBALS['nu_columns']      = array();
$GLOBALS['nu_files']        = array();

$jsonID                     = $_GET['i'];
$t                          = nuRunQuery("SELECT deb_message AS json FROM zzzsys_debug WHERE zzzsys_debug_id = ? ", array($jsonID));
$reportInfo                 = db_fetch_object($t);
$JSON                       = json_decode($reportInfo->json);
$pxREPORT                   = json_decode($JSON->sre_layout);

if($JSON->sre_zzzsys_sql == ''){
	$DATA                   = $JSON->slp_php;
	$ID             	= $JSON->zzzsys_php_id;
	$DATA           	= nuGetSafePHP('slp_php', $ID, $DATA);
}else{

	$DATA                   = $JSON->sre_zzzsys_sql;
}

$TABLE_ID                   = nuTT();
$GLOBALS['TABLE_ID']        = $TABLE_ID;
$hashData                   = nuBuildHashData($JSON, $TABLE_ID);

nuRunQuery("DELETE FROM zzzsys_debug WHERE zzzsys_debug_id = ? ", array($jsonID));

$PDF                        = new FPDF($pxREPORT->orientation, 'mm', $pxREPORT->paper);
$PDF->SetAutoPageBreak(false);



$fonts      = explode("\n", trim($GLOBALS['nuSetup']->set_fonts));

for($i = 0 ; $i < count($fonts) ; $i ++){

    if(trim($fonts[$i]) != ''){
        $PDF->AddFont($fonts[$i], '' , strtolower($fonts[$i]) . '.php');
        $PDF->AddFont($fonts[$i], 'B', strtolower($fonts[$i]) . '.php');
        $PDF->AddFont($fonts[$i], 'I', strtolower($fonts[$i]) . '.php');
    }

}

$REPORT                     = nuSetPixelsToMM($pxREPORT);

$PDF->SetMargins(1,1,1);

$createTable                 = nuReplaceHashes($DATA, $hashData);

if($JSON->sre_zzzsys_sql == ''){
	eval($createTable);                                                              //-- build temp table for report from php
}else{
	nuRunQuery('CREATE TABLE ' . $hashData['TABLE_ID'] . ' ' . $createTable);        //-- build temp table for report from sql
}

$GLOBALS['nu_columns']       = nuAddCriteriaValues($hashData);

nuRunQuery("ALTER TABLE $TABLE_ID ADD `nu__id` INT NOT NULL AUTO_INCREMENT PRIMARY KEY FIRST");

nuBuildReport($PDF, $REPORT, $TABLE_ID);
$hashData['nu_pages']        = nuGetTotalPages();
nuReplaceLabelHashVariables($REPORT, $hashData);

nuPrintReport($PDF, $REPORT, $GLOBALS['nu_report'], $JSON);

nuRunQuery("DROP TABLE IF EXISTS $TABLE_ID");
nuRunQuery("DROP TABLE IF EXISTS $TABLE_ID".'_nu_summary');
$PDF->Output('nureport.pdf', 'I');

nuRemoveFiles();

function nuPrintReport($PDF, $LAY, $DATA, $JSON){

    $lastSectionTop = 10000;
    $pageNumber     = 0;
    
    for($s = 0 ; $s < count($DATA) ; $s++){
        
        if($lastSectionTop > $DATA[$s]->sectionTop){$pageNumber++;}
        $lastSectionTop=$DATA[$s]->sectionTop;
        for($o = 0 ; $o < count($DATA[$s]->objects) ; $o++){

            $O               = nuGetObjectProperties($LAY, $DATA[$s]->objects[$o]->id);
            
            if($O->objectType == 'label'){
                $DATA[$s]->objects[$o]->lines[0] = str_replace('#page#' , $pageNumber, $DATA[$s]->objects[$o]->lines[0]);
            }
        }

    }

    for($s = 0 ; $s < count($DATA) ; $s++){
        
        for($o = 0 ; $o < count($DATA[$s]->objects) ; $o++){

            $O                = nuGetObjectProperties($LAY, $DATA[$s]->objects[$o]->id);
            
            if($O->objectType == 'label'){
            
                $label        = $DATA[$s]->objects[$o]->lines[0];

                $label        = str_replace('#pages#',       $pageNumber, $label);
                $label        = str_replace('#description#', $JSON->sre_description, $label);
                $label        = str_replace('#code#',        $JSON->sre_code, $label);
                $label        = str_replace('#year#',        date('y'), $label);
                $label        = str_replace('#month#',       date('m'), $label);
                $label        = str_replace('#day#',         date('d'), $label);
                $label        = str_replace('#hour#',        date('h'), $label);
                $label        = str_replace('#minute#',      date('i'), $label);
                $label        = str_replace('#second#',      date('s'), $label);
                
                $DATA[$s]->objects[$o]->lines[0] = $label;
            }
        }
        
    }

    $lastSectionTop = 10000;
    
    for($s = 0 ; $s < count($DATA) ; $s++){
        
        if($lastSectionTop > $DATA[$s]->sectionTop){
    
            $PDF->AddPage();
            
        }

        $lastSectionTop      = $DATA[$s]->sectionTop;
        $grp                 = $DATA[$s]->group;
        $sec                 = $DATA[$s]->section;
        $color               = $LAY->groups[$grp]->sections[$sec]->color;

        nuPrintBackground($PDF, $DATA[$s]->sectionTop, $DATA[$s]->sectionHeight, $color);
        
		for($o = 0 ; $o < count($DATA[$s]->objects) ; $o++){

			$O               = nuGetObjectProperties($LAY, $DATA[$s]->objects[$o]->id);
			if($O->objectType == 'field' or $O->objectType == 'label'){
				nuPrintField($PDF, $DATA[$s], $DATA[$s]->objects[$o], $O, $LAY);
			}
			if($O->objectType == 'image'){
				nuPrintImage($PDF, $DATA[$s], $DATA[$s]->objects[$o], $O);                                                           //-- print graphic
			}
		}
        
    }
}


function nuBuildReport($PDF, $REPORT, $TABLE_ID){

    $groupBy                                = array();
    $groups                                 = array();
    $sectionValue                           = array();
    $print_group                            = 1;
    $order_by                               = '';
    $group_by                               = '';
    $order['a']                             = 'asc ';
    $order['d']                             = 'desc ';
    
    for($i = 3 ; $i < 8 ; $i++){
        if($REPORT->groups[$i]->sortField != ''){              //-- loop through groups
            
            $order_by                       = ' ORDER BY ';
            $groupBy[]                      = $REPORT->groups[$i]->sortField . ' ' . $order[$REPORT->groups[$i]->sortBy];
            $groups[]                       = $REPORT->groups[$i]->sortField;
            nuRunQuery("ALTER TABLE $TABLE_ID  ADD INDEX `".$REPORT->groups[$i]->sortField."` (`".$REPORT->groups[$i]->sortField."`)");
        
        }
    
    }
    $group_by                               = implode(',', $groupBy);
    $DATA                                   = nuRunQuery("SELECT * FROM $TABLE_ID $order_by $group_by");
    nuMakeSummaryTable($REPORT, $TABLE_ID);
    $sectionTop                             = 0;
    $ROW                                    = db_fetch_array($DATA);                                                         //-- first row
//======================================================    
//      REPORT HEADER
//======================================================    
    $S                                      = new nuSECTION($PDF, $ROW, $REPORT, 1, 0, 0);                                   //-- report header
    $sectionTop                             = $S->buildSection();
    $firstRecord                            = true;

//======================================================    
//      PAGE HEADER
//======================================================    
    $S                                      = new nuSECTION($PDF, $ROW, $REPORT, 2, 0, $sectionTop);                                   //-- page header
    $sectionTop                             = $S->buildSection();
    $firstRecord                            = true;

//======================================================    
//      FIRST SECTION HEADERS
//======================================================    
    for($g = 0 ; $g < count($groups) ; $g++){
        
        $S                                  = new nuSECTION($PDF, $ROW, $REPORT, 3 + $g, 0, $sectionTop);                   //-- section headers
        $sectionTop                         = $S->buildSection();
        $sectionValue[$groups[$g]]          = $ROW[$groups[$g]];
    
    }

//======================================================    
//      LOOP THROUGH TABLE
//======================================================    
    $DATA                                   = nuRunQuery("SELECT * FROM (SELECT * FROM $TABLE_ID $order_by $group_by) AS tmp ");
    while($ROW = db_fetch_array($DATA)){
    
        if(!$firstRecord){
            
            $backUpTo                       = nuLowestGroupChange($sectionValue, $ROW, $groups);
            
//======================================================    
//      FOOTERS AND HEADERS AS GROUPS CHANGE
//======================================================    
            for($g = count($groups) - 1 ; $g >= $backUpTo ; $g--){

                $S                           = new nuSECTION($PDF, $lastROW, $REPORT, 3 + $g, 1, $sectionTop);                   //-- section footers
                $sectionTop                  = $S->buildSection();
                $sectionValue[$groups[$g]]   = $ROW[$groups[$g]];

            }
            
            for($g = $backUpTo ; $g < count($groups) ; $g++){
                
                $S                           = new nuSECTION($PDF, $ROW, $REPORT, 3 + $g, 0, $sectionTop);                   //-- section headers
                $sectionTop                  = $S->buildSection();
                $sectionValue[$groups[$g]]   = $ROW[$groups[$g]];

            }
            
        }
    
//======================================================    
//      DETAIL SECTION
//======================================================    
        $S                                  = new nuSECTION($PDF, $ROW, $REPORT, 0, 0, $sectionTop);
        $sectionTop                         = $S->buildSection();
        $lastROW                            = $ROW;
        $firstRecord                        = false;
    }
    
//======================================================    
//      LAST GROUP FOOTERS
//======================================================    
    for($g = count($groups) - 1 ; $g > -1 ; $g--){

        $S                                  = new nuSECTION($PDF, $lastROW, $REPORT, 3 + $g, 1, $sectionTop);                   //-- section footers
        $sectionTop                         = $S->buildSection();

    }
            
//======================================================    
//      REPORT FOOTER
//======================================================    
    $S                                      = new nuSECTION($PDF, $lastROW, $REPORT, 1, 1, $sectionTop);
    $sectionTop                             = $S->buildSection();

}    




function nuLowestGroupChange($lastROW, $thisROW, $groups){   //-- lowest = group 3
    
    $lastString              = '';
    $thisString              = '';
    
    for($g = 0 ; $g < count($groups) ; $g ++){
        
        if($lastROW[$groups[$g]] != $thisROW[$groups[$g]]){
            
            return $g;
            
        }
    }
    
    return count($groups);
    
}



//================================================================================
//            Classes
//================================================================================



class nuSECTION{

    public $group             = 0;
    public $section           = 0;
    public $sectionHeight     = 0;
    public $sectionTop        = 0;
    public $O                 = array();
    public $PDF               = array();
    public $ROW               = array();
    public $LAY               = array();
    public $SECTIONS          = array();                                             //-- this Section split over pages
    public $OBJECTS           = array();
    public $TABLE_ID          = '';
	
    function __construct($PDF, $ROW, $LAY, $group, $section, $sectionTop){
    
        $this->PDF            = $PDF;
        $this->ROW            = $ROW;
        $this->LAY            = $LAY;
        $this->TABLE_ID       = $GLOBALS['TABLE_ID'];
        $this->group          = $group;
        $this->section        = $section;
        $this->O              = $this->LAY->groups[$group]->sections[$section]->objects;
        $this->pageHeight     = $this->LAY->height;
        $this->sectionTop     = $sectionTop;
        $this->sectionHeight  = $this->LAY->groups[$group]->sections[$section]->height;
    }

    public function buildSection(){
        $this->O              = $this->setObjectLines($this->O);
        $nextTop              = $this->chopSectionOverPages();
        $GLOBALS['nu_report'] = array_merge($GLOBALS['nu_report'], $this->SECTIONS);
            
        return $nextTop;
        
    }
    
	
	private function nuGetFormatting($O){
	
		$f                     = array();
		$f['B']                = '';
		$f['F']                = '';
		$f['S']                = '';
		$v                     = $this->ROW[$O->fieldName];
	
		while(substr($v,0,1) == '#' and substr($v,2,1) == '#' and substr($v,9,1) == '|'){       //-- conditional formatting used
			$f[strtoupper(substr($v,1,1))] = substr($v,3,6);                                    //-- set background color, font color or font style
			$v                 = substr($v,10);                                                 //-- chop format off
		}
		
		$f['V']                = $v;                                                            //-- all formatting removed
		
		return $f;
	}
	
	
    private function setObjectLines($O, $stopGrow = false){

        for($i = 0 ; $i < count($O) ; $i++){
        
            $O[$i]->path                        = '';
            
            if($O[$i]->objectType == 'field' or $O[$i]->objectType == 'label'){

				if($O[$i]->objectType == 'field'  and substr($this->ROW[$O[$i]->fieldName],0,1) == '#' and substr($this->ROW[$O[$i]->fieldName],2,1) == '#' and substr($this->ROW[$O[$i]->fieldName],9,1) == '|'){       //-- conditional formatting used
				
					$format                     = $this->nuGetFormatting($O[$i]);
					
					if($format['B'] != ''){
						$O[$i]->B               = '#' . $format['B'];
					}
					if($format['F'] != ''){
						$O[$i]->F               = '#' . $format['F'];
					}
					
				}
			
            
                $O[$i]->LINES                   = $this->getObjectRows($O[$i], $stopGrow);
                
            }else if($O[$i]->objectType == 'image'){                                        //-- image

				$O[$i]->LINES                   = array('');
                $path                           = '';
                $im                             = $O[$i]->image;
                
                if(nuIsField($im)){                                                               //-- name of field in $GLOBALS['TABLE_ID']
                
                    $fld                        = $this->ROW[$im];
                    
                    if(nuIsRecord($fld)){                                                         //-- valid code in zzzsys_file
                    
                        $path                   = nuCreateFile($fld);
                        $GLOBALS['nu_files'][]  = $path;
                        
                    }else if(nuIsFile($fld)){                                                     //-- valid file path
                    
                        $path                   = $fld;
                        
                    }
                    
                }else{
                
                    if(nuIsRecord($im)){                                                          //-- valid code in zzzsys_file
                    
                        $path                   = nuCreateFile($im);
                        $GLOBALS['nu_files'][]  = $path;
                        
                    }else if(nuIsFile($im)){                                                      //-- valid file path
                    
                        $path                   = $im;

                    }
                    
                }

                $O[$i]->path              = $path;
            }

        }
        return $O;
    }

    private function chopSectionOverPages(){
        $sectionObjects                       = array();
        $sectionTop                           = $this->sectionTop;
        $objectParts                          = array();
        $pages                                = 0;
        $expandedSectionHeight                = $this->sectionHeight + $this->extendedHeight() - .25;
        $pageBreak                            = 0;
        if( property_exists($this->LAY->groups[$this->group]->sections[$this->section], 'page_break') ) {
            $pageBreak                            = $this->LAY->groups[$this->group]->sections[$this->section]->page_break;
        }

        for($i = 0 ; $i < count($this->O) ; $i++){
            $sectionObjects[]                 = $this->O[$i]->id;
        }

        for($i = 0 ; $i < count($this->O) ; $i++){
        
            $OID                              = $this->O[$i]->id;
            $availableHeight                  = $this->paperBottom() - $sectionTop - $this->O[$i]->top;

            while(count($this->O[$i]->LINES) > 0){

                
                if(($this->paperBottom() - $sectionTop < $this->sectionHeight) or $pageBreak == 1){          //-- if a section's original height won't fit, start a new page.
                
                    if("$this->group$this->section" != '10'){                                            //-- the report header
                    
                        $this->pageHeaderFooter(1);
                        $this->pageHeaderFooter(0);

                    }
                    $sectionTop               = $this->paperTop();
                    $availableHeight          = $this->paperBottom() - $this->paperTop();
                    $pageBreak                = 0;
                }
                
				if($this->O[$i]->height == 0){
					$fit                      = $availableHeight;
				}else{
					$fit                      = floor($availableHeight / $this->O[$i]->height);            //-- rows that will fit this page
				}
				
                $o                            = pdfObject($this->O[$i]->id, $this->O[$i]->top);            //-- create Object
				
				if(isset($this->O[$i]->B)){$o->B = $this->O[$i]->B;$this->O[$i]->B = null;}
				if(isset($this->O[$i]->F)){$o->F = $this->O[$i]->F;$this->O[$i]->F = null;}
				
                $fittingLines                 = array_splice($this->O[$i]->LINES, 0, $fit);                //-- get rows
                $o->lines                     = $fittingLines;                                             //-- add rows
                $o->path                      = $this->O[$i]->path;                                        //-- add path
                
                if($fit > 0){
                    $objectParts[$OID][]          = $o;                                                        //-- add Object
                }else{
                    $sectionTop                   = $this->paperTop();
                }

                $availableHeight              = $this->paperBottom() - $this->paperTop();
                
            }

            $pages                            = Max($pages, count($objectParts[$OID]));

        }
        
        for($i = 0 ; $i < $pages ; $i++){
        
            $sectionTop                       = $i == 0           ? $sectionTop            : $this->paperTop();                  //-- first page
            $sectionHeight                    = $i + 1 == $pages  ? $expandedSectionHeight : $this->paperBottom() - $sectionTop; //-- last page
            
            $expandedSectionHeight            = $expandedSectionHeight - $sectionHeight;

            $s                                = pdfSection($this->group, $this->section, $sectionTop, $sectionHeight);
            $sectionTop                       = $sectionTop + $sectionHeight;
            $os                               = array();
            
            for($obj = 0 ; $obj < count($sectionObjects) ; $obj++){
            
                if(count($objectParts[$sectionObjects[$obj]]) <= $pages){
                    $os[]                     = $objectParts[$sectionObjects[$obj]][$i];
                }
                
            }
            
            $s->objects                       = $os;                                                                         //-- add objects to section
            $this->SECTIONS[]                 = $s;
            
            if($expandedSectionHeight > 0){
            
                $s                            = pdfSection($this->group, $this->section, $sectionTop, $expandedSectionHeight);
                $sectionTop                   = $sectionTop + $expandedSectionHeight;
                $os                           = array();
                $s->objects                   = $os;                                                                         //-- add objects to section
                $this->SECTIONS[]             = $s;
                
            }

            if($sectionTop >= $this->paperBottom()){

                if("$this->group$this->section" != '10'){                                                                  //-- the report header
                
                    $this->pageHeaderFooter(1);
                    
                    if($i + 1 != $pages){
                    
                        $this->pageHeaderFooter(0);
                        
                    }
                }
            }
        }
        
        if("$this->group$this->section" == '11'){                                                                         //-- the report footer
            $this->pageHeaderFooter(1);
        }
        
        return $sectionTop;

    }


    
    private function pageHeaderFooter($section){                                 //-- 0 = header 1 = footer

        $S                 = $this->LAY->groups[2]->sections[$section];
        $O                 = $this->setObjectLines($S->objects, true);
        $newOs             = array();
        
        for($i = 0 ; $i < count($O) ; $i ++){
        
            $newO          = pdfObject($O[$i]->id, $O[$i]->top);                 //-- create Object
            $newO->lines   = $O[$i]->LINES;
            $newOs[]       = $newO;
            
        }
        
        $newsec            = pdfSection(2, $section, $section == 0 ? 0 : $this->pageHeight - $S->height, $S->height);
        $newsec->objects   = $newOs;                                                                         //-- add objects to section
        $this->SECTIONS[]  = $newsec;
    
    }
    
    private function extendedHeight(){
    
        if(count($this->O) == 0){return 0;}
        
        $bottomMostObject          = 0;
        $bottomID                  = 0;

        for($i = 0 ; $i < count($this->O) ; $i++){
        
            $thisBottom            = $this->O[$i]->top + (count($this->O[$i]->LINES) * $this->O[$i]->height);
            
            if($bottomMostObject < $thisBottom){                                                                //-- if $i goes lower
                $bottomID          = $i;
                $bottomMostObject  = $thisBottom;
            }
            
        }

        $extend                    = (count($this->O[$bottomID]->LINES) - 1) * $this->O[$bottomID]->height;
        
        return $extend;

    }

    
    private function paperTop(){
        
        if(($this->group == 1 or $this->group == 2) and $this->section == 0){                                   //-- report or page header
            return 0;
        }else{
            return $this->LAY->groups[2]->sections[0]->height+1;
        }
        
    }
    
    private function paperBottom(){
        
        if(($this->group == 1 and $this->section == 0) or ($this->group == 2 and $this->section == 1)){         //-- report header or page footer
            return $this->pageHeight;
        }else{
            return $this->pageHeight - $this->LAY->groups[2]->sections[1]->height;                          //-- start of page footer
        }
        
    }
    
    private function getObjectRows($O, $stopGrow){

//-- break one Object's paragraph into lines

        $rows               = array();

        if($O->objectType == 'field'){
		
            $text           = $this->nuGetFieldValue($O);
            
            $lineNoNR       = str_replace ("\n\r", "\r", $text);
            $lineNoRN       = str_replace ("\r\n", "\r", $lineNoNR);
            $lineJustR      = str_replace ("\n", "\r", $lineNoRN);
            $lines          = explode("\r", $lineJustR);                               //-- add empty array elements for carriage returns
            
        }else{
            
            $lines          = array($O->fieldName);
            
        }

        for($i = 0 ; $i < count($lines) ; $i ++){                                      //-- loop through current lines
            
            $thisLine       = $lines[$i];
            $forceRow       = true;

            while(strlen($thisLine) > 0){
                
                $result    = $this->getOneRow($thisLine, $O);
                $rows[]    = trim($result[0]);                                          //-- return row as a string [0]
                $thisLine  = $result[1];                                                //-- and then remaining paragraph as a string [1]
                $forceRow  = false;
                
            }

            if($forceRow){
                $rows[]    = '';                                                       //-- return row as a string [0]
                $thisLine  = '';                                                       //-- and then remaining paragraph as a string [1]
            }

        }
        
        if($stopGrow){                                                                 //-- return just 1 row
        
            return array($rows[0]);
            
        }
        
        if($O->minRows > 0){                                                           //-- must be a minimum size

            while (count($rows) < $O->minRows){
            
                $rows[] = ' ';
                
            }
        }
        
        if($O->maxRows > 0){                                                           //-- must not have more rows than this
        
            $rows      = array_splice($rows, 0, $O->maxRows);

        }
        
		if($O->minRows == -1 and $rows[0] == '' ){                                    //-- reduce height to zero 
			$rows = array();
		}

		return $rows;
        
        
    }


    private function getOneRow($text, $O){

//-- return an array 
//-- 0 = a line that fits within the width of the Object        
//-- 1 = remaining part of the paragraph
        $this->PDF->SetFont($O->fontFamily, $O->fontWeight, $O->fontSize);
        
        if($O->width - 2 > $this->PDF->GetStringWidth($text)){                         //-- all paragraph fits in 1 line
            return array($text, '');
        }

        $to             = 1;
        while($O->width - 2 > $this->PDF->GetStringWidth(substr($text, 0, $to))){       //-- keep getting wider until too wide
            $to++;
        }

        $widestLine         = substr($text, 0, $to);
        $foundSeperator     = false;
        $foundLongestWord   = false;
        $wordSplit          = $to;

        for($i = strlen($widestLine) - 1 ; $i > 1 ; $i--){
            if (!$foundLongestWord && $this->PDF->GetStringWidth(substr($widestLine, 0, $i)) < $O->width - 2) {
                $wordSplit          = $i;
                $foundLongestWord   = true;
            }
            $break = strpos(", ;-", $widestLine[$i]);                                                                                       //-- look for breakable points

            if($break === false){
            }else{
                $to             = $i;
                $foundSeperator = true;
                break;
            }
        }

        if (!$foundSeperator)
            $to = $wordSplit;

        $remaining      = substr($text, $to);
        $line           = substr($text, 0, $to);                                                                                                 //-- add empty array elements for carriage returns

        return array($line, $remaining);
        
    }
    
    private function nuGetFieldValue($O){

        $type               = '';
        $value              = '';

        if(strtoupper(substr($O->fieldName,0,4)) == 'SUM('){
            $type           = 's';
            $field          = substr($O->fieldName,4, -1);
        }
        if(strtoupper(substr($O->fieldName,0,8)) == 'AVERAGE('){
            $type           = 'p';
            $fields         = explode(',', substr($O->fieldName, 8, -1));
        }
        if($type == ''){                                                                //-- normal value
	
		//Add the 'is_array' check by SG 8th May 2015	
		if ( is_array($this->ROW) ) {	    
			if(array_key_exists($O->fieldName, $this->ROW)) {
				$v = $this->nuGetFormatting($O);
                		$value = mb_convert_encoding($v['V'], "WINDOWS-1252", "UTF-8");
            		}
		}

        }else{                                                                          //-- summed value
            $groups         = array();
            $where          = '';
            
            if($type == 'p'){
                
                $count      = 'SUM(nu_sum_'.trim($fields[0]).') AS the_sum_a, SUM(nu_sum_'.trim($fields[1]).') AS the_sum_b';
            }else{
                $count      = 'SUM(nu_sum_'.trim($field).') AS the_sum_a';
            }
            for($i = 3 ; $i <= $this->group ; $i++){

                $groups[]   = $this->LAY->groups[$i]->sortField . " = '" . str_replace("'", "\\'", $this->ROW[$this->LAY->groups[$i]->sortField] ) . "'";
                $where      = ' WHERE ';

            }

            $sql            = "SELECT $count FROM $this->TABLE_ID"."_nu_summary $where " . implode(' AND ',$groups);
            $t              = nuRunQuery($sql);
            $r              = db_fetch_row($t);
            
            if($r[1] == 0 and $type == 'p'){
                
                $value      = 0;
                
            }else{
                
                if($type == 'p'){
                    
//                    $value  = ($r[0] / $r[1]) * 100;
                    $value  = ($r[0] / $r[1]);
                    
                }else{
                    
                    $value  = $r[0];
                    
                }
            }
            
        }
        
        if($O->format != ''){                                                            //-- format value
            
            $format      = nuTextFormats();
            $datatype    = $format[$O->format]->type;

            if ($datatype == 'date') {
				if($value != '0000-00-00' && $value != '') {
					$value    = 	date($format[$O->format]->phpdate,strtotime($value));
				} else {
					$value = '';
				}
            }
            if ($datatype == 'number') {
                $value   = number_format($value , $format[$O->format]->format ,$format[$O->format]->decimal , $format[$O->format]->separator);
            }
            
        }

        return $value;

    }        
}


//================================================


function pdfSection($g, $s, $t, $h){  //-- section

	$c                = new stdClass;  
	$c->objects       = array();
    $c->group         = $g;
    $c->section       = $s;
    $c->sectionTop    = $t;
    $c->sectionHeight = $h;

    return $c;

}

function pdfObject($id, $t){

	$c             = new stdClass;  
	$c->lines      = array();
	$c->id         = $id;
	$c->top        = $t;
	$c->path       = '';

    return $c;

}


function nuSetPixelsToMM($pxREPORT){

    $ratio = .25;
    
    for($g = 0 ; $g < count($pxREPORT->groups) ; $g++){
        
        for($s = 0 ; $s < count($pxREPORT->groups[$g]->sections) ; $s++){
            
            $pxREPORT->groups[$g]->sections[$s]->height                          = $pxREPORT->groups[$g]->sections[$s]->height                * $ratio;

            for($o = 0 ; $o < count($pxREPORT->groups[$g]->sections[$s]->objects) ; $o++){
                
                $pxREPORT->groups[$g]->sections[$s]->objects[$o]->fontSize       = $pxREPORT->groups[$g]->sections[$s]->objects[$o]->fontSize;
                $pxREPORT->groups[$g]->sections[$s]->objects[$o]->height         = $pxREPORT->groups[$g]->sections[$s]->objects[$o]->height   * $ratio;
                $pxREPORT->groups[$g]->sections[$s]->objects[$o]->left           = $pxREPORT->groups[$g]->sections[$s]->objects[$o]->left     * $ratio;
                $pxREPORT->groups[$g]->sections[$s]->objects[$o]->top            = ($pxREPORT->groups[$g]->sections[$s]->objects[$o]->top)     * $ratio;
                $pxREPORT->groups[$g]->sections[$s]->objects[$o]->width          = $pxREPORT->groups[$g]->sections[$s]->objects[$o]->width    * $ratio;
            }
        }
        
    }

    return $pxREPORT;
}




function nuPrintBackground($PDF, $sectionTop, $sectionHeight, $color){

    $backcolor                   = hex2rgb($color);
    
    $PDF->SetFillColor($backcolor[0], $backcolor[1], $backcolor[2]);
    $PDF->Rect(0, $sectionTop, 1000, $sectionHeight, 'F');

}



function nuGetObjectProperties($REPORT, $id){

    for($g = 0 ; $g < count($REPORT->groups) ; $g++){
        for($s = 0 ; $s < count($REPORT->groups[$g]->sections) ; $s++){
            for($o = 0 ; $o < count($REPORT->groups[$g]->sections[$s]->objects) ; $o++){
                if($REPORT->groups[$g]->sections[$s]->objects[$o]->id   == $id)
                    return $REPORT->groups[$g]->sections[$s]->objects[$o];
            }
        }
    }
    
    return '';
}



function nuPrintField($PDF, $S, $contents, $O, $LAY){

    $PROP              = nuGetObjectProperties($LAY, $O->id);
    $fontFamily        = $PROP->fontFamily;
    $fontWeight        = $PROP->fontWeight;
    $fontSize          = $PROP->fontSize;
    $borderWidth       = $PROP->borderWidth;
    $borderColor       = $PROP->borderColor;
    $backgroundColor   = $PROP->backgroundColor;
    $fontColor         = $PROP->fontColor;
    $width             = $PROP->width;
    $height            = $PROP->height;
    $textAlign         = strtoupper($PROP->textAlign[0]);
    $left              = $PROP->left;
    $top               = $S->sectionTop + $contents->top;
	
	if(isset($contents->B)){$backgroundColor = $contents->B;}
	if(isset($contents->F)){$fontColor       = $contents->F;}

    
    $PDF->SetFont($fontFamily, $fontWeight, $fontSize, '', false);
    $PDF->SetLineWidth($borderWidth / 5);

    $drawcolor         = hex2rgb($borderColor);
    $backcolor         = hex2rgb($backgroundColor);
    $textcolor         = hex2rgb($fontColor);

    $PDF->SetDrawColor($drawcolor[0], $drawcolor[1], $drawcolor[2]);
    $PDF->SetTextColor($textcolor[0], $textcolor[1], $textcolor[2]);
    $PDF->SetXY($left, $top);
    $PDF->SetFillColor(255, 255, 255);
    $PDF->SetFillColor($backcolor[0], $backcolor[1], $backcolor[2]);
    
    $PDF->MultiCell($width, $height, implode("\n", $contents->lines), $borderWidth == 0 ? 0 : 1, $textAlign, true); 
	
}

function nuPrintImage($PDF, $S, $contents, $O){

	$width             = $O->width;
	$height            = $O->height;
	$left              = $O->left;
	$path              = $contents->path;
	$top               = $S->sectionTop + $contents->top;

	if($O->path != ''){
		$PDF->Image($O->path, $left, $top, $width, $height);
	}

}

function nuGetTotalPages(){
    
    $pages                     = 0;
    for($i = 0 ; $i < count($GLOBALS['nu_report']) ; $i++){
        if($GLOBALS['nu_report'][$i]->sectionTop == 0){
            $pages++;
        }
    }
    
    return $pages;
}


function nuReplaceLabelHashVariables($LAY, $hashData){
    
    for($i = 0 ; $i < count($GLOBALS['nu_report']) ; $i++){

        for($o = 0 ; $o < count($GLOBALS['nu_report'][$i]->objects) ; $o++){

            $O = nuGetObjectProperties($LAY, $GLOBALS['nu_report'][$i]->objects[$o]->id);
        
            if($O->objectType == 'label'){
                for($l = 0 ; $l < count($GLOBALS['nu_report'][$i]->objects[$o]->lines) ; $l++){
                    $GLOBALS['nu_report'][$i]->objects[$o]->lines[$l] = nuReplaceHashes($GLOBALS['nu_report'][$i]->objects[$o]->lines[$l], $hashData);
                    
                }
            }
        }
    }
    
}

function nuMakeSummaryTable($REPORT, $TABLE_ID){
    
    $sum              = array();
    $field            = array();
    
    for($i = 3 ; $i < 8 ; $i++){
    
        if($REPORT->groups[$i]->sortField != ''){              //-- loop through groups
        
            $groups[] = $REPORT->groups[$i]->sortField;
        
        }
    
    }
    
    
    for($g = 0 ; $g < count($REPORT->groups) ; $g++){
        
        for($s = 0 ; $s < count($REPORT->groups[$g]->sections) ; $s++){
            
            for($o = 0 ; $o < count($REPORT->groups[$g]->sections[$s]->objects) ; $o++){
                
                $obj = $REPORT->groups[$g]->sections[$s]->objects[$o];

                if($obj->objectType == 'field'){
                    if(strtoupper(substr($obj->fieldName,0,4)) == 'SUM('){
                        $sum[substr($obj->fieldName,4, -1)]  = substr($obj->fieldName,4, -1);
                    }
                    if(strtoupper(substr($obj->fieldName,0,8)) == 'AVERAGE('){
                        $ex                                   = explode(',',substr($obj->fieldName, 8, -1));
                        $sum[trim($ex[0])]  = trim($ex[0]);
                        $sum[trim($ex[1])]  = trim($ex[1]);
                    }
                }
                
            }
        }
        
    }
    
    foreach ($sum as $k => $v) {
    
        $field[] = "SUM(`$v`) AS `nu_sum_$v` ";
        
    }
    
    if(count($field) > 0 and count($groups) > 0){   //-- a reason to have a summary table
        
        nuRunQuery("CREATE TABLE $TABLE_ID"."_nu_summary SELECT count(*) as nu_count, " . implode(',',$field) . ", " . implode(',',$groups) . " FROM $TABLE_ID group by " . implode(',',$groups));
        
        for($i = 0 ; $i < count($groups) ; $i++){

            nuRunQuery("ALTER TABLE $TABLE_ID"."_nu_summary  ADD INDEX `".$groups[$i]."` (`".$groups[$i]."`)");

        }
    
    }
    
}


function nuAddCriteriaValues($hashData){

    $T = $GLOBALS['TABLE_ID'];
    $c = db_columns($T);
    $a = array();

    foreach($hashData AS $key => $value){
    
	//Changed by SG 1 May 2015
	/*
        if(!in_array($key, $c) and !is_array($value)){
            $v   = substr(addslashes($value),0,199);
            $l   = min(strlen($v), 200);
            if($l > 0){
                $a[] = " ADD `$key` VARCHAR($l) DEFAULT '$v' ";
            }
            $c[] = strtolower($key);
        }
	*/
	if( !in_array($key, $c) and !is_array($value) and !is_object($value) ){
            $v   = substr(addslashes($value),0,199);
            if(substr($v,(strlen($v)-1),1) == '\\')
                $v = substr($v,0,strlen($v)-1);
            $l   = min(strlen($v), 200);
            if($l > 0){
                $a[] = " ADD `$key` VARCHAR($l) DEFAULT '$v' ";
            }
            $c[] = strtolower($key);
        }

        
    }
    
    if(count($a) > 0){
        nuRunQuery("ALTER TABLE $T " . implode(',', $a)); 
    }
    
    return $c;

}

function nuIsField($i){

    return in_array($i, $GLOBALS['nu_columns']);
    
}

function nuIsRecord($i){

    $t = nuRunQuery("SELECT zzzsys_file_id FROM zzzsys_file WHERE sfi_code = ? ", array($i));
    $r = db_fetch_object($t);
    
    
    if($r=='') return false;
    else return $r->zzzsys_file_id != '';
    
}


function nuIsFile($i){

    $file_headers = @get_headers($i);

    if($file_headers[0] == 'HTTP/1.0 404 Not Found'){
          return false;
    } else if ($file_headers[0] == 'HTTP/1.0 302 Found'){
          return false;
    } else {
          return true;
    }    
}


function nuRemoveFiles(){

    for($i = 0 ; $i < count($GLOBALS['nu_files']) ; $i++){
        unlink($GLOBALS['nu_files'][$i]);
    }
    
}

//-- was 1150 lines long
?>