[Rt-commit] r5305 - in RT-Extension-TimeWorked: . html/Reports/TimeWorked/Elements lib/RT/Extension

Fri May 26 12:36:57 EDT 2006

Author: alexmv
Date: Fri May 26 12:36:56 2006
New Revision: 5305

Added:
   RT-Extension-TimeWorked/html/Reports/TimeWorked/Elements/Wrapper
Modified:
   RT-Extension-TimeWorked/   (props changed)
   RT-Extension-TimeWorked/MANIFEST
   RT-Extension-TimeWorked/html/Reports/TimeWorked/index.html
   RT-Extension-TimeWorked/lib/RT/Extension/TimeWorked.pm

Log:
 r13316 at zoq-fot-pik:  chmrr | 2006-05-26 12:36:52 -0400
  * Print mode


Modified: RT-Extension-TimeWorked/MANIFEST
==============================================================================

--- RT-Extension-TimeWorked/MANIFEST	(original)
+++ RT-Extension-TimeWorked/MANIFEST	Fri May 26 12:36:56 2006
@@ -3,6 +3,7 @@
 html/Callbacks/TimeWorked/Search/Results.html/SearchActions
 html/Reports/TimeWorked/Elements/MiniPlot
 html/Reports/TimeWorked/Elements/Tabs
+html/Reports/TimeWorked/Elements/Wrapper
 html/Reports/TimeWorked/index.html
 inc/Module/Install.pm
 inc/Module/Install/Base.pm

Added: RT-Extension-TimeWorked/html/Reports/TimeWorked/Elements/Wrapper
==============================================================================
--- (empty file)
+++ RT-Extension-TimeWorked/html/Reports/TimeWorked/Elements/Wrapper	Fri May 26 12:36:56 2006
@@ -0,0 +1,68 @@
+<%args>
+$print => 0
+$title => "Time worked reports"
+</%args>
+% if ($print) {
+
+<html>
+<head>
+<title><&|/l&><% $title %></&></title>
+<link rel="shortcut icon" href="<%$RT::WebImagesURL%>/favicon.png" type="image/png" />
+<link media="all" rel="stylesheet" href="<%$RT::WebPath%>/NoAuth/webrt.css" type="text/css" />
+<link media="print" rel="stylesheet" href="<%$RT::WebPath%>/NoAuth/printrt.css" type="text/css" />
+%# XXX TODO THIS SHOULD NOT BE A TABLE
+<body>
+<table width="100%">
+<tr>
+<td align="left">
+<div id="username">User: <%$session{'CurrentUser'}->Name%></div>
+<div id="reportdate">
+% my $d= RT::Date->new($session{'CurrentUser'}); $d->SetToNow; 
+<%$d->AsString%></div>
+</td>
+<td align="center">
+<h1><&|/l&><% $title%></&></h1>
+</td>
+<td align="right">
+<img src="<%$RT::LogoURL%>" alt="RT Logo"/>
+</td>
+</tr>
+</table>
+<hr/>
+<&|/l&>Report criteria:</&>
+% if ($ARGS{queue}) {
+% my $q = RT::Queue->new($session{'CurrentUser'});
+% $q->Load($ARGS{queue});
+<% $q->Name %> queue
+% } else {
+All queues
+% }
+<hr />
+<%$m->content |n%>
+<hr/>
+</body>
+</html>
+%$m->abort();
+
+% } else {
+
+<& /Elements/Header, Title => loc($title) &>
+<& Tabs,
+    current_subtab => "Reports/TimeWorked/index.html",
+    Title => loc($title) &> 
+<%$m->content |n%>
+
+<form action="index.html" method="POST" enctype="multipart/form-data">
+Queue: <& /Elements/SelectQueue, Name => "queue", Default => $ARGS{queue} &> <br />
+Start date: <input type="text" name="start" value="<% $ARGS{start} %>" /><br />
+End date:   <input type="text" name="end"   value="<% $ARGS{end}   %>" /><br />
+<& /Elements/Submit, Label => loc('Report') &>
+</form>
+
+<div align="right">
+% my %printable_args = %ARGS;
+% $printable_args{'print'} = 1;
+% my $url = "Reports/TimeWorked/index.html?". join(';', map { $_."=".$printable_args{$_} } keys %printable_args);
+<a href="<%$RT::WebPath|n%>/<%$url|n%>"><&|/l&>Printable version</&></a>
+</div>
+% }
\ No newline at end of file

Modified: RT-Extension-TimeWorked/html/Reports/TimeWorked/index.html
==============================================================================
--- RT-Extension-TimeWorked/html/Reports/TimeWorked/index.html	(original)
+++ RT-Extension-TimeWorked/html/Reports/TimeWorked/index.html	Fri May 26 12:36:56 2006
@@ -1,8 +1,4 @@
-<& /Elements/Header, Title => loc("Time worked reports") &>
-<& Elements/Tabs,
-    current_subtab => "Reports/TimeWorked/index.html",
-    Title => loc("Time worked reports") &> 
-
+<&| Elements/Wrapper, %ARGS &>
 % if (defined $queue and defined $start and defined $end) {
 
 <& Elements/MiniPlot, data => \%plot, minor => ["< 24h","24-48h","> 48h"] &>
@@ -100,14 +96,7 @@
 
 
 % }
-
-<form action="index.html" method="POST" enctype="multipart/form-data">
-Queue: <& /Elements/SelectQueue, Name => "queue", Default => $queue &> <br />
-Start date: <input type="text" name="start" value="<% $start %>" /><br />
-End date:   <input type="text" name="end"   value="<% $end   %>" /><br />
-<& /Elements/Submit, Label => loc('Report') &>
-</form>
-
+</&>
 <%args>
 $queue => undef
 $start => undef

Modified: RT-Extension-TimeWorked/lib/RT/Extension/TimeWorked.pm
==============================================================================
--- RT-Extension-TimeWorked/lib/RT/Extension/TimeWorked.pm	(original)
+++ RT-Extension-TimeWorked/lib/RT/Extension/TimeWorked.pm	Fri May 26 12:36:56 2006
@@ -1,3 +1,3 @@
 package RT::Extension::TimeWorked;
 
-our $VERSION = '0.3';
+our $VERSION = '0.4';
