interface/main/left_nav.php

   1 <?php
   2 use ESign\Api;
   3 /* Copyright (C) 2006-2012 Rod Roark <rod@sunsetsystems.com>
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU General Public License
   7  * as published by the Free Software Foundation; either version 2
   8  * of the License, or (at your option) any later version.
   9  */
  10
  11  // This provides the left navigation frame.
  12  // Following are notes as to what else was changed for this feature:
  13  //
  14  // * interface/main/main_screen.php: the top-level frameset.
  15  // * interface/main/finder/patient_select.php: loads stuff when a new patient
  16  //   is selected.
  17  // * interface/patient_file/summary/demographics.php: this is the first frame
  18  //   loaded when a new patient is chosen, and in turn sets the current pid and
  19  //   then loads the initial bottom frame.
  20  // * interface/patient_file/summary/demographics_full.php: added support for
  21  //   setting a new pid, needed for going to demographics from billing.
  22  // * interface/patient_file/summary/demographics_save.php: redisplay
  23  //   demographics.php and not the frameset.
  24  // * interface/patient_file/summary/summary_bottom.php: new frameset for the
  25  //   summary, prescriptions and notes for a selected patient, cloned from
  26  //   patient_summary.php.
  27  // * interface/patient_file/encounter/encounter_bottom.php: new frameset for
  28  //   the selected encounter, mosting coding/billing stuff, cloned from
  29  //   patient_encounter.php.  This will also self-load the superbill pages
  30  //   as requested.
  31  // * interface/usergroup/user_info.php: removed Back link.
  32  // * interface/usergroup/admin_frameset.php: new frameset for Admin pages,
  33  //   cloned from usergroup.php.
  34  // * interface/main/onotes/office_comments.php: removed Back link target.
  35  // * interface/main/onotes/office_comments_full.php: changed Back link.
  36  // * interface/billing/billing_report.php: removed Back link; added logic
  37  //   to properly go to demographics or to an encounter when requested.
  38  // * interface/new/new.php: removed Back link and revised form target.
  39  // * interface/new/new_patient_save.php: modified to load the demographics
  40  //   page to the current frame instead of loading a new frameset.
  41  // * interface/patient_file/history/history.php: target change.
  42  // * interface/patient_file/history/history_full.php: target changes.
  43  // * interface/patient_file/history/history_save.php: target change.
  44  // * interface/patient_file/history/encounters.php: link/target changes.
  45  // * interface/patient_file/encounter/encounter_top.php: another new frameset
  46  //   cloned from patient_encounter.php.
  47  // * interface/patient_file/encounter/forms.php: link target removal.
  48  // * interface/patient_file/encounter/new_form.php: target change.
  49  // * interface/forms/newpatient/new.php, view.php, save.php: link/target
  50  //   changes.
  51  // * interface/patient_file/summary/immunizations.php: removed back link.
  52  // * interface/patient_file/summary/pnotes.php: changed link targets.
  53  // * interface/patient_file/summary/pnotes_full.php: changed back link and
  54  //   added set_pid logic.
  55  // * interface/patient_file/transaction/transactions.php: various changes.
  56  // * interface/patient_file/transaction/add_transaction.php: new return js.
  57  // * interface/patient_file/encounter/superbill_codes.php: target and link
  58  //   changes.
  59  // * interface/patient_file/encounter/superbill_custom_full.php: target and
  60  //   link changes.
  61  // * interface/patient_file/encounter/diagnosis.php: target changes.
  62  // * interface/patient_file/encounter/diagnosis_full.php: target and link
  63  //   changes.
  64  // * interface/main/authorizations/authorizations.php: link and target changes.
  65  // * library/api.inc: url change.
  66  // * interface/patient_file/summary/rx_frameset.php: new frameset.
  67  // * interface/patient_file/summary/rx_left.php: new for prescriptions.
  68  // * all encounter forms: remove all instances of "target=Main" and change
  69  //   all instances of "patient_encounter.php" to "encounter_top.php".
  70
  71  // Our find_patient form, when submitted, invokes patient_select.php in the
  72  // upper frame. When the patient is selected, demographics.php is invoked
  73  // with the set_pid parameter, which establishes the new session pid and also
  74  // calls the setPatient() function (below).  In this case demographics.php
  75  // will also load the summary frameset into the bottom frame, invoking our
  76  // loadFrame() function.
  77  //
  78  // Similarly, we have the concept of selecting an encounter from the
  79  // Encounters list, and then having that "stick" until some other encounter
  80  // or a new encounter is chosen.  We also have a navigation item for creating
  81  // a new encounter.  interface/patient_file/encounter/encounter_top.php
  82  // supports set_encounter to establish an encounter.
  83  //
  84  // TBD: Include active_pid and/or active_encounter in relevant submitted
  85  // form data, and add logic to the save routines to make sure they match
  86  // the corresponding session values.
  87
  88  require_once("../globals.php");
  89  require_once($GLOBALS['fileroot']."/library/acl.inc");
  90  require_once($GLOBALS['fileroot']."/custom/code_types.inc.php");
  91  require_once($GLOBALS['fileroot']."/library/patient.inc");
  92  require_once($GLOBALS['fileroot']."/library/lists.inc");
  93  require_once $GLOBALS['srcdir'].'/ESign/Api.php';
  94  require_once $GLOBALS['srcdir'].'/user.inc';
  95
  96  // Fetch user preferences saved from prior session
  97  $uspfx = substr(__FILE__, strlen($GLOBALS['fileroot']."/")) . '.';
  98  $cb_top_chk = prevSetting($uspfx, 'cb_top', 'frame0_chk', 'checked');
  99  $cb_bot_chk = prevSetting($uspfx, 'cb_bot', 'frame1_chk', 'checked');
 100  $usrval = json_encode( array ( $cb_top_chk, $cb_bot_chk ) );
 101
 102  // This array defines the list of primary documents that may be
 103  // chosen.  Each element value is an array of 3 values:
 104  //
 105  // * Name to appear in the navigation table
 106  // * Usage: 0 = global, 1 = patient-specific, 2 = encounter-specific, 3 = therapy group-specific, 4 = therapy group encounter - specific
 107  // * The URL relative to the interface directory
 108  //
 109
 110  $primary_docs = array(
 111   'cal' => array(xl('Calendar')  , 0, 'main/main_info.php'),
 112   'pfb' => array(xl('Patient Flow Board')  , 0, '../interface/patient_tracker/patient_tracker.php?skip_timeout_reset=1'),
 113   'app' => array(xl('Portal Activity')  , 0, '../myportal/index.php'),
 114   'aop' => array(xl('Portal Dashboard')  , 0, '../portal/patient/provider'),
 115   'msg' => array(xl('Messages')  , 0, 'main/messages/messages.php?form_active=1'),
 116   'pwd' => array(xl('Password')  , 0, 'usergroup/user_info.php'),
 117   'prf' => array(xl('Preferences')  , 0, 'super/edit_globals.php?mode=user'),
 118   'adm' => array(xl('Admin')     , 0, 'usergroup/admin_frameset.php'),
 119   'rep' => array(xl('Reports')   , 0, 'reports/index.php'),
 120   'ono' => array(xl('Ofc Notes') , 0, 'main/onotes/office_comments.php'),
 121   'fax' => array(xl('Fax/Scan')  , 0, 'fax/faxq.php'),
 122   'adb' => array(xl('Addr Bk')   , 0, 'usergroup/addrbook_list.php'),
 123   'orl' => array(xl('Proc Prov') , 0, 'orders/procedure_provider_list.php'),
 124   'ort' => array(xl('Proc Cat')  , 0, 'orders/types.php'),
 125   'orc' => array(xl('Proc Load') , 0, 'orders/load_compendium.php'),
 126   'orb' => array(xl('Proc Bat')  , 0, 'orders/orders_results.php?batch=1'),
 127   'ore' => array(xl('E-Reports') , 0, 'orders/list_reports.php'),
 128   'ppo' => array(xl('CMS Portal'), 0, 'cmsportal/list_requests.php'),
 129   'cht' => array(xl('Chart Trk') , 0, '../custom/chart_tracker.php'),
 130   'imp' => array(xl('Import')    , 0, '../custom/import.php'),
 131   'bil' => array(xl('Billing')   , 0, 'billing/billing_report.php'),
 132   'sup' => array(xl('Superbill') , 0, 'patient_file/encounter/superbill_custom_full.php'),
 133   'aun' => array(xl('Authorizations'), 0, 'main/authorizations/authorizations.php'),
 134   'new' => array(xl('New Pt')    , 0, 'new/new.php'),
 135   'ped' => array(xl('Patient Education'), 0, 'reports/patient_edu_web_lookup.php'),
 136   'lab' => array(xl('Check Lab Results')  , 0, 'orders/lab_exchange.php'),
 137   'dem' => array(xl('Patient')   , 1,  "patient_file/summary/demographics.php"),
 138   'his' => array(xl('History')   , 1, 'patient_file/history/history.php'),
 139   'ens' => array(xl('Visit History'), 1, 'patient_file/history/encounters.php'),
 140   'nen' => array(xl('Create Visit'), 1, 'forms/newpatient/new.php?autoloaded=1&calenc='),
 141   'pre' => array(xl('Rx')        , 1, 'patient_file/summary/rx_frameset.php'),
 142   'iss' => array(xl('Issues')    , 1, 'patient_file/summary/stats_full.php?active=all'),
 143   'imm' => array(xl('Immunize')  , 1, 'patient_file/summary/immunizations.php'),
 144   'doc' => array(xl('Documents') , 1, '../controller.php?document&list&patient_id={PID}'),
 145   'orp' => array(xl('Proc Pending Rev'), 1, 'orders/orders_results.php?review=1'),
 146   'orr' => array(xl('Proc Res')  , 1, 'orders/orders_results.php'),
 147   'lda' => array(xl('Lab overview')  , 1, 'patient_file/summary/labdata.php'),
 148   'tan' => array(xl('Configure Tracks')  , 0, 'forms/track_anything/create.php'),
 149   'prp' => array(xl('Pt Report') , 1, 'patient_file/report/patient_report.php'),
 150   'prq' => array(xl('Pt Rec Request') , 1, 'patient_file/transaction/record_request.php'),
 151   'pno' => array(xl('Pt Notes')  , 1, 'patient_file/summary/pnotes.php'),
 152   'tra' => array(xl('Transact')  , 1, 'patient_file/transaction/transactions.php'),
 153   'sum' => array(xl('Summary')   , 1, 'patient_file/summary/summary_bottom.php'),
 154   'enc' => array(xl('Encounter') , 2, 'patient_file/encounter/encounter_top.php'),
 155   'erx' => array(xl('e-Rx') , 1, 'eRx.php'),
 156   'err' => array(xl('e-Rx Renewal') , 1, 'eRx.php?page=status'),
 157   'ere' => array(xl('e-Rx EPCS') , 1, 'eRx.php?page=epcs-admin'),
 158   'pay' => array(xl('Payment') , 1, '../patient_file/front_payment.php'),
 159   'edi' => array(xl('EDI History') , 0, 'billing/edih_view.php'),
 160   'eob' => array(xl('Posting')   , 0, 'billing/sl_eob_search.php'),
 161   'dld' => array(xl('Display Documents'), 0, 'main/display_documents.php')
 162  );
 163  $primary_docs['npa']=array(xl('Batch Payments')   , 0, 'billing/new_payment.php');
 164  if ($GLOBALS['use_charges_panel'] || $GLOBALS['menu_styling_vertical'] == 0) {
 165   $primary_docs['cod'] = array(xl('Charges'), 2, 'patient_file/encounter/encounter_bottom.php');
 166  }
 167
 168  if($GLOBALS['enable_group_therapy']){
 169   $primary_docs['gng'] = array(xl('New')    , 0, 'therapy_groups/index.php?method=addGroup');
 170   $primary_docs['gdg'] = array(xl('Group Details')   , 3,  '/therapy_groups/index.php?method=groupDetails&group_id=from_session');
 171   $primary_docs['gcv'] = array(xl('Create Visit'), 3, 'forms/newGroupEncounter/new.php?autoloaded=1&calenc=');
 172   $primary_docs['gce'] = array(xl('Current') , 4, 'patient_file/encounter/encounter_top.php');
 173   $primary_docs['gvh'] = array(xl('Visit History'), 3, 'patient_file/history/encounters.php');
 174  }
 175
 176  $esignApi = new Api();
 177  // This section decides which navigation items will not appear.
 178
 179  $disallowed = array();
 180  $disallowed['edi'] = !($GLOBALS['enable_edihistory_in_left_menu'] && acl_check('acct', 'eob'));
 181  $disallowed['adm'] = !(acl_check('admin', 'calendar') ||
 182   acl_check('admin', 'database') || acl_check('admin', 'forms') ||
 183   acl_check('admin', 'practice') || acl_check('admin', 'users') ||
 184   acl_check('admin', 'acl')      || acl_check('admin', 'super') ||
 185   acl_check('admin', 'superbill') || acl_check('admin', 'drugs'));
 186
 187  $disallowed['bil'] = !(acl_check('acct', 'eob') || acl_check('acct', 'bill'));
 188
 189  $disallowed['new'] = !(acl_check('patients','demo','',array('write','addonly') ));
 190
 191  $disallowed['fax'] = !(($GLOBALS['enable_hylafax'] || $GLOBALS['enable_scanner']) && acl_check('patients', 'docs'));
 192
 193  $disallowed['iss'] = !((acl_check('encounters','notes','','write') ||
 194   acl_check('encounters','notes_a','','write') ) &&
 195   acl_check('patients','med','','write') );
 196
 197  $disallowed['imp'] = $disallowed['new'] || !is_readable("$webserver_root/custom/import.php");
 198
 199  $disallowed['cht'] = !is_readable("$webserver_root/custom/chart_tracker.php");
 200
 201  $disallowed['pre'] = !(acl_check('patients', 'med'));
 202  $disallowed['eob'] = !(acl_check('acct', 'eob'));
 203
 204  // Helper functions for treeview generation.
 205  function genTreeLink($frame, $name, $title, $mono=false) {
 206   global $primary_docs, $disallowed;
 207   if (empty($disallowed[$name])) {
 208    $id = $name . $primary_docs[$name][1];
 209    echo "<li><a href='' id='$id' onclick=\"";
 210    if ($mono) {
 211     if ($frame == 'RTop')
 212      echo "forceSpec(true,false);";
 213     else
 214      echo "forceSpec(false,true);";
 215    }
 216    echo "return loadFrame2('$id','$frame','" .
 217         $primary_docs[$name][2] . "')\">" . $title . ($name == 'msg' ? ' <span id="reminderCountSpan" class="bold"></span>' : '')."</a></li>";
 218   }
 219  }
 220  function genMiscLink($frame, $name, $level, $title, $url, $mono=false) {
 221   global $disallowed;
 222   if (empty($disallowed[$name])) {
 223    $id = $name . $level;
 224    echo "<li><a href='' id='$id' onclick=\"";
 225    if ($mono) {
 226     if ($frame == 'RTop')
 227      echo "forceSpec(true,false);";
 228     else
 229      echo "forceSpec(false,true);";
 230    }
 231    echo "return loadFrame2('$id','$frame','" .
 232         $url . "')\">" . $title . "</a></li>";
 233   }
 234  }
 235  function genMiscLink2($frame, $name, $level, $title, $url, $mono=false,$mouseovertext="") {
 236   global $disallowed;
 237   if (empty($disallowed[$name])) {
 238
 239    $id = $name . $level;
 240    echo "<li><a href='' id='$id' title='$mouseovertext' onclick=\"";
 241    if ($mono) {
 242     if ($frame == 'RTop')
 243      echo "forceSpec(true,false);";
 244     else
 245      echo "forceSpec(false,true);";
 246    }
 247    echo "return loadFrame3('$id','$frame','" .
 248         $url . "')\">" . $title . "</a></li>";
 249   }
 250  }
 251  function genPopLink($title, $url, $linkid='') {
 252   echo "<li><a href='' ";
 253   if ($linkid) echo "id='$linkid' ";
 254   echo "onclick=\"return repPopup('$url')\"" .
 255        ">" . $title . "</a></li>";
 256  }
 257  function genDualLink($topname, $botname, $title) {
 258   global $primary_docs, $disallowed;
 259   if (empty($disallowed[$topname]) && empty($disallowed[$botname])) {
 260    $topid = $topname . $primary_docs[$topname][1];
 261    $botid = $botname . $primary_docs[$botname][1];
 262    echo "<li><a href='' id='$topid' " .
 263         "onclick=\"return loadFrameDual('$topid','$botid','" .
 264         $primary_docs[$topname][2] . "','" .
 265         $primary_docs[$botname][2] . "')\">" . $title . "</a></li>";
 266   }
 267  }
 268
 269 function genPopupsList($style='') {
 270   global $disallowed, $webserver_root;
 271 ?>
 272 <select name='popups' onchange='selpopup(this)' style='background-color:transparent;font-size:9pt;<?php echo $style; ?>'>
 273  <option value=''><?php xl('Popups','e'); ?></option>
 274 <?php if (!$disallowed['iss']) { ?>
 275  <option value='../patient_file/problem_encounter.php'><?php xl('Issues','e'); ?></option>
 276 <?php } ?>
 277 <?php if (!$GLOBALS['ippf_specific'] && acl_check('patients', 'demo')) { ?>
 278  <option value='../../custom/export_xml.php'><?php xl('Export','e'); ?></option>
 279 <?php if (acl_check('patients', 'demo', '', 'write')) { ?>
 280  <option value='../../custom/import_xml.php'><?php xl('Import','e'); ?></option>
 281 <?php }}
 282  if (!$GLOBALS['disable_calendar'] && acl_check('patients', 'appt')) { ?>
 283  <option value='../reports/appointments_report.php?patient=<?php if(isset($pid)) {echo $pid;} ?>'><?php xl('Appts','e'); ?></option>
 284 <?php } ?>
 285 <?php if (acl_check('patients', 'med')) { ?>
 286  <option value='../patient_file/printed_fee_sheet.php?fill=1'><?php xl('Superbill','e'); ?></option>
 287 <?php } ?>
 288 <?php if (acl_check('acct', 'bill', '', 'write')) { ?>
 289  <option value='../patient_file/front_payment.php'><?php xl('Payment','e'); ?></option>
 290 <?php } ?>
 291 <?php if ($GLOBALS['inhouse_pharmacy'] && acl_check('acct', 'bill', '', 'write')) { ?>
 292  <option value='../patient_file/pos_checkout.php'><?php xl('Checkout','e'); ?></option>
 293 <?php } ?>
 294 <?php if (is_dir($GLOBALS['OE_SITE_DIR'] . "/letter_templates") && acl_check('patients', 'med')) { ?>
 295  <option value='../patient_file/letter.php'><?php xl('Letter','e'); ?></option>
 296 <?php } ?>
 297 <?php if ($GLOBALS['chart_label_type'] != '0' && acl_check('patients', 'demo')) { ?>
 298 <option value='../patient_file/label.php'><?php xl('Chart Label','e'); ?></option>
 299 <?php } ?>
 300 <?php if ($GLOBALS['barcode_label_type'] != '0' && acl_check('patients', 'demo')) { ?>
 301 <option value='../patient_file/barcode_label.php'><?php xl('Barcode Label','e'); ?></option>
 302 <?php } ?>
 303 <?php if ($GLOBALS['addr_label_type'] && acl_check('patients', 'demo')) { ?>
 304 <option value='../patient_file/addr_label.php'><?php xl('Address Label','e'); ?></option>
 305 <?php } ?>
 306 </select>
 307 <?php
 308 }
 309
 310 function genFindBlock() {
 311 ?>
 312 <table cellpadding='0' cellspacing='0' border='0'>
 313  <tr>
 314   <td class='smalltext'><?php xl('Find','e') ?>:&nbsp;</td>
 315   <td class='smalltext' colspan='2'>
 316    <input type="entry" size="7" name="patient" class='inputtext' style='width:65px;' />
 317   </td>
 318  </tr>
 319  <tr>
 320   <td class='smalltext'><?php xl('by','e') ?>:</td>
 321   <td class='smalltext'>
 322    <a href="javascript:findPatient('Last');" class="navitem"><?php xl('Name','e'); ?></a>
 323   </td>
 324   <td class='smalltext' align='right'>
 325    <a href="javascript:findPatient('ID');"   class="navitem"><?php xl('ID','e'); ?></a>
 326   </td>
 327  </tr>
 328  <tr>
 329   <td class='smalltext'>&nbsp;</td>
 330   <td class='smalltext'>
 331    <a href="javascript:findPatient('SSN');"  class="navitem"><?php xl('SSN','e'); ?></a>
 332   </td>
 333   <td class='smalltext' align='right'>
 334    <a href="javascript:findPatient('DOB');"  class="navitem"><?php xl('DOB','e'); ?></a>
 335   </td>
 336  </tr>
 337  <tr>
 338   <td class='smalltext'>&nbsp;</td>
 339   <td class='smalltext'>
 340    <a href="javascript:findPatient('Any');"  class="navitem"><?php xl('Any', 'e'); ?></a>
 341   </td>
 342   <td class='smalltext' align='right'>
 343    <a href="javascript:initFilter();"  class="navitem"><?php xl('Filter', 'e'); ?></a>
 344   </td>
 345  </tr>
 346 </table>
 347 <?php
 348 } // End function genFindBlock()
 349
 350 ?>
 351 <html>
 352 <head>
 353 <title>Navigation</title>
 354
 355 <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
 356 <link rel="stylesheet" href="<?php echo $GLOBALS['assets_static_relative'];?>/font-awesome-4-6-3/css/font-awesome.css" type="text/css">
 357 <style type="text/css">
 358  body {
 359   font-size:8pt;
 360   font-weight:normal;
 361   padding: 5px 3px 5px 3px;
 362  }
 363  .smalltext {
 364   font-family:sans-serif;
 365   font-size:8pt;
 366   font-weight:normal;
 367  }
 368  a.navitem, a.navitem:visited {
 369   color:#0000ff;
 370   font-family:sans-serif;
 371   font-size:8pt;
 372   font-weight:bold;
 373  }
 374 .inputtext {
 375  font-size:9pt;
 376  font-weight:normal;
 377  border-style:solid;
 378  border-width:1px;
 379  padding-left:2px;
 380  padding-right:2px;
 381  border-color: #000000;
 382  background-color:transparent;
 383 }
 384
 385 #navigation ul {
 386  background-color:transparent;
 387 }
 388 #navigation-slide ul {
 389  background-color:transparent;
 390 }
 391 #navigation-slide a{
 392  width: 92%;
 393 }
 394 .nav-menu-img{
 395   width:25px;
 396   height:25px;
 397   border:none;
 398   margin-right:5px;
 399   vertical-align:middle;
 400 }
 401 </style>
 402
 403 <link rel="stylesheet" href="../../library/js/jquery.treeview-1.4.1/jquery.treeview.css" />
 404 <script type="text/javascript" src="<?php echo $GLOBALS['assets_static_relative']; ?>/jquery-min-1-6-4/index.js"></script>
 405 <script type="text/javascript" src="../../library/js/jquery.treeview-1.4.1/jquery.treeview.js" ></script>
 406
 407 <script type="text/javascript" src="../../library/dialog.js?v=<?php echo $v_js_includes; ?>"></script>
 408
 409 <script language='JavaScript'>
 410  // User settings
 411  var usrval = jQuery.parseJSON('<?php echo $usrval ?>');
 412
 413  // tajemo work by CB 2012/01/31 12:32:57 PM dated reminders counter
 414  function getReminderCount(){
 415    top.restoreSession();
 416    // Send the skip_timeout_reset parameter to not count this as a manual entry in the
 417    //  timing out mechanism in OpenEMR.
 418    $.post("<?php echo $GLOBALS['webroot']; ?>/library/ajax/dated_reminders_counter.php",
 419      { skip_timeout_reset: "1" },
 420      function(data) {
 421        $("#reminderCountSpan").html(data);
 422     // run updater every 60 seconds
 423      var repeater = setTimeout("getReminderCount()", 60000);
 424    });
 425    //piggy-back on this repeater to run other background-services
 426    //this is a silent task manager that returns no output
 427    $.post("<?php echo $GLOBALS['webroot']; ?>/library/ajax/execute_background_services.php",
 428       { skip_timeout_reset: "1", ajax: "1" });
 429  }
 430
 431  $(document).ready(function (){
 432    getReminderCount();//
 433    parent.loadedFrameCount += 1;
 434    for (var i = 0, len = usrval.length; i < len; i++) {
 435        if (usrval[i] != "checked") toggleFrame(i+1);
 436    }
 437  })
 438  // end of tajemo work dated reminders counter
 439
 440  // Master values for current pid and encounter.
 441  var active_pid = 0;
 442  var active_encounter = 0;
 443  var encounter_locked = false;
 444  //therapy group id
 445  var active_gid = 0;
 446
 447  // Current selections in the top and bottom frames.
 448  var topName = '';
 449  var botName = '';
 450
 451  // Expand and/or collapse frames in response to checkbox clicks.
 452  // fnum indicates which checkbox was clicked (1=left, 2=right).
 453  function toggleFrame(fnum) {
 454   var f = document.forms[0];
 455   var fset = top.document.getElementById('fsright');
 456   if (!f.cb_top.checked && !f.cb_bot.checked) {
 457    if (fnum == 1) f.cb_bot.checked = true;
 458    else f.cb_top.checked = true;
 459   }
 460   var rows = f.cb_top.checked ? '*' :  '0';
 461   rows += f.cb_bot.checked ? ',*' : ',0';
 462   fset.rows = rows;
 463   save_setting ([(f.cb_top.checked ? 'checked' : '&nbsp;'), (f.cb_bot.checked ? 'checked' : '&nbsp;')]);
 464  }
 465
 466  // Load the specified url into the specified frame (RTop or RBot).
 467  // The URL provided must be relative to interface.
 468  function loadFrame(fname, frame, url) {
 469   top.restoreSession();
 470   var i = url.indexOf('{PID}');
 471   if (i >= 0) url = url.substring(0,i) + active_pid + url.substring(i+5);
 472   top.frames[frame].location = '<?php echo "$web_root/interface/" ?>' + url;
 473   if (frame == 'RTop') topName = fname; else botName = fname;
 474  }
 475
 476  // Load the specified url into a frame to be determined, with the specified
 477  // frame as the default; the url must be relative to interface.
 478  function loadFrame2(fname, frame, url) {
 479   var usage = fname.substring(3);
 480   if (active_pid == 0 && active_gid == 0  && (usage > '0' && usage < '5')){
 481    <?php if($GLOBALS['enable_group_therapy']) { ?>
 482       alert('<?php xl('You must first select or add a patient or therapy group.','e') ?>');
 483    <?php } else { ?>
 484       alert('<?php xl('You must first select or add a patient.','e') ?>');
 485   <?php } ?>
 486    return false;
 487   }
 488   if (active_encounter == 0 && (usage > '1' && usage < '3')) {
 489    alert('<?php xl('You must first select or create an encounter.','e') ?>');
 490    return false;
 491   }
 492   if (encounter_locked && usage > '1' && (usage > '1' && usage < '3')) {
 493    alert('<?php echo xls('This encounter is locked. No new forms can be added.') ?>');
 494    return false;
 495   }
 496   var f = document.forms[0];
 497   top.restoreSession();
 498   var i = url.indexOf('{PID}');
 499   if (i >= 0) url = url.substring(0,i) + active_pid + url.substring(i+5);
 500   if(f.sel_frame)
 501    {
 502           var fi = f.sel_frame.selectedIndex;
 503           if (fi == 1) frame = 'RTop'; else if (fi == 2) frame = 'RBot';
 504    }
 505   if (!f.cb_bot.checked) frame = 'RTop'; else if (!f.cb_top.checked) frame = 'RBot';
 506   top.frames[frame].location = '<?php echo "$web_root/interface/" ?>' + url;
 507   if (frame == 'RTop') topName = fname; else botName = fname;
 508   return false;
 509  }
 510
 511  function loadFrame3(fname, frame, url) {
 512   var f = document.forms[0];
 513   top.restoreSession();
 514   var i = url.indexOf('{PID}');
 515   if (i >= 0) url = url.substring(0,i) + active_pid + url.substring(i+5);
 516   if(f.sel_frame)
 517    {
 518           var fi = f.sel_frame.selectedIndex;
 519           if (fi == 1) frame = 'RTop'; else if (fi == 2) frame = 'RBot';
 520    }
 521   if (!f.cb_bot.checked) frame = 'RTop'; else if (!f.cb_top.checked) frame = 'RBot';
 522   top.frames[frame].location = '<?php echo "$web_root/interface/" ?>' + url;
 523   if (frame == 'RTop') topName = fname; else botName = fname;
 524   return false;
 525  }
 526
 527  // Make sure the the top and bottom frames are open or closed, as specified.
 528  function forceSpec(istop, isbot) {
 529   var f = document.forms[0];
 530   if (f.cb_top.checked != istop) {
 531    f.cb_top.checked = istop;
 532    toggleFrame(1);
 533   }
 534   if (f.cb_bot.checked != isbot) {
 535    f.cb_bot.checked = isbot;
 536    toggleFrame(2);
 537   }
 538  }
 539
 540  // Make sure both frames are open.
 541  function forceDual() {
 542   forceSpec(true, true);
 543  }
 544
 545  // Load the specified url into a frame to be determined, with the specified
 546  // frame as the default; the url must be relative to interface.
 547  function loadFrameDual(tname, bname, topurl, boturl) {
 548   var topusage = tname.substring(3);
 549   var botusage = bname.substring(3);
 550   if (active_pid == 0 && (topusage > '0' || botusage > '0')) {
 551    alert('<?php xl('You must first select or add a patient.','e') ?>');
 552    return false;
 553   }
 554   if (active_encounter == 0 && (topusage > '1' || botusage > '1')) {
 555    alert('<?php xl('You must first select or create an encounter.','e') ?>');
 556    return false;
 557   }
 558   if (encounter_locked  && (topusage > '1' || botusage > '1')) {
 559    alert('<?php echo xls('This encounter is locked. No new forms can be added.') ?>');
 560    return false;
 561   }
 562   var f = document.forms[0];
 563   forceDual();
 564   top.restoreSession();
 565   var i = topurl.indexOf('{PID}');
 566   if (i >= 0) topurl = topurl.substring(0,i) + active_pid + topurl.substring(i+5);
 567   i = boturl.indexOf('{PID}');
 568   if (i >= 0) boturl = boturl.substring(0,i) + active_pid + boturl.substring(i+5);
 569   top.frames.RTop.location = '<?php echo "$web_root/interface/" ?>' + topurl;
 570   top.frames.RBot.location = '<?php echo "$web_root/interface/" ?>' + boturl;
 571   topName = tname;
 572   botName = bname;
 573   return false;
 574  }
 575
 576  // Set disabled/enabled state of radio buttons and associated labels
 577  // depending on whether there is an active patient or encounter.
 578  function syncRadios() {
 579   var f = document.forms[0];
 580   encounter_locked = isEncounterLocked(active_encounter);
 581   var nlinks = document.links.length;
 582   for (var i = 0; i < nlinks; ++i) {
 583    var lnk = document.links[i];
 584    if (lnk.id.length != 4) continue;
 585    var usage = lnk.id.substring(3);
 586    if (usage == '1' || usage == '2') {
 587     var da = false;
 588     if (active_pid == 0) da = true;
 589     if (active_encounter == 0 && usage > '1') da = true;
 590     if (encounter_locked && usage > '1') da = true;
 591     <?php
 592     if ($GLOBALS['menu_styling_vertical'] == 0){
 593       $color = "'#0000ff'";
 594     }else{ // ($GLOBALS['menu_styling_vertical'] == 1)
 595       $color = "'#000000'";
 596     }
 597     ?>
 598     lnk.style.color = da ? '#888888' : <?php echo $color; ?>;
 599    }
 600    //for therapy groups menu
 601     <?php if($GLOBALS['enable_group_therapy']) { ?>
 602       if (usage == '3' || usage == '4') {
 603           var da = false;
 604           if (active_gid == 0) da = true;
 605           if (active_encounter == 0 && usage > '3') da = true;
 606           if (encounter_locked && usage > '3') da = true;
 607           <?php
 608           if ($GLOBALS['menu_styling_vertical'] == 0){
 609               $color = "'#0000ff'";
 610           }else{ // ($GLOBALS['menu_styling_vertical'] == 1)
 611               $color = "'#000000'";
 612           }
 613           ?>
 614           lnk.style.color = da ? '#888888' : <?php echo $color; ?>;
 615       }
 616    <?php } ?>
 617
 618   }
 619   f.popups.disabled = (active_pid == 0);
 620  }
 621
 622 function goHome() {
 623     top.frames['RTop'].location='<?php echo $GLOBALS['default_top_pane']?>';
 624     top.frames['RBot'].location='messages/messages.php?form_active=1';
 625 }
 626
 627 //Function to clear active patient and encounter in the server side
 628 function clearactive() {
 629         top.restoreSession();
 630         //Ajax call to clear active patient in session
 631     var method = (active_pid > 0) ? 'unset_pid' : 'unset_gid';
 632         $.ajax({
 633           type: "POST",
 634           url: "<?php echo $GLOBALS['webroot'] ?>/library/ajax/unset_session_ajax.php",
 635           data: { func: method},
 636           success:function( msg ) {
 637                 clearPatient();
 638                 clearTherapyGroup();
 639                 top.frames['RTop'].location='<?php echo $GLOBALS['default_top_pane']?>';
 640                 top.frames['RBot'].location='messages/messages.php?form_active=1';
 641           }
 642         });
 643
 644         $(parent.Title.document.getElementById('clear_active')).hide();
 645         $(parent.Title.document.getElementById('clear_active_group')).hide();
 646 }
 647  // Reference to the search.php window.
 648  var my_window;
 649
 650  // Open the search.php window.
 651  function initFilter() {
 652     my_window = window.open("../../custom/search.php", "mywindow","status=1");
 653  }
 654
 655  // This is called by the search.php (Filter) window.
 656  function processFilter(fieldString, serviceCode) {
 657   var f = document.forms[0];
 658   document.getElementById('searchFields').value = fieldString;
 659   f.search_service_code.value = serviceCode;
 660   findPatient("Filter");
 661   f.search_service_code.value = '';
 662   my_window.close();
 663  }
 664
 665  // Process the click to find a patient by name, id, ssn or dob.
 666  function findPatient(findby) {
 667   var f = document.forms[0];
 668   if (! f.cb_top.checked) {
 669    f.cb_top.checked = true;
 670    toggleFrame(1);
 671   }
 672   f.findBy.value = findby;
 673   top.restoreSession();
 674   document.find_patient.submit();
 675  }
 676
 677  // Helper function to set the contents of a div.
 678  function setSomeContent(id, content, doc) {
 679   if (doc.getElementById) {
 680    var x = doc.getElementById(id);
 681    x.innerHTML = '';
 682    x.innerHTML = content;
 683   }
 684   else if (doc.all) {
 685    var x = doc.all[id];
 686    x.innerHTML = content;
 687   }
 688  }
 689  function setDivContent(id, content) {
 690   setSomeContent(id, content, document);
 691  }
 692  function setTitleContent(id, content) {
 693   setSomeContent(id, content, parent.Title.document);
 694  }
 695
 696  // This is called automatically when a new patient is set, to make sure
 697  // there are no patient-specific documents showing stale data.  If a frame
 698  // was just loaded with data for the correct patient, its name is passed so
 699  // that it will not be zapped.  At this point the new server-side pid is not
 700  // assumed to be set, so this function will only load global data.
 701  function reloadPatient(frname) {
 702   var f = document.forms[0];
 703   if (topName.length > 3 && topName.substring(3) > '0' && frname != 'RTop') {
 704    loadFrame('cal0','RTop', '<?php echo $primary_docs['cal'][2]; ?>');
 705   }
 706   if (botName.length > 3 && botName.substring(3) > '0' && frname != 'RBot') {
 707    loadFrame('ens0','RBot', '<?php echo $primary_docs['ens'][2]; ?>');
 708   }
 709  }
 710
 711  // Reload encounter-specific frames, excluding a specified frame.  At this
 712  // point the new server-side encounter ID may not be set and loading the same
 713  // document for the new encounter will not work, so load patient info instead.
 714  function reloadEncounter(frname) {
 715   var f = document.forms[0];
 716   if (topName.length > 3 && topName.substring(3) > '1' && frname != 'RTop') {
 717    loadFrame('dem1','RTop', '<?php echo $primary_docs['dem'][2]; ?>');
 718   }
 719   if (botName.length > 3 && botName.substring(3) > '1' && frname != 'RBot') {
 720    loadFrame('ens1','RBot', '<?php echo $primary_docs['ens'][2]; ?>');
 721   }
 722  }
 723
 724
 725  // Call this to announce that the patient has changed.  You must call this
 726  // if you change the session PID, so that the navigation frame will show the
 727  // correct patient and so that the other frame will be reloaded if it contains
 728  // patient-specific information from the previous patient.  frname is the name
 729  // of the frame that the call came from, so we know to only reload content
 730  // from the *other* frame if it is patient-specific.
 731  function setPatient(pname, pid, pubpid, frname, str_dob) {
 732   clearTherapyGroup();
 733   var str = '<a href=\'javascript:;\' onclick="parent.left_nav.loadCurrentPatientFromTitle()" title="PID = ' + pid + '"><b>' + pname + ' (' + pubpid + ')<br /></b></a>';
 734   setDivContent('current_patient', str);
 735   setTitleContent('current_patient', str + str_dob);
 736   if (pid == active_pid) return;
 737   setDivContent('current_encounter', '<b><?php xl('None','e'); ?></b>');
 738   active_pid = pid;
 739   active_encounter = 0;
 740   encounter_locked = false;
 741   if (frname) reloadPatient(frname);
 742   syncRadios();
 743   $(parent.Title.document.getElementById('current_patient_block')).show();
 744   var encounter_block = $(parent.Title.document.getElementById('current_encounter_block'));
 745   $(encounter_block).hide();
 746
 747   // zero out the encounter frame, replace it with the encounter list frame
 748   var f = document.forms[0];
 749   if ( f.cb_top.checked && f.cb_bot.checked ) {
 750       var encounter_frame = getEncounterTargetFrame('enc');
 751       if ( encounter_frame != undefined )  {
 752           loadFrame('ens0',encounter_frame, '<?php echo $primary_docs['ens'][2]; ?>');
 753       }
 754   }
 755
 756   $(parent.Title.document.getElementById('clear_active')).show();//To display Clear Active Patient button on selecting a patient
 757   $(parent.Title.document.getElementById('clear_active_group')).hide();//To hide Clear Active group button on selecting a patient
 758
 759  }
 760
 761  // Call this to announce that the therapy group has changed.  You must call this
 762  // if you change the session 'therapy_group', so that the navigation frame will show the
 763  // correct group.
 764  function setTherapyGroup(group_id, group_name) {
 765      clearPatient();
 766
 767      $(parent.Title.document.querySelector('#current_patient_block span.text')).hide();
 768      setTitleContent('current_patient', '<span><?php echo xls('Therapy Group');?> - <a href=\'javascript:;\' onclick="parent.left_nav.loadCurrentGroupFromTitle(' + group_id +')">' + group_name + ' (' + group_id + ')<a></span>' );
 769      if (group_id == active_gid) return;
 770     setDivContent('current_encounter', '<b><?php xl('None','e'); ?></b>');
 771      active_gid = group_id;
 772      active_encounter = 0;
 773      encounter_locked = false;
 774      syncRadios();
 775      $(parent.Title.document.getElementById('current_patient_block')).show();
 776      var encounter_block = $(parent.Title.document.getElementById('current_encounter_block'));
 777      $(encounter_block).hide();
 778
 779      // zero out the encounter frame, replace it with the encounter list frame
 780      var f = document.forms[0];
 781      if ( f.cb_top.checked && f.cb_bot.checked ) {
 782          var encounter_frame = getEncounterTargetFrame('enc');
 783          if ( encounter_frame != undefined )  {
 784              loadFrame('ens0',encounter_frame, '<?php echo $primary_docs['ens'][2]; ?>');
 785          }
 786      }
 787
 788      $(parent.Title.document.getElementById('clear_active_group')).show();//To display Clear Active group button on selecting a patient
 789      $(parent.Title.document.getElementById('clear_active')).hide();//To hide Clear Active Patient button on selecting a patient
 790  }
 791
 792  function setPatientEncounter(EncounterIdArray,EncounterDateArray,CalendarCategoryArray) {
 793  //This function lists all encounters of the patient.
 794  //This function writes the drop down in the top frame.
 795  //It is called when a new patient is create/selected from the search menu.
 796   var str = '<Select class="text" id="EncounterHistory" onchange="{top.restoreSession();toencounter(this.options[this.selectedIndex].value)}">';
 797   str+='<option value=""><?php echo htmlspecialchars( xl('Encounter History'), ENT_QUOTES) ?></option>';
 798 <?php if (acl_check_form('newpatient', '', array('write', 'addonly'))) { ?>
 799   str+='<option value="New Encounter"><?php echo htmlspecialchars( xl('New Encounter'), ENT_QUOTES) ?></option>';
 800 <?php } ?>
 801   str+='<option value="Past Encounter List"><?php echo htmlspecialchars( xl('Past Encounter List'), ENT_QUOTES) ?></option>';
 802   for(CountEncounter=0;CountEncounter<EncounterDateArray.length;CountEncounter++)
 803    {
 804     str+='<option value="'+EncounterIdArray[CountEncounter]+'~'+EncounterDateArray[CountEncounter]+'">'+EncounterDateArray[CountEncounter]+'-'+CalendarCategoryArray[CountEncounter]+'</option>';
 805    }
 806   str+='</Select>';
 807   $(parent.Title.document.getElementById('past_encounter_block')).show();
 808   top.window.parent.Title.document.getElementById('past_encounter').innerHTML=str;
 809  }
 810
 811 function loadCurrentPatientFromTitle() {
 812     top.restoreSession();
 813     top.frames['RTop'].location='../patient_file/summary/demographics.php';
 814 }
 815
 816  function loadCurrentGroupFromTitle(gid) {
 817      top.restoreSession();
 818      top.frames['RTop'].location='../therapy_groups/index.php?method=groupDetails&group_id=' + gid;
 819  }
 820
 821 function getEncounterTargetFrame( name ) {
 822     var bias = <?php echo $primary_docs[ 'enc'  ][ 1 ]?>;
 823     var f = document.forms[0];
 824     var r = 'RTop';
 825     if (f.cb_top.checked && f.cb_bot.checked) {
 826         if ( bias == 2 ) {
 827             r = 'RBot';
 828         } else {
 829             r = 'RTop';
 830         }
 831     } else {
 832         if ( f.cb_top.checked ) {
 833             r = 'RTop';
 834         } else if ( f.cb_bot.checked )  {
 835             r = 'RBot';
 836         }
 837     }
 838     return r;
 839 }
 840
 841 function isEncounterLocked( encounterId ) {
 842         <?php if ( $esignApi->lockEncounters() ) { ?>
 843         // If encounter locking is enabled, make a syncronous call (async=false) to check the
 844         // DB to see if the encounter is locked.
 845         // Call restore session, just in case
 846         top.restoreSession();
 847     $.ajax({
 848         type: 'POST',
 849         url: '<?php echo $GLOBALS['webroot']?>/interface/esign/index.php?module=encounter&method=esign_is_encounter_locked',
 850         data: { encounterId : encounterId },
 851         success: function( data ) {
 852             encounter_locked = data;
 853         },
 854         dataType: 'json',
 855         async:false
 856         });
 857         return encounter_locked;
 858         <?php } else { ?>
 859         // If encounter locking isn't enabled, just tell the left_nav that the encounter
 860     // isn't locked.
 861         return false;
 862         <?php } ?>
 863  }
 864
 865  // Call this to announce that the encounter has changed.  You must call this
 866  // if you change the session encounter, so that the navigation frame will
 867  // show the correct encounter and so that the other frame will be reloaded if
 868  // it contains encounter-specific information from the previous encounter.
 869  // frname is the name of the frame that the call came from, so we know to only
 870  // reload encounter-specific content from the *other* frame.
 871  function setEncounter(edate, eid, frname) {
 872   if (eid == active_encounter) return;
 873   if (!eid) edate = '<?php xl('None','e'); ?>';
 874   var str = '<b>' + edate + '</b>';
 875   setDivContent('current_encounter', str);
 876   active_encounter = eid;
 877   encounter_locked=isEncounterLocked(active_encounter);
 878   reloadEncounter(frname);
 879   syncRadios();
 880   var encounter_block = $(parent.Title.document.getElementById('current_encounter_block'));
 881   var encounter = $(parent.Title.document.getElementById('current_encounter'));
 882   var estr = '<a href=\'javascript:;\' onclick="parent.left_nav.loadCurrentEncounterFromTitle()"><b>' + edate + ' (' + eid + ')</b></a>';
 883   encounter.html( estr );
 884   encounter_block.show();
 885  }
 886
 887  function loadCurrentEncounterFromTitle() {
 888       top.restoreSession();
 889       top.frames[ parent.left_nav.getEncounterTargetFrame('enc') ].location='../patient_file/encounter/encounter_top.php';
 890  }
 891
 892  // You must call this if you delete the active patient (or if for any other
 893  // reason you "close" the active patient without opening a new one), so that
 894  // the appearance of the navigation frame will be correct and so that any
 895  // stale content will be reloaded.
 896  function clearPatient() {
 897   if (active_pid == 0) return;
 898   var f = document.forms[0];
 899   active_pid = 0;
 900   active_encounter = 0;
 901   encounter_locked = false;
 902   setDivContent('current_patient', '<b><?php xl('None','e'); ?></b>');
 903   $(parent.Title.document.getElementById('current_patient_block')).hide();
 904   top.window.parent.Title.document.getElementById('past_encounter').innerHTML='';
 905   $(parent.Title.document.getElementById('current_encounter_block')).hide();
 906   reloadPatient('');
 907   syncRadios();
 908  }
 909
 910  // You must call this if you delete the active therapy group so that
 911  // the appearance of the navigation frame will be correct and so that any
 912  // stale content will be reloaded.
 913  function clearTherapyGroup() {
 914      if (active_gid == 0) return;
 915      var f = document.forms[0];
 916      active_gid = 0;
 917      active_encounter = 0;
 918      encounter_locked = false;
 919      setDivContent('current_patient', '<b><?php xl('None','e'); ?></b>');
 920      $(parent.Title.document.getElementById('current_patient_block')).hide();
 921      top.window.parent.Title.document.getElementById('past_encounter').innerHTML='';
 922      $(parent.Title.document.getElementById('current_encounter_block')).hide();
 923      syncRadios();
 924  }
 925
 926  // You must call this if you delete the active encounter (or if for any other
 927  // reason you "close" the active encounter without opening a new one), so that
 928  // the appearance of the navigation frame will be correct and so that any
 929  // stale content will be reloaded.
 930  function clearEncounter() {
 931   if (active_encounter == 0) return;
 932   top.window.parent.Title.document.getElementById('current_encounter').innerHTML="<b><?php echo htmlspecialchars( xl('None'), ENT_QUOTES) ?></b>";
 933   active_encounter = 0;
 934   encounter_locked = false;
 935   reloadEncounter('');
 936   syncRadios();
 937  }
 938
 939 function removeOptionSelected(EncounterId)
 940 {//Removes an item from the Encounter drop down.
 941         var elSel = top.window.parent.Title.document.getElementById('EncounterHistory');
 942         var i;
 943         for (i = elSel.length - 1; i>=2; i--) {
 944          EncounterHistoryValue=elSel.options[i].value;
 945          EncounterHistoryValueArray=EncounterHistoryValue.split('~');
 946                 if (EncounterHistoryValueArray[0]==EncounterId) {
 947                         elSel.remove(i);
 948                 }
 949         }
 950 }
 951
 952  // You can call this to make sure the session pid is what we expect.
 953  function pidSanityCheck(pid) {
 954   if (pid != active_pid) {
 955    alert('Session patient ID is ' + pid + ', expecting ' + active_pid +
 956     '. This session is unstable and should be abandoned. Do not use ' +
 957     'OpenEMR in multiple browser windows!');
 958    return false;
 959   }
 960   return true;
 961  }
 962
 963  // You can call this to make sure the session encounter is what we expect.
 964  function encounterSanityCheck(eid) {
 965   if (eid != active_encounter) {
 966    alert('Session encounter ID is ' + eid + ', expecting ' + active_encounter +
 967     '. This session is unstable and should be abandoned. Do not use ' +
 968     'OpenEMR in multiple browser windows!');
 969    return false;
 970   }
 971   return true;
 972  }
 973
 974  // Pop up a report.
 975  function repPopup(aurl) {
 976   top.restoreSession();
 977   window.open('<?php echo "$web_root/interface/reports/" ?>' + aurl, '_blank', 'width=750,height=550,resizable=1,scrollbars=1');
 978   return false;
 979  }
 980
 981  // This is invoked to pop up some window when a popup item is selected.
 982  function selpopup(selobj) {
 983   var i = selobj.selectedIndex;
 984   var opt = selobj.options[i];
 985   if (i > 0) {
 986    var width  = 750;
 987    var height = 550;
 988    if (opt.text == 'Export' || opt.text == 'Import') {
 989     width  = 500;
 990     height = 400;
 991    }
 992    dlgopen(opt.value, '_blank', width, height);
 993   }
 994   selobj.selectedIndex = 0;
 995  }
 996
 997 // Treeview activation stuff:
 998 $(document).ready(function(){
 999   if(1 == <?php echo $GLOBALS['menu_styling_vertical'] ?>){
1000     $("#navigation-slide > li > a.collapsed + ul").slideToggle("medium");
1001     $("#navigation-slide > li > ul > li > a.collapsed_lv2 + ul").slideToggle("medium");
1002     $("#navigation-slide > li > a.expanded").click(function() {
1003       $("#navigation-slide > li > a.expanded").not(this).toggleClass("expanded").toggleClass("collapsed").parent().find('> ul').slideToggle("medium");
1004       $(this).toggleClass("expanded").toggleClass("collapsed").parent().find('> ul').slideToggle("medium");
1005     });
1006     $("#navigation-slide > li > a.collapsed").click(function() {
1007       $("#navigation-slide > li > a.expanded").not(this).toggleClass("expanded").toggleClass("collapsed").parent().find('> ul').slideToggle("medium");
1008       $(this).toggleClass("expanded").toggleClass("collapsed").parent().find('> ul').slideToggle("medium");
1009     });
1010     $("#navigation-slide > li  > ul > li > a.expanded_lv2").click(function() {
1011       $("#navigation-slide > li > a.expanded").next("ul").find("li > a.expanded_lv2").not(this).toggleClass("expanded_lv2").toggleClass("collapsed_lv2").parent().find('> ul').slideToggle("medium");
1012       $(this).toggleClass("expanded_lv2").toggleClass("collapsed_lv2").parent().find('> ul').slideToggle("medium");
1013     });
1014     $("#navigation-slide > li  > ul > li > a.collapsed_lv2").click(function() {
1015       $("#navigation-slide > li > a.expanded").next("ul").find("li > a.expanded_lv2").not(this).toggleClass("expanded_lv2").toggleClass("collapsed_lv2").parent().find('> ul').slideToggle("medium");
1016       $(this).toggleClass("expanded_lv2").toggleClass("collapsed_lv2").parent().find('> ul').slideToggle("medium");
1017     });
1018     $("#navigation-slide > li  > a#cal0").prepend('<i class="fa fa-fw fa-calendar"></i>&nbsp;');
1019     $("#navigation-slide > li  > a#pfb0").prepend('<i class="fa fa-fw fa-list-alt"></i>&nbsp;');
1020     $("#navigation-slide > li  > a#msg0").prepend('<i class="fa fa-fw fa-envelope-o"></i>&nbsp;');
1021     $("#navigation-slide > li  > a#app0").prepend('<i class="fa fa-fw fa-user"></i>&nbsp;');
1022     $("#navigation-slide > li  > a#ppo0").prepend('<i class="fa fa-fw fa-users"></i>&nbsp;');
1023     $("#navigation-slide > li  > a#repimg").prepend('<i class="fa fa-fw fa-area-chart"></i>&nbsp;');
1024     $("#navigation-slide > li  > a#feeimg").prepend('<i class="fa fa-fw fa-dollar"></i>&nbsp;');
1025     $("#navigation-slide > li  > a#adm0").prepend('<i class="fa fa-fw fa-list-ol"></i>&nbsp;');
1026     $("#navigation-slide > li  > a#invimg").prepend('<i class="fa fa-fw fa-list-ol"></i>&nbsp;');
1027     $("#navigation-slide > li  > a#admimg").prepend('<i class="fa fa-fw fa-cogs"></i>&nbsp;');
1028     $("#navigation-slide > li  > a#misimg").prepend('<i class="fa fa-fw fa-cog"></i>&nbsp;');
1029     $("#navigation-slide > li  > a#proimg").prepend('<i class="fa fa-fw fa-stethoscope"></i>&nbsp;');
1030                 $("#navigation-slide > li  > a#modimg").prepend('<i class="fa fa-fw fa-puzzle-piece"></i>&nbsp;');
1031     $("#navigation-slide > li").each(function(index) {
1032       if($(" > ul > li", this).size() == 0){
1033         $(" > a", this).addClass("collapsed");
1034       }
1035     });
1036   } else { // $GLOBALS['menu_styling_vertical'] == 0
1037
1038     //Remove the links (used by the sliding menu) that will break treeview
1039     $('a.collapsed').each(function() { $(this).replaceWith('<span>'+$(this).text()+'</span>'); });
1040     $('a.collapsed_lv2').each(function() { $(this).replaceWith('<span>'+$(this).text()+'</span>'); });
1041     $('a.expanded').each(function() { $(this).replaceWith('<span>'+$(this).text()+'</span>'); });
1042     $('a.expanded_lv2').each(function() { $(this).replaceWith('<span>'+$(this).text()+'</span>'); });
1043
1044     // Initiate treeview
1045     $("#navigation").treeview({
1046      animated: "fast",
1047      collapsed: true,
1048      unique: true,
1049      toggle: function() {
1050       window.console && console.log("%o was toggled", this);
1051      }
1052     });
1053   }
1054 });
1055
1056 </script>
1057
1058 </head>
1059
1060 <body class="body_nav main-left">
1061
1062 <form method='post' name='find_patient' target='RTop'
1063  action='<?php echo $rootdir ?>/main/finder/patient_select.php'>
1064
1065 <center>
1066 <select name='sel_frame' style='background-color:transparent;font-size:9pt;width:100;'>
1067  <option value='0'><?php xl('Default','e'); ?></option>
1068  <option value='1'><?php xl('Top','e'); ?></option>
1069  <option value='2'><?php xl('Bottom','e'); ?></option>
1070 </select>
1071 </center>
1072
1073 <table cellpadding='0' cellspacing='0' border='0' width='100%'>
1074  <tr>
1075   <td class='smalltext' nowrap>
1076    <input type='checkbox' name='cb_top' onclick='toggleFrame(1)' <?php echo $cb_top_chk ?> />
1077    <b><?php xl('Top','e') ?></b>
1078   </td>
1079   <td class='smalltext' align='right' nowrap>
1080    <b><?php xl('Bot','e') ?></b>
1081    <input type='checkbox' name='cb_bot' onclick='toggleFrame(2)' <?php echo $cb_bot_chk ?> />
1082   </td>
1083  </tr>
1084 </table>
1085
1086 <?php if ( $GLOBALS['menu_styling_vertical'] == 1) { ?>
1087   <ul id="navigation-slide">
1088 <?php } else { // ($GLOBALS['menu_styling_vertical'] == 0) ?>
1089   <ul id="navigation">
1090 <?php } ?>
1091
1092 <?php
1093 if (!$GLOBALS['disable_calendar'] && acl_check('patients', 'appt')) {
1094   genTreeLink('RTop','cal',xl('Calendar'));
1095 }
1096 if (!$GLOBALS['disable_pat_trkr'] && !$GLOBALS['disable_calendar'] && acl_check('patients', 'appt')) {
1097   genTreeLink('RTop','pfb',xl('Flow Board'));
1098 }
1099 if (acl_check('patients', 'notes')) {
1100   genTreeLink('RBot','msg',xl('Messages'));
1101 }
1102 if($GLOBALS['portal_offsite_enable'] && $GLOBALS['portal_offsite_address'] && acl_check('patientportal','portal')) {
1103   genTreeLink('RTop','app',xl('Portal Activity'));
1104 }
1105 if($GLOBALS['portal_onsite_two_enable'] && acl_check('patientportal','portal')) {
1106   genTreeLink('RTop','aop',xl('Portal Dashboard'));
1107 }
1108 if ($GLOBALS['gbl_portal_cms_enable'] && acl_check('patientportal','portal')) {
1109   genPopLink(xl('CMS Portal'),'../cmsportal/list_requests.php','ppo0');
1110 }
1111 ?>
1112
1113   <li class="open"><a class="expanded" id="patimg" ><i class="fa fa-fw fa-user"></i>&nbsp;<span><?php xl('Patient/Client','e') ?></span></a>
1114     <ul>
1115       <?php if (acl_check('patients','demo'))
1116         genMiscLink('RTop','fin','0',xl('Patients'),'main/finder/dynamic_finder.php'); ?>
1117       <?php if (acl_check('patients','demo', '', 'write') || acl_check('patients','demo', '', 'addonly'))
1118         genTreeLink('RTop','new',($GLOBALS['full_new_patient_form'] ? xl('New/Search') : xl('New'))); ?>
1119       <?php if (acl_check('patients','demo'))
1120         genTreeLink('RTop','dem',xl('Summary')); ?>
1121
1122       <?php if (acl_check('patients','appt') || acl_check_form('newpatient', '', array('write', 'addonly'))) { ?>
1123       <li class="open"><a class="expanded_lv2"><span><?php xl('Visits','e') ?></span></a>
1124         <ul>
1125           <?php if (acl_check_form('newpatient', '', array('write', 'addonly')))
1126             genTreeLink('RBot','nen',xl('Create Visit')); ?>
1127           <?php if (acl_check('patients','appt'))
1128             genTreeLink('RBot','enc',xl('Current')); ?>
1129           <?php if (acl_check('patients','appt'))
1130             genTreeLink('RBot','ens',xl('Visit History')); ?>
1131         </ul>
1132       </li>
1133       <?php } ?>
1134
1135 <?php if (acl_check('patients','med')) { ?>
1136       <li><a class="collapsed_lv2"><span><?php xl('Records','e') ?></span></a>
1137         <ul>
1138           <?php genTreeLink('RTop','prq',xl('Patient Record Request')); ?>
1139         </ul>
1140       </li>
1141 <?php } ?>
1142
1143 <?php if ($GLOBALS['gbl_nav_visit_forms'] && acl_check('patients','demo')) { ?>
1144       <li><a class="collapsed_lv2"><span><?php xl('Visit Forms','e') ?></span></a>
1145         <ul>
1146 <?php
1147 // Generate the items for visit forms, both traditional and LBF.
1148 //
1149 $lres = sqlStatement("SELECT * FROM list_options " .
1150   "WHERE list_id = 'lbfnames' AND activity = 1 ORDER BY seq, title");
1151 while ($lrow = sqlFetchArray($lres)) {
1152   $option_id = $lrow['option_id']; // should start with LBF
1153   $title = $lrow['title'];
1154   // Check ACO attribute, if any, of this LBF.
1155   $jobj = json_decode($lrow['notes'], true);
1156   if (!empty($jobj['aco'])) {
1157     $tmp = explode('|', $jobj['aco']);
1158     if (!acl_check($tmp[0], $tmp[1], '', 'write')) continue;
1159   }
1160   genMiscLink('RBot','cod','2',xl_form_title($title),
1161     "patient_file/encounter/load_form.php?formname=$option_id");
1162 }
1163 //
1164 include_once("$srcdir/registry.inc");
1165 $reg = getRegistered();
1166 if (!empty($reg)) {
1167   foreach ($reg as $entry) {
1168     $option_id = $entry['directory'];
1169           $title = trim($entry['nickname']);
1170     if ($option_id == 'fee_sheet' ) continue;
1171     if ($option_id == 'newpatient') continue;
1172     // Check permission to create forms of this type.
1173     $tmp = explode('|', $entry['aco_spec']);
1174     if (!empty($tmp[1])) {
1175       if (!acl_check($tmp[0], $tmp[1], '', 'write') && !acl_check($tmp[0], $tmp[1], '', 'addonly'))
1176         continue;
1177     }
1178           if (empty($title)) $title = $entry['name'];
1179     genMiscLink('RBot','cod','2',xl_form_title($title),
1180       "patient_file/encounter/load_form.php?formname=" .
1181       urlencode($option_id));
1182   }
1183 }
1184 ?>
1185         </ul>
1186       </li>
1187       <li class="collapsed" ><a class="collapsed_lv2"><span><?php echo xlt('Import') ?></span></a>
1188         <ul>
1189           <?php genMiscLink('RTop','ccr','0',xlt('Upload'),'patient_file/ccr_import.php'); ?>
1190           <?php genMiscLink('RTop','apr','0',xlt('Pending Approval'),'patient_file/ccr_pending_approval.php'); ?>
1191         </ul>
1192       </li>
1193 <?php } // end if gbl_nav_visit_forms ?>
1194
1195     </ul>
1196   </li>
1197
1198   <?php if ($GLOBALS['enable_group_therapy']) : ?>
1199       <li><a class="collapsed" id="groupimg" ><i class="fa fa-fw fa-users"></i>&nbsp;<span><?php xl('Group','e') ?></span></a>
1200           <ul>
1201               <?php genMiscLink('RTop','gfn','0',xl('Groups'),'therapy_groups/index.php?method=listGroups'); ?>
1202               <?php genTreeLink('RTop','gng', xl('New')); ?>
1203               <?php genTreeLink('RTop','gdg',xl('Group Details')); ?>
1204               <li><a class="collapsed_lv2"><span><?php xl('Visits','e') ?></span></a>
1205                   <ul>
1206                       <?php genTreeLink('RBot','gcv',xl('Create Visit')); ?>
1207                       <?php genTreeLink('RBot','gce',xl('Current')); ?>
1208                       <?php genTreeLink('RBot','gvh',xl('Visit History')); ?>
1209                   </ul>
1210               </li>
1211
1212           </ul>
1213       </li>
1214   <?php endif ?>
1215
1216   <?php // TajEmo Work by CB 2012/06/21 10:41:15 AM hides fees if disabled in globals ?>
1217   <?php if((!isset($GLOBALS['enable_fees_in_left_menu']) || $GLOBALS['enable_fees_in_left_menu'] == 1) &&
1218     (acl_check('encounters','coding') || acl_check('acct', 'eob') || acl_check('acct','bill','','write'))) { ?>
1219   <li><a class="collapsed" id="feeimg" ><span><?php xl('Fees','e') ?></span></a>
1220     <ul>
1221       <?php if (acl_check('encounters','coding'))
1222         genMiscLink('RBot','cod','2',xl('Fee Sheet'),'patient_file/encounter/load_form.php?formname=fee_sheet'); ?>
1223       <?php if ($GLOBALS['use_charges_panel'] && acl_check('encounters','coding'))
1224         genTreeLink('RBot','cod', xl('Charges')); ?>
1225       <?php if (acl_check('acct','bill','','write'))
1226         genMiscLink('RBot','pay','1',xl('Payment'),'patient_file/front_payment.php'); ?>
1227       <?php if (acl_check('acct','bill','','write'))
1228         genMiscLink('RBot','bil','1',xl('Checkout'),'patient_file/pos_checkout.php?framed=1'); ?>
1229       <?php if (!$GLOBALS['simplified_demographics'] && (acl_check('acct','bill','','write') || acl_check('acct','eob','','write')))
1230         genTreeLink('RTop','bil',xl('Billing')); ?>
1231       <?php if ($GLOBALS['enable_batch_payment'] && (acl_check('acct','bill','','write') || acl_check('acct','eob','','write')))
1232         genTreeLink('RTop','npa',xl('Batch Payments'),false,2);?>
1233       <?php if ($GLOBALS['enable_posting'] && acl_check('acct','eob','','write'))
1234         genMiscLink('RTop','eob','0',xl('Posting'), 'billing/sl_eob_search.php'); ?>
1235       <?php if ($GLOBALS['enable_edihistory_in_left_menu'] && acl_check('acct', 'eob'))
1236         genTreeLink('RTop','edi',xl('EDI History'),false,2);?>
1237     </ul>
1238   </li>
1239   <?php } ?>
1240
1241         <?php  if (acl_check('menus', 'modle')) {?>
1242    <li><a class="collapsed" id="modimg" ><span><?php echo xlt('Modules') ?></span></a>
1243     <ul>
1244         <?php genMiscLink('RTop','adm','0',xl('Manage Modules'),'modules/zend_modules/public/Installer'); ?>
1245          <?php //genTreeLink('RTop','ort',xl('Settings')); ?>
1246         <?php
1247                 $module_query = sqlStatement("select mod_directory,mod_name,mod_nick_name,mod_relative_link,type from modules where mod_active = 1 AND sql_run= 1 order by mod_ui_order asc");
1248                 if (sqlNumRows($module_query)) {
1249                   while ($modulerow = sqlFetchArray($module_query)) {
1250                                 $acl_section = strtolower($modulerow['mod_directory']);
1251                                 $disallowed[$acl_section] = zh_acl_check($_SESSION['authUserID'],$acl_section) ?  "" : "1";
1252                                 $modulePath = "";
1253                                 $added          = "";
1254                                 if($modulerow['type'] == 0) {
1255                                         $modulePath = $GLOBALS['customModDir'];
1256                                         $added          = "";
1257                                 }
1258                                 else{
1259                                         $added          = "index";
1260                                         $modulePath = $GLOBALS['zendModDir'];
1261                                 }
1262
1263                                 $relative_link ="modules/".$modulePath."/".$modulerow['mod_relative_link'].$added;
1264                                 $mod_nick_name = $modulerow['mod_nick_name'] ? $modulerow['mod_nick_name'] : $modulerow['mod_name'];
1265                         ?>
1266                       <?php genMiscLink2('RTop',$acl_section,'0',xlt($mod_nick_name),$relative_link);?>
1267                           <?php }
1268                 } ?>
1269     </ul>
1270   </li>
1271   <?php } ?>
1272
1273 <?php if ($GLOBALS['inhouse_pharmacy'] && acl_check('admin', 'drugs')) { ?>
1274   <li><a class="collapsed" id="invimg" ><span><?php xl('Inventory','e') ?></span></a>
1275     <ul>
1276       <?php genMiscLink('RTop','adm','0',xl('Management'),'drugs/drug_inventory.php'); ?>
1277       <?php genPopLink(xl('Destroyed'),'destroyed_drugs_report.php'); ?>
1278     </ul>
1279   </li>
1280 <?php } ?>
1281
1282 <?php if (acl_check('patients', 'lab')) { ?>
1283   <li><a class="collapsed" id="proimg" ><span><?php xl('Procedures','e') ?></span></a>
1284     <ul>
1285       <?php if (acl_check('admin', 'super')) genTreeLink('RTop','orl',xl('Providers')); ?>
1286       <?php if (acl_check('admin', 'super')) genTreeLink('RTop','ort',xl('Configuration')); ?>
1287       <?php if (acl_check('admin', 'super')) genTreeLink('RTop','orc',xl('Load Compendium')); ?>
1288       <?php genTreeLink('RTop','orp',xl('Pending Review')); ?>
1289       <?php genTreeLink('RTop','orr',xl('Patient Results')); ?>
1290       <?php genTreeLink('RTop','lda',xl('Lab Overview')); ?>
1291       <?php genTreeLink('RTop','orb',xl('Batch Results')); ?>
1292       <?php genTreeLink('RTop','ore',xl('Electronic Reports')); ?>
1293       <?php genTreeLink('RTop','dld',xl('Lab Documents'));?>
1294     </ul>
1295   </li>
1296 <?php } ?>
1297
1298   <?php
1299   if($GLOBALS['erx_enable'] && acl_check('patients', 'rx')) {
1300     $newcrop_user_role = sqlQuery("SELECT newcrop_user_role FROM users WHERE username = '".$_SESSION['authUser']."'");
1301     if($newcrop_user_role['newcrop_user_role']) {
1302   ?>
1303   <li><a class="collapsed" id="feeimg" ><span><?php xl('New Crop','e') ?></span></a>
1304     <ul>
1305       <li><a class="collapsed_lv2"><span><?php xl('Status','e') ?></span></a>
1306         <ul>
1307           <?php genTreeLink('RTop','erx',xl('e-Rx')); ?>
1308           <?php genMiscLink('RTop','err','0',xl('e-Rx Renewal'),'eRx.php?page=status'); ?>
1309           <?php if($newcrop_user_role['newcrop_user_role'] === 'erxadmin') genMiscLink('RTop','ere','0',xl('e-Rx EPCS'),'eRx.php?page=epcs-admin'); ?>
1310         </ul>
1311       </li>
1312     </ul>
1313   </li>
1314   <?php
1315     }
1316   }
1317   ?>
1318
1319   <?php if (!$disallowed['adm']) { ?>
1320   <li><a class="collapsed" id="admimg" ><span><?php xl('Administration','e') ?></span></a>
1321     <ul>
1322       <?php if (acl_check('admin', 'super'    )) genMiscLink('RTop','adm','0',xl('Globals'),'super/edit_globals.php'); ?>
1323       <?php if (acl_check('admin', 'users'    )) genMiscLink('RTop','adm','0',xl('Facilities'),'usergroup/facilities.php'); ?>
1324       <?php if (acl_check('admin', 'users'    )) genMiscLink('RTop','adm','0',xl('Users'),'usergroup/usergroup_admin.php'); ?>
1325       <?php if (acl_check('admin', 'practice' )) genTreeLink('RTop','adb',xl('Addr Book')); ?>
1326       <?php
1327           // Changed the target URL from practice settings -> Practice Settings - Pharmacy... Dec 09,09 .. Visolve ... This replaces empty frame with Pharmacy window
1328           if (acl_check('admin', 'practice' )) genMiscLink('RTop','adm','0',xl('Practice'),'../controller.php?practice_settings&pharmacy&action=list'); ?>
1329       <?php if (acl_check('admin', 'superbill')) genTreeLink('RTop','sup',xl('Codes')); ?>
1330       <?php if (acl_check('admin', 'super'    )) genMiscLink('RTop','adm','0',xl('Layouts'),'super/edit_layout.php'); ?>
1331       <?php if (acl_check('admin', 'super'    )) genMiscLink('RTop','adm','0',xl('Lists'),'super/edit_list.php'); ?>
1332       <?php if (acl_check('admin', 'acl'      )) genMiscLink('RTop','adm','0',xl('ACL'),'usergroup/adminacl.php'); ?>
1333       <?php if (acl_check('admin', 'super'    )) genMiscLink('RTop','adm','0',xl('Files'),'super/manage_site_files.php'); ?>
1334       <?php if (acl_check('admin', 'super'    )) genMiscLink('RTop','adm','0',xl('Backup'),'main/backup.php'); ?>
1335       <?php if (acl_check('admin', 'super'    ) && $GLOBALS['enable_cdr']) genMiscLink('RTop','adm','0',xl('Rules'),'super/rules/index.php?action=browse!list'); ?>
1336       <?php if (acl_check('admin', 'super'    ) && $GLOBALS['enable_cdr']) genMiscLink('RTop','adm','0',xl('Alerts'),'super/rules/index.php?action=alerts!listactmgr'); ?>
1337       <?php if (acl_check('admin', 'super'    ) && $GLOBALS['enable_cdr']) genMiscLink('RTop','adm','0',xl('Patient Reminders'),'patient_file/reminder/patient_reminders.php?mode=admin&patient_id='); ?>
1338       <?php if ( ($GLOBALS['include_de_identification']) && (acl_check('admin', 'super'    )) ) genMiscLink('RTop','adm','0',xl('De Identification'),'de_identification_forms/de_identification_screen1.php'); ?>
1339           <?php if ( ($GLOBALS['include_de_identification']) && (acl_check('admin', 'super'    )) ) genMiscLink('RTop','adm','0',xl('Re Identification'),'de_identification_forms/re_identification_input_screen.php'); ?>
1340       <?php if (acl_check('admin', 'super') && !empty($GLOBALS['code_types']['IPPF'])) genMiscLink('RTop','adm','0',xl('Export'),'main/ippf_export.php'); ?>
1341       <li><a class="collapsed_lv2"><span><?php xl('Other','e') ?></span></a>
1342         <ul>
1343           <?php if (acl_check('admin', 'language')) genMiscLink('RTop','adm','0',xl('Language'),'language/language.php'); ?>
1344           <?php if (acl_check('admin', 'forms'   )) genMiscLink('RTop','adm','0',xl('Forms'),'forms_admin/forms_admin.php'); ?>
1345           <?php if (acl_check('admin', 'calendar') && !$GLOBALS['disable_calendar']) genMiscLink('RTop','adm','0',xl('Calendar'),'main/calendar/index.php?module=PostCalendar&type=admin&func=modifyconfig'); ?>
1346           <?php if (acl_check('admin', 'users'   )) genMiscLink('RTop','adm','0',xl('Logs'),'logview/logview.php'); ?>
1347           <?php
1348           if($newcrop_user_role['newcrop_user_role'] || $GLOBALS['erx_enable']) {
1349             if (acl_check('admin', 'users'   )) genMiscLink('RTop','adm','0',xl('eRx Logs'),'logview/erx_logview.php');
1350           }
1351           ?>
1352           <?php if (acl_check('admin', 'users'   )) genMiscLink('RTop','adm','0',xl('Certificates'),'usergroup/ssl_certificates_admin.php'); ?>
1353           <?php if (acl_check('admin', 'super'   )) genMiscLink('RTop','adm','0',xl('Native Data Loads'),'../interface/super/load_codes.php'); ?>
1354           <?php if (acl_check('admin', 'super'   )) genMiscLink('RTop','adm','0',xl('External Data Loads'),'../interface/code_systems/dataloads_ajax.php'); ?>
1355           <?php if (acl_check('admin', 'super'   )) genMiscLink('RTop','adm','0',xl('Merge Patients'),'patient_file/merge_patients.php'); ?>
1356           <?php if (acl_check('admin', 'super'   )) genMiscLink('RTop','adm','0',xl('Import Holidays'),'../interface/main/holidays/import_holidays.php'); ?>
1357                   <?php if ($GLOBALS['enable_auditlog_encryption']) genMiscLink('RTop','rep','0',xl('Audit Log Tamper'),'reports/audit_log_tamper_report.php'); ?>
1358         </ul>
1359       </li>
1360     </ul>
1361   </li>
1362   <?php } ?>
1363
1364   <li><a class="collapsed" id="repimg" ><span><?php xl('Reports','e') ?></span></a>
1365     <ul>
1366                                 <?php
1367                                 $module_query = sqlStatement("SELECT msh.*,ms.obj_name,ms.menu_name,ms.path,m.mod_ui_name,m.type FROM modules_hooks_settings AS msh LEFT OUTER JOIN modules_settings AS ms ON
1368                                     obj_name=enabled_hooks AND ms.mod_id=msh.mod_id LEFT OUTER JOIN modules AS m ON m.mod_id=ms.mod_id
1369                                     WHERE fld_type=3 AND mod_active=1 AND sql_run=1 AND attached_to='reports' ORDER BY mod_id");
1370                                 if (sqlNumRows($module_query)) {
1371                                         $jid = 0;
1372                                         $modid = '';
1373                                         while ($modulerow = sqlFetchArray($module_query)) {
1374                                                 $modulePath = "";
1375                                                 $added          = "";
1376                                                         if($modulerow['type'] == 0) {
1377                                                                 $modulePath = $GLOBALS['customModDir'];
1378                                                                 $added          = "";
1379                                                         }
1380                                                         else{
1381                                                                 $added          = "index";
1382                                                                 $modulePath = $GLOBALS['zendModDir'];
1383                                                         }
1384                     $disallowed[$modulerow['obj_name']] = !$disallowed['adm'] || zh_acl_check($_SESSION['authUserID'],$modulerow['obj_name']) ?  "" : "1";
1385
1386                     $relative_link ="modules/".$modulePath."/".$modulerow['mod_relative_link'].$modulerow['path'];
1387                                                 $mod_nick_name = $modulerow['menu_name'] ? $modulerow['menu_name'] : 'NoName';
1388
1389                                                 if($jid==0 || ($modid!=$modulerow['mod_id'])){
1390                                                         if($modid!='')
1391                                                         echo "</ul>";
1392                                                 ?>
1393                                                 <li><a class="collapsed_lv2"><span><?php echo xlt($modulerow['mod_ui_name']); ?></span></a>
1394                                                         <ul>
1395                                                 <?php
1396                                                 }
1397                                                 $jid++;
1398                                                 $modid = $modulerow['mod_id'];
1399                                                 genMiscLink('RTop',$modulerow['obj_name'],'0',xlt($mod_nick_name),$relative_link);
1400                                         }
1401         echo "</ul>";
1402       } ?>
1403
1404           <?php if (acl_check('patients', 'demo') || acl_check('patients', 'med') ||
1405       (acl_check('patients', 'rx') && !$GLOBALS['disable_prescriptions'])) { ?>
1406       <li><a class="collapsed_lv2"><span><?php xl('Clients','e') ?></span></a>
1407         <ul>
1408           <?php if (acl_check('patients', 'demo'))
1409       genMiscLink('RTop','rep','0',xl('List'),'reports/patient_list.php'); ?>
1410     <?php if (acl_check('patients', 'rx') && !$GLOBALS['disable_prescriptions'])
1411       genMiscLink('RTop','rep','0',xl('Rx'),'reports/prescriptions_report.php'); ?>
1412     <?php if (acl_check('patients', 'med'))
1413       genMiscLink('RTop','rep','0',xl('Patient List Creation'),'reports/patient_list_creation.php'); ?>
1414     <?php if (acl_check('patients', 'med'))
1415       genMiscLink('RTop','rep','0',xl('Clinical'),'reports/clinical_reports.php'); ?>
1416           <?php if (acl_check('patients', 'med'))
1417       genMiscLink('RTop','rep','0',xl('Referrals'),'reports/referrals_report.php'); ?>
1418           <?php if (acl_check('patients', 'med'))
1419       genMiscLink('RTop','rep','0',xl('Immunization Registry'),'reports/immunization_report.php'); ?>
1420         </ul>
1421       </li>
1422     <?php } ?>
1423
1424       <?php if (acl_check('patients', 'med')) { ?>
1425       <li><a class="collapsed_lv2"><span><?php xl('Clinic','e') ?></span></a>
1426         <ul>
1427           <?php if (($GLOBALS['enable_cdr'] || $GLOBALS['enable_cqm']  || $GLOBALS['enable_amc']) && acl_check('patients', 'med'))
1428             genMiscLink('RTop','rep','0',xl('Report Results'),'reports/report_results.php'); ?>
1429           <?php if ($GLOBALS['enable_cdr'] && acl_check('patients', 'med'))
1430             genMiscLink('RTop','rep','0',xl('Standard Measures'),'reports/cqm.php?type=standard'); ?>
1431           <?php if ($GLOBALS['enable_cqm'] && acl_check('patients', 'med'))
1432             genMiscLink('RTop','rep','0',xl('Quality Measures (CQM)'),'reports/cqm.php?type=cqm'); ?>
1433           <?php if ($GLOBALS['enable_amc'] && acl_check('patients', 'med'))
1434             genMiscLink('RTop','rep','0',xl('Automated Measures (AMC)'),'reports/cqm.php?type=amc'); ?>
1435           <?php if ($GLOBALS['enable_amc_tracking'] && acl_check('patients', 'med'))
1436             genMiscLink('RTop','rep','0',xl('AMC Tracking'),'reports/amc_tracking.php'); ?>
1437           <?php if ($GLOBALS['enable_cdr'] && $GLOBALS['enable_alert_log'] && acl_check('patients', 'med'))
1438             genMiscLink('RTop','rep','0',xl('Alerts Log'),'reports/cdr_log.php'); ?>
1439         </ul>
1440       </li>
1441       <?php } ?>
1442
1443       <li><a class="collapsed_lv2"><span><?php xl('Visits','e') ?></span></a>
1444         <ul>
1445           <?php if (acl_check('acct', 'rep_a'))
1446             genMiscLink('RTop','rep','0',xl('Daily Report'),'reports/daily_summary_report.php'); ?>
1447           <?php if (!$GLOBALS['disable_calendar'] && acl_check('patients', 'appt'))
1448             genMiscLink('RTop','rep','0',xl('Appointments'),'reports/appointments_report.php'); ?>
1449           <?php if (!$GLOBALS['disable_pat_trkr'] && !$GLOBALS['disable_calendar'] && acl_check('patients', 'appt'))
1450             genMiscLink('RTop','rep','0',xl('Patient Flow Board'),'reports/patient_flow_board_report.php'); ?>
1451           <?php if (acl_check('encounters', 'coding_a'))
1452             genMiscLink('RTop','rep','0',xl('Encounters'),'reports/encounters_report.php'); ?>
1453           <?php if (!$GLOBALS['disable_calendar'] && acl_check('acct', 'rep_a'))
1454             genMiscLink('RTop','rep','0',xl('Appt-Enc'),'reports/appt_encounter_report.php'); ?>
1455           <?php if (empty($GLOBALS['code_types']['IPPF']) && acl_check('encounters', 'coding_a'))
1456             genMiscLink('RTop','rep','0',xl('Superbill'),'reports/custom_report_range.php'); ?>
1457           <?php if (acl_check('patients', 'demo'))
1458             genMiscLink('RTop','rep','0',xl('Eligibility'),'reports/edi_270.php'); ?>
1459           <?php if (acl_check('patients', 'demo'))
1460             genMiscLink('RTop','rep','0',xl('Eligibility Response'),'reports/edi_271.php'); ?>
1461                     <?php if (!$GLOBALS['disable_chart_tracker'] && acl_check('patients', 'appt'))
1462             genMiscLink('RTop','rep','0',xl('Chart Activity'),'reports/chart_location_activity.php'); ?>
1463           <?php if (!$GLOBALS['disable_chart_tracker'] && acl_check('patients', 'appt'))
1464             genMiscLink('RTop','rep','0',xl('Charts Out'),'reports/charts_checked_out.php'); ?>
1465           <?php genMiscLink('RTop','rep','0',xl('Services'), 'reports/services_by_category.php'); ?>
1466           <?php if (acl_check('patients', 'med'))
1467             genMiscLink('RTop','rep','0',xl('Syndromic Surveillance'),'reports/non_reported.php'); ?>
1468         </ul>
1469       </li>
1470
1471 <?php if (acl_check('acct', 'rep_a')) { ?>
1472       <li><a class="collapsed_lv2"><span><?php xl('Financial','e') ?></span></a>
1473         <ul>
1474           <?php genMiscLink('RTop','rep','0',xl('Sales'),'reports/sales_by_item.php'); ?>
1475           <?php genMiscLink('RTop','rep','0',xl('Cash Rec'), 'billing/sl_receipts_report.php'); ?>
1476           <?php genMiscLink('RTop','rep','0',xl('Front Rec'), 'reports/front_receipts_report.php'); ?>
1477           <?php genMiscLink('RTop','rep','0',xl('Pmt Method'), 'reports/receipts_by_method_report.php'); ?>
1478           <?php genMiscLink('RTop','rep','0',xl('Collections'), 'reports/collections_report.php'); ?>
1479           <?php genMiscLink('RTop','rep','0',xl('Pat Ledger'),'reports/pat_ledger.php?form=0'); ?>
1480           <?php genMiscLink('RTop','rep','0',xl('Financial Summary by Service Code'),'reports/svc_code_financial_report.php'); ?>
1481         </ul>
1482       </li>
1483 <?php } ?>
1484
1485 <?php if ($GLOBALS['inhouse_pharmacy'] && acl_check('admin', 'drugs')) { ?>
1486       <li><a class="collapsed_lv2"><span><?php xl('Inventory','e') ?></span></a>
1487         <ul>
1488           <?php genMiscLink('RTop','rep','0',xl('List'),'reports/inventory_list.php'); ?>
1489           <?php genMiscLink('RTop','rep','0',xl('Activity'),'reports/inventory_activity.php'); ?>
1490           <?php genMiscLink('RTop','rep','0',xl('Transactions'),'reports/inventory_transactions.php'); ?>
1491         </ul>
1492       </li>
1493 <?php } ?>
1494
1495 <?php if (acl_check('patients', 'lab')) { ?>
1496       <li><a class="collapsed_lv2"><span><?php xl('Procedures','e') ?></span></a>
1497         <ul>
1498           <?php genPopLink(xl('Pending Res'),'../orders/pending_orders.php'); ?>
1499           <?php if (!empty($GLOBALS['code_types']['IPPF'])) genPopLink(xl('Pending F/U'),'../orders/pending_followup.php'); ?>
1500           <?php genPopLink(xl('Statistics'),'../orders/procedure_stats.php'); ?>
1501         </ul>
1502       </li>
1503 <?php } ?>
1504
1505 <?php if (!$GLOBALS['simplified_demographics'] && (acl_check('acct', 'rep_a') || acl_check('patients', 'demo'))) { ?>
1506       <li><a class="collapsed_lv2"><span><?php xl('Insurance','e') ?></span></a>
1507         <ul>
1508           <?php if (acl_check('acct', 'rep_a'))
1509             genMiscLink('RTop','rep','0',xl('Distribution'),'reports/insurance_allocation_report.php'); ?>
1510           <?php if (acl_check('acct', 'rep_a'))
1511             genMiscLink('RTop','rep','0',xl('Indigents'),'billing/indigent_patients_report.php'); ?>
1512           <?php if (acl_check('patients', 'demo'))
1513             genMiscLink('RTop','rep','0',xl('Unique SP'),'reports/unique_seen_patients_report.php'); ?>
1514         </ul>
1515       </li>
1516 <?php } ?>
1517
1518 <?php if (!empty($GLOBALS['code_types']['IPPF']) && acl_check('acct', 'rep_a')) { ?>
1519       <li><a class="collapsed_lv2"><span><?php xl('Statistics','e') ?></span></a>
1520         <ul>
1521           <?php genPopLink(xl('IPPF Stats'),'ippf_statistics.php?t=i'); ?>
1522           <?php genPopLink(xl('GCAC Stats'),'ippf_statistics.php?t=g'); ?>
1523           <?php genPopLink(xl('MA Stats'),'ippf_statistics.php?t=m'); ?>
1524           <?php genPopLink(xl('CYP'),'ippf_cyp_report.php'); ?>
1525           <?php genPopLink(xl('Daily Record'),'ippf_daily.php'); ?>
1526         </ul>
1527       </li>
1528 <?php } // end ippf-specific ?>
1529
1530       <li><a class="collapsed_lv2"><span><?php xl('Blank Forms','e') ?></span></a>
1531         <ul>
1532           <?php genPopLink(xl('Demographics'),'../patient_file/summary/demographics_print.php'); ?>
1533           <?php genPopLink(xl('Superbill/Fee Sheet'),'../patient_file/printed_fee_sheet.php'); ?>
1534           <?php genPopLink(xl('Referral'),'../patient_file/transaction/print_referral.php'); ?>
1535 <?php
1536   $lres = sqlStatement("SELECT * FROM list_options " .
1537   "WHERE list_id = 'lbfnames' AND activity = 1 ORDER BY seq, title");
1538   while ($lrow = sqlFetchArray($lres)) {
1539     $option_id = $lrow['option_id']; // should start with LBF
1540     $title = $lrow['title'];
1541     // Check ACO attribute, if any, of this LBF.
1542     $jobj = json_decode($lrow['notes'], true);
1543     if (!empty($jobj['aco'])) {
1544       $tmp = explode('|', $jobj['aco']);
1545       if (!acl_check($tmp[0], $tmp[1])) continue;
1546     }
1547     genPopLink($title, "../forms/LBF/printable.php?formname=$option_id");
1548   }
1549 ?>
1550         </ul>
1551       </li>
1552
1553     <?php if (acl_check('admin','batchcom')) { ?>
1554       <li><a class="collapsed_lv2"><span><?php echo xlt('Services') ?></span></a>
1555         <ul>
1556           <?php genMiscLink('RTop','rep','0',xl('Background Services'),'reports/background_services.php'); ?>
1557           <?php genMiscLink('RTop','rep','0',xl('Direct Message Log'),'reports/direct_message_log.php'); ?>
1558         </ul>
1559       </li>
1560     <?php } ?>
1561
1562     </ul>
1563   </li>
1564
1565   <li><a class="collapsed" id="misimg" ><span><?php xl('Miscellaneous','e') ?></span></a>
1566     <ul>
1567       <?php genTreeLink('RTop','ped',xl('Patient Education')); ?>
1568       <?php if (acl_check('encounters','auth'))
1569         genTreeLink('RBot','aun',xl('Authorizations')); ?>
1570       <?php if (acl_check('patients','docs'))
1571         genTreeLink('RTop','fax',xl('Fax/Scan')); ?>
1572       <?php if (acl_check('admin','practice'))
1573         genTreeLink('RTop','adb',xl('Addr Book')); ?>
1574       <?php if (acl_check('admin','practice'))
1575         genTreeLink('RTop','ort',xl('Order Catalog')); ?>
1576       <?php if (!$GLOBALS['disable_chart_tracker'] && acl_check('patients','appt'))
1577         genTreeLink('RTop','cht',xl('Chart Tracker')); ?>
1578       <?php if (acl_check('encounters','notes'))
1579         genTreeLink('RTop','ono',xl('Ofc Notes')); ?>
1580       <?php if (acl_check('admin','batchcom') || acl_check('admin','practice'))
1581         genMiscLink('RTop','adm','0',xl('BatchCom'),'batchcom/batchcom.php'); ?>
1582       <?php $myrow = sqlQuery("SELECT state FROM registry WHERE directory = 'track_anything'");
1583       if($myrow['state']=='1') { genTreeLink('RTop','tan',xl('Configure Tracks')); } ?>
1584       <?php if(!$GLOBALS['use_active_directory']) { genTreeLink('RTop','pwd',xl('Password')); } ?>
1585       <?php genMiscLink('RTop','prf','0',xl('Preferences'),'super/edit_globals.php?mode=user'); ?>
1586       <?php if(acl_check('patients','docs','','write') || acl_check('patients','docs','','addonly'))
1587         genMiscLink('RTop','adm','0',xl('New Documents'),'../controller.php?document&list&patient_id=00'); ?>
1588       <?php if (acl_check('admin','practice'))
1589         genMiscLink('RTop','adm','0',xl('Document Templates'),'super/manage_document_templates.php'); ?>
1590     </ul>
1591   </li>
1592
1593 </ul>
1594
1595 <br /><hr />
1596
1597 <div id='current_patient' style = 'display:none'>
1598 <b><?php xl('None','e'); ?></b>
1599 </div>
1600
1601 <div id='current_encounter' style = 'display:none'>
1602 <b><?php xl('None','e'); ?></b>
1603 </div>
1604 <?php
1605   genPopupsList();
1606   echo "<hr />\n";
1607   genFindBlock();
1608   echo "<hr />\n";
1609 ?>
1610
1611 <input type='hidden' name='findBy' value='Last' />
1612 <input type="hidden" name="searchFields" id="searchFields"/>
1613 <input type="hidden" name="search_service_code" value='' />
1614
1615 </form>
1616
1617 <script language='JavaScript'>
1618 syncRadios();
1619
1620 function save_setting (cb_frames) {
1621     for (var i = 0, len = cb_frames.length; i < len; i++) {
1622             try {
1623                 var fref = '<?php echo $uspfx ?>frame' + i + '_chk';
1624                 var ureq = $.post( "<?php echo $GLOBALS['webroot'] ?>/library/ajax/user_settings.php",
1625                     { lab: fref, val: cb_frames[i] })
1626                 .done(function(data) {
1627                     // alert( "Data Loaded: " + data );
1628                 })
1629                 .fail(function(xhr, textStatus, errorThrown) {
1630                     alert("Error:"+xhr.responseText+"\n"+textStatus+"\n"+errorThrown);
1631                 })
1632                 .always(function() {
1633                     // alert( "finished" );
1634                 });
1635
1636             } catch (err) {
1637                 alert (err.message);
1638             }
1639     }
1640 }
1641 </script>
1642
1643 </body>
1644 </html>