#!/usr/bin/perl

# Copyright 2000-2002 Katipo Communications

#

# This file is part of Koha.

#

# Koha is free software; you can redistribute it and/or modify it under the

# terms of the GNU General Public License as published by the Free Software

# Foundation; either version 2 of the License, or (at your option) any later

# version.

#

# Koha is distributed in the hope that it will be useful, but WITHOUT ANY

# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR

# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.

#

# You should have received a copy of the GNU General Public License along

# 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::Output;

use C4::Context;

use C4::Auth;

use C4::Output;

use C4::Koha;

sub plugin_parameters {

my ($dbh,$record,$tagslib,$i,$tabloop) = @_;

return "";

}

sub plugin_javascript {

my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;

my $function_name= "328".(int(rand(100000))+1);

my $res="

<script type=\"text/javascript\">

//<![CDATA[

function Focus$function_name(subfield_managed) {

return 1;

}

function Blur$function_name(subfield_managed) {

	return 1;

}

function Clic$function_name(i) {

	defaultvalue=document.f.field_value[i].value;

	newin=window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=labs_theses.pl&cat_auth=LABTHE&index=\"+i+\"&result=\"+defaultvalue,\"tag_editor\",'width=700,height=700,toolbar=false,scrollbars=yes');

}

//]]>

</script>

";

return ($function_name,$res);

}

sub plugin {

	my ($input) = @_;

	my $dbh=C4::Context->dbh;

	my $query = new CGI;

	my $op = $query->param('op');

	my $cat_auth=$query->param('cat_auth');

	my $startfrom=$query->param('startfrom');

	$startfrom=0 if(!defined $startfrom);

	my ($template, $loggedinuser, $cookie);

	my $resultsperpage;

	my $search = $query->param('search');

	if ($op eq "do_search") {

		$resultsperpage= $query->param('resultsperpage');

		$resultsperpage = 19 if(!defined $resultsperpage);

# 		my $upperlimit=$startfrom+$resultsperpage;

		# builds tag and subfield arrays

		my $strquery = "SELECT authorised_value, lib from authorised_values where category = ? and lib like ?";

# 		$strquery .= " LIMIT $startfrom,$upperlimit";

		$search=~s/\*/%/g;

		my $sth = $dbh->prepare($strquery);

		$sth->execute($cat_auth,$search);

		$search=~s/%/\*/g;

		my @results;

		my $total;

		while (my $data = $sth->fetchrow_hashref){

			my $libjs=$data->{'lib'};

			$libjs=~s#\'#\\\'#g;

			my $authjs=$data->{'authorised_value'};

			$authjs=~s#\'#\\\'#g;

			push @results, {'libjs'=>$libjs,

							'lib'=>$data->{'lib'},

							'authjs'=>$authjs,

							'auth_value'=>$data->{'authorised_value'}}

							unless (($total<$startfrom) or ($total>$startfrom+$resultsperpage));

			$total++;

		}

        ($template, $loggedinuser, $cookie) = get_template_and_user(

            {

                template_name   => "value_builder/labs_theses.tt",

                query           => $query,

                type            => 'intranet',

                authnotrequired => 0,

                debug           => 1,

            }

        );

		# multi page display gestion

		my $displaynext=0;

		my $displayprev=$startfrom;

		if(($total - (($startfrom+1)*($resultsperpage))) > 0 ){

			$displaynext = 1;

		}

		my @numbers = ();

		if ($total>$resultsperpage)

		{

			for (my $i=1; (($i<$total/$resultsperpage+1) && ($i<16)); $i++)

			{

					my $highlight=0;

					($startfrom==($i-1)) && ($highlight=1);

					push @numbers, { number => $i,

						highlight => $highlight ,

						search=> $search,

						startfrom => $resultsperpage*($i-1)};

			}

		}

		my $from = $startfrom+1;

		my $to;

		if($total < (($startfrom+1)*$resultsperpage))

		{

			$to = $total;

		} else {

			$to = (($startfrom+1)*$resultsperpage);

		}

 		$template->param(catresult => \@results,

 						cat_auth=>$cat_auth,

 						index => $query->param('index')."",

 								startfrom=> $startfrom,

								displaynext=> $displaynext,

								displayprev=> $displayprev,

								resultsperpage => $resultsperpage,

								startfromnext => $startfrom+$resultsperpage,

								startfromprev => $startfrom-$resultsperpage,

								search=>$search,

								total=>$total,

								from=>$from,

								to=>$to,

								numbers=>\@numbers,

								resultlist=>1

								);

	} else {

        ($template, $loggedinuser, $cookie) = get_template_and_user(

            {

                template_name   => "value_builder/labs_theses.tt",

                query           => $query,

                type            => "intranet",

                authnotrequired => 0,

            }

        );

		$template->param(

						'search'=>$query->param('search'),

		);

		$template->param(

						'index'=>''.$query->param('index')

		) if ($query->param('index'));

		$template->param(

 						'cat_auth'=>$cat_auth

		) if ($cat_auth);

	}

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

}

1;

[% INCLUDE 'doc-head-open.inc' %]

<title>Koha &rsaquo; Labs thesis selection plugin</title>

