interface/vektis/vk_list.php

   1 <?php
   2 /**
   3  * VEKTIS
   4  *
   5  * @author Cristian NAVALICI
   6  * @version 1.0 feb 2008
   7  *
   8  */
   9
  10 require_once("../globals.php");
  11 require_once("$srcdir/acl.inc");
  12 ?>
  13
  14 <html>
  15 <head><title>DBC List ready for Vektis</title>
  16 <link rel=stylesheet href='<?php echo $css_header ?>' type='text/css'>
  17 <meta http-equiv="Content-type" content="text/html; charset=utf-8" />
  18 </head>
  19
  20 <body <?php echo $top_bg_line;?>>
  21
  22 <a href="<?php echo $_SERVER['HTTP_REFERER'];?>" target="Main">Terug</a>
  23 <?php
  24     $vkready = vk_vektis_ready();
  25     if ( $vkready ) {
  26         echo '<table><tr><th>DBC id</th><th>Patient</th><th>Open date</th><th>Close date</th></tr>';
  27         foreach ( $vkready as $vk ) {
  28             $str = '<tr>';
  29             $str .= "<td>{$vk['ax_id']}</td>";
  30                 $pid = what_patient($vk['ax_id']);
  31                 $name = dutch_name($pid);
  32             $str .= "<td>$name (PID: $pid)</td>";
  33             $str .= "<td>{$vk['ax_odate']}</td>";
  34             $str .= "<td>{$vk['ax_cdate']}</td>";
  35             $str .= '</tr>';
  36             echo $str;
  37         }
  38         echo '</table>';
  39     } else {
  40         echo '<p>No list to display.</p>';
  41     }
  42 ?>
  43 </body>
  44 </html>