/library/classes/rulesets/Cqm/library/AbstractCqmReport.php

<?php
// Copyright (C) 2011 Ken Chapple <ken@mi-squared.com>
//
// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License
// as published by the Free Software Foundation; either version 2
// of the License, or (at your option) any later version.
//
require_once( dirname(__FILE__)."/../../../../clinical_rules.php" );

abstract class AbstractCqmReport implements RsReportIF
{
    protected $_cqmPopulation;

    protected $_resultsArray = array();

    protected $_rowRule;
    protected $_ruleId;
    protected $_beginMeasurement;
    protected $_endMeasurement;

    public function __construct( array $rowRule, array $patientIdArray, $dateTarget )
    {
        // require all .php files in the report's sub-folder
        $className = get_class( $this );
        foreach ( glob( dirname(__FILE__)."/../reports/".$className."/*.php" ) as $filename ) {
            require_once( $filename );
        }
        // require common .php files
        foreach ( glob( dirname(__FILE__)."/../reports/common/*.php" ) as $filename ) {
            require_once( $filename );
        }
        // require clinical types
        foreach ( glob( dirname(__FILE__)."/../../../ClinicalTypes/*.php" ) as $filename ) {
            require_once( $filename );
        }

        $this->_cqmPopulation = new CqmPopulation( $patientIdArray );
        $this->_rowRule = $rowRule;
        $this->_ruleId = isset( $rowRule['id'] ) ? $rowRule['id'] : '';
        // Calculate measurement period
        $tempDateArray = explode( "-",$dateTarget );
        $tempYear = $tempDateArray[0];
        $this->_beginMeasurement = $tempDateArray[0] . "-01-01 00:00:00";
        $this->_endMeasurement = $tempDateArray[0] . "-12-31 23:59:59";
    }

    public abstract function createPopulationCriteria();

    public function getBeginMeasurement() {
        return $this->_beginMeasurement;
    }

    public function getEndMeasurement() {
        return $this->_endMeasurement;
    }
    
    public function getResults() {
        return $this->_resultsArray;
    }

    public function execute()
    {
        $populationCriterias = $this->createPopulationCriteria();
        if ( !is_array( $populationCriterias ) ) {
            $tmpPopulationCriterias = array();
            $tmpPopulationCriterias[]= $populationCriterias;
            $populationCriterias = $tmpPopulationCriterias;
        }

        foreach ( $populationCriterias as $populationCriteria )
        {
            if ( $populationCriteria instanceof CqmPopulationCrtiteriaFactory )
            {
                $initialPatientPopulationFilter = $populationCriteria->createInitialPatientPopulation();
                if ( !$initialPatientPopulationFilter instanceof CqmFilterIF ) {
                    throw new Exception( "InitialPatientPopulation must be an instance of CqmFilterIF" );
                }
                $denominator = $populationCriteria->createDenominator();
                if ( !$denominator instanceof CqmFilterIF ) {
                    throw new Exception( "Denominator must be an instance of CqmFilterIF" );
                }
                $numerators = $populationCriteria->createNumerators();
                if ( !is_array( $numerators ) ) {
                    $tmpNumerators = array();
                    $tmpNumerators[]= $numerators;
                    $numerators = $tmpNumerators;
                } 
                $exclusion = $populationCriteria->createExclusion();
                if ( !$exclusion instanceof CqmFilterIF ) {
                    throw new Exception( "Exclusion must be an instance of CqmFilterIF" );
                }

                $totalPatients = count( $this->_cqmPopulation );
                $initialPatientPopulation = 0;
                $denominatorPatientPopulation = 0;
                $exclusionsPatientPopulation = 0;
                $numeratorPatientPopulations = $this->initNumeratorPopulations( $numerators );
                foreach ( $this->_cqmPopulation as $patient ) 
                { 
                    if ( !$initialPatientPopulationFilter->test( $patient, $this->_beginMeasurement, $this->_endMeasurement ) ) 
                    {
                        continue;
                    }
                        
                    $initialPatientPopulation++;
                    
                    if ( !$denominator->test( $patient, $this->_beginMeasurement, $this->_endMeasurement ) ) 
                    { 
                        continue;
                    }
                            
                    $denominatorPatientPopulation++;

                    if ( $exclusion->test( $patient, $this->_beginMeasurement, $this->_endMeasurement ) )
                    {
                        $exclusionsPatientPopulation++;
                    }
                       
                    foreach ( $numerators as $numerator ) {
                        $this->testNumerator( $patient, $numerator, $numeratorPatientPopulations );
                    }
                }
                
                // tally results, run exclusion on each numerator
                $pass_filt = $denominatorPatientPopulation;
                $exclude_filt = $exclusionsPatientPopulation;
                foreach ( $numeratorPatientPopulations as $title => $pass_targ ) {
                    $percentage = calculate_percentage( $pass_filt, $exclude_filt, $pass_targ );
                    $this->_resultsArray[]= new CqmResult( $this->_rowRule, $title, $populationCriteria->getTitle(),
                        $totalPatients, $pass_filt, $exclude_filt, $pass_targ, $percentage );
                }
            }
        }

        return $this->_resultsArray;
    }
    
    private function initNumeratorPopulations( array $numerators )
    {
        $numeratorPatientPopulations = array();
        foreach ( $numerators as $numerator ) {
            $numeratorPatientPopulations[$numerator->getTitle()] = 0;
        }
        return $numeratorPatientPopulations;
    }

    private function testNumerator( $patient, $numerator, &$numeratorPatientPopulations )
    {
        if ( $numerator instanceof CqmFilterIF  ) 
        {
            if ( $numerator->test( $patient, $this->_beginMeasurement, $this->_endMeasurement ) ) {
                $numeratorPatientPopulations[$numerator->getTitle()]++;
            }
        } 
        else 
        {
            throw new Exception( "Numerator must be an instance of CqmFilterIF" );
        }
    }
}