interface/patient_file/encounter/new_form.php

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