} } if ($flag == 0) { sqlQuery("update lists set enddate=now() where pid=? and id=? and type='allergy'", array($patientid, $row['id'])); } } $xml1_0 = array(); $xml1_0['credentials']['PartnerName'] = $cred['0']; $xml1_0['credentials']['Name'] = $cred['1']; $xml1_0['credentials']['Password'] = $cred['2']; $xml1_0['accountRequest']['AccountId'] = '1'; $xml1_0['accountRequest']['SiteId'] = $erxSiteID['federal_ein']; $xml1_0['patientRequest']['PatientId'] = $patientid; $xml1_0['patientInformationRequester']['UserType'] = 'D'; $xml1_0['patientInformationRequester']['UserId'] = $user_details['id']; $xml = $client->GetPatientFreeFormAllergyHistory($xml1_0); $xml_response = $xml->GetPatientFreeFormAllergyHistoryResult->patientFreeFormAllergyExtendedDetail->PatientFreeFormAllergyExtendedDetail; $xml_response_count = $xml->GetPatientFreeFormAllergyHistoryResult->result->RowCount; if ($xml_response_count > 1) { for ($i = 0; $i < sizeof($xml_response); $i++) { sqlQuery("update lists set erx_uploaded='0' where id=?", array($xml_response[$i]->ExternalId)); } } elseif ($xml_response_count == 1) { sqlQuery("update lists set erx_uploaded='0' where id=?", array($xml_response->ExternalId)); } if ($j != 0) { sqlQuery("update patient_data set soap_import_status=? where pid=?", array('4', $patientid)); } if ($xml_response_count == 0) { echo htmlspecialchars(xl("Nothing to import for Allergy"), ENT_NOQUOTES); } elseif ($xml_response_count > 0) {