[Koha-cvs] koha koha-tmpl/intranet-tmpl/prog/en/catalogue/... [rel_3_0]
Antoine Farnault
antoine at koha-fr.org
Mon Nov 13 12:14:34 CET 2006
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: Antoine Farnault <toins> 06/11/13 11:14:34
Modified files:
koha-tmpl/intranet-tmpl/prog/en/catalogue: detail.tmpl
Added files:
catalogue : issuehistory.pl
koha-tmpl/intranet-tmpl/prog/en/catalogue: issuehistory.tmpl
Log message:
New script: catalogue/issuehistory.pl.
this script allows to see the issuing list for a given biblio.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/catalogue/issuehistory.pl?cvsroot=koha&only_with_tag=rel_3_0&rev=1.1.2.1
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.4&r2=1.2.2.5
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/intranet-tmpl/prog/en/catalogue/issuehistory.tmpl?cvsroot=koha&only_with_tag=rel_3_0&rev=1.1.2.1
Patches:
Index: koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl
===================================================================
RCS file: /sources/koha/koha/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl,v
retrieving revision 1.2.2.4
retrieving revision 1.2.2.5
diff -u -b -r1.2.2.4 -r1.2.2.5
--- koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl 2 Nov 2006 17:01:14 -0000 1.2.2.4
+++ koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl 13 Nov 2006 11:14:34 -0000 1.2.2.5
@@ -43,6 +43,8 @@
Request
</a>
<!-- /TMPL_IF -->
+
+ <a href="/cgi-bin/koha/catalogue/issuehistory.pl?bib=<!-- TMPL_VAR NAME="biblionumber" -->" >Issue history</a>
</div>
<div id="catalogue_detail_biblio">
<h2>Biblio detail</h2>
Index: catalogue/issuehistory.pl
===================================================================
RCS file: catalogue/issuehistory.pl
diff -N catalogue/issuehistory.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ catalogue/issuehistory.pl 13 Nov 2006 11:14:33 -0000 1.1.2.1
@@ -0,0 +1,53 @@
+#!/usr/bin/perl
+
+# 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., 59 Temple Place,
+# Suite 330, Boston, MA 02111-1307 USA
+
+# $Id: issuehistory.pl,v 1.1.2.1 2006/11/13 11:14:33 toins Exp $
+
+use strict;
+require Exporter;
+use CGI;
+use C4::Auth;
+use C4::Interface::CGI::Output;
+use HTML::Template;
+use C4::Circulation::Circ2; # GetIssuesFromBiblio
+
+my $query=new CGI;
+my ($template, $borrowernumber, $cookie)
+ = get_template_and_user({template_name => "catalogue/issuehistory.tmpl",
+ query => $query,
+ type => "intranet",
+ authnotrequired => 0,
+ flagsrequired => {circulate => 1},
+ });
+
+# getting cgi params.
+my $params = $query->Vars;
+
+my $bib = $params->{'bib'};
+
+my $issues = GetIssuesFromBiblio($bib);
+use Data::Dumper;
+warn "issue=>".Dumper($issues);
+
+$template->param(
+ total => scalar @$issues,
+ title => $issues->[0]->{'title'},
+ author => $issues->[0]->{'author'},
+ issues => $issues
+);
+
+output_html_with_http_headers $query, $cookie, $template->output;
Index: koha-tmpl/intranet-tmpl/prog/en/catalogue/issuehistory.tmpl
===================================================================
RCS file: koha-tmpl/intranet-tmpl/prog/en/catalogue/issuehistory.tmpl
diff -N koha-tmpl/intranet-tmpl/prog/en/catalogue/issuehistory.tmpl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ koha-tmpl/intranet-tmpl/prog/en/catalogue/issuehistory.tmpl 13 Nov 2006 11:14:34 -0000 1.1.2.1
@@ -0,0 +1,141 @@
+<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->Koha -- Catalogue MARC detail<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->
+
+<!-- TMPL_INCLUDE NAME="menus.inc" -->
+<!-- TMPL_INCLUDE NAME="menu-catalogue.inc" -->
+
+ <h1>Issue hitory for <!-- TMPL_VAR NAME="title" --> (<!-- TMPL_VAR NAME="author" -->) </h1>
+ <div id="action">
+ <a href="/cgi-bin/koha/cataloguing/addbiblio.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->&frameworkcode=<!--TMPL_VAR Name="current_framework" -->&op=">
+ Edit biblio
+ </a>
+ <a href="/cgi-bin/koha/cataloguing/addbiblio.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->&frameworkcode=<!--TMPL_VAR Name="current_framework" -->&op=duplicate">
+ Duplicate
+ </a>
+ <a href="/cgi-bin/koha/cataloguing/additem.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->">
+ Edit item
+ </a>
+ <a href="javascript:confirm_deletion()">
+ Delete
+ </a>
+ <a href="/cgi-bin/koha/catalogue/MARCdetail.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->">
+ Complete
+ </a>
+ <a href="#">
+ Normal
+ </a>
+ <a href="/cgi-bin/koha/catalogue/ISBDdetail.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->">
+ ISBD
+ </a>
+ <a href=# onclick="javascript:window.open('/cgi-bin/koha/bookshelves/addbookbybiblionumber.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->','Add_to_bookshelf','width=500,height=400,toolbar=false,scrollbars=yes');">
+ Add to shelf
+ </a>
+ <a href="detailprint.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->">
+ Print
+ </a>
+ <!-- TMPL_IF name="subscriptionsnumber" -->
+ <a href="/cgi-bin/koha/serials/serials-home.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->">
+ Subscription(s)
+ </a>
+ <!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="norequests" -->
+ <!-- TMPL_ELSE -->
+ <a href="/cgi-bin/koha/reserve/request.pl?bib=<!-- TMPL_VAR NAME="biblionumber" -->">
+ Request
+ </a>
+ <!-- /TMPL_IF -->
+
+ <a href="/cgi-bin/koha/catalogue/issuehistory.pl?bib=<!-- TMPL_VAR NAME="biblionumber" -->" >Issue history</a>
+ </div>
+
+<div class="searchresults">
+ <!-- TMPL_IF NAME="issues" -->
+ <br />
+ <b>Has been issued <!-- TMPL_VAR NAME="total" --> times</b>
+ <table>
+ <th>
+ Date
+ </th>
+ <th>
+ Surname
+ </th>
+ <th>
+ Firstname
+ </th>
+ <th>
+ Issuing branch
+ </th>
+ <th>
+ Renew
+ </th>
+ <th>
+ Date due
+ </th>
+ <th>
+ Return date
+ </th>
+ <!-- TMPL_LOOP NAME="issues" -->
+ <tr>
+ <td>
+ <!-- TMPL_IF NAME="timestamp" -->
+ <!-- TMPL_VAR NAME="timestamp" -->
+ <!-- TMPL_ELSE -->
+
+ <!-- /TMPL_IF -->
+ </td>
+ <td>
+ <!-- TMPL_IF NAME="surname" -->
+ <a href="/cgi-bin/koha/members/moremember.pl?bornum=<!-- TMPL_VAR NAME="borrowernumber" -->">
+ <!-- TMPL_VAR NAME="surname" -->
+ </a>
+ <!-- TMPL_ELSE -->
+
+ <!-- /TMPL_IF -->
+ </td>
+ <td>
+ <!-- TMPL_IF NAME="firstname" -->
+ <!-- TMPL_VAR NAME="firstname" -->
+ <!-- TMPL_ELSE -->
+
+ <!-- /TMPL_IF -->
+ </td>
+ <td>
+ <!-- TMPL_IF NAME="issuingbranch" -->
+ <!-- TMPL_VAR NAME="issuingbranch" -->
+ <!-- TMPL_ELSE -->
+
+ <!-- /TMPL_IF -->
+ </td>
+ <td>
+ <!-- TMPL_IF NAME="renewals"-->
+ YES<br />
+ <small>
+ last on: <!-- TMPL_VAR NAME="lastreneweddate" -->
+ </small>
+ <!-- TMPL_ELSE -->
+ NO
+ <!-- /TMPL_IF -->
+ </td>
+ <td>
+ <!-- TMPL_IF NAME="date_due" -->
+ <!-- TMPL_VAR NAME="date_due" -->
+ <!-- TMPL_ELSE -->
+
+ <!-- /TMPL_IF -->
+ </td>
+ <td>
+ <!-- TMPL_IF NAME="returndate" -->
+ <!-- TMPL_VAR NAME="returndate" -->
+ <!-- TMPL_ELSE -->
+
+ <!-- /TMPL_IF -->
+ </td>
+ </tr>
+ <!-- /TMPL_LOOP -->
+ <!-- TMPL_ELSE -->
+ <br />
+ <b><!-- TMPL_VAR NAME="title" -->(<!-- TMPL_VAR NAME="author" -->) has never been issued.</b>
+
+ <!-- /TMPL_IF -->
+</div>
+
+<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->
More information about the Koha-cvs
mailing list