* *
* Copyright (C) 2006-2011 by Leif B. Kristensen <*****@*****.**> *
* All rights reserved. For terms of use, see LICENSE.txt *
***************************************************************************/
// This script is basically a report listing events and persons associated
// with a tag. It is accessed from the Tag Manager via the 'report' link.
require "./settings/settings.php";
require "./functions.php";
require_once "./langs/{$language}.php";
$tag = $_GET['tag'];
$tag_name = fetch_val("SELECT get_tag_name({$tag})");
$title = "{$_All} {$_events} {$_of} type {$tag_name}";
require "./header.php";
echo "<div class=\"normal\">\n";
echo "<h2>{$title}</h2>\n";
$handle = pg_query("\n SELECT\n event_id,\n event_name,\n event_date,\n place_name,\n p1,\n p2\n FROM\n tag_events\n WHERE\n tag_fk = {$tag}\n ORDER BY\n event_date,\n event_id\n");
while ($row = pg_fetch_assoc($handle)) {
echo '<p>[' . $row['event_id'] . '] ';
echo $row['event_name'];
echo ' ' . fuzzydate($row['event_date']);
echo ' ' . $row['place_name'] . ': ';
echo list_participants($row['event_id']);
// print source(s)
$innerhandle = pg_query("\n SELECT\n source_text\n FROM\n event_notes\n WHERE\n note_id = " . $row['event_id']);
while ($row = pg_fetch_assoc($innerhandle)) {
echo conc(paren($_Source . ':' . conc(ltrim($row['source_text']))));
}
echo "</p>\n";
}
echo "</div>\n";
include "./footer.php";
echo para(to_url('./forms/linkage_add.php', array('node' => $self), 'Legg til lenke'));
}
}
// *****************************************************************************
// section I: print list of events cited by this source
// *****************************************************************************
if ($props['number_of_events']) {
echo "<h3>{$_Events}:</h3>\n<ol>";
$handle = pg_query("\n SELECT\n e.event_id,\n e.tag_fk,\n e.event_date,\n get_place_name(e.place_fk) AS event_place,\n link_expand(e.event_note) AS event_note,\n get_event_type(e.event_id) AS event_type\n FROM\n events e,\n event_citations s\n WHERE\n e.event_id = s.event_fk\n AND\n s.source_fk = {$self}\n ORDER BY\n get_event_type(e.event_id),\n e.sort_date,\n e.event_id\n ");
while ($row = pg_fetch_assoc($handle)) {
$event = $row['event_id'];
echo '<li>';
echo square_brace($event) . conc(italic(get_tag_name($row['tag_fk']))) . conc(fuzzydate($row['event_date'])) . conc($row['event_place']);
if ($row['event_type'] < 3) {
// event has one or two participants, print names inline
echo conc(list_participants($event), ': ');
}
echo conc($row['event_note'], ': ');
echo ' ' . paren(to_url('./forms/source_event_edit.php', array('event' => $event, 'source' => $self), $_edit) . ' / ' . to_url('./forms/citation_delete.php', array('person' => 0, 'event' => $event, 'source' => $self), $_delete));
if ($row['event_type'] == 3) {
// event has any number of participants, print names as ordered list
$subhandle = pg_query("\n SELECT\n person_fk,\n is_principal,\n sort_order\n FROM\n participants\n WHERE\n event_fk={$event}\n ORDER BY\n sort_order\n ");
echo '<ul>';
while ($subrow = pg_fetch_assoc($subhandle)) {
$participant = $subrow['person_fk'];
$bp = $subrow['is_principal'] == 't' ? ' H ' : ' B ';
echo '<li> ';
// print link to edit sort order
echo to_url('./forms/source_sort_order_edit.php', array('person' => $participant, 'event' => $event, 'node' => $self), square_brace($subrow['sort_order']), 'Edit sort order');
echo $bp . linked_name($participant, './family.php');
// a non-principal, eg a person mentioned as heir in a probate,
