<ul>
<?php
// find related events
$records_events = recordSearch_2('[{"t":"14"},{"related_to:10":"' . $recID . '"} ]');
if (@$records_events['reccount'] > 0) {
foreach ($records_events['order'] as $eventID) {
//get relationship record for related address (or search events with relation at once?)
$term_id = recordGetRealtionshipType($system, $eventID, $recID);
//date and time
$date_out = composeDates($records_events, $eventID, '<b>Date: </b>');
$time_out = composeTime($records_events, $eventID, '<b>Time: </b>');
print '<li><a href="dh_popup.php?db=' . HEURIST_DBNAME . '&full=1&recID=' . $eventID . '">' . getFieldValue($records_events, $eventID, DT_NAME) . '</a> (' . getTermById(getFieldValue($records_events, $eventID, DT_EVENT_TYPE)) . ')';
print '<ul><li>' . $date_out . ' ' . $time_out . '</li>';
//get address of event
$records_address = recordSearch_2('[{"t":"12"},{"relatedfrom:14":"' . $eventID . '"} ]');
foreach ($records_address['order'] as $addrID) {
$relation1 = recordGetRealtionship_2($system, $eventID, $addrID, 'address for event');
// TODO: Remove, enable or explain: $term_id = recordGetRealtionshipType( $system, $recID, $recID );
$event_address = '';
$term_id = getFieldValue($relation1, 0, DT_RELATION_TYPE);
if ($term_id == TERM_MAIN_CRIME_LOCATION) {
$event_address = 'Location: ';
} else {
$event_address = getTermById_2($term_id);
}
$comment = getFieldValue($relation1, 0, DT_EXTENDED_DESCRIPTION);
print '<li>' . $event_address . ' ' . ' <a href="dh_popup.php?db=' . HEURIST_DBNAME . '&full=1&recID=' . $addrID . '">' . getFieldValue($records_address, $addrID, 'rec_Title') . '</a><br/> ' . $comment . '</li>';
}
//for address
print '</ul>';
$records_eventreports = recordSearch_2('[{"t":"15"},{"relatedfrom:14":[{"t":"14"},{"related_to:12":"' . $recID . '"} ] }]');
// Report (15) -> DA Report (13) <- Place Role (16) -> Address
$records_eventreports2 = recordSearch_2('[{"t":"15"},{"linked_to:13:78":[{"t":"13"},{"linkedfrom:16:78":[{"t":"16"},{"linked_to:12:90":"' . $recID . '"} ] }] }] ');
if (count($records_eventreports2['records']) > 0) {
$records_eventreports['records'] = mergeRecordSets($records_eventreports['records'], $records_eventreports2['records']);
$records_eventreports['order'] = array_merge($records_eventreports['order'], array_keys($records_eventreports2['records']));
$records_eventreports['order'] = array_unique($records_eventreports['order']);
}
if (count($records_eventreports['records']) > 0) {
foreach ($records_eventreports['order'] as $repID) {
//getFieldValue($records_eventreports, $repID, DT_ORIGINAL_RECORD_ID)
//find DA Report name
$da_report = '';
$da_repID = getFieldValue($records_eventreports, $repID, DT_REPORT_DALINK);
if ($da_repID > 0) {
$da_report = recordSearch_2('ids:' . $da_repID);
$da_report = getFieldValue($da_report, 0, DT_NAME);
}
?>
<li>
(#<?php
echo $repID . ') <em>' . getFieldValue($records_eventreports, $repID, 'rec_Title') . '</em>. [' . getFieldValue($records_eventreports, $repID, DT_DATE) . ']. ' . getTermById(getFieldValue($records_eventreports, $repID, DT_REPORT_SOURCE_TYPE)) . ' ' . $da_report . ' ' . getFieldValue($records_eventreports, $repID, DT_REPORT_CITATION);
?>
</li>
<?php
}
} else {
echo '<li>None recorded</li>';
}
?>
</ul>
//echo '>1>'.@$_REQUEST['recID'];
$recID = $_REQUEST['recID'];
$ids = $recID;
$need_cnt = 1;
$eventID = @$_REQUEST['eventID'];
if ($eventID) {
$ids = $ids . ',' . $eventID;
$need_cnt++;
}
$addrID = @$_REQUEST['addrID'];
if ($addrID) {
$ids = $ids . ',' . $addrID;
$need_cnt++;
}
//find record and details
$records = recordSearch_2('ids:' . $ids);
if (count(@$records['records']) < $need_cnt) {
echo 'Some records not found ' . $ids . ' ' . print_r($records, true);
return;
}
//these rectypes are specific for digital harlem
define('RT_ADDRESS', 12);
define('RT_EVENT', 14);
define('RT_PLACE_ROLE', 16);
define('DT_EVENT_TYPE', 74);
define('DT_EVENT_TIME_START', 75);
define('DT_EVENT_TIME_END', 76);
define('DT_REPORT_SOURCE_TYPE', 77);
define('DT_REPORT_DALINK', 78);
define('DT_REPORT_CITATION', 79);
define('DT_CHARGE_INITIAL', 80);
