$responsible = ar_responsible_party($pid, $result4['encounter']);
} else {
$responsible = responsible_party($arid);
}
}
$subresult5 = getInsuranceDataByDate($pid, $raw_encounter_date, "primary");
if ($subresult5 && $subresult5["provider_name"]) {
$style = $responsible == 1 ? " style='color:red'" : "";
$insured = "<span class='text'{$style}> " . htmlspecialchars(xl('Primary'), ENT_NOQUOTES) . ": " . htmlspecialchars($subresult5["provider_name"], ENT_NOQUOTES) . "</span><br>\n";
}
$subresult6 = getInsuranceDataByDate($pid, $raw_encounter_date, "secondary");
if ($subresult6 && $subresult6["provider_name"]) {
$style = $responsible == 2 ? " style='color:red'" : "";
$insured .= "<span class='text'{$style}> " . htmlspecialchars(xl('Secondary'), ENT_NOQUOTES) . ": " . htmlspecialchars($subresult6["provider_name"], ENT_NOQUOTES) . "</span><br>\n";
}
$subresult7 = getInsuranceDataByDate($pid, $raw_encounter_date, "tertiary");
if ($subresult6 && $subresult7["provider_name"]) {
$style = $responsible == 3 ? " style='color:red'" : "";
$insured .= "<span class='text'{$style}> " . htmlspecialchars(xl('Tertiary'), ENT_NOQUOTES) . ": " . htmlspecialchars($subresult7["provider_name"], ENT_NOQUOTES) . "</span><br>\n";
}
if ($responsible == 0) {
$insured .= "<span class='text' style='color:red'> " . htmlspecialchars(xl('Patient'), ENT_NOQUOTES) . "</span><br>\n";
}
} else {
$insured = " (" . htmlspecialchars(xl("No access"), ENT_NOQUOTES) . ")";
}
echo "<td>" . $insured . "</td>\n";
}
echo "</tr>\n";
}
// end while
function showLineItem($patient_id, $encounter_id, $memo, $transdate, $rowmethod, $rowpayamount, $rowadjamount, $payer_type = 0, $irnumber = '')
{
global $paymethod, $paymethodleft, $methodpaytotal, $methodadjtotal, $grandpaytotal, $grandadjtotal, $showing_ppd;
if (!$rowmethod) {
$rowmethod = 'Unknown';
}
$invnumber = $irnumber ? $irnumber : "{$patient_id}.{$encounter_id}";
if ($paymethod != $rowmethod) {
if ($paymethod) {
// Print method total.
?>
<tr bgcolor="#ddddff">
<td class="detail" colspan="<?php
echo $showing_ppd ? 7 : 4;
?>
">
<?php
echo xl('Total for ') . $paymethod;
?>
</td>
<td align="right">
<?php
bucks($methodadjtotal);
?>
</td>
<td align="right">
<?php
bucks($methodpaytotal);
?>
</td>
</tr>
<?php
}
$methodpaytotal = 0;
$methodadjtotal = 0;
$paymethod = $rowmethod;
$paymethodleft = $paymethod;
}
if ($_POST['form_details']) {
?>
<tr>
<td class="detail">
<?php
echo $paymethodleft;
$paymethodleft = " ";
?>
</td>
<td>
<?php
echo oeFormatShortDate($transdate);
?>
</td>
<td class="detail">
<?php
echo $invnumber;
?>
</td>
<?php
if ($showing_ppd) {
$pferow = sqlQuery("SELECT p.fname, p.mname, p.lname, fe.date " . "FROM patient_data AS p, form_encounter AS fe WHERE " . "p.pid = '{$patient_id}' AND fe.pid = p.pid AND " . "fe.encounter = '{$encounter_id}' LIMIT 1");
$dos = substr($pferow['date'], 0, 10);
echo " <td class='dehead'>\n";
echo " " . $pferow['lname'] . ", " . $pferow['fname'] . " " . $pferow['mname'];
echo " </td>\n";
echo " <td class='dehead'>\n";
if ($payer_type) {
$ptarr = array(1 => 'primary', 2 => 'secondary', 3 => 'tertiary');
$insrow = getInsuranceDataByDate($patient_id, $dos, $ptarr[$payer_type], "policy_number");
echo " " . $insrow['policy_number'];
}
echo " </td>\n";
echo " <td class='dehead'>\n";
echo " " . oeFormatShortDate($dos) . "\n";
echo " </td>\n";
}
?>
<td>
<?php
echo $memo;
?>
</td>
<td align="right">
<?php
bucks($rowadjamount);
?>
</td>
<td align="right">
<?php
bucks($rowpayamount);
?>
</td>
</tr>
<?php
}
$methodpaytotal += $rowpayamount;
$grandpaytotal += $rowpayamount;
$methodadjtotal += $rowadjamount;
$grandadjtotal += $rowadjamount;
}
function generate_order_summary($orderid)
{
// If requested, save checkbox selections as to which procedures are not sendable.
if ($_POST['bn_save']) {
sqlStatement("UPDATE procedure_order_code " . "SET do_not_send = 0 WHERE " . "procedure_order_id = ? AND " . "do_not_send != 0", array($orderid));
if (!empty($_POST['form_omit'])) {
foreach ($_POST['form_omit'] as $key) {
sqlStatement("UPDATE procedure_order_code " . "SET do_not_send = 1 WHERE " . "procedure_order_id = ? AND " . "do_not_send = 0 AND " . "procedure_order_seq = ?", array($orderid, intval($key)));
}
}
}
$orow = sqlQuery("SELECT " . "po.procedure_order_id, po.patient_id, po.date_ordered, po.order_status, " . "po.date_collected, po.specimen_type, po.specimen_location, po.lab_id, po.clinical_hx, " . "pd.pubpid, pd.lname, pd.fname, pd.mname, pd.DOB, pd.sex, " . "pd.street, pd.city, pd.state, pd.postal_code, " . "fe.date, " . "pp.name AS labname, " . "u.lname AS ulname, u.fname AS ufname, u.mname AS umname, " . "ru.lname AS ref_lname, ru.fname AS ref_fname, ru.mname AS ref_mname, " . "ru.street AS ref_street, ru.city AS ref_city, ru.state AS ref_state, ru.zip AS ref_zip " . "FROM procedure_order AS po " . "LEFT JOIN patient_data AS pd ON pd.pid = po.patient_id " . "LEFT JOIN procedure_providers AS pp ON pp.ppid = po.lab_id " . "LEFT JOIN users AS u ON u.id = po.provider_id " . "LEFT JOIN users AS ru ON ru.id = pd.ref_providerID " . "LEFT JOIN form_encounter AS fe ON fe.pid = po.patient_id AND fe.encounter = po.encounter_id " . "WHERE po.procedure_order_id = ?", array($orderid));
$lab_id = intval($orow['lab_id']);
$patient_id = intval($orow['patient_id']);
$encdate = substr($orow['date'], 0, 10);
// Get insurance info.
$ins_policy = '';
$ins_group = '';
$ins_name = '';
$ins_addr = '';
$ins_city = '';
$ins_state = '';
$ins_zip = '';
$irow = getInsuranceDataByDate($patient_id, $encdate, 'primary', "insd.provider, insd.policy_number, insd.group_number");
if (!empty($irow['provider'])) {
$ins_policy = $irow['policy_number'];
$ins_group = $irow['group_number'];
$insco = new InsuranceCompany($irow['provider']);
if (!empty($insco)) {
$ins_name = $insco->get_name();
$tmp = $insco->get_address();
$ins_addr = $tmp->get_line1();
$ins_city = $tmp->get_city();
$ins_state = $tmp->get_state();
$ins_zip = $tmp->get_zip();
}
}
?>
<style>
.ordsum tr.head { font-size:10pt; background-color:#cccccc; text-align:center; }
.ordsum tr.detail { font-size:10pt; }
.ordsum a, .ordsum a:visited, .ordsum a:hover { color:#0000cc; }
.ordsum table {
border-style: solid;
border-width: 1px 0px 0px 1px;
border-color: black;
}
.ordsum td, .ordsum th {
border-style: solid;
border-width: 0px 1px 1px 0px;
border-color: black;
}
/* specifically exclude from printing */
@media print {
.unprintable {
visibility: hidden;
display: none;
}
}
</style>
<form method='post' action='order_manifest.php?orderid=<?php
echo $orderid;
?>
'>
<div class='ordsum'>
<table width='100%' cellpadding='2' cellspacing='0'>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Patient Name');
?>
</td>
<td><?php
echo myCellText($orow['lname'] . ', ' . $orow['fname'] . ' ' . $orow['mname']);
?>
</td>
<td nowrap><?php
echo xlt('Ordered By');
?>
</td>
<td><?php
echo myCellText($orow['ulname'] . ', ' . $orow['ufname'] . ' ' . $orow['umname']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td width='5%' nowrap><?php
echo xlt('MRN (pid)');
?>
</td>
<td width='45%'><?php
echo myCellText($patient_id);
?>
</td>
<td width='5%' nowrap><?php
echo xlt('Order ID');
?>
</td>
<td width='45%'><?php
echo myCellText($orow['procedure_order_id']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Encounter Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($encdate));
?>
</td>
<td nowrap><?php
echo xlt('Order Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($orow['date_ordered']));
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Birth Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($orow['DOB']));
?>
</td>
<td nowrap><?php
echo xlt('Lab');
?>
</td>
<td><?php
echo myCellText($orow['labname']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Sex');
?>
</td>
<td><?php
echo myCellText(getListItem('sex', $orow['sex']));
?>
</td>
<td nowrap><?php
echo xlt('Specimen Type');
?>
</td>
<td><?php
echo myCellText($orow['specimen_type']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Address');
?>
</td>
<td><?php
echo myCellText($orow['street'] . ', ' . $orow['city'] . ', ' . $orow['state'] . ' ' . $orow['postal_code']);
?>
</td>
<td nowrap><?php
echo xlt('Collection Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($orow['date_collected']));
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Name');
?>
</td>
<td><?php
echo myCellText($ins_name);
?>
</td>
<td nowrap><?php
echo xlt('Clinical History');
?>
</td>
<td><?php
echo myCellText($orow['clinical_hx']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Address');
?>
</td>
<td><?php
echo myCellText("{$ins_addr}, {$ins_city}, {$ins_state} {$ins_zip}");
?>
</td>
<td nowrap><?php
echo xlt('Order Status');
?>
</td>
<td><?php
echo myCellText(getListItem('ord_status', $orow['order_status']));
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Policy');
?>
</td>
<td><?php
echo myCellText($ins_policy);
?>
</td>
<td nowrap><?php
echo xlt('Referrer');
?>
</td>
<td><?php
echo myCellText($orow['ref_lname'] . ', ' . $orow['ref_fname'] . ' ' . $orow['ref_mname']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Group');
?>
</td>
<td><?php
echo myCellText($ins_group);
?>
</td>
<td nowrap><?php
echo xlt('Referrer Address');
?>
</td>
<td><?php
echo myCellText($orow['ref_street'] . ', ' . $orow['ref_city'] . ', ' . $orow['ref_state'] . ' ' . $orow['ref_zip']);
?>
</td>
</tr>
</table>
<br />
<table width='100%' cellpadding='2' cellspacing='0'>
<tr class='head'>
<td><?php
echo xlt('Omit');
?>
</td>
<td><?php
echo xlt('Code');
?>
</td>
<td><?php
echo xlt('Description');
?>
</td>
<td><?php
echo xlt('Diagnoses');
?>
</td>
<td><?php
echo xlt('Notes');
?>
</td>
</tr>
<?php
$query = "SELECT " . "procedure_order_seq, procedure_code, procedure_name, diagnoses, do_not_send " . "FROM procedure_order_code WHERE " . "procedure_order_id = ? ";
if (!empty($_POST['bn_show_sendable'])) {
$query .= "AND do_not_send = 0 ";
}
$query .= "ORDER BY procedure_order_seq";
$res = sqlStatement($query, array($orderid));
$encount = 0;
while ($row = sqlFetchArray($res)) {
$order_seq = empty($row['procedure_order_seq']) ? 0 : $row['procedure_order_seq'] + 0;
$procedure_code = empty($row['procedure_code']) ? '' : $row['procedure_code'];
$procedure_name = empty($row['procedure_name']) ? '' : $row['procedure_name'];
$diagnoses = empty($row['diagnoses']) ? '' : $row['diagnoses'];
// Create a string of HTML representing the procedure answers.
// This code cloned from gen_hl7_order.inc.php.
// Should maybe refactor it into something like a ProcedureAnswer class.
$qres = sqlStatement("SELECT " . "a.question_code, a.answer, q.fldtype, q.question_text " . "FROM procedure_answers AS a " . "LEFT JOIN procedure_questions AS q ON " . "q.lab_id = ? " . "AND q.procedure_code = ? AND " . "q.question_code = a.question_code " . "WHERE " . "a.procedure_order_id = ? AND " . "a.procedure_order_seq = ? " . "ORDER BY q.seq, a.answer_seq", array($lab_id, $procedure_code, $orderid, $order_seq));
$notes = '';
while ($qrow = sqlFetchArray($qres)) {
// Formatting of these answer values may be lab-specific and we'll figure
// out how to deal with that as more labs are supported.
$answer = trim($qrow['answer']);
$fldtype = $qrow['fldtype'];
if ($fldtype == 'G') {
$weeks = intval($answer / 7);
$days = $answer % 7;
$answer = $weeks . 'wks ' . $days . 'days';
}
if ($notes) {
$notes .= '<br />';
}
$notes .= text($qrow['question_text'] . ': ' . $answer);
}
if ($notes === '') {
$notes = ' ';
}
++$encount;
$bgcolor = "#" . ($encount & 1 ? "ddddff" : "ffdddd");
echo " <tr class='detail' bgcolor='{$bgcolor}'>\n";
echo " <td><input type='checkbox' name='form_omit[{$order_seq}]' value='1'";
if (!empty($row['do_not_send'])) {
echo " checked";
}
echo " /></td>\n";
echo " <td>" . myCellText("{$procedure_code}") . "</td>\n";
echo " <td>" . myCellText("{$procedure_name}") . "</td>\n";
echo " <td>" . myCellText("{$diagnoses}") . "</td>\n";
echo " <td>{$notes}</td>\n";
echo " </tr>\n";
}
?>
</table>
</div>
<center>
<p class='unprintable'>
<input type='submit' name='bn_save' value='<?php
echo xla('Save omission selections');
?>
' />
<input type='submit' name='bn_show_all' value='<?php
echo xla('Show all procedures');
?>
' />
<input type='submit' name='bn_show_sendable' value='<?php
echo xla('Show only procedures not omitted');
?>
' />
</p>
</center>
</form>
<?php
}
function generate_order_summary($orderid)
{
$orow = sqlQuery("SELECT " . "po.procedure_order_id, po.patient_id, po.date_ordered, po.order_status, " . "po.date_collected, po.specimen_type, po.specimen_location, " . "pd.pubpid, pd.lname, pd.fname, pd.mname, pd.DOB, " . "fe.date, " . "pp.name AS labname, " . "u.lname AS ulname, u.fname AS ufname, u.mname AS umname " . "FROM procedure_order AS po " . "LEFT JOIN patient_data AS pd ON pd.pid = po.patient_id " . "LEFT JOIN procedure_providers AS pp ON pp.ppid = po.lab_id " . "LEFT JOIN users AS u ON u.id = po.provider_id " . "LEFT JOIN form_encounter AS fe ON fe.pid = po.patient_id AND fe.encounter = po.encounter_id " . "WHERE po.procedure_order_id = ?", array($orderid));
$patient_id = intval($orow['patient_id']);
$encdate = substr($orow['date'], 0, 10);
// Get insurance info.
$ins_policy = '';
$ins_group = '';
$ins_name = '';
$ins_addr = '';
$ins_city = '';
$ins_state = '';
$ins_zip = '';
$irow = getInsuranceDataByDate($patient_id, $encdate, 'primary', "insd.provider, insd.policy_number, insd.group_number");
if (!empty($irow['provider'])) {
$ins_policy = $irow['policy_number'];
$ins_group = $irow['group_number'];
$insco = new InsuranceCompany($irow['provider']);
if (!empty($insco)) {
$ins_name = $insco->get_name();
$tmp = $insco->get_address();
$ins_addr = $tmp->get_line1();
$ins_city = $tmp->get_city();
$ins_state = $tmp->get_state();
$ins_zip = $tmp->get_zip();
}
}
?>
<style>
.ordsum tr.head { font-size:10pt; background-color:#cccccc; text-align:center; }
.ordsum tr.detail { font-size:10pt; }
.ordsum a, .ordsum a:visited, .ordsum a:hover { color:#0000cc; }
.ordsum table {
border-style: solid;
border-width: 1px 0px 0px 1px;
border-color: black;
}
.ordsum td, .ordsum th {
border-style: solid;
border-width: 0px 1px 1px 0px;
border-color: black;
}
</style>
<div class='ordsum'>
<table width='100%' cellpadding='2' cellspacing='0'>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Patient Name');
?>
</td>
<td><?php
echo myCellText($orow['lname'] . ', ' . $orow['fname'] . ' ' . $orow['mname']);
?>
</td>
<td nowrap><?php
echo xlt('Ordered By');
?>
</td>
<td><?php
echo myCellText($orow['ulname'] . ', ' . $orow['ufname'] . ' ' . $orow['umname']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td width='5%' nowrap><?php
echo xlt('MRN (pid)');
?>
</td>
<td width='45%'><?php
echo myCellText($patient_id);
?>
</td>
<td width='5%' nowrap><?php
echo xlt('Order ID');
?>
</td>
<td width='45%'><?php
echo myCellText($orow['procedure_order_id']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Encounter Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($encdate));
?>
</td>
<td nowrap><?php
echo xlt('Order Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($orow['date_ordered']));
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Birth Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($orow['DOB']));
?>
</td>
<td nowrap><?php
echo xlt('Lab');
?>
</td>
<td><?php
echo myCellText($orow['labname']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Name');
?>
</td>
<td><?php
echo myCellText($ins_name);
?>
</td>
<td nowrap><?php
echo xlt('Specimen Type');
?>
</td>
<td><?php
echo myCellText($orow['specimen_type']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Address');
?>
</td>
<td><?php
echo myCellText("{$ins_addr}, {$ins_city}, {$ins_state} {$ins_zip}");
?>
</td>
<td nowrap><?php
echo xlt('Collection Date');
?>
</td>
<td><?php
echo myCellText(oeFormatShortDate($orow['date_collected']));
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Policy');
?>
</td>
<td><?php
echo myCellText($ins_policy);
?>
</td>
<td nowrap><?php
echo xlt('Specimen Location');
?>
</td>
<td><?php
echo myCellText($orow['specimen_location']);
?>
</td>
</tr>
<tr bgcolor='#cccccc'>
<td nowrap><?php
echo xlt('Ins Group');
?>
</td>
<td><?php
echo myCellText($ins_group);
?>
</td>
<td nowrap><?php
echo xlt('Order Status');
?>
</td>
<td><?php
echo myCellText($orow['order_status']);
?>
</td>
</tr>
</table>
<br />
<table width='100%' cellpadding='2' cellspacing='0'>
<tr class='head'>
<td><?php
echo xlt('Code');
?>
</td>
<td><?php
echo xlt('Description');
?>
</td>
<td><?php
echo xlt('Diagnoses');
?>
</td>
</tr>
<?php
$query = "SELECT " . "procedure_order_seq, procedure_code, procedure_name, diagnoses " . "FROM procedure_order_code WHERE " . "procedure_order_id = ? ORDER BY procedure_order_seq";
$res = sqlStatement($query, array($orderid));
$encount = 0;
while ($row = sqlFetchArray($res)) {
$order_seq = empty($row['procedure_order_seq']) ? 0 : $row['procedure_order_seq'] + 0;
$procedure_code = empty($row['procedure_code']) ? '' : $row['procedure_code'];
$procedure_name = empty($row['procedure_name']) ? '' : $row['procedure_name'];
$diagnoses = empty($row['diagnoses']) ? '' : $row['diagnoses'];
++$encount;
$bgcolor = "#" . ($encount & 1 ? "ddddff" : "ffdddd");
echo " <tr class='detail' bgcolor='{$bgcolor}'>\n";
echo " <td>" . text("{$procedure_code}") . "</td>\n";
echo " <td>" . text("{$procedure_name}") . "</td>\n";
echo " <td>" . text("{$diagnoses}") . "</td>\n";
echo " </tr>\n";
}
?>
</table>
</div>
<?php
}
