interface/patient_file/encounter/new_form.php

   1 <?
   2 include_once("../../globals.php");
   3 ?>
   4 <html>
   5 <head>
   6 <link rel=stylesheet href="<?echo $css_header;?>" type="text/css">
   7 </head>
   8 <body <?echo $top_bg_line;?> topmargin=0 rightmargin=0 leftmargin=2 bottommargin=0 marginwidth=2 marginheight=0>
   9 <!-- outdated
  10 <dl>
  11 <dt><span class="title">New Form</span></dt>
  12 <dd><a href="<?echo "$rootdir/patient_file/encounter/load_form.php?formname=physical";?>" class="link" target=Main>Physical Examination</a></dd>
  13 <dd><a href="<?echo "$rootdir/patient_file/encounter/load_form.php?formname=newpatient";?>" class="link" target=Main>New Patient Form</a></dd>
  14 <dd><a href="<?echo "$rootdir/patient_file/encounter/load_form.php?formname=sencounter";?>" class="link" target=Main>Small Patient Encounter</a></dd>
  15 <dd><a href="<?echo "$rootdir/patient_file/encounter/load_form.php?formname=reviewofs";?>" class="link" target=Main>Review Of Systems</a></dd>
  16 </dl>
  17 -->
  18 <dl>
  19 <?php //DYNAMIC FORM RETREIVAL
  20 include_once("$srcdir/registry.inc");
  21 function myGetRegistered ( $state="1", $limit="unlimited", $offset="0")
  22 {
  23         $sql = "select category, nickname, name, state, directory, id, sql_run, unpackaged, date from registry where state like \"$state\" order by category,priority";
  24         if ($limit != "unlimited")
  25                 $sql .= " limit $limit, $offset";
  26         $res = sqlStatement($sql);
  27         if ($res)
  28         for($iter=0; $row=sqlFetchArray($res); $iter++)
  29         {
  30                 $all[$iter] = $row;
  31         }
  32         else
  33                 return false;
  34         return $all;
  35 }
  36 $reg = myGetRegistered ();
  37 $old_category = '';
  38 echo "<FORM METHOD=POST NAME='choose'>\n";
  39 if ($reg != false)
  40 foreach ($reg as $entry) {
  41         $new_category = trim($entry['category']);
  42         $new_nickname = trim($entry['nickname']);
  43         if ($new_category == '') {$new_category = 'miscellaneous';}
  44         if ($new_nickname != '') {$nickname = $new_nickname;}
  45         else {$nickname = $entry['name'];}
  46         if ($old_category != $new_category) {
  47                 if ($old_category != '') {echo "</select>\n";}
  48                 echo "<select name=".$new_category." onchange='top.frames[\"Main\"].location.href = document.choose." .$new_category.".options[document.choose." .$new_category.".selectedIndex].value'>\n";
  49                 echo "<option value=".$new_category.">".$new_category."</option>\n";
  50                 echo $new_category.' ';
  51
  52                 echo "<option value='".$rootdir.'/patient_file/encounter/load_form.php?formname='.urlencode($entry['directory'])."'>".$nickname."</option>\n";
  53                 $old_category = $new_category;
  54         }
  55         else {
  56                 echo "<option value='".$rootdir.'/patient_file/encounter/load_form.php?formname='.urlencode($entry['directory'])."'>".$nickname."</option>\n";
  57         }
  58 }
  59 echo "</select>\n";
  60 echo "</FORM>\n";
  61 ?>
  62 </dl>
  63
  64 </body>
  65 </html>