foreach ($records_reports['order'] as $reportID) {
                $relation1 = recordGetRealtionship_2($system, $reportID, $personID, 'report for person');
                foreach ($relation1['order'] as $relID) {
                    $person_age = getFieldValue($relation1, $relID, DT_PERSON_AGE);
                    if ($person_age > 0) {
                        print '<li>' . $person_age . '&nbsp;years of age on&nbsp;' . getFieldValue($records_reports, $reportID, DT_DATE) . '</li>';
                    }
                    $occupation_termid = getFieldValue($relation1, $relID, DT_PERSON_OCCUPATION);
                    if ($occupation_termid > 0) {
                        print '<li>' . getTermById_2($occupation_termid) . '&nbsp;on&nbsp;' . getFieldValue($records_reports, $reportID, DT_DATE) . '</li>';
                    }
                }
            }
            $records_address = recordSearch_2('[{"t":"12"},{"relatedfrom:10":"' . $personID . '"} ]');
            foreach ($records_address['order'] as $addrID) {
                $relation1 = recordGetRealtionship_2($system, $personID, $addrID, 'address for person');
                print '<li>' . getTermById_2(getFieldValue($relation1, 0, DT_RELATION_TYPE)) . ' at <a href="dh_popup.php?db=' . HEURIST_DBNAME . '&full=1&recID=' . $addrID . '">' . getFieldValue($records_address, $addrID, 'rec_Title') . '</a> on ' . composeDates($relation1, 0) . '</li>';
            }
            print '</ul></li>';
        }
        //for persons
    } else {
        echo '<li>Nobody recorded</li>';
    }
    ?>

                    </ul></p>

                <br />

                     <?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 . '&nbsp;' . $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>';
         //type of location
     }