interface/patient_file/encounter/coding_popup.php

   1 <?php
   2  // Copyright (C) 2006 Rod Roark <rod@sunsetsystems.com>
   3  //
   4  // This program is free software; you can redistribute it and/or
   5  // modify it under the terms of the GNU General Public License
   6  // as published by the Free Software Foundation; either version 2
   7  // of the License, or (at your option) any later version.
   8
   9  include_once("../../globals.php");
  10
  11  $info_msg = "";
  12
  13  // Call this to get the URL for form submission.
  14  function coding_form_action() {
  15   return $GLOBALS['rootdir'] . "/patient_file/encounter/coding_popup.php";
  16  }
  17
  18  // Call this to generate JavaScript that will close the window.
  19  //
  20  function terminate_coding() {
  21   global $info_msg;
  22   echo "<script language='JavaScript'>\n";
  23   if ($info_msg) echo " alert('$info_msg');\n";
  24   echo " window.close();\n";
  25   echo " if (opener.refreshme) opener.refreshme();\n";
  26   echo "</script></body></html>\n";
  27   exit();
  28  }
  29 ?>
  30 <html>
  31 <head>
  32 <?php html_header_show();?>
  33 <title>Coding</title>
  34 <link rel="stylesheet" href='<?php echo $css_header ?>' type='text/css'>
  35 <script language='JavaScript'>
  36  function docancel() {
  37   window.close();
  38  }
  39 </script>
  40 </head>
  41
  42 <body class="body_top">
  43 <?php
  44  // This has all the interesting stuff.
  45  include_once("$srcdir/coding.inc.php");
  46 ?>
  47 </body>
  48 </html>