contrib/forms/clinical_notes/view.php

   1 <?php
   2 //////////////////////////////////////////////////////////////////////
   3 // ------------------ DO NOT MODIFY VIEW.PHP !!! ---------------------
   4 // View.php is an exact duplicate of new.php.  If you wish to make
   5 // any changes, then change new.php and either (recommended) make
   6 // view.php a symbolic link to new.php, or copy new.php to view.php.
   7 //
   8 // And if you check in a change to either module, be sure to check
   9 // in the other (identical) module also.
  10 //
  11 // This nonsense will go away if we ever move to subversion.
  12 //////////////////////////////////////////////////////////////////////
  13
  14 // Copyright (C) 2005 Rod Roark <rod@sunsetsystems.com>
  15 //
  16 // This program is free software; you can redistribute it and/or
  17 // modify it under the terms of the GNU General Public License
  18 // as published by the Free Software Foundation; either version 2
  19 // of the License, or (at your option) any later version.
  20
  21 include_once("../../globals.php");
  22 include_once("$srcdir/api.inc");
  23 include_once("$srcdir/forms.inc");
  24
  25 $row = array();
  26
  27 if (! $encounter) { // comes from globals.php
  28     die("Internal error: we do not seem to be in an encounter!");
  29 }
  30
  31 function rbvalue($rbname)
  32 {
  33     $tmp = $_POST[$rbname];
  34     if (! $tmp) {
  35         $tmp = '0';
  36     }
  37
  38     return "'$tmp'";
  39 }
  40
  41 function cbvalue($cbname)
  42 {
  43     return $_POST[$cbname] ? '1' : '0';
  44 }
  45
  46 function rbinput($name, $value, $desc, $colname)
  47 {
  48     global $row;
  49     $ret  = "<input type='radio' name='$name' value='$value'";
  50     if ($row[$colname] == $value) {
  51         $ret .= " checked";
  52     }
  53
  54     $ret .= " />$desc";
  55     return $ret;
  56 }
  57
  58 function rbcell($name, $value, $desc, $colname)
  59 {
  60     return "<td width='25%' nowrap>" . rbinput($name, $value, $desc, $colname) . "</td>\n";
  61 }
  62
  63 function cbinput($name, $colname)
  64 {
  65     global $row;
  66     $ret  = "<input type='checkbox' name='$name' value='1'";
  67     if ($row[$colname]) {
  68         $ret .= " checked";
  69     }
  70
  71     $ret .= " />";
  72     return $ret;
  73 }
  74
  75 function cbcell($name, $desc, $colname)
  76 {
  77     return "<td width='25%' nowrap>" . cbinput($name, $colname) . "$desc</td>\n";
  78 }
  79
  80 $formid = $_GET['id'];
  81
  82 // If Save was clicked, save the info.
  83 //
  84 if ($_POST['bn_save']) {
  85     $fu_timing = $_POST['fu_timing'];
  86
  87  // If updating an existing form...
  88  //
  89     if ($formid) {
  90         $query = "UPDATE form_clinical_notes SET "      .
  91          "history = '"          . $_POST['form_history']     . "', " .
  92          "examination = '"      . $_POST['form_examination'] . "', " .
  93          "plan = '"             . $_POST['form_plan']        . "', " .
  94          "followup_required = " . rbvalue('fu_required')     . ", "  .
  95          "followup_timing = '$fu_timing'"                    . " "   .
  96       // "outcome = "           . rbvalue('outcome')         . ", "  .
  97       // "destination = "       . rbvalue('destination')     . " "   .
  98          "WHERE id = '$formid'";
  99         sqlStatement($query);
 100     } // If adding a new form...
 101  //
 102     else {
 103         $query = "INSERT INTO form_clinical_notes ( " .
 104          "history, examination, plan, followup_required, followup_timing " .
 105       // ",outcome, destination " .
 106          ") VALUES ( " .
 107          "'" . $_POST['form_history']     . "', " .
 108          "'" . $_POST['form_examination'] . "', " .
 109          "'" . $_POST['form_plan']        . "', " .
 110          rbvalue('fu_required')           . ", "  .
 111          "'$fu_timing'"                   . " "   .
 112       // rbvalue('outcome')               . ", "  .
 113       // rbvalue('destination')           . " "   .
 114          ")";
 115         $newid = sqlInsert($query);
 116         addForm($encounter, "Clinical Notes", $newid, "clinical_notes", $pid, $userauthorized);
 117     }
 118
 119     formHeader("Redirecting....");
 120     formJump();
 121     formFooter();
 122     exit;
 123 }
 124
 125 if ($formid) {
 126     $row = sqlQuery("SELECT * FROM form_clinical_notes WHERE " .
 127     "id = '$formid' AND activity = '1'") ;
 128 }
 129 ?>
 130 <html>
 131 <head>
 132 <?php html_header_show();?>
 133 <link rel=stylesheet href="<?php echo $css_header;?>" type="text/css">
 134 <script language="JavaScript">
 135 </script>
 136 </head>
 137
 138 <body <?php echo $top_bg_line;?> topmargin="0" rightmargin="0" leftmargin="2"
 139  bottommargin="0" marginwidth="2" marginheight="0">
 140 <form method="post" action="<?php echo $rootdir ?>/forms/clinical_notes/new.php?id=<?php echo $formid ?>"
 141  onsubmit="return top.restoreSession()">
 142
 143 <center>
 144
 145 <p>
 146 <table border='1' width='95%'>
 147
 148  <tr bgcolor='#dddddd'>
 149   <td colspan='2' align='center'><b>This Encounter</b></td>
 150  </tr>
 151
 152  <tr>
 153   <td width='5%'  nowrap> History </td>
 154   <td width='95%' nowrap>
 155    <textarea name='form_history' rows='7' style='width:100%'><?php echo $row['history'] ?></textarea>
 156   </td>
 157  </tr>
 158
 159  <tr>
 160   <td nowrap> Examination </td>
 161   <td nowrap>
 162    <textarea name='form_examination' rows='7' style='width:100%'><?php echo $row['examination'] ?></textarea>
 163   </td>
 164  </tr>
 165
 166  <tr>
 167   <td nowrap> Plan </td>
 168   <td nowrap>
 169    <textarea name='form_plan' rows='7' style='width:100%'><?php echo $row['plan'] ?></textarea>
 170   </td>
 171  </tr>
 172
 173  <tr>
 174   <td nowrap>Follow Up</td>
 175   <td nowrap>
 176    <table width='100%'>
 177     <tr>
 178      <td width='5%' nowrap>
 179         <?php echo rbinput('fu_required', '1', 'Required in:', 'followup_required') ?>
 180      </td>
 181      <td nowrap>
 182       <input type='text' name='fu_timing' size='10' style='width:100%'
 183        title='When to follow up'
 184        value='<?php echo addslashes($row['followup_timing']) ?>' />
 185      </td>
 186     </tr>
 187     <tr>
 188      <td colspan='2' nowrap>
 189         <?php echo rbinput('fu_required', '2', 'Pending investigation', 'followup_required') ?>
 190      </td>
 191     </tr>
 192     <tr>
 193      <td colspan='2' nowrap>
 194         <?php echo rbinput('fu_required', '0', 'None required', 'followup_required') ?>
 195      </td>
 196     </tr>
 197    </table>
 198   </td>
 199  </tr>
 200
 201  <!--
 202
 203  <tr bgcolor='#dddddd'>
 204   <td colspan='2' align='center'><b>Final Discharge</b></td>
 205  </tr>
 206
 207  <tr>
 208   <td nowrap>Outcome</td>
 209   <td nowrap>
 210    <table width='100%'>
 211     <tr>
 212         <?php // echo rbcell('outcome', '1', 'Resolved'  , 'outcome') ?>
 213         <?php // echo rbcell('outcome', '2', 'Improved'  , 'outcome') ?>
 214         <?php // echo rbcell('outcome', '3', 'Status Quo', 'outcome') ?>
 215         <?php // echo rbcell('outcome', '4', 'Worse'     , 'outcome') ?>
 216     </tr>
 217    </table>
 218   </td>
 219  </tr>
 220
 221  <tr>
 222   <td nowrap>Destination</td>
 223   <td nowrap>
 224    <table width='100%'>
 225     <tr>
 226         <?php // echo rbcell('destination', '1', 'GP'                 , 'destination') ?>
 227         <?php // echo rbcell('destination', '2', 'Hospital Specialist', 'destination') ?>
 228      <td width='25%'>&nbsp;</td>
 229      <td width='25%'>&nbsp;</td>
 230     </tr>
 231    </table>
 232   </td>
 233  </tr>
 234
 235  -->
 236
 237 </table>
 238
 239 <p>
 240 <input type='submit' name='bn_save' value='Save' />
 241 &nbsp;
 242 <input type='button' value='Cancel' onclick="top.restoreSession();location='<?php echo $GLOBALS['form_exit_url'] ?>'" />
 243 </p>
 244
 245 </center>
 246
 247 </form>
 248 </body>
 249 </html>