interface/forms/CAMOS/report.php

   1 <?php
   2
   3 /**
   4  * CAMOS report.php
   5  *
   6  * @package   OpenEMR
   7  * @link      http://www.open-emr.org
   8  * @author    Mark Leeds <drleeds@gmail.com>
   9  * @author    Brady Miller <brady.g.miller@gmail.com>
  10  * @copyright Copyright (c) 2006-2009 Mark Leeds <drleeds@gmail.com>
  11  * @copyright Copyright (c) 2018-2019 Brady Miller <brady.g.miller@gmail.com>
  12  * @license   https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
  13  */
  14
  15 require_once(dirname(__FILE__) . '/../../globals.php');
  16 require_once("../../../library/api.inc.php");
  17 require_once("content_parser.php");
  18
  19 function CAMOS_report($pid, $encounter, $cols, $id)
  20 {
  21     $data = formFetch("form_CAMOS", $id);
  22     if ($data) {
  23         echo "<div class='navigateLink'><a href='" . $GLOBALS['webroot'] .
  24         "/interface/forms/CAMOS/rx_print.php?sigline=embossed' target=_new>" . xlt('Rx') . "</a>\n";
  25         echo " | ";
  26         echo "<a href='" . $GLOBALS['webroot'] .
  27         "/interface/forms/CAMOS/rx_print.php?sigline=signed' target=_new>" . xlt('Signed Rx') . "</a>\n";
  28         echo "<br />";
  29         echo "<a href='" . $GLOBALS['webroot'] .
  30         "/interface/forms/CAMOS/rx_print.php?letterhead=true&signer=patient' target=_new>" . xlt('Letterhead that patient signs') . "</a>\n";
  31         echo " | ";
  32         echo "<a href='" . $GLOBALS['webroot'] .
  33         "/interface/forms/CAMOS/rx_print.php?letterhead=true&signer=doctor' target=_new>" . xlt('Letterhead that doctor signs') . "</a>\n";
  34         echo "<br />";
  35         echo "<a href='" . $GLOBALS['webroot'] .
  36         "/interface/forms/CAMOS/notegen.php?pid=" . attr_url($pid) . "&encounter=" . attr_url($encounter) . "' target=_new>" . xlt('Print This Encounter') . "</a>\n";
  37         echo " | ";
  38         echo "<a href='" . $GLOBALS['webroot'] .
  39         "/interface/forms/CAMOS/notegen.php' target=_new>" . xlt('Print Any Encounter') . "</a></div>\n";
  40         echo "<pre>" . text(wordwrap(stripslashes(replace($pid, $encounter, $data['content'])))) . "</pre><hr>\n";
  41     }
  42 }