Repository List / Contenido / utf8 / samples / promosuite / comps / www / text.html @ HEAD

% if ( $m->comp_exists ("/comps/$prj/header.msn") ) {
<& "/comps/$prj/header.msn" &>
% } else {
<& "/comps/header.msn" &>
% }

<table border="0" cellspacing="0" cellpadding="10" width="100%">
<tr valign="top">
<td width="80%">

<div class="mt10"></div>
<a name="members"></a>
<table border="0" cellspacing="0" cellpadding="0" width="100%" class="infoblock">
<tr>
<td class="cc" width="100%">

% if ( $id && ref $document ) {
%       ### Вывод документа
%       #######################################################
%	if ( $m->comp_exists ("/comps/$prj/article.msn") ) {
<& "/comps/$prj/article.msn", document => $document &>
%	} else {
<& "/comps/article.msn", document => $document &>
%	}
% } ### /Область документа

</td></tr>
</table>
</td>

% ### Правая колонка
% ###############################################
<td width="20%">
% if ( $m->comp_exists ("/comps/$prj/right.msn") ) {
<& "/comps/$prj/right.msn" &>
% }else{
<& /comps/right.msn &>
% }
</td>
% ### /Правая колонка

</tr>
</table>

% ### Футер
% ##############################################
% if ( $m->comp_exists ("/comps/$prj/footer.msn") ) {
<& "/comps/$prj/footer.msn" &>
% } else {
<& "/comps/footer.msn" &>
% }
% ### /Футер
<%args>

	$id     => undef

</%args>
<%init>

  &abort404	unless $id;
  &abort404	unless $id =~ /^\d+$/;
  my $prj = $request->{project};
  my $profile = $request->{project_profile};
  my $root = $request->{project_section};

  my $document;
  $document = $keeper->get_document_by_id ($id,
	s	=> $root->id,
#	class	=> 'promosuite::Article',
	class   => 'promosuite::News',
	status	=> 1,
  );
</%init>