public function labResultsAction()
{
$orderId = (int) $this->_getParam('orderId');
$order = new OrderLabTest();
$order->orderId = $orderId;
if (!$order->populate()) {
$error = 'Order Id ' . $orderId . ' not found';
trigger_error($error);
throw new Exception($error);
}
$loinc = new ProcedureCodesLOINC();
$loinc->loincNum = $order->labTest;
$loinc->populate();
$shortname = $loinc->shortname;
if (!strlen($shortname) > 0) {
$shortname = $loinc->longCommonName;
}
$labTest = new LabTest();
$labTest->labOrderId = $order->orderId;
$labTest->populateByLabOrderId();
$labOrder = new LabOrder();
$labOrder->labOrderId = $order->orderId;
if (!$labOrder->populate()) {
$labOrder->labOrderId = $order->orderId;
$labOrder->patientId = $order->order->patientId;
$labOrder->personId = $order->order->patientId;
$labOrder->orderingProvider = $order->order->provider->displayName;
$labOrder->manualOrderDate = $order->order->dateTime;
$labOrder->orderDescription = $shortname;
$labOrder->persist();
$labTest = new LabTest();
$labTest->labOrderId = $labOrder->labOrderId;
$labTest->componentCode = $loinc->class;
$labTest->service = $shortname;
$labTest->orderNum = $order->orderId;
$labTest->persist();
$orderObs = strtolower($loinc->orderObs);
if ($orderObs == 'both') {
// create default lab_results
$labResult = new LabResult();
$labResult->description = $order->displayLabTest;
$labResult->labTestId = $labTest->labTestId;
$labResult->observationTime = date('Y-m-d H:i');
$labResult->units = $loinc->exampleUcumUnits;
$labResult->identifier = $loinc->loincNum;
$labResult->persist();
} else {
if ($orderObs == 'order') {
// temporarily do nothing
}
}
}
$this->view->order = $order;
$form = new WebVista_Form(array('name' => 'labTestId'));
$form->setAction(Zend_Registry::get('baseUrl') . 'orders.raw/set-lab-test');
$form->loadORM($labTest, 'LabTest');
$this->view->form = $form;
$this->render();
}
public static function buildJSJumpLink($objectId, $signingUserId, $objectClass)
{
$objectClass = 'Labs';
// temporarily hard code objectClass based on MainController::getMainTabs() definitions
$labOrder = new LabOrder();
$labOrder->labOrderId = $objectId;
$labOrder->populate();
$patientId = $labOrder->patientId;
$js = parent::buildJSJumpLink($objectId, $patientId, $objectClass);
$js .= <<<EOL
mainTabbar.setOnTabContentLoaded(function(tabId){
\tTabState.setParam({"orderId":objectId});
\treloadLabResultsGrid();
});
EOL;
return $js;
}
public static function hl7Lab($hl7msg, $personId)
{
$hl7msg = preg_replace("/\r/", "\n", $hl7msg);
$db = Zend_Registry::get('dbAdapter');
$xml = new HL7XML($hl7msg);
$xml->parse();
file_put_contents('/tmp/xml', print_r($xml, true));
$orders = $xml->xml->xpath("//MSH");
$ordersCtr = count($orders);
for ($o = 0; $o < $ordersCtr; $o++) {
$orderXml = simplexml_load_string($orders[$o]->asXml());
$pid = 0;
if (strlen((string) current($orderXml->xpath("//PID.3"))) > 0 && isset($mrn2pid[(string) current($orderXml->xpath("//PID.3"))])) {
$pid = $mrn2pid[(string) current($orderXml->xpath("//PID.3"))];
} else {
$sqlSelect = $db->select()->from("patient")->join("person", "person.person_id = patient.person_id")->where("patient.record_number = ?", (string) current($orderXml->xpath("//PID.3")));
$patients = $db->query($sqlSelect)->fetchAll();
if (!count($patients) > 0) {
continue;
}
$pid = $patients[0]['person_id'];
$mrn2pid[(string) current($orderXml->xpath("//PID.3"))] = $pid;
if (!$pid > 0) {
continue;
}
// last name, first name and DOB
}
$order = new LabOrder();
$order->_shouldAudit = false;
$order->_cascadePersist = false;
$order->patientId = $pid;
//$order->type = '';
$order->status = 'F';
//$order->manualOrderDate = date('Y-m-d',strtotime((string)current($orderXml->xpath("//ORC/ORC.9"))));
$orderingProvider = current($orderXml->xpath("//ORC.12.3"));
$orderingProvider .= " " . current($orderXml->xpath("//ORC.12.2"));
$orderingProvider .= " " . current($orderXml->xpath("//ORC.12.1"));
$orderingProvider .= " (" . current($orderXml->xpath("//ORC.12.0")) . ")";
$order->ordering_provider = $orderingProvider;
$order->persist();
$testsGroup = $orderXml->xpath("//ORC");
//var_dump($testsGroup);continue;
$tgCtr = count($testsGroup);
for ($x = 0; $x < $tgCtr; $x++) {
//echo "test\n";
$test = simplexml_load_string($testsGroup[$x]->asXml());
//var_dump($test);
$t = new LabTest();
$t->_shouldAudit = false;
$t->_cascadePersist = false;
$t->labOrderId = $order->labOrderId;
$t->orderNum = (string) current($test->xpath("//OBR.2.0"));
$t->filer_order_num = (string) current($test->xpath("//OBR.3.0"));
$observation_time = preg_replace('/([0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]).*/', '${1}', current($test->xpath("//OBR.22")));
$t->observation_time = date('Y-m-d H:i:s', strtotime($observation_time));
$manual_order_date = preg_replace('/([0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]).*/', '${1}', current($test->xpath("//OBR.7")));
$order->manual_order_date = date('Y-m-d H:i:s', strtotime($manual_order_date));
$order->persist();
$specimen_received_time = preg_replace('/([0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]).*/', '${1}', current($test->xpath("//OBR.14")));
$t->specimen_received_time = date('Y-m-d H:i:s', strtotime($observation_time));
$report_time = preg_replace('/([0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]).*/', '${1}', current($test->xpath("//OBR.22")));
$t->report_time = date('Y-m-d H:i:s', strtotime($report_time));
//$t->ordering_provider = ;
$t->service = (string) current($test->xpath("//OBR.4.1")) . " " . current($test->xpath("//OBR.4.2"));
$t->component_code = (string) current($test->xpath("//OBR.3.0"));
$t->status = (string) current($test->xpath("//OBR.25"));
$t->clia_disclosure = (string) current($test->xpath("//OBR.21.0")) . " " . (string) current($test->xpath("//OBR.21.1")) . " " . (string) current($test->xpath("//OBR.21.2")) . " " . (string) current($test->xpath("//OBR.21.3")) . " " . (string) current($test->xpath("//OBR.21.4")) . " " . (string) current($test->xpath("//OBR.21.4")) . " " . (string) current($test->xpath("//OBR.21.5")) . " " . (string) current($test->xpath("//OBR.21.6"));
$t->persist();
//echo $t->toString();
$resultsGroup = $test->xpath("//OBR/OBX");
//var_dump($t->toString()); continue;
$rgCtr = count($resultsGroup);
for ($i = 0; $i < $rgCtr; $i++) {
$result = simplexml_load_string($resultsGroup[$i]->asXml());
//var_dump($result->asXml());
$lr = null;
$lr = new LabResult();
$lr->_shouldAudit = false;
$lr->_cascadePersist = false;
$lr->labTestId = $t->labTestId;
$lr->description = (string) current($result->xpath("//OBX.3.1")) . " " . (string) current($result->xpath("//OBX.3.2")) . "(" . (string) current($result->xpath("//OBX.3.0")) . ")";
//$lr->extra = ',$row['Group']);
$lr->identifier = (string) current($result->xpath("//OBX.3"));
$lr->reference_range = (string) current($result->xpath("//OBX.7"));
$lr->abnormal_flag = (string) current($result->xpath("//OBX.8"));
$lrobservation_time = preg_replace('/([0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]).*/', '${1}', current($test->xpath("//OBR.22")));
$lr->observation_time = date('Y-m-d H:i:s', strtotime($lrobservation_time));
$lr->units = (string) current($result->xpath("//OBX.6"));
$lr->value = (string) current($result->xpath("//OBX.5"));
$lr->result_status = (string) current($result->xpath("//OBX.11"));
//echo $lr->toString() . "\n\n";
$lr->persist();
if (count($result->xpath("//NTE")) > 0) {
$note = "";
foreach ($result->xpath("//NTE") as $noteLine) {
$note .= trim($noteLine->{'NTE.3'}) . "\n";
}
$labNote = new LabNote();
$labNote->_shouldAudit = false;
$labNote->_cascadePersist = false;
$labNote->labTestId = $t->labTestId;
$labNote->labResultId = $lr->labResultId;
$labNote->note = $note;
$labNote->persist();
}
}
}
}
}