Gidday all,
We are dealing with content reuse by creating those pieces of content to be reused as ssi files.
Using our content dct then when an author is creating a page he either chooses to select one of the shared pieces of content or cut and pastes into a visual format box.
If they choose to use a piece of shared content, I have created an edit button next to it, so they may also edit it if they desire.
<item name="useShared">
<label>Browse for shared content</label>
<description>This field allows you to browse for shared content to be included in the page.</description>
<select required="t">
<option value="none" label="none" selected="t" />
<inline command="/web/Interwoven/TeamSite/iw-perl/bin/iwperl /web/Interwoven/TeamSite/custom/bin/temp_stagingbrowse.ipl" />
<callout url="/iw-bin/editdcr.cgi/default/main/" label="Edit" window-features="width=640, height=60,resizable=yes,toolbar=no,scrollbars=yes"/>
</select>
</item>
Is there a better way to do the redirect see (code below)
Any help appreciated.
Regards
Colin
#!/web/Interwoven/TeamSite/iw-perl/bin/iwperl
#-----------------------------------------------------------------------------
use TeamSite::CGI_lite;
use TeamSite::Config;
$|=1;
my $cgi = TeamSite::CGI_lite->new();
$cgi->parse_data();
my $form_name = $cgi->{'form'}{'iw_form_name'};
my $element_name = $cgi->{'form'}{'iw_callback_var'};
my $user_name = $cgi->{'form'}{'user_name'};
my $item_name = $cgi->{'form'}{'iw_item_name'};
my $item_description = $cgi->{'form'}{'iw_item_description'};
my $area_path = $cgi->{'form'}{'area_path'};
my $dcr_name = $cgi->{'form'}{'iw_object_name'};
my $item_value = $cgi->{'form'}{'iw_item_value'};
my $waName = $area_path;
$waName =~ s|^.*WORKAREA/(.*)$|$1|;
my $dcrPath = $item_value;
$dcrPath =~ s|/iwmnt||;
$dcrPath =~ s|^(.*)/STAGING/(.*)$|$1/WORKAREA/$waName/$2|;
my $cmd = qq[
http://teamsite.detir.qld.gov.au/iw-cc/edit?vpath=$dcrPath];# print "Content-type:text/html\n\n";
print <<"EndResponse";
Status: 302 Redirected
Content-type: text/html
Location: $cmd
<HTML><HEAD>
<TITLE>Client Redirected</TITLE>
<META HTTP-EQUIV="Refresh" CONTENT="1; URL=$cmd">
</HEAD><BODY>
The CGI script has redirected your browser to <A HREF="$cmd">this location</A>.
</BODY></HTML>
EndResponse
exit 0;
