/** * Context needs simple way of getting patient ID. * @return the patientid associated with an order */ public function getPatientIDFromTrackingID($sTrackingID) { $debugmsg = 'LOOK getPatientIDFromTrackingID for [' . $sTrackingID . ']'; error_log($debugmsg); //Get the IEN from the tracking ID $aParts = explode('-', $sTrackingID); if (count($aParts) == 2) { $nIEN = $aParts[1]; //siteid-IEN } else { if (count($aParts) == 1) { $nIEN = $aParts[0]; //Just IEN } else { $sMsg = 'Did NOT recognize format of tracking id [' . $sTrackingID . '] expected SiteID-IEN format!'; error_log($sMsg); throw new \Exception($sMsg); } } $debugmsg = 'LOOK getPatientIDFromTrackingID for IEN=[' . $nIEN . ']'; error_log($debugmsg); //Now lookup the patient ID $pid = NULL; $serviceResponse = MdwsUtils::parseDdrGetsEntry($this->makeQuery("ddrGetsEntry", array('file' => '75.1', 'iens' => $nIEN . ',', 'flds' => '*', 'flags' => 'IEN'))); foreach ($serviceResponse as $key => $value) { $pid = $value; break; //First one is the one we want. } if ($pid == NULL) { $msg = 'Expected to find a PID but did not find one for ticket [' . $sTrackingID . '] ' . '<br>Details...' . print_r($aParts, TRUE) . '<br>Soapresult>>>' . print_r($serviceResponse, TRUE); die($msg); } $debugmsg = 'LOOK Found PID as [' . $pid . ']'; error_log($debugmsg); return $pid; }
private function getWorklistItemFromMDWS($sTrackingID) { //error_log('DEBUG called getWorklistItemFromMDWS start with ['.$sTrackingID.']'); //Get the IEN from the tracking ID $aParts = explode('-', $sTrackingID); if (count($aParts) == 2) { $nIEN = $aParts[1]; //siteid-IEN } else { if (count($aParts) == 1) { $nIEN = $aParts[0]; //Just IEN } else { $sMsg = 'Did NOT recognize format of tracking id [' . $sTrackingID . '] expected SiteID-IEN format!'; error_log($sMsg); throw new \Exception($sMsg); } } $aResult = MdwsUtils::parseDdrGetsEntry($this->m_oContext->getMdwsClient()->makeQuery("ddrGetsEntry", array('file' => '75.1', 'iens' => $nIEN . ',', 'flds' => '*', 'flags' => 'IEN'))); //error_log('DEBUG called getWorklistItemFromMDWS done with result >>>'.print_r($aResult,TRUE)); return $aResult; }