#include <lt2001.style>

<page title="Nili Accommodation" subtitle="Nili accommodation">

<?
  function info ($index)
  {
    global $info;

    return strlen ($info[$index])>0?$info[$index]:"&nbsp;";
  }

  $t_head  = "<p><div align=\"center\"><table width=\"99%%\"cellpadding=\"0\" cellspacing=\"0\" summary=\"\">";
  $t_title = "<tr bgcolor=\"%s\"><th><font face=\"Helvetica,Arial\">Name</font></th>"
	                       ."<th><font face=\"Helvetica,Arial\">Wednesday</font></th>"
	                       ."<th><font face=\"Helvetica,Arial\">Thursday</font></th>"
	                       ."<th><font face=\"Helvetica,Arial\">Friday</font></th>"
	                       ."<th><font face=\"Helvetica,Arial\">Saturday</font></th>"
	                       ."<th><font face=\"Helvetica,Arial\">Sunday</font></th>"
	                       ."<th><font face=\"Helvetica,Arial\">Monday</font></th></tr>";
  $t_row   = "<tr bgcolor=\"%s\"><td><font face=\"Helvetica,Arial\">%s</font></td>"
	                       ."<td align=\"center\"><font face=\"Helvetica,Arial\">%s</font></td>"
	                       ."<td align=\"center\"><font face=\"Helvetica,Arial\">%s</font></td>"
	                       ."<td align=\"center\"><font face=\"Helvetica,Arial\">%s</font></td>"
	                       ."<td align=\"center\"><font face=\"Helvetica,Arial\">%s</font></td>"
	                       ."<td align=\"center\"><font face=\"Helvetica,Arial\">%s</font></td>"
	                       ."<td align=\"center\"><font face=\"Helvetica,Arial\">%s</font></td></tr>";

  $t_foot  = "</table></div><p>";

  $dbh = pg_pconnect ("<dbhost>", "<dbport>", "<dbname>")
	       or die("Unable to connect to SQL server");

  pg_exec ($dbh, "SET DateStyle = 'ISO'") or die("Datenbank-Abfrage!");

  $query = "SELECT person.oid,nili.person,nili.date,nili.breakfast,nili.dinner,nili.sleeping "
          ."FROM person,nili "
	  ."WHERE person.name = nili.person AND person.nightplace = 'Nili'";

  if (strlen ($project)) {
    $query .= sprintf (" AND project = '%s'", $project);
    printf ("<p><b>Limit to project</b>: %s<p>", $project);
  }
  $query .= " ORDER BY nili.person";

  $sth = pg_exec ($dbh, $query) or die("Datenbank-Abfrage!");

  if (pg_NumRows ($sth) > 0) {
    echo ($t_head);
    printf ($t_title, "<colh>");

    $color = "<cold>";
    $name='';
    $people=0;
    $dinner = 0;
    $breakfast = 0;
    for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
      $row = pg_fetch_array ($sth, $nr);
      if ($row['person'] != $name) {
        if ($name != '') {
	  $color=$color == "<cold>"?"<coln>" : "<cold>";
	  $link = sprintf ("<a href=\"edit_person.php3?oid=%d\">%s</a>", $oid, $name);
	  printf ($t_row, $color, $link,
		  info('07-04'), info('07-05'), info('07-06'), info('07-07'), info('07-08'), info('07-09'));
	  $info = array ();
	  $people++;
	}
        $name = $row['person'];
        $oid = $row['oid'];
      }

      $date = explode (" ", $row['date']);
      $date = explode ("-", $date[0]);
      $date = sprintf ("%02d-%02d", $date[1], $date[2]);

      $info[$date] = sprintf ("&nbsp;%s&nbsp;%s&nbsp;%s&nbsp;",
			      $row['breakfast']==1?"B":"&nbsp;",
			      $row['dinner']==1?"D":"&nbsp;",
			      $row['sleeping']==1?"S":"&nbsp;");
      $sum["$date-B"] += $row['breakfast'];
      $sum["$date-D"] += $row['dinner'];
      $sum["$date-S"] += $row['sleeping'];

    }
    $color=$color == "<cold>"?"<coln>" : "<cold>";
    $link = sprintf ("<a href=\"edit_person.php3?oid=%d\">%s</a>", $oid, $name);
    printf ($t_row, $color, $link,
	    info('07-04'), info('07-05'), info('07-06'), info('07-07'), info('07-08'), info('07-09'));
    $people++;

    $color=$color == "<cold>"?"<coln>" : "<cold>";
    $link = sprintf ("<b>Sum</b>");
    $day[] = "07-04";
    $day[] = "07-05";
    $day[] = "07-06";
    $day[] = "07-07";
    $day[] = "07-08";
    $day[] = "07-09";
    for ($nr=0; $nr < count ($day); $nr++) {
      $info[$day[$nr]] = sprintf ("&nbsp;%d&nbsp;%d&nbsp;%d&nbsp;", $sum["$day[$nr]-B"], $sum["$day[$nr]-D"], $sum["$day[$nr]-S"]);
      $breakfast += $sum["$day[$nr]-B"];
      $dinner += $sum["$day[$nr]-D"];
    }
    printf ($t_row, $color, $link,
	    info('07-04'), info('07-05'), info('07-06'), info('07-07'), info('07-08'), info('07-09'));

    echo ($t_foot);
  }

printf ("<p>People: %d", $people);
printf ("<br>Breakfast: %d (%5.2f)", $breakfast, $breakfast * 3);
printf ("<br>Dinner: %d (%5.2f)", $dinner, $dinner * 12);
?>

<p>
B = Breakfast<br>
D = Dinner<br>
S = Sleeping<br>


<p>
<form method=get action=nili.php3>
<b>Limit to project</b>: <select name=project><option value="">unlimited<?

  $query = "SELECT DISTINCT name FROM project ORDER BY name";
  $sth = pg_exec ($dbh, $query) or die("Datenbank-Abfrage!");

  if (pg_NumRows ($sth) > 0) {
    for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
      $row = pg_fetch_array ($sth, $nr);
      printf ("<option>%s", $row['name']);
    }
  }
?></select>
<input type=submit value="Redisplay">
</form>

</page>

# Local variables:
# mode: text
# mode: auto-fill
# mode: iso-accents
# end: