/**
* This function mines the clinical fields for potential diagnostic codes.
* The clinical fields are found in table list_options with list_id = Eye_Coding_Fields_
* The clinical terms to mine for are in table list_options with list_id = Eye_Coding_Terms
* Both can be directly extended by the user the via Administration -> Lists interface.
* The Coding_Eye_Form_Terms list includes the following important fields:
* Title (the term),
* Notes (the form_field to search for the term)
* Code(s) (the optional user-defined code).
* Terms found in a form_field (Notes) with a predefined Code(s), have that code applied.
* Terms found in a form_field (Notes) without a predefined Code(s) are concated with
* the text value for the form_field (Notes) (found in the list Coding_Eye_Form_Fields: Notes)
* and the codebase is searched for a match.
* For example: the term "ptosis" is found in the RUL clinical field, and there is no Code value in the
* Coding_Eye_Form_Terms Code(s) field. Thus openEMR Eye Form searches the active codebases for a match.
* The codebases are determined in Administration->Lists->Code Types and includes those Codesets flagged
* as active and as Diagnostic codes. The terms "ptosis right upper eyelid" are sent to the
* standard openEMR code search engine.
* @param string $FIELDS - all the clinical fields we are going to scour for clinical terms to code.
* @return outputs directly to screen
*/
function start_your_engines($FIELDS)
{
//pass an assoc array of fields with terms in it and search them
global $pid;
global $codes_found;
global $PMSFH;
if (!$PMFSH) {
$PMSFH = build_PMSFH($pid);
}
$query = "select * from list_options where list_id ='Eye_Coding_Fields' Order by seq";
$result = sqlStatement($query);
while ($fielding = sqlFetchArray($result)) {
//build the list of clinical fields to search through
$fields[$fielding['title']] = $fielding['notes'];
}
//get the clinical terms to search for (title) and what field/where to look for it (notes)
$query = "SELECT * FROM list_options WHERE list_id = 'Eye_Coding_Terms' order by seq";
$result = sqlStatement($query);
while ($term_sheet = sqlFetchArray($result)) {
if ($term_sheet['title'] > '') {
$newdata = array('term' => $term_sheet['title'], 'location' => $term_sheet['notes'], 'codes' => $term_sheet['codes']);
$clinical_terms[] = $newdata;
}
}
if (!$clinical_terms) {
return;
}
$positives = array();
// Terms are sequenced in the DB (seq) from detailed (more complex descriptions) to a simple (one word) description.
// $clinical_terms[] is built in this sequence also.
// eg. "cicatricial ectropion","spastic ectropion", "ectropion".
// If "cicatricial ectropion" is present in this clinical field (or "spastic ectropion" for that matter),
// then there is no need to report the presence of "ectropion" as a clinical finding to the Imp/Plan Builder.
// needle/haystack lookup $positives[] = $term;
// For terms that overlap other diseases, use term:option|option|option. These are always last to process.
foreach ($clinical_terms as $amihere) {
$option_values = "";
$term = "";
$code_found = array();
if (stripos($amihere['term'], ":") !== false) {
//options are stored here code:option_values
list($term, $option_values) = explode(":", $amihere['term']);
} else {
$term = $amihere['term'];
}
if (stripos($FIELDS[$amihere['location']], $term) !== false) {
//the term is in the field
$within_array = 'no';
if (isset($positives[$amihere['location']]) > '') {
//true if anything was already found in this field
//do any of the previous hits found in in this location contain this term already?
//if so stop; if not, continue onward to add to Builder.
foreach ($positives[$amihere['location']] as $k => $v) {
if (preg_match("/{$term}/", $v)) {
$within_array = 'yes';
break;
}
}
}
if ($within_array == "yes") {
continue;
}
$positives[$amihere['location']][] = $term;
if (preg_match("/^(OD)/", $amihere['location'])) {
$side = "right eye";
$side1 = "OD";
$side2 = "R";
} else {
$side = "left eye";
$side1 = "OS";
$side2 = "L";
}
if ($amihere['codes'] > '' && $option_values == "") {
//did the user define a code for this term in list Eye_Coding_Terms?
//If so process - we are primed and don't need the carburetor for the Builder
//eg ICD10:H02.891
if (stripos($amihere['codes'], ":") !== false) {
list($code_type, $code) = explode(":", $amihere['codes']);
} else {
//default to ICD10. Maybe there is a GLOBALS value for this? Maybe there should be?
$code_type = "ICD10";
}
$code_found['code'] = $code_type . ":" . $code;
$code_found['code_type'] = $code_type;
list($sub_term, $newdata) = coding_engine($term, $code_found, $amihere['location']);
$codes_found[$sub_term][] = $newdata;
$positives[$location][] = $term;
} else {
//no code was defined, further processing needed.
if ($option_values) {
// This clinical finding (term) can be found in more than one disease process ('option_values')
// This special group of terms should be processed last, to identify all
// possible results for the Builder.
// 'option_values' contains pertinent DXs separated by '|', eg. CSME has option values='DM|IOL|RVO'
// Need to see if any of these DX apply and builder Codes_found based on the currently installed list of codes
// Currently for most users this is ICD10 but it is built to allow extension to any code sets in openEMR,
// including foreign laguage code sets.
$options = explode("|", $option_values);
$hit_here = "0";
foreach ($options as $option) {
// if it has mass, try to execute it.
$term_now = "";
if ($option == "DM") {
//This option is run for 3 conditions at present:
//CSME/NVD/NVE per eye. It is the same every time so only do it once, per eye.
//Did we already code this? If so move on.
if ($hit_DM[$side1] == '1') {
continue;
}
//Are ICD10 etc codes used in other languages? Via Snomed? Via user?
//Assume there is a standard for xlt/xla purposes...
//is the patient diabetic?
//search medical_problem for DM
$within_array = "";
foreach ($PMSFH[0]['PMH'] as $k => $v) {
if (stripos($v['codedesc'], "diabetes")) {
$DM_code = $v['codedesc'];
$within_array = 'yes';
}
}
if ($within_array == "yes") {
if (stripos($DM_code, "1")) {
$DM_text = "Type 1 diabetes mellitus";
$label = "DM 1";
} else {
if (stripos($DM_code, "2")) {
$DM_text = "Type 2 diabetes mellitus";
$label = "DM 2";
} else {
$DM_text = "Other specified diabetes";
$label = "DM";
}
}
} else {
//there is no code that lists diabetes in the PMH
continue;
}
//is there CSME
if ($side == "right eye") {
$location = "ODMACULA";
$location1 = "ODDISC";
$location2 = "ODVESSELS";
$location3 = "ODPERIPH";
} else {
if ($side == "left eye") {
$location = "OSMACULA";
$location1 = "OSDISC";
$location2 = "OSVESSELS";
$location3 = "OSPERIPH";
}
}
if (stripos($FIELDS[$location], "flat") === false && stripos($FIELDS[$location], "CSME") !== false) {
//what if they type "no CSME" or "not flat"?
$MAC_text = "with macular edema";
$hit_CSME = "w/ CSME";
} else {
$MAC_text = "without macular edema";
$hit_CSME = "w/o CSME";
}
//is there (NVD or NVE) or BDR?
$NVD = "NVD";
$NVE = "NVE";
$PPDR = "PPDR";
$PDR = "PDR";
$BDR = "BDR";
$IRMA = "IrMA";
if (stripos($FIELDS[$location1], $NVD) !== false || stripos($FIELDS[$location2], $NVE) !== false || stripos($FIELDS[$location3], $NVE) !== false) {
$DX = "with proliferative";
$label = $label . "w/ PDR " . $hit_CSME;
$hit_PDR[$side] = '1';
} else {
if (stripos($FIELDS[$location2], $PPDR) !== false || stripos($FIELDS[$location2], $PPDR) !== false || stripos($FIELDS[$location], $IRMA) !== false || stripos($FIELDS[$location2], $IRMA) !== false || stripos($FIELDS[$location3], $IRMA) !== false) {
$DX = "with severe nonproliferative";
$label = $label . " w/ PPDR " . $hit_CSME;
$hit_PPDR[$side] = '1';
} else {
if (stripos($FIELDS[$location], $BDR) !== false || stripos($FIELDS[$location2], $BDR) !== false) {
$trace = "tr";
if (stripos($FIELDS[$location], $trace . " " . $BDR) !== false || stripos($FIELDS[$location2], "+1 " . $BDR) !== false || stripos($FIELDS[$location], $trace . " " . $BDR) !== false || stripos($FIELDS[$location2], "+1 " . $BDR) !== false) {
$DX = "with mild nonproliferative";
$label = $label . " w/ mild BDR " . $hit_CSME;
$hit_BDR[$side] = '1';
} else {
$DX = "with moderate nonproliferative";
$label = $label . " w/ mod BDR " . $hit_CSME;
$hit_BDR[$side] = '1';
}
}
}
}
$code_found = coding_carburetor($DM_text, $MAC_text);
if (isset($code_found)) {
//there are matches, present them to the engine
foreach ($code_found as $found) {
list($sub_term, $newdata) = coding_engine($label, $found, $amihere['location'], $side1);
// The carburetor is a simple machine - it has no boolean options -
// so "with" and "without" match a search for "with"...
// We need to be specific to whittle down the options.
if (stripos($newdata['codedesc'], $MAC_text) && stripos($newdata['codedesc'], $DX)) {
//does this code already exist for the other eye (right eye is always first)?
//if so, change OD to OU and skip adding this code.
if ($side1 == "OS") {
$count = '0';
for ($i = 0; $i < count($codes_found[$sub_term]); $i++) {
$swap = "OD";
$codes_found[$sub_term][$i]['title'] = str_replace($swap, "OU", $codes_found[$sub_term][$i]['title']);
break 2;
$count++;
}
}
$codes_found[$sub_term][] = $newdata;
$positives["DM" . $side1][] = $newdata['code'];
$hit_DM[$side1] = '1';
}
}
}
} else {
if ($option == "RVO") {
//is there a CRVO or BRVO associated?
//check Clinical fields for these terms
if ($side == "right eye") {
$location = "ODVESSELS";
} else {
$location = "OSVESSELS";
}
if ($hit_RVO[$location] == '1') {
continue;
}
if (stripos($FIELDS[$location], "CRVO") !== false) {
// this is a CRVO, look up code for location
$terms = "CRVO";
$code_found = coding_carburetor("central retinal vein", $side);
if (isset($code_found)) {
//there are matches, present them to the Builder
foreach ($code_found as $found) {
list($sub_term, $newdata) = coding_engine($terms, $found, $location, $side1);
$codes_found[$sub_term][] = $newdata;
$positives[$location][] = "CRVO";
$hit_RVO[$location] = "1";
}
}
} else {
if (stripos($FIELDS[$location], "BRVO") !== false) {
// this is a BRVO, look up code for location
$code_found = coding_carburetor("branch retinal vein", $side);
$terms = "BRVO " . $term;
if (isset($code_found)) {
//there are matches, present them to the Builder
foreach ($code_found as $found) {
list($sub_term, $newdata) = coding_engine($terms, $found, $location, $side1);
$codes_found[$sub_term][] = $newdata;
$positives[$location][] = "BRVO";
$hit_RVO[$location] = '1';
}
}
}
}
if ($term == "CSME" && $hit_RVO[$location] == '1') {
//$code = "H35.81";
$code_found = coding_carburetor("retinal", "edema");
$terms = "Vein occlusion and macular edema";
if (isset($code_found)) {
//there are matches, present them to the Builder
foreach ($code_found as $found) {
if ($found['code'] == "ICD10:H35.81") {
list($sub_term, $newdata) = coding_engine($terms, $found, $location, $side1);
$codes_found[$sub_term][] = $newdata;
$positives[$location][] = "CSME";
$hit_RVO_CSME = '1';
}
}
}
}
} else {
if ($option == "IOL") {
//are they within 3 months of cataract surgery on this eye? Yag?
//search the same side Lens field for term IOL, ? procedure this eye in last 3 months?
//search surgery_issue_list or even search the billng engine
$query = "select begdate as surg_date from lists where pid=? and type='surgery' and title like '%IOL%' and (title like '%" . xlt($side1) . "%')";
$surg = sqlQuery($query, array($pid));
if ($surg['surg_date'] > '') {
$date1 = date('Y-m-d');
//$date2 = (DateTime($surg['surg_date']));
//echo $term."\n".$date."\n";continue;
$date_diff = strtotime($date1) - strtotime($surg['surg_date']);
$interval = $date_diff / (60 * 60 * 24);
//$interval = 200;
if ($interval < '180' && $term == "CSME") {
//then this could be post procedure CSME cystoid macular edema H59.031,2 OD OS
$code_found = coding_carburetor("cystoid macular edema", $side);
if (isset($code_found)) {
//there are matches, present them to the Builder
foreach ($code_found as $found) {
$term = "Post-cataract CME";
list($sub_term, $newdata) = coding_engine($term, $found, $amihere['location'], $side1);
$codes_found[$sub_term][] = $newdata;
$positives[$amihere['location']][] = $term;
$hit_IOL = '1';
}
if ($side1 == "OS") {
$count = '0';
for ($i = 0; $i < count($codes_found[$sub_term]); $i++) {
$swap = "OD";
$codes_found[$sub_term][$i]['title'] = str_replace($swap, "OU", $codes_found[$sub_term][$i]['title']);
break 2;
$count++;
}
}
} else {
//echo "Not here. $term. $interval \n";
}
}
}
} else {
//should we have another big Dx often altering what a finding means to a coder; this is a placeholder.
//include $option in our code search for this term
$term_now = $term . " " . $option;
$code_found = coding_carburetor($term_now, $fields[$amihere['location']]);
if (isset($code_found)) {
//there are matches, present them to the Builder
foreach ($code_found as $found) {
list($sub_term, $newdata) = coding_engine($term, $found, $amihere['location'], $side1);
$codes_found[$sub_term][] = $newdata;
$positives[$amihere['location']][] = $term_now;
}
}
}
}
}
}
} else {
//there are no options and no code identified,
//search via carburetor for possible matches to term and description of the form field
$code_found = coding_carburetor($term, $fields[$amihere['location']]);
if ($code_found !== NULL) {
//there are matches, present them to the Builder
foreach ($code_found as $found) {
list($sub_term, $newdata) = coding_engine($term, $found, $amihere['location']);
$codes_found[$sub_term][] = $newdata;
$positives[$amihere['location']][] = $term;
}
}
}
}
}
}
// $codes_found contains the PE/Clinical findings for the Imp/Plan Builder engine.
// It also gets "horsepower" from the POH/POS and PMH findings.
// Together these three form the Imp/Plan Builder's suggestions available to the end user to build the Imp/Plan,
// and by extension one of the data sources for the Coding Engine to populate the fee sheet.
// When entering a Dx in the PMSFH, it pays to assign these codes up front...
// The rest is exhaust fumes for the muffler.
return $codes_found;
}
$query = "INSERT INTO lists ( " . "date, pid, type, title, activity, comments, " . "begdate, enddate, returndate, " . "diagnosis, occurrence, classification, referredby, user, " . "groupname, outcome, destination,reaction,subtype " . ") VALUES ( " . "NOW(), ?,?,?,1,?," . QuotedOrNull($form_begin) . ", " . QuotedOrNull($form_end) . ", " . QuotedOrNull($form_return) . ", " . "?,?,?,?,?," . "?,?,?,?,?)";
$issue = sqlInsert($query, array($pid, $form_type, $_REQUEST['form_title'], $_REQUEST['form_comments'], $_REQUEST['form_diagnosis'], $_REQUEST['form_occur'], $_REQUEST['form_clasification'], $_REQUEST['form_referredby'], $_SESSION['authUser'], $_SESSION['authProvider'], QuotedOrNull($_REQUEST['form_outcome']), $_REQUEST['form_destination'], $_REQUEST['form_reaction'], $subtype));
// For record/reporting purposes, place entry in lists_touch table.
setListTouch($pid, $form_type);
// If requested, link the issue to a specified encounter.
// we always link them, automatically.
if ($encounter) {
$query = "INSERT INTO issue_encounter ( " . "pid, list_id, encounter " . ") VALUES ( ?,?,? )";
sqlStatement($query, array($pid, $issue, $encounter));
}
}
$irow = '';
//if it is a medication do we need to do something with dosage fields?
//leave all in title field form now.
}
$PMSFH = build_PMSFH($pid);
send_json_values($PMSFH);
exit;
}
}
if ($_REQUEST['action'] == 'code_PMSFH') {
$query = "UPDATE lists SET diagnosis = ? WHERE id = ?";
sqlStatement($query, array($_POST['code'], $_POST['issue']));
exit;
}
if ($_REQUEST['action'] == 'code_visit') {
$CODING = json_decode($_REQUEST['parameter'], true);
$query = "delete from billing where encounter =?";
sqlStatement($query, array($encounter));
foreach ($CODING as $item) {
if ($dups[$item["code"]] == '1') {
function narrative($pid, $encounter, $cols, $form_id, $choice = 'full')
{
global $form_folder;
global $PDF_OUTPUT;
global $OE_SITE_DIR;
global $formres;
global $dateres;
global $printable;
//if $cols == 'Fax', we are here from taskman, making a fax and this a one page short form - leave out PMSFH, prescriptions
//and any clinical area that is blank.
$query = "select form_encounter.date as encounter_date,form_eye_mag.id as form_id,form_encounter.*, form_eye_mag.*\n from form_eye_mag ,forms,form_encounter\n where\n form_encounter.encounter =? and\n form_encounter.encounter = forms.encounter and\n form_eye_mag.id=forms.form_id and\n forms.deleted != '1' and\n form_eye_mag.pid=? ";
$encounter_data = sqlQuery($query, array($encounter, $pid));
@extract($encounter_data);
$providerID = getProviderIdOfEncounter($encounter);
$providerNAME = getProviderName($providerID);
$dated = new DateTime($encounter_date);
$dated = $dated->format('Y/m/d');
$visit_date = oeFormatShortDate($dated);
?>
<link rel="stylesheet" href="<?php
echo attr($css_header);
?>
" type="text/css">
<link rel="stylesheet" href="../../forms/<?php
echo attr($form_folder);
?>
/css/report.css" type="text/css">
<style>
<?php
if ($PDF_OUTPUT) {
?>
.mot {
text-align: center;
width:3mm;
height:3mm;
}
<?php
} else {
?>
.mot {
text-align: center;
width:5mm;
height:5mm;
}
<?php
}
?>
</style>
<div>
<?php
if ($cols == 'Fax' || $cols == 'Report') {
echo report_header($pid, 'PDF');
}
if ($PDF_OUTPUT) {
$titleres = getPatientData($pid, "fname,lname,providerID,DATE_FORMAT(DOB,'%m/%d/%Y') as DOB_TS");
if ($_SESSION['pc_facility']) {
$sql = "select * from facility where id=" . $_SESSION['pc_facility'];
} else {
$sql = "SELECT * FROM facility ORDER BY billing_location DESC LIMIT 1";
}
$facility = sqlQuery($sql);
}
if ($choice !== 'TEXT') {
?>
<?php
}
?>
<table class="report_exam_group">
<tr>
<td style="text-align:left;padding:1px;vertical-align:top;max-width:720px;">
<table style="padding:5px;width:700px;">
<tr>
<td colspan="1" style="text-align: justify;text-justify: inter-word;width:100%;">
<b><?php
echo xlt('Chief Complaint');
?>
:</b> <?php
echo text($CC1);
?>
<br /><br />
<b><?php
echo xlt('HPI');
?>
:</b>
<?php
echo $HPI1;
?>
<br />
<div style="padding-left:20px;">
<?php
if ($TIMING1) {
echo "<i>" . xlt('Timing');
?>
:</i> <?php
echo text($TIMING1) . "<br />";
}
if ($CONTEXT1) {
echo "<i>" . xlt('Context');
?>
:</i> <?php
echo text($CONTEXT1) . "<br />";
}
if ($SEVERITY1) {
echo "<i>" . xlt('Severity');
?>
:</i> <?php
echo text($SEVERITY1) . "<br />";
}
if ($MODIFY1) {
echo "<i>" . xlt('Modifying');
?>
:</i> <?php
echo text($MODIFY1) . "<br />";
}
if ($ASSOCIATED1) {
echo "<i>" . xlt('Associated');
?>
:</i> <?php
echo text($ASSOCIATED1) . "<br />";
}
if ($LOCATION1) {
echo "<i>" . xlt('Location');
?>
:</i> <?php
echo text($LOCATION1) . "<br />";
}
if ($QUALITY1) {
echo "<i>" . xlt('Quality');
?>
:</i> <?php
echo text($QUALITY1) . "<br />";
}
if ($DURATION1) {
echo "<i>" . xlt('Duration');
?>
:</i> <?php
echo text($DURATION1) . "<br />";
}
?>
<?php
if ($CC2) {
echo "\n ";
echo "<b>" . xlt('Chief Complaint 2');
?>
:</b> <?php
echo text($CC2);
?>
<br />
<b><?php
echo xlt('HPI');
?>
:</b>
<?php
echo text($HPI2);
?>
<br />
<div style="padding-left:10px;">
<?php
if ($TIMING2) {
echo "<i>" . xlt('Timing');
?>
:</i> <?php
echo text($TIMING2) . "<br />";
}
if ($CONTEXT2) {
echo "<i>" . xlt('Context');
?>
:</i> <?php
echo text($CONTEXT2) . "<br />";
}
if ($SEVERITY2) {
echo "<i>" . xlt('Severity');
?>
:</i> <?php
echo text($SEVERITY2) . "<br />";
}
if ($MODIFY2) {
echo "<i>" . xlt('Modifying');
?>
:</i> <?php
echo text($MODIFY2) . "<br />";
}
if ($ASSOCIATED2) {
echo "<i>" . xlt('Associated');
?>
:</i> <?php
echo text($ASSOCIATED2) . "<br />";
}
if ($LOCATION2) {
echo "<i>" . xlt('Location');
?>
:</i> <?php
echo text($LOCATION2) . "<br />";
}
if ($QUALITY2) {
echo "<i>" . xlt('Quality');
?>
:</i> <?php
echo text($QUALITY2) . "<br />";
}
if ($DURATION2) {
echo "<i>" . xlt('Duration');
?>
:</i> <?php
echo text($DURATION2) . "<br />";
}
?>
</div>
<?php
}
if ($CC3) {
?>
<?php
echo "<b>" . xlt('Chief Complaint 3');
?>
:</b> <?php
echo text($CC3);
?>
<br />
<?php
echo xlt('HPI');
?>
<?php
echo text($HPI3);
?>
<br />
<div style="padding-left:10px;">
<?php
if ($TIMING3) {
echo "<i>" . xlt('Timing');
?>
:</i> <?php
echo text($TIMING3) . "<br />";
}
if ($CONTEXT3) {
echo "<i>" . xlt('Context');
?>
:</i> <?php
echo text($CONTEXT3) . "<br />";
}
if ($SEVERITY3) {
echo "<i>" . xlt('Severity');
?>
:</i> <?php
echo text($SEVERITY3) . "<br />";
}
if ($MODIFY3) {
echo "<i>" . xlt('Modifying');
?>
:</i> <?php
echo text($MODIFY3) . "<br />";
}
if ($ASSOCIATED3) {
echo "<i>" . xlt('Associated');
?>
:</i> <?php
echo text($ASSOCIATED3) . "<br />";
}
if ($LOCATION3) {
echo "<i>" . xlt('Location');
?>
:</i> <?php
echo text($LOCATION3) . "<br />";
}
if ($QUALITY3) {
echo "<i>" . xlt('Quality');
?>
:</i> <?php
echo text($QUALITY3) . "<br />";
}
if ($DURATION3) {
echo "<i>" . xlt('Duration');
?>
:</i> <?php
echo text($DURATION3) . "<br />";
}
?>
</div>
<?php
}
?>
<?php
if ($CHRONIC1 && $cols != 'Fax') {
?>
<b><?php
echo xlt('Chronic or Inactive Problems');
?>
:</b> <br />
<?php
echo text($CHRONIC1) . "<br />";
if ($CHRONIC2) {
echo " " . $CHRONIC2 . "<br />";
}
if ($CHRONIC3) {
echo " " . $CHRONIC3 . "<br />";
}
}
?>
</div>
</td>
</tr>
</table>
</td>
<td style="width:220px;padding:1px;vertical-align:top;">
<?php
//get patient photo
//no idea if this works for couchDB people
$sql = "SELECT * FROM documents,categories,categories_to_documents WHERE\n documents.id=categories_to_documents.document_id and\n categories.id=categories_to_documents.category_id and\n categories.name='Patient Photograph' and\n documents.foreign_id=?";
$doc = sqlQuery($sql, array($pid));
$document_id = $doc['document_id'];
if (is_numeric($document_id)) {
$d = new Document($document_id);
$fname = basename($d->get_url());
$couch_docid = $d->get_couch_docid();
$couch_revid = $d->get_couch_revid();
$url_file = $d->get_url_filepath();
if ($couch_docid && $couch_revid) {
$url_file = $d->get_couch_url($pid, $encounter);
}
// Collect filename and path
$from_all = explode("/", $url_file);
$from_filename = array_pop($from_all);
$from_pathname_array = array();
for ($i = 0; $i < $d->get_path_depth(); $i++) {
$from_pathname_array[] = array_pop($from_all);
}
$from_pathname_array = array_reverse($from_pathname_array);
$from_pathname = implode("/", $from_pathname_array);
if ($couch_docid && $couch_revid) {
$from_file = $GLOBALS['OE_SITE_DIR'] . '/documents/temp/' . $from_filename;
} else {
$from_file = $GLOBALS["fileroot"] . "/sites/" . $_SESSION['site_id'] . '/documents/' . $from_pathname . '/' . $from_filename;
}
if ($PDF_OUTPUT) {
echo "<img src='" . $from_file . "' style='width:220px;'>";
} else {
$filetoshow = $GLOBALS['webroot'] . "/controller.php?document&retrieve&patient_id={$pid}&document_id=" . $doc['document_id'] . "&as_file=false&blahblah=" . rand();
echo "<img src='" . $filetoshow . "' style='width:220px;'>";
}
}
?>
</td>
</tr>
</table>
<?php
if ($choice !== 'TEXT') {
//exclude all of this from displaying on the summary mouseover by default
?>
<hr style="width:50%;text-align:center;" />
<table style="margin:1 auto;" class="report_exam_group">
<tr>
<td style="width:680px;text-align:center;margin:1 auto;">
<?php
$PMSFH = build_PMSFH($pid);
if ($cols != 'Fax') {
show_PMSFH_report($PMSFH);
}
$count_rx = '0';
$query = "select * from form_eye_mag_wearing where PID=? and FORM_ID=? and ENCOUNTER=? ORDER BY RX_NUMBER";
$wear = sqlStatement($query, array($pid, $form_id, $encounter));
while ($wearing = sqlFetchArray($wear)) {
$count_rx++;
${"display_W_{$count_rx}"} = '';
${"ODSPH_{$count_rx}"} = $wearing['ODSPH'];
${"ODCYL_{$count_rx}"} = $wearing['ODCYL'];
${"ODAXIS_{$count_rx}"} = $wearing['ODAXIS'];
${"OSSPH_{$count_rx}"} = $wearing['OSSPH'];
${"OSCYL_{$count_rx}"} = $wearing['OSCYL'];
${"OSAXIS_{$count_rx}"} = $wearing['OSAXIS'];
${"ODMIDADD_{$count_rx}"} = $wearing['ODMIDADD'];
${"OSMIDADD_{$count_rx}"} = $wearing['OSMIDADD'];
${"ODADD_{$count_rx}"} = $wearing['ODADD'];
${"OSADD_{$count_rx}"} = $wearing['OSADD'];
${"ODVA_{$count_rx}"} = $wearing['ODVA'];
${"OSVA_{$count_rx}"} = $wearing['OSVA'];
${"ODNEARVA_{$count_rx}"} = $wearing['ODNEARVA'];
${"OSNEARVA_{$count_rx}"} = $wearing['OSNEARVA'];
${"ODPRISM_{$count_rx}"} = $wearing['ODPRISM'];
${"OSPRISM_{$count_rx}"} = $wearing['OSPRISM'];
${"COMMENTS_{$count_rx}"} = $wearing['COMMENTS'];
${"W_{$count_rx}"} = '1';
${"RX_TYPE_{$count_rx}"} = $wearing['RX_TYPE'];
}
?>
</td>
</tr>
</table>
<table class="borderShadow" >
<tr style="font-size:10px;">
<!-- Start of the Vision box -->
<td class="report_vitals">
<b class="underline"><?php
echo xlt('Visual Acuities');
?>
</b>
<table id="Additional_VA" cellspacing="2" style="text-align:center;font-size:1.0em;">
<tr style="font-weight:bold;">
<td style="text-align:center;"></td>
<td style="width:50px;text-align:center;text-decoration:underline;"><?php
echo xlt('OD');
?>
</td>
<td style="width:50px;text-align:center;text-decoration:underline;"><?php
echo xlt('OS');
?>
</td>
</tr>
<?php
if ($SCODVA || $SCOSVA) {
?>
<tr>
<td><?php
echo xlt('sc{{without correction}}');
?>
</td>
<td><?php
echo text($SCODVA);
?>
</td>
<td><?php
echo text($SCOSVA);
?>
</td>
</tr>
<?php
}
if ($ODVA_1 || $OSVA_1) {
?>
<tr>
<td><?php
echo xlt('cc{{with correction}}');
?>
</td>
<td><?php
echo text($ODVA_1);
?>
</td>
<td><?php
echo text($OSVA_1);
?>
</td>
</tr>
<?php
}
if ($ARODVA || $AROSVA) {
?>
<tr>
<td><?php
echo xlt('AR{{autorefraction}}');
?>
</td>
<td><?php
echo text($ARODVA);
?>
</td>
<td><?php
echo text($AROSVA);
?>
</td>
</tr>
<?php
}
if ($MRODVA || $MROSVA) {
?>
<tr>
<td><?php
echo xlt('MR{{Manifest Refraction}}');
?>
</td>
<td><?php
echo text($MRODVA);
?>
</td>
<td><?php
echo text($MROSVA);
?>
</td>
</tr>
<?php
}
if ($CRODVA || $CROSVA) {
?>
<tr>
<td><?php
echo xlt('CR{{Cycloplegic Refraction}}');
?>
</td>
<td><?php
echo text($CRODVA);
?>
</td>
<td><?php
echo text($CROSVA);
?>
</td>
</tr>
<?php
}
if ($PHODVA || $PHOSVA) {
?>
<tr>
<td><?php
echo xlt('PH{{Pinhole Vision}}');
?>
</td>
<td><?php
echo text($PHODVA);
?>
</td>
<td><?php
echo text($PHOSVA);
?>
</td>
</tr>
<?php
}
if ($CTLODVA || $CTLOSVA) {
?>
<tr>
<td><?php
echo xlt('CTL{{Contact Lens Vision}}');
?>
</td>
<td><?php
echo text($CTLODVA);
?>
</td>
<td><?php
echo text($CTLOSVA);
?>
</td>
</tr>
<?php
}
if ($SCNEARODVA || $SCNEAROSVA) {
?>
<tr>
<td><?php
echo xlt('scNear{{without correction near}}');
?>
</td>
<td><?php
echo text($SCNEARODVA);
?>
</td>
<td><?php
echo text($SCNEAROSVA);
?>
</td>
</tr>
<?php
}
if ($ODNEARVA_1 || $WNEAROSVA_1) {
?>
<tr>
<td><?php
echo xlt('ccNear{{with correction at near}}');
?>
</td>
<td><?php
echo text($ODNEARVA_1);
?>
</td>
<td><?php
echo text($OSNEARVA_1);
?>
</td>
</tr>
<?php
}
if ($ARNEARODVA || $ARNEAROSVA) {
?>
<tr>
<td><?php
echo xlt('ARNear{{Auto-refraction near acuity}}');
?>
</td>
<td><?php
echo text($ARNEARODVA);
?>
</td>
<td><?php
echo text($ARNEAROSVA);
?>
</td>
</tr>
<?php
}
if ($MRNEARODVA || $MRNEAROSVA) {
?>
<tr>
<td><?php
echo xlt('MRNear{{Manifest Near Acuity}}');
?>
</td>
<td><?php
echo text($MRNEARODVA);
?>
</td>
<td><?php
echo text($MRNEAROSVA);
?>
</td>
</tr>
<?php
}
if ($PAMODVA || $PAMOSVA) {
?>
<tr>
<td><?php
echo xlt('PAM{{Potential Acuity Meter}}');
?>
</td>
<td><?php
echo text($PAMODVA);
?>
</td>
<td><?php
echo text($PAMOSVA);
?>
</td>
</tr>
<?php
}
if ($GLAREODVA || $GLAREOSVA) {
?>
<tr>
<td><?php
echo xlt('Glare{{Acuity under Glare conditions}}');
?>
</td>
<td><?php
echo text($GLAREODVA);
?>
</td>
<td><?php
echo text($GLAREOSVA);
?>
</td>
</tr>
<?php
}
if ($CONTRASTODVA || $CONTRASTOSVA) {
?>
<tr>
<td><?php
echo xlt('Contrast{{Constrast Visual Acuity}}');
?>
</td>
<td><?php
echo text($CONTRASTODVA);
?>
</td>
<td><?php
echo text($CONTRASTOSVA);
?>
</td>
</tr>
<?php
}
?>
</table>
</td>
<!-- START OF THE PRESSURE BOX -->
<td class="report_vitals">
<b class="underline"><?php
echo xlt('Intraocular Pressures');
?>
</b>
<table cellspacing="2" style="margin:2;text-align:center;font-size:1.0em;">
<tr style="font-weight:bold;">
<td style="text-align:center;"></td>
<td style="text-align:center;text-decoration:underline;"><?php
echo xlt('OD');
?>
</td>
<td style="text-align:center;text-decoration:underline;"><?php
echo xlt('OS');
?>
</td>
</tr>
<?php
if ($ODIOPAP || $OSIOPAP) {
echo "<tr><td style='text-align:right;padding-right:10px;'>" . xlt('App{{Applanation abbreviation}}') . ":</td><td style='text-align:center;'>" . text($ODIOPAP) . "</td><td style='width:75px;text-align:center;'>" . text($OSIOPAP) . "</td></tr>";
}
if ($ODIOPTPN || $OSIOPTPN) {
echo "<tr><td style='text-align:right;padding-right:10px;'>" . xlt('Tpn{{Tonopen abbreviation}}') . ":</td><td style='text-align:center;'>" . text($ODIOPTPN) . "</td><td style='width:75px;text-align:center;'>" . text($OSIOPTPN) . "</td></tr>";
}
if ($ODIOPFTN || $OSIOPFTN) {
echo "<tr><td style='text-align:right;padding-right:10px;'>" . xlt('FTN{{Finger Tension abbreviation}}') . ":</td><td style='text-align:center;'>" . text($ODIOPFTN) . "</td><td style='width:75px;text-align:center;'>" . text($OSIOPFTN) . "</td></tr>";
}
?>
<tr>
<td colspan="3" style="text-align:center;">
@ <?php
echo text($IOPTIME);
?>
</td>
</tr>
</table>
</td>
<!-- START OF THE FIELDS BOX -->
<?php
// if the VF zone is checked, display it
// if ODVF1 = 1 (true boolean) the value="0" checked="true"
for ($z = 1; $z < 5; $z++) {
$ODzone = "ODVF" . $z;
if (${$ODzone} == '1') {
$ODVF[$z] = '<i class="fa fa-square fa-5">X</i>';
if ($PDF_OUTPUT) {
$ODVF[$z] = 'X';
}
$bad++;
} else {
$ODVF[$z] = '<i class="fa fa-square-o fa-5"></i>';
if ($PDF_OUTPUT) {
$ODVF[$z] = 'O';
}
}
$OSzone = "OSVF" . $z;
if (${$OSzone} == "1") {
$OSVF[$z] = '<i class="fa fa-square fa-5">X</i>';
if ($PDF_OUTPUT) {
$OSVF[$z] = 'X';
}
$bad++;
} else {
$OSVF[$z] = '<i class="fa fa-square-o fa-5"></i>';
if ($PDF_OUTPUT) {
$OSVF[$z] = 'O';
}
}
}
?>
<?php
if ($bad < '1') {
?>
<td class="report_vitals">
<b class="underline"><?php
echo xlt('Fields{{visual fields}}');
?>
</b>
<?php
echo "<br /><br /> Full to CF OU <br /><br /><br />";
} else {
?>
<td class="report_vitals">
<b class="underline"><?php
echo xlt('Fields{{visual fields}}');
?>
</b>
<table style="font-size:1.0em;text-align:center;">
<tr style="font-weight:bold;">
<td style="width:0.5in;text-align:center;text-decoration:underline;" colspan="2"><b><?php
echo xlt('OD');
?>
</b>
<br />
<br />
</td>
<td style="width:0.1in;"> </td>
<td style="width:0.5in;text-align:center;text-decoration:underline;" colspan="2"><b><?php
echo xlt('OS');
?>
</b>
<br />
<br />
</td>
</tr>
<tr>
<td style="border-right:1pt solid black;border-bottom:1pt solid black;text-align:center;">
<?php
echo $ODVF['1'];
?>
</td>
<td style="border-left:1pt solid black;border-bottom:1pt solid black;text-align:center;">
<?php
echo $ODVF['2'];
?>
</td>
<td></td>
<td style="border-right:1pt solid black;border-bottom:1pt solid black;text-align:center;">
<?php
echo $OSVF['1'];
?>
</td>
<td style="border-left:1pt solid black;border-bottom:1pt solid black;text-align:center;">
<?php
echo $OSVF['2'];
?>
</td>
</tr>
<tr>
<td style="border-right:1pt solid black;border-top:1pt solid black;text-align:center;">
<?php
echo $ODVF['3'];
?>
</td>
<td style="border-left:1pt solid black;border-top:1pt solid black;text-align:center;">
<?php
echo $ODVF['4'];
?>
</td>
<td></td>
<td style="border-right:1pt solid black;border-top:1pt solid black;text-align:center;">
<?php
echo $OSVF['3'];
?>
</td>
<td style="border-left:1pt solid black;border-top:1pt solid black;text-align:center;">
<?php
echo $OSVF['4'];
?>
</td>
</tr>
</table>
<?php
}
?>
</td>
<!-- START OF THE MOTILITY BOX -->
<td class="report_vitals">
<b class="underline"><?php
echo xlt('Motility');
?>
</b>
<?php
if ($MOTILITYNORMAL == 'on') {
echo "<br /><br /> " . xlt('D&V Full OU{{Ductions and Versions full both eyes}}') . " <br /><br />";
} else {
if ($PDF_OUTPUT) {
$background = "url(" . $GLOBALS["fileroot"] . "/interface/forms/" . $form_folder . "/images/eom.jpg)";
} else {
$background = "url(../../forms/" . $form_folder . "/images/eom.bmp)";
}
$zone = array("MOTILITY_RRSO", "MOTILITY_RS", "MOTILITY_RLSO", "MOTILITY_RR", "MOTILITY_R0", "MOTILITY_RL", "MOTILITY_RRIO", "MOTILITY_RI", "MOTILITY_RLIO", "MOTILITY_LRSO", "MOTILITY_LS", "MOTILITY_LLSO", "MOTILITY_LR", "MOTILITY_L0", "MOTILITY_LL", "MOTILITY_LRIO", "MOTILITY_LI", "MOTILITY_LLIO");
for ($i = 0; $i < count($zone); ++$i) {
${$zone}[$i] >= '1' ? ${$zone}[$i] = "-" . ${$zone}[$i] : (${$zone}[$i] = '');
}
?>
<table style="font-size:1.0em;">
<tr style="font-weight:bold;">
<td style="text-align:center;text-decoration:underline;"><?php
echo xlt('OD');
?>
</td>
<td style="text-align:center;text-decoration:underline;"><?php
echo xlt('OS');
?>
</td>
</tr>
<tr>
<td style="font-weight:600;">
<table style="background: <?php
echo $background;
?>
no-repeat center center;filter: progid:DXImageTransform.Microsoft.Alpha(opacity=50); -moz-opacity: 0.5; -webkit-opacity: 0.5; opacity:1.0;padding-bottom:5px;">
<tr>
<td class="mot"><?php
echo $MOTILITY_RRSO;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_RS;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_RLSO;
?>
</td>
</tr>
<tr>
<td class="mot"><?php
echo $MOTILITY_RR;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_R0;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_RL;
?>
</td>
</tr>
<tr>
<td class="mot"><?php
echo $MOTILITY_RRIO;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_RI;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_RLIO;
?>
</td>
</tr>
</table>
</td>
<td style="text-align:center;font-weight:600;padding-left:20px;">
<table style="background: <?php
echo $background;
?>
no-repeat center center;filter: progid:DXImageTransform.Microsoft.Alpha(opacity=50) -moz-opacity: 0.5; -webkit-opacity: 1.0; opacity:0.5; padding:1px;">
<tr>
<td class="mot"><?php
echo $MOTILITY_LRSO;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_LS;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_LLSO;
?>
</td>
</tr>
<tr>
<td class="mot"><?php
echo $MOTILITY_LR;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_L0;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_LL;
?>
</td>
</tr>
<tr>
<td class="mot"><?php
echo $MOTILITY_LLIO;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_LI;
?>
</td>
<td class="mot"><?php
echo $MOTILITY_LLIO;
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
<?php
}
?>
</td>
<?php
if ($PUPIL_NORMAL == '1' || $ODPUPILSIZE1 || $OSPUPILSIZE1) {
?>
<td class="report_vitals" style="border-right:0px;">
<?php
if ($PUPIL_NORMAL == '1' && (!$ODPUPILSIZE1 || !$OSPUPILSIZE1)) {
?>
<b class="underline"><?php
echo xlt('Pupils');
?>
</b>
<?php
echo xlt('Round and Reactive') . "<br />";
}
if ($ODPUPILSIZE1 || $OSPUPILSIZE1) {
?>
<table cellspacing="0" style="margin:1px;text-align:center;font-size:9px;">
<tr>
<!-- start of the Pupils box -->
<td>
<b class="underline"><?php
echo xlt('Pupils');
?>
</b>
<table style="font-size: 8px;text-align:middle;">
<tr>
<th>
</th>
<th style="padding: 2px 5px;"><?php
echo xlt('size');
?>
(<?php
echo xlt('mm{{millimeters}}');
?>
)
</th>
<th style="padding: 2px;"><?php
echo xlt('react{{reactivity}}');
?>
</th>
<th style="padding: 2px;"><?php
echo xlt('APD{{afferent pupillary defect}}');
?>
</th>
</tr>
<tr>
<td><b><?php
echo xlt('OD');
?>
</b>
</td>
<td style="border-right:1pt solid black;border-bottom:1pt solid black;text-align:center;">
<?php
echo text($ODPUPILSIZE1);
?>
-->
<?php
echo text($ODPUPILSIZE2);
?>
</td>
<td style="text-align:center;border-left:1pt solid black;border-right:1pt solid black;border-bottom:1pt solid black;">
<?php
echo text($ODPUPILREACTIVITY);
?>
</td>
<td style="text-align:center;border-bottom:1pt solid black;">
<?php
echo text($ODAPD);
?>
</td>
</tr>
<tr>
<td><b><?php
echo xlt('OS');
?>
</b>
</td>
<td style="border-right:1pt solid black;border-top:1pt solid black;text-align:center;">
<?php
echo text($OSPUPILSIZE1);
?>
-->
<?php
echo text($OSPUPILSIZE2);
?>
</td>
<td style="text-align:center;border-left:1pt solid black;border-right:1pt solid black;border-top:1pt solid black;">
<?php
echo text($OSPUPILREACTIVITY);
?>
</td>
<td style="text-align:center;border-top:1pt solid black;">
<?php
echo text($OSAPD);
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<?php
}
}
?>
</tr>
</table>
<?php
if ($DIMODPUPILSIZE1 || $DIMOSPUPILSIZE1 || $PUPIL_COMMENTS || $AMSLEROD || $AMSLEROS) {
?>
<!-- start of slide down pupils_panel -->
<br />
<table class='borderShadow' style="margin:1px;text-align:center;font-size:9px;">
<tr>
<td>
<b class="underline"><?php
echo xlt('Pupils');
?>
: <?php
echo xlt('Dim');
?>
</b>
<table style="report_vitals" style="font-size: 8px;text-align:middle;">
<tr >
<th></th>
<th style="padding: 2px;text-align:center;" ><?php
echo xlt('size');
?>
(<?php
echo xlt('mm{{millimeters}}');
?>
)
</th>
</tr>
<tr>
<td><b><?php
echo xlt('OD');
?>
</b>
</td>
<td style="text-align:bottom;border-bottom:1pt solid black;padding-left:0.1in;">
<?php
echo text($DIMODPUPILSIZE1);
?>
-->
<?php
echo text($DIMODPUPILSIZE2);
?>
</td>
</tr>
<tr>
<td ><b><?php
echo xlt('OS');
?>
</b>
</td>
<td style="border-top:1pt solid black;padding-left:0.1in;">
<?php
echo text($DIMOSPUPILSIZE1);
?>
-->
<?php
echo text($DIMOSPUPILSIZE2);
?>
</td>
</tr>
<tr><td colspan="2" style="padding-left:2px;text-align:bottom;">
<?php
echo text($PUPIL_COMMENTS);
?>
</td>
</tr>
</table>
</td>
<!-- end of slide down pupils_panel -->
<!-- START OF THE AMSLER BOX -->
<?php
if ($AMSLEROD || $AMSLEROS) {
?>
<td class="report_vitals" style="border-right:0px;border-left:1pt solid black;">
<b class="underline"><?php
echo xlt('Amsler');
?>
</b>
<?php
if (!$AMSLEROD) {
$AMSLEROD = "0";
}
if (!$AMSLEROS) {
$AMSLEROS = "0";
}
?>
<table style="font-size:1.0em;">
<tr style="font-weight:bold;">
<td style="text-align:center;text-decoration:underline;"><?php
echo xlt('OD');
?>
</td>
<td></td>
<td style="text-align:center;text-decoration:underline;"><?php
echo xlt('OS');
?>
</td>
</tr>
<tr>
<td style="text-align:center;">
<img src="../../forms/<?php
echo $form_folder;
?>
/images/Amsler_<?php
echo attr($AMSLEROD);
?>
.jpg" id="AmslerOD" style="margin:0.05in;height:0.5in;width:0.6in;" />
<br />
<small><?php
echo text($AMSLEROD);
?>
/5</small>
</td>
<td></td>
<td style="text-align:center;">
<img src="../../forms/<?php
echo $form_folder;
?>
/images/Amsler_<?php
echo attr($AMSLEROS);
?>
.jpg" id="AmslerOS" style="margin:0.05in;height:0.5in;width:0.6in;" />
<br /><small><?php
echo text($AMSLEROS);
?>
/5</small>
</td>
</tr>
</table>
</td>
<?php
}
?>
</tr>
</table>
<?php
}
if ($cols != 'Fax') {
if ($ODVA || $OSVA || $ARODSPH || $AROSSPH || $MRODSPH || $MROSSPH || $CRODSPH || $CROSSPH || $CTLODSPH || $CTLOSSPH) {
?>
<!-- start of the refraction boxes -->
<br />
<table class="refraction_tables">
<tr>
<td colspan="9" style="text-align:left;text-decoration:underline;font-weight:bold;"><?php
echo xlt('Refractive States');
?>
</td>
</tr>
<tr style="text-align:center;padding:5px;text-decoration:underline;">
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Type') . $count_rx;
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Eye');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Sph{{Sphere}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Cyl{{Cylinder}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Axis{{Axis of a glasses prescription}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Prism');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Acuity');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Mid{{Middle Distance Add}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('ADD{{Near Add}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('Acuity');
?>
</td>
</tr>
<?php
//$count_rx++;
for ($i = 1; $i <= $count_rx; $i++) {
if (${"RX_TYPE_{$i}"} == "0") {
$RX_TYPE = '';
} else {
if (${"RX_TYPE_{$i}"} == "1") {
$RX_TYPE = xlt('Bifocals');
} else {
if (${"RX_TYPE_{$i}"} == "2") {
$RX_TYPE = xlt('Trifocals');
} else {
if (${"RX_TYPE_{$i}"} == "3") {
$RX_TYPE = xlt('Progressive');
}
}
}
}
/*
Note html2pdf does not like the last field of a table to be blank.
If it is it will squish the lines together.
Work around: if the field is blank, then replace it with a "-" else echo it.
aka echo (text($field))?:"-");
*/
?>
<tr>
<td style="font-weight:600;font-size:0.7em;text-align:right;"><?php
echo xlt('Current RX') . " #" . $i . ": ";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OD{{right eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODSPH_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODCYL_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODAXIS_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODPRISM_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODVA_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODMIDADD_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODADD_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"ODNEARVA_{$i}"}) ?: "-";
?>
</td>
</tr>
<tr>
<td style="font-weight:600;font-size:0.7em;text-align:right;"><?php
echo $RX_TYPE;
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OS{{left eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSSPH_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSCYL_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSAXIS_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSPRISM_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSVA_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSMIDADD_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSADD_{$i}"}) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text(${"OSNEARVA_{$i}"}) ?: "-";
?>
</td>
</tr>
<?php
if (${"COMMENTS_{$i}"}) {
?>
<tr>
<td></td>
<td colspan="2"><?php
echo xlt('Comments');
?>
:</td>
<td colspan="7"><?php
echo text(${"COMMENTS_{$i}"});
?>
</td>
</tr>
<?php
}
}
if ($ARODSPH || $AROSSPH) {
?>
<tr style="border-bottom:1pt solid black;">
<td style="font-weight:600;font-size:0.7em;text-align:right;"><?php
echo xlt('Auto Refraction');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OD{{right eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARODSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARODCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARODAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARODPRISM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARODVA) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;">-</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARODADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARNEARODVA) ?: "-";
?>
</td>
</tr>
<tr>
<td> </td>
<td style="font-weight:400;font-size:1.0em;text-align:right;"><?php
echo xlt('OS{{left eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($AROSSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($AROSCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($AROSAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($AROSPRISM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($AROSVA) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;">-</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($AROSADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($ARNEAROSVA) ?: "-";
?>
</td>
</tr>
<?php
if (${"COMMENTS_{$i}"}) {
?>
<tr>
<td></td><td></td>
<td>Comments:</td>
<td colspan="7"><?php
echo text(${"COMMENTS_{$i}"});
?>
</td>
</tr>
<?php
}
}
if ($MRODSPH || $MROSSPH) {
?>
<tr>
<td style="font-weight:600;font-size:0.7em;text-align:right;"><?php
echo xlt('Manifest (Dry) Refraction');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OD{{right eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRODSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRODCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRODAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRODPRISM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRODVA) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;">-</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRODADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRNEARODVA) ?: "-";
?>
</td>
</tr>
<tr></tr>
<tr>
<td></td>
<td style="font-weight:400;font-size:1.0em;text-align:right;"><?php
echo xlt('OS{{left eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MROSSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MROSCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MROSAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MROSPRISM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MROSVA) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;">-</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MROSADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($MRNEAROSVA) ?: "-";
?>
</td>
</tr>
<?php
}
if ($CRODSPH || $CROSSPH) {
?>
<tr>
<td style="font-weight:600;font-size:0.8em;text-align:right;"><?php
echo xlt('Cycloplegic (Wet) Refraction');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OD{{right eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRODSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRODCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRODAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRODPRISM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRODVA) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;">-</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRODADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRNEARODVA) ?: "-";
?>
</td>
</tr>
<tr>
<td></td>
<td style="font-weight:400;font-size:1.0em;text-align:right;"><?php
echo xlt('OS{{left eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CROSSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CROSCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CROSAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CROSPRISM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CROSVA) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;">-</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CROSADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CRNEAROSVA) ?: "-";
?>
</td>
</tr>
<?php
}
if ($CTLODSPH || $CTLOSSPH) {
?>
<tr style="text-align:center;padding:5px;text-decoration:underline;">
<td></td>
<td><?php
echo xlt('Eye');
?>
</td>
<td><?php
echo xlt('Sph{{Sphere}}');
?>
</td>
<td><?php
echo xlt('Cyl{{Cylinder}}');
?>
</td>
<td><?php
echo xlt('Axis{{Axis of a glasses prescription}}');
?>
</td>
<td><?php
echo xlt('BC{{Base Curve}}');
?>
</td>
<td><?php
echo xlt('Diam{{Diameter}}');
?>
</td>
<td><?php
echo xlt('ADD');
?>
</td>
<td><?php
echo xlt('Acuity');
?>
</td>
</tr>
<tr>
<td style="font-weight:600;font-size:0.8em;text-align:right;"><?php
echo xlt('Contact Lens');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OD{{right eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODBC) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODDIAM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLODVA) ?: "-";
?>
</td>
</tr>
<tr style="font-size:0.6em;">
<td></td>
<td></td>
<td colspan="3" style="font-weight:400;font-size:1.0em;text-align:left;"><?php
echo xlt('Brand');
?>
:<?php
echo text($CTLBRANDOD) ?: "-";
?>
</td>
<td colspan="3" style="font-weight:400;font-size:1.0em;text-align:left;"><?php
echo xlt('by{{made by/manufacturer}}');
?>
<?php
echo text($CTLMANUFACTUREROD) ?: "-";
?>
</td>
<td colspan="3" style="font-weight:400;font-size:1.0em;text-align:left;"><?php
echo xlt('via{{shipped by/supplier}}');
?>
<?php
echo text($CTLSUPPLIEROD) ?: "-";
?>
</td>
</tr>
<tr>
<td></td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo xlt('OS{{left eye}}');
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLOSSPH) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLOSCYL) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLOSAXIS) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLOSBC) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLOSDIAM) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo text($CTLOSADD) ?: "-";
?>
</td>
<td style="font-weight:400;font-size:1.0em;text-align:center;"><?php
echo $CTLOSVA ?: "-";
?>
</td>
</tr>
<tr style="font-size:0.6em;">
<td></td>
<td></td>
<td colspan="3" style="font-weight:400;font-size:1.0em;text-align:left;"><?php
echo xlt('Brand');
?>
: <?php
echo text($CTLBRANDOS) ?: "-";
?>
</td>
<td colspan="3" style="font-weight:400;font-size:1.0em;text-align:left;"><?php
echo xlt('by{{made by/manufacturer}}');
?>
<?php
echo text($CTLMANUFACTUREROS) ?: "-";
?>
</td>
<td colspan="3" style="font-weight:400;font-size:1.0em;text-align:left;"><?php
echo xlt('via{{shipped by/supplier}}');
?>
<?php
echo text($CTLSUPPLIEROS) ?: "-";
?>
</td>
</tr>
<?php
}
?>
</table>
<?php
}
?>
<br />
<?php
if ($GLAREODVA || $CONTRASTODVA || $ODK1 || $ODK2 || $LIODVA || $PAMODBA) {
?>
<table>
<tr>
<td id="LayerVision_ADDITIONAL" class="refraction <?php
echo $display_Add;
?>
" style="padding:10px;font-size:0.9em;">
<table id="Additional" style="padding:5;font-size:1.0em;">
<tr><td colspan="9" style="text-align:left;text-decoration:underline;font-weight:bold;"><?php
echo xlt('Additional Data Points');
?>
</td></tr>
<tr><td></td>
<td><?php
echo xlt('PH{{Pinhole}}');
?>
</td>
<td><?php
echo xlt('PAM{{Potential Acuity Meter}}');
?>
</td>
<td><?php
echo xlt('LI{{Laser Interferometry}}');
?>
</td>
<td><?php
echo xlt('BAT{{Brightness Acuity Testing}}');
?>
</td>
<td><?php
echo xlt('K1{{Keratometry 1}}');
?>
</td>
<td><?php
echo xlt('K2{{Keratometry 2}}');
?>
</td>
<td><?php
echo xlt('Axis{{Axis of a glasses prescription}}');
?>
</td>
</tr>
<tr><td><b><?php
echo xlt('OD{{right eye}}');
?>
:</b></td>
<td><?php
echo text($PHODVA);
?>
</td>
<td><?php
echo text($PAMODVA);
?>
</td>
<td><?php
echo text($LIODVA);
?>
</td>
<td><?php
echo text($GLAREODVA);
?>
</td>
<td><?php
echo text($ODK1);
?>
</td>
<td><?php
echo text($ODK2);
?>
</td>
<td><?php
echo text($ODK2AXIS);
?>
</td>
</tr>
<tr>
<td><b><?php
echo xlt('OS{{left eye}}');
?>
:</b></td>
<td><?php
echo text($PHOSVA);
?>
</td>
<td><?php
echo text($PAMOSVA);
?>
</td>
<td><?php
echo text($LIOSVA);
?>
</td>
<td><?php
echo text($GLAREOSVA);
?>
</td>
<td><?php
echo text($OSK1);
?>
</td>
<td><?php
echo text($OSK2);
?>
</td>
<td><?php
echo text($OSK2AXIS);
?>
</td>
</tr>
<tr><td> </td></tr>
<tr>
<td></td>
<td><?php
echo xlt('AxLength{{axial Length}}');
?>
</td>
<td><?php
echo xlt('ACD{{anterior chamber depth}}');
?>
</td>
<td><?php
echo xlt('PD{{pupillary distance}}');
?>
</td>
<td><?php
echo xlt('LT{{lens thickness}}');
?>
</td>
<td><?php
echo xlt('W2W{{white-to-white}}');
?>
</td>
<td><?php
echo xlt('ECL{{equivalent contact lens power at the corneal level}}');
?>
</td>
<!-- <td><?php
echo xlt('pend');
?>
</td> -->
</tr>
<tr><td><b><?php
echo xlt('OD{{right eye}}');
?>
:</b></td>
<td><?php
echo text($ODAXIALLENGTH);
?>
</td>
<td><?php
echo text($ODACD);
?>
</td>
<td><?php
echo text($ODPDMeasured);
?>
</td>
<td><?php
echo text($ODLT);
?>
</td>
<td><?php
echo text($ODW2W);
?>
</td>
<td><?php
echo text($ODECL);
?>
</td>
<!-- <td><input type=text id="pend" name="pend" value="<?php
echo text($pend);
?>
"></td> -->
</tr>
<tr>
<td><b><?php
echo xlt('OS{{left eye}}');
?>
:</b></td>
<td><?php
echo text($OSAXIALLENGTH);
?>
</td>
<td><?php
echo text($OSACD);
?>
</td>
<td><?php
echo text($OSPDMeasured);
?>
</td>
<td><?php
echo text($OSLT);
?>
</td>
<td><?php
echo text($OSW2W);
?>
</td>
<td><?php
echo text($OSECL);
?>
</td>
<!-- <td><input type=text id="pend" name="pend" value="<?php
echo text($pend);
?>
"></td> -->
</tr>
</table>
</td>
</tr>
</table>
<?php
}
}
?>
<!-- end of the refraction boxes -->
<!-- start of external exam -->
<div class="report_exam_group">
<table>
<tr>
<td style="text-align:left;vertical-align:top;">
<b class="underline"><?php
echo xlt('External Exam');
?>
:</b>
<table class="report_section">
<tr>
<td class="bold" style="text-align:right;padding-right:10px;text-decoration:underline;max-width:150px;"><?php
echo xlt('Right');
?>
</td>
<td style="width:100px;"></td>
<td class="bold" style="text-align:left;padding-left:10px;text-decoration:underline;max-width:150px;"><?php
echo xlt('Left');
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($RBROW);
?>
</td>
<td class="middle"><?php
echo xlt('Brow');
?>
</td>
<td class="report_text left"><?php
echo text($LBROW);
?>
</td>
</tr>
<tr>
<td class="report_text right ">
<?php
echo text($RUL);
?>
</td>
<td class="middle"><?php
echo xlt('Upper Lids');
?>
</td>
<td class="report_text left"><?php
echo text($LUL);
?>
</td>
</tr>
<tr>
<td class="report_text right "><?php
echo text($RLL);
?>
</td>
<td class="middle"><?php
echo xlt('Lower Lids');
?>
</td>
<td class="report_text left"><?php
echo text($LLL);
?>
</td>
</tr>
<tr>
<td class="report_text right "><?php
echo text($RMCT);
?>
</td>
<td class="middle"><?php
echo xlt('Medial Canthi');
?>
</td>
<td class="report_text left"><?php
echo text($LMCT);
?>
</td>
</tr>
<?php
if ($RADNEXA || $LADNEXA) {
?>
<tr>
<td class="report_text right"><?php
echo text($RADNEXA);
?>
</td>
<td class="middle"><?php
echo xlt('Adnexa');
?>
</td>
<td class="report_text left"><?php
echo text($LADNEXA);
?>
</td>
</tr>
<?php
}
if ($EXT_COMMENTS) {
?>
<tr>
<td colspan="3">
<b><?php
echo xlt('Comments');
?>
:</b>
<span style="height:3.0em;">
<?php
echo text($EXT_COMMENTS);
?>
</span>
</td>
</tr>
<?php
}
?>
</table>
</td>
<td style="text-align:center;padding:1px;vertical-align:middle;">
<?php
display_draw_image("EXT", $encounter, $pid);
?>
</td>
</tr>
</table>
</div>
<!-- end of external exam -->
<div class="report_exam_group">
<?php
if ($OSCONJ || $ODCONJ || $ODCORNEA || $OSCORNEA || $ODAC || $OSAC || $ODLENS || $OSLENS || $ODIRIS || $OSIRIS) {
?>
<!-- start of Anterior Segment exam -->
<table>
<tr>
<td style="text-align:left;padding:1px;vertical-align:top;">
<b class="underline"><?php
echo xlt('Anterior Segment');
?>
:</b>
<table class="report_section">
<tr>
<td class="bold" style="text-align:right;padding-right:10px;text-decoration:underline;max-width:200px;"><?php
echo xlt('Right');
?>
</td>
<td style="width:100px;"></td>
<td class="bold" style="text-align:left;padding-left:10px;text-decoration:underline;max-width:200px;"><?php
echo xlt('Left');
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($ODCONJ);
?>
</td>
<td class="middle"><?php
echo xlt('Conj{{Conjunctiva}}');
?>
</td>
<td class="report_text left"><?php
echo text($OSCONJ);
?>
</td>
</tr>
<tr>
<td class="report_text right "><?php
echo text($ODCORNEA);
?>
</td>
<td class="middle"><?php
echo xlt('Cornea');
?>
</td>
<td class="report_text left"><?php
echo text($OSCORNEA);
?>
</td>
</tr>
<tr>
<td class="report_text right "><?php
echo text($ODAC);
?>
</td>
<td class="middle"><?php
echo xlt('A/C{{anterior chamber}}');
?>
</td>
<td class="report_text left"><?php
echo text($OSAC);
?>
</td>
</tr>
<tr>
<td class="report_text right "><?php
echo text($ODLENS);
?>
</td>
<td class="middle"><?php
echo xlt('Lens');
?>
</td>
<td class="report_text left"><?php
echo text($OSLENS);
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($ODIRIS);
?>
</td>
<td class="middle"><?php
echo xlt('Iris');
?>
</td>
<td class="report_text left"><?php
echo text($OSIRIS);
?>
</td>
</tr>
<?php
if ($ODGONIO || $OSDGONIO) {
?>
<tr>
<td class="report_text right" style="width:100px;"><?php
echo text($ODGONIO);
?>
</td>
<td class="middle"><?php
echo xlt('Gonioscopy');
?>
</td>
<td class="report_text left" style="width:100px;"><?php
echo text($OSGONIO);
?>
</td>
</tr>
<?php
}
if ($ODKTHICKNESS || $OSKTHICKNESS) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODKTHICKNESS);
?>
</td>
<td class="middle" title="<?php
echo xla('Pachymetry');
?>
"><?php
echo xlt('Pachymetry');
?>
</td>
<td class="report_text left"><?php
echo text($OSKTHICKNESS);
?>
</td>
</tr>
<?php
}
if ($ODSCHIRMER1 || $OSSCHIRMER1) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODSCHIRMER1);
?>
</td>
<td class="middle" title="<?php
echo xla('Schirmers I (w/o anesthesia)');
?>
"><?php
echo xlt('Schirmers I');
?>
</td>
<td class="report_text left"><?php
echo text($OSSCHIRMER1);
?>
</td>
</tr>
<?php
}
if ($ODSCHIRMER2 || $OSSCHIRMER2) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODSCHIRMER2);
?>
</td>
<td class="middle" title="<?php
echo xla('Schirmers II (w/ anesthesia)');
?>
"><?php
echo xlt('Schirmers II');
?>
</td>
<td class="report_text left"><?php
echo text($OSSCHIRMER2);
?>
</td>
</tr>
<?php
}
if ($ODTBUT || $OSTBUT) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODTBUT);
?>
</td>
<td class="middle" title="<?php
echo xla('Tear Break Up Time');
?>
"><?php
echo xlt('TBUT');
?>
</td>
<td class="report_text left"><?php
echo text($OSTBUT);
?>
</td>
</tr>
<?php
}
if ($ANTSEG_COMMENTS) {
?>
<tr>
<td colspan="2">
<b><?php
echo xlt('Comments');
?>
:</b>
<span style="height:3.0em;">
<?php
echo text($ANTSEG_COMMENTS);
?>
</span>
</td>
</tr>
<?php
}
?>
</table>
</td>
<td style="text-align:center;padding:1px;vertical-align:middle;">
<?php
display_draw_image("ANTSEG", $encounter, $pid);
?>
</td>
</tr>
</table>
<!-- end of Anterior Segment exam -->
<?php
}
?>
</div>
<div class="report_exam_group">
<!-- start of Other exam -->
<?php
if ($RLF || $LLF || $RMRD || $LMRD || $RVFISSURE || $LVFISSURE || $RCAROTID || $LCAROTID || $RTEMPART || $LTEMPART || $RCNV || $LCNV || $RCNVII || $LCNVII || $HERTELBASE || $ODCOLOR || $OSCOLOR || $ODREDDESAT || $OSREDDESAT || $ODCOINS || $OSCOINS || $ODNPA || $OSNPA || $NPA || $NPC || $STEREOPSIS || $DACCDIST || $DACCNEAR || $CACCDIST || $CACCNEAR || $VERTFUSAMPS) {
?>
<table>
<tr>
<td style="text-align:left;vertical-align:top;padding:1px;">
<b><u><?php
echo xlt('Additional Findings');
?>
:</u></b>
<?php
if ($ACT == 'on' and $MOTILITYNORMAL == 'on') {
?>
<span id="ACTNORMAL_CHECK" name="ACTNORMAL_CHECK">
<?php
echo xlt('Orthophoric');
?>
</span>
<?php
}
?>
<table class="report_section">
<tr>
<td class="bold" style="text-align:right;padding-right:10px;text-decoration:underline;max-width:200px;"><?php
echo xlt('Right');
?>
</td>
<td style="width:100px;"></td>
<td class="bold" style="text-align:left;padding-left:10px;text-decoration:underline;max-width:200px;"><?php
echo xlt('Left');
?>
</td>
</tr>
<?php
if ($RLF || $LLF) {
?>
<tr>
<td class="report_text right" style=""><?php
echo text($RLF);
?>
</td>
<td class="middle" style="width:100px;"><?php
echo xlt('Levator Function');
?>
</td>
<td class="report_text left" style=""><?php
echo text($LLF);
?>
</td>
</tr>
<?php
}
if ($RMRD || $LMRD) {
?>
<tr>
<td class="report_text right"><?php
echo text($RMRD);
?>
</td>
<td class="middle" title="<?php
echo xla('Marginal Reflex Distance');
?>
"><?php
echo xlt('MRD{{marginal reflex distance}}');
?>
</td>
<td class="report_text left"><?php
echo text($LMRD);
?>
</td>
</tr>
<?php
}
if ($RVFISSURE || $LVFISSURE) {
?>
<tr>
<td class="report_text right"><?php
echo text($RVFISSURE);
?>
</td>
<td class="middle" title="<?php
echo xla('Vertical Fissure: central height between lid margins');
?>
"><?php
echo xlt('Vert Fissure{{vertical fissure}}');
?>
</td>
<td class="report_text left"><?php
echo text($LVFISSURE);
?>
</td>
</tr>
<?php
}
if ($RCAROTID || $LCAROTID) {
?>
<tr>
<td class="report_text right"><?php
echo text($RCAROTID);
?>
</td>
<td class="middle" title="<?php
echo xla('Any carotid bruits appreciated?');
?>
"><?php
echo xlt('Carotid{{carotid arteries}}');
?>
</td>
<td class="report_text left"><?php
echo text($LCAROTID);
?>
</td>
</tr>
<?php
}
if ($RTEMPART || $LTEMPART) {
?>
<tr>
<td class="report_text right"><?php
echo text($RTEMPART);
?>
</td>
<td class="middle" title="<?php
echo xla('Temporal Arteries');
?>
"><?php
echo xlt('Temp. Art.{{temporal arteries}}');
?>
</td>
<td class="report_text left"><?php
echo text($LTEMPART);
?>
</td>
</tr>
<?php
}
if ($RCNV || $LCNV) {
?>
<tr>
<td class="report_text right"><?php
echo text($RCNV);
?>
</td>
<td class="middle" title="<?php
echo xla('Cranial Nerve 5: Trigeminal Nerve');
?>
"><?php
echo xlt('CN V{{cranial nerve five}}');
?>
</td>
<td class="report_text left"><?php
echo text($LCNV);
?>
</td>
</tr>
<?php
}
if ($RCNVII || $LCNVII) {
?>
<tr>
<td class="report_text right"><?php
echo text($RCNVII);
?>
</td>
<td class="middle" title="<?php
echo xla('Cranial Nerve 7: Facial Nerve');
?>
"><?php
echo xlt('CN VII{{cranial nerve seven}}');
?>
</td>
<td class="report_text left"><?php
echo text($LCNVII);
?>
</td>
</tr>
<?php
}
if ($HERTELBASE) {
?>
<tr>
<td colspan="3" style="text-align:center;padding-top:15px;">
<b style="font-weight:bold;padding-bottom:5px;">
<?php
echo xlt('Hertel Exophthalmometry');
?>
</b>
<br />
<?php
if ($HERTELBASE) {
?>
<b style="border:1pt solid black;width:30px;text-align:center;padding:0 5;">
<?php
echo text($ODHERTEL);
?>
</b>
<b class="fa fa-minus">--</b>
<b style="border:1pt solid black;width:40px;text-align:center;padding:0 5;">
<?php
echo text($HERTELBASE);
?>
</b>
<b class="fa fa-minus">--</b>
<b style="border:1pt solid black;width:30px;text-align:center;padding:0 5;">
<?php
echo text($OSHERTEL);
?>
</b>
<?php
}
?>
</td>
</tr>
<?php
}
if ($ODCOLOR || $OSCOLOR || $ODREDDESAT || $OSREDDESAT || $ODCOINS || $OSCOINS || $ODNPA || $OSNPA || $NPA || $NPC || $STEREOPSIS) {
?>
<!-- start of NEURO exam -->
<?php
if ($ODCOLOR or $OSCOLOR) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODCOLOR);
?>
</td>
<td class="middle"><?php
echo xlt('Color Vision');
?>
</td>
<td class="report_text left"><?php
echo text($OSCOLOR);
?>
</td>
</tr>
<?php
}
if ($ODREDDESAT or $OSREDDESAT) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODREDDESAT);
?>
</td>
<td class="middle"><span title="<?php
xla('Variation in red color discrimination between the eyes (eg. OD=100, OS=75)');
?>
"><?php
echo xlt('Red Desaturation');
?>
</span></td>
<td class="report_text left"><?php
echo text($OSREDDESAT);
?>
</td>
</tr><?php
}
if ($ODCOINS or $OSCOINS) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODCOINS);
?>
</td>
<td class="middle"><span title="<?php
echo xla('Variation in white (muscle) light brightness discrimination between the eyes (eg. OD=$1.00, OS=$0.75)');
?>
"><?php
echo xlt('Coins');
?>
</span></td>
<td class="report_text left"><?php
echo text($OSCOINS);
?>
</td>
</tr>
<?php
}
if ($ODNPA or $OSNPA) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODNPA);
?>
</td>
<td class="middle"><span title="<?php
echo xla('Near Point of Accomodation');
?>
"><?php
echo xlt('NPA{{near point of accomodation}}');
?>
</span></td>
<td class="report_text left"><?php
echo text($OSNPA);
?>
</td>
</tr>
<?php
}
if ($ODNPC or $OSNPC) {
?>
<tr>
<td class="right" style="font-weight:600;"><?php
echo xlt('NPC{{near point of convergence}}');
?>
: </td>
<td class="center" colspan="2" ><?php
echo text($NPC);
?>
</td>
</tr>
<?php
}
if ($DACCDIST or $DACCNEAR or $CACCDIST or $CACCNEAR or $VERTFUSAMPS) {
?>
<tr style="text-decoration:underline;">
<td></td>
<td class="middle"><?php
echo xlt('Distance');
?>
</td>
<td class="middle"> <?php
echo xlt('Near');
?>
</td>
</tr>
<?php
}
if ($DACCDIST or $DACCNEAR) {
?>
<tr>
<td class="right" style="font-weight:600;"><?php
echo xlt('Divergence Amps');
?>
: </td>
<td class="center"><?php
echo text($DACCDIST);
?>
</td>
<td class="center"><?php
echo text($DACCNEAR);
?>
</td>
</tr>
<?php
}
if ($CACCDIST or $CACCNEAR) {
?>
<tr>
<td class="right" style="font-weight:600;"><?php
echo xlt('Convergence Amps');
?>
: </td>
<td class="center"><?php
echo text($CACCDIST);
?>
</td>
<td class="center"><?php
echo text($CACCNEAR);
?>
</td>
</tr>
<?php
}
if ($VERTFUSAMPS) {
?>
<tr>
<td class="right" style="font-weight:600;">
<?php
echo xlt('Vert Fusional Amps');
?>
:
</td>
<td colspan="2" class="center">
<?php
echo text($VERTFUSAMPS);
?>
<br />
</td>
</tr>
<?php
}
if ($STEREOPSIS) {
?>
<tr>
<td class="right" style="font-weight:600;"><?php
echo xlt('Stereopsis');
?>
: </td>
<td class="center" colspan="2"><?php
echo text($STEREOPSIS);
?>
</td>
</tr>
<?php
}
}
?>
</table>
</td>
<td style="text-align:center;padding:1px;vertical-align:middle;">
<?php
display_draw_image("NEURO", $encounter, $pid);
?>
</td>
</tr>
</table>
<?php
}
?>
<!-- end of Other exam -->
</div>
<div class="report_exam_group">
<!-- start of the Retina exam -->
<?php
if ($ODDISC || $OSDISC || $ODCUP || $ODMACULA || $ODVESSELS || $ODPERIPH) {
?>
<table>
<tr>
<td style="text-align:left;padding:1px;vertical-align:top;">
<b><u><?php
echo xlt('Retina');
?>
:</u></b>
<table class="report_section">
<tr>
<td class="bold" style="text-align:right;text-decoration:underline;max-width:150px;"><?php
echo xlt('Right');
?>
</td>
<td style="width:100px;"></td>
<td class="bold" style="text-align:left;text-decoration:underline;max-width:150px;"><?php
echo xlt('Left');
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($ODDISC);
?>
</td>
<td class="middle"><?php
echo xlt('Disc');
?>
</td>
<td class="report_text left"><?php
echo text($OSDISC);
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($ODCUP);
?>
</td>
<td class="middle"><?php
echo xlt('Cup');
?>
</td>
<td class="report_text left"><?php
echo text($OSCUP);
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($ODMACULA);
?>
</td>
<td class="middle"><?php
echo xlt('Macula');
?>
</td>
<td class="report_text left"><?php
echo text($OSMACULA);
?>
</td>
</tr>
<tr>
<td class="report_text right"><?php
echo text($ODVESSELS);
?>
</td>
<td class="middle"><?php
echo xlt('Vessels');
?>
</td>
<td class="report_text left"><?php
echo text($OSVESSELS);
?>
</td>
</tr>
<?php
if ($ODPERIPH || $OSPERIPH) {
?>
<tr>
<td class="report_text right"><?php
echo text($ODPERIPH);
?>
</td>
<td class="middle"><?php
echo xlt('Periph{{periphery}}');
?>
</td>
<td class="report_text left"><?php
echo text($OSPERIPH);
?>
</td>
</tr>
<?php
}
if ($ODCMT || $OSCMT) {
?>
<tr>
<td class="report_text right"> <?php
echo text($ODCMT);
?>
</td>
<td class="middle"><?php
echo xlt('Central Macular Thickness');
?>
</td>
<td class="report_text left" > <?php
echo text($OSCMT);
?>
</td>
</tr>
<?php
}
?>
<?php
if ($RETINA_COMMENTS) {
?>
<tr>
<td colspan="2" class="report_text left">
<b><?php
echo xlt('Comments');
?>
:</b>
<span style="height:3.0em;">
<?php
echo text($RETINA_COMMENTS);
?>
</span>
</td>
</tr>
<?php
}
?>
</table>
</td>
<td style="text-align:center;padding:1px;vertical-align:middle;">
<?php
display_draw_image("RETINA", $encounter, $pid);
?>
</td>
</tr>
</table>
<?php
}
?>
<!-- end of Retina exam -->
</div>
<?php
if ($ACT != 'on') {
?>
<table style="text-align:center;font-size:0.7em;">
<tr>
<td colspan=3 style="">
<table>
<tr style="text-align:left;height:16px;vertical-align:middle;width:880px;">
<td>
<span id="ACTTRIGGER" name="ACTTRIGGER" style="text-decoration:underline;padding-left:2px;">
<?php
echo xlt('Alternate Cover Test');
?>
:
</span>
</td>
</tr>
<tr>
<?php
if ($ACT5SCDIST) {
?>
<td style="text-align:center;"> <!-- scDIST -->
<table cellpadding="0"
style="position:relative;text-align:center;font-size:1.2em;margin: 7 5 10 5;">
<tr>
<td id="ACT_tab_SCDIST" name="ACT_tab_SCDIST" class="ACT_deselected"> <?php
echo xlt('sc Distance{{without correction distance}}');
?>
</td>
</tr>
<tr>
<td colspan="4" style="text-align:center;font-size:0.9em;">
<table>
<tr>
<td style="text-align:center;"><?php
echo xlt('R{{right}}');
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT1SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT2SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT3SCDIST);
?>
</td>
<td style="text-align:center;"><?php
echo xlt('L{{left}}');
?>
</td>
</tr>
<tr>
<td style="text-align:right;"><i class="fa fa-reply rotate-left"></i></td>
<td class="ACT"><?php
echo report_ACT($ACT4SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT5SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT6SCDIST);
?>
</td>
<td><i class="fa fa-share rotate-right"></i></td>
</tr>
<tr>
<td class="ACT"><?php
echo report_ACT($ACT10SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT7SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT8SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT9SCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT11SCDIST);
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<?php
}
if ($ACT5CCDIST) {
?>
<td style="text-align:center;"> <!-- ccDIST -->
<table cellpadding="0" style="position:relative;text-align:center;font-size:1.5em;margin: 7 5 10 5;border-collapse: separate;">
<tr>
<td class="ACT_deselected"> <?php
echo xlt('cc Distance{{with correction at distance}}');
?>
</td>
</tr>
<tr>
<td colspan="4" style="text-align:center;font-size:0.8em;">
<table>
<tr>
<td style="text-align:center;"><?php
echo xlt('R{{right}}');
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT1CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT2CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT3CCDIST);
?>
</td>
<td style="text-align:center;"><?php
echo xlt('L{{left}}');
?>
</td>
</tr>
<tr>
<td style="text-align:right;"><i class="fa fa-reply rotate-left"></i></td>
<td class="ACT"><?php
echo report_ACT($ACT4CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT5CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT6CCDIST);
?>
</td>
<td><i class="fa fa-share rotate-right"></i></td>
</tr>
<tr>
<td class="ACT"><?php
echo report_ACT($ACT10CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT7CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT8CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT9CCDIST);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT11CCDIST);
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<?php
}
if ($ACT5SCNEAR) {
?>
<td style="text-align:center;"> <!-- scNEAR -->
<table cellpadding="0" style="position:relative;text-align:center;font-size:1.5em;margin: 7 5 10 5;border-collapse: separate;">
<tr>
<td class="ACT_deselected"> <?php
echo xlt('sc Near{{without correction near}}');
?>
</td>
</tr>
<tr>
<td colspan="4" style="text-align:center;font-size:0.8em;">
<table>
<tr>
<td style="text-align:center;"><?php
echo xlt('R{{right}}');
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT1SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT2SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT3SCNEAR);
?>
</td>
<td style="text-align:center;"><?php
echo xlt('L{{left}}');
?>
</td>
</tr>
<tr>
<td style="text-align:right;"><i class="fa fa-reply rotate-left"></i></td>
<td class="ACT"><?php
echo report_ACT($ACT4SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT5SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT6SCNEAR);
?>
</td>
<td><i class="fa fa-share rotate-right"></i></td>
</tr>
<tr>
<td class="ACT"><?php
echo report_ACT($ACT10SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT7SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT8SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT9SCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT11SCNEAR);
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<?php
}
if ($ACT5CCNEAR) {
?>
<td style="text-align:center;"> <!-- ccNEAR -->
<table cellpadding="0" style="position:relative;text-align:center;font-size:1.5em;margin: 7 5 10 5;border-collapse: separate;">
<tr>
<td class="ACT_deselected"> <?php
echo xlt('cc Near{{with correction at Near}}');
?>
</td>
</tr>
<tr>
<td colspan="4" style="text-align:center;font-size:1.0em;">
<table>
<tr>
<td style="text-align:center;"><?php
echo xlt('R{{right}}');
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT1CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT2CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT3CCNEAR);
?>
</td>
<td style="text-align:center;"><?php
echo xlt('L{{left}}');
?>
</td>
</tr>
<tr>
<td style="text-align:right;"><i class="fa fa-reply rotate-left"></i></td>
<td class="ACT"><?php
echo report_ACT($ACT4CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT5CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT6CCNEAR);
?>
</td>
<td><i class="fa fa-share rotate-right"></i></td>
</tr>
<tr>
<td class="ACT"><?php
echo report_ACT($ACT10CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT7CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT8CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT9CCNEAR);
?>
</td>
<td class="ACT"><?php
echo report_ACT($ACT11CCNEAR);
?>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<?php
}
?>
</tr>
</table>
<?php
if ($NEURO_COMMENTS) {
?>
<table>
<tr>
<td colspan="2">
<b><?php
echo xlt('Comments');
?>
:</b><br />
<span style="height:3.0em;">
<?php
echo report_ACT($NEURO_COMMENTS);
?>
</span>
<br /><br />
</td>
</tr>
</table>
<?php
}
?>
</td>
</tr>
</table>
<?php
}
}
//end choice !== 'TEXT' -- include this in summary mouseover report.
?>
<!-- start of IMPPLAN exam -->
<table class="report_exam_group">
<tr>
<td style="text-align:left;padding:1px;vertical-align:top;width:480px;">
<b><u><?php
echo xlt('Impression/Plan');
?>
:</u></b>
<table style="">
<tr>
<td style="padding:5px;text-align: left;text-align:justify;width:475px;">
<?php
/**
* Retrieve and Display the IMPPLAN_items for the Impression/Plan zone.
*/
$query = "select * from form_" . $form_folder . "_impplan where form_id=? and pid=? order by IMPPLAN_order ASC";
$result = sqlStatement($query, array($form_id, $pid));
$i = '0';
$order = array("\r\n", "\n", "\r", "\v", "\f", "…", "\\u2028", "\\u2029");
$replace = "<br />";
// echo '<ol>';
while ($ip_list = sqlFetchArray($result)) {
$newdata = array('form_id' => $ip_list['form_id'], 'pid' => $ip_list['pid'], 'title' => $ip_list['title'], 'code' => $ip_list['code'], 'codetype' => $ip_list['codetype'], 'codetext' => $ip_list['codetext'], 'plan' => str_replace($order, $replace, $ip_list['plan']), 'IMPPLAN_order' => $ip_list['IMPPLAN_order']);
$IMPPLAN_items[$i] = $newdata;
$i++;
}
//for ($i=0; $i < count($IMPPLAN_item); $i++) {
foreach ($IMPPLAN_items as $item) {
echo $item['IMPPLAN_order'] + 1 . '. <b>' . text($item['title']) . '</b><br />';
echo '<div style="padding-left:15px;">';
$pattern = '/Code/';
if (preg_match($pattern, $item['code'])) {
$item['code'] = '';
}
if ($item['codetext'] > '') {
echo $item['codetext'] . "<br />";
} else {
if ($item['code'] > '') {
if ($item['codetype'] > '') {
$item['code'] = $item['codetype'] . ": " . $item['code'];
}
echo $item['code'] . "<br />";
}
}
echo $item['plan'] . "</div><br />";
}
if ($PLAN && $PLAN != '0') {
?>
<b><?php
echo xlt('Orders') . "/" . xlt('Next Visit');
?>
:</b>
<br />
<div style="padding-left:15px;padding-bottom:10px;width:400px;">
<?php
$PLAN_items = explode('|', $PLAN);
foreach ($PLAN_items as $item) {
echo $item . "<br />";
}
if ($PLAN2) {
echo $PLAN2 . "<br />";
}
?>
</div>
<?php
}
?>
</td>
</tr>
</table>
</td>
<td style="text-align:center;vertical-align:bottom;padding:1px;">
<?php
display_draw_image("IMPPLAN", $encounter, $pid);
if ($PDF_OUTPUT) {
//display a stored optional electronic sig for this providerID, ie the patient's Doc not the tech
$from_file = $GLOBALS["webserver_root"] . "/interface/forms/" . $form_folder . "/images/sign_" . $providerID . ".jpg";
if (file_exists($from_file)) {
echo "<img style='width:50mm;' src='{$from_file}'><hr style='width:40mm;' />" . text($providerNAME) . "<br />\n <i style='font-size:9px;'>" . xlt('electronically signed on') . " " . oeFormatShortDate() . "</i>";
}
?>
<br />
<span style="border-top:1pt solid black;padding-left:50px;"><?php
echo text($providerNAME);
?>
</span>
<?php
} else {
$signature = $GLOBALS["webserver_root"] . "/interface/forms/" . $form_folder . "/images/sign_" . $providerID . ".jpg";
if (file_exists($signature)) {
echo "<img src='" . $GLOBALS['web_root'] . "/interface/forms/" . $form_folder . "/images/sign_" . $providerID . ".jpg' style='width:30mm; height:6mm;bottom:1px;' height='10' />";
}
}
?>
</td>
</tr>
</table>
</div>
<?php
return;
}