Attachment #18039 for bug #9965

View | Details | Raw Unified | Return to bug 9965
Collapse All | Expand All




   <div id="bd">
    <div id="yui-main">

	<div class="yui-gb">
	<h1>Reports</h1>
    <div class="yui-u first"><h2>Guided reports</h2>
	<ul>

		<li><a href="/cgi-bin/koha/reports/reserves_stats.pl">Holds</a></li>
      </ul>

        [% IF UseKohaPlugins %]
        <h2>Report Plugins</h2>
        <ul>
                <li><a href="/cgi-bin/koha/plugins/plugins-home.pl?method=report">Report Plugins</a></li>
        </ul>
        [% END %]

    </div>

    <div class="yui-u"><h2>Top lists</h2>

        <li><a href="http://wiki.koha-community.org/wiki/SQL_Reports_Library" target="blank">Koha reports library</a></li>
        <!--<li><a href="/cgi-bin/koha/reports/stats.screen.pl">Till reconciliation</a></li> -->
	</ul></div>


    [% IF UseKohaPlugins && CAN_user_plugins_report %]
        <div class="yui-u">
            <h2>Other reports</h2>

            <ul>
                [% FOREACH plugin IN plugins %]
                    <li><a href="/cgi-bin/koha/plugins/run.pl?class=[% plugin.class %]&method=report">[% plugin.metadata.name %]</a></li>
                [% END %]
            </ul>	
        
        </div>
    [% END %]
</div>

</div>




# with Koha; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.


use strict;

#use warnings; FIXME - Bug 2505
use CGI;
use C4::Auth;
use C4::Output;
use C4::Context;
use Koha::Plugins;

my $query = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
    {   template_name   => "reports/reports-home.tmpl",
        query           => $query,
        type            => "intranet",
        authnotrequired => 0,
        flagsrequired   => { reports => '*' },
        debug           => 1,
    }
);
$template->param(
    intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"),
    intranetstylesheet      => C4::Context->preference("intranetstylesheet"),
    IntranetNav             => C4::Context->preference("IntranetNav"),
);

my $plugins_enabled = C4::Context->preference('UseKohaPlugins') && C4::Context->config("enable_plugins");
if ($plugins_enabled) {
    my @plugins = Koha::Plugins->new()->GetPlugins('report');
    $template->param( plugins => \@plugins, );
}

output_html_with_http_headers $query, $cookie, $template->output;
- 

Return to bug 9965

Lines 12-18 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/reports-home.tt (-8 / +15 lines)
12	<div id="bd">	12	<div id="bd">
13	<div id="yui-main">	13	<div id="yui-main">
14		14
15	<div class="yui-g">	15	<div class="yui-gb">
16	<h1>Reports</h1>	16	<h1>Reports</h1>
17	<div class="yui-u first"><h2>Guided reports</h2>	17	<div class="yui-u first"><h2>Guided reports</h2>
18	<ul>	18	<ul>
Lines 37-49 Link Here
37	<li><a href="/cgi-bin/koha/reports/reserves_stats.pl">Holds</a></li>	37	<li><a href="/cgi-bin/koha/reports/reserves_stats.pl">Holds</a></li>
38	</ul>	38	</ul>
39		39
40	[% IF UseKohaPlugins %]
41	<h2>Report Plugins</h2>
42	<ul>
43	<li><a href="/cgi-bin/koha/plugins/plugins-home.pl?method=report">Report Plugins</a></li>
44	</ul>
45	[% END %]
46
47	</div>	40	</div>
48		41
49	<div class="yui-u"><h2>Top lists</h2>	42	<div class="yui-u"><h2>Top lists</h2>
Lines 67-72 Link Here
67	<li><a href="http://wiki.koha-community.org/wiki/SQL_Reports_Library" target="blank">Koha reports library</a></li>	60	<li><a href="http://wiki.koha-community.org/wiki/SQL_Reports_Library" target="blank">Koha reports library</a></li>
68	<!--<li><a href="/cgi-bin/koha/reports/stats.screen.pl">Till reconciliation</a></li> -->	61	<!--<li><a href="/cgi-bin/koha/reports/stats.screen.pl">Till reconciliation</a></li> -->
69	</ul></div>	62	</ul></div>
		63
		64
		65	[% IF UseKohaPlugins && CAN_user_plugins_report %]
		66	<div class="yui-u">
		67	<h2>Other reports</h2>
		68
		69	<ul>
		70	[% FOREACH plugin IN plugins %]
		71	<li><a href="/cgi-bin/koha/plugins/run.pl?class=[% plugin.class %]&method=report">[% plugin.metadata.name %]</a></li>
		72	[% END %]
		73	</ul>
		74
		75	</div>
		76	[% END %]
70	</div>	77	</div>
71		78
72	</div>	79	</div>

Lines 17-42 Link Here

(-)a/reports/reports-home.pl (-15 / +23 lines)
17	# with Koha; if not, write to the Free Software Foundation, Inc.,	17	# with Koha; if not, write to the Free Software Foundation, Inc.,
18	# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.	18	# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19		19
20
21	use strict;	20	use strict;
		21
22	#use warnings; FIXME - Bug 2505	22	#use warnings; FIXME - Bug 2505
23	use CGI;	23	use CGI;
24	use C4::Auth;	24	use C4::Auth;
25	use C4::Output;	25	use C4::Output;
26	use C4::Context;	26	use C4::Context;
27		27	use Koha::Plugins;
28		28
29	my $query = new CGI;	29	my $query = new CGI;
30	my ($template, $loggedinuser, $cookie)	30	my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
31	= get_template_and_user({template_name => "reports/reports-home.tmpl",	31	{ template_name => "reports/reports-home.tmpl",
32	query => $query,	32	query => $query,
33	type => "intranet",	33	type => "intranet",
34	authnotrequired => 0,	34	authnotrequired => 0,
35	flagsrequired => {reports => '*'},	35	flagsrequired => { reports => '*' },
36	debug => 1,	36	debug => 1,
37	});	37	}
38	$template->param(intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"),	38	);
39	intranetstylesheet => C4::Context->preference("intranetstylesheet"),	39	$template->param(
40	IntranetNav => C4::Context->preference("IntranetNav"),	40	intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"),
41	);	41	intranetstylesheet => C4::Context->preference("intranetstylesheet"),
		42	IntranetNav => C4::Context->preference("IntranetNav"),
		43	);
		44
		45	my $plugins_enabled = C4::Context->preference('UseKohaPlugins') && C4::Context->config("enable_plugins");
		46	if ($plugins_enabled) {
		47	my @plugins = Koha::Plugins->new()->GetPlugins('report');
		48	$template->param( plugins => \@plugins, );
		49	}
		50
42	output_html_with_http_headers $query, $cookie, $template->output;	51	output_html_with_http_headers $query, $cookie, $template->output;
43	-