% if ($frame) {
<& /widgets/wrappers/sharky/table_top.mc,
caption => $header,
number => $number
&>
% }
<% $button %>
<% $lang->maketext('UUID') %>:
<% $story->get_uuid %>
<% $lang->maketext('Title') %>:
<% $story->get_title %>
<% $lang->maketext('Story Type') %>:
<% $story->get_element_name %>
<% $lang->maketext('First Published') %>:
<% $story->get_first_publish_date || ' ' %>
<% $lang->maketext('Last Published') %>:
<% $story->get_publish_date || ' ' %>
<% $lang->maketext('URI') %>:
% if ($is_related_story) {
<% $prim_uri %>
% } else {
% if (@ocs == 1) {
<% $m->comp('/widgets/profile/preview_link.mc',
type => 'story',
value => $prim_uri,
doc => $story,
style => 'blackUnderlinedLink') %>
% } else {
<% $prim_uri %>
<% $lang->maketext('Preview in') %>:
<% $oc_select %>
% }
% }
% if ($frame) {
<& /widgets/wrappers/sharky/table_bottom.mc &>
%}
<%args>
$widget
$header => undef
$number => undef
$frame => undef
$button => " "
%args>
<%init>;
my $story = get_state_data($widget, 'asset');
my $cat = $story->get_primary_category;
my $cat_name = $cat ? $cat->get_name : '';
$header ||= 'Story Information';
# see whether we're at the top of the page or not;
# otherwise, we won't show the "Preview in" line
my $is_related_story = $number != 1;
my $id = $story->get_id();
my $prim_uri = $story->get_primary_uri();
# get output channel info
my $at = $story->get_element_type_id;
my $asset_type = Bric::Biz::ElementType->lookup({id => $at});
my @ocs = $story->get_output_channels();
my $primocid = $story->get_primary_oc_id;
my $oc_select = '';
%init>