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.
8 // And if you check in a change to either module, be sure to check
9 // in the other (identical) module also.
11 // This nonsense will go away if we ever move to subversion.
12 //////////////////////////////////////////////////////////////////////
14 // Copyright (C) 2005 Rod Roark <rod@sunsetsystems.com>
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.
21 include_once("../../globals.php");
22 include_once("$srcdir/api.inc");
23 include_once("$srcdir/forms.inc");
27 if (! $encounter) { // comes from globals.php
28 die("Internal error: we do not seem to be in an encounter!");
31 function rbvalue($rbname) {
32 $tmp = $_POST[$rbname];
33 if (! $tmp) $tmp = '0';
37 function cbvalue($cbname) {
38 return $_POST[$cbname] ?
'1' : '0';
41 function rbinput($name, $value, $desc, $colname) {
43 $ret = "<input type='radio' name='$name' value='$value'";
44 if ($row[$colname] == $value) $ret .= " checked";
49 function rbcell($name, $value, $desc, $colname) {
50 return "<td width='25%' nowrap>" . rbinput($name, $value, $desc, $colname) . "</td>\n";
53 function cbinput($name, $colname) {
55 $ret = "<input type='checkbox' name='$name' value='1'";
56 if ($row[$colname]) $ret .= " checked";
61 function cbcell($name, $desc, $colname) {
62 return "<td width='25%' nowrap>" . cbinput($name, $colname) . "$desc</td>\n";
65 $formid = $_GET['id'];
67 // If Save was clicked, save the info.
69 if ($_POST['bn_save']) {
71 $fu_timing = $_POST['fu_timing'];
73 // If updating an existing form...
76 $query = "UPDATE form_clinical_notes SET " .
77 "history = '" . $_POST['form_history'] . "', " .
78 "examination = '" . $_POST['form_examination'] . "', " .
79 "plan = '" . $_POST['form_plan'] . "', " .
80 "followup_required = " . rbvalue('fu_required') . ", " .
81 "followup_timing = '$fu_timing'" . " " .
82 // "outcome = " . rbvalue('outcome') . ", " .
83 // "destination = " . rbvalue('destination') . " " .
84 "WHERE id = '$formid'";
88 // If adding a new form...
91 $query = "INSERT INTO form_clinical_notes ( " .
92 "history, examination, plan, followup_required, followup_timing " .
93 // ",outcome, destination " .
95 "'" . $_POST['form_history'] . "', " .
96 "'" . $_POST['form_examination'] . "', " .
97 "'" . $_POST['form_plan'] . "', " .
98 rbvalue('fu_required') . ", " .
99 "'$fu_timing'" . " " .
100 // rbvalue('outcome') . ", " .
101 // rbvalue('destination') . " " .
103 $newid = sqlInsert($query);
104 addForm($encounter, "Clinical Notes", $newid, "clinical_notes", $pid, $userauthorized);
107 formHeader("Redirecting....");
114 $row = sqlQuery ("SELECT * FROM form_clinical_notes WHERE " .
115 "id = '$formid' AND activity = '1'") ;
120 <?php
html_header_show();?
>
121 <link rel
=stylesheet href
="<?echo $css_header;?>" type
="text/css">
122 <script language
="JavaScript">
126 <body
<?
echo $top_bg_line;?
> topmargin
="0" rightmargin
="0" leftmargin
="2"
127 bottommargin
="0" marginwidth
="2" marginheight
="0">
128 <form method
="post" action
="<?php echo $rootdir ?>/forms/clinical_notes/new.php?id=<?php echo $formid ?>"
129 onsubmit
="return top.restoreSession()">
134 <table border
='1' width
='95%'>
136 <tr bgcolor
='#dddddd'>
137 <td colspan
='2' align
='center'><b
>This Encounter
</b
></td
>
141 <td width
='5%' nowrap
> History
</td
>
142 <td width
='95%' nowrap
>
143 <textarea name
='form_history' rows
='7' style
='width:100%'><?php
echo $row['history'] ?
></textarea
>
148 <td nowrap
> Examination
</td
>
150 <textarea name
='form_examination' rows
='7' style
='width:100%'><?php
echo $row['examination'] ?
></textarea
>
155 <td nowrap
> Plan
</td
>
157 <textarea name
='form_plan' rows
='7' style
='width:100%'><?php
echo $row['plan'] ?
></textarea
>
162 <td nowrap
>Follow Up
</td
>
166 <td width
='5%' nowrap
>
167 <?php
echo rbinput('fu_required', '1', 'Required in:', 'followup_required') ?
>
170 <input type
='text' name
='fu_timing' size
='10' style
='width:100%'
171 title
='When to follow up'
172 value
='<?php echo addslashes($row['followup_timing
']) ?>' />
176 <td colspan
='2' nowrap
>
177 <?php
echo rbinput('fu_required', '2', 'Pending investigation', 'followup_required') ?
>
181 <td colspan
='2' nowrap
>
182 <?php
echo rbinput('fu_required', '0', 'None required', 'followup_required') ?
>
191 <tr bgcolor
='#dddddd'>
192 <td colspan
='2' align
='center'><b
>Final Discharge
</b
></td
>
196 <td nowrap
>Outcome
</td
>
200 <?php
// echo rbcell('outcome', '1', 'Resolved' , 'outcome') ?>
201 <?php
// echo rbcell('outcome', '2', 'Improved' , 'outcome') ?>
202 <?php
// echo rbcell('outcome', '3', 'Status Quo', 'outcome') ?>
203 <?php
// echo rbcell('outcome', '4', 'Worse' , 'outcome') ?>
210 <td nowrap
>Destination
</td
>
214 <?php
// echo rbcell('destination', '1', 'GP' , 'destination') ?>
215 <?php
// echo rbcell('destination', '2', 'Hospital Specialist', 'destination') ?>
216 <td width
='25%'> 
;</td
>
217 <td width
='25%'> 
;</td
>
228 <input type
='submit' name
='bn_save' value
='Save' />
230 <input type
='button' value
='Cancel' onclick
="top.restoreSession();location='<?php echo $GLOBALS['form_exit_url'] ?>'" />