Ejemplo n.º 1
0
     if ($b->receivePayment($data)) {
         header('Location: index.php?billing&success=b');
     } else {
         printError("Failed to receive payment.");
     }
     break;
 case 'processEDTDisplay':
     $t = new Treatment();
     $b = new Billing();
     $edts = $t->getUnprocessedEDTs($data['pid']);
     $b->displayUnprocessedEDTs($edts);
     break;
 case 'processAllEDTs':
     $success = true;
     $b = new Billing();
     $t = new Treatment();
     $all = $t->getUnprocessedEDTs($data['pid']);
     foreach ($all as $e) {
         if (!$b->processEDT($e['edtid'])) {
             $success = false;
             break;
         }
     }
     if ($success) {
         header('Location: index.php?billing&success=b');
     } else {
         printError("Failed to process all EDT records.");
     }
     break;
 case 'closeAccount':
     $b = new Billing();
/**
 * @param $record
 * @param $event_id
 * @param $group_id
 * @param $debug
 */
function schedule_surveys($record, $event_id, $group_id, $debug)
{
	global $Proj, $project_id, $user_rights, $table_pk;
	/**
	 * if the user is in a DAG
	 */
	if ($user_rights['group_id'] != "") {
		/**
		 * does this record exist?
		 */
		$q = db_query("SELECT 1 from redcap_data WHERE project_id = $project_id AND record = '$record' LIMIT 1");
		if (db_num_rows($q) > 0) {
			/**
			 * is the record in this users DAG?
			 */
			$q = db_query("SELECT 1 from redcap_data WHERE project_id = $project_id AND record = '$record' AND field_name = '__GROUPID__' AND value = '{$user_rights['group_id']}' LIMIT 1");
			if (db_num_rows($q) < 1) {
				/**
				 * record is not in Users DAG!
				 */
				REDCap::logEvent('Scheduled record is not in users DAG', '', '', $record, $event_id, $project_id);
				exit;
			}
		}
	}
	/**
	 * check to see if the subject has an existing schedule on an existing arm
	 */
	$sub = "SELECT DISTINCT e.arm_id from redcap_events_calendar c, redcap_events_metadata e WHERE c.project_id = $project_id AND c.record = '$record' AND c.event_id = e.event_id";
	$sched_arm_result = db_query("SELECT arm_num FROM redcap_events_arms WHERE project_id = $project_id AND arm_id IN (" . pre_query($sub) . ")");
	if ($sched_arm_result) {
		$trt = Treatment::getTrtInfo($record);
		if ($debug) {
			error_log(print_r($trt, true));
		}
		$tx_start_date = $trt['rfxstdtc'];
		$rand_date = $trt['rand_date'];
		$dates = array();
		$arm_num = db_result($sched_arm_result, 0, 'arm_num');
		if (isset($arm_num) && $arm_num != '') { // subject has an existing schedule. keep existing event_id > arm structure
			if ($arm_num != '1') { // make sure we don't put anything in the first arm
				$q = db_query("SELECT * from redcap_events_metadata m, redcap_events_arms a WHERE a.project_id = $project_id AND a.arm_id = m.arm_id AND a.arm_num = $arm_num order by m.day_offset, m.descrip");
				if ($q) {
					while ($row = db_fetch_assoc($q)) { // if we have no $arm_num, this will be empty
						/**
						 * get the event date ($rand_date for baseline and $tx_start_date + day_offset)
						 */
						$row['day_offset'] = $arm_num != $trt['timing_arm_num'] ? $trt['timing_offsets'][$row['descrip']] : $row['day_offset'];
						if (in_array($row['descrip'], array('Baseline', 'EOT+1Year', 'EOT+3Year'))) {
							$this_event_date = isset($rand_date) && $rand_date != '' ? add_date($rand_date, $row['day_offset']) : null;
						} else {
							$this_event_date = isset($tx_start_date) && $tx_start_date != '' ? add_date($tx_start_date, $row['day_offset']) : null;
						}
						$dates[$row['event_id']] = $this_event_date;
					}
					db_free_result($q);
				}
			} else {
				REDCap::logEvent('Scheduling attempted in invalid arm', '', '', $record, $event_id, $project_id);
			}
		} else { // subject's schedule is new. put dates into event_ids for this arm
			$arm_result = db_query("SELECT arm_num FROM redcap_events_arms WHERE project_id = '$project_id' AND arm_name = '{$trt['arm']}'");
			if ($arm_result) {
				$arm_num = db_result($arm_result, 0, 'arm_num');
				if ($arm_num != '1') {
					$q = db_query("SELECT * from redcap_events_metadata m, redcap_events_arms a WHERE a.project_id = $project_id AND a.arm_id = m.arm_id AND a.arm_num = $arm_num order by m.day_offset, m.descrip");
					if ($q) {
						while ($row = db_fetch_assoc($q)) { // if we have no $arm_num, this will be empty
							/**
							 * get the event date ($rand_date for baseline and $tx_start_date + day_offset)
							 */
							if (in_array($row['descrip'], array('Baseline', 'EOT+1Year', 'EOT+3Year'))) {
								$this_event_date = isset($rand_date) && $rand_date != '' ? add_date($rand_date, $row['day_offset']) : null;
							} else {
								$this_event_date = isset($tx_start_date) && $tx_start_date != '' ? add_date($tx_start_date, $row['day_offset']) : null;
							}
							$dates[$row['event_id']] = $this_event_date;
						}
						db_free_result($q);
					}
				} else {
					REDCap::logEvent('Scheduling attempted in invalid arm', '', '', $record, $event_id, $project_id);
				}
				db_free_result($arm_result);
			}
		}
		if ($debug) {
			error_log(print_r($dates, true));
		}
		if (!empty($dates)) {
			/**
			 * do we have an existing schedule?
			 */
			$sql = "SELECT c.event_date, c.baseline_date, e.* FROM redcap_events_calendar c, redcap_events_metadata e WHERE c.project_id = $project_id AND c.record = '$record' AND c.event_id = e.event_id AND e.arm_id IN (" . pre_query($sub) . ")";
			$sched_result = db_query($sql);
			if ($sched_result) {
				$sql_all = array();
				$sql_errors = array();
				if (db_num_rows($sched_result) > 0) {
					while ($sched_row = db_fetch_assoc($sched_result)) {
						$base_date = in_array($sched_row['descrip'], array('Baseline', 'EOT+1Year', 'EOT+3Year')) ? $trt['rand_date'] : $trt['rfxstdtc'];
						/**
						 * if the scheduled date is in the $dates array, we don't care about it, so ignore it and remove from $dates
						 * if we have an existing schedule and the dates have changed, update the schedule and remove from $dates
						 * if the base date has changed, update it and the schedule
						 * whatever is left will be new dates, insert into schedule
						 */
						if ($dates[$sched_row['event_id']] == $sched_row['event_date']) {
							unset($dates[$sched_row['event_id']]);
						}
						if (isset($dates[$sched_row['event_id']]) && $dates[$sched_row['event_id']] != '' && $sched_row['event_date'] != $dates[$sched_row['event_id']]) { // the date has changed. update the date.
							$sql = "UPDATE redcap_events_calendar SET event_date = '{$dates[$sched_row['event_id']]}' WHERE record = '$record' AND project_id = '$project_id' AND group_id = '$group_id' AND event_id = '{$sched_row['event_id']}' AND event_date = '{$sched_row['event_date']}'";
							if (!$debug) {
								if (db_query($sql)) {
									$sql_all[] = $sql;
									log_event($sql, "redcap_events_calendar", "MANAGE", $record, $sched_row['event_id'], "Update calendar event");
								} else {
									$sql_errors[] = $sql;
								}
							} else {
								error_log($sql);
							}
							unset($dates[$sched_row['event_id']]);
						}
						if ($base_date != $sched_row['baseline_date']) { // the base_date has changed. this will only occur if the treatment start date or randomization date are changed in the study.
							$sql = "UPDATE redcap_events_calendar SET baseline_date = '" . prep($base_date) . "' WHERE record = '$record' AND project_id = '$project_id' AND group_id = '$group_id' AND event_id = '{$sched_row['event_id']}' AND baseline_date = '{$sched_row['baseline_date']}'";
							if (!$debug) {
								if (db_query($sql)) {
									$sql_all[] = $sql;
									log_event($sql, "redcap_events_calendar", "MANAGE", $record, $sched_row['event_id'], "Update calendar event");
								} else {
									$sql_errors[] = $sql;
								}
							} else {
								error_log($sql);
							}
							unset($dates[$sched_row['event_id']]);
						}
					}
					foreach ($dates AS $date_event_id => $date) { //Loop through dates and add them to the schedule
						$base_date = in_array($Proj->eventInfo[$date_event_id]['name'], array('Baseline', 'EOT+1Year', 'EOT+3Year')) ? $trt['rand_date'] : $trt['rfxstdtc'];
						if (isset($date) && $date != "") { //Add to table
							$sql = "INSERT INTO redcap_events_calendar (record, project_id, group_id, event_id, event_date, event_time, event_status, baseline_date) VALUES ('$record', $project_id, " . checkNull($group_id) . ", '" . prep($date_event_id) . "', '" . prep($date) . "', '" . null . "', 0, '$base_date')";
							if (!$debug) {
								if (db_query($sql)) {
									$sql_all[] = $sql;
								} else {
									$sql_errors[] = $sql;
								}
							} else {
								error_log($sql);
							}
						} else {
							REDCap::logEvent('Schedule start date is not a valid date', '', '', $record, $event_id, $project_id);
						}
					}
					log_event(implode(";\n", $sql_all), "redcap_events_calendar", "MANAGE", $_GET['idnumber'], "$table_pk = '$record'", "Perform scheduling");
				} else {
					foreach ($dates AS $date_event_id => $date) { //Loop through dates and add them to the schedule
						$base_date = in_array($Proj->eventInfo[$date_event_id]['name'], array('Baseline', 'EOT+1Year', 'EOT+3Year')) ? $trt['rand_date'] : $trt['rfxstdtc'];
						if (isset($date) && $date != "") { //Add to table
							$sql = "INSERT INTO redcap_events_calendar (record, project_id, group_id, event_id, event_date, event_time, event_status, baseline_date) VALUES ('$record', $project_id, " . checkNull($group_id) . ", '" . prep($date_event_id) . "', '" . prep($date) . "', '" . null . "', 0, '$base_date')";
							if (!$debug) {
								if (db_query($sql)) {
									$sql_all[] = $sql;
								} else {
									$sql_errors[] = $sql;
								}
							} else {
								error_log($sql);
							}
						} else {
							REDCap::logEvent('Schedule start date is not a valid date', '', '', $record, $event_id, $project_id);
						}
					}
					log_event(implode(";\n", $sql_all), "redcap_events_calendar", "MANAGE", $_GET['idnumber'], "$table_pk = '$record'", "Perform scheduling");
				}
			}
			db_free_result($sched_result);
		}
		db_free_result($sched_arm_result);
	}
}
Ejemplo n.º 3
0
 public function actionGetTreatment()
 {
     if (!isset($_GET['q'])) {
         throw new CHttpException(401, 'Missing diagnosis name');
     }
     $lat = @$_GET['lat'];
     $long = @$_GET['long'];
     $diagnosisName = @$_GET['q'];
     $data = array();
     $diagnosis = Diagnosis::model()->findByAttributes(array('name' => $diagnosisName));
     if (!$diagnosis) {
         throw new CHttpException(401, 'Invalid diagnosis name');
     }
     $treatment = Treatment::model()->findByAttributes(array('diagnosis_id' => $diagnosis->id));
     $data['action'] = $treatment->action;
     $diagnosisType = DiagnosisTypes::model()->findByAttributes(array('diagnosis_id' => $diagnosis->id));
     $doctors = Doctors::model()->findAllByAttributes(array('type' => $diagnosisType->doctor_type_id));
     //how to compute for nearest place for the doctor
     foreach ($doctors as $d) {
         $data['doctors'][] = array('id' => $d->id, 'name' => $d->getFullname(), 'address' => $d->address, 'type' => $diagnosisType->doctorType->name, 'contact_no' => $d->contact_no, 'schedule' => $d->schedule, 'other_info' => $d->other_info, 'lat' => $d->lat, 'long' => $d->long);
     }
     echo CJSON::encode($data);
 }