[% INCLUDE 'doc-head-close.inc' %]

<script type="text/javascript">

//<![CDATA[

function openWindow(targeturl, windowname) {

	newwin =

window.open(targeturl,windowname,"height=480,width=640,scrollbars,resizable")

}

function Help() {

	newin=window.open("/cgi-bin/koha/help.pl","KohaHelp",'width=600,height=600,toolbar=false,scrollbars=yes');

}

//]]>

</script>

<link rel="stylesheet" type="text/css" href="/intranet-tmpl/default/en/includes/common-style.css" />

<style type="text/css">

.catalogue {

	background-color:#ad11ad;

	color:#FFFFFF;

	background-image:none;

	text-decoration: normal;

	}

a.catalogue:hover {

	background-color: #ad11ad;

	color: #FFFFFF;

	text-decoration: none;

	}

</style>

</head>

<body id="cat_labs_theses" class="cat" style="padding:1em;">

<div id="mainbloc">

    <h1>Laboratory search</h1>

	<form name="f" method="post" action="/cgi-bin/koha/cataloguing/plugin_launcher.pl">

		<div class="bloc25">

			<h2>Search on</h2>

			<p>

				<input type="hidden" name="plugin_name" value="labs_theses.pl">

				<input type="hidden" name="index" value="[% index %]">

				<input type="hidden" name="result" value="unimarc field 328 [% index %]">

				<input type="hidden" name="op" value="do_search">

				<input type="hidden" name="cat_auth" value="[% cat_auth %]" >

				<input type="text" name="search" value="[% search %]" size="35">

				<input type="submit" value="Start search" class="button">

			</p>

		</div>

	</form>

[% IF ( resultlist ) %]

	<div class="bloc25">

    <h2>Laboratory search results</h2>

		<div id="resultnumber">

			<p class="resultcount">

			[% IF ( total ) %]

					Results [% from %] to [% to %] of [% total %][% ELSE %]No results found

			[% END %]

			</p>

		</div>

		<div id="resultlist">

			<table>

				<tr>

					<th>Laboratory</th>

					<th>Select</th>

				</tr>

				[% FOREACH catresul IN catresult %]

					[% IF ( catresul.even ) %]

					<tr class="hilighted">

					[% ELSE %]

					<tr>

					[% END %]

						<td>

						[% catresul.lib %]

						</td>

						<td>

							<a  href="javascript:SelectEntry('[% catresul.libjs |url %]','[% catresul.authjs |url %]',[% catresul.index |url %],0)" class="button">Select</a>

							<a  href="javascript:SelectEntry('[% catresul.libjs |url %]','[% catresul.authjs |url %]',[% catresul.index |url %],1)" class="button">Sel&amp;close</a>

						</td>

					</tr>

				[% END %]

			</table>

		</div>

		<div id="resultnumber">

			<p>[% IF ( displayprev ) %] 

					<a class="resultnumber" href="/cgi-bin/koha/cataloguing/plugin_launcher.pl?plugin_name=labs_theses.pl&amp;startfrom=[% startfromprev %]&amp;cat_auth=[% cat_auth |url %]&amp;search=[% search |url %]&amp;resultsperpage=[% resultsperpage %]&amp;type=intranet&amp;op=do_search&amp;index=[% anindex %]">&lt;&lt; Previous</a>

				[% END %]

				[% FOREACH number IN numbers %]

					[% IF ( number.highlight ) %]

						<span class="highlight">[% number.number %]</span>

					[% ELSE %] 

						<a class="resultnumber" href="/cgi-bin/koha/cataloguing/plugin_launcher.pl?plugin_name=labs_theses.pl&amp;startfrom=[% number.startfrom %]&amp;cat_auth=[% number.cat_auth |url %]&amp;search=[% number.search |url %]&amp;resultsperpage=[% number.resultsperpage %]&amp;type=intranet&amp;op=do_search&amp;index=[% number.anindex %]">[% number.number %]</a>

					[% END %]

				[% END %] 

				[% IF ( displaynext ) %]

					<a class="resultnumber" href="/cgi-bin/koha/cataloguing/plugin_launcher.pl?plugin_name=labs_theses.pl&amp;startfrom=[% startfromnext %]&amp;cat_auth=[% cat_auth |url %]&amp;search=[% search %]&amp;resultsperpage=[% resultsperpage %]&amp;type=intranet&amp;op=do_search&amp;index=[% anindex %]">Next&gt;&gt;</a>

				[% END %]

			</p>

			<p class="resultcount">

			[% IF ( total ) %]

					Results [% from %] to [% to %] of [% total %][% ELSE %]No results found

			[% END %]

			</p>

		</div>

	<script language="JavaScript" type="text/javascript">

	function SelectEntry(myentry, mycode, myindex, wclose){

		if (opener.document.f.field_value[myindex].value!=""){ 

			opener.document.f.field_value[myindex].value=opener.document.f.field_value[myindex].value+"|"+myentry

		} else {

			opener.document.f.field_value[myindex].value=myentry

		}

		if (wclose == 1) {

	// 	alert("closing")

			self.close();

		}

	}

	</script>

	</div>

[% END %]

</div>

[% INCLUDE 'popup-bottom.inc' %]

-