private function AddMetadata(Match $match, XhtmlElement $li)
{
$li->AddCssClass('vevent');
# hCalendar
$li->AddAttribute("typeof", "schema:SportsEvent");
$li->AddAttribute("about", $match->GetLinkedDataUri());
$meta = new XhtmlElement('span');
$meta->SetCssClass('metadata');
# hCalendar end date
if ($match->GetStartTime() and $match->GetIsStartTimeKnown()) {
$end_date = $this->CreateEndDate($match);
$meta->AddControl($end_date);
}
# hCalendar location
if (!is_null($match->GetGround())) {
$ground = new XhtmlElement('span', htmlentities($match->GetGround()->GetNameAndTown(), ENT_QUOTES, "UTF-8", false));
$ground->SetCssClass('location');
$meta->AddControl(' at ');
$meta->AddControl($ground);
}
# hCalendar description
$hcal_desc = new XhtmlElement('span');
$hcal_desc->SetCssClass('description');
$i_seasons = $match->Seasons()->GetCount();
if ($i_seasons) {
$meta->AddControl(' in ');
$seasons = $match->Seasons()->GetItems();
for ($i = 0; $i < $i_seasons; $i++) {
$b_last = ($i > 0 and $i == $i_seasons - 1);
if ($i > 0 and !$b_last) {
$hcal_desc->AddControl(', ');
} elseif ($b_last) {
$hcal_desc->AddControl(' and ');
}
$hcal_desc->AddControl(htmlentities($seasons[$i]->GetCompetitionName(), ENT_QUOTES, "UTF-8", false));
}
}
if (!$match->GetIsStartTimeKnown()) {
$hcal_desc->AddControl('. Start time not known');
}
if ($hcal_desc->CountControls()) {
$meta->AddControl($hcal_desc);
}
# hCalendar timestamp
$meta->AddControl('. At ');
$hcal_stamp = new XhtmlElement('abbr', htmlentities(Date::Time(gmdate('U')), ENT_QUOTES, "UTF-8", false));
$hcal_stamp->SetTitle(Date::Microformat());
$hcal_stamp->SetCssClass('dtstamp');
$meta->AddControl($hcal_stamp);
# hCalendar GUID
$meta->AddControl(' match ');
$hcal_guid = new XhtmlElement('span', htmlentities($match->GetLinkedDataUri(), ENT_QUOTES, "UTF-8", false));
$hcal_guid->SetCssClass('uid');
$meta->AddControl($hcal_guid);
# hCalendar status
$s_status = 'CONFIRMED';
switch ($match->Result()->GetResultType()) {
case MatchResult::CANCELLED:
case MatchResult::POSTPONED:
case MatchResult::AWAY_WIN_BY_FORFEIT:
case MatchResult::HOME_WIN_BY_FORFEIT:
$s_status = 'CANCELLED';
}
$meta->AddControl(' is ');
$status = new XhtmlElement('span', $s_status);
$status->SetCssClass('status');
$meta->AddControl($status);
$meta->AddControl('.');
$li->AddControl($meta);
}
function OnPageLoad()
{
echo '<div class="ground vcard" typeof="schema:Place" about="' . $this->ground->GetLinkedDataUri() . '">';
$o_fn = new XhtmlElement('h1', htmlentities($this->ground->GetNameAndTown(), ENT_QUOTES, "UTF-8", false));
$o_fn->SetCssClass('fn');
$o_fn->AddAttribute("property", "schema:name");
echo $o_fn;
require_once 'xhtml/navigation/tabs.class.php';
$tabs = array('Summary' => '', 'Statistics' => $this->ground->GetStatsNavigateUrl());
echo new Tabs($tabs);
?>
<div class="box tab-box">
<div class="dataFilter"></div>
<div class="box-content">
<?php
$address = new XhtmlElement("div");
$address->AddAttribute("rel", "schema:address");
$address->AddAttribute("resource", $this->ground->GetLinkedDataUri() . "#PostalAddress");
$postal = new PostalAddressControl($this->ground->GetAddress());
$postal->AddAttribute("about", $this->ground->GetLinkedDataUri() . "#PostalAddress");
$address->AddControl($postal);
echo $address;
# Show teams based at this ground
if ($this->ground->Teams()->GetCount()) {
require_once "stoolball/team-list-control.class.php";
echo "<h2>Teams based at this ground</h2>" . new TeamListControl($this->ground->Teams()->GetItems());
}
if (!is_null($this->ground->GetAddress()->GetLatitude()) and !is_null($this->ground->GetAddress()->GetLongitude())) {
$o_geo = new XhtmlElement('div');
$o_geo->SetXhtmlId('geoGround');
$o_geo->AddAttribute("rel", "schema:geo");
$o_geo->AddAttribute("resource", $this->ground->GetLinkedDataUri() . "#geo");
$o_latlong = new XhtmlElement('p');
$o_latlong->SetCssClass('geo');
# geo microformat
$o_latlong->AddAttribute("about", $this->ground->GetLinkedDataUri() . "#geo");
$o_latlong->AddAttribute("typeof", "schema:GeoCoordinates");
$o_latlong->AddControl('Latitude ');
$o_lat = new XhtmlElement('span', (string) $this->ground->GetAddress()->GetLatitude());
$o_lat->SetCssClass('latitude');
# geo microformat
$o_lat->AddAttribute("property", "schema:latitude");
$o_latlong->AddControl($o_lat);
$o_latlong->AddControl('; longitude ');
$o_long = new XhtmlElement('span', (string) $this->ground->GetAddress()->GetLongitude());
$o_long->SetCssClass('longitude');
# geo microformat
$o_long->AddAttribute("property", "schema:longitude");
$o_latlong->AddControl($o_long);
$o_geo->AddControl($o_latlong);
$s_place = '';
$s_class = '';
switch ($this->ground->GetAddress()->GetGeoPrecision()) {
case GeoPrecision::Exact():
$s_place = $this->ground->GetNameAndTown();
$s_class = 'exact';
break;
case GeoPrecision::Postcode():
$s_place = $this->ground->GetAddress()->GetPostcode();
$s_class = 'postcode';
break;
case GeoPrecision::StreetDescriptor():
$s_place = $this->ground->GetAddress()->GetStreetDescriptor() . ', ' . $this->ground->GetAddress()->GetTown();
$s_class = 'street';
break;
case GeoPrecision::Town():
$s_place = $this->ground->GetAddress()->GetTown();
$s_class = 'town';
break;
}
$o_map_link = new XhtmlAnchor('Map of <span class="' . $s_class . '">' . htmlentities($s_place, ENT_QUOTES, "UTF-8", false) . '</span> on Google Maps', 'http://maps.google.co.uk/?z=16&q=' . urlencode($this->ground->GetNameAndTown()) . '@' . $this->ground->GetAddress()->GetLatitude() . ',' . $this->ground->GetAddress()->GetLongitude() . '&ll=' . $this->ground->GetAddress()->GetLatitude() . ',' . $this->ground->GetAddress()->GetLongitude());
$o_map = new XhtmlElement('div', $o_map_link);
$o_geo->AddControl($o_map);
echo $o_geo;
}
if ($this->ground->GetDirections()) {
echo new XhtmlElement('h2', 'Directions');
$s_directions = htmlentities($this->ground->GetDirections(), ENT_QUOTES, "UTF-8", false);
$s_directions = XhtmlMarkup::ApplyCharacterEntities($s_directions);
$s_directions = XhtmlMarkup::ApplyParagraphs($s_directions);
$s_directions = XhtmlMarkup::ApplySimpleTags($s_directions);
echo $s_directions;
}
if ($this->ground->GetParking()) {
echo new XhtmlElement('h2', 'Parking');
$s_parking = htmlentities($this->ground->GetParking(), ENT_QUOTES, "UTF-8", false);
$s_parking = XhtmlMarkup::ApplyCharacterEntities($s_parking);
$s_parking = XhtmlMarkup::ApplyParagraphs($s_parking);
$s_parking = XhtmlMarkup::ApplySimpleTags($s_parking);
$s_parking = XhtmlMarkup::ApplyLinks($s_parking);
echo $s_parking;
}
if ($this->ground->GetFacilities()) {
echo new XhtmlElement('h2', 'Facilities');
$s_facilities = htmlentities($this->ground->GetFacilities(), ENT_QUOTES, "UTF-8", false);
$s_facilities = XhtmlMarkup::ApplyCharacterEntities($s_facilities);
$s_facilities = XhtmlMarkup::ApplyParagraphs($s_facilities);
$s_facilities = XhtmlMarkup::ApplySimpleTags($s_facilities);
$s_facilities = XhtmlMarkup::ApplyLinks($s_facilities);
echo $s_facilities;
}
$o_meta = new XhtmlElement('p');
$o_meta->SetCssClass('metadata');
$o_meta->AddControl('Status: ');
$o_uid = new XhtmlElement('span', $this->ground->GetLinkedDataUri());
$o_uid->SetCssClass('uid');
$o_meta->AddControl($o_uid);
$o_meta->AddControl(' last updated at ');
$o_rev = new XhtmlElement('abbr', Date::BritishDateAndTime($this->ground->GetDateUpdated()));
$o_rev->SetTitle(Date::Microformat($this->ground->GetDateUpdated()));
$o_rev->SetCssClass('rev');
$o_meta->AddControl($o_rev);
$o_meta->AddControl(', sort as ');
$o_url = new XhtmlAnchor(htmlentities($this->ground->GetAddress()->GenerateSortName(), ENT_QUOTES, "UTF-8", false), $this->ground->GetNavigateUrl());
$o_url->SetCssClass('url sort-string');
$o_meta->AddControl($o_url);
echo $o_meta;
echo "</div>";
?>
</div>
</div>
<?php
$this->AddSeparator();
$o_user = new UserEditPanel($this->GetSettings(), 'this ground');
$o_user->AddCssClass("with-tabs");
if (AuthenticationManager::GetUser()->Permissions()->HasPermission(PermissionType::MANAGE_GROUNDS)) {
$o_user->AddLink("edit this ground", $this->ground->GetEditGroundUrl());
$o_user->AddLink("delete this ground", $this->ground->GetDeleteGroundUrl());
}
echo $o_user;
# Show top players
if ($this->has_player_stats) {
require_once 'stoolball/statistics-highlight-table.class.php';
echo new StatisticsHighlightTable($this->best_batting, $this->most_runs, $this->best_bowling, $this->most_wickets, $this->most_catches, "All seasons");
}
}
protected function OnPreRender()
{
/* @var $o_home Team */
/* @var $o_away Team */
/* @var $o_tourney Match */
# Date and tournament
$o_date_para = new XhtmlElement('p');
$o_date = new XhtmlElement('abbr', htmlentities($this->o_match->GetStartTimeFormatted(), ENT_QUOTES, "UTF-8", false));
$o_date->SetTitle(Date::Microformat($this->o_match->GetStartTime()));
# hCalendar
$o_date->SetCssClass('dtstart');
# hCalendar
$o_date->AddAttribute("property", "schema:startDate");
$o_date->AddAttribute("datatype", "xsd:date");
$o_date->AddAttribute("content", Date::Microformat($this->o_match->GetStartTime()));
$o_date_para->AddControl('When: ');
$o_date_para->AddControl($o_date);
# hCalendar end date
if ($this->o_match->GetIsStartTimeKnown()) {
$i_end_time = $this->o_match->GetStartTime() + 60 * 90;
$o_hcal_end = new XhtmlElement('abbr', ' until around ' . htmlentities(Date::Time($i_end_time), ENT_QUOTES, "UTF-8", false));
$o_hcal_end->SetTitle(Date::Microformat($i_end_time));
$o_hcal_end->SetCssClass('metadata dtend');
$o_date_para->AddControl($o_hcal_end);
}
# If we know the time and place, show when the sun sets
# TODO: Assumes UK
if ($this->o_match->GetGround() instanceof Ground and $this->o_match->GetGround()->GetAddress()->GetLatitude() and $this->o_match->GetGround()->GetAddress()->GetLongitude()) {
$o_date_para->AddControl(' <span class="sunset">sunset ' . htmlentities(Date::Time(date_sunset($this->o_match->GetStartTime(), SUNFUNCS_RET_TIMESTAMP, $this->o_match->GetGround()->GetAddress()->GetLatitude(), $this->o_match->GetGround()->GetAddress()->GetLongitude())), ENT_QUOTES, "UTF-8", false) . '</span>');
}
# Display match type/season/tournament
if ($this->o_match->GetMatchType() == MatchType::TOURNAMENT_MATCH) {
$o_date_para->SetCssClass('description');
# hCal
$o_tourney = $this->o_match->GetTournament();
if (is_object($o_tourney)) {
$tournament_link = new XhtmlAnchor(htmlentities($o_tourney->GetTitle(), ENT_QUOTES, "UTF-8", false), $o_tourney->GetNavigateUrl());
$tournament_link->AddAttribute("typeof", "schema:SportsEvent");
$tournament_link->AddAttribute("about", $o_tourney->GetLinkedDataUri());
$tournament_link->AddAttribute("rel", "schema:url");
$tournament_link->AddAttribute("property", "schema:name");
$tournament_container = new XhtmlElement("span", $tournament_link);
$tournament_container->AddAttribute("rel", "schema:superEvent");
# Check for 'the' to get the grammar right
$s_title = strtolower($o_tourney->GetTitle());
if (strlen($s_title) >= 4 and substr($s_title, 0, 4) == 'the ') {
$o_date_para->AddControl(', in ');
} else {
$o_date_para->AddControl(', in the ');
}
$o_date_para->AddControl($tournament_container);
$o_date_para->AddControl('.');
} else {
$o_date_para->AddControl(', in a tournament.');
}
} else {
# hCalendar desc, built up at the same time as the date and league/tournament
$hcal_desc = new XhtmlElement('div', null, 'description');
$this->AddControl($hcal_desc);
$s_detail_xhtml = ucfirst(MatchType::Text($this->o_match->GetMatchType()));
$season_list_xhtml = null;
if ($this->o_match->Seasons()->GetCount() == 1) {
$season = $this->o_match->Seasons()->GetFirst();
$season_name = new XhtmlAnchor(htmlentities($season->GetCompetitionName(), ENT_QUOTES, "UTF-8", false), $season->GetNavigateUrl());
$b_the = !(stristr($season->GetCompetitionName(), 'the ') === 0);
$s_detail_xhtml .= ' in ' . ($b_the ? 'the ' : '') . $season_name->__toString() . '.';
} elseif ($this->o_match->Seasons()->GetCount() > 1) {
$s_detail_xhtml .= ' in the following seasons: ';
$season_list_xhtml = new XhtmlElement('ul');
$seasons = $this->o_match->Seasons()->GetItems();
$total_seasons = count($seasons);
for ($i = 0; $i < $total_seasons; $i++) {
$season = $seasons[$i];
/* @var $season Season */
$season_name = new XhtmlAnchor(htmlentities($season->GetCompetitionName(), ENT_QUOTES, "UTF-8", false), $season->GetNavigateUrl());
$li = new XhtmlElement('li', $season_name);
if ($i < $total_seasons - 2) {
$li->AddControl(new XhtmlElement('span', ', ', 'metadata'));
} else {
if ($i < $total_seasons - 1) {
$li->AddControl(new XhtmlElement('span', ' and ', 'metadata'));
}
}
$season_list_xhtml->AddControl($li);
}
} else {
$s_detail_xhtml .= '.';
}
$hcal_desc->AddControl(new XhtmlElement('p', $s_detail_xhtml));
if (!is_null($season_list_xhtml)) {
$hcal_desc->AddControl($season_list_xhtml);
}
}
# Who
$o_home = $this->o_match->GetHomeTeam();
$o_away = $this->o_match->GetAwayTeam();
$has_home = $o_home instanceof Team;
$has_away = $o_away instanceof Team;
if ($has_home or $has_away) {
$who = new XhtmlElement("p", "Who: ");
if ($has_home) {
$who->AddControl($this->CreateTeamLink($o_home));
}
if ($has_home and $has_away) {
$who->AddControl(" and ");
}
if ($has_away) {
$who->AddControl($this->CreateTeamLink($o_away));
}
$this->AddControl($who);
}
# When
$this->AddControl($o_date_para);
# Ground
$o_ground = $this->o_match->GetGround();
if (is_object($o_ground)) {
$o_ground_link = new XhtmlElement('a', htmlentities($o_ground->GetNameAndTown(), ENT_QUOTES, "UTF-8", false));
$o_ground_link->AddAttribute('href', $o_ground->GetNavigateUrl());
$o_ground_link->SetCssClass('location');
# hCalendar
$o_ground_link->AddAttribute("typeof", "schema:Place");
$o_ground_link->AddAttribute("about", $o_ground->GetLinkedDataUri());
$o_ground_link->AddAttribute("rel", "schema:url");
$o_ground_link->AddAttribute("property", "schema:name");
$o_ground_control = new XhtmlElement('p', 'Where: ');
$o_ground_control->AddAttribute("rel", "schema:location");
$o_ground_control->AddControl($o_ground_link);
$this->AddControl($o_ground_control);
}
# Add result
$o_result = $this->o_match->Result();
$b_result_known = !$o_result->GetResultType() == MatchResult::UNKNOWN;
$toss_known = !is_null($this->o_match->Result()->GetTossWonBy());
$b_batting_order_known = !is_null($this->o_match->Result()->GetHomeBattedFirst());
$has_scorecard_data = ($o_result->HomeBatting()->GetCount() or $o_result->HomeBowling()->GetCount() or $o_result->AwayBatting()->GetCount() or $o_result->AwayBowling()->GetCount() or $o_result->GetHomeRuns() or $o_result->GetHomeWickets() or $o_result->GetAwayRuns() or $o_result->GetAwayWickets());
$has_player_of_match = $this->o_match->Result()->GetPlayerOfTheMatch() instanceof Player and $this->o_match->Result()->GetPlayerOfTheMatch()->GetName();
$has_player_of_match_home = $this->o_match->Result()->GetPlayerOfTheMatchHome() instanceof Player and $this->o_match->Result()->GetPlayerOfTheMatchHome()->GetName();
$has_player_of_match_away = $this->o_match->Result()->GetPlayerOfTheMatchAway() instanceof Player and $this->o_match->Result()->GetPlayerOfTheMatchAway()->GetName();
if ($b_result_known or $b_batting_order_known or $has_scorecard_data) {
# Put result in header, so long as we have something to put after it. Otherwise put the result after it.
$result_header = "Result";
if ($b_result_known and ($b_batting_order_known or $has_scorecard_data)) {
$result_header .= ": " . $this->o_match->GetResultDescription();
}
$result_header = new XhtmlElement('h2', htmlentities($result_header, ENT_QUOTES, "UTF-8", false));
if ($has_scorecard_data) {
$result_header->AddCssClass("hasScorecard");
}
$this->AddControl($result_header);
}
if ($toss_known) {
$toss_team = $this->o_match->Result()->GetTossWonBy() === TeamRole::Home() ? $this->o_match->GetHomeTeam() : $this->o_match->GetAwayTeam();
if ($toss_team instanceof Team) {
$toss_text = $toss_team->GetName() . " won the toss";
if ($b_batting_order_known) {
$chose_to = ($this->o_match->Result()->GetTossWonBy() === TeamRole::Home()) == $this->o_match->Result()->GetHomeBattedFirst() ? "bat" : "bowl";
$toss_text .= " and chose to " . $chose_to;
}
$this->AddControl("<p>" . Html::Encode($toss_text) . '.</p>');
}
}
# If at least one player recorded, create a container for the schema.org metadata
if ($has_scorecard_data or $has_player_of_match or $has_player_of_match_home or $has_player_of_match_away) {
$this->AddControl('<div rel="schema:performers">');
}
if ($has_scorecard_data) {
$this->CreateScorecard($this->o_match);
} else {
# Got to be just result and batting order now. Only include result if batting order's not there, otherwise result will already be in header.
if ($b_result_known and !$b_batting_order_known) {
$this->AddControl(new XhtmlElement('p', htmlentities($this->o_match->GetResultDescription(), ENT_QUOTES, "UTF-8", false) . '.'));
}
if ($b_batting_order_known) {
$this->AddControl(new XhtmlElement('p', htmlentities(($this->o_match->Result()->GetHomeBattedFirst() ? $o_home->GetName() : $o_away->GetName()) . ' batted first.'), ENT_QUOTES, "UTF-8", false));
}
}
# Player of the match
if ($has_player_of_match) {
$player = $this->o_match->Result()->GetPlayerOfTheMatch();
$team = $player->Team()->GetId() == $o_home->GetId() ? $o_home->GetName() : $o_away->GetName();
$player_of_match = new XhtmlElement('p', 'Player of the match: <a property="schema:name" rel="schema:url" href="' . htmlentities($player->GetPlayerUrl(), ENT_QUOTES, "UTF-8", false) . '">' . htmlentities($player->GetName(), ENT_QUOTES, "UTF-8", false) . "</a> ({$team})");
$player_of_match->AddAttribute("typeof", "schema:Person");
$player_of_match->AddAttribute("about", $player->GetLinkedDataUri());
$this->AddControl($player_of_match);
}
if ($has_player_of_match_home) {
$player = $this->o_match->Result()->GetPlayerOfTheMatchHome();
$player_of_match = new XhtmlElement('p', $o_home->GetName() . ' player of the match: <a property="schema:name" rel="schema:url" href="' . htmlentities($player->GetPlayerUrl(), ENT_QUOTES, "UTF-8", false) . '">' . htmlentities($player->GetName(), ENT_QUOTES, "UTF-8", false) . "</a>");
$player_of_match->AddAttribute("typeof", "schema:Person");
$player_of_match->AddAttribute("about", $player->GetLinkedDataUri());
$this->AddControl($player_of_match);
}
if ($has_player_of_match_away) {
$player = $this->o_match->Result()->GetPlayerOfTheMatchAway();
$player_of_match = new XhtmlElement('p', $o_away->GetName() . ' player of the match: <a property="schema:name" rel="schema:url" href="' . htmlentities($player->GetPlayerUrl(), ENT_QUOTES, "UTF-8", false) . '">' . htmlentities($player->GetName(), ENT_QUOTES, "UTF-8", false) . "</a>");
$player_of_match->AddAttribute("typeof", "schema:Person");
$player_of_match->AddAttribute("about", $player->GetLinkedDataUri());
$this->AddControl($player_of_match);
}
# End container for the schema.org metadata
if ($has_scorecard_data or $has_player_of_match or $has_player_of_match_home or $has_player_of_match_away) {
$this->AddControl('</div>');
}
# Add notes
if ($this->o_match->GetNotes()) {
$this->AddControl(new XhtmlElement('h2', 'Notes'));
$s_notes = htmlentities($this->o_match->GetNotes(), ENT_QUOTES, "UTF-8", false);
$s_notes = XhtmlMarkup::ApplyCharacterEntities($s_notes);
require_once 'email/email-address-protector.class.php';
$protector = new EmailAddressProtector($this->o_settings);
$s_notes = $protector->ApplyEmailProtection($s_notes, AuthenticationManager::GetUser()->IsSignedIn());
$s_notes = XhtmlMarkup::ApplyHeadings($s_notes);
$s_notes = XhtmlMarkup::ApplyParagraphs($s_notes);
$s_notes = XhtmlMarkup::ApplyLists($s_notes);
$s_notes = XhtmlMarkup::ApplySimpleTags($s_notes);
$s_notes = XhtmlMarkup::ApplyLinks($s_notes);
if (strpos($s_notes, '<p>') > -1) {
$this->AddControl($s_notes);
} else {
$this->AddControl(new XhtmlElement('p', $s_notes));
}
}
# hCalendar metadata
$o_hcal_para = new XhtmlElement('p');
$o_hcal_para->SetCssClass('metadata');
$this->AddControl($o_hcal_para);
# hCalendar timestamp
$o_hcal_para->AddControl('Status: At ');
$o_hcal_stamp = new XhtmlElement('abbr', htmlentities(Date::Time(gmdate('U')), ENT_QUOTES, "UTF-8", false));
$o_hcal_stamp->SetTitle(Date::Microformat());
$o_hcal_stamp->SetCssClass('dtstamp');
$o_hcal_para->AddControl($o_hcal_stamp);
# hCalendar GUID
$o_hcal_para->AddControl(' match ');
$o_hcal_guid = new XhtmlElement('span', htmlentities($this->o_match->GetLinkedDataUri(), ENT_QUOTES, "UTF-8", false));
$o_hcal_guid->SetCssClass('uid');
$o_hcal_para->AddControl($o_hcal_guid);
# work out hCalendar status
$s_status = 'CONFIRMED';
switch ($this->o_match->Result()->GetResultType()) {
case MatchResult::CANCELLED:
case MatchResult::POSTPONED:
case MatchResult::AWAY_WIN_BY_FORFEIT:
case MatchResult::HOME_WIN_BY_FORFEIT:
$s_status = 'CANCELLED';
}
# hCalendar URL and status
$o_hcal_para->AddControl(' is ');
$o_hcal_url = new XhtmlAnchor($s_status, 'http://' . $_SERVER['HTTP_HOST'] . $this->o_match->GetNavigateUrl());
$o_hcal_url->SetCssClass('url status');
$o_hcal_para->AddControl($o_hcal_url);
}