Ejemplo n.º 4
0
function runAdmin()
{
    global $results;
    $a = new Admin();
    // New patient
    $data = array('pname' => 'TEST1', 'dob' => '01/01/1989', 'address' => '123 Fake St.', 'contact_phone' => '5197817372', 'contact_email' => '*****@*****.**', 'emerg_name' => 'Tori', 'emerg_phone' => '6138367372');
    $data2 = array('pname' => 'TEST2', 'dob' => '01/01/1989', 'address' => '123 Fake St.', 'contact_phone' => '5197817372', 'contact_email' => '*****@*****.**', 'emerg_name' => 'Tori', 'emerg_phone' => '6138367372');
    $results['admin_newPatient'] = $a->addPatient($data);
    $a->addPatient($data2);
    // Try to add a patient that already exists
    $attempt = array('pname' => 'TEST1');
    $results['admin_newPatientNot'] = !$a->addPatient($attempt);
    $patients = $a->getAllPatients();
    $emps = $a->getAllPhysicians();
    $pid = array_search('TEST1', $patients);
    // Update patient
    // Prereq: Patient exists
    $newData = array('pid' => $pid, 'address' => '123 Updated St.', 'contact_phone' => '5197817372', 'contact_email' => '*****@*****.**');
    $where = array('field' => 'pid', 'value' => $pid);
    $results['admin_updatePatient'] = $a->updatePatient($newData);
    // Check in patient
    // Prereq: Checked in patient
    $a->checkInPatient(array('pid' => array_search('TEST2', $patients), 'indate' => date('m/d/Y'), 'eidin' => key($emps)));
    $results['admin_datePatients'] = $a->getPatientsOnDate(date('m/d/Y'));
    // Get patient vists
    // Prereq: At least 1 EDT record for patient
    $t = new Treatment();
    $edt = array('pid' => $pid, 'dateperf' => '11/30/2010', 'activitytype' => 'E', 'enames' => current($emps), 'description' => "Today I did things", 'duration' => '1', 'outcome' => 'Yay?', 'cost' => 100);
    $results['admin_patientVisits'] = $t->newEDT($edt) && $a->getPatientVisits($pid);
    // Get patients based on physician
    // Prereq: Checked in patient
    $results['admin_physicianReleasedAdmitted'] = $a->getPhysiciansPatients(key($emps));
    // Check out a patient
    // Prereq: Checked in patient
    $results['admin_checkOutPatient'] = $a->checkOutPatient(array('pid' => array_search('TEST2', $patients), 'outdate' => date('m/d/Y'), 'eidout' => key($emps)));
}
Ejemplo n.º 5
0
 public function checkOutPatient($data)
 {
     if (!$this->isPatient($data['pid']) || !checkFilled($data) || !verifyDate($data['outdate']) || !checkNumber($data['eidout']) || !checkNumber($data['pid']) || !$this->isCheckedIn($data['pid'])) {
         return false;
     }
     $where = array('field' => 'pid', 'value' => $data['pid']);
     // Add up costs of EDT records for that visit
     $total = 0;
     $t = new Treatment();
     $edts = $t->getEDTRecords($data['pid'], true);
     foreach ($edts as $e) {
         $total = $total + $e['cost'];
     }
     $data['totalbill'] = $total;
     unset($data['pid']);
     // remove pid from elements
     return $this->dbh->update('CheckInOuts', $data, $where, true);
 }
?>
</h1>
                    	  				</div>
                                    </td>
                                </tr>
                                
                                
                                	  <tr style="width:100%;">
                                        <td>
                                            <table  width="100%" dir="rtl">
                                                <tr>
                                                  <td style="width:25%;"></td>
                                                  <td style="width:50%;">
                        
                                                        <?php 
$treatment = new Treatment();
echo '<form method="post" action="' . $treatment->addTreatment() . '">';
?>
                                                                    
                                                       <table width="314">
                                                            <tr>
                                                                <td width="85">تاريخ المعاينة</td>
                                                                <td width="178">
                                                                    ajaaaaaaaaax*
                                                                </td>
                                                            </tr>
                        
                                                            <tr>
                                                                <td>
                                                                        نوع المعاينة
                                                                </td>