From 70501283b32ebbfc64822be9ae431c4bd3ea2104 Mon Sep 17 00:00:00 2001 From: tipaul Date: Fri, 9 Mar 2007 14:41:32 +0000 Subject: [PATCH] rel_3_0 moved to HEAD --- C4/Calendar/Calendar.pm | 578 ----- C4/Format.pm | 232 --- C4/Interface/CGI/Output.pm | 49 +- acqui/select-late.pl | 102 - admin/biblios_framework.pl | 177 -- admin/biblios_subfields_structure.pl | 467 ----- admin/bibliostagstructure.pl | 397 ---- admin/holdings_subfields_structure.pl | 458 ---- admin/holdingstagstructure.pl | 366 ---- admin/institutions-careers.pl | 74 - admin/koha-electronic.pl | 102 - admin/koha-news.pl | 95 - admin/koha_attr.pl | 321 --- admin/stopwords.pl | 171 -- admin/viewlog.pl | 148 -- barcodes/create_labels_conf_table.sql | 44 - catalogue/catalogue-search.pl | 268 --- cataloguing/isbnsearch.pl | 190 -- circ/renewscript.pl | 70 - circ/rescirculation.pl | 460 ---- circ/resreturns.pl | 478 ----- koha-tmpl/errors/400.pl | 5 +- koha-tmpl/errors/401.pl | 5 +- koha-tmpl/errors/402.pl | 5 +- koha-tmpl/errors/403.pl | 5 +- koha-tmpl/errors/404.pl | 5 +- koha-tmpl/errors/500.pl | 5 +- koha-tmpl/intranet-tmpl/prog/en/about.tmpl | 52 +- .../prog/en/acqui/acqui-home.tmpl | 174 +- .../intranet-tmpl/prog/en/acqui/basket.tmpl | 277 ++- .../prog/en/acqui/booksellers.tmpl | 58 +- .../prog/en/acqui/histsearch.tmpl | 8 +- .../prog/en/acqui/lateorders.tmpl | 41 +- .../prog/en/acqui/neworderempty.tmpl | 465 +++-- .../prog/en/acqui/newordersuggestion.tmpl | 113 +- .../intranet-tmpl/prog/en/acqui/parcel.tmpl | 238 +-- .../intranet-tmpl/prog/en/acqui/parcels.tmpl | 182 +- .../intranet-tmpl/prog/en/acqui/supplier.tmpl | 376 ++-- .../prog/en/admin/admin-home.tmpl | 86 +- .../prog/en/admin/aqbookfund.tmpl | 20 +- .../intranet-tmpl/prog/en/admin/aqbudget.tmpl | 12 +- .../en/admin/auth_subfields_structure.tmpl | 98 +- .../prog/en/admin/auth_tag_structure.tmpl | 298 +-- .../prog/en/admin/authorised_values.tmpl | 56 +- .../prog/en/admin/authtypes.tmpl | 3 +- .../intranet-tmpl/prog/en/admin/branches.tmpl | 422 ++-- .../prog/en/admin/categorie.tmpl | 72 +- .../prog/en/admin/checkmarc.tmpl | 197 +- .../prog/en/admin/itemtypes.tmpl | 26 +- .../intranet-tmpl/prog/en/admin/roadtype.tmpl | 4 +- .../prog/en/admin/systempreferences.tmpl | 408 ++-- .../prog/en/admin/thesaurus.tmpl | 249 +-- koha-tmpl/intranet-tmpl/prog/en/auth.tmpl | 34 +- .../prog/en/authorities/auth_finder.tmpl | 81 +- .../prog/en/authorities/authorities-home.tmpl | 158 +- .../prog/en/authorities/authorities.tmpl | 337 ++- .../blinddetail-biblio-search.tmpl | 56 +- .../en/authorities/blinddetail-linker.tmpl | 40 +- .../prog/en/authorities/detail.tmpl | 141 +- .../en/authorities/linkresultlist-auth.tmpl | 22 +- .../en/authorities/searchresultlist-auth.tmpl | 225 +- .../prog/en/authorities/searchresultlist.tmpl | 148 +- .../prog/en/barcodes/barcodes.tmpl | 5 +- .../prog/en/barcodes/printerConfig.tmpl | 6 +- .../en/bookshelves/addbookbybiblionumber.tmpl | 66 +- .../prog/en/bookshelves/shelves.tmpl | 396 ++-- .../prog/en/catalogue/ISBDdetail.tmpl | 33 +- .../prog/en/catalogue/MARCdetail.tmpl | 607 +++--- .../prog/en/catalogue/detail.tmpl | 308 ++- .../prog/en/catalogue/moredetail.tmpl | 148 +- .../prog/en/cataloguing/addbiblio.tmpl | 311 ++- .../prog/en/cataloguing/addbooks.tmpl | 132 +- .../prog/en/cataloguing/additem.tmpl | 247 +-- .../prog/en/circ/branchreserves.tmpl | 16 +- .../prog/en/circ/branchtransfers.tmpl | 78 +- .../prog/en/circ/circulation.tmpl | 1116 +++++++--- .../prog/en/circ/currenttransfers.tmpl | 8 +- .../intranet-tmpl/prog/en/circ/returns.tmpl | 397 ++-- .../prog/en/circ/selectbranchprinter.tmpl | 21 +- .../en/circ/waitingreservestransfers.tmpl | 6 +- .../prog/en/includes/doc-head-close.inc | 14 +- .../prog/en/includes/holidays-top.inc | 4 +- .../prog/en/includes/intranet-bottom.inc | 3 +- .../prog/en/includes/intranet.css | 438 +++- .../prog/en/includes/menu-acqui.inc | 6 +- .../prog/en/includes/menu-admin.inc | 39 +- .../prog/en/includes/menu-authorities.inc | 2 + .../prog/en/includes/menu-catalogue.inc | 15 +- .../prog/en/includes/menu-circ.inc | 21 +- .../prog/en/includes/menu-members.inc | 5 +- .../prog/en/includes/menu-serials.inc | 14 +- .../prog/en/includes/menu-tools.inc | 18 +- .../intranet-tmpl/prog/en/includes/menus.inc | 121 +- .../intranet-tmpl/prog/en/intranet-main.tmpl | 120 +- .../prog/en/members/boraccount.tmpl | 32 +- .../prog/en/members/deletemem.tmpl | 3 +- .../prog/en/members/guarantor_search.tmpl | 2 +- .../prog/en/members/mancredit.tmpl | 52 +- .../prog/en/members/maninvoice.tmpl | 27 +- .../prog/en/members/member-flags.tmpl | 36 +- .../members/member-quicksearch-results.tmpl | 31 +- .../prog/en/members/member-quicksearch.tmpl | 8 +- .../intranet-tmpl/prog/en/members/member.tmpl | 70 +- .../prog/en/members/memberentryA.tmpl | 51 +- .../prog/en/members/memberentryC.tmpl | 123 +- .../prog/en/members/memberentryI.tmpl | 89 +- .../prog/en/members/memberentryP.tmpl | 116 +- .../prog/en/members/members-home.tmpl | 52 +- .../prog/en/members/moremember-print.tmpl | 9 +- .../prog/en/members/moremember-receipt.tmpl | 9 +- .../prog/en/members/moremember.tmpl | 541 +++-- .../intranet-tmpl/prog/en/members/pay.tmpl | 63 +- .../prog/en/members/readingrec.tmpl | 14 +- .../prog/en/reports/acquisitions_stats.tmpl | 13 +- .../prog/en/reports/bor_issues_top.tmpl | 7 +- .../prog/en/reports/borrowers_out.tmpl | 205 +- .../prog/en/reports/borrowers_stats.tmpl | 7 +- .../prog/en/reports/cat_issues_top.tmpl | 18 +- .../prog/en/reports/catalogue_out.tmpl | 5 +- .../prog/en/reports/catalogue_stats.tmpl | 5 +- .../prog/en/reports/inventory.tmpl | 1 + .../prog/en/reports/issues_avg_stats.tmpl | 7 +- .../reports/issues_by_borrower_category.tmpl | 5 +- .../prog/en/reports/issues_stats.tmpl | 5 +- .../prog/en/reports/itemtypes.tmpl | 3 +- .../prog/en/reports/reports-home.tmpl | 5 +- .../prog/en/reserve/request.tmpl | 229 +- .../prog/en/reviews/reviewswaiting.tmpl | 14 +- .../prog/en/serials/acqui-search-result.tmpl | 16 +- .../prog/en/serials/acqui-search.tmpl | 13 +- .../intranet-tmpl/prog/en/serials/claims.tmpl | 80 +- .../prog/en/serials/distributedto.tmpl | 7 +- .../prog/en/serials/member-search.tmpl | 19 +- .../en/serials/receipt-search-result.tmpl | 6 +- .../intranet-tmpl/prog/en/serials/result.tmpl | 120 +- .../prog/en/serials/routing-preview-slip.tmpl | 2 +- .../prog/en/serials/routing-preview.tmpl | 7 +- .../prog/en/serials/routing.tmpl | 10 +- .../prog/en/serials/serial-issues-full.tmpl | 14 +- .../prog/en/serials/serial-issues.tmpl | 199 +- .../prog/en/serials/serials-home.tmpl | 111 +- .../prog/en/serials/subscription-add.tmpl | 1853 +++++++++-------- .../en/serials/subscription-bib-search.tmpl | 76 +- .../prog/en/serials/subscription-detail.tmpl | 760 ++++--- .../prog/en/serials/subscription-renew.tmpl | 2 +- .../prog/en/serials/viewalerts.tmpl | 7 +- .../prog/en/suggestion/acceptorreject.tmpl | 209 +- .../suggestion/mail_suggestion_REJECTED.tmpl | 6 +- .../intranet-tmpl/prog/en/tools/barcodes.tmpl | 5 +- .../intranet-tmpl/prog/en/tools/export.tmpl | 94 +- .../intranet-tmpl/prog/en/tools/holidays.tmpl | 4 +- .../intranet-tmpl/prog/en/tools/import.tmpl | 2 + .../prog/en/tools/koha-news.tmpl | 233 ++- .../intranet-tmpl/prog/en/tools/letter.tmpl | 111 +- .../prog/en/tools/tools-home.tmpl | 51 +- .../prog/en/z3950/searchresult.tmpl | 116 +- koha-tmpl/opac-tmpl/prog/en/kohaerror.tmpl | 2 +- .../opac-tmpl/prog/en/opac-ISBDdetail.tmpl | 198 +- .../opac-tmpl/prog/en/opac-MARCdetail.tmpl | 263 +-- koha-tmpl/opac-tmpl/prog/en/opac-account.tmpl | 82 +- .../prog/en/opac-addbookbybiblionumber.tmpl | 72 +- koha-tmpl/opac-tmpl/prog/en/opac-auth.tmpl | 4 +- koha-tmpl/opac-tmpl/prog/en/opac-basket.tmpl | 290 ++- koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl | 491 +++-- .../opac-tmpl/prog/en/opac-detailprint.tmpl | 2 +- .../prog/en/opac-full-serial-issues.tmpl | 127 +- koha-tmpl/opac-tmpl/prog/en/opac-main.tmpl | 206 +- koha-tmpl/opac-tmpl/prog/en/opac-passwd.tmpl | 77 +- .../opac-tmpl/prog/en/opac-readingrecord.tmpl | 13 +- .../prog/en/opac-recacquisitions.tmpl | 2 +- koha-tmpl/opac-tmpl/prog/en/opac-reserve.tmpl | 101 +- .../opac-tmpl/prog/en/opac-sendbasket.tmpl | 22 +- .../prog/en/opac-sendbasketform.tmpl | 40 +- .../opac-tmpl/prog/en/opac-serial-issues.tmpl | 13 +- koha-tmpl/opac-tmpl/prog/en/opac-shelves.tmpl | 338 ++- .../opac-tmpl/prog/en/opac-suggestions.tmpl | 238 +-- koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl | 295 +-- .../opac-tmpl/prog/en/opac-userdetails.tmpl | 45 +- .../opac-tmpl/prog/en/opac-userupdate.tmpl | 22 +- 179 files changed, 10854 insertions(+), 13254 deletions(-) delete mode 100644 C4/Calendar/Calendar.pm delete mode 100755 C4/Format.pm delete mode 100755 acqui/select-late.pl delete mode 100644 admin/biblios_framework.pl delete mode 100644 admin/biblios_subfields_structure.pl delete mode 100644 admin/bibliostagstructure.pl delete mode 100644 admin/holdings_subfields_structure.pl delete mode 100644 admin/holdingstagstructure.pl delete mode 100644 admin/institutions-careers.pl delete mode 100644 admin/koha-electronic.pl delete mode 100644 admin/koha-news.pl delete mode 100644 admin/koha_attr.pl delete mode 100755 admin/stopwords.pl delete mode 100755 admin/viewlog.pl delete mode 100644 barcodes/create_labels_conf_table.sql delete mode 100644 catalogue/catalogue-search.pl delete mode 100755 cataloguing/isbnsearch.pl delete mode 100644 circ/renewscript.pl delete mode 100644 circ/rescirculation.pl delete mode 100644 circ/resreturns.pl diff --git a/C4/Calendar/Calendar.pm b/C4/Calendar/Calendar.pm deleted file mode 100644 index 355065da68..0000000000 --- a/C4/Calendar/Calendar.pm +++ /dev/null @@ -1,578 +0,0 @@ -package C4::Calendar::Calendar; - -# 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 - -use strict; -require Exporter; -use vars qw($VERSION @EXPORT); - -use C4::Context; - -use C4::Date; - -# set the version for version checking -$VERSION = 1.01; - -=head1 NAME - -C4::Calendar::Calendar - Koha module dealing with holidays. - -=head1 SYNOPSIS - - use C4::Calendar::Calendar; - -=head1 DESCRIPTION - -This package is used to deal with holidays. Through this package, you can set all kind of holidays for the library. - -=head1 FUNCTIONS - -=over 2 - -=cut - -@EXPORT = qw(&new - &change_branchcode - &get_week_days_holidays - &get_day_month_holidays - &get_exception_holidays - &get_single_holidays - &insert_week_day_holiday - &insert_day_month_holiday - &insert_single_holiday - &insert_exception_holiday - &delete_holiday - &isHoliday - &addDate - &daysBetween); - -=item new - - $calendar = C4::Calendar::Calendar->new(branchcode => $branchcode); - -C<$branchcode> Is the branch code wich you want to use calendar. - -=cut - -sub new { - my $classname = shift @_; - my %options = @_; - - my %hash; - my $self = bless(\%hash, $classname); - - foreach my $optionName (keys %options) { - $self->{lc($optionName)} = $options{$optionName}; - } - - $self->_init; - - return $self; -} - -sub _init { - my $self = shift @_; - - my $dbh = C4::Context->dbh(); - my $week_days_sql = $dbh->prepare("select weekday, title, description from repeatable_holidays where ('$self->{branchcode}' = branchcode) and (NOT(ISNULL(weekday)))"); - $week_days_sql->execute; - my %week_days_holidays; - while (my ($weekday, $title, $description) = $week_days_sql->fetchrow) { - $week_days_holidays{$weekday}{title} = $title; - $week_days_holidays{$weekday}{description} = $description; - } - $week_days_sql->finish; - $self->{'week_days_holidays'} = \%week_days_holidays; - - my $day_month_sql = $dbh->prepare("select day, month, title, description from repeatable_holidays where ('$self->{branchcode}' = branchcode) and ISNULL(weekday)"); - $day_month_sql->execute; - my %day_month_holidays; - while (my ($day, $month, $title, $description) = $day_month_sql->fetchrow) { - $day_month_holidays{"$month/$day"}{title} = $title; - $day_month_holidays{"$month/$day"}{description} = $description; - } - $day_month_sql->finish; - $self->{'day_month_holidays'} = \%day_month_holidays; - - my $exception_holidays_sql = $dbh->prepare("select day, month, year, title, description from special_holidays where ('$self->{branchcode}' = branchcode) and (isexception = 1)"); - $exception_holidays_sql->execute; - my %exception_holidays; - while (my ($day, $month, $year, $title, $description) = $exception_holidays_sql->fetchrow) { - $exception_holidays{"$year/$month/$day"}{title} = $title; - $exception_holidays{"$year/$month/$day"}{description} = $description; - } - $exception_holidays_sql->finish; - $self->{'exception_holidays'} = \%exception_holidays; - - my $holidays_sql = $dbh->prepare("select day, month, year, title, description from special_holidays where ('$self->{branchcode}' = branchcode) and (isexception = 0)"); - $holidays_sql->execute; - my %single_holidays; - while (my ($day, $month, $year, $title, $description) = $holidays_sql->fetchrow) { - $single_holidays{"$year/$month/$day"}{title} = $title; - $single_holidays{"$year/$month/$day"}{description} = $description; - } - $holidays_sql->finish; - $self->{'single_holidays'} = \%single_holidays; -} - -=item change_branchcode - - $calendar->change_branchcode(branchcode => $branchcode) - -Change the calendar branch code. This means to change the holidays structure. - -C<$branchcode> Is the branch code wich you want to use calendar. - -=cut - -sub change_branchcode { - my ($self, $branchcode) = @_; - my %options = @_; - - foreach my $optionName (keys %options) { - $self->{lc($optionName)} = $options{$optionName}; - } - $self->_init; - - return $self; -} - -=item get_week_days_holidays - - $week_days_holidays = $calendar->get_week_days_holidays(); - -Returns a hash reference to week days holidays. - -=cut - -sub get_week_days_holidays { - my $self = shift @_; - my $week_days_holidays = $self->{'week_days_holidays'}; - return $week_days_holidays; -} - -=item get_day_month_holidays - - $day_month_holidays = $calendar->get_day_month_holidays(); - -Returns a hash reference to day month holidays. - -=cut - -sub get_day_month_holidays { - my $self = shift @_; - my $day_month_holidays = $self->{'day_month_holidays'}; - return $day_month_holidays; -} - -=item get_exception_holidays - - $exception_holidays = $calendar->exception_holidays(); - -Returns a hash reference to exception holidays. This kind of days are those -which stands for a holiday, but you wanted to make an exception for this particular -date. - -=cut - -sub get_exception_holidays { - my $self = shift @_; - my $exception_holidays = $self->{'exception_holidays'}; - return $exception_holidays; -} - -=item get_single_holidays - - $single_holidays = $calendar->get_single_holidays(); - -Returns a hash reference to single holidays. This kind of holidays are those which -happend just one time. - -=cut - -sub get_single_holidays { - my $self = shift @_; - my $single_holidays = $self->{'single_holidays'}; - return $single_holidays; -} - -=item insert_week_day_holiday - - insert_week_day_holiday(weekday => $weekday, - title => $title, - description => $description); - -Inserts a new week day for $self->{branchcode}. - -C<$day> Is the week day to make holiday. - -C<$title> Is the title to store for the holiday formed by $year/$month/$day. - -C<$description> Is the description to store for the holiday formed by $year/$month/$day. - -=cut - -sub insert_week_day_holiday { - my $self = shift @_; - my %options = @_; - - my $dbh = C4::Context->dbh(); - my $insertHoliday = $dbh->prepare("insert into repeatable_holidays (id,branchcode,weekday,day,month,title,description) values ('', '$self->{branchcode}', $options{weekday}, NULL, NULL, '$options{title}', '$options{description}')"); - $insertHoliday->execute; - $insertHoliday->finish; - - $self->{'week_days_holidays'}->{$options{weekday}}{title} = $options{title}; - $self->{'week_days_holidays'}->{$options{weekday}}{description} = $options{description}; - return $self; -} - -=item insert_day_month_holiday - - insert_day_month_holiday(day => $day, - month => $month, - title => $title, - description => $description); - -Inserts a new day month holiday for $self->{branchcode}. - -C<$day> Is the day month to make the date to insert. - -C<$month> Is month to make the date to insert. - -C<$title> Is the title to store for the holiday formed by $year/$month/$day. - -C<$description> Is the description to store for the holiday formed by $year/$month/$day. - -=cut - -sub insert_day_month_holiday { - my $self = shift @_; - my %options = @_; - - my $dbh = C4::Context->dbh(); - my $insertHoliday = $dbh->prepare("insert into repeatable_holidays (id,branchcode,weekday,day,month,title,description) values ('', '$self->{branchcode}', NULL, $options{day}, $options{month}, '$options{title}', '$options{description}')"); - $insertHoliday->execute; - $insertHoliday->finish; - - $self->{'day_month_holidays'}->{"$options{month}/$options{day}"}{title} = $options{title}; - $self->{'day_month_holidays'}->{"$options{month}/$options{day}"}{description} = $options{description}; - return $self; -} - -=item insert_single_holiday - - insert_single_holiday(day => $day, - month => $month, - year => $year, - title => $title, - description => $description); - -Inserts a new single holiday for $self->{branchcode}. - -C<$day> Is the day month to make the date to insert. - -C<$month> Is month to make the date to insert. - -C<$year> Is year to make the date to insert. - -C<$title> Is the title to store for the holiday formed by $year/$month/$day. - -C<$description> Is the description to store for the holiday formed by $year/$month/$day. - -=cut - -sub insert_single_holiday { - my $self = shift @_; - my %options = @_; - - my $dbh = C4::Context->dbh(); - my $isexception = 0; - my $insertHoliday = $dbh->prepare("insert into special_holidays (id,branchcode,day,month,year,isexception,title,description) values ('', '$self->{branchcode}', $options{day}, $options{month}, $options{year}, $isexception, '$options{title}', '$options{description}')"); - $insertHoliday->execute; - $insertHoliday->finish; - - $self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}{title} = $options{title}; - $self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}{description} = $options{description}; - return $self; -} - -=item insert_exception_holiday - - insert_exception_holiday(day => $day, - month => $month, - year => $year, - title => $title, - description => $description); - -Inserts a new exception holiday for $self->{branchcode}. - -C<$day> Is the day month to make the date to insert. - -C<$month> Is month to make the date to insert. - -C<$year> Is year to make the date to insert. - -C<$title> Is the title to store for the holiday formed by $year/$month/$day. - -C<$description> Is the description to store for the holiday formed by $year/$month/$day. - -=cut - -sub insert_exception_holiday { - my $self = shift @_; - my %options = @_; - - my $dbh = C4::Context->dbh(); - my $isexception = 1; - my $insertException = $dbh->prepare("insert into special_holidays (id,branchcode,day,month,year,isexception,title,description) values ('', '$self->{branchcode}', $options{day}, $options{month}, $options{year}, $isexception, '$options{title}', '$options{description}')"); - $insertException->execute; - $insertException->finish; - - $self->{'exceptions_holidays'}->{"$options{year}/$options{month}/$options{day}"}{title} = $options{title}; - $self->{'exceptions_holidays'}->{"$options{year}/$options{month}/$options{day}"}{description} = $options{description}; - return $self; -} - -=item delete_holiday - - delete_holiday(weekday => $weekday - day => $day, - month => $month, - year => $year); - -Delete a holiday for $self->{branchcode}. - -C<$weekday> Is the week day to delete. - -C<$day> Is the day month to make the date to delete. - -C<$month> Is month to make the date to delete. - -C<$year> Is year to make the date to delete. - -=cut - -sub delete_holiday { - my $self = shift @_; - my %options = @_; - - # Verify what kind of holiday that day is. For example, if it is - # a repeatable holiday, this should check if there are some exception - # for that holiday rule. Otherwise, if it is a regular holiday, it´s - # ok just deleting it. - - my $dbh = C4::Context->dbh(); - my $isSingleHoliday = $dbh->prepare("select id from special_holidays where (branchcode = '$self->{branchcode}') and (day = $options{day}) and (month = $options{month}) and (year = $options{year})"); - $isSingleHoliday->execute; - if ($isSingleHoliday->rows) { - my $id = $isSingleHoliday->fetchrow; - $isSingleHoliday->finish; # Close the last query - - my $deleteHoliday = $dbh->prepare("delete from special_holidays where (id = $id)"); - $deleteHoliday->execute; - $deleteHoliday->finish; # Close the last query - delete($self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}); - } else { - $isSingleHoliday->finish; # Close the last query - - my $isWeekdayHoliday = $dbh->prepare("select id from repeatable_holidays where (branchcode = '$self->{branchcode}') and (weekday = $options{weekday})"); - $isWeekdayHoliday->execute; - if ($isWeekdayHoliday->rows) { - my $id = $isWeekdayHoliday->fetchrow; - $isWeekdayHoliday->finish; # Close the last query - - my $updateExceptions = $dbh->prepare("update special_holidays set isexception = 0 where (WEEKDAY(CONCAT(special_holidays.year,'-',special_holidays.month,'-',special_holidays.day)) = $options{weekday}) and (branchcode = '$self->{branchcode}')"); - $updateExceptions->execute; - $updateExceptions->finish; # Close the last query - - my $deleteHoliday = $dbh->prepare("delete from repeatable_holidays where (id = $id)"); - $deleteHoliday->execute; - $deleteHoliday->finish; - delete($self->{'week_days_holidays'}->{$options{weekday}}); - } else { - $isWeekdayHoliday->finish; # Close the last query - - my $isDayMonthHoliday = $dbh->prepare("select id from repeatable_holidays where (branchcode = '$self->{branchcode}') (day = $options{day}) and (month = $options{month})"); - $isDayMonthHoliday->execute; - if ($isDayMonthHoliday->rows) { - my $id = $isDayMonthHoliday->fetchrow; - $isDayMonthHoliday->finish; - my $updateExceptions = $dbh->prepare("update special_holidays set isexception = 0 where (special_holidays.branchcode = '$self->{branchcode}') and (special_holidays.day = $options{day}) and (special_holidays.month = $options{month})"); - $updateExceptions->execute; - $updateExceptions->finish; # Close the last query - - my $deleteHoliday = $dbh->prepare("delete from repeatable_holidays where (id = $id)"); - $deleteHoliday->execute; - $deleteHoliday->finish; # Close the last query - $isDayMonthHoliday->finish; # Close the last query - delete($self->{'day_month_holidays'}->{"$options{month}/$options{day}"}); - } - } - } - return $self; -} - -=item isHoliday - - $isHoliday = isHoliday($day, $month $year); - - -C<$day> Is the day to check wether if is a holiday or not. - -C<$month> Is the month to check wether its a holiday or not. - -C<$year> Is the year to check wether if its a holiday or not. - -=cut - -sub isHoliday { - my ($self, $day, $month, $year) = @_; - - my $weekday = Date_DayOfWeek($month, $day, $year) % 7; - my $weekDays = $self->get_week_days_holidays(); - my $dayMonths = $self->get_day_month_holidays(); - my $exceptions = $self->get_exception_holidays(); - my $singles = $self->get_single_holidays(); - - if (defined($exceptions->{"$year/$month/$day"})) { - return 0; - } else { - if ((exists($weekDays->{$weekday})) || - (exists($dayMonths->{"$month/$day"})) || - (exists($singles->{"$year/$month/$day"}))) { - return 1; - } else { - return 0; - } - } - -} - -=item addDate - - my ($day, $month, $year) = $calendar->addDate($day, $month, $year, $offset) - -C<$day> Is the starting day of the interval. - -C<$month> Is the starting month of the interval. - -C<$year> Is the starting year of the interval. - -C<$offset> Is the number of days that this function has to count from $date. - -=cut - -sub addDate { - my ($self, $day, $month, $year, $offset) = @_; - if ($offset < 0) { # In case $offset is negative - $offset = $offset*(-1); - } - - my $daysMode = C4::Context->preference('useDaysMode'); - if ($daysMode eq 'normal') { - ($year, $month, $day) = Add_Delta_Days($year, $month, $day, ($offset - 1)); - } else { - while ($offset > 0) { - if (!($self->isHoliday($day, $month, $year))) { - $offset = $offset - 1; - } - if ($offset > 0) { - ($year, $month, $day) = Add_Delta_Days($year, $month, $day, 1); - } - } - } - return($day, $month, $year); -} - -=item daysBetween - - my $daysBetween = $calendar->daysBetween($dayFrom, $monthFrom, $yearFrom, - $dayTo, $monthTo, $yearTo) - -C<$dayFrom> Is the starting day of the interval. - -C<$monthFrom> Is the starting month of the interval. - -C<$yearFrom> Is the starting year of the interval. - -C<$dayTo> Is the ending day of the interval. - -C<$monthTo> Is the ending month of the interval. - -C<$yearTo> Is the ending year of the interval. - -=cut - -sub daysBetween { - my ($self, $dayFrom, $monthFrom, $yearFrom, $dayTo, $monthTo, $yearTo) = @_; - - my $daysMode = C4::Context->preference('useDaysMode'); - my $count = 1; - my $continue = 1; - if ($daysMode eq 'normal') { - while ($continue) { - if (($yearFrom != $yearTo) || ($monthFrom != $monthTo) || ($dayFrom != $dayTo)) { - ($yearFrom, $monthFrom, $dayFrom) = Add_Delta_Days($yearFrom, $monthFrom, $dayFrom, 1); - $count++; - } else { - $continue = 0; - } - } - } else { - while ($continue) { - if (($yearFrom != $yearTo) || ($monthFrom != $monthTo) || ($dayFrom != $dayTo)) { - if (!($self->isHoliday($dayFrom, $monthFrom, $yearFrom))) { - $count++; - } - ($yearFrom, $monthFrom, $dayFrom) = Add_Delta_Days($yearFrom, $monthFrom, $dayFrom, 1); - } else { - $continue = 0; - } - } - } - return($count); -} - -sub Date_DayOfWeek{ -my ($month, $day, $year)=@_; -my $date=DATE_obj($year."-".$month."-".$day); - -return $date->day_of_week; -} - -sub Add_Delta_Days{ -my ($year, $month, $day, $offset)=@_; -my $date=DATE_obj($year."-".$month."-".$day); -my $duration=get_duration($offset." days"); - - $date->add_duration($duration); - -return ($date->year, $date->month, $date->day); -} - - - -1; - -__END__ - -=back - -=head1 AUTHOR - -Koha Physics Library UNLP -Modified by Tumer Garip NUE Grand Library --No more Date::Manip -=cut \ No newline at end of file diff --git a/C4/Format.pm b/C4/Format.pm deleted file mode 100755 index 0bf917bbe5..0000000000 --- a/C4/Format.pm +++ /dev/null @@ -1,232 +0,0 @@ -package C4::Format; - -# $Id$ - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -require Exporter; - - -use vars qw($VERSION @ISA @EXPORT); - -# set the version for version checking -$VERSION = 0.01; - -=head1 NAME - -C4::Format - Functions for pretty-printing strings and numbers - -=head1 SYNOPSIS - - use C4::Format; - -=head1 DESCRIPTION - -These functions return pretty-printed versions of strings and numbers. - -=head1 FUNCTIONS - -=over 2 - -=cut - -@ISA = qw(Exporter); -@EXPORT = qw(&fmtstr &fmtdec); - -=item fmtstr - - $str = &fmtstr($env, $string, $format); - -Returns C<$string>, padded with space to a given length. - -C<$format> is either C or C, where I is a positive integer. -C<$str> will be either left-padded or right-padded, respectively. - -C<&fmtstr> is almost equivalent to - - sprintf("%-n.ns", $string); - -or - - sprintf("%n.ns", $string); - -The only difference is that if I is less than the length of -C<$string>, then C<&fmtstr> will return the last I characters of -C<$string>, whereas C will return the first I characters. - -C<$env> is ignored. - -=cut -#' -sub fmtstr { - # format (space pad) a string - # $fmt is Ln.. or Rn.. where n is the length - my ($env,$strg,$fmt)=@_; - my $align = substr($fmt,0,1); - my $lenst = substr($fmt,1,length($fmt)-1); - if ($align eq"R" ) { - $strg = substr((" "x$lenst).$strg,0-$lenst,$lenst); - } elsif ($align eq "C" ) { - $strg = - substr((" "x(($lenst/2)-(length($strg)/2))).$strg.(" "x$lenst),0,$lenst); - } else { - $strg = substr($strg.(" "x$lenst),0,$lenst); - } - return ($strg); -} - -=item fmtdec - - $str = &fmtdec($env, $number, $format) - -Returns a pretty-printed version of C<$number>. - -C<$format> specifies how to print the number. It is of the form - - [$][,]n[m] - -where I and I are digits, specifying the number of digits to use -before and after the decimal, respectively. Thus, - - &fmtdec(undef, 123.456, "42") - -will return - - " 123.45" - -If I is smaller than the size of the integer part, only the last -I digits will be returned. If I is greater than the number of -digits after the decimal in C<$number>, the result will be -right-padded with zeros. - -If C<$format> has a leading dollar sign, the number is assumed to be a -monetary amount. C<$str> will have a dollar sign prepended to the -value. - -If C<$format> has a comma after the optional dollar sign, the integer -part will be split into three-digit groups separated by commas. - -C<$env> is effectively ignored. - -=cut -#' -# FIXME - This is all terribly provincial, not at all -# internationalized. I'm pretty sure there's already something out -# there that'll figure out the current locale, look up the local -# currency symbol (and whether it goes on the left or right), figure -# out how numbers are grouped (commas, periods, or what? And how many -# digits per group?), and will print the whole thing prettily. -# But I can't find it just now. Maybe POSIX::setlocale() or -# perllocale(1) might help. -# FIXME - Bug: -# fmtdec(undef, 12345.6, ',82') prints " 345.60" -# fmtdec(undef, 12345.6, '$,82') prints ".60" -sub fmtdec { - # format a decimal - # $fmt is [$][,]n[m] - my ($env,$numb,$fmt)=@_; - - # FIXME - Use $fmt =~ /^(\$)?(,)?(\d)(\d)?$/ instead of this mess of - # substr()s. - - # See if there's a leading dollar sign. - my $curr = substr($fmt,0,1); - if ($curr eq "\$") { - $fmt = substr($fmt,1,length($fmt)-1); - }; - # See if there's a leading comma - my $comma = substr($fmt,0,1); - if ($comma eq ",") { - $fmt = substr($fmt,1,length($fmt)-1); - }; - # See whether one number was given, or two. - my $right; - my $left = substr($fmt,0,1); - if (length($fmt) == 1) { - $right = 0; - } else { - $right = substr($fmt,1,1); - } - # See if $numb is a floating-point number. - my $fnumb = ""; - my $tempint = ""; - my $tempdec = ""; - # FIXME - Use - # $numb =~ /(\d+)\.(\d+)/; - # $tempint = $1 + 0; - # $tempdec = $2; - if (index($numb,".") == 0 ){ - $tempint = 0; - $tempdec = substr($numb,1,length($numb)-1); - } else { - if (index($numb,".") > 0) { - my $decpl = index($numb,"."); - $tempint = substr($numb,0,$decpl); - $tempdec = substr($numb,$decpl+1,length($numb)-1-$decpl); - } else { - $tempint = $numb; - $tempdec = 0; - } - # If a comma was specified, then comma-separate the integer part - # FIXME - From the Perl Cookbook (ISBN 1-56592-243-3), sec. 2.1.7: - # sub commify { - # my $test = reverse $_[0]; - # $text =~ s/(\d\d\d)(?=\d)(?!\d*\.)/$1,/g; - # return scalar reverse $text; - # } - if ($comma eq ",") { - while (length($tempdec) > 3) { - $fnumb = ",".substr($tempint,-3,3).$fnumb; - substr($tempint,-3,3) = ""; - } - $fnumb = substr($tempint,-3,3).$fnumb; - } else { - $fnumb = $tempint; - } - } - # If a dollar sign was specified, prepend a dollar sign and - # right-justify the number - if ($curr eq "\$") { - $fnumb = fmtstr($env,$curr.$fnumb,"R".$left+1); - } else { - if ($left==0) { - $fnumb = ""; - } else { - $fnumb = fmtstr($env,$fnumb,"R".$left); - } - } - # Right-pad the decimal part to the given number of digits. - if ($right > 0) { - $tempdec .= "0"x$right; - $tempdec = substr($tempdec,0,$right); - $fnumb .= ".".$tempdec; - } - return $fnumb; # FIXME - Shouldn't return a list. -} - -1; -__END__ - -=back - -=head1 AUTHOR - -Koha Developement team - -=cut diff --git a/C4/Interface/CGI/Output.pm b/C4/Interface/CGI/Output.pm index 9f97e75432..fad75ce48b 100644 --- a/C4/Interface/CGI/Output.pm +++ b/C4/Interface/CGI/Output.pm @@ -22,9 +22,10 @@ package C4::Interface::CGI::Output; # 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 + use strict; require Exporter; -use open ':utf8'; + use vars qw($VERSION @ISA @EXPORT); # set the version for version checking @@ -36,9 +37,9 @@ C4::CGI::Output - Convenience functions for handling outputting HTML pages =head1 SYNOPSIS - use C4::Interface::CGI::Output; + use C4::CGI::Output; - print $query->header(-type => "text/html"), $output; + print $query->header(-type => C4::CGI::Output::gettype($output)), $output; =head1 DESCRIPTION @@ -52,12 +53,46 @@ related to the (guessed) charset. =cut @ISA = qw(Exporter); -@EXPORT = qw( &output_html_with_http_headers +@EXPORT = qw( + &guesscharset + &guesstype + &output_html_with_http_headers ); +=item guesscharset + + &guesscharset($output) + +"Guesses" the charset from the some HTML that would be output. +C<$output> is the HTML page to be output. If it contains a META tag +with a Content-Type, the tag will be scanned for a language code. +This code is returned if it is found; undef is returned otherwise. +This function only does sloppy guessing; it will be confused by +unexpected things like SGML comments. What it basically does is to +grab something that looks like a META tag and scan it. +=cut + +sub guesscharset ($) { + my($html) = @_; + my $charset = undef; + local($`, $&, $', $1, $2, $3); + # FIXME... These regular expressions will miss a lot of valid tags! + if ($html =~ //is) { + $charset = $3; + } elsif ($html =~ //is) { + $charset = $2; + } + return $charset; +} # guess + +sub guesstype ($) { + my($html) = @_; + my $charset = guesscharset($html); + return defined $charset? "text/html; charset=$charset": "text/html"; +} =item output_html_with_http_headers @@ -70,13 +105,11 @@ corresponds to the HTML page $html. =cut sub output_html_with_http_headers ($$$) { - my($query, $cookie, $html) = @_; print $query->header( - -type => "text/html", - -charset=>"UTF-8", + -type => guesstype($html), -cookie => $cookie, - ), $html; + ), $html; } #--------------------------------- diff --git a/acqui/select-late.pl b/acqui/select-late.pl deleted file mode 100755 index 4503effadc..0000000000 --- a/acqui/select-late.pl +++ /dev/null @@ -1,102 +0,0 @@ -#!/usr/bin/perl - -# $Id$ - -#script to show suppliers and orders -#written by chris@katipo.co.nz 23/2/2000 - - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use C4::Auth; -use C4::Biblio; -use CGI; -use C4::Interface::CGI::Output; -use C4::Context; -use C4::Date; -use C4::Acquisition; - -my $query=new CGI; -my $dbh = C4::Context->dbh; -my ($template, $loggedinuser, $cookie) - = get_template_and_user({template_name => "acqui/select-late.tmpl", - query => $query, - type => "intranet", - authnotrequired => 0, - flagsrequired => {acquisition => 1}, - debug => 1, - }); - -my $supplier=$query->param('id'); -my @suppliers=GetBookSeller($supplier); -my $count = scalar @suppliers; - -my $sth = $dbh->prepare("select s.serialseq from serial s, subscription u where s.subscriptionid = u.subscriptionid and u.aqbooksellerid = ? and s.status = 2"); - -$sth->execute($supplier); -my @final; -while (my $sol = $sth->fetchrow_hashref) -{ - push @final, $sol; -} - -$template->param(@loop_sol => \@final); - -my $colour='#EEEEEE'; -my $toggle=0; -my @loop_suppliers; -for (my $i=0; $i<$count; $i++) { - my $orders = GetPendingOrders($suppliers[$i]->{'id'}); - my $ordcount = scalar @$orders; - - my %line; - if ($toggle==0){ - $line{color}='#EEEEEE'; - $toggle=1; - } else { - $line{color}='white'; - $toggle=0; - } - $line{id} =$suppliers[$i]->{'id'}; - $line{name} = $suppliers[$i]->{'name'}; - $line{active} = $suppliers[$i]->{'active'}; - $line{total} = $orders->[0]->{'count(*)'}; - $line{authorisedby} = $orders->[0]->{'authorisedby'}; - $line{entrydate} = $orders->[0]->{'entrydate'}; - my @loop_basket; - for (my $i2=0;$i2<$ordcount;$i2++){ - my %inner_line; - $inner_line{basketno} =$orders->[$i2]->{'basketno'}; - $inner_line{total} =$orders->[$i2]->{'count(*)'}; - $inner_line{authorisedby} = $orders->[$i2]->{'authorisedby'}; - $inner_line{entrydate} = format_date($orders->[$i2]->{'entrydate'}); - push @loop_basket, \%inner_line; - } - $line{loop_basket} = \@loop_basket; - push @loop_suppliers, \%line; -} -$template->param(loop_suppliers => \@loop_suppliers, - supplier => $supplier, - count => $count, - intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), - intranetstylesheet => C4::Context->preference("intranetstylesheet"), - IntranetNav => C4::Context->preference("IntranetNav"), - ); - -output_html_with_http_headers $query, $cookie, $template->output; diff --git a/admin/biblios_framework.pl b/admin/biblios_framework.pl deleted file mode 100644 index 2054c5df43..0000000000 --- a/admin/biblios_framework.pl +++ /dev/null @@ -1,177 +0,0 @@ -#!/usr/bin/perl -# NOTE: 4-character tabs - -#written 20/02/2002 by paul.poulain@free.fr -# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html) - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; -use C4::Context; -use C4::Output; -use C4::Search; -use C4::Auth; -use C4::Interface::CGI::Output; - - -sub StringSearch { - my ($env,$searchstring,$type)=@_; - my $dbh = C4::Context->dbh; - $searchstring=~ s/\'/\\\'/g; - my @data=split(' ',$searchstring); - my $count=@data; - my $sth=$dbh->prepare("Select * from biblios_framework where (frameworkcode like ?) order by frameworktext"); - $sth->execute("$data[0]%"); - my @results; - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - } - # $sth->execute; - $sth->finish; - return (scalar(@results),\@results); -} - -my $input = new CGI; -my $searchfield=$input->param('frameworkcode'); -my $offset=$input->param('offset'); -my $script_name="/cgi-bin/koha/admin/biblios_framework.pl"; -my $frameworkcode=$input->param('frameworkcode'); -my $pagesize=20; -my $op = $input->param('op'); -$searchfield=~ s/\,//g; -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "admin/biblios_framework.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); - -if ($op) { -$template->param(script_name => $script_name, - $op => 1); # we show only the TMPL_VAR names $op -} else { -$template->param(script_name => $script_name, - else => 1); # we show only the TMPL_VAR names $op -} - - - - -################## ADD_FORM ################################## -# called by default. Used to create form to add or modify a record -if ($op eq 'add_form') { - #start the page and read in includes - #---- if primkey exists, it's a modify action, so read values to modify... - my $data; - if ($frameworkcode) { - my $dbh = C4::Context->dbh; - my $sth=$dbh->prepare("select * from biblios_framework where frameworkcode=?"); - $sth->execute($frameworkcode); - $data=$sth->fetchrow_hashref; - $sth->finish; - } - $template->param(frameworkcode => $frameworkcode, - frameworktext => $data->{'frameworktext'}, - ); -; - # END $OP eq ADD_FORM -################## ADD_VALIDATE ################################## -# called by add_form, used to insert/modify data in DB -} elsif ($op eq 'add_validate') { - my $dbh = C4::Context->dbh; - my $sth=$dbh->prepare("replace biblios_framework (frameworkcode,frameworktext) values (?,?)"); - $sth->execute($input->param('frameworkcode'),$input->param('frameworktext')); - $sth->finish; - print "Content-Type: text/html\n\n"; - exit; - # END $OP eq ADD_VALIDATE -################## DELETE_CONFIRM ################################## -# called by default form, used to confirm deletion of data in DB -} elsif ($op eq 'delete_confirm') { - #start the page and read in includes - my $dbh = C4::Context->dbh; - - # Check both categoryitem and biblioitems, see Bug 199 - my $total = 0; - for my $table ('biblios_tag_structure') { - my $sth=$dbh->prepare("select count(*) as total from $table where frameworkcode=?"); - $sth->execute($frameworkcode); - $total += $sth->fetchrow_hashref->{total}; - $sth->finish; - } - - my $sth=$dbh->prepare("select * from biblios_framework where frameworkcode=?"); - $sth->execute($frameworkcode); - my $data=$sth->fetchrow_hashref; - $sth->finish; - - $template->param(frameworkcode => $frameworkcode, - frameworktext => $data->{'frameworktext'}, - total => $total); - # END $OP eq DELETE_CONFIRM -################## DELETE_CONFIRMED ################################## -# called by delete_confirm, used to effectively confirm deletion of data in DB -} elsif ($op eq 'delete_confirmed') { - #start the page and read in includes - my $dbh = C4::Context->dbh; - my $frameworkcode=uc($input->param('frameworkcode')); - my $sth=$dbh->prepare("delete from biblios_tag_structure where frameworkcode=?"); - $sth->execute($frameworkcode); - $sth=$dbh->prepare("delete from biblios_subfield_structure where frameworkcode=?"); - $sth->execute($frameworkcode); - $sth=$dbh->prepare("delete from biblios_framework where frameworkcode=?"); - $sth->execute($frameworkcode); - $sth->finish; - print "Content-Type: text/html\n\n"; - exit; - # END $OP eq DELETE_CONFIRMED -################## DEFAULT ################################## -} else { # DEFAULT - my $env; - my ($count,$results)=StringSearch($env,$searchfield,'web'); - my $toggle="white"; - my @loop_data; - for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){ - my %row_data; - if ($toggle eq 'white'){ - $row_data{toggle}="#ffffcc"; - } else { - $row_data{toggle}="white"; - } - $row_data{frameworkcode} = $results->[$i]{'frameworkcode'}; - $row_data{frameworktext} = $results->[$i]{'frameworktext'}; - push(@loop_data, \%row_data); - } - $template->param(loop => \@loop_data); - if ($offset>0) { - my $prevpage = $offset-$pagesize; - $template->param(previous => "$script_name?offset=".$prevpage); - } - if ($offset+$pagesize<$count) { - my $nextpage =$offset+$pagesize; - $template->param(next => "$script_name?offset=".$nextpage); - } -} #---- END $OP eq DEFAULT -output_html_with_http_headers $input, $cookie, $template->output; - -# Local Variables: -# tab-width: 4 -# End: diff --git a/admin/biblios_subfields_structure.pl b/admin/biblios_subfields_structure.pl deleted file mode 100644 index 016dc1dcd8..0000000000 --- a/admin/biblios_subfields_structure.pl +++ /dev/null @@ -1,467 +0,0 @@ -#!/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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::Auth; -use CGI; -use C4::Search; -use C4::Context; - -sub StringSearch { - my ($env,$searchstring,$frameworkcode)=@_; - my $dbh = C4::Context->dbh; - $searchstring=~ s/\'/\\\'/g; - my @data=split(' ',$searchstring); - my $count=@data; - my $sth=$dbh->prepare("Select * from biblios_subfield_structure where (tagfield like ? and frameworkcode=?) order by tagfield"); - $sth->execute("$searchstring%",$frameworkcode); - my @results; - my $cnt=0; - my $u=1; - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - $cnt ++; - $u++; - } - $sth->finish; - $dbh->disconnect; - return ($cnt,\@results); -} - -my $input = new CGI; -my $tagfield=$input->param('tagfield'); -my $tagsubfield=$input->param('tagsubfield'); -my $frameworkcode=$input->param('frameworkcode'); -my $pkfield="tagfield"; -my $offset=$input->param('offset'); -my $script_name="/cgi-bin/koha/admin/biblios_subfields_structure.pl"; - -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "admin/biblios_subfields_structure.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); -my $pagesize=30; -my $op = $input->param('op'); -$tagfield=~ s/\,//g; - -if ($op) { -$template->param(script_name => $script_name, - tagfield =>$tagfield, - frameworkcode => $frameworkcode, - $op => 1); # we show only the TMPL_VAR names $op -} else { -$template->param(script_name => $script_name, - tagfield =>$tagfield, - frameworkcode => $frameworkcode, - else => 1); # we show only the TMPL_VAR names $op -} - -################## ADD_FORM ################################## -# called by default. Used to create form to add or modify a record -if ($op eq 'add_form') { - my $data; - my $dbh = C4::Context->dbh; - my $more_subfields = $input->param("more_subfields")+1; - - - # build authorised value list - -my $sth2 = $dbh->prepare("select distinct category from authorised_values"); - $sth2->execute; - my @authorised_values; - push @authorised_values,""; - while ((my $category) = $sth2->fetchrow_array) { - push @authorised_values, $category; - } - push (@authorised_values,"branches"); - push (@authorised_values,"itemtypes"); - # build thesaurus categories list - $sth2->finish; - $sth2 = $dbh->prepare("select authtypecode from auth_types"); - $sth2->execute; - my @authtypes; - push @authtypes,""; - while ((my $authtypecode) = $sth2->fetchrow_array) { - push @authtypes, $authtypecode; - } - # build value_builder list - my @value_builder=(''); - - # read value_builder directory. - # 2 cases here : on CVS install, $cgidir does not need a /cgi-bin - # on a standard install, /cgi-bin need to be added. - # test one, then the other - my $cgidir = C4::Context->intranetdir ."/cgi-bin"; - unless (opendir(DIR, "$cgidir/value_builder")) { - $cgidir = C4::Context->intranetdir; - opendir(DIR, "$cgidir/value_builder") || die "can't opendir $cgidir/value_builder: $!"; - } - while (my $line = readdir(DIR)) { - if ($line =~ /\.pl$/) { - push (@value_builder,$line); - } - } - closedir DIR; - - # build values list - my $sth=$dbh->prepare("select * from biblios_subfield_structure where tagfield=? and frameworkcode=?"); # and tagsubfield='$tagsubfield'"); - $sth->execute($tagfield,$frameworkcode); - my @loop_data = (); - my $toggle=1; - my $i=0; - while ($data =$sth->fetchrow_hashref) { - my %row_data; # get a fresh hash for the row data - if ($toggle eq 1){ - $toggle=0; - } else { - $toggle=1; - } - $row_data{tab} = CGI::scrolling_list(-name=>'tab', - -id=>"tab$i", - -values=>['-1','0','1','2','3','4','5','6','7','8','9'], - -labels => {'-1' =>'ignore','0'=>'0','1'=>'1','2' =>'2','3'=>'3','4'=>'4', - '5' =>'5','6'=>'6','7'=>'7', - '8' =>'8','9'=>'9',}, - -default=>$data->{'tab'}, - -size=>1, - -multiple=>0, - ); - $row_data{ohidden} = CGI::scrolling_list(-name=>'ohidden', - -id=>"ohidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show', - '2' =>'Hide', - }, - -default=>substr($data->{'hidden'},0,1), - -size=>1, - -multiple=>0, - ); - $row_data{ihidden} = CGI::scrolling_list(-name=>'ihidden', - -id=>"ihidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show', - '2' =>'Hide', - }, - -default=>substr($data->{'hidden'},1,1), - -size=>1, - -multiple=>0, - ); - $row_data{ehidden} = CGI::scrolling_list(-name=>'ehidden', - -id=>"ehidden$i", - -values=>['0','1','2'], - -labels => {'0'=>'Show','1'=>'Show Collapsed', - '2' =>'Hide', - }, - -default=>substr($data->{'hidden'},2,1), - -size=>1, - -multiple=>0, - ); - $row_data{tagsubfield} =$data->{'tagsubfield'}."{'tagsubfield'}."\" id=\"tagsubfield\">"; - $row_data{liblibrarian} = CGI::escapeHTML($data->{'liblibrarian'}); - $row_data{libopac} = CGI::escapeHTML($data->{'libopac'}); - $row_data{seealso} = CGI::escapeHTML($data->{'seealso'}); - - $row_data{authorised_value} = CGI::scrolling_list(-name=>'authorised_value', - -id=>'authorised_value', - -values=> \@authorised_values, - -default=>$data->{'authorised_value'}, - -size=>1, - -multiple=>0, - ); - $row_data{value_builder} = CGI::scrolling_list(-name=>'value_builder', - -id=>'value_builder', - -values=> \@value_builder, - -default=>$data->{'value_builder'}, - -size=>1, - -multiple=>0, - ); - $row_data{authtypes} = CGI::scrolling_list(-name=>'authtypecode', - -id=>'authtypecode', - -values=> \@authtypes, - -default=>$data->{'authtypecode'}, - -size=>1, - -multiple=>0, - ); - $row_data{repeatable} = CGI::checkbox(-name=>"repeatable$i", - -checked => $data->{'repeatable'}?'checked':'', - -value => 1, - -label => '', - -id => "repeatable$i"); - $row_data{mandatory} = CGI::checkbox(-name => "mandatory$i", - -checked => $data->{'mandatory'}?'checked':'', - -value => 1, - -label => '', - -id => "mandatory$i"); - $row_data{hidden} = CGI::escapeHTML($data->{hidden}); - $row_data{isurl} = CGI::checkbox( -name => "isurl$i", - -id => "isurl$i", - -checked => $data->{'isurl'}?'checked':'', - -value => 1, - -label => ''); - $row_data{row} = $i; - $row_data{toggle} = $toggle; - $row_data{link} = CGI::escapeHTML($data->{'link'}); - push(@loop_data, \%row_data); - $i++; - } - # add more_subfields empty lines for add if needed - for (my $i=1;$i<=$more_subfields;$i++) { - my %row_data; # get a fresh hash for the row data - $row_data{tab} = CGI::scrolling_list(-name=>'tab', - -id => "tab$i", - -values=>['-1','0','1','2','3','4','5','6','7','8','9'], - -labels => {'-1' =>'ignore','0'=>'0','1'=>'1', - '2' =>'2','3'=>'3','4'=>'4', - '5' =>'5','6'=>'6','7'=>'7', - '8' =>'8','9'=>'9', - }, - -default=>"", - -size=>1, - -multiple=>0, - ); - $row_data{ohidden} = CGI::scrolling_list(-name=>'ohidden', - -id=>"ohidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show','2' =>'Hide',}, - -default=>"0", - -size=>1, - -multiple=>0, - ); - - $row_data{ihidden} = CGI::scrolling_list(-name=>'ihidden', - -id=>"ihidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show','2' =>'Hide',}, - -default=>"0", - -size=>1, - -multiple=>0, - ); - $row_data{ehidden} = CGI::scrolling_list(-name=>'ehidden', - -id=>"ehidden$i", - -values=>['0','1','2'], - -labels => {'0'=>'Show','1'=>'Show Collapsed', - '2' =>'Hide', - }, - -default=>"0", - -size=>1, - -multiple=>0, - ); - $row_data{tagsubfield} = "{'tagsubfield'}."\" size=\"1\" id=\"tagsubfield\" maxlength=\"1\">"; - $row_data{liblibrarian} = ""; - $row_data{libopac} = ""; - $row_data{seealso} = ""; - $row_data{hidden} = "000"; - $row_data{repeatable} = CGI::checkbox( -name=> 'repeatable', - -id => "repeatable$i", - -checked => '', - -value => 1, - -label => ''); - $row_data{mandatory} = CGI::checkbox( -name=> 'mandatory', - -id => "mandatory$i", - -checked => '', - -value => 1, - -label => ''); - $row_data{isurl} = CGI::checkbox(-name => 'isurl', - -id => "isurl$i", - -checked => '', - -value => 1, - -label => ''); - - $row_data{authorised_value} = CGI::scrolling_list(-name=>'authorised_value', - -id => 'authorised_value', - -values=> \@authorised_values, - -size=>1, - -multiple=>0, - ); - $row_data{authtypes} = CGI::scrolling_list(-name=>'authtypecode', - -id => 'authtypecode', - -values=> \@authtypes, - -size=>1, - -multiple=>0, - ); - $row_data{link} = CGI::escapeHTML($data->{'link'}); - $row_data{toggle} = $toggle; - $row_data{row} = $i; - push(@loop_data, \%row_data); - } - $template->param('use-heading-flags-p' => 1); - $template->param('heading-edit-subfields-p' => 1); - $template->param(action => "Edit subfields", - tagfield => "$tagfield", - loop => \@loop_data, - more_subfields => $more_subfields, - more_tag => $tagfield); - - # END $OP eq ADD_FORM -################## ADD_VALIDATE ################################## -# called by add_form, used to insert/modify data in DB -} elsif ($op eq 'add_validate') { - my $dbh = C4::Context->dbh; - $template->param(tagfield => "$input->param('tagfield')"); - my $sth=$dbh->prepare("replace biblios_subfield_structure (tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,tab,seealso,authorised_value,authtypecode,value_builder,hidden,isurl,frameworkcode, link) - values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); - my @tagsubfield = $input->param('tagsubfield'); - my @liblibrarian = $input->param('liblibrarian'); - my @libopac = $input->param('libopac'); - - my @tab = $input->param('tab'); - my @seealso = $input->param('seealso'); -# my @hidden = $input->param('hidden'); - my @hidden; - my @ohidden = $input->param('ohidden'); - my @ihidden = $input->param('ihidden'); - my @ehidden = $input->param('ehidden'); - my @authorised_values = $input->param('authorised_value'); - my @authtypecodes = $input->param('authtypecode'); - my @value_builder =$input->param('value_builder'); - my @link =$input->param('link'); - for (my $i=0; $i<= $#tagsubfield ; $i++) { - my $tagfield =$input->param('tagfield'); - my $tagsubfield =$tagsubfield[$i]; - $tagsubfield="@" unless $tagsubfield ne ''; - my $liblibrarian =$liblibrarian[$i]; - my $libopac =$libopac[$i]; - my $repeatable =$input->param("repeatable$i")?1:0; - my $mandatory =$input->param("mandatory$i")?1:0; - - my $tab =$tab[$i]; - my $seealso =$seealso[$i]; - my $authorised_value =$authorised_values[$i]; - my $authtypecode =$authtypecodes[$i]; - my $value_builder=$value_builder[$i]; - my $hidden = $ohidden[$i].$ihidden[$i].$ehidden[$i]; #collate from 3 hiddens; - my $isurl = $input->param("isurl$i")?1:0; - my $link = $link[$i]; - if ($liblibrarian) { - unless (C4::Context->config('demo') eq 1) { - $sth->execute ($tagfield, - $tagsubfield, - $liblibrarian, - $libopac, - $repeatable, - $mandatory, - - $tab, - $seealso, - $authorised_value, - $authtypecode, - $value_builder, - $hidden, - $isurl, - $frameworkcode, - - $link, - ); - } - } - } - $sth->finish; - print "Content-Type: text/html\n\n"; - exit; - - # END $OP eq ADD_VALIDATE -################## DELETE_CONFIRM ################################## -# called by default form, used to confirm deletion of data in DB -} elsif ($op eq 'delete_confirm') { - my $dbh = C4::Context->dbh; - my $sth=$dbh->prepare("select * from biblios_subfield_structure where tagfield=? and tagsubfield=? and frameworkcode=?"); - #FIXME : called with 2 bind variables when 3 are needed - $sth->execute($tagfield,$tagsubfield); - my $data=$sth->fetchrow_hashref; - $sth->finish; - $template->param(liblibrarian => $data->{'liblibrarian'}, - tagsubfield => $data->{'tagsubfield'}, - delete_link => $script_name, - tagfield =>$tagfield, - tagsubfield => $tagsubfield, - frameworkcode => $frameworkcode, - ); - # END $OP eq DELETE_CONFIRM -################## DELETE_CONFIRMED ################################## -# called by delete_confirm, used to effectively confirm deletion of data in DB -} elsif ($op eq 'delete_confirmed') { - my $dbh = C4::Context->dbh; - unless (C4::Context->config('demo') eq 1) { - my $sth=$dbh->prepare("delete from biblios_subfield_structure where tagfield=? and tagsubfield=? and frameworkcode=?"); - $sth->execute($tagfield,$tagsubfield,$frameworkcode); - $sth->finish; - } - print "Content-Type: text/html\n\n"; - exit; - $template->param(tagfield => $tagfield); - # END $OP eq DELETE_CONFIRMED -################## DEFAULT ################################## -} else { # DEFAULT - my $env; - my ($count,$results)=StringSearch($env,$tagfield,$frameworkcode); - my $toggle=1; - my @loop_data = (); - for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){ - if ($toggle eq 1){ - $toggle=0; - } else { - $toggle=1; - } - my %row_data; # get a fresh hash for the row data - $row_data{tagfield} = $results->[$i]{'tagfield'}; - $row_data{tagsubfield} = $results->[$i]{'tagsubfield'}; - $row_data{liblibrarian} = $results->[$i]{'liblibrarian'}; - $row_data{repeatable} = $results->[$i]{'repeatable'}; - $row_data{mandatory} = $results->[$i]{'mandatory'}; - $row_data{tab} = $results->[$i]{'tab'}; - $row_data{seealso} = $results->[$i]{'seealso'}; - $row_data{authorised_value} = $results->[$i]{'authorised_value'}; - $row_data{authtypecode} = $results->[$i]{'authtypecode'}; - $row_data{value_builder} = $results->[$i]{'value_builder'}; - $row_data{hidden} = $results->[$i]{'hidden'} if($results->[$i]{'hidden'} gt "000") ; - $row_data{isurl} = $results->[$i]{'isurl'}; - $row_data{link} = $results->[$i]{'link'}; - $row_data{delete} = "$script_name?op=delete_confirm&tagfield=$tagfield&tagsubfield=".$results->[$i]{'tagsubfield'}."&frameworkcode=$frameworkcode"; - $row_data{toggle} = $toggle; - if ($row_data{tab} eq -1) { - $row_data{subfield_ignored} = 1; - } - - push(@loop_data, \%row_data); - } - $template->param(loop => \@loop_data); - $template->param(edit_tagfield => $tagfield, - edit_frameworkcode => $frameworkcode); - - if ($offset>0) { - my $prevpage = $offset-$pagesize; - $template->param(prev =>""); - } - if ($offset+$pagesize<$count) { - my $nextpage =$offset+$pagesize; - $template->param(next => ""); - } -} #---- END $OP eq DEFAULT -$template->param(intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), - intranetstylesheet => C4::Context->preference("intranetstylesheet"), - IntranetNav => C4::Context->preference("IntranetNav"), - ); -output_html_with_http_headers $input, $cookie, $template->output; diff --git a/admin/bibliostagstructure.pl b/admin/bibliostagstructure.pl deleted file mode 100644 index 5255e44e17..0000000000 --- a/admin/bibliostagstructure.pl +++ /dev/null @@ -1,397 +0,0 @@ -#!/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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; -use C4::Auth; -use C4::Koha; -use C4::Context; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::Search; - - -# retrieve parameters -my $input = new CGI; -my $frameworkcode = $input->param('frameworkcode'); # set to select framework -$frameworkcode="" unless $frameworkcode; -my $existingframeworkcode = $input->param('existingframeworkcode'); # set when we have to create a new framework (in frameworkcode) by copying an old one (in existingframeworkcode) -$existingframeworkcode = "" unless $existingframeworkcode; -my $frameworkinfo = getframeworkinfo($frameworkcode); -my $searchfield=$input->param('searchfield'); -$searchfield=0 unless $searchfield; -$searchfield=~ s/\,//g; - -my $offset=$input->param('offset'); -my $op = $input->param('op'); -my $dspchoice = $input->param('select_display'); -my $pagesize=20; - -my $script_name="/cgi-bin/koha/admin/bibliostagstructure.pl"; - -my $dbh = C4::Context->dbh; - -# open template -my ($template, $loggedinuser, $cookie) - = get_template_and_user({template_name => "admin/bibliostagstructure.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); - -# get framework list -my $frameworks = getframeworks(); -my @frameworkloop; -foreach my $thisframeworkcode (keys %$frameworks) { - my $selected = 1 if $thisframeworkcode eq $frameworkcode; - my %row =(value => $thisframeworkcode, - selected => $selected, - frameworktext => $frameworks->{$thisframeworkcode}->{'frameworktext'}, - ); - push @frameworkloop, \%row; -} - -# check that framework is defined in biblios_tag_structure -my $sth=$dbh->prepare("select count(*) from biblios_tag_structure where frameworkcode=?"); -$sth->execute($frameworkcode); -my ($frameworkexist) = $sth->fetchrow; -if ($frameworkexist) { -} else { - # if frameworkcode does not exists, then OP must be changed to "create framework" if we are not on the way to create it - # (op = itemtyp_create_confirm) - if ($op eq "framework_create_confirm") { - duplicate_framework($frameworkcode, $existingframeworkcode); - $op=""; # unset $op to go back to framework list - } else { - $op = "framework_create"; - } -} -$template->param(frameworkloop => \@frameworkloop, - frameworkcode => $frameworkcode, - frameworktext => $frameworkinfo->{frameworktext}); -if ($op) { -$template->param(script_name => $script_name, - $op => 1); # we show only the TMPL_VAR names $op -} else { -$template->param(script_name => $script_name, - else => 1); # we show only the TMPL_VAR names $op -} - - -################## ADD_FORM ################################## -# called by default. Used to create form to add or modify a record -if ($op eq 'add_form') { - #---- if primkey exists, it's a modify action, so read values to modify... - my $data; - if ($searchfield) { - $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from biblios_tag_structure where tagfield=? and frameworkcode=?"); - $sth->execute($searchfield,$frameworkcode); - $data=$sth->fetchrow_hashref; - $sth->finish; - } - my $sth = $dbh->prepare("select distinct category from authorised_values"); - $sth->execute; - my @authorised_values; - push @authorised_values,""; - while ((my $category) = $sth->fetchrow_array) { - push @authorised_values, $category; - } - my $authorised_value = CGI::scrolling_list(-name=>'authorised_value', - -values=> \@authorised_values, - -size=>1, - -id=>"authorised_value", - -multiple=>0, - -default => $data->{'authorised_value'}, - ); - - if ($searchfield) { - $template->param(action => "Modify tag", - searchfield => "$searchfield"); - $template->param('heading-modify-tag-p' => 1); - } else { - $template->param(action => "Add tag", - searchfield => ""); - $template->param('heading-add-tag-p' => 1); - } - $template->param('use-heading-flags-p' => 1); - $template->param(liblibrarian => $data->{'liblibrarian'}, - libopac => $data->{'libopac'}, - repeatable => CGI::checkbox(-name=>'repeatable', - -checked=> $data->{'repeatable'}?'checked':'', - -value=> 1, - -label => '', - -id=> 'repeatable'), - mandatory => CGI::checkbox(-name => 'mandatory', - -checked => $data->{'mandatory'}?'checked':'', - -value => 1, - -label => '', - -id => 'mandatory'), - authorised_value => $authorised_value, - frameworkcode => $frameworkcode, - ); - # END $OP eq ADD_FORM -################## ADD_VALIDATE ################################## -# called by add_form, used to insert/modify data in DB -} elsif ($op eq 'add_validate') { - $sth=$dbh->prepare("replace biblios_tag_structure (tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value,frameworkcode) values (?,?,?,?,?,?,?)"); - my $tagfield =$input->param('tagfield'); - my $liblibrarian = $input->param('liblibrarian'); - my $libopac =$input->param('libopac'); - my $repeatable =$input->param('repeatable'); - my $mandatory =$input->param('mandatory'); - my $authorised_value =$input->param('authorised_value'); - unless (C4::Context->config('demo') eq 1) { - $sth->execute($tagfield, - $liblibrarian, - $libopac, - $repeatable?1:0, - $mandatory?1:0, - $authorised_value, - $frameworkcode - ); - } - $sth->finish; - print "Content-Type: text/html\n\n"; - exit; - # END $OP eq ADD_VALIDATE -################## DELETE_CONFIRM ################################## -# called by default form, used to confirm deletion of data in DB -} elsif ($op eq 'delete_confirm') { - $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from biblios_tag_structure where tagfield=? and frameworkcode=?"); - $sth->execute($searchfield,$frameworkcode); - my $data=$sth->fetchrow_hashref; - $sth->finish; - $template->param(liblibrarian => $data->{'liblibrarian'}, - searchfield => $searchfield, - frameworkcode => $frameworkcode, - ); - # END $OP eq DELETE_CONFIRM -################## DELETE_CONFIRMED ################################## -# called by delete_confirm, used to effectively confirm deletion of data in DB -} elsif ($op eq 'delete_confirmed') { - unless (C4::Context->config('demo') eq 1) { - $dbh->do("delete from biblios_tag_structure where tagfield='$searchfield' and frameworkcode='$frameworkcode'"); - $dbh->do("delete from biblios_subfield_structure where tagfield='$searchfield' and frameworkcode='$frameworkcode'"); - - } - # END $OP eq DELETE_CONFIRMED -################## ITEMTYPE_CREATE ################################## -# called automatically if an unexisting frameworkis selected -} elsif ($op eq 'framework_create') { - $sth = $dbh->prepare("select count(*),biblios_tag_structure.frameworkcode,frameworktext from biblios_tag_structure,biblios_framework where biblios_framework.frameworkcode=biblios_tag_structure.frameworkcode group by biblios_tag_structure.frameworkcode"); - $sth->execute; - my @existingframeworkloop; - while (my ($tot,$thisframeworkcode,$frameworktext) = $sth->fetchrow) { - if ($tot>0) { - my %line = ( value => $thisframeworkcode, - frameworktext => $frameworktext, - ); - push @existingframeworkloop,\%line; - } - } - $template->param(existingframeworkloop => \@existingframeworkloop, - frameworkcode => $frameworkcode, -# FRtext => $frameworkinfo->{frameworktext}, - ); -################## DEFAULT ################################## -} else { # DEFAULT - # here, $op can be unset or set to "framework_create_confirm". - if ($searchfield ne '') { - $template->param(searchfield => $searchfield); - } - my $cnt=0; - if ($dspchoice) { - #here, user only wants used tags/subfields displayed - my $env; - $searchfield=~ s/\'/\\\'/g; - my @data=split(' ',$searchfield); - my $sth=$dbh->prepare("Select biblios_tag_structure.tagfield as mts_tagfield,biblios_tag_structure.liblibrarian as mts_liblibrarian,biblios_tag_structure.libopac as mts_libopac,biblios_tag_structure.repeatable as mts_repeatable,biblios_tag_structure.mandatory as mts_mandatory,biblios_tag_structure.authorised_value as mts_authorized_value,biblios_subfield_structure.* from biblios_tag_structure LEFT JOIN biblios_subfield_structure ON (biblios_tag_structure.tagfield=biblios_subfield_structure.tagfield AND biblios_tag_structure.frameworkcode=biblios_subfield_structure.frameworkcode) where (biblios_tag_structure.tagfield >= ? and biblios_tag_structure.frameworkcode=?) AND biblios_subfield_structure.tab>=0 order by biblios_tag_structure.tagfield,biblios_subfield_structure.tagsubfield"); - #could be ordoned by tab - $sth->execute($data[0], $frameworkcode); - my @results = (); - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - $cnt++; - } - $sth->finish; - - my $toggle=0; - my @loop_data = (); - my $j=1; - my $i=$offset; - while ($i < ($offset+$pagesize<$cnt?$offset+$pagesize:$cnt)) { - if ($toggle eq 0){ - $toggle=1; - } else { - $toggle=0; - } - my %row_data; # get a fresh hash for the row data - $row_data{tagfield} = $results[$i]->{'mts_tagfield'}; - $row_data{liblibrarian} = $results[$i]->{'mts_liblibrarian'}; - $row_data{repeatable} = $results[$i]->{'mts_repeatable'}; - $row_data{mandatory} = $results[$i]->{'mts_mandatory'}; - $row_data{authorised_value} = $results[$i]->{'mts_authorised_value'}; - $row_data{subfield_link} ="biblios_subfields_structure.pl?op=add_form&tagfield=".$results[$i]->{'mts_tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{edit} = "$script_name?op=add_form&searchfield=".$results[$i]->{'mts_tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{delete} = "$script_name?op=delete_confirm&searchfield=".$results[$i]->{'mts_tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{toggle} = $toggle; - $j=$i; - my @internal_loop = (); - while (($results[$i]->{'tagfield'}==$results[$j]->{'tagfield'}) and ($j< ($offset+$pagesize<$cnt?$offset+$pagesize:$cnt))) { - if ($toggle eq 0) { - $toggle=1; - } else { - $toggle=0; - } - my %subfield_data; - $subfield_data{tagsubfield} = $results[$j]->{'tagsubfield'}; - $subfield_data{liblibrarian} = $results[$j]->{'liblibrarian'}; - $subfield_data{repeatable} = $results[$j]->{'repeatable'}; - $subfield_data{mandatory} = $results[$j]->{'mandatory'}; - $subfield_data{tab} = $results[$j]->{'tab'}; - $subfield_data{seealso} = $results[$j]->{'seealso'}; - $subfield_data{authorised_value} = $results[$j]->{'authorised_value'}; - $subfield_data{authtypecode}= $results[$j]->{'authtypecode'}; - $subfield_data{value_builder}= $results[$j]->{'value_builder'}; - $subfield_data{toggle} = $toggle; -# warn "tagfield : ".$results[$j]->{'tagfield'}." tagsubfield :".$results[$j]->{'tagsubfield'}; - push @internal_loop,\%subfield_data; - $j++; - } - $row_data{'subfields'}=\@internal_loop; - push(@loop_data, \%row_data); -# undef @internal_loop; - $i=$j; - } - $template->param(select_display => "True", - loop => \@loop_data); - # $sth->execute; - $sth->finish; - } else { - #here, normal old style : display every tags - my $env; - my ($count,$results)=StringSearch($env,$searchfield,$frameworkcode); - $cnt = $count; - my $toggle=0; - my @loop_data = (); - for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){ - if ($toggle eq 0){ - $toggle=1; - } else { - $toggle=0; - } - my %row_data; # get a fresh hash for the row data - $row_data{tagfield} = $results->[$i]{'tagfield'}; - $row_data{liblibrarian} = $results->[$i]{'liblibrarian'}; - $row_data{repeatable} = $results->[$i]{'repeatable'}; - $row_data{mandatory} = $results->[$i]{'mandatory'}; - $row_data{authorised_value} = $results->[$i]{'authorised_value'}; - $row_data{subfield_link} ="biblios_subfields_structure.pl?tagfield=".$results->[$i]{'tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{edit} = "$script_name?op=add_form&searchfield=".$results->[$i]{'tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{delete} = "$script_name?op=delete_confirm&searchfield=".$results->[$i]{'tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{toggle} = $toggle; - push(@loop_data, \%row_data); - } - $template->param(loop => \@loop_data); - } - if ($offset>0) { - my $prevpage = $offset-$pagesize; - $template->param(isprevpage => $offset, - prevpage=> $prevpage, - searchfield => $searchfield, - script_name => $script_name, - frameworkcode => $frameworkcode, - ); - } - if ($offset+$pagesize<$cnt) { - my $nextpage =$offset+$pagesize; - $template->param(nextpage =>$nextpage, - searchfield => $searchfield, - script_name => $script_name, - frameworkcode => $frameworkcode, - ); - } -} #---- END $OP eq DEFAULT - -$template->param(loggeninuser => $loggedinuser, - intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), - intranetstylesheet => C4::Context->preference("intranetstylesheet"), - IntranetNav => C4::Context->preference("IntranetNav"), - ); -output_html_with_http_headers $input, $cookie, $template->output; - - -# -# the sub used for searches -# -sub StringSearch { - my ($env,$searchstring,$frameworkcode)=@_; - my $dbh = C4::Context->dbh; - $searchstring=~ s/\'/\\\'/g; - my @data=split(' ',$searchstring); - my $count=@data; - my $sth=$dbh->prepare("Select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from biblios_tag_structure where (tagfield >= ? and frameworkcode=?) order by tagfield"); - $sth->execute($data[0], $frameworkcode); - my @results; - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - } - # $sth->execute; - $sth->finish; - return (scalar(@results),\@results); -} - -# -# the sub used to duplicate a framework from an existing one in MARC parameters tables. -# -sub duplicate_framework { - my ($newframeworkcode,$oldframeworkcode) = @_; - my $sth = $dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from biblios_tag_structure where frameworkcode=?"); - $sth->execute($oldframeworkcode); - my $sth_insert = $dbh->prepare("insert into biblios_tag_structure (tagfield, liblibrarian, libopac, repeatable, mandatory, authorised_value, frameworkcode) values (?,?,?,?,?,?,?)"); - while ( my ($tagfield,$liblibrarian,$libopac,$repeatable,$mandatory,$authorised_value) = $sth->fetchrow) { - $sth_insert->execute($tagfield,$liblibrarian,$libopac,$repeatable,$mandatory,$authorised_value,$newframeworkcode); - } - - $sth = $dbh->prepare("select frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,tab,authorised_value,authtypecode,value_builder,seealso from biblios_subfield_structure where frameworkcode=?"); - $sth->execute($oldframeworkcode); - $sth_insert = $dbh->prepare("insert into biblios_subfield_structure (frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,tab,authorised_value,authtypecode,value_builder,seealso) values (?,?,?,?,?,?,?,?,?,?,?,?)"); - while ( my ($frameworkcode, $tagfield, $tagsubfield, $liblibrarian, $libopac, $repeatable, $mandatory, $tab, $authorised_value, $thesaurus_category, $value_builder, $seealso) = $sth->fetchrow) { - $sth_insert->execute($newframeworkcode, $tagfield, $tagsubfield, $liblibrarian, $libopac, $repeatable, $mandatory, $tab, $authorised_value, $thesaurus_category, $value_builder, $seealso); - } - -## now the same for holdings - $sth = $dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from holdings_tag_structure where frameworkcode=?"); - $sth->execute($oldframeworkcode); - my $sth_insert = $dbh->prepare("insert into holdings_tag_structure (tagfield, liblibrarian, libopac, repeatable, mandatory, authorised_value, frameworkcode) values (?,?,?,?,?,?,?)"); - while ( my ($tagfield,$liblibrarian,$libopac,$repeatable,$mandatory,$authorised_value) = $sth->fetchrow) { - $sth_insert->execute($tagfield,$liblibrarian,$libopac,$repeatable,$mandatory,$authorised_value,$newframeworkcode); - } - - $sth = $dbh->prepare("select frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,tab,authorised_value,authtypecode,value_builder,seealso from holdings_subfield_structure where frameworkcode=?"); - $sth->execute($oldframeworkcode); - $sth_insert = $dbh->prepare("insert into holdings_subfield_structure (frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,tab,authorised_value,authtypecode,value_builder,seealso) values (?,?,?,?,?,?,?,?,?,?,?,?)"); - while ( my ($frameworkcode, $tagfield, $tagsubfield, $liblibrarian, $libopac, $repeatable, $mandatory, $tab, $authorised_value, $thesaurus_category, $value_builder, $seealso) = $sth->fetchrow) { - $sth_insert->execute($newframeworkcode, $tagfield, $tagsubfield, $liblibrarian, $libopac, $repeatable, $mandatory, $tab, $authorised_value, $thesaurus_category, $value_builder, $seealso); - } -} - diff --git a/admin/holdings_subfields_structure.pl b/admin/holdings_subfields_structure.pl deleted file mode 100644 index 21486e5740..0000000000 --- a/admin/holdings_subfields_structure.pl +++ /dev/null @@ -1,458 +0,0 @@ -#!/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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::Auth; -use CGI; -use C4::Search; -use C4::Context; - - -sub StringSearch { - my ($env,$searchstring,$frameworkcode)=@_; - my $dbh = C4::Context->dbh; - $searchstring=~ s/\'/\\\'/g; - my @data=split(' ',$searchstring); - my $count=@data; - my $sth=$dbh->prepare("Select * from holdings_subfield_structure where (tagfield like ? and frameworkcode=?) order by tagfield"); - $sth->execute("$searchstring%",$frameworkcode); - my @results; - my $cnt=0; - my $u=1; - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - $cnt ++; - $u++; - } - $sth->finish; - $dbh->disconnect; - return ($cnt,\@results); -} - -my $input = new CGI; -my $tagfield=$input->param('tagfield'); -my $tagsubfield=$input->param('tagsubfield'); -my $frameworkcode=$input->param('frameworkcode'); -my $pkfield="tagfield"; -my $offset=$input->param('offset'); -my $script_name="/cgi-bin/koha/admin/holdings_subfields_structure.pl"; - -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "admin/holdings_subfields_structure.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); -my $pagesize=30; -my $op = $input->param('op'); -$tagfield=~ s/\,//g; - -if ($op) { -$template->param(script_name => $script_name, - tagfield =>$tagfield, - frameworkcode => $frameworkcode, - $op => 1); # we show only the TMPL_VAR names $op -} else { -$template->param(script_name => $script_name, - tagfield =>$tagfield, - frameworkcode => $frameworkcode, - else => 1); # we show only the TMPL_VAR names $op -} - -################## ADD_FORM ################################## -# called by default. Used to create form to add or modify a record -if ($op eq 'add_form') { - my $data; - my $dbh = C4::Context->dbh; - my $more_subfields = $input->param("more_subfields")+1; - - - # build authorised value list - -my $sth2 = $dbh->prepare("select distinct category from authorised_values"); - $sth2->execute; - my @authorised_values; - push @authorised_values,""; - while ((my $category) = $sth2->fetchrow_array) { - push @authorised_values, $category; - } - push (@authorised_values,"branches"); - push (@authorised_values,"itemtypes"); - # build thesaurus categories list - $sth2->finish; - $sth2 = $dbh->prepare("select authtypecode from auth_types"); - $sth2->execute; - my @authtypes; - push @authtypes,""; - while ((my $authtypecode) = $sth2->fetchrow_array) { - push @authtypes, $authtypecode; - } - # build value_builder list - my @value_builder=(''); - - # read value_builder directory. - # 2 cases here : on CVS install, $cgidir does not need a /cgi-bin - # on a standard install, /cgi-bin need to be added. - # test one, then the other - my $cgidir = C4::Context->intranetdir ."/cgi-bin"; - unless (opendir(DIR, "$cgidir/value_builder")) { - $cgidir = C4::Context->intranetdir; - opendir(DIR, "$cgidir/value_builder") || die "can't opendir $cgidir/value_builder: $!"; - } - while (my $line = readdir(DIR)) { - if ($line =~ /\.pl$/) { - push (@value_builder,$line); - } - } - closedir DIR; - - # build values list - my $sth=$dbh->prepare("select * from holdings_subfield_structure where tagfield=? and frameworkcode=?"); # and tagsubfield='$tagsubfield'"); - $sth->execute($tagfield,$frameworkcode); - my @loop_data = (); - my $toggle=1; - my $i=0; - while ($data =$sth->fetchrow_hashref) { - my %row_data; # get a fresh hash for the row data - if ($toggle eq 1){ - $toggle=0; - } else { - $toggle=1; - } - $row_data{tab} = CGI::scrolling_list(-name=>'tab', - -id=>"tab$i", - -values=>['-1','10'], - -labels => {'-1' =>'ignore','10'=>'items (10)', }, - -default=>$data->{'tab'}, - -size=>1, - -multiple=>0, - ); - $row_data{ohidden} = CGI::scrolling_list(-name=>'ohidden', - -id=>"ohidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show','2' =>'Hide',}, - -default=>substr($data->{'hidden'},0,1), - -size=>1, - -multiple=>0, - ); - $row_data{ihidden} = CGI::scrolling_list(-name=>'ihidden', - -id=>"ihidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show','2' =>'Hide',}, - -default=>substr($data->{'hidden'},1,1), - -size=>1, - -multiple=>0, - ); - $row_data{ehidden} = CGI::scrolling_list(-name=>'ehidden', - -id=>"ehidden$i", - -values=>['0','1','2'], - -labels => {'0'=>'Show','1'=>'Show Collapsed', - '2' =>'Hide', - }, - -default=>substr($data->{'hidden'},2,1), - -size=>1, - -multiple=>0, - ); - $row_data{tagsubfield} =$data->{'tagsubfield'}."{'tagsubfield'}."\" id=\"tagsubfield\">"; - $row_data{liblibrarian} = CGI::escapeHTML($data->{'liblibrarian'}); - $row_data{libopac} = CGI::escapeHTML($data->{'libopac'}); - $row_data{seealso} = CGI::escapeHTML($data->{'seealso'}); - - $row_data{authorised_value} = CGI::scrolling_list(-name=>'authorised_value', - -id=>'authorised_value', - -values=> \@authorised_values, - -default=>$data->{'authorised_value'}, - -size=>1, - -multiple=>0, - ); - $row_data{value_builder} = CGI::scrolling_list(-name=>'value_builder', - -id=>'value_builder', - -values=> \@value_builder, - -default=>$data->{'value_builder'}, - -size=>1, - -multiple=>0, - ); - $row_data{authtypes} = CGI::scrolling_list(-name=>'authtypecode', - -id=>'authtypecode', - -values=> \@authtypes, - -default=>$data->{'authtypecode'}, - -size=>1, - -multiple=>0, - ); - $row_data{repeatable} = CGI::checkbox(-name=>"repeatable$i", - -checked => $data->{'repeatable'}?'checked':'', - -value => 1, - -label => '', - -id => "repeatable$i"); - $row_data{mandatory} = CGI::checkbox(-name => "mandatory$i", - -checked => $data->{'mandatory'}?'checked':'', - -value => 1, - -label => '', - -id => "mandatory$i"); - $row_data{hidden} = CGI::escapeHTML($data->{hidden}); - $row_data{isurl} = CGI::checkbox( -name => "isurl$i", - -id => "isurl$i", - -checked => $data->{'isurl'}?'checked':'', - -value => 1, - -label => ''); - $row_data{row} = $i; - $row_data{toggle} = $toggle; - $row_data{link} = CGI::escapeHTML($data->{'link'}); - push(@loop_data, \%row_data); - $i++; - } - # add more_subfields empty lines for add if needed - for (my $i=1;$i<=$more_subfields;$i++) { - my %row_data; # get a fresh hash for the row data - $row_data{tab} = CGI::scrolling_list(-name=>'tab', - -id => "tab$i", - -values=>['-1','10'], - -labels => {'-1' =>'ignore','10'=>'items (10)',}, - -default=>"", - -size=>1, - -multiple=>0, - ); - $row_data{ohidden} = CGI::scrolling_list(-name=>'ohidden', - -id=>"ohidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show','2' =>'Hide',}, - -default=>"0", - -size=>1, - -multiple=>0, - ); - $row_data{ihidden} = CGI::scrolling_list(-name=>'ihidden', - -id=>"ihidden$i", - -values=>['0','2'], - -labels => {'0'=>'Show','2' =>'Hide',}, - -default=>"0", - -size=>1, - -multiple=>0, - ); - $row_data{ehidden} = CGI::scrolling_list(-name=>'ehidden', - -id=>"ehidden$i", - -values=>['0','1','2'], - -labels => {'0'=>'Show','1'=>'Show Collapsed', - '2' =>'Hide', - }, - -default=>"0", - -size=>1, - -multiple=>0, - ); - $row_data{tagsubfield} = "{'tagsubfield'}."\" size=\"1\" id=\"tagsubfield\" maxlength=\"1\">"; - $row_data{liblibrarian} = ""; - $row_data{libopac} = ""; - $row_data{seealso} = ""; - $row_data{hidden} = "000"; - $row_data{repeatable} = CGI::checkbox( -name=> 'repeatable', - -id => "repeatable$i", - -checked => '', - -value => 1, - -label => ''); - $row_data{mandatory} = CGI::checkbox( -name=> 'mandatory', - -id => "mandatory$i", - -checked => '', - -value => 1, - -label => ''); - $row_data{isurl} = CGI::checkbox(-name => 'isurl', - -id => "isurl$i", - -checked => '', - -value => 1, - -label => ''); - - $row_data{authorised_value} = CGI::scrolling_list(-name=>'authorised_value', - -id => 'authorised_value', - -values=> \@authorised_values, - -size=>1, - -multiple=>0, - ); - $row_data{authtypes} = CGI::scrolling_list(-name=>'authtypecode', - -id => 'authtypecode', - -values=> \@authtypes, - -size=>1, - -multiple=>0, - ); - $row_data{link} = CGI::escapeHTML($data->{'link'}); - $row_data{toggle} = $toggle; - $row_data{row} = $i; - push(@loop_data, \%row_data); - } - $template->param('use-heading-flags-p' => 1); - $template->param('heading-edit-subfields-p' => 1); - $template->param(action => "Edit subfields", - tagfield => "$tagfield", - loop => \@loop_data, - more_subfields => $more_subfields, - more_tag => $tagfield); - - # END $OP eq ADD_FORM -################## ADD_VALIDATE ################################## -# called by add_form, used to insert/modify data in DB -} elsif ($op eq 'add_validate') { - my $dbh = C4::Context->dbh; - $template->param(tagfield => "$input->param('tagfield')"); - my $sth=$dbh->prepare("replace holdings_subfield_structure (tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,tab,seealso,authorised_value,authtypecode,value_builder,hidden,isurl,frameworkcode, link) - values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); - my @tagsubfield = $input->param('tagsubfield'); - my @liblibrarian = $input->param('liblibrarian'); - my @libopac = $input->param('libopac'); - - my @tab = $input->param('tab'); - my @seealso = $input->param('seealso'); -# my @hidden = $input->param('hidden'); - my @hidden; - my @ohidden = $input->param('ohidden'); - my @ihidden = $input->param('ihidden'); - my @ehidden = $input->param('ehidden'); - my @authorised_values = $input->param('authorised_value'); - my @authtypecodes = $input->param('authtypecode'); - my @value_builder =$input->param('value_builder'); - my @link =$input->param('link'); - for (my $i=0; $i<= $#tagsubfield ; $i++) { - my $tagfield =$input->param('tagfield'); - my $tagsubfield =$tagsubfield[$i]; - $tagsubfield="@" unless $tagsubfield ne ''; - my $liblibrarian =$liblibrarian[$i]; - my $libopac =$libopac[$i]; - my $repeatable =$input->param("repeatable$i")?1:0; - my $mandatory =$input->param("mandatory$i")?1:0; - - my $tab =$tab[$i]; - my $seealso =$seealso[$i]; - my $authorised_value =$authorised_values[$i]; - my $authtypecode =$authtypecodes[$i]; - my $value_builder=$value_builder[$i]; - my $hidden = $ohidden[$i].$ihidden[$i].$ehidden[$i]; #collate from 3 hiddens; - my $isurl = $input->param("isurl$i")?1:0; - my $link = $link[$i]; - if ($liblibrarian) { - unless (C4::Context->config('demo') eq 1) { - $sth->execute ($tagfield, - $tagsubfield, - $liblibrarian, - $libopac, - $repeatable, - $mandatory, - - $tab, - $seealso, - $authorised_value, - $authtypecode, - $value_builder, - $hidden, - $isurl, - $frameworkcode, - - $link, - ); - } - } - } - $sth->finish; - print "Content-Type: text/html\n\n"; - exit; - - # END $OP eq ADD_VALIDATE -################## DELETE_CONFIRM ################################## -# called by default form, used to confirm deletion of data in DB -} elsif ($op eq 'delete_confirm') { - my $dbh = C4::Context->dbh; - my $sth=$dbh->prepare("select * from holdings_subfield_structure where tagfield=? and tagsubfield=? and frameworkcode=?"); - #FIXME : called with 2 bind variables when 3 are needed - $sth->execute($tagfield,$tagsubfield); - my $data=$sth->fetchrow_hashref; - $sth->finish; - $template->param(liblibrarian => $data->{'liblibrarian'}, - tagsubfield => $data->{'tagsubfield'}, - delete_link => $script_name, - tagfield =>$tagfield, - tagsubfield => $tagsubfield, - frameworkcode => $frameworkcode, - ); - # END $OP eq DELETE_CONFIRM -################## DELETE_CONFIRMED ################################## -# called by delete_confirm, used to effectively confirm deletion of data in DB -} elsif ($op eq 'delete_confirmed') { - my $dbh = C4::Context->dbh; - unless (C4::Context->config('demo') eq 1) { - my $sth=$dbh->prepare("delete from holdings_subfield_structure where tagfield=? and tagsubfield=? and frameworkcode=?"); - $sth->execute($tagfield,$tagsubfield,$frameworkcode); - $sth->finish; - } - print "Content-Type: text/html\n\n"; - exit; - $template->param(tagfield => $tagfield); - # END $OP eq DELETE_CONFIRMED -################## DEFAULT ################################## -} else { # DEFAULT - my $env; - my ($count,$results)=StringSearch($env,$tagfield,$frameworkcode); - my $toggle=1; - my @loop_data = (); - for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){ - if ($toggle eq 1){ - $toggle=0; - } else { - $toggle=1; - } - my %row_data; # get a fresh hash for the row data - $row_data{tagfield} = $results->[$i]{'tagfield'}; - $row_data{tagsubfield} = $results->[$i]{'tagsubfield'}; - $row_data{liblibrarian} = $results->[$i]{'liblibrarian'}; - - $row_data{repeatable} = $results->[$i]{'repeatable'}; - $row_data{mandatory} = $results->[$i]{'mandatory'}; - $row_data{tab} = $results->[$i]{'tab'}; - $row_data{seealso} = $results->[$i]{'seealso'}; - $row_data{authorised_value} = $results->[$i]{'authorised_value'}; - $row_data{authtypecode} = $results->[$i]{'authtypecode'}; - $row_data{value_builder} = $results->[$i]{'value_builder'}; - $row_data{hidden} = $results->[$i]{'hidden'} if($results->[$i]{'hidden'} gt "000") ; - $row_data{isurl} = $results->[$i]{'isurl'}; - $row_data{link} = $results->[$i]{'link'}; - $row_data{delete} = "$script_name?op=delete_confirm&tagfield=$tagfield&tagsubfield=".$results->[$i]{'tagsubfield'}."&frameworkcode=$frameworkcode"; - $row_data{toggle} = $toggle; - if ($row_data{tab} eq -1) { - $row_data{subfield_ignored} = 1; - } - - push(@loop_data, \%row_data); - } - $template->param(loop => \@loop_data); - $template->param(edit_tagfield => $tagfield, - edit_frameworkcode => $frameworkcode); - - if ($offset>0) { - my $prevpage = $offset-$pagesize; - $template->param(prev =>""); - } - if ($offset+$pagesize<$count) { - my $nextpage =$offset+$pagesize; - $template->param(next => ""); - } -} #---- END $OP eq DEFAULT -$template->param(intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), - intranetstylesheet => C4::Context->preference("intranetstylesheet"), - IntranetNav => C4::Context->preference("IntranetNav"), - ); -output_html_with_http_headers $input, $cookie, $template->output; diff --git a/admin/holdingstagstructure.pl b/admin/holdingstagstructure.pl deleted file mode 100644 index 61578d5c05..0000000000 --- a/admin/holdingstagstructure.pl +++ /dev/null @@ -1,366 +0,0 @@ -#!/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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; -use C4::Auth; -use C4::Koha; -use C4::Context; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::Search; - - -# retrieve parameters -my $input = new CGI; -my $frameworkcode = $input->param('frameworkcode'); # set to select framework -$frameworkcode="" unless $frameworkcode; -my $existingframeworkcode = $input->param('existingframeworkcode'); # set when we have to create a new framework (in frameworkcode) by copying an old one (in existingframeworkcode) -$existingframeworkcode = "" unless $existingframeworkcode; -my $frameworkinfo = getframeworkinfo($frameworkcode); -my $searchfield=$input->param('searchfield'); -$searchfield=0 unless $searchfield; -$searchfield=~ s/\,//g; - -my $offset=$input->param('offset'); -my $op = $input->param('op'); -my $dspchoice = $input->param('select_display'); -my $pagesize=20; - -my $script_name="/cgi-bin/koha/admin/holdingstagstructure.pl"; - -my $dbh = C4::Context->dbh; - -# open template -my ($template, $loggedinuser, $cookie) - = get_template_and_user({template_name => "admin/holdingstagstructure.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); - -# get framework list -my $frameworks = getframeworks(); -my @frameworkloop; -foreach my $thisframeworkcode (keys %$frameworks) { - my $selected = 1 if $thisframeworkcode eq $frameworkcode; - my %row =(value => $thisframeworkcode, - selected => $selected, - frameworktext => $frameworks->{$thisframeworkcode}->{'frameworktext'}, - ); - push @frameworkloop, \%row; -} - -# check that framework is defined in holdings_tag_structure -my $sth=$dbh->prepare("select count(*) from holdings_tag_structure where frameworkcode=?"); -$sth->execute($frameworkcode); -my ($frameworkexist) = $sth->fetchrow; -if ($frameworkexist) { -} else { - # if frameworkcode does not exists, then OP must be changed to "create framework" if we are not on the way to create it - # (op = itemtyp_create_confirm) - if ($op eq "framework_create_confirm") { - duplicate_framework($frameworkcode, $existingframeworkcode); - $op=""; # unset $op to go back to framework list - } else { - $op = "framework_create"; - } -} -$template->param(frameworkloop => \@frameworkloop, - frameworkcode => $frameworkcode, - frameworktext => $frameworkinfo->{frameworktext}); -if ($op) { -$template->param(script_name => $script_name, - $op => 1); # we show only the TMPL_VAR names $op -} else { -$template->param(script_name => $script_name, - else => 1); # we show only the TMPL_VAR names $op -} - - -################## ADD_FORM ################################## -# called by default. Used to create form to add or modify a record -if ($op eq 'add_form') { - #---- if primkey exists, it's a modify action, so read values to modify... - my $data; - if ($searchfield) { - $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from holdings_tag_structure where tagfield=? and frameworkcode=?"); - $sth->execute($searchfield,$frameworkcode); - $data=$sth->fetchrow_hashref; - $sth->finish; - } - my $sth = $dbh->prepare("select distinct category from authorised_values"); - $sth->execute; - my @authorised_values; - push @authorised_values,""; - while ((my $category) = $sth->fetchrow_array) { - push @authorised_values, $category; - } - my $authorised_value = CGI::scrolling_list(-name=>'authorised_value', - -values=> \@authorised_values, - -size=>1, - -id=>"authorised_value", - -multiple=>0, - -default => $data->{'authorised_value'}, - ); - - if ($searchfield) { - $template->param(action => "Modify tag", - searchfield => "$searchfield"); - $template->param('heading-modify-tag-p' => 1); - } else { - $template->param(action => "Add tag", - searchfield => ""); - $template->param('heading-add-tag-p' => 1); - } - $template->param('use-heading-flags-p' => 1); - $template->param(liblibrarian => $data->{'liblibrarian'}, - libopac => $data->{'libopac'}, - repeatable => CGI::checkbox(-name=>'repeatable', - -checked=> $data->{'repeatable'}?'checked':'', - -value=> 1, - -label => '', - -id=> 'repeatable'), - mandatory => CGI::checkbox(-name => 'mandatory', - -checked => $data->{'mandatory'}?'checked':'', - -value => 1, - -label => '', - -id => 'mandatory'), - authorised_value => $authorised_value, - frameworkcode => $frameworkcode, - ); - # END $OP eq ADD_FORM -################## ADD_VALIDATE ################################## -# called by add_form, used to insert/modify data in DB -} elsif ($op eq 'add_validate') { - $sth=$dbh->prepare("replace holdings_tag_structure (tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value,frameworkcode) values (?,?,?,?,?,?,?)"); - my $tagfield =$input->param('tagfield'); - my $liblibrarian = $input->param('liblibrarian'); - my $libopac =$input->param('libopac'); - my $repeatable =$input->param('repeatable'); - my $mandatory =$input->param('mandatory'); - my $authorised_value =$input->param('authorised_value'); - unless (C4::Context->config('demo') eq 1) { - $sth->execute($tagfield, - $liblibrarian, - $libopac, - $repeatable?1:0, - $mandatory?1:0, - $authorised_value, - $frameworkcode - ); - } - $sth->finish; - print "Content-Type: text/html\n\n"; - exit; - # END $OP eq ADD_VALIDATE -################## DELETE_CONFIRM ################################## -# called by default form, used to confirm deletion of data in DB -} elsif ($op eq 'delete_confirm') { - $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from holdings_tag_structure where tagfield=? and frameworkcode=?"); - $sth->execute($searchfield,$frameworkcode); - my $data=$sth->fetchrow_hashref; - $sth->finish; - $template->param(liblibrarian => $data->{'liblibrarian'}, - searchfield => $searchfield, - frameworkcode => $frameworkcode, - ); - # END $OP eq DELETE_CONFIRM -################## DELETE_CONFIRMED ################################## -# called by delete_confirm, used to effectively confirm deletion of data in DB -} elsif ($op eq 'delete_confirmed') { - unless (C4::Context->config('demo') eq 1) { - $dbh->do("delete from holdings_tag_structure where tagfield='$searchfield' and frameworkcode='$frameworkcode'"); - $dbh->do("delete from holdings_subfield_structure where tagfield='$searchfield' and frameworkcode='$frameworkcode'"); - - } - # END $OP eq DELETE_CONFIRMED -################## ITEMTYPE_CREATE ################################## -# called automatically if an unexisting frameworkis selected -} elsif ($op eq 'framework_create') { - $sth = $dbh->prepare("select count(*),holdings_tag_structure.frameworkcode,frameworktext from holdings_tag_structure,biblio_framework where biblio_framework.frameworkcode=holdings_tag_structure.frameworkcode group by holdings_tag_structure.frameworkcode"); - $sth->execute; - my @existingframeworkloop; - while (my ($tot,$thisframeworkcode,$frameworktext) = $sth->fetchrow) { - if ($tot>0) { - my %line = ( value => $thisframeworkcode, - frameworktext => $frameworktext, - ); - push @existingframeworkloop,\%line; - } - } - $template->param(existingframeworkloop => \@existingframeworkloop, - frameworkcode => $frameworkcode, -# FRtext => $frameworkinfo->{frameworktext}, - ); -################## DEFAULT ################################## -} else { # DEFAULT - # here, $op can be unset or set to "framework_create_confirm". - if ($searchfield ne '') { - $template->param(searchfield => $searchfield); - } - my $cnt=0; - if ($dspchoice) { - #here, user only wants used tags/subfields displayed - my $env; - $searchfield=~ s/\'/\\\'/g; - my @data=split(' ',$searchfield); - my $sth=$dbh->prepare("Select holdings_tag_structure.tagfield as mts_tagfield,holdings_tag_structure.liblibrarian as mts_liblibrarian,holdings_tag_structure.libopac as mts_libopac,holdings_tag_structure.repeatable as mts_repeatable,holdings_tag_structure.mandatory as mts_mandatory,holdings_tag_structure.authorised_value as mts_authorized_value,holdings_subfield_structure.* from holdings_tag_structure LEFT JOIN holdings_subfield_structure ON (holdings_tag_structure.tagfield=holdings_subfield_structure.tagfield AND holdings_tag_structure.frameworkcode=holdings_subfield_structure.frameworkcode) where (holdings_tag_structure.tagfield >= ? and holdings_tag_structure.frameworkcode=?) AND holdings_subfield_structure.tab>=0 order by holdings_tag_structure.tagfield,holdings_subfield_structure.tagsubfield"); - #could be ordoned by tab - $sth->execute($data[0], $frameworkcode); - my @results = (); - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - $cnt++; - } - $sth->finish; - - my $toggle=0; - my @loop_data = (); - my $j=1; - my $i=$offset; - while ($i < ($offset+$pagesize<$cnt?$offset+$pagesize:$cnt)) { - if ($toggle eq 0){ - $toggle=1; - } else { - $toggle=0; - } - my %row_data; # get a fresh hash for the row data - $row_data{tagfield} = $results[$i]->{'mts_tagfield'}; - $row_data{liblibrarian} = $results[$i]->{'mts_liblibrarian'}; - $row_data{repeatable} = $results[$i]->{'mts_repeatable'}; - $row_data{mandatory} = $results[$i]->{'mts_mandatory'}; - $row_data{authorised_value} = $results[$i]->{'mts_authorised_value'}; - $row_data{subfield_link} ="holdings_subfields_structure.pl?op=add_form&tagfield=".$results[$i]->{'mts_tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{edit} = "$script_name?op=add_form&searchfield=".$results[$i]->{'mts_tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{delete} = "$script_name?op=delete_confirm&searchfield=".$results[$i]->{'mts_tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{toggle} = $toggle; - $j=$i; - my @internal_loop = (); - while (($results[$i]->{'tagfield'}==$results[$j]->{'tagfield'}) and ($j< ($offset+$pagesize<$cnt?$offset+$pagesize:$cnt))) { - if ($toggle eq 0) { - $toggle=1; - } else { - $toggle=0; - } - my %subfield_data; - $subfield_data{tagsubfield} = $results[$j]->{'tagsubfield'}; - $subfield_data{liblibrarian} = $results[$j]->{'liblibrarian'}; - - $subfield_data{repeatable} = $results[$j]->{'repeatable'}; - $subfield_data{mandatory} = $results[$j]->{'mandatory'}; - $subfield_data{tab} = $results[$j]->{'tab'}; - $subfield_data{seealso} = $results[$j]->{'seealso'}; - $subfield_data{authorised_value} = $results[$j]->{'authorised_value'}; - $subfield_data{authtypecode}= $results[$j]->{'authtypecode'}; - $subfield_data{value_builder}= $results[$j]->{'value_builder'}; - $subfield_data{toggle} = $toggle; -# warn "tagfield : ".$results[$j]->{'tagfield'}." tagsubfield :".$results[$j]->{'tagsubfield'}; - push @internal_loop,\%subfield_data; - $j++; - } - $row_data{'subfields'}=\@internal_loop; - push(@loop_data, \%row_data); -# undef @internal_loop; - $i=$j; - } - $template->param(select_display => "True", - loop => \@loop_data); - # $sth->execute; - $sth->finish; - } else { - #here, normal old style : display every tags - my $env; - my ($count,$results)=StringSearch($env,$searchfield,$frameworkcode); - $cnt = $count; - my $toggle=0; - my @loop_data = (); - for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){ - if ($toggle eq 0){ - $toggle=1; - } else { - $toggle=0; - } - my %row_data; # get a fresh hash for the row data - $row_data{tagfield} = $results->[$i]{'tagfield'}; - $row_data{liblibrarian} = $results->[$i]{'liblibrarian'}; - $row_data{repeatable} = $results->[$i]{'repeatable'}; - $row_data{mandatory} = $results->[$i]{'mandatory'}; - $row_data{authorised_value} = $results->[$i]{'authorised_value'}; - $row_data{subfield_link} ="holdings_subfields_structure.pl?tagfield=".$results->[$i]{'tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{edit} = "$script_name?op=add_form&searchfield=".$results->[$i]{'tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{delete} = "$script_name?op=delete_confirm&searchfield=".$results->[$i]{'tagfield'}."&frameworkcode=".$frameworkcode; - $row_data{toggle} = $toggle; - push(@loop_data, \%row_data); - } - $template->param(loop => \@loop_data); - } - if ($offset>0) { - my $prevpage = $offset-$pagesize; - $template->param(isprevpage => $offset, - prevpage=> $prevpage, - searchfield => $searchfield, - script_name => $script_name, - frameworkcode => $frameworkcode, - ); - } - if ($offset+$pagesize<$cnt) { - my $nextpage =$offset+$pagesize; - $template->param(nextpage =>$nextpage, - searchfield => $searchfield, - script_name => $script_name, - frameworkcode => $frameworkcode, - ); - } -} #---- END $OP eq DEFAULT - -$template->param(loggeninuser => $loggedinuser, - intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), - intranetstylesheet => C4::Context->preference("intranetstylesheet"), - IntranetNav => C4::Context->preference("IntranetNav"), - ); -output_html_with_http_headers $input, $cookie, $template->output; - - -# -# the sub used for searches -# -sub StringSearch { - my ($env,$searchstring,$frameworkcode)=@_; - my $dbh = C4::Context->dbh; - $searchstring=~ s/\'/\\\'/g; - my @data=split(' ',$searchstring); - my $count=@data; - my $sth=$dbh->prepare("Select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from holdings_tag_structure where (tagfield >= ? and frameworkcode=?) order by tagfield"); - $sth->execute($data[0], $frameworkcode); - my @results; - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - } - # $sth->execute; - $sth->finish; - return (scalar(@results),\@results); -} - -# - - diff --git a/admin/institutions-careers.pl b/admin/institutions-careers.pl deleted file mode 100644 index 911efc9597..0000000000 --- a/admin/institutions-careers.pl +++ /dev/null @@ -1,74 +0,0 @@ -#!/usr/bin/perl - -# Script to manage the educational institutions and its careers. -# written 12/04 -# Castañeda, Carlos Sebastian - seba3c@yahoo.com.ar - Physics Library UNLP Argentina - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; - -use C4::Auth; -use C4::Context; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::AcademicInfo; - -my $cgi = new CGI; - -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "admin/institutions-careers.tmpl", - query => $cgi, - type => "intranet", - authnotrequired => 0, - flagsrequired => {editcatalogue => 1}, - debug => 1, - }); - -my $op = $cgi->param('op'); -my $id_institution = $cgi->param('id_institution'); -my $institution_name = $cgi->param('institution_name'); - -if ($op eq 'add_form') { - $template->param(add_form => 1); - - if ($id_institution) { - my $info = get_educational_institution($id_institution); - $template->param(op => 'edit'); - $template->param(institution_name => $info->{'institution_name'}); - $template->param(id_institution => $id_institution); - } else { - $template->param(op => 'add'); - } - -} elsif ($op eq 'add') { - add_educational_institution($institution_name); - print $cgi->redirect('/cgi-bin/koha/admin/institutions-careers.pl'); -} elsif ($op eq 'edit') { - update_educational_institution($id_institution, $institution_name); - print $cgi->redirect('/cgi-bin/koha/admin/institutions-careers.pl'); -} elsif ($op eq 'del') { - del_educational_institution($id_institution); - print $cgi->redirect('/cgi-bin/koha/admin/institutions-careers.pl'); -} else { - my @educ_institutions = &get_careers_by_institution(); - $template->param(institutions => \@educ_institutions); -} - -output_html_with_http_headers $cgi, $cookie, $template->output; diff --git a/admin/koha-electronic.pl b/admin/koha-electronic.pl deleted file mode 100644 index f105451df6..0000000000 --- a/admin/koha-electronic.pl +++ /dev/null @@ -1,102 +0,0 @@ -#!/usr/bin/perl - -# Script to manage the opac news. -# written 11/04 -# Castañeda, Carlos Sebastian - seba3c@yahoo.com.ar - Physics Library UNLP Argentina - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; - -use C4::Auth; -use C4::Context; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::NewsChannels; - - -my $cgi = new CGI; - -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "admin/koha-electronic.tmpl", - query => $cgi, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); - -my $op = $cgi->param('op'); - -if ($op eq 'add_form') { - $template->param(add_form => 1); - my $id = $cgi->param("id"); - my $edata; -# warn "add_form"; - if ($id) { - $template->param(op => 'edit'); - $edata = get_opac_electronic($id); - $template->param($edata); - $template->param(id => $edata->{'idelectronic'}); - } else { - $template->param(op => 'add'); - } - -} elsif ($op eq 'add') { -# warn "add"; - my $title = $cgi->param('title'); - my $edata = $cgi->param('edata'); - my $lang = $cgi->param('lang'); - my $image = $cgi->param('image'); - my $href = $cgi->param('href'); - my $section = $cgi->param('section'); - add_opac_electronic($title, $edata, $lang,$image, $href,$section); - print $cgi->redirect('/cgi-bin/koha/admin/koha-electronic.pl'); - -} elsif ($op eq 'edit') { -# warn "edit"; - my $id = $cgi->param('id'); - my $title = $cgi->param('title'); - my $edata = $cgi->param('edata'); - my $lang = $cgi->param('lang'); - my $image = $cgi->param('image'); - my $href = $cgi->param('href'); - my $section = $cgi->param('section'); - upd_opac_electronic($id, $title, $edata, $lang,$image,$href,$section); - print $cgi->redirect('/cgi-bin/koha/admin/koha-electronic.pl'); - -} elsif ($op eq 'del') { -# warn "del"; - my @ids = $cgi->param('ids'); - del_opac_electronic(join ",", @ids); - print $cgi->redirect('/cgi-bin/koha/admin/koha-electronic.pl'); - -} else { -# warn "else"; - - my $lang = $cgi->param('lang'); - - my ($opac_electronic_count, $opac_electronic) = &get_opac_electronics(undef, $lang); - $template->param($lang => 1); - $template->param(opac_electronic => $opac_electronic); - $template->param(opac_electronic_count => $opac_electronic_count); - -} - -output_html_with_http_headers $cgi, $cookie, $template->output; diff --git a/admin/koha-news.pl b/admin/koha-news.pl deleted file mode 100644 index 869710e73d..0000000000 --- a/admin/koha-news.pl +++ /dev/null @@ -1,95 +0,0 @@ -#!/usr/bin/perl - -# Script to manage the opac news. -# written 11/04 -# Castañeda, Carlos Sebastian - seba3c@yahoo.com.ar - Physics Library UNLP Argentina - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; - -use C4::Auth; -use C4::Context; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::NewsChannels; - - -my $cgi = new CGI; - -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "admin/koha-news.tmpl", - query => $cgi, - type => "intranet", - authnotrequired => 0, - flagsrequired => {management => 1}, - debug => 1, - }); - -my $op = $cgi->param('op'); - -if ($op eq 'add_form') { - $template->param(add_form => 1); - my $id = $cgi->param("id"); - my $new; - - if ($id) { - $template->param(op => 'edit'); - $new = get_opac_new($id); - $template->param($new); - $template->param(id => $new->{'idnew'}); - } else { - $template->param(op => 'add'); - } - -} elsif ($op eq 'add') { - - my $title = $cgi->param('title'); - my $new = $cgi->param('new'); - my $lang = $cgi->param('lang'); - - add_opac_new($title, $new, $lang); - print $cgi->redirect('/cgi-bin/koha/admin/koha-news.pl'); - -} elsif ($op eq 'edit') { - - my $id = $cgi->param('id'); - my $title = $cgi->param('title'); - my $new = $cgi->param('new'); - my $lang = $cgi->param('lang'); - - upd_opac_new($id, $title, $new, $lang); - print $cgi->redirect('/cgi-bin/koha/admin/koha-news.pl'); - -} elsif ($op eq 'del') { - my @ids = $cgi->param('ids'); - del_opac_new(join ",", @ids); - print $cgi->redirect('/cgi-bin/koha/admin/koha-news.pl'); - -} else { - - my $lang = $cgi->param('lang'); - my ($opac_news_count, $opac_news) = &get_opac_news(undef, $lang); - $template->param($lang => 1); - $template->param(opac_news => $opac_news); - $template->param(opac_news_count => $opac_news_count); - -} - -output_html_with_http_headers $cgi, $cookie, $template->output; diff --git a/admin/koha_attr.pl b/admin/koha_attr.pl deleted file mode 100644 index 1ce336a74c..0000000000 --- a/admin/koha_attr.pl +++ /dev/null @@ -1,321 +0,0 @@ -#!/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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; -use C4::Auth; -use C4::Koha; -use C4::Context; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::Search; - - -# retrieve parameters -my $input = new CGI; - -my $searchfield=$input->param('searchfield'); -$searchfield="" unless $searchfield; -my $id=$input->param('id'); -my $offset=$input->param('offset'); -$offset=0 unless $offset; -my $op = $input->param('op'); -my $dspchoice = $input->param('select_display'); -my $pagesize=20; -my @results = (); -my $script_name="/cgi-bin/koha/admin/koha_attr.pl"; - -my $dbh = C4::Context->dbh; -my $sth; -# open template -my ($template, $loggedinuser, $cookie) - = get_template_and_user({template_name => "admin/koha_attr.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {parameters => 1}, - debug => 1, - }); - - -if ($op) { -$template->param(script_name => $script_name, - $op => 1); # we show only the TMPL_VAR names $op -} else { -$template->param(script_name => $script_name, - else => 1); # we show only the TMPL_VAR names $op -} - - -################## ADD_FORM ################################## -# called by default. Used to create form to add or modify a record -if ($op eq 'add_form') { - #---- if primkey exists, it's a modify action, so read values to modify... - my $data; - if ($id) { - $sth=$dbh->prepare("select id,kohafield,attr,label,sorts,recordtype,tagfield,tagsubfield,opacshow,intrashow from koha_attr where id=? "); - $sth->execute($id); - $data=$sth->fetchrow_hashref; - $sth->finish; - } - my $sth = $dbh->prepare("select authorised_value from authorised_values where category='recordtype'"); - $sth->execute; - my @authorised_values; - #push @authorised_values,""; - while ((my $category) = $sth->fetchrow_array) { - push @authorised_values, $category; - } - my $recordlist = CGI::scrolling_list(-name=>'recordtype', - -values=> \@authorised_values, - -size=>1, - -multiple=>0, - -default => $data->{'recordtype'}, - ); - my $sth = $dbh->prepare("select authorised_value from authorised_values where category='mfield' order by lib"); - $sth->execute; - my @authorised_values; - #push @authorised_values,""; - while ((my $category) = $sth->fetchrow_array) { - push @authorised_values, $category; - } - my $taglist = CGI::scrolling_list(-name=>'tagfield', - -values=> \@authorised_values, - -size=>1, - -multiple=>0, - -default => $data->{'tagfield'}, - ); - my $sth = $dbh->prepare("select authorised_value from authorised_values where category='subfield' order by lib "); - $sth->execute; - my @authorised_values; - #push @authorised_values,""; - while ((my $category) = $sth->fetchrow_array) { - push @authorised_values, $category; - } - my $tagsublist = CGI::scrolling_list(-name=>'tagsubfield', - -values=> \@authorised_values, - -size=>1, - -multiple=>0, - -default => $data->{'tagsubfield'}, - ); - - if ($searchfield) { - $template->param(action => "Modify tag",id=>$id ,searchfield => "$searchfield"); - $template->param('heading-modify-tag-p' => 1); - } else { - $template->param(action => "Add tag", - searchfield => ""); - $template->param('heading-add-tag-p' => 1); - } - $template->param('use-heading-flags-p' => 1); - $template->param(label => $data->{'label'}, - attr=> $data->{'attr'}, - recordtype=>$recordlist, - tagfield=>$taglist, - tagsubfield=>$tagsublist, - sorts => CGI::checkbox(-name=>'sorts', - -checked=> $data->{'sorts'}?'checked':'', - -value=> 1, - -label => '', - -id=> 'sorts'), - opacshow => CGI::checkbox(-name=>'opacshow', - -checked=> $data->{'opacshow'}?'checked':'', - -value=> 1, - -label => '', - -id=> 'opacshow'), - intrashow => CGI::checkbox(-name=>'intrashow', - -checked=> $data->{'intrashow'}?'checked':'', - -value=> 1, - -label => '', - -id=> 'intrashow'), - - - ); - # END $OP eq ADD_FORM -################## ADD_VALIDATE ################################## -# called by add_form, used to insert/modify data in DB -} elsif ($op eq 'add_validate') { -my $id =$input->param('id'); - - $sth=$dbh->prepare("replace koha_attr set id=?,kohafield=?,attr=?,label=?,sorts=?,recordtype=?,tagfield=?,tagsubfield=? ,opacshow=?,intrashow=? "); - - - my $kohafield =$input->param('kohafield'); - my $attr =$input->param('attr'); - my $label = $input->param('label'); - my $sorts =$input->param('sorts'); - my $opacshow =$input->param('opacshow'); - my $intrashow =$input->param('intrashow'); - my $recordtype =$input->param('recordtype'); - my $tagfield =$input->param('tagfield'); - my $tagsubfield =$input->param('tagsubfield'); - unless (C4::Context->config('demo') eq 1) { - $sth->execute( $id,$kohafield,$attr,$label,$sorts?1:0,$recordtype,$tagfield,$tagsubfield,$opacshow?1:0,$intrashow?1:0); - } - $sth->finish; - print "Content-Type: text/html\n\n"; - - exit; - # END $OP eq ADD_VALIDATE -################## DELETE_CONFIRM ################################## -# called by default form, used to confirm deletion of data in DB -} elsif ($op eq 'delete_confirm') { - $sth=$dbh->prepare("select id,kohafield,label,recordtype from koha_attr where id=? "); - $sth->execute($id); - my $data=$sth->fetchrow_hashref; - $sth->finish; - $template->param(label => $data->{'label'}."/". $data->{'recordtype'},id=>$data->{'id'}, - searchfield => $searchfield, - ); - # END $OP eq DELETE_CONFIRM -################## DELETE_CONFIRMED ################################## -# called by delete_confirm, used to effectively confirm deletion of data in DB -} elsif ($op eq 'delete_confirmed') { - - unless (C4::Context->config('demo') eq 1) { - $dbh->do("delete from koha_attr where id=$id "); - } - # END $OP eq DELETE_CONFIRMED - -################## DEFAULT ################################## -} else { # DEFAULT - # here, $op can be unset or set - if ($searchfield ne '') { - $template->param(searchfield => $searchfield); - } - my $cnt=0; - if ($dspchoice) { - #here, user only wants used tags/subfields displayed - my $sth=$dbh->prepare("Select * from koha_attr where tagfield <>'' and kohafield >= ? "); - #could be ordoned by tab - $sth->execute($searchfield); - - while (my $data=$sth->fetchrow_hashref){ - push(@results,$data); - $cnt++; - } - - $sth->finish; - - my $toggle=0; - my @loop_data = (); - my $j=1; - my $i=$offset; - while ($i < ($offset+$pagesize<$cnt?$offset+$pagesize:$cnt)) { - if ($toggle eq 0){ - $toggle=1; - } else { - $toggle=0; - } - my %row_data; # get a fresh hash for the row data - $row_data{id} = $results[$i]->{'id'}; - $row_data{kohafield} = $results[$i]->{'kohafield'}; - $row_data{label} = $results[$i]->{'label'}; - $row_data{sorts} = $results[$i]->{'sorts'}; - $row_data{attr} = $results[$i]->{'attr'}; - $row_data{recordtype} = $results[$i]->{'recordtype'}; - $row_data{tagfield} = $results[$i]->{'tagfield'}; - $row_data{tagsubfield} = $results[$i]->{'tagsubfield'}; - $row_data{opacshow} = $results[$i]->{'opacshow'}; - $row_data{intrashow} = $results[$i]->{'intrashow'}; - $row_data{edit} = "$script_name?op=add_form&searchfield=".$results[$i]->{'kohafield'}."&id=".$results[$i]->{'id'}; - $row_data{delete} = "$script_name?op=delete_confirm&searchfield=".$results[$i]->{'kohafield'}."&id=".$results[$i]->{'id'}; - $row_data{toggle} = $toggle; - push(@loop_data, \%row_data); - $i++; - } - $template->param(select_display => "True", - loop => \@loop_data); - $sth->finish; - } else { - #here, normal old style : display every tags - my ($count,@results)=StringSearch($dbh,$searchfield); - $cnt = $count; - my $toggle=0; - my @loop_data = (); - for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){ - if ($toggle eq 0){ - $toggle=1; - } else { - $toggle=0; - } - my %row_data; # get a fresh hash for the row data - $row_data{id} = $results[$i]->{'id'}; - $row_data{kohafield} = $results[$i]->{'kohafield'}; - $row_data{label} = $results[$i]->{'label'}; - $row_data{sorts} = $results[$i]->{'sorts'}; - $row_data{attr} = $results[$i]->{'attr'}; - $row_data{recordtype} = $results[$i]->{'recordtype'}; - $row_data{tagfield} = $results[$i]->{'tagfield'}; - $row_data{tagsubfield} = $results[$i]->{'tagsubfield'}; - $row_data{opacshow} = $results[$i]->{'opacshow'}; - $row_data{intrashow} = $results[$i]->{'intrashow'}; - $row_data{edit} = "$script_name?op=add_form&searchfield=".$results[$i]->{'kohafield'}."&id=".$results[$i]->{'id'}; - $row_data{delete} = "$script_name?op=delete_confirm&searchfield=".$results[$i]->{'kohafield'}."&id=".$results[$i]->{'id'}; - $row_data{toggle} = $toggle; - push(@loop_data, \%row_data); - } - $template->param(loop => \@loop_data); - } - if ($offset>0) { - my $prevpage = $offset-$pagesize; - $template->param(isprevpage => $offset, - prevpage=> $prevpage, - searchfield => $searchfield, - script_name => $script_name, - - ); - } - if ($offset+$pagesize<$cnt) { - my $nextpage =$offset+$pagesize; - $template->param(nextpage =>$nextpage, - searchfield => $searchfield, - script_name => $script_name, - - ); - } -} #---- END $OP eq DEFAULT - -$template->param(loggeninuser => $loggedinuser, - intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), - intranetstylesheet => C4::Context->preference("intranetstylesheet"), - IntranetNav => C4::Context->preference("IntranetNav"), - ); -output_html_with_http_headers $input, $cookie, $template->output; - - -# -# the sub used for searches -# -sub StringSearch { - my ($dbh,$searchstring)=@_; - my $sth=$dbh->prepare("Select * from koha_attr where kohafield >=? order by kohafield"); - $sth->execute($searchstring); - my @dataresults; - while (my $data=$sth->fetchrow_hashref){ - push(@dataresults,$data); - - } - - $sth->finish; - return (scalar(@dataresults),@dataresults); -} - - - diff --git a/admin/stopwords.pl b/admin/stopwords.pl deleted file mode 100755 index da465c8a92..0000000000 --- a/admin/stopwords.pl +++ /dev/null @@ -1,171 +0,0 @@ -#!/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 -# -### -# -# script to administer the stopwords table -# -# - written on 2002/02/20 by paul.poulain@free.fr -# -# - experimentaly rewrittten on 2006/04/06 by Pierrick LE GALL (INEO media -# system) -# - -use strict; -use CGI; -use List::Util qw/min/; - -use C4::Koha; -use C4::Context; -use C4::Output; -use C4::Search; -use HTML::Template; -use C4::Auth; -use C4::Interface::CGI::Output; - -sub StringSearch { - my ($searchstring) = @_; - - my $dbh = C4::Context->dbh; - $searchstring =~ s/\'/\\\'/g; - my @tokens = split(' ',$searchstring); - - my $query = ' -SELECT word - FROM stopwords - WHERE (word like ?) - ORDER BY word -'; - my $sth = $dbh->prepare($query); - $sth->execute($tokens[0].'%'); - my @results; - while (my $row = $sth->fetchrow_hashref) { - push(@results, $row->{word}); - } - $sth->finish; - - return @results; -} - -my $dbh = C4::Context->dbh; -my $sth; -my $query; -my $input = new CGI; -my $searchfield = $input->param('searchfield'); -my $script_name="/cgi-bin/koha/admin/stopwords.pl"; - -my $pagesize = 40; -my $op = $input->param('op'); -$searchfield=~ s/\,//g; - -my ($template, $loggedinuser, $cookie) - = get_template_and_user({template_name => "admin/stopwords.tmpl", - query => $input, - type => "intranet", - flagsrequired => {parameters => 1, management => 1}, - authnotrequired => 0, - debug => 1, - }); - -$template->param(script_name => $script_name, - searchfield => $searchfield); - -if ($input->param('add')) { - if ($input->param('word')) { - my @words = split / |,/, $input->param('word'); - - $query = ' -DELETE - FROM stopwords - WHERE word IN (?'.(',?' x scalar @words - 1).') -'; - $sth = $dbh->prepare($query); - $sth->execute(@words); - $sth->finish; - - $query = ' -INSERT - INTO stopwords - (word) - VALUES - (?)'.(',(?)' x scalar @words - 1).' -'; - $sth = $dbh->prepare($query); - $sth->execute(@words); - $sth->finish; - - $template->param(stopword_added => 1); - } -} -elsif ($input->param('deleteSelected')) { - if ($input->param('stopwords[]')) { - my @stopwords_loop = (); - - foreach my $word ($input->param('stopwords[]')) { - push @stopwords_loop, {word => $word}; - } - - $template->param( - delete_confirm => 1, - stopwords_to_delete => \@stopwords_loop, - ); - } -} -elsif ($input->param('confirmDeletion')) { - my @words = $input->param('confirmed_stopwords[]'); - - $query = ' -DELETE - FROM stopwords - WHERE word IN (?'.(',?' x scalar @words - 1).') -'; - $sth = $dbh->prepare($query); - $sth->execute(@words); - $sth->finish; - - $template->param(delete_confirmed => 1); -} - -my $page = $input->param('page') || 1; - -my @results = StringSearch($searchfield); -my @loop; - -my $first = ($page - 1) * $pagesize; - -# if we are on the last page, the number of the last word to display must -# not exceed the length of the results array -my $last = min( - $first + $pagesize - 1, - scalar(@results) - 1, -); - -foreach my $word (@results[$first .. $last]) { - push @loop, {word => $word}; -} - -$template->param( - loop => \@loop, - pagination_bar => pagination_bar( - $script_name, - getnbpages(scalar @results, $pagesize), - $page, - 'page' - ) -); - -output_html_with_http_headers $input, $cookie, $template->output; diff --git a/admin/viewlog.pl b/admin/viewlog.pl deleted file mode 100755 index 3a8f369feb..0000000000 --- a/admin/viewlog.pl +++ /dev/null @@ -1,148 +0,0 @@ -#!/usr/bin/perl - -# $Id$ - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use C4::Auth; -use CGI; -use C4::Context; -use C4::Koha; -use C4::Interface::CGI::Output; -use C4::Log; -use Date::Manip; - -=head1 NAME - -plugin that shows a stats on catalogers - -=head1 DESCRIPTION - - -=over2 - -=cut - -my $input = new CGI; -my $do_it=$input->param('do_it'); -my $fullreportname = "parameters/viewlog.tmpl"; -my $modulename = $input->param("module"); -my $userfilter = $input->param("user"); -my $actionfilter = $input->param("action"); -my $fromfilter = $input->param("from"); -my $tofilter = $input->param("to"); -my $basename = $input->param("basename"); -my $mime = $input->param("MIME"); -my $del = $input->param("sep"); -my $output = $input->param("output"); - - -my ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => $fullreportname, - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {editcatalogue => 1}, - debug => 1, - }); -$template->param(do_it => $do_it); -if ($do_it) { -# Displaying results - #building filters - my @filters; - push @filters, {name=> 'user', value=> $userfilter} if ($userfilter); - push @filters, {name=> 'action', value=> $actionfilter} if ($actionfilter); - push @filters, {name=> 'from', value=> $fromfilter} if ($fromfilter); - push @filters, {name=> 'to', value=> $tofilter} if ($tofilter); - if ($modulename eq "catalogue"){ - my $titlefilter = $input->param("title"); - my $authorfilter = $input->param("author"); - my $publisherfilter = $input->param("publisher"); - my $callnumberfilter = $input->param("itemcallnumber"); - - push @filters, {name=> 'title', value=> $titlefilter} if ($titlefilter); - push @filters, {name=> 'author', value=> $authorfilter} if ($authorfilter); - push @filters, {name=> 'publisher', value=> $publisherfilter} if ($publisherfilter); - push @filters, {name=> 'callnumber', value=> $callnumberfilter} if ($callnumberfilter); - } - - my ($count, $results) = displaylog( $modulename, @filters); - if ($output eq "screen"){ -# Printing results to screen - $template->param(modulename =>$modulename, $modulename => 1, looprow => $results,counter=>$count); - output_html_with_http_headers $input, $cookie, $template->output; - exit(1); - } else { -# Printing to a csv file - print $input->header(-type => 'application/vnd.sun.xml.calc', - -attachment=>"$basename.csv", - -filename=>"$basename.csv" ); - my $sep; - $sep =C4::Context->preference("delimiter"); -# header top-right -# Other header -# Table - foreach my $line ( @$results ) { - if ($modulename eq "catalogue"){ - print $line->{timestamp}.$sep; - print $line->{firstname}.$sep; - print $line->{surname}.$sep; - print $line->{action}.$sep; - print $line->{info}.$sep; - print $line->{title}.$sep; - print $line->{author}.$sep; - } - print "\n"; - } -# footer - exit(1); - } -} else { - my $dbh = C4::Context->dbh; - my @values; - my %labels; - my %select; - my $req; - - my @mime = ( C4::Context->preference("MIME") ); -# foreach my $mime (@mime){ -# warn "".$mime; -# } - - my $CGIextChoice=CGI::scrolling_list( - -name => 'MIME', - -id => 'MIME', - -values => \@mime, - -size => 1, - -multiple => 0 ); - - my @dels = ( C4::Context->preference("delimiter") ); - my $CGIsepChoice=CGI::scrolling_list( - -name => 'sep', - -id => 'sep', - -values => \@dels, - -size => 1, - -multiple => 0 ); - - $template->param( - CGIextChoice => $CGIextChoice, - CGIsepChoice => $CGIsepChoice - ); -output_html_with_http_headers $input, $cookie, $template->output; -} diff --git a/barcodes/create_labels_conf_table.sql b/barcodes/create_labels_conf_table.sql deleted file mode 100644 index 6fec07a3d7..0000000000 --- a/barcodes/create_labels_conf_table.sql +++ /dev/null @@ -1,44 +0,0 @@ --- MySQL dump 9.11 --- --- Host: localhost Database: opusdev --- ------------------------------------------------------ --- Server version 4.0.24_Debian-10sarge1 - --- --- Table structure for table `labels_conf` --- - -DROP TABLE IF EXISTS `labels_conf`; -CREATE TABLE `labels_conf` ( - `id` int(4) NOT NULL auto_increment, - `barcodetype` char(100) default '', - `title` tinyint(1) default '0', - `isbn` tinyint(1) default '0', - `itemtype` tinyint(1) default '0', - `barcode` tinyint(1) default '0', - `dewey` tinyint(1) default '0', - `class` tinyint(1) default '0', - `author` tinyint(1) default '0', - `papertype` char(100) default '', - `startrow` int(2) default NULL, - `printingtype` char(10) default NULL, - `guidebox` tinyint(1) default NULL, - PRIMARY KEY (`id`) -) TYPE=MyISAM; - --- --- Table structure for table `labels` --- - -DROP TABLE IF EXISTS `labels`; -CREATE TABLE `labels` ( - `labelid` int(11) NOT NULL auto_increment, - `itemnumber` varchar(100) NOT NULL default '', - `timestamp` timestamp(14) NOT NULL, - PRIMARY KEY (`labelid`) -) TYPE=MyISAM; - - - - - diff --git a/catalogue/catalogue-search.pl b/catalogue/catalogue-search.pl deleted file mode 100644 index 1e8d27179f..0000000000 --- a/catalogue/catalogue-search.pl +++ /dev/null @@ -1,268 +0,0 @@ -#!/usr/bin/perl -use strict; - -use CGI; -use C4::Search; -use C4::Auth; -use C4::Interface::CGI::Output; -use C4::Biblio; -use C4::Koha; -use POSIX qw(ceil floor); - -my $query = new CGI; -my $dbh = C4::Context->dbh; - -my $op = $query->param('op'); #show the search form or execute the search - -my $format=$query->param('MARC'); -my ($template, $borrowernumber, $cookie); - -# get all the common search variables, -my @value=$query->param('value'); -my @kohafield=$query->param('kohafield'); -my @and_or=$query->param('and_or'); -my @relation=$query->param('relation'); -my $order=$query->param('order'); -my $reorder=$query->param('reorder'); -my $number_of_results=$query->param('number_of_results'); -my $zoom=$query->param('zoom'); -my $ascend=$query->param('asc'); -my $searchtype=$query->param('searchtype'); ## this is actual query type - -my @marclist = $query->param('marclist'); -# collect all the fields ... -my %search; -my @forminputs; #this is for the links to navigate among the results -my (@searchdesc, %hashdesc,$facetsdesc); #this is to show the description of the current search -my @fields = ('value', 'kohafield', 'and_or', 'relation','order','barcode','biblionumber','itemnumber','asc','from','searchtype'); - -###Collect all the marclist values coming from old Koha MARCdetails -## Although we can not search on all marc fields- if any is matched in Zebra we can use it -my $sth=$dbh->prepare("Select kohafield from koha_attr where tagfield=? and tagsubfield=? and intrashow=1"); -foreach my $marc (@marclist) { - if ($marc) { - $sth->execute(substr($marc,0,3),substr($marc,3,1)); - if ((my $kohafield)=$sth->fetchrow){ - push @kohafield,$kohafield; - push @and_or,"\@or"; - push @value,@value[0] if @kohafield>1; - push @relation ,"\@attr 5=1"; - } - } -} -#### Now normal search routine -foreach my $field (@fields) { - $search{$field} = $query->param($field); - my @fieldvalue = $query->param($field); - foreach my $fvalue (@fieldvalue) { - push @forminputs, { field=>$field ,value=> $fvalue} unless ($field eq 'reorder'); - - } -} -## Build the query for facets as well - for (my $i=0;$i<@value;$i++){ -$facetsdesc.="&value=".$value[$i]; -$facetsdesc.="&kohafield=".$kohafield[$i]; -$facetsdesc.="&relation=".$relation[$i]; -$facetsdesc.="&and_or=".$and_or[$i]; -} -$facetsdesc.="&order=".$order; -$hashdesc{'query'} = join " , ", @value; -push @searchdesc,\%hashdesc; - - -############################################################################ -if ($op eq "do_search"){ - -#this fields is just to allow the user come back to the search form with all the values previously entered -$search{'search_type'} = $query->param('search_type');# this is the panel type -push @forminputs, {field => 'search_type', value => $search{'search_type'}}; - - - ($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "catalogue/catalogue_searchresults.tmpl", - query => $query, - type => "intranet", - authnotrequired => 1, - }); - - $search{'from'} = 'intranet'; - $search{'borrowernumber'} = $borrowernumber; - $search{'remote_IP'} = $query->remote_addr(); - $search{'remote_URL'} = $query->url(-query=>1); - $search{'searchdesc'} = \@searchdesc; - $template->param(FORMINPUTS => \@forminputs); - $template->param(reorder => $query->param('reorder')); - $template->param(facetsdesc=>$facetsdesc); - # do the searchs .... - $number_of_results = 10 unless $number_of_results; - my $startfrom=$query->param('startfrom'); - ($startfrom) || ($startfrom=0); -my ($count,@results,$facets); -if (!$zoom){ -## using sql search for barcode,biblionumber or itemnumber only useful for libraian interface - ($count, @results) =sqlsearch($dbh,\%search); -}else{ -my $sortorder=$order.$ascend if $order; - ($count,$facets,@results) =ZEBRAsearch_kohafields(\@kohafield,\@value, \@relation,$sortorder, \@and_or, 1,$reorder,$startfrom, $number_of_results,"intranet",$searchtype); -} - if ( $count eq "error"){ - $template->param(error =>1); - goto "show"; - } - my $num = scalar(@results) - 1; -if ( $count == 1){ - # if its a barcode search by definition we will only have one result. - # And if we have a result - # lets jump straight to the detail.pl page - if ($format eq '1') { - print $query->redirect("/cgi-bin/koha/catalogue/MARCdetail.pl?type=intra&biblionumber=$results[0]->{'biblionumber'}"); - }else{ - print $query->redirect("/cgi-bin/koha/catalogue/detail.pl?type=intra&biblionumber=$results[0]->{'biblionumber'}"); - } -} - # sorting out which results to display. - # the result number to star to show - $template->param(startfrom => $startfrom); - $template->param(beginning => $startfrom+1); - # the result number to end to show - ($startfrom+$num<=$count) ? ($template->param(endat => $startfrom+$num+1)) : ($template->param(endat => $count)); - # the total results searched - $template->param(numrecords => $count); - $template->param(FORMINPUTS => \@forminputs ); - $template->param(searchdesc => \@searchdesc ); - $template->param(SEARCH_RESULTS => \@results, - facets_loop => $facets, - ); - - #this is to show the images numbers to navigate among the results, if it has to show the number highlighted or not - my $numbers; - @$numbers = (); - my $pg = 1; - if (defined($query->param('pg'))) { - $pg = $query->param('pg'); - } - my $start = 0; - - $start = ($pg - 1) * $number_of_results; - my $pages = ceil($count / $number_of_results); - my $total_pages = ceil($count / $number_of_results); - - if ($pg > 1) { - my $url = $pg - 1; - push @$numbers, { number => "<<", - highlight => 0 , - startfrom => 0, - pg => '1' }; - push @$numbers, { number => "<", - highlight => 0 , forminputs=>\@forminputs, - startfrom => ($url-1)*$number_of_results+1, - pg => $url }; - } - my $current_ten = $pg / 10; - if ($current_ten == 0) { - $current_ten = 0.1; # In case it´s in ten = 0 - } - my $from = $current_ten * 10; # Calculate the initial page - my $end_ten = $from + 9; - my $to; - if ($pages > $end_ten) { - $to = $end_ten; - } else { - $to = $pages; - } - for (my $i = $from; $i <= $to ; $i++) { - if ($i == $pg) { - if ($count > $number_of_results) { - push @$numbers, { number => $i, - highlight => 1 , forminputs=>\@forminputs, - startfrom => ($i-1)*$number_of_results , - pg => $i }; - } - } else { - push @$numbers, { number => $i, - highlight => 0 , forminputs=>\@forminputs, - startfrom => ($i-1)*$number_of_results , - pg => $i }; - } - } - if ($pg < $pages) { - my $url = $pg + 1; - push @$numbers, { number => ">", - highlight => 0 , forminputs=>\@forminputs, - startfrom => ($url-1)*$number_of_results, - pg => $url }; - push @$numbers, { number => ">>", - highlight => 0 , forminputs=>\@forminputs, - startfrom => ($total_pages-1)*$number_of_results, - pg => $total_pages}; - } -# push @$numbers,{forminputs=>@forminputs}; - $template->param(numbers =>$numbers, - ); - #show the virtual shelves - #my $results = &GetShelfList($borrowernumber); - #$template->param(shelvescount => scalar(@{$results})); - #$template->param(shelves => $results); - -######## -if ($format eq '1') { - $template->param(script => "catalogue/MARCdetail.pl"); -}else{ - $template->param(script => "catalogue/detail.pl"); -} - -}else{ ## No search yet -($template, $borrowernumber, $cookie) - = get_template_and_user({template_name => "catalogue/catalogue_search.tmpl", - query => $query, - type => "intranet", - authnotrequired => 1, - }); -#show kohafields - my $kohafield = $query->param('kohafield'); - my ($fieldcount,@kohafields)=getkohafields(); - foreach my $row (@kohafields) { - if ($kohafield eq $row->{'kohafield'}) { - $row->{'sel'} = 1; - } - } - $template->param(kohafields => \@kohafields); -##show sorting fields -my @sorts; - $order=$query->param('order'); - foreach my $sort (@kohafields) { - if ($sort->{sorts}){ - push @sorts,$sort; - if ($order eq $sort->{'kohafield'}) { - $sort->{'sel'} = 1; - } - } - } - $template->param(sorts => \@sorts); -# load the branches -my @branches = GetallBranches(); -$template->param(branchloop => \@branches,); - -# load the itemtypes -my $itemtypes=GetItemTypes(); -my (@item_type_loop); -foreach my $thisitemtype (sort keys %$itemtypes) { - my %row =(itemtype => $thisitemtype, - description => $itemtypes->{$thisitemtype}->{'description'}, - ); - push @item_type_loop, \%row; -} - -$template->param(itemtypeloop=>\@item_type_loop,); -my $search_type = $query->param('search_type'); - if ((!$search_type) || ($search_type eq 'zoom')) { - $template->param(zoom_search => 1); - } else{ - $template->param(sql_search => 1); - } -} - -show: -output_html_with_http_headers $query, $cookie, $template->output(); - diff --git a/cataloguing/isbnsearch.pl b/cataloguing/isbnsearch.pl deleted file mode 100755 index b2f9c2dd4e..0000000000 --- a/cataloguing/isbnsearch.pl +++ /dev/null @@ -1,190 +0,0 @@ -#!/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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; - -use C4::Auth; -use C4::Biblio; -use C4::Search; -use C4::Output; -use C4::Interface::CGI::Output; -use C4::Breeding; -use C4::Koha; - -my $input = new CGI; -my $isbn = $input->param('isbn'); -my $title = $input->param('title'); -my $offset = $input->param('offset'); -my $num = $input->param('num'); -my $showoffset = $offset + 1; -my $total; -my $count; -my @results; -my $facets; -my %search; -my $toggle; -my $marc_p = C4::Context->boolean_preference("marc"); -my $SQLorZEBRA=C4::Context->preference("SQLorZEBRA"); -if ( !$isbn && !$title ) { - print $input->redirect('addbooks.pl'); -} -else { - my ( $template, $loggedinuser, $cookie ) = get_template_and_user( - { - template_name => "cataloguing/isbnsearch.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => { editcatalogue => 1 }, - debug => 1, - } - ); - - # fill with books in ACTIVE DB (biblio) - if ( !$offset ) { - $offset = 0; - $showoffset = 1; - } - if ( !$num ) { $num = 10 } -my @kohafield; -my @value; -my @relation; -my @and_or; -my $order="title,1"; -if ($isbn){ -$search{'isbn'}=$isbn; -push @kohafield, "isbn"; -push @value,$isbn; -}else{ -$search{'title'}=$title; -push @kohafield, "title"; -push @value,$title; -push @relation, "\@attr 5=1 \@attr 6=3 \@attr 4=1 \@attr 3=1 "; - } -$search{avoidquerylog}=1; -if ($SQLorZEBRA eq "sql"){ -($count, @results) =cataloguing_search(\%search,$num,$offset); -}else{ -($count,$facets,@results) =ZEBRAsearch_kohafields(\@kohafield,\@value, \@relation,$order, \@and_or, 1,"",$offset, $num,"intranet"); - -} -my $grandtotal=$count; - if ( $count < ( $offset + $num ) ) { - $total = $count; - } - else { - $total = $offset + $num; - } # else - - my @loop_data; - - @loop_data=@results if $count >0;; - $template->param( startfrom => $offset + 1 ); - ( $offset + $num <= $count ) - ? ( $template->param( endat => $offset + $num ) ) - : ( $template->param( endat => $count ) ); - $template->param( numrecords => $count ); - my $nextstartfrom = ( $offset + $num < $count ) ? ( $offset + $num ) : (-1); - my $prevstartfrom = ( $offset - $num >= 0 ) ? ( $offset - $num ) : (-1); - $template->param( nextstartfrom => $nextstartfrom ); - my $displaynext = 1; - my $displayprev = 0; - ( $nextstartfrom == -1 ) ? ( $displaynext = 0 ) : ( $displaynext = 1 ); - ( $prevstartfrom == -1 ) ? ( $displayprev = 0 ) : ( $displayprev = 1 ); - $template->param( displaynext => $displaynext ); - $template->param( displayprev => $displayprev ); - my @numbers = (); - my $term; - my $value; - - if ($isbn) { - $term = "isbn"; - $value = $isbn; - } - else { - $term = "title"; - $value = $title; - } - if ( $count > 10 ) { - for ( my $i = 1 ; $i < $count / 10 + 1 ; $i++ ) { - if ( $i < 16 ) { - my $highlight = 0; - ( $offset == ( $i - 1 ) * 10 ) && ( $highlight = 1 ); - push @numbers, - { - number => $i, - highlight => $highlight, - term => $term, - value => $value, - startfrom => ( $i - 1 ) * 10 - }; - } - } - } - - # fill with books in breeding farm - ( $count, @results ) = BreedingSearch( $title, $isbn ); - my @breeding_loop = (); - for ( my $i = 0 ; $i <= $#results ; $i++ ) { - my %row_data; - if ( $i % 2 ) { - $toggle = "#ffffcc"; - } - else { - $toggle = "white"; - } - $row_data{toggle} = $toggle; - $row_data{id} = $results[$i]->{'id'}; - $row_data{isbn} = $results[$i]->{'isbn'}; - $row_data{file} = $results[$i]->{'file'}; - $row_data{title} = $results[$i]->{'title'}; - $row_data{author} = $results[$i]->{'author'}; - $row_data{classification} = $results[$i]->{'classification'}; - $row_data{subclass} = $results[$i]->{'subclass'}; - push ( @breeding_loop, \%row_data ); - } -# get framework list - my $frameworks = getframeworks; - my @frameworkcodeloop; - foreach my $thisframeworkcode (keys %$frameworks) { - my %row =(value => $thisframeworkcode, - frameworktext => $frameworks->{$thisframeworkcode}->{'frameworktext'}, - ); - push @frameworkcodeloop, \%row; - } - - - $template->param( - isbn => $isbn, - title => $title, - showoffset => $showoffset, - total => $total, - grandtotal => $grandtotal, - offset => $offset, - results_loop => \@loop_data, - breeding_loop => \@breeding_loop, - numbers => \@numbers, - term => $term, - value => $value, - frameworkcodeloop => \@frameworkcodeloop - ); - - output_html_with_http_headers $input, $cookie, $template->output; -} # else diff --git a/circ/renewscript.pl b/circ/renewscript.pl deleted file mode 100644 index c567a04034..0000000000 --- a/circ/renewscript.pl +++ /dev/null @@ -1,70 +0,0 @@ -#!/usr/bin/perl - -# $Id$ - -#written 18/1/2000 by chris@katipo.co.nz -#script to renew items from the web - - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use CGI; -use C4::Circulation::Circ2; -use C4::Date; -use C4::Members; -#get input -my $input= new CGI; - - -my @names=$input->param(); -my $count=@names; -my %data; -my $dbh = C4::Context->dbh; -for (my $i=0;$i<$count;$i++){ - if ($names[$i] =~ /renew/){ - my $temp=$names[$i]; - $temp=~ s/renew_item_//; - $data{$temp}=$input->param($names[$i]); - } -} -my %env; -my $barcode; -my $destination = $input->param("destination"); -my $cardnumber = $input->param("cardnumber"); -my $bornum=$input->param("bornum"); -my $error; -my $status=0; -while ( my ($itemno, $value) = each %data) { - - if ($value eq 'y'){ -my $iteminformation = getiteminformation($env, $itemno,0); -$barcode=$iteminformation->{'barcode'}; - $status=renewstatus(\%env,$bornum,$itemno); - if ($status==1){ - renewbook($env,$bornum,$itemno); - }else{ - last; - } -} -} - -if($destination eq "circ" || $status>1){ - print $input->redirect("/cgi-bin/koha/circ/circulation.pl?bornum=$bornum&error=$status&barcode=$barcode"); -} else { - print $input->redirect("/cgi-bin/koha/members/moremember.pl?bornum=$bornum"); -} \ No newline at end of file diff --git a/circ/rescirculation.pl b/circ/rescirculation.pl deleted file mode 100644 index 392267a7f0..0000000000 --- a/circ/rescirculation.pl +++ /dev/null @@ -1,460 +0,0 @@ -#!/usr/bin/perl - -# Please use 8-character tabs for this file (indents are every 4 characters) - -#written 8/5/2002 by Finlay -#script to execute issuing of books -# New functions added 07-08-2005 Tumer Garip tgarip@neu.edu.tr - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; -use C4::Circulation::Circ3; -use C4::Auth; -use C4::Interface::CGI::Output; -use C4::Koha; -use C4::Date; -use C4::Context; -use C4::Members; -use C4::Print; -# -# PARAMETERS READING -# -my $query=new CGI; - -my ($template, $loggedinuser, $cookie) = get_template_and_user - ({ - template_name => 'circ/rescirculation.tmpl', - query => $query, - type => "intranet", - authnotrequired => 0, - flagsrequired => { circulate => 1 }, - }); -my $branches = GetBranches(); -my $printers = getprinters(); -my $branch=C4::Context->preference("defaultBranch"); -my $printer = getprinter($query, $printers); - -my $findborrower = $query->param('findborrower'); -$findborrower =~ s|,| |g; -$findborrower =~ s|'| |g; -my $borrowernumber = $query->param('borrnumber'); - -my $print=$query->param('print'); -my $barcode = $query->param('barcode'); -my $year=$query->param('year'); -my $month=$query->param('month'); -my $day=$query->param('day'); -my $stickyduedate=$query->param('stickyduedate'); -my $issueconfirmed = $query->param('issueconfirmed'); -my $cancelreserve = $query->param('cancelreserve'); - -my $renew=0; - -#set up cookie..... -my $branchcookie; -my $printercookie; -#if ($query->param('setcookies')) { -# $branchcookie = $query->cookie(-name=>'branch', -value=>"$branch", -expires=>'+1y'); -# $printercookie = $query->cookie(-name=>'printer', -value=>"$printer", -expires=>'+1y'); -#} - -my %env; # FIXME env is used as an "environment" variable. Could be dropped probably... - -$env{'branchcode'}=$branch; -$env{'printer'}=$printer; -$env{'queue'}=$printer; - -my $todaysdate =get_today(); - - -# check and see if we should print - if ($barcode eq '' && $print eq 'maybe'){ - $print = 'yes'; - } - if ($print eq 'yes' && $borrowernumber ne ''){ - printslip(\%env,$borrowernumber); - $query->param('borrnumber',''); - $borrowernumber=''; - } - -# -# STEP 2 : FIND BORROWER -# if there is a list of find borrowers.... -# -my $borrowerslist; -my $message; -if ($findborrower) { - my ($count,$borrowers)=BornameSearch(\%env,$findborrower,'cardnumber','web'); - my @borrowers=@$borrowers; - if ($#borrowers == -1) { - $query->param('findborrower', ''); - $message = "'$findborrower'"; - } elsif ($#borrowers == 0) { - $query->param('borrnumber', $borrowers[0]->{'borrowernumber'}); - $query->param('barcode',''); - $borrowernumber=$borrowers[0]->{'borrowernumber'}; - } else { - $borrowerslist = \@borrowers; - } -} - -# get the borrower information..... -my $borrower; -my $bornum=$query->param('bornum'); -if ($bornum){ -$borrowernumber=$bornum; -} - -if ($borrowernumber) { - $borrower = C4::Circulation::Circ2::getpatroninformation(\%env,$borrowernumber,0); - my ($od,$issue,$fines,$resfine)=borrdata3(\%env,$borrowernumber); -if ($resfine >0 || $fines) { -$template->param( - flagged => 1, - noissues => 'true', - ); -} - $template->param(overduecount => $od, - issuecount => $issue, - finetotal => $fines, - resfine => $resfine); -my $picture; - my $htdocs = C4::Context->config('opacdir'); - -$picture =$htdocs. "/htdocs/uploaded-files/users-photo/".$borrower->{'cardnumber'}.".jpg"; - if (-e $picture) -{ - - $template->param(borrowerphoto => "http://library.neu.edu.tr/uploaded-files/users-photo/".$borrower->{'cardnumber'}.".jpg"); - }else{ -$picture = "http://cc.neu.edu.tr/stdpictures/".$borrower->{'cardnumber'}.".jpg"; - $template->param(borrowerphoto => $picture); -} -} -$renew=$query->param('renew'); - -# -# STEP 3 : ISSUING -# -#Try to issue - -if ($barcode) { - - $barcode = cuecatbarcodedecode($barcode); -# my ($datedue, $invalidduedate) = fixdate($year, $month, $day); - if ($issueconfirmed) { - issuebook(\%env, $borrower, $barcode, $cancelreserve); -my ($od,$issue,$fines,$resfine)=borrdata3(\%env,$borrowernumber); - $template->param(overduecount => $od, - issuecount => $issue, - finetotal => $fines, - resfine => $resfine); - } else { - my ($error, $question) = canbookbeissued(\%env, $borrower, $barcode, $year, $month, $day); - my $noerror=1; - my $noquestion = 1; - foreach my $impossible (keys %$error) { - $template->param($impossible => $$error{$impossible}, - IMPOSSIBLE => 1); - $noerror = 0; - } - foreach my $needsconfirmation (keys %$question) { - $template->param($needsconfirmation => $$question{$needsconfirmation}, - NEEDSCONFIRMATION => 1); - $noquestion = 0; - } - $template->param(day => $day, - month => $month, - year => $year); - if ($noerror && ($noquestion || $issueconfirmed)) { - issuebook(\%env, $borrower, $barcode); - my ($od,$issue,$fines,$resfine)=borrdata3(\%env,$borrowernumber); - $template->param(overduecount => $od, - issuecount => $issue, - finetotal => $fines, - resfine => $resfine); - } - } - }#barcode - - - - - -################################################################################## -# BUILD HTML - -# make the issued books table..... -my $todaysissues=''; -my $previssues=''; -my @realtodayissues; -my @realprevissues; -my $allowborrow; -if ($borrower) { -# get each issue of the borrower & separate them in todayissues & previous issues - my @todaysissues; - my @previousissues; - my $issueslist = getissues($borrower); - - # split in 2 arrays for today & previous - foreach my $it (keys %$issueslist) { - my $issuedate = $issueslist->{$it}->{'timestamp'}; - $issuedate = substr($issuedate, 0, 10); -#warn "$todaysdate,$issuedate"; - if ($todaysdate == $issuedate) { - push @todaysissues, $issueslist->{$it}; - } else { - push @previousissues, $issueslist->{$it}; - } - } - - - my $od; # overdues - my $togglecolor; - # parses today & build Template array - foreach my $book (sort {$b->{'timestamp'} <=> $a->{'timestamp'}} @todaysissues){ - my $dd = $book->{'duetime'}; - my $overdue = $book->{'overdue'}; -# $dd=format_date($dd); -# $datedue=~s/-//g; - if ($overdue) { - $od = 1; - } else { - $od=0; - } - $book->{'od'}=$od; - $book->{'dd'}=$dd; - - if ($togglecolor) { - $togglecolor=0; - } else { - $togglecolor=1; - } - $book->{'tcolor'}=$togglecolor; - if ($book->{'author'} eq ''){ - $book->{'author'}=' '; - } - push @realtodayissues,$book; - } - - # parses previous & build Template array - foreach my $book (sort {$a->{'date_due'} cmp $b->{'date_due'}} @previousissues){ - my $dd = $book->{'duedate'}; - my $overdue = $book->{'overdue'}; -# $dd=format_date($dd); - my $pcolor = ''; - my $od = ''; -# $datedue=~s/-//g; - if ($overdue) { - $od = 1; - } else { - $od = 0; - } - - if ($togglecolor) { - $togglecolor=0; - } else { - $togglecolor=1; - } - $book->{'dd'}=$dd; - $book->{'od'}=$od; - $book->{'tcolor'}=$togglecolor; - if ($book->{'author'} eq ''){ - $book->{'author'}=' '; - } - push @realprevissues,$book - } -} - - -my @values; -my %labels; -my $CGIselectborrower; -if ($borrowerslist) { - foreach (sort {$a->{'surname'}.$a->{'firstname'} cmp $b->{'surname'}.$b->{'firstname'}} @$borrowerslist){ - push @values,$_->{'borrowernumber'}; - $labels{$_->{'borrowernumber'}} ="$_->{'surname'}, $_->{'firstname'} ... ($_->{'cardnumber'} - $_->{'categorycode'}) ... $_->{'streetaddress'} "; - } - $CGIselectborrower=CGI::scrolling_list( -name => 'borrnumber', - -values => \@values, - -labels => \%labels, - -size => 7, - -multiple => 0 ); -} -#title - -my ($patrontable, $flaginfotable) = patrontable($borrower); -my $amountold=$borrower->{flags}->{'CHARGES'}->{'message'}; -my @temp=split(/\$/,$amountold); -$amountold=$temp[1]; -$template->param( today=>format_date($todaysdate), - findborrower => $findborrower, - borrower => $borrower, - borrowernumber => $borrowernumber, - branch => $branch, - printer => $printer, - branchname => $branches->{$branch}->{'branchname'}, - printername => $printers->{$printer}->{'printername'}, - firstname => $borrower->{'firstname'}, - surname => $borrower->{'surname'}, - categorycode => getborrowercategory($borrower->{'categorycode'}), - streetaddress => $borrower->{'streetaddress'}, - emailaddress => $borrower->{'emailaddress'}, - borrowernotes => $borrower->{'borrowernotes'}, - city => $borrower->{'city'}, - phone => $borrower->{'phone'}, - cardnumber => $borrower->{'cardnumber'}, - amountold => $amountold, - barcode => $barcode, - renew=>$renew, - stickyduedate => $stickyduedate, - message => $message, - CGIselectborrower => $CGIselectborrower, - todayissues => \@realtodayissues, - previssues => \@realprevissues, - ); -# set return date if stickyduedate -if ($stickyduedate) { - my $t_year = "year".$year; - my $t_month = "month".$month; - my $t_day = "day".$day; - $template->param( - $t_year => 1, - $t_month => 1, - $t_day => 1, - ); -} - - -if ($branchcookie) { - $cookie=[$cookie, $branchcookie, $printercookie]; -} - -output_html_with_http_headers $query, $cookie, $template->output; - -#################################################################### -# Extra subroutines,,, - -sub patrontable { - my ($borrower) = @_; - my $flags = $borrower->{'flags'}; - my $flaginfotable=''; - my $flaginfotext; - #my $flaginfotext=''; - my $flag; - my $color=''; - foreach $flag (sort keys %$flags) { -# my @itemswaiting=''; - $flags->{$flag}->{'message'}=~s/\n/
/g; - if ($flags->{$flag}->{'noissues'}) { - $template->param( - flagged => 1, - noissues => 'true', - ); - if ($flag eq 'GNA'){ - $template->param( - gna => 'true' - ); - } - if ($flag eq 'LOST'){ - $template->param( - lost => 'true' - ); - } - if ($flag eq 'DBARRED'){ - $template->param( - dbarred => 'true' - ); - } - if ($flag eq 'CHARGES') { - $template->param( - charges => 'true', - chargesmsg => $flags->{'CHARGES'}->{'message'} - ); - } - } else { - if ($flag eq 'CHARGES') { - $template->param( - charges => 'true', - flagged => 1, - chargesmsg => $flags->{'CHARGES'}->{'message'} - ); - } - if ($flag eq 'WAITING') { - my $items=$flags->{$flag}->{'itemlist'}; - my @itemswaiting; - foreach my $item (@$items) { - my ($iteminformation) = getiteminformation(\%env, $item->{'itemnumber'}, 0); - $iteminformation->{'branchname'} = $branches->{$iteminformation->{'holdingbranch'}}->{'branchname'}; - push @itemswaiting, $iteminformation; - } - $template->param( - flagged => 1, - waiting => 'true', - waitingmsg => $flags->{'WAITING'}->{'message'}, - itemswaiting => \@itemswaiting, - ); - } - if ($flag eq 'ODUES') { - $template->param( - odues => 'true', - flagged => 1, - oduesmsg => $flags->{'ODUES'}->{'message'} - ); - - my $items=$flags->{$flag}->{'itemlist'}; - { - my @itemswaiting; - foreach my $item (@$items) { - my ($iteminformation) = getiteminformation(\%env, $item->{'itemnumber'}, 0); - push @itemswaiting, $iteminformation; - } - } - if ($query->param('module') ne 'returns'){ - $template->param( nonreturns => 'true' ); - } - } - if ($flag eq 'NOTES') { - $template->param( - notes => 'true', - flagged => 1, - notesmsg => $flags->{'NOTES'}->{'message'} - ); - } - } - } - return($patrontable, $flaginfotext); -} - -sub cuecatbarcodedecode { - my ($barcode) = @_; - chomp($barcode); - my @fields = split(/\./,$barcode); - my @results = map(decode($_), @fields[1..$#fields]); - if ($#results == 2){ - return $results[2]; - } else { - return $barcode; - } -} - -# Local Variables: -# tab-width: 8 -# End: diff --git a/circ/resreturns.pl b/circ/resreturns.pl deleted file mode 100644 index a6fd31fce2..0000000000 --- a/circ/resreturns.pl +++ /dev/null @@ -1,478 +0,0 @@ -#!/usr/bin/perl -# WARNING: This file contains mixed-sized tabs! (some 4-character, some 8) -# WARNING: Currently, 4-character tabs seem to be dominant -# WARNING: But there are still lots of 8-character tabs - -#written 11/3/2002 by Finlay -#script to execute returns of books - -# 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., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - -use strict; -use CGI; -use C4::Circulation::Circ3; -use C4::Search; -use C4::Output; -use C4::Print; -use C4::Reserves2; -use C4::Auth; -use C4::Interface::CGI::Output; - -use C4::Koha; -use C4::Members; -my $query = new CGI; - -#getting the template -my ( $template, $borrowernumber, $cookie ) = get_template_and_user( - { - template_name => "circ/resreturns.tmpl", - query => $query, - type => "intranet", - authnotrequired => 0, - flagsrequired => { circulate => 1 }, - } -); - -##################### -#Global vars -my %env; -my $headerbackgroundcolor = '#99cc33'; -my $linecolor1 = '#ffffcc'; -my $linecolor2 = 'white'; - -my $branches = GetBranches(); -my $printers = getprinters( \%env ); - -# my $branch = getbranch( $query, $branches ); -my $printer = getprinter( $query, $printers ); - -# -# Some code to handle the error if there is no branch or printer setting..... -# -my $branch=C4::Context->preference("defaultBranch"); -$env{'branchcode'} = $branch; -$env{'printer'} = $printer; -$env{'queue'} = $printer; - -# Set up the item stack .... -my %returneditems; -my %riduedate; -my %riborrowernumber; -my @inputloop; -foreach ( $query->param ) { - (next) unless (/ri-(\d*)/); - my %input; - my $counter = $1; - (next) if ( $counter > 20 ); - my $barcode = $query->param("ri-$counter"); - my $duedate = $query->param("dd-$counter"); - my $borrowernumber = $query->param("bn-$counter"); - $counter++; - - # decode cuecat - $barcode = cuecatbarcodedecode($barcode); - - ###################### - #Are these lines still useful ? - $returneditems{$counter} = $barcode; - $riduedate{$counter} = $duedate; - $riborrowernumber{$counter} = $borrowernumber; - - ####################### - $input{counter} = $counter; - $input{barcode} = $barcode; - $input{duedate} = $duedate; - $input{bornum} = $borrowernumber; - push ( @inputloop, \%input ); -} - -############ -# Deal with the requests.... -if ( $query->param('resbarcode') ) { - my $item = $query->param('itemnumber'); - my $borrnum = $query->param('borrowernumber'); - my $resbarcode = $query->param('resbarcode'); - - # set to waiting.... - my $iteminfo = getiteminformation( \%env, $item ); - my $tobranchcd = ReserveWaiting( $item, $borrnum ); - my $branchname = $branches->{$tobranchcd}->{'branchname'}; - my ($borr) = getpatroninformation( \%env, $borrnum, 0 ); - my $borcnum = $borr->{'cardnumber'}; - my $name = - $borr->{'surname'} . " " . $borr->{'title'} . " " . $borr->{'firstname'}; - my $slip = $query->param('resslip'); - printslip( \%env, $slip ); #removed by paul - - if ( $tobranchcd ne $branch ) { - $template->param( - itemtitle => $iteminfo->{'title'}, - iteminfo => $iteminfo->{'author'}, - branchname => $branchname, - name => $name, - bornum => $borrnum, - borcnum => $borcnum, - diffbranch => 1 - ); - } -} - -my $iteminformation; -my $borrower; -my $returned = 0; -my $messages; - -my $barcode = $query->param('barcode'); - -# actually return book and prepare item table..... -if ($barcode) { - - # decode cuecat - $barcode = cuecatbarcodedecode($barcode); - ( $returned, $messages, $iteminformation, $borrower ) = - returnbook( $barcode, $branch ); - if ($returned) { - $returneditems{0} = $barcode; - $riborrowernumber{0} = $borrower->{'borrowernumber'}; - $riduedate{0} = $iteminformation->{'date_due'}; - my %input; - $input{counter} = 0; - $input{first} = 1; - $input{barcode} = $barcode; - $input{duedate} = $riduedate{0}; - $input{bornum} = $riborrowernumber{0}; - push ( @inputloop, \%input ); - } - elsif ( !$messages->{'BadBarcode'} ) { - if ( $messages->{'NotIssued'} ) { - my $dbh = C4::Context->dbh; - my $sth=$dbh->prepare("select date_due from issues where itemnumber=? and isnull(returndate)"); - $sth->execute($iteminformation->{'itemnumber'}); - my ($date_due) = $sth->fetchrow; - - $sth->finish; - if ($date_due){ - print $query->redirect("/cgi-bin/koha/circ/returns.pl?barcode=$barcode"); - } - } - my %input; - $input{counter} = 0; - $input{first} = 1; - $input{barcode} = $barcode; - $input{duedate} = 0; - - $returneditems{0} = $barcode; - $riduedate{0} = 0; - if ( $messages->{'wthdrawn'} ) { - $input{withdrawn} = 1; - $input{bornum} = "Item Cancelled"; - $riborrowernumber{0} = 'Item Cancelled'; - } - else { - $input{bornum} = " "; - $riborrowernumber{0} = ' '; - } - push ( @inputloop, \%input ); - } - $template->param( - returned => $returned, - itemtitle => $iteminformation->{'title'}, - - # itembc => $iteminformation->{'barcode'}, - # itemdatedue => $iteminformation->{'date_due'}, - itemauthor => $iteminformation->{'author'} - ); -} -$template->param( inputloop => \@inputloop ); - -my $found = 0; -my $waiting = 0; -my $reserved = 0; - -if ( $messages->{'ResFound'} ) { - my $res = $messages->{'ResFound'}; - my $branchname = $branches->{ $res->{'branchcode'} }->{'branchname'}; - my ($borr) = getpatroninformation( \%env, $res->{'borrowernumber'}, 0 ); - my $name = - $borr->{'surname'} . " " . $borr->{'title'} . " " . $borr->{'firstname'}; - my ($iteminfo) = getiteminformation( \%env, 0, $barcode ); - - if ( $res->{'ResFound'} eq "Waiting" ) { - $template->param( - found => 1, - name => $name, - borfirstname => $borr->{'firstname'}, - borsurname => $borr->{'surname'}, - bortitle => $borr->{'title'}, - borphone => $borr->{'phone'}, - borstraddress => $borr->{'streetaddress'}, - borcity => $borr->{'city'}, - borzip => $borr->{'zipcode'}, - bornum => $res->{'borrowernumber'}, - borcnum => $borr->{'cardnumber'}, - branchname => $branches->{ $res->{'branchcode'} }->{'branchname'}, - waiting => 1, - itemnumber => $res->{'itemnumber'}, - itemtitle => $iteminfo->{'title'}, - itemauthor => $iteminfo->{'author'}, - itembarcode => $iteminfo->{'barcode'}, - itemtype => $iteminfo->{'itemtype'}, - itembiblionumber => $iteminfo->{'biblionumber'} - ); - - } - if ( $res->{'ResFound'} eq "Reserved" ) { - my @da = localtime( time() ); - my $todaysdate = - sprintf( "%0.2d", ( $da[3] + 1 ) ) . "/" - . sprintf( "%0.2d", ( $da[4] + 1 ) ) . "/" - . ( $da[5] + 1900 ); - $template->param( - found => 1, - branchname => $branches->{ $res->{'branchcode'} }->{'branchname'}, - reserved => 1, - today => $todaysdate, - itemnumber => $res->{'itemnumber'}, - itemtitle => $iteminfo->{'title'}, - itemauthor => $iteminfo->{'author'}, - itembarcode => $iteminfo->{'barcode'}, - itemtype => $iteminfo->{'itemtype'}, - itembiblionumber => $iteminfo->{'biblionumber'}, - borsurname => $borr->{'surname'}, - bortitle => $borr->{'title'}, - borfirstname => $borr->{'firstname'}, - bornum => $res->{'borrowernumber'}, - borcnum => $borr->{'cardnumber'}, - borphone => $borr->{'phone'}, - borstraddress => $borr->{'streetaddress'}, - borsub => $borr->{'suburb'}, - borcity => $borr->{'city'}, - borzip => $borr->{'zipcode'}, - boremail => $borr->{'emailadress'}, - barcode => $barcode - ); - } -} - -# Error Messages -my @errmsgloop; -foreach my $code ( keys %$messages ) { - - # warn $code; - my %err; - my $exit_required_p = 0; - if ( $code eq 'BadBarcode' ) { - $err{badbarcode} = 1; - $err{msg} = $messages->{'BadBarcode'}; - } - elsif ( $code eq 'NotIssued' ) { - $err{notissued} = 1; - $err{msg} = $branches->{ $messages->{'IsPermanent'} }->{'branchname'}; - } - elsif ( $code eq 'WasLost' ) { - $err{waslost} = 1; - } - elsif ( $code eq 'ResFound' ) { - ; # FIXME... anything to do here? - } - elsif ( $code eq 'WasReturned' ) { - ; # FIXME... anything to do here? - } - elsif ( $code eq 'WasTransfered' ) { - ; # FIXME... anything to do here? - } - elsif ( $code eq 'wthdrawn' ) { - $err{withdrawn} = 1; - $exit_required_p = 1; - } - elsif ( ( $code eq 'IsPermanent' ) && ( not $messages->{'ResFound'} ) ) { - if ( $messages->{'IsPermanent'} ne $branch ) { - $err{ispermanent} = 1; - $err{msg} = - $branches->{ $messages->{'IsPermanent'} }->{'branchname'}; - } - } - else { - die "Unknown error code $code"; # XXX - } - if (%err) { - push ( @errmsgloop, \%err ); - } - last if $exit_required_p; -} -$template->param( errmsgloop => \@errmsgloop ); - -# patrontable .... -if ($borrower) { - my $flags = $borrower->{'flags'}; - my $color = ''; - my @flagloop; - my $flagset; - foreach my $flag ( sort keys %$flags ) { - my %flaginfo; - ( $color eq $linecolor1 ) - ? ( $color = $linecolor2 ) - : ( $color = $linecolor1 ); - unless ($flagset) { $flagset = 1; } - $flaginfo{color} = $color; - $flaginfo{redfont} = ( $flags->{$flag}->{'noissues'} ); - $flaginfo{flag} = $flag; - if ( $flag eq 'CHARGES' ) { - $flaginfo{msg} = $flag; - $flaginfo{charges} = 1; - $flaginfo{bornum} = $borrower->{borrowernumber}; - } - elsif ( $flag eq 'WAITING' ) { - $flaginfo{msg} = $flag; - $flaginfo{waiting} = 1; - my @waitingitemloop; - my $items = $flags->{$flag}->{'itemlist'}; - foreach my $item (@$items) { - my ($iteminformation) = - getiteminformation( \%env, $item->{'itemnumber'}, 0 ); - my %waitingitem; - $waitingitem{biblionum} = $iteminformation->{'biblionumber'}; - $waitingitem{barcode} = $iteminformation->{'barcode'}; - $waitingitem{title} = $iteminformation->{'title'}; - $waitingitem{brname} = - $branches->{ $iteminformation->{'holdingbranch'} }->{ - 'branchname'}; - push ( @waitingitemloop, \%waitingitem ); - } - $flaginfo{itemloop} = \@waitingitemloop; - } - elsif ( $flag eq 'ODUES' ) { - my $items = $flags->{$flag}->{'itemlist'}; - my @itemloop; - foreach my $item ( sort { $a->{'date_due'} cmp $b->{'date_due'} } - @$items ) - { - my ($iteminformation) = - getiteminformation( \%env, $item->{'itemnumber'}, 0 ); - my %overdueitem; - $overdueitem{duedate} = $item->{'date_due'}; - $overdueitem{biblionum} = $iteminformation->{'biblionumber'}; - $overdueitem{barcode} = $iteminformation->{'barcode'}; - $overdueitem{title} = $iteminformation->{'title'}; - $overdueitem{brname} = - $branches->{ $iteminformation->{'holdingbranch'} }->{ - 'branchname'}; - push ( @itemloop, \%overdueitem ); - } - $flaginfo{itemloop} = \@itemloop; - $flaginfo{overdue} = 1; - } - else { - $flaginfo{other} = 1; - $flaginfo{msg} = $flags->{$flag}->{'message'}; - } - push ( @flagloop, \%flaginfo ); - } - $template->param( - flagset => $flagset, - flagloop => \@flagloop, - ribornum => $borrower->{'borrowernumber'}, - riborcnum => $borrower->{'cardnumber'}, - riborsurname => $borrower->{'surname'}, - ribortitle => $borrower->{'title'}, - riborfirstname => $borrower->{'firstname'} - ); -} - -my $color = ''; - -#set up so only the last 8 returned items display (make for faster loading pages) -my $count = 0; -my @riloop; -foreach ( sort { $a <=> $b } keys %returneditems ) { - my %ri; - if ( $count < 8 ) { - ( $color eq $linecolor1 ) - ? ( $color = $linecolor2 ) - : ( $color = $linecolor1 ); - $ri{color} = $color; - my $barcode = $returneditems{$_}; - my $duedate = $riduedate{$_}; - my $overduetext; - my $borrowerinfo; - if ($duedate) { - my @tempdate = split ( /-/, $duedate ); - $ri{year}=$tempdate[0]; - $ri{month}=$tempdate[1]; - $ri{day}=$tempdate[2]; - my $duedatenz = "$tempdate[2]/$tempdate[1]/$tempdate[0]"; - my @datearr = localtime( time() ); - my $todaysdate = - $datearr[5] . '-' - . sprintf( "%0.2d", ( $datearr[4] + 1 ) ) . '-' - . sprintf( "%0.2d", $datearr[3] ); - $ri{duedate}=$duedate; - my ($borrower) = getpatroninformation( \%env, $riborrowernumber{$_}, 0 ); - $ri{bornum} = $borrower->{'borrowernumber'}; - $ri{borcnum} = $borrower->{'cardnumber'}; - $ri{borfirstname} = $borrower->{'firstname'}; - $ri{borsurname} = $borrower->{'surname'}; - $ri{bortitle} = $borrower->{'title'}; - } - else { - $ri{bornum} = $riborrowernumber{$_}; - } -# my %ri; - my ($iteminformation) =C4::Circulation::Circ2::getiteminformation( \%env, 0, $barcode ); - $ri{color} = $color; - $ri{itembiblionumber} = $iteminformation->{'biblionumber'}; - $ri{itemtitle} = $iteminformation->{'title'}; - $ri{itemauthor} = $iteminformation->{'author'}; - $ri{itemtype} = $iteminformation->{'itemtype'}; - $ri{barcode} = $barcode; - } - else { - last; - } - $count++; - push ( @riloop, \%ri ); -} -$template->param( riloop => \@riloop ); - -$template->param( - genbrname => $branches->{$branch}->{'branchname'}, - genprname => $printers->{$printer}->{'printername'}, - branch => $branch, - printer => $printer, - errmsgloop => \@errmsgloop -); - -# actually print the page! -output_html_with_http_headers $query, $cookie, $template->output; - -sub cuecatbarcodedecode { - my ($barcode) = @_; - chomp($barcode); - my @fields = split ( /\./, $barcode ); - my @results = map( decode($_), @fields[ 1 .. $#fields ] ); - if ( $#results == 2 ) { - return $results[2]; - } - else { - return $barcode; - } -} - -# Local Variables: -# tab-width: 4 -# End: diff --git a/koha-tmpl/errors/400.pl b/koha-tmpl/errors/400.pl index 94a721caf2..cf328e6fa7 100755 --- a/koha-tmpl/errors/400.pl +++ b/koha-tmpl/errors/400.pl @@ -6,7 +6,7 @@ use C4::Auth; use C4::Output; use C4::Interface::CGI::Output; use C4::Context; -use HTML::Template; + my $query = new CGI; my $admin = C4::Context->preference('KohaAdminEmailAddress'); @@ -14,8 +14,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "errors/400.tmpl", query => $query, type => "intranet", - authnotrequired => 0, - flagsrequired => {catalogue => 1}, + authnotrequired => 1, debug => 1, }); $template->param( admin => $admin); diff --git a/koha-tmpl/errors/401.pl b/koha-tmpl/errors/401.pl index 7d0acb990a..ed02d4e0e0 100755 --- a/koha-tmpl/errors/401.pl +++ b/koha-tmpl/errors/401.pl @@ -6,7 +6,7 @@ use C4::Auth; use C4::Output; use C4::Interface::CGI::Output; use C4::Context; -use HTML::Template; + my $query = new CGI; my $admin = C4::Context->preference('KohaAdminEmailAddress'); @@ -14,8 +14,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "errors/401.tmpl", query => $query, type => "intranet", - authnotrequired => 0, - flagsrequired => {catalogue => 1}, + authnotrequired => 1, debug => 1, }); $template->param( admin => $admin); diff --git a/koha-tmpl/errors/402.pl b/koha-tmpl/errors/402.pl index c4dc56b628..632d3a6970 100755 --- a/koha-tmpl/errors/402.pl +++ b/koha-tmpl/errors/402.pl @@ -6,7 +6,7 @@ use C4::Auth; use C4::Output; use C4::Interface::CGI::Output; use C4::Context; -use HTML::Template; + my $query = new CGI; my $admin = C4::Context->preference('KohaAdminEmailAddress'); @@ -14,8 +14,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "errors/402.tmpl", query => $query, type => "intranet", - authnotrequired => 0, - flagsrequired => {catalogue => 1}, + authnotrequired => 1, debug => 1, }); $template->param( admin => $admin); diff --git a/koha-tmpl/errors/403.pl b/koha-tmpl/errors/403.pl index e73be2e539..9760c467f5 100755 --- a/koha-tmpl/errors/403.pl +++ b/koha-tmpl/errors/403.pl @@ -6,7 +6,7 @@ use C4::Auth; use C4::Output; use C4::Interface::CGI::Output; use C4::Context; -use HTML::Template; + my $query = new CGI; my $admin = C4::Context->preference('KohaAdminEmailAddress'); @@ -14,8 +14,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "errors/403.tmpl", query => $query, type => "intranet", - authnotrequired => 0, - flagsrequired => {catalogue => 1}, + authnotrequired => 1, debug => 1, }); $template->param( admin => $admin); diff --git a/koha-tmpl/errors/404.pl b/koha-tmpl/errors/404.pl index f750dacf3a..95dc494d43 100755 --- a/koha-tmpl/errors/404.pl +++ b/koha-tmpl/errors/404.pl @@ -6,7 +6,7 @@ use C4::Auth; use C4::Output; use C4::Interface::CGI::Output; use C4::Context; -use HTML::Template; + my $query = new CGI; my $admin = C4::Context->preference('KohaAdminEmailAddress'); @@ -14,8 +14,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "errors/404.tmpl", query => $query, type => "intranet", - authnotrequired => 0, - flagsrequired => {catalogue => 1}, + authnotrequired => 1, debug => 1, }); $template->param( admin => $admin); diff --git a/koha-tmpl/errors/500.pl b/koha-tmpl/errors/500.pl index 1681feb21f..72d14ea32e 100755 --- a/koha-tmpl/errors/500.pl +++ b/koha-tmpl/errors/500.pl @@ -6,7 +6,7 @@ use C4::Auth; use C4::Output; use C4::Interface::CGI::Output; use C4::Context; -use HTML::Template; + my $query = new CGI; my $admin = C4::Context->preference('KohaAdminEmailAddress'); @@ -14,8 +14,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "errors/500.tmpl", query => $query, type => "intranet", - authnotrequired => 0, - flagsrequired => {catalogue => 1}, + authnotrequired => 1, debug => 1, }); $template->param( admin => $admin); diff --git a/koha-tmpl/intranet-tmpl/prog/en/about.tmpl b/koha-tmpl/intranet-tmpl/prog/en/about.tmpl index b81bf349b4..bd1c45f3e5 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/about.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/about.tmpl @@ -1,54 +1,47 @@ About Koha + +

Data about the current version of Koha for bug reports (or general interest).

- - - - - - + + + + + +
Server information
Koha version:
OS version ('uname -a'):
Perl version:
MySQL version:
Apache version:
Zebra version:
Koha version:
OS version ('uname -a'):
Perl version:
MySQL version:
Apache version:
Zebra version:
- +
Perl modules
-

Special thanks to the following libraries

+

Special thanks to the following libraries

  • Horowhenua Library Trust, New Zealand, and Rosalie Blake, Head of Libraries, (Koha 1.0)
  • The Nelsonville Public Library, USA, Ohio (MARC support funding)
  • EMN (Ecole des Mines de Nantes), France (Suggestion, stats modules and improved ldap support funding)
  • -
  • ENSMP (Ecole Nationale SupĂ©rieure des Mines de Paris), France (biblio frameworks, MARC authorities, OPAC basket, Serials support funding)
  • +
  • ENSMP (Ecole Nationale SupĂƒÂ©rieure des Mines de Paris), France (biblio frameworks, MARC authorities, OPAC basket, Serials support funding)
  • +
  • SAN-Ouest Provence Koha 3.0 members & reserve modules.
-

Core team for 2.2

+

Core team

    -
  • Rachel Hamilton-Williams, Kaitiaki
  • -
  • Paul Poulain, 2.2 release manager (MARC developer)
  • -
  • Stephen Hedges, Owen Leonard, Joshua Ferraro (Nelsonville Public Library)
  • -
  • Katipo Communications (Koha 1.0 developers)
  • -
    • -
    • Rachel Hamilton-Williams, General Manager (Webmistress)
    • -
    • Chris Cormack, 1.2 release manager
    • -
    • and Simon Blake, Amanda Atkins, Operations Manager, Olwen Williams, Finlay Thompson,
    • -
    • Gynn Lomax, Richard Anderson, Jeremy Blake, Rebecca Holden, Olive T. Canine
  • -
  • Emiliano Marmonti, MatĂ­as Veleda and Sebastian Catañeda La Plata University, Argentina (barcode printing)
  • -
  • MJ Ray and Turo Technology LLP, (quality control, installer and updater, 2.0 release maintainer)
  • -
  • Nicholas Rosasco, (Documentation Compiler)
  • -
  • Mike Hansen
  • -
  • Pate Eyler (Kaitiaki from 2002 to 2004)
  • +
  • LibLime (Joshua Ferraro), USA (Koha 3.0 Release Manager)
  • +
  • Paul Poulain, Henri Damien Laurent, Antoine Farnault, France (Koha 2.0 & 2.2 Release Manager)
  • +
  • Katipo Communications (Chris Cormack), New Zealand (Koha 1.0 & 1.2 Release Manager)
  • +
  • SAN-Ouest Provence (Bruno Toumi & Arnaud Laurin), France
@@ -66,7 +59,7 @@
  • Dorian Meid (German translation)
  • doXulting (Matthieu Branlat) OPAC basket
  • Ed Summers (Some code and Perl packages like MARC::Record)
  • -
  • Esiee School (JĂ©rome Vizcaino, Michel Lerenard, Pierre Cauchois)
  • +
  • Esiee School (JĂƒÂ©rome Vizcaino, Michel Lerenard, Pierre Cauchois)
  • Florian Bischof
  • Francisco M. Marzoa Alonso
  • Glen Stewart
  • @@ -76,15 +69,20 @@
  • Marco Gaiarin
  • Md. Aftabuddin
  • Michaes Herman
  • +
  • Mike Hansen
  • Mike Johnson
  • Mike Mylonas
  • +
  • MJ Ray and Turo Technology LLP, (quality control, installer and updater, 2.0 release maintainer)
  • +
  • Nicholas Rosasco, (Documentation Compiler)
  • Nicolas Morin (French Translation in 2.0)
  • Pawel Skuza (Polish for 1.2)
  • +
  • Pate Eyler (Kaitiaki from 2002 to 2004)
  • Regula Sebastiao
  • Roger Buck
  • Ron Wickersham
  • Sebastiaan Durand
  • Steve Tonnesen (early MARC work, Virtual Bookshelves concept, KohaCD)
  • +
  • Stephen Hedges
  • Universidad ORT Uruguay (Ernesto Silva, Andres Tarallo)
  • @@ -96,7 +94,7 @@
  • Spanish: Andres Tarallo
  • Italian: Giuseppe Angilella
  • - +
    - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/acqui-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/acqui-home.tmpl index 329d978439..ad71fb19ea 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/acqui-home.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/acqui-home.tmpl @@ -4,99 +4,111 @@

    Acquisitions

    - - You must define a budget in parameters - -
    -

    Start, recieve, or modify any order

    -

    - -

    -
    - +
    + Start, recieve, or modify any order + + You must define a budget in parameters +
    +

    + +

    +
    + +
    +

    + +

    +
    + +
    +
    +
    -

    Exchange rates

    -
    - - - - - - - - - - - -
    CurrencyRate
    - - - - " name="" value="" /> -
    - -
    +

    Exchange rates

    +
    + + + + + + + + + + + +
    CurrencyRate
    + + + + " name="" value="" /> +
    + +
    -
    - -
    + + Add Currency +
    -
    -

    Pending Suggestions

    - - suggestions waiting Manage suggestions - -

    No suggestions waiting

    - -
    -
    - -

    You must define a budget in parameters

    - -

    Budgets and bookfunds

    - - - - - - - - - - - - - - - - - - - - - - - - -
    BudgetsTotalSpentComtdAvail
    Total
    + + +

    Budgets and Bookfunds

    + [ Manage ] + + + + + + + + + + + + + + + + + + + + + + + + +
    BudgetsTotalSpentComtdAvail
    Total
    +
    -

    Use your reload button [ctrl + r] to get the most recent figures. - Committed figures are approximate only, as exchange rates will affect the amount actually paid.

    - -

    Help

    -

    To start an acquisition, whether an order, local purchase or donation first search on the supplier, (set donations as a supplier if you wish), and click add order which will set up a "shopping basket" for you.

    -

    To place an order you need to establish whether a biblio already exists for it, or set up a new biblio from scratch or from a suggestion.

    -

    To close a shopping basket click on "confirm Close Basket". After closing a basket it can not be modified or deleted

    -

    To receive an order (a parcel) search for the supplier and click receive. After confirming invoice details you will be asked to create items for the order

    - +

    Use your reload button [ctrl + r] to get the most recent figures. + Committed figures are approximate only, as exchange rates will affect the amount actually paid.

    + +

    Help

    +

    To start an acquisition, whether an order, local purchase or donation first search on the supplier, you will be asked to check their details, and enter your name which will set up a "shopping basket" for you. (Why is this you might ask... well because we want to know that it's really you ordering things - not just your computer).

    +

    To order an item you need to establish whether a biblio already exists for it, and either add an item, or set up a new biblio then add the item.

    +

    To start a new shopping basket with a new supplier return to this page and just start a new supplier search.

    +

    To close off a shopping basket click on "view shopping baskets" or search above, and the click on "confirm basket".

    + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/basket.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/basket.tmpl index 962e567e05..af84d8060b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/basket.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/basket.tmpl @@ -2,146 +2,141 @@ - -

    New Shopping Basket for ">

    -
    -

    Basket Details

    - - - - - - - - -
    Basket Number:
    Managed By:
    Open On:
    For:Supplier Id
    Invoice Number:
    Purchase Order Number:
    Closed On:
    - - -
    - - " /> - " /> - -
    - - -
    - -
    -

    Order Details

    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    OrderPublisher&order=biblio.title">TitleRRPQty.Total&order=aqorderbreakdown.bookfundid">FundRemove

    -
    - - - -

    -

    -
    -

    - &booksellerid=&basketno=">
    - - - -

    -

    -
    -
    - " /> - " /> - - " /> - -
    -
    - " /> - " /> - SubTotal
    Discount-
    Tax
    TOTAL
    - - - -
    Basket empty
    - - - -
    -
    -

    Add To Order

    -
    - " /> - " /> - To add from an existing record: -
  • Enter an existing biblionumber: -
  • -
  • or Search for an existing Biblio
  • - -
    -
    - + +

    New Shopping Basket for ">

    +
    +

    Basket Details

    +

     

    +

     

    +

     

    +

    Supplier Id  

    +

     

    +

    + + +
    + " /> + " /> + + +
    + +
    + +
    +

    Order Details

    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    Order&order=biblioitems.publishercode">PublisherTitleRRPEst.Qty.Total + &order=aqorderbreakdown.bookfundid,biblioitems.publishercode"> + Fund + + ModifyDelete

    +
    + + - +

    +

    +
    +

    +

    +

    + - +

    +

    +
    + &booksellerid=&basketno=">Modify + + &basketno=&quantity=0&biblionumber=">Delete +
    + " /> + " /> + SubTotal +   
    GST 
    TOTAL () 
    + + +
    Basket empty

    +
    + + + +
    +
    +

    Add To Order

    +
    + " /> + " /> + +
    +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/booksellers.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/booksellers.tmpl index ff3cdbde0b..58da6b077e 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/booksellers.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/booksellers.tmpl @@ -2,14 +2,14 @@ -

    You searched on supplier: , baskets found

    +

    You searched on supplier , results found

    + - @@ -21,27 +21,24 @@ Inactive - + - - - - - - - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/lateorders.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/lateorders.tmpl index 32f79185ca..2a9f233b22 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/lateorders.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/lateorders.tmpl @@ -4,7 +4,6 @@

    : Late issues

    -
    OrderOrder receive Company  
    + Receive order + - ">Recieve All orders - - - - - - - - +
    BasketPurchase orderCreated byDate  + + + + + + + + + - + - + + +
    BasketItemsCreated byDate 
    @@ -50,34 +47,27 @@ closed on - " class="button acquisition">View + ">View - " class="button acquisition">modify + ">modify - " class="button acquisition">View + ">View - - - &basketno=">Recieve this order - - -
    No pending basket
    -
    -
    - - -
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/histsearch.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/histsearch.tmpl index 77ebdd64e9..584cab4110 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/histsearch.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/histsearch.tmpl @@ -88,7 +88,13 @@
      + + &supplierid=&datereceived=">Parcel + +   + + ">
    @@ -19,9 +18,11 @@ + @@ -31,19 +32,24 @@ - - - + @@ -58,7 +64,9 @@ + @@ -103,9 +114,15 @@ + +
    SupplierTotal cost Budget   
    +     - - +   + + + + +
    + + +
    - + "> + + @@ -86,6 +94,9 @@   + " /> +
    +   + + + +
    -
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/neworderempty.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/neworderempty.tmpl index ba101dc3b0..45d01b3f66 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/neworderempty.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/neworderempty.tmpl @@ -4,251 +4,258 @@

    - - Modify order details (line #) - - New order - - (defined from suggestion #) + + Modify order details (line #) + + New order + + (defined from suggestion #)

    -
    -

    Basket Details

    - - - - - - - - -
    Basket Number:
    Managed By:
    Open On:
    For:Supplier Id
    Invoice Number:
    Purchase Order Number:
    Closed On:
    -
    -
    -

    catalogue details

    -
    - - - - " /> - " /> - " /> - " /> - " /> - " /> - " /> - " /> - " /> - - " value="" /> - - -

    - - - " READONLY/>Auto filled -

    - -

    - - " /> -

    -

    - - " /> -

    -

    - - " /> - -

    -

    - - -

    -

    - - " /> - -

    -

    - - " /> -

    - -

    First Create a Biblio for this order

    - - -

    Accounting details

    -

    - - -

    -

    - - - " onchange="update(this.form);" readonly - " /> - - - -

    - Note: All figures are in local currency, except the suppliers list price which is indicated.Currency conversion is done automatically - -

    - - " onchange="update(this.form)" />% -

    - -

    - - - " onchange="update(this.form)" readonly/> - -

    -

    - - " readonly /> - -

    -

    - - " onchange="update(this.form)" readonly />% -

    -

    - - " readonly /> -

    - -

    - - " readonly /> -

    - -

    - - " readonly /> -

    -

    - - " readonly />includes any applicable tax less any discount -

    -

    - - " readonly /> (using recommended!) -

    -

    - - " /> -

    -

    The 2 following fields are available for your own usage. They can be useful for stat purposes

    -

    - - - - - " /> - -

    -

    - - - - - " /> - -

    -

    - -

    -
    +
    + Basket Details +

    + + + + New basket + +   +

    +

     

    +

     

    +

    Supplier Id  

    +

     

    +

    +
    + +
    +
    + Catalogue details + + + + " /> + " /> + " /> + " /> + " /> + " /> + " /> + " /> + " /> + " /> + " /> + + " value="" /> + +

    + + + " /> + + " /> + +

    +

    + + + " /> + + " /> + +

    +

    + + + " /> + + " /> + +

    +

    + + + " /> + + " /> + +

    +

    + + +

    +

    + + + " /> + + " /> + +

    +

    + + + " /> + + " /> + +

    +

    + + +

    +
    +
    + Accounting details +

    + + + " /> + + " onchange="update(this.form);" /> + +

    +

    + + + " /> + + + +

    +

    + + + " /> + + " onchange="update(this.form)" /> + +

    +

    + + + " /> + + " /> + +

    +

    + + "readonly /> +

    + +

    + + readonly /> +

    + +

    + + " readonly /> +

    +

    + + " readonly /> +

    +

    + + " />(usually empty) +

    +

    + + " /> +

    +

    The 2 following fields are available for your own usage. They can be useful for stat purposes

    +

    + + + + + " /> + +

    +

    + + + + + " /> + +

    +
    +

    + +

    +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/newordersuggestion.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/newordersuggestion.tmpl index 48798305da..6e53f26604 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/newordersuggestion.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/newordersuggestion.tmpl @@ -5,61 +5,62 @@

    Suggestions

    -
    - - - - - - - - - - - - - - - - - - - - - -
    SuggestionSuggested byAccepted by 
    -

    Filter on : - title: " /> - author: " /> - publisher: " />

    -
    -   - -   - - -
    -

    -

    -

    - copy. year: - volume: - ISBN : -
    published by: - in - at -

    ()

    -

    -
    - , - - , - - - &basketno=&suggestionid=&biblionumber=" class="button acquisition">Order - - &basketno=&suggestionid=" class="button acquisition">Order - -
    -
    +
    + + + + + + + + + + + + + + + + + + + + + +
    SuggestionSuggested byAccepted by 
    + Filter on : +

    + title: " /> + author: " /> + publisher: " />

    +
    +   + +   + + +
    +

    -

    +

    + copy. year: + volume: + ISBN : +
    published by: + in + at +

    ()

    +

    +
    + , + + , + + + &basketno=&suggestionid=&biblio=" class="button acquisition">Order + + &basketno=&suggestionid=" class="button acquisition">Order + +
    +
    \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/parcel.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/parcel.tmpl index ed1c8ee8cc..a0c2d375e7 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/parcel.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/parcel.tmpl @@ -2,171 +2,109 @@ - +

    - Orders being recieved from - + + Receipt Summary for Parcel on + + orders not yet recieved for +

    -
    -" /> -
    -

    Received By:

    -

    Suppliers Invoice No: " /> - - Date received: " />

    +
    +

    Parcel:

    +

    Received by:

    +

    On:

    -
    +

    Recieve list

    - " /> - " /> - - Rate of tax used for P&P:" />% - - - - - - - - - + +
    Basket/OrderISBNTitlePriceActual P&P QtyReceived
    + + + + + + + + + - - " /> - " /> - " /> - - - - - - + + + + - - " /> - " /> + + + + + - - - - - - - - + + + + + + - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + - - - - - - + + + + -
    BASKETSummaryQTY orderedEst CostACTUALP&PQTY receivedTOTAL
    / " onChange="docalculate();"/>
    &biblionumber=&daterecieved=&invoice=&gst=&freight=&supplierid="> +
    ISBN: +
    author : +
    Publisher : +
    " onChange="docalculate();"/>
    SubTotals" /> - " READONLY />SUBTOTALS
      - Discount" onChange="updatetotal();"/>
      Tax"/>
      Totals" onChange="updatetotal();"/>
      Invoice Total + HELP +

    The total at the bottom of the page should be within a few cents of the total for the invoice.

    +
    GST
      Invoice Total
     TOTAL
    -Note: P&P is per item. If you have a total freight fill the Total P&P only.! -

    - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/parcels.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/parcels.tmpl index ba67cf9ecc..ceaa26dcde 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/parcels.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/parcels.tmpl @@ -1,106 +1,128 @@ - Koha -- Recieve +Koha -- Recieve -

    Receive parcel from supplier ">

    +

    Receive parcel from supplier ">

    parcels found

    - +
    - - - - - - - - - - - - - - - - - +
    LineCodeDate ReceivedItem CountBiblio countItems expected
    -   - > - - "> - - From :"> -

    To :"> -

    -   - - Sort by :
    - Results per page : -
    - -
    + + + + + + + + + + + + + + + + - - - - - - - - + + + + + + + +
    LineCodeDate ReceivedItem CountBiblio countItems expected
    +   + > + + "> + + From :"> +

    To :"> +

    +   + + Sort by :
    + Results per page : +
    + +
    - - - - - - &datereceived=&code="> - - - - - - - - - -
    + + + + + + &datereceived=&code="> + + + + + + + + + +
    - - + +
    +
    + Receive a new Parcel +
    +

    + > + + +

    +

    + + +

    +

    + + +

    +

    + +

    +
    +
    +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/acqui/supplier.tmpl b/koha-tmpl/intranet-tmpl/prog/en/acqui/supplier.tmpl index 6b8668b9a1..c7a605ac76 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/acqui/supplier.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/acqui/supplier.tmpl @@ -2,140 +2,246 @@ - -

    Update:

    - -

    Add supplier

    - -
    - " /> -
    -

    COMPANY DETAILS

    -

    - - " /> -

    -

    - - -

    -

    - - -

    -

    - - " /> -

    -

    - - " /> -

    -

    - - " /> -

    -

    CONTACT DETAILS

    -

    - - " /> -

    -

    - - " /> -

    -

    - - " /> -

    -

    - - " /> -

    -

    - - " /> -

    -

    - - " /> -

    -

    - - -

    -
    -
    -

    CURRENT STATUS

    -

    - - - Active - Inactive - - Active - Inactive - -

    -
    -
    -

    ORDERING INFORMATION

    -

    - - -

    -

    - - -

    -

    - - -

    -

    - - - Yes - No - - Yes - No - -

    -

    - - - Yes - No - - Yes - No - -

    -

    - - - Yes - No - - Yes - No - -

    -

    - - " /> % -

    -
    - -
    + +
    + + "> + + +

    Update:

    + +

    Add supplier

    + +
    + Company details +

    + + "> +

    +

    + + +

    +

    + + +

    +

    + + "> +

    +

    + + "> +

    +

    + + "> +

    +
    +
    + Contact details +

    + + "> +

    +

    + + "> +

    +

    + + "> +

    +

    + + "> +

    +

    + + "> +

    +

    + + "> +

    +

    + + +

    +
    +
    + Ordering informations +

    + + + Active + Inactive + + Active + Inactive + +

    +

    + + +

    +

    + + +

    +

    + + +

    +

    + + checked>Yes + checked>No +

    +

    + + checked>include GST + checked>don't include GST +

    +

    + + checked>include GST + checked>don't include GST +

    +

    + + "> % +

    +

    + + +

    +
    +

    +
    + +

    Information for :

    + +
    + Company details +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    +
    +
    + Contact details +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    +

    + +   +

    + +
    +
    + Ordering informations +

    + + + Active + + Inactive + +

    +

    + +   +

    +

    +   +

    +

    +   +

    +

    + + YesNo +

    +

    + + YesNo +

    +

    + + YesNo +

    +

    + + %  +

    +

    + +   +

    +
    +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/admin-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/admin-home.tmpl index 896534fe34..b16d646e2a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/admin-home.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/admin-home.tmpl @@ -3,107 +3,91 @@ -
    -

    NEULIS Administration

    - - diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/aqbookfund.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/aqbookfund.tmpl index adc87c2067..65f0775fca 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/aqbookfund.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/aqbookfund.tmpl @@ -71,9 +71,9 @@ Koha -- System Administration: Book Funds - ?op=add_form&bookfundid=">Edit - ?op=delete_confirm&bookfundid=">Delete - ">Add budget + ?op=add_form&bookfundid=&branchcode=">Edit + ?op=delete_confirm&bookfundid=&branchcode=">Delete + &branchcode=">Add budget ">Show budgets @@ -190,8 +190,12 @@ Koha -- System Administration: Book Funds -

    @@ -220,6 +223,10 @@ Koha -- System Administration: Book Funds Book fund + + Branch + + Name @@ -233,6 +240,7 @@ Koha -- System Administration: Book Funds
    " method="post"> " /> + " />
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/aqbudget.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/aqbudget.tmpl index 7664ec4d80..23371440dd 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/aqbudget.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/aqbudget.tmpl @@ -87,7 +87,7 @@ Koha -- System Administration: Budgets Calendar.setup( { inputField : "filter_startdate", - ifFormat : "%Y-%m-%d", + ifFormat : "", button : "filter_startdate_button" } ); @@ -119,7 +119,7 @@ Koha -- System Administration: Budgets Calendar.setup( { inputField : "filter_enddate", - ifFormat :"%Y-%m-%d", + ifFormat : "", button : "filter_enddate_button" } ); @@ -170,10 +170,6 @@ Koha -- System Administration: Budgets -

    - Add bookfund - Show all budgets -

    @@ -260,7 +256,7 @@ Koha -- System Administration: Budgets Calendar.setup( { inputField : "startdate", - ifFormat : "%Y-%m-%d", + ifFormat : "", button : "startdate_button" } ); @@ -278,7 +274,7 @@ Koha -- System Administration: Budgets Calendar.setup( { inputField : "enddate", - ifFormat : "%Y-%m-%d", + ifFormat : "", button : "enddate_button" } ); diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/auth_subfields_structure.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/auth_subfields_structure.tmpl index 87ee6f2e16..82f76b1968 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/auth_subfields_structure.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/auth_subfields_structure.tmpl @@ -3,42 +3,34 @@ + -

    + Edit MARC subfields constraints

    " name="Aform" method="post"> " /> -
    ">

    Tag , Subfield

    - - - - - -
    MARC constraints
    " name="seealso" value="" size="20" /> (example for 200a: '200c','200d','200e'...)
    - - - - - - - - - - - - -
    Editor constaints
    " type="text" name="liblibrarian" value="" size="40" maxlength="80" />
    " name="libopac" value="" size="40" maxlength="80" />
    (ignore means that the subfield is NOT managed by Koha)
    Opac: Intranet: Editor: (see online help)
    (if checked, it means that the subfield is an URL and can be clicked
    (if checked, it means that the subfield is used for linking authorities
    -
      -
    • Authorized Value:
    • -
    • Thesaurus:
    • -
    • Plugin:
    • -
    -
    -
    +
    "> +

    Tag , Subfield

    +

     

    +

     

    +

    " name="seealso" value="" size="20" /> (example for 200a: '200c','200d','200e'...)

    +

    " type="text" name="liblibrarian" value="" size="40" maxlength="80" />

    +

    " name="libopac" value="" size="40" maxlength="80" />

    +

    (ignore means that the subfield is NOT managed by Koha)

    +

    Opac: Intranet: Editor: (see online help)

    +

    (if checked, it means that the subfield is an URL and can be clicked)

    +

    +

      +
    • Authorized Value
    • +
    • Thesaurus
    • +
    • Plugin
    • +
    +

    +

    Note: in the last column, you can choose: @@ -58,7 +50,7 @@ Subfield - Description +

    Description

    " method="post"> " /> @@ -79,6 +71,7 @@

    Authority MARC subfield structure admin for (authority: )

    This screen shows the subfields associated with the selected tag. You can edit subfields or add a new one by clicking on edit.

    +

    The column Koha field shows that the subfield is linked with a Koha field. Koha can manage a MARC interface, and a Koha interface. This link ensures that both DB are synchronized

    @@ -101,31 +94,44 @@ subfield ignoredTab:, - Repeatable, Not repeatable, - Mandatory, Not mandatory, - | See Also:, - hidden, - is an url, - | Auth value:, - | Authority:, + | Koha field:, + Repeatable, Not repeatable, + + Mandatory, Not mandatory, + + | See Also:, + + hidden, + + is an url, + + | Auth value:, + + | Authority:, + | Plugin:, - | Link:, - +
    ">Delete
    -" method="get">" />" />
    " />" />
    - - //images/1leftarrow.png" title="previous" alt="previous" border="0" > - - + + + //images/1leftarrow.png" title="previous" alt="previous" border="0" > + + + - //images/1rightarrow.png" title="next" alt="next" border="0" /> - - + //images/1rightarrow.png" title="next" alt="next" border="0" /> + + + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/auth_tag_structure.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/auth_tag_structure.tmpl index 1902d1d4de..dc3eee6dd4 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/auth_tag_structure.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/auth_tag_structure.tmpl @@ -6,118 +6,134 @@

    Authority MARC framework for default framework

    + function _(s) { return s } // dummy function for gettext + ///////////////////////////////////////////////////////////////////////////////////////////////////////////////// + function isNotNull(f,noalert) { + if (f.value.length ==0) { +return false; + } + return true; + } + ///////////////////////////////////////////////////////////////////////////////////////////////////////////////// + function toUC(f) { + var x=f.value.toUpperCase(); + f.value=x; + return true; + } + ///////////////////////////////////////////////////////////////////////////////////////////////////////////////// + function isNum(v,maybenull) { + var n = new Number(v.value); + if (isNaN(n)) { + return false; + } + if (maybenull==0 && v.value=='') { + return false; + } + return true; + } + ///////////////////////////////////////////////////////////////////////////////////////////////////////////////// + function isDate(f) { + var t = Date.parse(f.value); + if (isNaN(t)) { + return false; + } + } + ///////////////////////////////////////////////////////////////////////////////////////////////////////////////// + function Check(f) { + var ok=1; + var _alertString=""; + var alertString2; + if (f.tagfield.value.length==0) { + _alertString += "\n- " + _("tag number missing"); + } + if (_alertString.length==0) { + document.Aform.submit(); + } else { + alertString2 = _("Form not submitted because of the following problem(s)"); + alertString2 += "\n------------------------------------------------------------------------------------\n"; + alertString2 += _alertString; + alert(alertString2); + } + } + -

    - - Modify tag - Add tag - -

    -
    " name="Aform" method="post"> - - " /> -

    -

    " size="80" maxlength="100" />

    -

    " size="80" maxlength="100" />

    -

    -

    -

    (if you select a value here, the indicators will be limited to the authorised value list)

    -

    -
    +

    + + Modify tag + Add tag + +

    +
    " name="Aform" method="post"> + + " /> +

    +

    " size="40" maxlength="100" />

    +

    " size="40" maxlength="100" />

    +

    + + + + + +   +

    +

    + + + + + +   +

    +

    (if you select a value here, the indicators will be limited to the authorised value list)

    +

    +
    - - - - - - - - " method="post"> - - "> - " /> - - + + + + + + + + " method="post"> + + "> + " /> + + - Data deleted - " method="post"> - - + Data deleted + " method="post"> + "> + " /> + + - " method="post"> - - " /> - Create authority framework for using - - - + " method="post"> + + " /> + Create authority framework for using + + + @@ -125,54 +141,54 @@

    Select an authority framework

    " method="post"> - - " /> - + + " /> +
    -
    tag
     
    CONFIRM DELETION
    " method="post">
    tag
     
    CONFIRM DELETION
    " method="post">
    - - - - - - - - - - - "> - - - - - - - - - - -
    TagLibRepeatableMandatoryAuthorised
    value
    SubfieldsEditDelete
    YesNoYesNo" class="button">subfields">Edit">Delete
    -
    " method="post"> - - " /> - - - - ?offset=&searchfield=&authtypecode= ">Previous Page - - - ?offset=&searchfield=&authtypecode= ">Next Page - -
    + + + + + + + + + + + + "> + + + + + + + + + + +
    TagLibRepeatableMandatoryAuthorised
    value
    SubfieldsEditDelete
    YesNoYesNo" class="button">subfields">Edit">Delete
    +
    " method="post"> + + " /> + + + + ?offset=&searchfield=&authtypecode= ">Previous Page + + + ?offset=&searchfield=&authtypecode= ">Next Page + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/authorised_values.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/authorised_values.tmpl index 844c094a29..d6b62bf278 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/authorised_values.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/authorised_values.tmpl @@ -1,31 +1,39 @@ -Koha -- System Administration: - +Koha -- System Administration: + + Confirm Deletion Authorised values admin +

    + Modify authorised value + Add authorised value + Add category +

    " name="Aform" method="post"> - - - - - - - - - - - - - - -
    " />
    " />
    " /> - " />
    + + + + + + + + + + + + + +
    " />
    " />
    + " /> + + +
    @@ -42,7 +50,7 @@
    " method="post"> - " /> + " /> " />
    " method="post">
    @@ -79,12 +87,10 @@ the subfield is not entered through a free field, but though a list of authorise -
    " method="post"> - -"> -
    - -
    +
    " method="post"> diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/authtypes.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/authtypes.tmpl index f68f78a315..d68c509fac 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/authtypes.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/authtypes.tmpl @@ -77,6 +77,7 @@ function Check(f) { " /> " />Enter here the number of the tag that will be reported in the biblio (subfield by subfield). For example, in UNIMARC, enter 200 to report every 200 subfield in the 70x biblio +

    @@ -111,7 +112,7 @@ function Check(f) { Code Description - summary + Summary Tag reported   Edit diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/branches.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/branches.tmpl index 074649af79..088fa0c646 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/branches.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/branches.tmpl @@ -8,235 +8,225 @@ -

    -
    " name="Aform" method="post"> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    Branch code - - " /> - - - " /> - -
    Name" /> 
    " />
    Address" />
     " />
     " />
    Phone" />
    Fax" />
    E-mail" />
    Branch IP" />
    Branch Printer - -

    -
    + +

    Add branch

    + +

    Modify branch

    + +
    " name="Aform" method="post"> + + + + + + +

    + + + " /> + + + " /> + +

    +

    + + " />  +

    + +

    + + " /> +

    + +

    " />

    +

    " />

    +

    " />

    +

    " />

    +

    " />

    +

    " />

    +

    " />

    +

    + +

    +
    -

    Confirm deletion of ()?

    -
    " method="post"> - - " /> - "> - -
    -
    " method="post"> - -
    +

    Confirm deletion of ()?

    +
    " method="post"> + + " /> + "> + +
    +
    " method="post"> + +
    - -
    - - - - - - - - - - - - - - - - - - - - - - - - -
    NameCodeAddressCategoryBranch IPBranch Printer  
    - - (nothing entered) - - - - -
    - -
    - -
    Ph: - -
    Fax: - -
    Email: - -
    - - (no categories set) - - -
    - - -
    - - - - -
    - - " /> - -
    -
    -
    - " /> -"> - -
    -
    +

    +
    + +
    Branch saved
    +
    Branch saved
    +
    Branch deleted
    +
    Branch category added
    +
    Branch category modified
    +
    Branch category deleted
    +
    Impossible to delete : branch is used
    +
    Category cannot be deleted because there are branches using that category.
    + + + + + + + + + + + + + + + + + + + + + + + + +
    NameCodeAddressCategoryBranch IPBranch Printer  
    + + (nothing entered) + + + + +
    + +
    + +
    Ph: + +
    Fax: + +
    Email: + +
    + + (no categories set) + + +
    + + +
    + + + + + ">Edit + + &branchname=&op=delete">Delete + +
    -

    -

    -
    - - - - - - - - - - - - - - - - - - - -
    Branches Categories
    NameCodeDescription  
    -
    - - " /> - -
    -
    -
    - " /> - -
    -
    " method="post">

    - -

    -
    +

    +

    + + + + + + + + + + + + + + + + + + + + + +
    Branches Categories
    NameCodeDescription  
    +
    + + " /> + +
    +
    +
    + " /> + +
    +
    + +

    + No Category defined. +

    + +
    " method="post">

    + +

    +
    - -
    - - - - - - - - - - - - - - - -
    Category code - - " /> - - - " /> - -
    Name" /> 
    Description" /> 
    -
    + +
    + + + + + + + + + + + + + + + +
    Category code + + " /> + + + " /> + +
    Name" /> 
    Description" /> 
    +
    - Confirm delete: -
    - - " /> - -
    -
    " method="post"> - -
    + Confirm delete: +
    + + " /> + +
    +
    " method="post"> + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/categorie.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/categorie.tmpl index e7a6eb7b34..295eca4026 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/categorie.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/categorie.tmpl @@ -42,35 +42,40 @@ return false; } } - // - function Check(f) { - var ok=1; - var _alertString=""; - var alertString2; - if (f.categorycode.value.length==0) { + // to check if the data are correctly entered. + function Check(ff) { + var ok=0; + var _alertString="Form not submitted because of the following problem(s)\n"; + _alertString +="-------------------------------------------------------------------\n\n"; + if (ff.categorycode.value.length==0) { + ok=1; _alertString += "- categorycode missing\n"; } -// alert(window.document.Aform.description.value); - if (!(isNotNull(window.document.Aform.description,1))) { + if (!(ff.category_type.value)){ + ok=1; + _alertString += "- category type missing\n"; + } + if (!(isNotNull(ff.description,1))) { + ok=1; _alertString += "- description missing\n"; } - if (!isNum(f.upperagelimit,0)) { + if (!isNum(ff.upperagelimit,0)) { + ok=1; _alertString += "- upperagelimit is not a number\n"; } - if (_alertString.length==0) { - document.Aform.submit(); - } else { - alertString2 = "Form not submitted because of the following problem(s)\n"; - alertString2 += "------------------------------------------------------------------------------------\n\n"; - alertString2 += _alertString; - alert(alertString2); - } + + if (ok) { // if there is a problem + alert(_alertString); + return; + } + // if all is good + ff.submit(); } -
    " name="Aform" method="post"> + " method="post"> @@ -83,12 +88,12 @@ Category code " /> - Category code + Category code Description  Enrolment period  months - Upperage limit  years Age Required  years + Upperage limit  years Enrollment fee$ Overdue notice required  @@ -127,8 +132,8 @@ Category code Description Enrolment period months - Upperage limit years Age Required years + Upperage limit years Enrolment fee$ Overdue notice requiredYesNo Reserve fee$ @@ -161,23 +166,32 @@
    - + + - - + + - - - + + + + - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/checkmarc.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/checkmarc.tmpl index d68857c2ec..56ffac4a39 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/checkmarc.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/checkmarc.tmpl @@ -1,120 +1,135 @@ Koha -- System Administration: MARC Check: errors foundConfiguration OK! - + + -

    MARC Checks

    -
    Category Name CodeCategory NameType Enrollment PeriodUpper Age Limit Age RequiredEnrollment FeeUpper Age LimitEnrollment Fee Overdue Reservation Fee  
    + + + Adult + Child + Prof. + Org. + months years years years YesNo
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +

    MARC Checking

    +
    TestResult
    biblionumberThe biblio.biblionumber and items.biblionumber fields MUST : -
    • each be mapped to a MARC field/subfield,
    • -
    OKbiblionumber mapped correctly
    itemnum
    • The field itemnumber MUST be mapped
    • -
    • The corresponding fileld or subfield MUST be in tab 10 and may be hidden
    OKThe field itemnumber is mapped to a MARC field
    itemnum
    • The field barcodde MUST be mapped
    • -
    • The corresponding field or subfield MUST be in tab 10 and may be hidden
    + + + + + + + + + + - - - - + + + + - - - - - + + + + + + - - - - + + + + - - + + + + + + + + + + + + + - - - - + + + + - - - - + + + + - - - - + + + + - - - - + + + + - - - - + + + + - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + - - - - + + + +
    TestResult
    itemnum
    • The field itemnum MUST be mapped
    • +
    • The correspounding subfield MUST be in with -1 (ignore) tab
    OKThe field barcode is mapped to a MARC field
    OKitemnum : the field itemnumber is mapped to a field in tab -1
    ISBN NOT mappedisbn MUST :
    -
    • be mapped to a MARC subfield,
    • -
    item fieldsALL items fields MUST :
    +
    • be mapped to the same tag,
    • +
    • and they must all be in the 10 (items) tab
    OKISBN defined
    OKAll item fields are in the same tag and in item tab
    Item tagThere is more than 1 MARC tag related to items tab (10) :
    OKOnly 1 MARC tag mapped to items
    itemtype NOT mappeditemtype field MUST :
    -
    • be mapped to a MARC subfield,
    • -
    • the correspounding subfield MUST have authorised_value=itemtype
    itemtype NOT mappedthe biblioitems.itemtype field MUST :
    +
    • be mapped to a MARC subfield,
    • +
    • the correspounding subfield MUST have authorised_value=itemtype
    OKitemtype mapped
    OKbiblioitems.itemtype defined
    homebranch NOT mappedhomebranch MUST :
    -
    • be mapped to a MARC subfield,
    • -
    homebranch NOT mappedthe items.homebranch field MUST :
    +
    • be mapped to a MARC subfield,
    • +
    • the correspounding subfield MUST have authorised value=branches
    OKhomebranch defined
    OKhomebranch defined
    holdingbranch NOT mappedthe holdingbranch MUST :
    -
    • be mapped to a MARC subfield,
    • -
    • the correspounding subfield MUST have authorised value=branches
    holdingbranch NOT mappedthe items.holdingbranch field MUST :
    +
    • be mapped to a MARC subfield,
    • +
    • the correspounding subfield MUST have authorised value=branches
    OKholdingbranch defined
    OKholdingbranch defined
    biblio and biblionumberThe biblio.biblionumber and biblioitems.biblioitemnumber fields be mapped to a MARC subfield,
    OKbiblionumber and biblioitemnumber mapped correctly
    framework valuesthere is a null value in a frameworkcode. Check the following tables
    +
  • select * from marc_subfield_structure where frameworkcode is NULL
  • +
  • select * from marc_tag_structure where frameworkcode is NULL
  • +
  • select * from marc_biblio where frameworkcode is NULL
  • OKno NULL value in frameworkcode
    TOTALYou have error(s) in your MARC configuration. Please fix them before using Koha
    TOTALYou have error(s) in your MARC configuration. Please fix them before using Koha
    - -

    Configuration OK, you don't have errors in your MARC parameters

    + +

    Configuration OK, you don't have errors in your MARC parameters table

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/itemtypes.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/itemtypes.tmpl index 022a4b1877..04e4d2b5fc 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/itemtypes.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/itemtypes.tmpl @@ -36,9 +36,9 @@ Item Types Administration - Modify item type +

    Modify item type

    - Add item type +

    Add item type

    @@ -59,10 +59,10 @@ Item Types Administration - + - + @@ -84,9 +84,15 @@ Item Types Administration " checked="checked" /> + " /> + - "> + + " alt=""> + +
    +

    @@ -151,6 +157,16 @@ Item Types Administration " /> + + + + +

    Enter a summary that will overwrite the default one in search results lists

    +

    +

    Example, for a website itemtype :

    +

    <a href="[856u]">open site</a> will show the link just below the title

    + +

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/roadtype.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/roadtype.tmpl index 29636fafe8..a22b368e2f 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/roadtype.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/roadtype.tmpl @@ -5,9 +5,9 @@ -

    Modifier un type de voie

    +

    Modify road type

    -

    Ajouter un type de voie

    +

    Add road type

    " name="Aform" method="post"> diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/systempreferences.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/systempreferences.tmpl index 64eaeaeeda..6d75af3f54 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/systempreferences.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/systempreferences.tmpl @@ -7,248 +7,178 @@ + function _(s) { return s } // dummy function for gettext + // + function isNotNull(f,noalert) { + if (f.value.length ==0) { + return false; + } + return true; + } + // + function toUC(f) { + var x=f.value.toUpperCase(); + f.value=x; + return true; + } + // + function isNum(v,maybenull) { + var n = new Number(v.value); + if (isNaN(n)) { + return false; + } + if (maybenull==0 && v.value=='') { + return false; + } + return true; + } + // + function isDate(f) { + var t = Date.parse(f.value); + if (isNaN(t)) { + return false; + } + } + // + function Check(f) { + var ok=1; + var _alertString=""; + var alertString2; + if (f.variable.value.length==0) { + _alertString += "\n- " + _("variable missing"); + } + if (f.value.value.length==0) { + _alertString += "\n- " + _("value missing"); + } + if (_alertString.length==0) { + document.Aform.submit(); + } else { + alertString2 = _("Form not submitted because of the following problem(s)"); + alertString2 += "\n------------------------------------------------------------------------------------\n"; + alertString2 += _alertString; + alert(alertString2); + } + } + - - -

    Modify a system preference

    - -

    Add a system preference

    - - " name="Aform" method="post"> - - - - - - - -
    " />
    ">
    - " size="" /> - - - - - - - - - - Yes - - No -
    -

    Save ChangesAdd this Preference"> '; return false;" />

    - + + +

    Modify a system preference

    + +

    Add a system preference

    + + " name="Aform" method="post"> + + + + + + + +
    " />
    ">
    + + + + + + + + + + + Yes + + No +
    +

    Save ChangesAdd this Preference"> '; return false;" />

    +

    Koha internal

    - Note: you should have no reasons to modify the following default values - - - -
    " size="40" maxlength="40"> (Choice, YesNo, Integer, Textarea, Float, Themes, or Languages)
    " size="60" maxlength="80" />(a choice list for Choice (separated by |) or cols|rows for Texarea)
    -
    - - - - + Note: you should have no reasons to modify the following default values + + + +
    " size="40" maxlength="40"> (Choice, YesNo, Integer, Textarea, Float, Themes, or Languages)
    " size="60" maxlength="80" />(a choice list for Choice (separated by |) or cols|rows for Texarea)
    + + + + + -

    Data recorded

    - -
    " method="post"> - -
    - - - - - - - - - - -
    Confirm Deletion of ?
    Variable Name:
    Value:
    -
    " method="post">" /> -
    " method="post">
    - - - - - - -

    Data deleted

    -
    " method="post"> - -
    - - - -

    System preferences admin

    - - - - - - - - - - - class="highlight"> - - - - - - - -
    VariableValueExplanation
    ">Edit">Delete
    - - -
    " method="post"> - - -
    - - +

    Data recorded

    + +
    " method="post"> + +
    + + + + + + + + + + +
    Confirm Deletion of ?
    Variable Name:
    Value:
    +
    " method="post">" /> +
    " method="post">
    + + + + + + +

    Data deleted

    +
    " method="post"> + +
    + + + +

    System preferences admin

    + +

    Editing preferences for module

    + + + + + + + + + class="highlight"> + + + + + + + +
    VariableValueExplanation
    ">Edit">Delete
    + + +
    " method="post"> + + +
    + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/admin/thesaurus.tmpl b/koha-tmpl/intranet-tmpl/prog/en/admin/thesaurus.tmpl index 0bdfec6be6..98db611167 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/admin/thesaurus.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/admin/thesaurus.tmpl @@ -1,153 +1,156 @@ Koha -- System Administration: Thesaurus Management - - - -
    + + + - -

    Thesaurus management

    - - - - -
     
    Values related to ()
    -

    - - - - - - - - - - - - - - " method="post"> - -
    Other forms  
    ">Edit">Delete
    - " method="post"> - - " /> - " /> -

    - + + + + + +
    Thesaurus management
    Values related to ()
    + + + + + + + + + + + + + + + " method="post"> + +
    Other forms  
    ">Edit">Delete
    + " method="post"> + + " /> + " /> + + -
    " name="Aform" method="post"> -

    AddModify

    - - - - - - - - - - - - - - - - - - - - -
    Category
    Authority lib" />" maxlength="80" size="80" />
    Other lib" maxlength="80" size="80" />
    -

    " /> - " /> - " /> - " /> - " /> - " /> - AddModify Value" />

    +
    " name="Aform" method="post"> +

    AddModify

    + + + + + + + + + + + + + + + + + + + + +
    Category
    Authority lib" />" maxlength="80" size="80" />
    Other lib" maxlength="80" size="80" />
    +

    " /> + " /> + " /> + " /> + " /> + " /> + + + + + +

    - - - - - - - - - - -
    lib
    Value
    -
    " method="post"> - - " /> - " /> -
    CONFIRM DELETION of this entry and all entries depending on this one
    " method="post">
    + + + + + + + + + + +
    lib
    Value
    +
    " method="post"> + + " /> + " /> +
    CONFIRM DELETION of this entry and all entries depending on this one
    " method="post">

    Thesaurus management

    -

    Manages thesaurus and authorities files.

    -
      -
    • Dig: see data dependent on this one
    • -
    • Related: see other forms of this authority entry
    • -
    -
    - - " /> -
    -
    - - - &search_category=">
    - - +

    Manages thesaurus and authorities files.

    +
      +
    • Dig: see data dependent on this one
    • +
    • Related: see other forms of this authority entry
    • +
    +
    + + " /> +
    +
    + + + &search_category=">
    + + - - - - - - - - - + + + + + + + + + - - - - - - - - - - -
     Free formAuthorityDigRelatedEditDelete
     Free formAuthorityDigRelatedEditDelete
      DigRelated">//images/fileopen.png" width="32" hspace="0" vspace="0" border="0" />">//images/edittrash.png" width="32" hspace="0" vspace="0" border="0" />
    + +   + + + Dig + Related + ">Edit + ">Delete + + +

    " method="post"> - +

    " method="post"> - - " /> - " /> - " /> - -

    + + " /> + " /> + " /> + +

    -
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/auth.tmpl b/koha-tmpl/intranet-tmpl/prog/en/auth.tmpl index 370a7e2320..de46d357bb 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/auth.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/auth.tmpl @@ -1,5 +1,12 @@ -Access DeniedSession Timed Out --IP Change -- Invalid Username or Password -- Log in to Koha - + + Access Denied + Session Timed Out -- + IP Change -- + Invalid Username or Password -- + Log in to Koha + +
    +

    Log in to Koha

    Login Error

    Sorry, Koha doesn"t think you have permission for this page.

    @@ -23,21 +30,20 @@ -
    " method="post" name="mainform" id="mainform"> - " value="" /> + " value="" /> - - - - - -
    Log In to Koha
    -

    +

    + +

    +

    + +

    +

    - - - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/auth_finder.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/auth_finder.tmpl index 5e9fc31b80..94b5ef993f 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/auth_finder.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/auth_finder.tmpl @@ -1,53 +1,68 @@ -Ă¯Â»Â¿Koha -- Authorities + +Cataloguing_Authority Report - +
    +

    Authority search

    - -

    Authority search

    - -
    - "> + - + "> - ">

    Search on

    "> -

    -

    - "> - - - - ">

    - - - - - - + + + + + + ">

    -

    +

    + + + + + + "> +

    +

    + + + + + + "> +

    +

    + Sort by

    - - - - +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities-home.tmpl index e8d5bb2d41..a3f6351e20 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities-home.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities-home.tmpl @@ -1,42 +1,128 @@ -Ă¯Â»Â¿Koha -- Authorities + +Koha -- Authorities + + + +
    + Add authority + +
    + + + + + +
    + + + +
    - - - - - " /> -
    - - - -
    Authority search
    " /> - - -
    "> - - -
    -

    - -

    -
    - - - +
    + +
    + +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities.tmpl index 1c88809daf..a34bba4e2c 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/authorities.tmpl @@ -1,185 +1,115 @@ -Ă¯Â»Â¿NEULIS -- Authorities + +Koha -- Authority details - - - - - - + + +
    + + Modify authority # () + + Adding authority () + +
    + + + + "> + "> - -
    - -
      -
    • Non UTF-8 characters present or malformed XML
    • -
    • Please correct and save.
    • -
    - -
    +
    + + + + -&nonav=&linkid="+document.form.f.linkid.value > - -
    -

    Authority number

    -

    ">"> - - - "> - "> - - - - - - -

    -
    -
    - +
    + +
    +

    Duplicate suspected with

    +

    You must either :

    + +
    + - - - - -
    XX" id="XX" class="tab" style="visibility:hidden"> + + +

    + "> + "> + style="display:none;" name="indicator" size="2" maxlength="2" value="" class="flat"> - -

    XX" id="XX" class="tab" style="visibility:visible"> + style="display:none;" name="indicator" value=""> + + " onclick="javascript:this.nextSibling.type='text';this.nextSibling.focus()">+',this.value)" > +

    - - - - - - - -
    "> - -

    - "> - - "> - style="display:none;" name="indicator" size="2" maxlength="2" value="" class="flat"> - - - style="display:none;" name="indicator" value=""> - - - - - ')">+ -

    - - - - " onclick="unHideSubfield('subfield','label')"> - - - -
    -

    - - - - - - ')">+ - - "/> - " size="2" maxlength="1"/> - "/> - "/> -

    -
    - -
    - -
    +
    + +" onclick="unHideSubfield('subfield','label')"> + +
    +')">+ +"/> +" size="2" maxlength="1"/> +"/> +"/> +"/> +
    +
    "> - " value=""> + "> "> + "> ">
    "> - " value=""> + "> "> + "> "> "> - " value=""> + "> "> - - "> - +
    + + + + + +
    +
    + - \ No newline at end of file + + \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-biblio-search.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-biblio-search.tmpl index addbf938a9..9b31b4bc0a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-biblio-search.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-biblio-search.tmpl @@ -1,30 +1,56 @@ -Ă¯Â»Â¿ - + - + + "> + + + + - - diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-linker.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-linker.tmpl index f2d23a6949..1fa973319e 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-linker.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/blinddetail-linker.tmpl @@ -13,8 +13,46 @@ i=index_start //opener.opener.document.f.linkid.value=""; // go forward, until reaching the end of the field. +while (i<=opener.opener.document.f.field_value.length) { + + + + if (opener.opener.document.f.tag[i].value == && opener.opener.document.f.subfield[i].value == '') + { opener.opener.document.f.field_value[i].value = ""; - + } + if (opener.opener.document.f.tag[i].value == whichfield && opener.opener.document.f.subfield[i].value == '') + { + opener.opener.document.f.field_value[i].value = ""; + } + + + if (opener.opener.document.f.tag[i].value != whichfield) { + i=opener.opener.document.f.field_value.length; + } + i++; +} +// go backward until the beginning of the field +i=index_start +while (i>=0) { + + + + if (opener.opener.document.f.tag[i].value == && opener.opener.document.f.subfield[i].value == '') + { + opener.opener.document.f.field_value[i].value = ""; + } + if (opener.opener.document.f.tag[i].value == whichfield && opener.opener.document.f.subfield[i].value == '') + { + opener.opener.document.f.field_value[i].value = ""; + } + + + if (opener.opener.document.f.tag[i].value != whichfield) { + i=0; + } + i--; +} opener.close(); self.close(); return false; diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/detail.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/detail.tmpl index e05b6d70e4..a0733fb34b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/detail.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/detail.tmpl @@ -1,55 +1,118 @@ -Ă¯Â»Â¿Koha -- Authorities + +Koha -- Authority details - - - + + - - -
    -/includes/marc-editor.css"> -
    "> -

    Authority number : in

    - &nonav=&authtypecode=""> - //images/fileopen.png"> - - - //images/edittrash.png"> - - ')" class="button authority"> - Print -  &kohafield=authid&op=do_search&zoom=1" class="button authority">Used in biblio(s) + + +/includes/hierarchy.css"> + + +
    + +
    + +
    " class=""> + + +
    p" class="parent"> ">
    + + + + + + " title="Term"> + + + ');">+
    + +
    c" class="child"> ">
    + + +
    + + +
    +
    + -
    - -

    - -

    - -

    - - -

    - - +

    Authority # ()

    + + + + - \ No newline at end of file + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/linkresultlist-auth.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/linkresultlist-auth.tmpl index 70aa29e85a..a0dfcfddf5 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/linkresultlist-auth.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/linkresultlist-auth.tmpl @@ -6,21 +6,21 @@ diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist-auth.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist-auth.tmpl index c6bdb48073..8373deedfe 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist-auth.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist-auth.tmpl @@ -1,93 +1,148 @@ -Ă¯Â»Â¿Koha -- Authorities + +Cataloguing_Authority_choose - -

    Authority search results

    - - - &authtypecode=">Search again -
    - +
    +

    Authority search results

    +
    +
    + + + "> + "> +
    +

    Search on

    +

    + + + "> +

    +

    + + + + + + "> +

    +

    + + + + + + "> +

    +

    + + + + + + "> +

    +

    + +

    +
    +
    +
    + +
    - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist.tmpl b/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist.tmpl index 0378f219bc..c656a11edb 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/authorities/searchresultlist.tmpl @@ -1,108 +1,64 @@ -Ă¯Â»Â¿Koha -- Authorities + +Koha -- Authorities -- Search result list + -

    Authority search results

    - -
    - - - - - - - - - "> - - - - - - - - -
    SummaryUsed inAuthid/Delete
    &op=do_search&zoom=1" class="button authority"> biblio(s)  - - ')">Delete - -
    -
    - -
    +

    Authority search results

    + +
    -From:  To: -
    - +

    + + Results to of + + No results found. + +

    - +
    + + + + + + + + + + + + + + + + + + + +
    SummaryUsed inViewDelete
    "> + " class="button authority"> biblio(s) + + ">Authority number + + + )">Delete + +
    +
    +
    \ No newline at end of file + + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/barcodes/barcodes.tmpl b/koha-tmpl/intranet-tmpl/prog/en/barcodes/barcodes.tmpl index 97efe01438..67907adb32 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/barcodes/barcodes.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/barcodes/barcodes.tmpl @@ -1,4 +1,7 @@ - +Koha -- Barcodes + + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/barcodes/printerConfig.tmpl b/koha-tmpl/intranet-tmpl/prog/en/barcodes/printerConfig.tmpl index 5c33f998ac..b97c26da50 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/barcodes/printerConfig.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/barcodes/printerConfig.tmpl @@ -1,4 +1,8 @@ - +Koha Printer Configuration + + + +

    Printer Configuration

    Set printer configuration corresponding to your environment

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/bookshelves/addbookbybiblionumber.tmpl b/koha-tmpl/intranet-tmpl/prog/en/bookshelves/addbookbybiblionumber.tmpl index e040958f10..096b4c741f 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/bookshelves/addbookbybiblionumber.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/bookshelves/addbookbybiblionumber.tmpl @@ -1,26 +1,42 @@ -Koha -- Add to Virtual Shelf -
    -

    Add by to a Virtual Shelf

    -
    - "> -
    - - - -
    Select an Existing Bookshelf
    -
    - -

    ...or...

    -
    - - - - -
    Add to a New Bookshelf:
    -
    - + +Koha -- Add to Virtual Shelf + + +

    Add + + + by + to a Virtual Shelf +

    + + + "> + + Select an Existing Bookshelf +

    + +

    + " /> +
    - +

    ...or...

    +
    + Add to a New Bookshelf: +

    + + +

    +

    + + +

    + +
    + + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/bookshelves/shelves.tmpl b/koha-tmpl/intranet-tmpl/prog/en/bookshelves/shelves.tmpl index ce0d6e0394..d08b2f0e3b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/bookshelves/shelves.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/bookshelves/shelves.tmpl @@ -1,169 +1,247 @@ -Koha -- Virtual Shelves + +Koha -- Add to Virtual Shelf + - - - -
    "> - - - - - - -
    Editing Shelf
    " />" />
    " />
    -
    • a private bookshelf is managed by you and can be seen only by you.
    • -
    • A public can be seen by everybody, but managed only by you.
    • -
    • A free can be managed by any user.
    -

    -
    - + + -
    " method="post" name="mainform"> - - - - - - - - - - - - - - - - - -
    Contents of
    Check AllTitleAuthorItem Type© 
    " />">">Reserves
    - " /> - - " /> - - -

    - -
    - - -
    Add an item by barcode
    " /> - - " /> - - - " />
    -
    - -
    - + + +

    Contents of

    + +
    + + + " /> + + + + + + + + + + class="highlight"> + + + + + + + +
    + + (Un)Check All + +  TitleAuthorCall No.
    + " /> + + /images/.gif" alt="" title="" /> + + + "> + + + + + "> + + + + "> + + + + +
    + +
    + This shelf is empty. + + " /> + + + + + + + With selected items : + + + +
    + + +
    +
    + + + + + + +
    Add an Item to this Shelf by Barcode
    + + + + " /> + + +
    +
    + - - - - - - - - - -
    "> - - - - - + + +

    + + + +

    + + + + +

    Create a New a Virtual Shelf

    +
    Bookshelves
     TitleItem Count
    + + +
    ">
    +
      +
    • A private virtual shelf is managed by you and can be seen only by you.
    • +
    • A public virtual shelf can be seen by everybody, but managed only by you.
    • +
    +

    +
    + + + +
    + +

    Delete Virtual Shelves

    + + + + + + + + + + + +
     Shelf NameContents
    + " /> + + "> + + item(s) +
    +
    + + +
    +

    - " disabled="disabled" readonly="readonly" />" />"> item(s)*Empty - - - - *Shelves must be empty before they can be deleted. -

    - + + +
    + + "> +

    Modify Virtual Shelf

    + + + + +
    " />
    ">
    +
    • A private virtual shelf is managed by you and can be seen only by you.
    • +
    • A public virtual shelf can be seen by everybody, but managed only by you.
    • +
    +

    - "> - - - - - - - -
    Add Shelf
    " />
    -
    • A private bookshelf is managed by you and can be seen only by you.
    • -
    • A public shelf can be seen by everybody, but managed only by you.
    -
    -
    - - - - - - - - - - - - - - - - - -
    Virtual Shelves
    Shelf NameCategoryContent size 
    - "> - - - - - Private - - - Public - - - Free - - - item(s) - ">Edit 
    -
    - +
    +

    Virtual Shelves

    + + + + class="highlight"> + +
    Shelf NameCategoryContent Size 
    ">PrivatePublicFree item(s)">Modify 
    +

    + + + +
    + + - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/catalogue/ISBDdetail.tmpl b/koha-tmpl/intranet-tmpl/prog/en/catalogue/ISBDdetail.tmpl index 1712fc3227..c52a2d43c9 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/catalogue/ISBDdetail.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/catalogue/ISBDdetail.tmpl @@ -1,18 +1,29 @@ -Koha -- Catalog: ISBD View - - - +Koha -- Catalogue MARC detail -
    + + -
    -" /> -
    " />" />" />" />
    " />'); return false;" />
    " name="bib" />
    " />
    -
    -
    -

    +

    MARC biblio :

    + + + +
    +
    + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/catalogue/MARCdetail.tmpl b/koha-tmpl/intranet-tmpl/prog/en/catalogue/MARCdetail.tmpl index 8d587cf2ba..35a4e1b63b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/catalogue/MARCdetail.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/catalogue/MARCdetail.tmpl @@ -1,250 +1,389 @@ -Koha -- Catalog: MARC Record View - +Koha -- Catalogue MARC detail -

    MARC Record for number :

    -
    " />
     
    " />
    -
    " />
    " />
    -
    " />
    " />
    " />
    " />
    - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - + +

    + MARC biblio : +

    + + - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - + - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - +

    With Framework :

    + +
    + + 0 + + + 1 + + + 2 + + + 3 + + + 4 + + + 5 + + + 6 + + + 7 + + + 8 + + + 9 + + Items +
    - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - - - - - -
      - &zoom=1&type=intranet&value="> - //images/filefind.png" height="15" title="Search on "> - -
    - - - - - - - - - - - - -
    + + + + + + + + + + + + + + + + + + + + +
    +
    + + + + + + + + + + + +
    + +
    +
    + - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl b/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl index fdaf06e623..37bd02b9b5 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl @@ -1,103 +1,225 @@ -Koha -- Catalog: Details for +Koha -- Catalogue MARC detail - -

    ()

    -
    -
    " />
    -
    " />" />" />
    -
    " />', 'popped'); return false;" />
    -
    " />','printview'); return false;" />
    -
    " name="biblionumber" />
    -
    -
    -.01.MZZZZZZZ.jpg" alt="Book Cover Image" /> -
    -
    - -
      -
    • Subtitle:
    • -
    • Author: &and_or=@and&order=author,1&zoom=1">
    • -
    • Additional Author:
    • -
    • ISBN:
    • -
    • Classification:
    • -
    • Series Title:
    • -
    • Subject:
    • -
    • Copyright:
    • -
    • Notes:
    • -
    • Unititle:
    • -
    • Serial:
    • -
    • URL: ">
    • - - -
    • Subjects: -
    • URLs: -
    • Abstract: +

      ()

      + + + +
      +

      Biblio detail

      + +

      + + ; + +   +

      + + +

      + "> +   + +

      + + +

      + + "> + +   + +

      + + +

       

      + + +

      + + +   +

      + + +

       

      + +

      + + + ,   +

      + +

       

      + + +

       

      + + +

      + + vol. +   +

      + + +

      +

      + + "> +   + +

      + + +

      + + +

      +

      + +

      -

      + +

      + + +

      + + + +

      + + +

      + + +

      + + +

      + + ">  + +

      + +

      + + + + + +

      +
      -
    • Biblio Record
    • -
    • Total Number of Items:
    • -
    - -
    -
    " />
    -
    " />
    -
    " />
    -
    - - -
    - - - - - - - - - - - - - - - - - - - - - - - - -
    Item TypeLC ClassifictionLocationDate DueLast SeenBarcodeVolume
    -&itemnumber=&biblionumber=&barcode="> 
    This record has no items.
    - - - - - - - - -
    Abstract
    + +
    +

    items

    + + + + + + + + + + + + + + + + + + + + + + + + +
    Item typeLocationStatusDate DueLast seenBarcodeVolume
    + + On issue to "> + + + + + + Item lost + + Item CancelledAvailable + + + + &item=&biblionumber=&bi="> + &item=">Fix Itemtype +
    +
    + +

    we don't have any physical item for this document

    - - - - - - - -
    Links to Associated Web Sites
    Title:
    -Description:
    -URL:">http:// -
    + +
    +

    This is a serial subscription

    +

    (We have subscriptions associated with this title).

    + +

    + +

    The three latest issues related to this subscription:

    + + + + + + + + + + + + + + +
    Issue #DateStatusNote
    + + + + + Waited + + Arrived + + Late + + Missing + + Not Issued + + + + + + + +
    + + +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/catalogue/moredetail.tmpl b/koha-tmpl/intranet-tmpl/prog/en/catalogue/moredetail.tmpl index 33c9580879..0fc229227a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/catalogue/moredetail.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/catalogue/moredetail.tmpl @@ -1,87 +1,75 @@ -Koha -- Catalog: Item Details for - - -
    +Koha -- Catalogue MARC detail - -
    -
    -" /> -" /> -" /> -" /> - - -
    " />
    -
    - - -

    -, by

    -
    " name="biblionumber" />
    " />
    -" /> -
    -
    - - - - - - --> - - - - - - - - - - - -
    Bibliographic Details
    Biblionumber:
    Item Type:
    URL: -->
    Loan Length: days
    Classification:
    ISBN:
    Publisher:
    Place:
    Date:
    Volume:
    Pages:
    Illus:
    Size:
    Notes:
    No. of Items:
    - - - + + +
    +
    + +

    + &type=intra"> + () + +

    +

    +

    GROUP -

    +

    Biblionumber:

    +

    Item type:

    +

    URL:

    +

    Loan length:

    +

    Rental charge:

    +

    Classification:

    +

    ISBN:

    +

    Publisher:

    +

    Place:

    +

    Date:

    +

    Volume:

    +

    Pages:

    +

    Illus:

    +

    Size:

    +

    Notes:

    +

    No. of Items:

    + &itemnumber=">Modify | + &itemnumber=">Delete | + ">Requests +
    + +
    -
    - - - - - - - - - - - - - - - - - - - -
    " id="">Barcode:
    Home Branch:
    Current Branch:
    Last seen:
    Item Status: Due (Issued to ">)
    Item StatusAvailable
    Last borrowed:
    Last Borrower 1: ">
    Last Borrower 2: ">
    Replacement Price: $
    Lost Status:LostNot Lost -
    " /> - -" /> - - -Make FoundMake Lost" />
    Withdrawn: YesNo -
    " /> - -" /> - - - -RestoreMake Withdrawn" />
    Paid for:
    Notes:
    Renewals:
    Accession Date: (&biblionumber=&invoice=&catview=yes">View Receipt Summary)
    Total Issues: (&itemnumber=">View Circulation History)
    - +
    +

    BARCODE

    + &itemnumber=">Modify | + &itemnumber=">Delete +
    + Home Branch:
    + Current Branch:
    + Last seen:
    + Last borrowed:
    + Item Status: On issue to ">Available
    + Date Due:
    + Last Borrower 1:
    + Last Borrower 2:
    + Replacement Price:
    + Item lost: YesNo
    + Paid for:
    + Notes:
    + Renewals:
    + &biblionumber=&invoice=&catview=yes"> + Accession + Date:
    + Cancelled: YesNo
    + &bi=&itm=">Total + Issues:
    + Group Number:
    + Biblio number:
    + +
    +

    + + -

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbiblio.tmpl b/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbiblio.tmpl index 633c793110..b031e0ff8f 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbiblio.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbiblio.tmpl @@ -1,68 +1,54 @@ -Koha -- Cataloging: Edit MARC Record Number Add MARC Record - +Koha -- Cataloging: Edit MARC Record Number Add MARC Record + + - - - - -
    - - - - -
      -
    • Non UTF-8 characters present or malformed XML
    • -
    • Please correct and save.
    • -
    - -
    - - -
    -

    Edit MARC Record Number Add MARC Record With Framework :

    + + +

    Edit MARC Record Number Add MARC Record

    -
    - " /> - - " /> - " /> - " /> - - +
    + + - - - - - - - + + +
    +
    + Change framework : + + + + + " /> + " /> + " /> -
    -
    + + - + -
    XX" id="XX" class="tab" style="visibility:hidden"> +
    XX" class="content_hidden"> -
    XX" id="XX" class="tab" style="visibility:visible"> +
    -

    Is this a duplicate of " onclick="openWindow('../catalogue/MARCdetail.pl?biblionumber=&popup=1', 'Duplicate_biblio'; return false;)">?

    +

    Is this a duplicate of " onclick="openWindow('../MARCdetail.pl?biblionumber=&popup=1', 'Duplicate biblio'; return false;)">?

    You must either :

    • If it is a duplicate, ">Edit Items of the existing record.
    • @@ -74,21 +60,31 @@ @@ -130,29 +126,27 @@
      "> - " value=""> + "> "> + "> ">
      - - "> - " value=""> - "> + + "> + "> + "> - "> + "> + "> + "> + "> + + "> + "> - - - - -
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbooks.tmpl b/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbooks.tmpl index 5ce629a24e..349039f760 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbooks.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/cataloguing/addbooks.tmpl @@ -1,41 +1,119 @@ Koha -- Cataloging Home + +

    Catalog Maintenance

    - No items found + No items found -
    -
    - - - - - - -
    Search Existing Records
    -

    -
    • If the ISBN is found into the database, that record will be retrieved and can be modified.
    • -
    • If the ISBN is found in the reservoir, it will be retrieved and a full record added.
    • -
    • Otherwise, a record can be added from scratch.
    +

    Search Existing Records

    + + - -
    -
    - - -
    Create a Blank Bibliographic Record
    - - + + + Results found in catalogue. +
    + + + + + + + + + + + + + + + +
    TitleAuthorpublisherPublication year
    + "> + + +
    + +
    + + + + + +
    +
    + + No Result found in catalogue. + + Error: + + +
    +

    Biblios in reservoir

    + + + + + + + + + + + + + + + + + + + + + + +
    TitleAuthorISBNcoming from  
    + ">Add biblio
    + +

    None

    + +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/cataloguing/additem.tmpl b/koha-tmpl/intranet-tmpl/prog/en/cataloguing/additem.tmpl index 769a9e2e65..cff6940eca 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/cataloguing/additem.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/cataloguing/additem.tmpl @@ -1,161 +1,130 @@ Koha -- Cataloging: Items for Bibliographic Record - + - -

    Items for Record :

    ,

    - - -
    -
    ">
    " />
    ">
    ">
    ">
    - - -
    ERROR: This book is on LOAN DO NOT DELETE!
    - - -
    ERROR: This record contains non UTF-8 chatacters correct and resave!!
    - - -
    ERROR: Barcode already exists!
    - - - -
    - - - - - - - - - - - - - - - -
    Existing Items
     
    &itemnumber=">Edit,)">Delete
    -
    - - -
    - "> - "> - "> - "> - "> -
    - - - - - - - - -
    Add New ItemUpdate Item
    - "> - "> - ">
    - "> - -
    ERROR: Barcode already exists!
    - - - - - - "> - "> - "> - - - + +

    Items for by (Record #)

    + + - - - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/branchreserves.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/branchreserves.tmpl index 08393251d9..3e059b93d2 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/branchreserves.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/branchreserves.tmpl @@ -30,6 +30,7 @@
    + @@ -46,13 +47,13 @@
    Reserves of your library

    Reserve Over

    - "> + ">   ()
    Barcode :

    -

    ">  

    +

    ">  

    ?subject=Reservation: ">

    @@ -64,18 +65,19 @@ "> "> "> - - value="Cancel reserve and return this document" + + "> - value="Cancel reserve" + - >
    + + No reserve found. +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/branchtransfers.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/branchtransfers.tmpl index 25140d76e2..5dcbdbe013 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/branchtransfers.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/branchtransfers.tmpl @@ -1,18 +1,19 @@ -Koha -- Circulation: Transfers +Circulation: Transfers + +

    Circulation: Transfers

    -

    Reserve Found

    +

    Reserve Found

    -
    - + Item is marked waiting at for (">). @@ -43,12 +44,11 @@ " /> - " /> + " /> " /> /> - /> - + @@ -62,13 +62,13 @@ " value="" /> " value="" /> - + -
    Reserve found for (">). + Reserve found for (">). - Item is marked waiting at for (">).
    - Set reserve to waiting and transfer book to : + Set reserve to waiting and transfer book to : Cancel reservation and then attempt transfer: @@ -23,13 +24,13 @@ " value="" /> " /> - " /> + " /> " /> - + - +
    Cancel reservation and then attempt transfer:
    + -
    +
    Messages
    @@ -78,9 +78,11 @@ Item should now be waiting at branch:
    + + No message. + - No Item with barcode: @@ -91,22 +93,22 @@ Item is already at destination branch. - Item was on loan to "> + Item was on loan to "> and has been returned. - -
    + -
    + +
    -

    Transfer

    - /> -
    Destination Branch: + + - +
    Transfer
    Destination Branch:
    Enter Book Barcode
    Enter Book Barcode
    " /> @@ -114,25 +116,25 @@ " value="" /> " value="" /> - - -
    + + + + +
    - + - - - - - - + + + + + -
    Transfered Items
    Bar CodeTitleFromTo
    Bar CodeTitleAuthorTypeFromTo
    +
    &type=intra">
    - - - +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/circulation.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/circulation.tmpl index d90cc5ec0e..8dd70b1c01 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/circulation.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/circulation.tmpl @@ -1,283 +1,897 @@ -Ă¯Â»Â¿Koha -- Circulation: Issuing to , () +Koha -- Circulation + +: Issuing to , +() + + -

    Circulation: Issues

    + +

    Issues

    + +

    Circulation issues

    + - - - - - - -
    -

    Error Issuing:

    -
      - -
    • Invalid date
    • - - - -
    • Too early to renew.
    • - - - -
    • Barcode Unkown
    • - - - -
    • NOT FOR LOAN
    • - - -
    • Item is cancelled
    • - - -
    • Patron's address is in doubt
    • - - -
    • Patron's card is lost
    • - - -
    • Patron is debarred
    • - - -
    • No more renewals possible
    • - - -
    • Borrower card expired
    • - - -
    • This is a Reserve Section book. Use Reserve issue
    • - -
    -
    - - - - -
    -

    Please Confirm Issue:

    - - -

    The patron has a debt of YTL

    - - -

    You are trying RE-ISSUE. USE RENEW

    - - -

    Succesfully renewd items

    - - -

    Item is consigned for

    - - -

    Item is on reserve for

    - - -

    Item issued to . Return and issue?

    - - -

    Too many issues (already issued / max : )

    - - -
    - -

    - - - - - -

    - - " /> - - - " /> - - " /> - " /> - " /> -
    " />
    -
    - - - - - -

    Item issued

    - - -
    - -
    - No patron matched Add a new patron -
    - - - -
    - " /> - " /> - - -

    -

    -

    Patron not found? Add a new patron

    -
    - - -
    - -
    - -

    ()

    -

        out, overdue


    -
    " alt="Photo" hspace="0" vspace="0" border="0" width="100px" heigth="100px" style="clear:both;float:right;position:relative;"> -
    - - - - - -
    + + | Printer: --> + + + +
    +
    + + + ">details + / &modify=edit&destination=circ&categorycode=">edit +

    +

    Patron will leave soon.

    + + , + + No address stored for borrower. + + + + + No city stored. + + + + + No phone stored. + +

    + + "> + +

    Category:

    +
    + + This borrower has overdue(s) items + + +
    + Warning + +

    Address: Patron's address in doubt

    + + + +

    Lost: Patron's card is lost

    + + + +

    + Debarred: Patron is debarred &cardnumber=&destination=circ&status=0">Lift Debarment +

    + + + +

    + + Overdues: See highlighted items below + +

    + + + +

    + Fines: Patron has + ">outstanding fines. + Make ">Payment +

    + + + +

    + Reserves waiting: + +

  • + &type=intra"> + ( -- ) +
  • + +

    + + + + +

    Notes:

    + +
    + + +
    + + + + +
    + +
    + + + + +
    +Please Confirm Issue +
      - -
    • Address: Patron's address in doubt
    • + +
    • The patron has a debt of $
    • - -
    • Lost: Patron's card is lost
    • + + +
    • Item is currently issued to this patron. Renew?
    • - -
    • Debarred: Patron is debarred
      " />" />
    • + + +
    • Item is consigned for
    • -
    • - Overdues: Patron has ITEMS OVERDUE See highlighted items below -
    • - -
    • Fines: Patron has ">outstanding fines. Make ">Payment
    • - -
    • Fines: Patron has ">outstanding fines. Make ">Payment
    • + + +
    • Item is on reserve for
    • + + + +
    • Item ( ) issued to . Return and issue?
    • + + + +
    • Too many issues (already issued / max : )
    -
    - - -
    Reserves waiting:
    -
    - - - -
    Notes:
    - -
    +
    + + +

    + + +

    + + + +

    + + +

    + + + " /> + " /> + + " /> + " /> + " /> + " /> + +
    + +
    + +
    + +
    + " /> + +
    + +
    +
    + +
    + + + + +

    Item issued

    - - -
    - - - " /> - " /> - -
    - - -
    + + +

    +No patron matched +Add adult +Add child +

    + + + + +
    +
    + Borrower selection + + " /> + " /> + +

    + + +

    + +

    + +

    + Patron not found? + Add adult + Add child + or try another search +

    +
    +
    + -
    -
    - -

    - - " /> - " /> - " /> - - - - " /> - -

    -
    -
    +
    +
    + Issue an item +

    + + + + +

      + +
    • The due date is invalid
    • + + +
    • The barcode was not found
    • + + +
    • Item not for loan
    • + + +
    • Item is cancelled
    • + + +
    • Patron's address is in doubt
    • + + +
    • Patron's card is lost
    • + + + +
    • Patron is debarred
    • + + + +
    • No more renewals possible
    • + + + +
    • Patron's card is expired
    • + +
    +

    + +

    + + + +

    + + + + + + + +

    + + + + + " /> + " /> + " /> + + + + " /> + + +
    + +
    + +
    +
    + + +
    + Waiting reserves + This borrower has a waiting reservation : + +

    +

      +
    • (), author : , reserved the : + + document waiting at : + +
    • +
    +

    + +
    - - -
    " />" /> - - - - - - - - - - - - - - - - - - - - - - - + + + +
    +
    Issues &print=page">(Print Page) &print=slip">(Print Slip)
    FormatDue DateTitleAuthorCall NoBarcodeRenew?
    &type=intra">
    + + + + + + + + + "> + + + + + + + +
    Reserve dateBarcodeTitleAuthorLocalisation
    + + + + &type=intra" onclick="openWindow(this, 'Item', 480, 640); return false;"> + + + Waiting position for this document : + + + + ( ) + + +
    + This document is available + + +
    + This document has been transfered from library : + the : + + + +
    + This document hasn't been transfered yet from library : + + +
    +
    + + + + + + +
    + +

    + &print=page')">Print Page + / &print=slip')">Print Slip +

    + + + " /> + " /> + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - - - - - - - - - - - - -
    TitleDue dateItemtypeCall noBarcodeRenew?
    Today issues
    + &type=intra"> +
    + - +
    + + + " /> + + + " + + checked="checked" + + /> + " + checked="checked" + style="display: none;" + /> +
    &type=intra">
    " value="y" checked="checked" />
    - -

    - - + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    TitleDue dateItemtypeCall noBarcodeRenew?
    + &type=intra"> +
    - +
    + + + + + " /> + + + " + + checked="checked" + + /> + " + checked="checked" + style="display: none;" + /> +
    - +
    + + +
    +
    + + - + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/currenttransfers.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/currenttransfers.tmpl index 5894759e78..b13787eee7 100755 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/currenttransfers.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/currenttransfers.tmpl @@ -24,14 +24,14 @@

    check this transfer

    - "> + ">   ( )
    Barcode :

    -

    ">  

    +

    ">  

    ?subject=Reservation: ">

    @@ -43,10 +43,10 @@

    -
    + "> -
    + --> diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/returns.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/returns.tmpl index d211ab9918..dfc9af40bc 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/returns.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/returns.tmpl @@ -1,161 +1,278 @@ -Ă¯Â»Â¿Koha -- Circulation: Returns: +Koha -- Circulation: Returns: + + + + + + +

    This item was not transfered initialy to this library !

    + + + + + + + + + + + + +
    Title : + "> +
    Reserved for: + +
      +
    • ">
    • +
    • ,
    • +

    • +
    • +
    • +
    + + No reservation linked + +
    Action : + this document must be transfered to : +
    +
    + " /> + " /> + " /> + +
    + + + -

    Reserve Found (item is already consigned)

    - -
    - - - - -
    ">
    Patron: -
      -
    • ">
    • -
    • ,
    • -

    • -
    • -
    • - -
    Transfer to:
    - - " value="" /> - " value="" /> - " value="" /> - - -
    - - - - -

    Item Consigned:


    -
    - - - -
    ">
    Patron:
    - - - " value="" /> - " value="" /> - " value="" /> - - - - -
    - + + + +

    Waiting Reserve Found in your library

    + + + +
    ">
    Patron: +
      +
    • ">
    • +
    • ,
    • +

    • +
    • +
    • +
    + + " value="" /> + " value="" /> + " value="" /> + + +
    + - - -
    - - - " value="" /> - " value="" /> - " value="" /> - - " /> - " /> - " />
    - - + +

    Reserve With necesary transfert Found

    + + + + + + +
    ">
    Patron: +
      +
    • ">
    • +
    • ,
    • +

    • +
    • +
    • +
    Transfer to:
    + + " value="" /> + " value="" /> + " value="" /> + + " /> + +
    + + + + +

    This item must return to his homebranch :

    +

    The document () Must be returned to his homebranch()

    +
    + + " value=""> + " value=""> + " value=""> + + + +
    + + + + +

    Item Consigned:

    + + + + +
    ">
    Patron:
    + + + " value="" /> + " value="" /> + " value="" /> + + + + +
    + + + + + + +

    Reserve With necesary transfert Found

    + +

    Waiting Reserve Found in your library

    + + + + + + + + + +
    ">
    Patron: +
      +
    • ">
    • +
    • ,
    • +

    • +
    • +
    • +
    Transfer to:
    +
    + + + " value="" /> + " value="" /> + " value="" /> + + " /> + " /> + " /> + " /> +
    + +

    Circulation: Returns

    -
    -
    - - - - - " value="" /> - " value="" /> - " value="" /> - -
    -
    - - No Item with barcode: - - - Please return to - - - - Issued from RESERVE Section- Use RESERVE return. - - - Not On Issue. - - - Item was lost, now found. - - - Item Cancelled - -
    - -
    + +
    +
    + Enter Item Barcode +

    + + +

    + + " value="" /> + " value="" /> + " value="" /> + +
    +
    + +
    + Error + + +

    No Item with barcode:

    + + +

    Please return to

    + + +

    Not On Issue.

    + + +

    Item was lost, now found.

    + + +

    Item Cancelled

    + + + +
    -
    - -
    Item InformationPatron Information
    -
    -"> - , + + +
    Item InformationPatron Information
    + +"> + , - - ( -, -) +( +, +)
    -
    + -
    - - - - - - - - - - - -
    Returned Items
    Due DateBar CodeTitleAuthorTypePatron
    //Not on Issue. - &type=intra"> - - "> - - - - "> - -
    -
    +

    Returned Items

    + + + + + + + + + + + + + + + + +
    TitleItemtypeDue DateBarcodePatron
    + "> + +
    +
    + + // + + Not on Issue. + + + + + + "> + , + + + Not on issue. + +
    + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/selectbranchprinter.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/selectbranchprinter.tmpl index 0c582d2a52..fcf46caec0 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/selectbranchprinter.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/selectbranchprinter.tmpl @@ -17,18 +17,19 @@ - - - - - + + + + + + + - diff --git a/koha-tmpl/intranet-tmpl/prog/en/circ/waitingreservestransfers.tmpl b/koha-tmpl/intranet-tmpl/prog/en/circ/waitingreservestransfers.tmpl index 3d4443c5b3..0a9d8bd949 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/circ/waitingreservestransfers.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/circ/waitingreservestransfers.tmpl @@ -8,8 +8,6 @@ -

    Circulation: Transfers To do

    -

    Transfers to do

    @@ -31,13 +29,13 @@

    Reserve over

    - "> + ">   ( )
    Barcode :

    -

    ">  

    +

    ">  

    ?subject=Reservation: ">

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/doc-head-close.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/doc-head-close.inc index ad09699a82..c2a8e04ed2 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/doc-head-close.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/doc-head-close.inc @@ -1,9 +1,17 @@ - - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/holidays-top.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/holidays-top.inc index 1d761d57be..1926fccac5 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/holidays-top.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/holidays-top.inc @@ -50,6 +50,7 @@ // This function shows the "Show Holiday" panel // function showHoliday (exceptionPosibility, dayName, day, month, year, weekDay, title, description) { + var panel = document.getElementById('showHoliday'); panel.style.display = 'inline'; document.getElementById('newHoliday').style.display = 'none'; @@ -60,9 +61,10 @@ document.getElementById('showDay').value = day; document.getElementById('showMonth').value = month; document.getElementById('showYear').value = year; - document.getElementById('showTitle').value = title; document.getElementById('showDescription').value = description; document.getElementsByName('showWeekday')[0].value = weekDay; + document.getElementById('showTitle').value = title; + if (exceptionPosibility == 1) { document.getElementById('exceptionPosibility').style.display = 'inline'; } else { diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/intranet-bottom.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/intranet-bottom.inc index 691287b6e3..0f7d808eac 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/intranet-bottom.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/intranet-bottom.inc @@ -1,2 +1,3 @@ - + + \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/intranet.css b/koha-tmpl/intranet-tmpl/prog/en/includes/intranet.css index ae500b30e4..7217a9c78a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/intranet.css +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/intranet.css @@ -1,55 +1,93 @@ body { - font-family : Verdana, Geneva, Arial, sans-serif; - font-size : .9em; + font-family : Verdana, Geneva, Arial, sans-serif; + font-size : .9em; } +h2 { + display:block; + clear:left; +/* float:none; */ +} table { - border-collapse : collapse; - border-top : 1px solid #CCCCCC; - border-right : 1px solid #CCCCCC; - margin : 1em 0; + border-collapse : inherit; + border : 1px solid #CCCCCC; + margin : 1em 0; } caption { - font-size : 140%; - text-align : left; - font-weight : bold; + font-size : 140%; + text-align : left; + font-weight : bold; } td,th { - border-left : 1px solid #CCCCCC; - border-bottom : 1px solid #CCCCCC; - padding : 5px; + /*border-left : 1px solid #CCCCCC; + border-bottom : 1px solid #CCCCCC;*/ + border : 1px solid #CCCCCC; + padding : 5px; } th { - background-color : #CCCCCC; - border-left : 1px solid #999999; - border-bottom : 1px solid #999999; + background-color : #CCCCCC; + border-left : 1px solid #999999; + border-bottom : 1px solid #999999; } th[scope=row] { - background-color : #EEEEEE; - text-align : right; + background-color : #EEEEEE; + text-align : right; } +p { + margin:0px 0px 0px 0px; +} input { - font-size:0.9em; + font-size:0.9em; } select { - font-size:0.9em; + font-size:0.9em; } input[type=submit], input[type=button], input[type=reset] { - background-color : #6699cc; - color : #FFFFFF; - font-size : 1em; - font-weight : bold; + background: url( /intranet-tmpl/prog/images/fade-butt.png ); + border: 3px double #999; + border-left-color: #ccc; + border-top-color: #ccc; + color: #333; + padding: 0.25em; +} + +label { + font-style:italic; + vertical-align:top; + display:block; + float:left; +/* text-align:right; */ + width:10em; + margin-right:0.2em; +} + +p { +clear:left; +} +.searchresults table tr:hover{ + background-color: #CCFFFF; } tr.highlight td, tr.highlight th { - background-color : #EEEEEE; + background-color : #EEEEEE; +} + +.here { + color: black; + text-decoration:none; +} + +#problem { + color: red; + background-color:white; + font-weight : bold; } #admin_stopwords_select UL { @@ -61,34 +99,52 @@ tr.highlight td, tr.highlight th { } legend { - font-size:120%; - font-weight:bold; + font-size:120%; + font-weight:bold; } .problem { - color: white; - background-color:red; + color: white; + background-color:red; + font-weight : bold; } /* css styles for reserves color alerts */ .onloan { - background-color: #FFED3D; + background-color: #FFED3D; } .reserved { - background-color: #8EBAFF; + background-color: #8EBAFF; } .transfered { - background-color: #F9FF9A; + background-color: #F9FF9A; } .inwait { - background-color: #33CC99; + background-color: #33CC99; } .other { - background-color: #FF0000; + background-color: #FF0000; +} + +.available { + background-color: white; +} + +.unavailable { + background-color: #FFED3D; +} + +.hasexpirated { + text-decoration: line-through; +} + +/* style for search terms in catalogsearch */ +.term { + background-color:yellow; } /* end of css styles for reserves color alerts */ @@ -96,37 +152,183 @@ legend { /* MAIN MENU STYLES */ #mainmenu { display:block; - float:left; - margin-right:2px; + position:fixed; +/* float:left; */ + font-weight : normal; + margin-right: 5px; + padding-right: 5px; border-right:1px solid black; + font-size:0.9em; } #mainmenu a { display:block; - margin:5px; + margin-bottom:0px; + padding-left :5px; text-decoration:none; + font-weight:bold; color:black; } + + #mainmenu a:hover { display:block; - margin:5px; - background-color:#6699cc; + margin-bottom:0px; + padding-left :5px; + text-decoration:none; + font-weight:bold; + background-color:#6699CC; + color:white; +} + +#mainmenu ul a { + display:block; + margin-bottom:5px; + padding-left :5px; + text-decoration:none; + font-weight:normal; + color:black; +} + +#mainmenu ul a:hover { + display:block; + margin-bottom:5px; + padding-left :5px; + text-decoration:none; + font-weight:normal; + background-color:#6699CC; color:white; } +#mainmenu ul { + list-style-type: none; + padding-left:20px; + margin-bottom:0px; + margin-top:0px; +} + +#mainmenu li { + list-style-type: none; + padding-left:0px; + margin-left:0px; + margin-bottom:0px; + margin-top:0px; +} + +#mainmenu label { + width:4em; +} + /* submenus styles */ #submenu { - margin-left:10%; + margin-left:25%; } + #submenu a { margin:5px; text-decoration:none; - color:black; + color:#6699CC; } + #submenu a:hover { margin:5px; - background-color:#6699cc; + background-color:#6699CC; + color:white; +} + +/*Action button*/ +#action { + /*float:right;*/ +} + +#action a { + background-color: #6699CC; color:white; + font-size : 0.8em; + border: 2px outset; + font-weight : bold; + margin:5px 0px 0px 0px; + padding:3px; + text-decoration:none; + display:inline; +} + +#action a:hover { + border: 2px inset; + color: #6699CC; + background-color:white; +} + +/*edit action*/ +#action .edit { + display:inline; + margin-right:5px; +} + +#action .edit a { + background-color : #6699CC; + color : white; + margin-top: 1px; +} + +#action .edit a:hover { + border: 2px inset; + color: #6699CC; + background-color:white; +} + +#action .view { + display:inline; + margin-right:5px; +} + +#action .view a { + background-color : #CECEFF; + color : white; + margin-top: 1px; +} + +#action .view a:hover { + border: 2px inset; + color: #CECEFF; + background-color:white; +} + +#action .others { + display:inline; + margin-right:5px; +} + +#action .others a { + background-color : #6699AA; + color : white; + margin-top: 1px; +} + +#action .others a:hover { + border: 2px inset; + color: #6699AA; + background-color:white; +} + +/* Main body style */ +#main { + margin-left:25%; +} + +/* facets bloc */ +#facets { + float:right; + margin-top: 15px; + margin-left: 15px; + border:1px solid #CCCCCC; +} + +#facets h2 { + background-color:#CCCCCC; + margin:0px; + padding:0px; + font-size:1.1em; } /* the USER information block */ @@ -136,41 +338,125 @@ legend { font-size:10pt; } -#main { - background-color : #C2CED3; - border-left : 1px solid #000000; - margin-left : 20%; - margin-right : 1%; - margin-top : 2%; - padding : 10px; -} - -#facetsmenu { -position : absolute; -left : 1px; -width : 15%; +/* css style for reregistration alert */ + +.reregistrinfo { + color: #6699cc; + font-weight : bold; + background-color : #eeeeee; +} +/* MARC editor */ + +/* styles for the 11 buttons that the user can click on */ +/* the design of the active tab button (only 1 at a given time)*/ +.tab_active { + color: #6699CC; + background-color : #CCCCCC; + font-size : 1em; + border: 2px inset; + font-weight : bold; + text-decoration:none; + display: inline; + text-decoration:none; + margin-left:10px; +} + +#onlinehelp { + float:right; +} + +/* the design of the INactives tab buttons (all other tabs) */ +.tab_inactive { + background-color : #6699CC; + color : #FFFFFF; + font-size : 1em; + font-weight : bold; + display:inline; + border: 2px outset; + text-decoration:none; + margin-left:10px; +} + +/* the button of INactive tabs : we need this one to have white color on links, otherwise, default a look will be choosen */ +#tabs a { + color:white; + text-decoration:none; + padding-right:10px; + padding-left:10px; +} + +/* specify that we to do when the mouse is on 1 button */ +#tabs a:hover { + border: 2px inset; +} + +#tabs { + margin-top:45px; + margin-bottom:5px; +} + +/* styles for the 11 content blocks */ +/* the property for hidden tabs */ +.content_hidden { + height:0px; /* you propably don't need to change this one */ + visibility:hidden; /* you propably don't need to change this one */ + display:none; +} + +/* the property for the displayed tab */ +.content_visible { + height:0px; /* you propably don't need to change this one */ + visibility:visible; /* you propably don't need to change this one */ display:block; - float:left; - margin-right:2px; - margin-top:2%; - border-right:1px solid black; } -#facetsmenu ul { - background-color : #C4C6C7; - border-bottom : 1px solid #FFFFCC; - border-left : 0px solid #FFFFCC; - border-right : 0px solid #006699; - border-top : 0px solid #FFFFCC; - font-size : .8em; - list-style : none; - padding : 2px; - text-align : left; - width : 100%; -} -#facetsmenu ul li { - - list-style : none; - padding : 1px; - text-align : right; - + +/* the style of tag description */ +p.tag { + font-weight:bold; +} +/* the style of subfield paragraph */ +p.subfield { + +} + + + +.lineSelected { + background-color:yellow; +} + + +/* display more informations with css layer */ +a.info { + position: relative; + text-decoration: none; + color: black; + border-bottom: 1px gray dotted; +} + +a.info span { + display: none; + width:300px; +} + +a.info:hover { + background: none; /* correcting IE bug*/ + z-index: 500; +} +a.info:hover span { + display: inline; + position: absolute; + top: 2em; + right: 1em; + background: orange; + text-align: center; + color: white; + padding: 2px; +} + +fieldset { + border : 1px solid #374b73; + display: inline; + float:left; + vertical-align:top; } diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-acqui.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-acqui.inc index 0703fc9dae..f3488bf3f4 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-acqui.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-acqui.inc @@ -1,8 +1,10 @@ + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-admin.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-admin.inc index 92466866a9..71fc1e2741 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-admin.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-admin.inc @@ -1,18 +1,23 @@ \ No newline at end of file +

    + System pref + Branches + Funds + Currencies +

    +

    + Item types + Borrower categories + Issuing rules + Z39.50 Servers +

    +

    + Biblio Framework + Thesaurus Framework + Authorised values + Links Koha-MARC DB + MARC Check +

    +
    + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-authorities.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-authorities.inc index 55c5a6efc0..eedee7c68f 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-authorities.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-authorities.inc @@ -13,3 +13,5 @@ function searchauthority() { window.location="/cgi-bin/koha/authorities/authorities-home.pl?op=do_search&type=intranet&authtypecode="+X+"&value="+Y+"&marclist=&and_or=and&excluding=&operator=contains"; } + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-catalogue.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-catalogue.inc index a85aec775b..8c27e062c2 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-catalogue.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-catalogue.inc @@ -1,7 +1,10 @@ \ No newline at end of file + Search + Cataloging + Add Full MARC Record + Subscriptions + Virtual shelves + Manage reviews +
    + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-circ.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-circ.inc index a89a64fcbf..d93aecac6c 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-circ.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-circ.inc @@ -1,10 +1,21 @@ \ No newline at end of file + +
  • + Reserves Pending + Waiting + Transfers to do + to recieve +
  • +
  • + Overdues Items + Claims + Daily Reconciliation +
  • +
    + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-members.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-members.inc index e98c41b1e5..1cb4c18a21 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-members.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-members.inc @@ -1,7 +1,10 @@ + \ No newline at end of file +
    + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-serials.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-serials.inc index 3a245f4027..8ae384b69b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-serials.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-serials.inc @@ -1,10 +1,8 @@ + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-tools.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-tools.inc index 1771b385cb..2c107dc721 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menu-tools.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menu-tools.inc @@ -1,7 +1,17 @@ \ No newline at end of file + overdue rules + Log viewer +
    + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/menus.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/menus.inc index df7b37b7c9..642cd75ca9 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/menus.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/menus.inc @@ -1,23 +1,102 @@ - +
    + [?] +
    - -
    -

    , from

    -
    \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/intranet-main.tmpl b/koha-tmpl/intranet-tmpl/prog/en/intranet-main.tmpl index b1f3da4ba6..5d78fa6898 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/intranet-main.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/intranet-main.tmpl @@ -1,99 +1,25 @@ -Koha Intranet Home -

    Koha Intranet Home

    - -
    -

    News

    - - - - - - - -
    - - - - -
    - + + Koha Intranet Home + + + +
    +

    Welcome to Koha

    + + +

    recent news

    + + + + + + +
    + on , +
    +

    +
    +
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/boraccount.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/boraccount.tmpl index ef38576108..1c8cdc22b7 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/boraccount.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/boraccount.tmpl @@ -1,12 +1,15 @@ -KOHA -- Account for , +Account for , + -
    - + + +

    Account for

    + +
    Account for
    - @@ -16,23 +19,26 @@ - - - + + - - + + -
    DateClick to credit Description of Charges Amount Still Owed
    &accountid=&bornum=&accounttype=&amount=&user=%20">Click YTL$$
    Total Due YTLTotal Due$
    +
    -
    -
    " />
    " />
    -
    + +
    " />
    + +
    " />
    + +
    " />
    + diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/deletemem.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/deletemem.tmpl index 0ec8e373b8..460df6c604 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/deletemem.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/deletemem.tmpl @@ -1,5 +1,6 @@ Cannot Delete Member - + +

    Cannot Delete Member

    Member has item(s) checked out. diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/guarantor_search.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/guarantor_search.tmpl index dfd0d775b9..b8947f0808 100755 --- a/koha-tmpl/intranet-tmpl/prog/en/members/guarantor_search.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/guarantor_search.tmpl @@ -28,7 +28,7 @@ -

    ;self.close();">

    +

    ;window.opener.document.form.guarantorsearch.value='Modify Guarantor';window.opener.document.form.guarantorinfo.value='';self.close();">

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/mancredit.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/mancredit.tmpl index c57b5f6925..eb0e387eb2 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/mancredit.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/mancredit.tmpl @@ -1,38 +1,28 @@ -Ă¯Â»Â¿KOHA -- Users: Create Manual Credit -

    Manual Credit

    - -
    -

    Error Crediting User: Either no such invoice exists or no amount given

    - -
    -
    -" /> -"> -"/> -"/> -"/> -"/> - -
    +Patrons: Create Manual Credit + + + + +

    Manual Credit

    + +" /> + - - - + + + + +
    Fine Details
    User:   Amount:
    Description
    Amount
    Patron Number
    Credit Type
    Itemnumber
    Description
    Amount$
    -
    - -
    " name="bornum" />
    - \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/maninvoice.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/maninvoice.tmpl index 47142f8829..27cc5d891c 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/maninvoice.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/maninvoice.tmpl @@ -1,12 +1,14 @@ -NEULIS -- Users: Create Manual Invoice - +Patrons: Create Manual Invoice + -
    " /> -
    + + +" /> +
    - - + - - -
    Manual Invoice
    User
    Type
    Borrowernumber
    Type
    Description
    AmountYTL
    - -
    " />
    + Itemnumber + Description + Amount$ + + + + +
    " />
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/member-flags.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/member-flags.tmpl index f2f3451ca2..75ae627cc9 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/member-flags.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/member-flags.tmpl @@ -4,25 +4,25 @@
    - " /> - + " /> + +

    Set Privileges for ,

    - - - - - - - - - -
    Set Privileges for ,
    FlagNameDescription
    - " name="flag-" /> - - - - -
    + FlagNameDescription + + + + " name="flag-" /> + + + + + + + + + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch-results.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch-results.tmpl index 28397f2946..3051628910 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch-results.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch-results.tmpl @@ -2,22 +2,23 @@ +
    - + @@ -29,12 +30,14 @@ - + - + -
       Card Name (Cat.) Address
    ','mainform','member'); return false;" />
    ','mainform','member'); return false;" />
    ">, ()">, ()
    + + +
    No results found diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch.tmpl index 2f94c61e88..0095492839 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/member-quicksearch.tmpl @@ -1,8 +1,8 @@ Koha -- Patron Quick Search -
    - - -
    +
    + + +
    \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/member.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/member.tmpl index e78ad6b5f1..562f1440c3 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/member.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/member.tmpl @@ -3,31 +3,83 @@ -

    Member Search Results

    +

    Borrowers search results

    +
    + + + + +
    +
    + A + B + C + D + E + F + G + H + I + J + K + L + M + N + O + P + Q + R + S + T + U + V + W + X + Y + Z +
    +
    - - + - + + + + + - - - + +
    Card Name CatAddress OD/IssuesChargesFines Notes
    ">,

    ">,

    +

    ()
    -

    No results found

    +
    + +

    +
    + No results found +

    + + + - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/memberentryA.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/memberentryA.tmpl index 849aaa23bc..0837b7917d 100755 --- a/koha-tmpl/intranet-tmpl/prog/en/members/memberentryA.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/memberentryA.tmpl @@ -3,15 +3,13 @@ - -

    - Add adult member (step ) + Add adult member (step )

    - Modify adult member + Modify adult member

    @@ -19,7 +17,7 @@

    - Duplicate suspected + Duplicate suspected ');" >Detail Duplicate ? &category_type=">Yes @@ -36,7 +34,7 @@ - +

    The following fields are wrong. Please fix it/them

    @@ -47,11 +45,12 @@
    + - "> + "> "> @@ -61,7 +60,6 @@ "> " /> " /> - " /> "> " /> @@ -126,14 +124,10 @@ - + Civility +

    +

    @@ -183,8 +177,13 @@

    Borrower type

    - - + + + + + There is no category type to add an Adult. + Please create one +

    @@ -234,7 +233,7 @@ - "> + "> "> @@ -244,7 +243,6 @@ "> " /> " /> - " /> "> " /> @@ -460,7 +458,7 @@ - "> + "> "> @@ -470,7 +468,6 @@ "> " /> " /> - " /> "> " /> @@ -520,7 +517,7 @@ - "> + ">

    @@ -530,7 +527,7 @@ Expiry date "> + onchange="CheckDate(document.form.dateexpiry);check_manip_date('verify');" value="">

    @@ -539,7 +536,7 @@ - +

    @@ -548,7 +545,7 @@ - +

    @@ -581,7 +578,7 @@

    -

    Warning

    +

    Warning

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/memberentryC.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/memberentryC.tmpl index d6712c3e56..e4cb61e95d 100755 --- a/koha-tmpl/intranet-tmpl/prog/en/members/memberentryC.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/memberentryC.tmpl @@ -3,15 +3,16 @@ - - +

    - Add children member (step ) + Add children member (step )

    - Modify children member + Modify children member

    @@ -31,7 +32,7 @@

    - +

    ERROR

    The following fields are wrong. Please fix it/them

    @@ -48,7 +49,7 @@ - "> + "> "> @@ -58,9 +59,8 @@ "> " /> " /> - " /> "> - "/> + "/> "> @@ -102,7 +102,7 @@

    -

    @@ -159,7 +154,7 @@ - "> + ">

    @@ -180,20 +175,28 @@ " >

    - -

    Modify guarantor

    - - - -

    Find guarantor

    - +

    + + + + + + + " disabled readOnly > +

    Borrower type

    - - + + + + + There is no category type to add a Child. + Please create one + +

    @@ -234,7 +237,7 @@

    - +
    @@ -243,7 +246,7 @@
    - "> + "> "> @@ -253,9 +256,8 @@ "> " /> " /> - " /> "> - "/> + "/> "> @@ -269,6 +271,7 @@ "> "> "> + " readOnly > "> @@ -290,7 +293,7 @@

    -

    -

    -

    -

    -

    -

    -

    -

    -

    -

    -

    -

    - Guarantor contact + Contact

    Guarantor

    -

    -

    -

    -

    -

    -

    Member

    -

    -

    @@ -575,7 +578,7 @@ Expiry date "> + onchange="CheckDate(document.form.dateexpiry);check_manip_date('verify');" value="">

    @@ -584,7 +587,7 @@ - +

    @@ -593,7 +596,7 @@ - +

    @@ -626,7 +629,7 @@

    -

    Warning

    +

    Warning

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/memberentryI.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/memberentryI.tmpl index f1e01c9394..85061a322b 100755 --- a/koha-tmpl/intranet-tmpl/prog/en/members/memberentryI.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/memberentryI.tmpl @@ -3,15 +3,14 @@ -

    - Add organisation member (step ) + Add organisation member (step )

    - Modify organisation member + Modify organisation member

    @@ -31,7 +30,7 @@ - +

    ERROR

    The following fields are wrong. Please fix it/them

    @@ -43,7 +42,7 @@ - "> + "> "> @@ -53,7 +52,6 @@ "> " /> " /> - " /> "> " /> @@ -67,7 +65,7 @@ "> " > " > - + " @@ -87,7 +85,7 @@

    -

    -

    - - + + + + + There is no category type to add an Institution. + Please create one + + +

    -
    + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/pay.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/pay.tmpl index 8ca0bbe155..dc1523aa45 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/pay.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/pay.tmpl @@ -1,54 +1,57 @@ -Ă¯Â»Â¿KOHA -- Pay Fines for , +Pay Fines for , -
    " /> -
    -"> - + +

    Pay Fines for

    + + " /> + +
    Pay Fines for
    + + - + - + + - + + - - + + - - - -
    Fines & Charges Description Account TypeNotify idLevel Amount Amount OutstandingAmount to pay
    " type="radio" name="payfine" value="no" checked="checked" />
    - " name="payfine" value="yes" />
    - " name="payfine" value="wo" />
    +
    " value="" /> " value="" /> " value="" /> " value="" /> - " value="" /> + " value="" /> " value="" /> - " value="" /> - + " value="" /> + " value="" /> + " value="" /> " size="5" value="" /> -
    Total Due
    -
    " name="bornum" />
    - + Total Due + + + + + + +
    " method="get">" />
    \ No newline at end of file diff --git a/koha-tmpl/intranet-tmpl/prog/en/members/readingrec.tmpl b/koha-tmpl/intranet-tmpl/prog/en/members/readingrec.tmpl index 6d92c42688..3f7cc97c7a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/members/readingrec.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/members/readingrec.tmpl @@ -6,26 +6,26 @@

    Reading Record for

    @@ -35,7 +35,7 @@ class="onissue"> - "> + "> class="onissue"> @@ -46,6 +46,6 @@
    - &order=title&amp;limit=">Title + &order=title&amp;limit=">Title - &order=author&limit=">Author + &order=author&limit=">Author Call No. - &order=returndate DESC&limit=">Return Date + &order=returndate DESC&limit=">Return Date
    -
    " method="get">" />
    +
    " method="get">" />
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/acquisitions_stats.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/acquisitions_stats.tmpl index 78136955a8..87ca6cec36 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/acquisitions_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/acquisitions_stats.tmpl @@ -1,4 +1,5 @@ Reports -- + /includes/calendar/calendar-system.css"> @@ -10,13 +11,13 @@ -

    Koha : Acquisitions statistics

    - +

    Acquisitions statistics

    +

    Filtered on

    -

    =

    +

    =

    - + @@ -54,7 +55,7 @@
    -

    Koha : Acquisitions statistics

    +

    Acquisitions statistics

    @@ -219,7 +220,7 @@ - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/bor_issues_top.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/bor_issues_top.tmpl index 44ee5d2d94..d3ca96fd3c 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/bor_issues_top.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/bor_issues_top.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -15,7 +16,7 @@ function Dopop(link) { } -

    Koha : Top List borrowers for Issues

    +

    Top List borrowers for Issues

    Filtered on

    @@ -43,7 +44,7 @@ function Dopop(link) { @@ -56,7 +57,7 @@ function Dopop(link) {
     
    Book SellerSupplier - ')" > + ')" >
    -

    Koha : Top List borrowers for Issues

    +

    Top List borrowers for Issues

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_out.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_out.tmpl index 4b100d5c19..e1ead3c07a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_out.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_out.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -9,109 +10,109 @@ - -

    Koha : Borrowers with No Issues

    - -

    Filtered on

    - -

    =

    - - - -
    - - - - - - - - - - - - - - -
    Num/Borrowers
    - - -
    - + +

    Borrowers with No Issues

    + +

    Filtered on

    + +

    =

    + + + + + + + + + + + + + + + + + + +
    Num/Borrowers
    + + +
    + -

    Koha : Borrowers with no Issues

    - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    Limit to By Filters
    - - - -
      Borrower Category
      Without issues since - /includes/calendar/cal.gif" id="openCalendarTo" style="cursor: pointer;" valign="top" border="0" hspace="0" vspace="0"> -
    - - -

    Output

    - To screen into the browser - - To file into an application - - -

    - -

    - - " /> - -

    +

    Borrowers with no Issues

    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    Limit to By Filters
    + + + +
      Borrower Category
      Without issues since + /includes/calendar/cal.gif" id="openCalendarTo" style="cursor: pointer;" valign="top" border="0" hspace="0" vspace="0"> +
    + + +

    Output

    + To screen into the browser + + To file into an application + + +

    + +

    + + " /> + +

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_stats.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_stats.tmpl index a2d66be8a2..066dfd2fc0 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/borrowers_stats.tmpl @@ -1,4 +1,5 @@ Reports -- + /includes/calendar/calendar-system.css"> @@ -10,13 +11,13 @@ -

    Koha : Borrowers statistics

    +

    Borrowers statistics

    Filtered on

    =

    - + @@ -41,7 +42,7 @@ - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/cat_issues_top.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/cat_issues_top.tmpl index b864b362f0..1eb22241c9 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/cat_issues_top.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/cat_issues_top.tmpl @@ -1,4 +1,9 @@ Reports -- + + + + +/includes/calendar/calendar-system.css"> @@ -6,22 +11,19 @@ - - - -

    Koha : Top List On Catalogue Issues

    +

    Top List On Catalogue Issues

    Filtered on

    =

    - +
    /
    TOTAL
    @@ -43,7 +45,7 @@ function Dopop(link) { @@ -52,11 +54,11 @@ function Dopop(link) { - +
    - ')" > + ')" > Item
    -

    Koha : Top List On Catalogue Issues

    +

    Top List On Catalogue Issues

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_out.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_out.tmpl index c573c4f488..7985aa439c 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_out.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_out.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -10,7 +11,7 @@ -

    Koha : Items with no Issues

    +

    Items with no Issues

    Filtered on

    @@ -39,7 +40,7 @@
    -

    Koha : Items with no Issues

    +

    Items with no Issues

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_stats.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_stats.tmpl index 95517d9c56..08a0958ed8 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/catalogue_stats.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -10,7 +11,7 @@ -

    Koha : Catalogue statistics

    +

    Catalogue statistics

    Filtered on

    @@ -54,7 +55,7 @@
    -

    Koha : Catalogue statistics

    +

    Catalogue statistics

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/inventory.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/inventory.tmpl index f2d4d29cb0..2f168fcb66 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/inventory.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/inventory.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/issues_avg_stats.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/issues_avg_stats.tmpl index bab340e3ba..ace67c778d 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/issues_avg_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/issues_avg_stats.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -10,13 +11,13 @@ -

    Koha : Issues Average Period statistics

    +

    Issues Average Period statistics

    Filtered on

    =

    - +
    @@ -31,7 +32,7 @@ - diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/issues_by_borrower_category.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/issues_by_borrower_category.tmpl index 2eb2b2721f..1ab563c8b4 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/issues_by_borrower_category.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/issues_by_borrower_category.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -9,7 +10,7 @@ -

    Koha : Issues by borrower category for category =

    +

    Issues by borrower category for category =

    +
    @@ -54,4 +55,4 @@ - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/issues_stats.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/issues_stats.tmpl index a79f6d0360..af77177cd2 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/issues_stats.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/issues_stats.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -10,7 +11,7 @@ -

    Koha : Issues statistics

    +

    Issues statistics

    Filtered on

    @@ -54,7 +55,7 @@
     
    -

    Koha : Issues statistics

    +

    Issues statistics

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/itemtypes.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/itemtypes.tmpl index e09b4a8a1d..9e907b49ec 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/itemtypes.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/itemtypes.tmpl @@ -1,4 +1,5 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -20,7 +21,7 @@ - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/reports/reports-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reports/reports-home.tmpl index 258c5b584e..e8748032f7 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reports/reports-home.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reports/reports-home.tmpl @@ -1,5 +1,6 @@ Reports -- +/includes/calendar/calendar-system.css"> @@ -35,14 +36,10 @@

    Other stats

    on catalogue

    on issues

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reserve/request.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reserve/request.tmpl index 5433b2d462..2dee7f1112 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reserve/request.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reserve/request.tmpl @@ -2,6 +2,7 @@ Koha -- Circulation + - - + +
    +

    Reserve find for the document()must transfered

    +

    This documen is reserved by : at the library : , Please put this document in transfer . +

    + + + +
    +

    Request for reserve

    Biblio informations
      -
    • Title: ">
    • -
    • Author:
    • +

      ">

      +

    -" method="post" onSubmit="request.pl" name="getborrower"> -
    - Member search - -
    TOTAL
    - - - - -
    Member (number or name) - -
    - -
    - "> - -
    - - - -
    - "> - -
    - - -
    +" method="post" onSubmit="request.pl" name="getborrower"> +
    + Member search + +

    + + +

    +
    + "> + +
    + + +
    + "> + +
    + + +
    -
    +

    - + Currently, this member has active reserves.

    -
    +

    - + The card of this member is expired

    - + The borrower isn't in is own library

    - - This borrower had already make a reserv for this document + + This borrower had already make a reserve for this document

    -
    Carrefull,there is no borrower with this name, Please, try an other
    +
    Carrefull,there is no borrower with this name, Please, try an other
    @@ -133,57 +136,30 @@ if (alreadyreserved > "0"){ Reservation properties "> - "> + "> "> - - - - - - - - - - - - - - - - - - - - - - -
    Member - - - (card number: ) - - Not defined yet - -
    - -
    - - - -
    - - - -
    + "> +

    + + + (card number: ) + + Not defined yet + +

    +

    + + +

    +

    + + +

    +

    + + +

    @@ -193,26 +169,29 @@ if (alreadyreserved > "0"){
  • Item type:
  • Publication year:
  • - + - + + + "> + +
    Item numberBarcode Home branch Holding branchCall number InformationCancel a Reserve
    - + - + - - - + + + @@ -243,6 +222,25 @@ if (alreadyreserved > "0"){ to : , the : + + + Can't be cancelled, when item on transfert + + &CancelBorrowerNumber=&CancelItemnumber=" onclick="if (window.confirm('You will delete a reserve, are you sure ?')) + {return true;} + else {return false;}">Cancel A reserve + Item reserved for : + +
    + expected at : +
    +
    + + + No reserves + +
    @@ -257,13 +255,14 @@ if (alreadyreserved > "0"){ "> "> +
    - +
    @@ -272,7 +271,7 @@ if (alreadyreserved > "0"){
    " action="modrequest.pl" method="post">
    - Modify existing reserves + Queue list @@ -291,24 +290,26 @@ if (alreadyreserved > "0"){ -
    - "> + " >, + Document waiting at > + + Document will be transfered to > + - &type=intra" onClick="openWindow(this, 'Item', 480, 640); return false;"> - + + + + > + + No Barcode + @@ -341,9 +347,8 @@ if (alreadyreserved > "0"){
    - Cancel a reserve with select - //images/2rightarrow.png"> + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/reviews/reviewswaiting.tmpl b/koha-tmpl/intranet-tmpl/prog/en/reviews/reviewswaiting.tmpl index 3ec53c7ca1..82663af29a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/reviews/reviewswaiting.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/reviews/reviewswaiting.tmpl @@ -1,5 +1,5 @@ - Reviews waiting for Approval -- +Reviews waiting for Approval -- @@ -23,10 +23,10 @@   - + - + @@ -36,14 +36,14 @@ - ">Approve | + ">Approve | ">Delete - + - No reviews has been writed. +No review has to be approved or deleted. - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search-result.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search-result.tmpl index 51a44b0cd2..38171e9623 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search-result.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search-result.tmpl @@ -1,7 +1,9 @@ Koha -- Subscription edit -- Select supplier -

    Supplier Search Results

    You searched on supplier , results found

    + +
    + @@ -10,18 +12,22 @@ - +
    Book seller
    ,'')">Get It !,'')">Get It !
    + +
    + Perform a new search +
    - - + diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search.tmpl index 34e50c2d45..920c9817bd 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/acqui-search.tmpl @@ -1,21 +1,18 @@ Koha -- Subscription edit -- Search supplier - - -

    Search supplier for serial subscription

    - - Supplier name : + + + - - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/claims.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/claims.tmpl index 836aa6c879..250c23d1a9 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/claims.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/claims.tmpl @@ -1,10 +1,22 @@ Koha -- Subscription edit - - -
    + + + + +
    -
    + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/serial-issues.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/serial-issues.tmpl index 6a38f41700..03f35842ce 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/serial-issues.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/serial-issues.tmpl @@ -1,106 +1,105 @@ -Koha +Koha -- Subscription edit + - + -

    Issues for a subscription

    +

    Subscription information for

    + -
    "> -

    Subscription information for

    -

    It began on and is issued every - - - day - - - week - - - 2 weeks - - - 3 weeks - - - month - - - 2 months - - - 3 months - - - quarter - - - 2 quarters - - - year - - - 2 years - - - - on monday - - - on tuesday - - - on wednesday - - - on thursday - - - on friday - - - on saturday - - - on sunday - - for - issues - weeks - months - -

    -

    Last renewal of subscription was

    -

    This subscription is now ended. The last issue was received on

    - -

    - -

    Issues summary

    -

    - -

    - - -

    received issues

    -

    - -

    - - -

    Missing issues

    -

    - -

    - -
    - +
    "> +

    Subscription summary

    +

    It began on and is issued every + + + day + + + week + + + 2 weeks + + + 3 weeks + + + month + + + 2 months + + + 3 months + + + quarter + + + 2 quarters + + + year + + + 2 years + + + + on monday + + + on tuesday + + + on wednesday + + + on thursday + + + on friday + + + on saturday + + + on sunday + + for + issues + weeks + months + +

    +

    Last renewal of subscription was

    +

    This subscription is now ended. The last issue was recieved on

    + +

    + +

    Issues summary

    +

    + +

    + + +

    Recieved issues

    +

    + +

    + + +

    Missing issues

    +

    + +

    + +
    + - -
    - -
    - "> - - -
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/serials-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/serials-home.tmpl index 578d2564bb..08c655230e 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/serials-home.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/serials-home.tmpl @@ -1,99 +1,124 @@ -Koha +Koha -- Serials + - -

    Serials

    +

    Serials subscription

    -

    Serials subscriptions

    +

    Search existing subscription

    Search for Serial Routing List

    - + + + + + + + + - + " /> - - - + - - + + + - - - - - + + + - + + + + + + + + + - + + + +
    Biblionumber
    ISSN Title Note - -   + Branch +   
    - " title="type biblionumber here to filter subscription"> - - " title="type ISSN here to filter subscription"> + " title="type ISSN here to filter subscription"> - " title="type a title -complete or partial- to filter subscription"> + " title="type a title -complete or partial- to filter subscription" /> +   +
    -
    " class="button serial" title="Biblio"> - - " class="button serial" title="Issues history"> + + + + " title="Issues history"> - + - + | + - + () + + + + + + - &op=new">Routing List + + &op=new">Routing List - - " class="button serial" title="subscription detail">Detail - - " class="button serial" title="receive issues for this subscription">Receive - - + " class="button serial" title="subscription detail">Detail + + + + + &serstatus=1">Serial receive +
    - - Add subscription - - Add subscription - +

    Add a new subscription

    +
    - diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-add.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-add.tmpl index d887277f5d..6a3373b4f9 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-add.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-add.tmpl @@ -1,233 +1,238 @@ -Koha -- Subscription edit - - - +Koha -- Subscription edit + + + /includes/calendar/calendar-system.css"> + - - - - - - + + + + + -
    -

    Modify subscription

    - - - "> +

    Modify a subscription

    + + + "> -

    Add a subscription (Serial Holdings Record)

    - - +

    Add a subscription (Serial Holdings Record)

    + + - "> - - - -
    -

    Subscription information

    - - - - - - - - - - - - - - - - - - - - - - - - - - -
    Librarian:
    " size="4"> (" disabled readonly>) Search for a Supplier
    " size="4"> (" disabled readonly>) Search for Biblio | Create Biblio
    " size="20">
    - - ...
    Warning: -
      -
    • Remember you must have created a biblio before creating a subscription
    • -
    • You also must have selected a supplier if you want to ask for late issues
    • -
    -
    -
    -

    Planning

    - - - - - - --> - -
    -

    Subscription length

    -

    " size="3" onkeypress="return check_input(event)"> (*) (enter amount in numerals)

    - -
    -
    -

    Numbering calculation

    -

    Numbering formula: ">

    -
    /includes/calendar/cal.gif" id="button2" style="cursor: pointer;" /> +"> + + -" size=13 maxlength=10 id="acqui_date" style="border-width: 0px;"> - - -
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    Librarian:
    " size="8"> (" disabled readonly>) Search for a Supplier
    + " size="8"> + (" disabled readonly>) + Search for Biblio | + Create Biblio +
    " size="20">
    Branch + (select a branch) +
    Patron alert with + (select a letter & patrons will be able to "follow" this subscription and recieve a mail on every new issue) +
    Warning: +
      +
    • Remember you must have created a biblio before creating a subscription
    • +
    • You also must have selected a supplier if you want to ask for late issues
    • +
    +
    +
    +

    Planning

    + + + + + + + + + - - - - -
    + /includes/calendar/cal.gif" id="button2" style="cursor: pointer;" /> + " size=13 maxlength=10 id="acqui_date" style="border-width: 0px;" /> + + + + +
    +
    Frequency: (*) + -
    -
    -
    /includes/calendar/cal.gif" id="button1" style="cursor: pointer;" /> -" size=13 maxlength=10 id="beginning_date" style="border-width: 0px;"> - - -
    -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     XYZ
    Add - "> - - "> - - "> -
    once every">">">
    When more than">">">
    The loop is for instance">">">
    Set back to">">">
    - - Last value - - Begins with - - ">">">
    -
    + + + + + + + + + + + + + + + + + Manual History : + + + + + + + + +
    +
    + + + + + + /includes/calendar/cal.gif" id="button1" style="cursor: pointer;" /> + " size=13 maxlength=10 id="beginning_date" style="border-width: 0px;"> + + + + + + + Subscription length + + + " size="3" onkeypress="return check_input(event)"> (*) (enter amount in numerals) + + + + Numbering calculation + Numbering formula: "> + + + + + + + +

    History

    + + + + + + + + + + + + + + + + + + + + + + + + + +
    "> (the date of the 1st subscription)
    ">(if empty : subscription still active)
    + - + - + - +
    @@ -970,56 +1021,48 @@ function check_input(e){ function Plugin(f) { - window.open('subscription-bib-search.pl','FindABibIndex','width=500,height=400,toolbar=no,scrollbars=yes'); + window.open('subscription-bib-search.pl','FindABibIndex','width=800,height=400,toolbar=no,scrollbars=yes'); } function FindAcqui(f) { - window.open('acqui-search.pl','FindASupplier','width=500,height=400,toolbar=no,scrollbars=yes'); + window.open('acqui-search.pl','FindASupplier','width=800,height=400,toolbar=no,scrollbars=yes'); } function Find_ISSN(f) { - window.open('issn-search.pl','FindABibIndex','width=500,height=400,toolbar=no,scrollbars=yes'); + window.open('issn-search.pl','FindABibIndex','width=800,height=400,toolbar=no,scrollbars=yes'); } function Check(f) { - if (f.startdate.value.length != 0 && f.sublength.value > 0) { - if (f.irreg_check.value == 1) { - document.f.submit(); - } else { - if(f.numbering_pattern.value == ''){ - alert("need to choose a numbering pattern"); - } else { - alert("need to check for irregularity by clicking 'Irregularity?'"); - } - } - } else { - alert('field marked with * are mandatory'); - } - return false; -} -function DistributedTo() -{ - newwin= window.open('distributedto.pl?subscriptionid=',"Distributed_to",'width=800,height=600,toolbar=false,scrollbars=yes'); -} -function AddBiblio() { - window.open("/cgi-bin/koha/cataloguing/addbiblio.pl?fromserials=1&popup=1","AddBiblio",'width=700,height=400,toolbar=no,scrollbars=yes,status=yes'); - + if (f.startdate.value.length != 0 && f.sublength.value > 0) { + if (f.irreg_check.value == 1) { + document.f.submit(); + } else { + if(f.numbering_pattern.value == ''){ + alert(_("need to choose a numbering pattern")); + } else { + alert(_("need to check for irregularity by clicking 'Irregularity?'")); + } + } + } else { + alert(_('field marked with * are mandatory')); + } + return false; } - - - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-bib-search.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-bib-search.tmpl index f875e61f63..99f2ed53fb 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-bib-search.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-bib-search.tmpl @@ -1,74 +1,10 @@ -Koha -- Catalog Search -
    - +Koha -- Subscription edit

    Catalogue search

    - - - " /> -
    - - - - - -
    -
    -
    Search on
    - - - - -
    - - - "> - - - - - " /> -
    - - - -
    -

    - - -

    -
    + + + + +
    - - -
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-detail.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-detail.tmpl index 6609baa225..488aa89205 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-detail.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-detail.tmpl @@ -1,417 +1,399 @@ -Koha -- Subscription editKoha_--_Subscription detail_# + - + - - - -

    Subscription Details for biblio :

    -
    - -" /> -
    - -
    -" /> -
    - -
    -" /> -
    - -
    -" /> -" value="Subscriptions" />
    - -
    -" /> -" value="View Biblio Record" />
    - -
    - -
    -" /> -
    - -
    -" /> - -
    - - - - -
    - -
    -

    Subscription information

    -


    - -

     

    - -

     

    - -

     

    - -

    ()


    -

     

    - -

    -
    - -
    -
    -

    Planning

    -

    -

    -

    - - 1/day - - - 1/week - - - 1/2 weeks - - - 1/3 weeks - - - 1/Month - - - 1/2 Months (6/year) - - - 1/quarter - - - 1/quarter - - - 2/year - - - 1/year - - - 1/2 years - -

    -

    - - Number - - - Volume, Number, Issue - - - Volume, Number - - - Volume, Issue - - - Number, Issue - - - Seasonal only - - - None of the above - -

    - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     

      - -   - -

       - -   - -
    - -

    -

    -

    - -

    - -

    -
    -
    -
    -

    Subscription length

    -

    -

    -

    - -
    -
    -

    Numbering calculation

    -

    +

    Subscription #

    +
    Subscription is by its end.
    It should be renewed now.
    + +
    +
    + Subscription information +

    +

    "> 

    +

    () ">


    +

     

    +

     

    +

     

    +

    +

    + +
    +
    +
    + Planning +

    +

    +

    + + 1/day + + + 1/week + + + 1/2 weeks + + + 1/3 weeks + + + 1/Month + + + 1/2 Months (6/year) + + + 1/quarter + + + 1/quarter + + + 2/year + + + 1/year + + + 1/2 years + + Manual history : checked disabled> +

    +

    + + Number + + + Volume, Number, Issue + + + Volume, Number + + + Volume, Issue + + + Number, Issue + + + Seasonal only + + + None of the above + +

    + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
     

      + +   + +

       + +   + +
    + +

    +

    +

    + +

    + +

    + +

    +

    +

    +
    +

    Numbering calculation

    +

    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
     XYZ
    Add + + + + + +
    once every
    When more than
    + (is )

    + (is )

    + (is )
    Set back to
    + Last value +
    + +
    + Serial issues + + + + + + + + + + + + + +
    Issue numberPlanned dateStatus
    + + + + + + Waited + + + Arrived + + + Late + + + Missing + +
    +

    Subscription summary

    + + + + + + + + + + + + + +
    +
    -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     XYZ
    Add - - - - - -
    once every
    When more than
    - (is )

    - (is )

    - (is )
    Set back to
    - Last value -
    -
    -
    -
    -

    Issues

    - - - - - - - - - - - - - -
    Issue numberPlanned dateStatus
    - - - - - - Waited - - - Arrived - - - Late - - - Missing - -
    -
    -
    - - +// window.onload = num_pattern(); + diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-renew.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-renew.tmpl index 0616369e05..a35b4f3aa4 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-renew.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/subscription-renew.tmpl @@ -1,5 +1,5 @@ - +

    subscription renewal for

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/serials/viewalerts.tmpl b/koha-tmpl/intranet-tmpl/prog/en/serials/viewalerts.tmpl index 24c4ebb074..edda66dd21 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/serials/viewalerts.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/serials/viewalerts.tmpl @@ -1,5 +1,6 @@ - - +Koha -- View alerts + +

    Alert subscribers for

    " class="button serial">subscription @@ -14,7 +15,7 @@ - " class="button serial">View + " class="button serial">View diff --git a/koha-tmpl/intranet-tmpl/prog/en/suggestion/acceptorreject.tmpl b/koha-tmpl/intranet-tmpl/prog/en/suggestion/acceptorreject.tmpl index 5cf77e17b8..a47e4b8d53 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/suggestion/acceptorreject.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/suggestion/acceptorreject.tmpl @@ -1,40 +1,187 @@ Suggestion Management + + + +

    Suggestions Management

    + + -

    Suggestions Management

    -
    - - - - - - - - - class="highlight"> - - + + + + +
    StatusSuggestionSuggested by
    - - , by
    - © - ; Volume: - ; ISBN : ; Published by in in
    +
    + + Waiting suggestion, accept or reject these suggestions with a reason. + + + + + + + + + + + class="highlight"> + + - - - -
    StatusReasonSuggestionSuggested by
    + + - - , -
    - + " class="content_visible"> + + + No reasons defined on authorised value. + + + " class="content_hidden"> + " value="write your reason here..." onclick="if(this.value === 'write your reason here...'){this.value=''}" /> + ');">back to list + +
    + , by
    + © + ; Volume: + ; ISBN : ; Published by in in
    +
    + + , + +
    +
    - + + No waiting suggestion to accept or reject. + + +
    + + Accepted suggestion + + + Rejected suggestion + + + + + + + + + + + + + + + + + +
    ReasonSuggestionSuggested byDate
    + + + + + , by + +
    + + © + + + ; Volume: + + + ; ISBN : + + + ; Published by + + + in + + + in + +
    + + + +
    + + , + + + +
    + +

    + No suggestion has already been + + accepted. + + rejected. + + + + + + diff --git a/koha-tmpl/intranet-tmpl/prog/en/suggestion/mail_suggestion_REJECTED.tmpl b/koha-tmpl/intranet-tmpl/prog/en/suggestion/mail_suggestion_REJECTED.tmpl index 7df84691ae..cb88c6eb5b 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/suggestion/mail_suggestion_REJECTED.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/suggestion/mail_suggestion_REJECTED.tmpl @@ -2,10 +2,12 @@ Dear user, You have suggested that the library acquire by . - reviewed your request today, and has decided not to accept the suggestion at this time. + reviewed your request today, and has decided not to accept the suggestion at this time. + +The reason given for this reject is: If you have any questions, please email us at . Thank you, - \ No newline at end of file + diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/barcodes.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/barcodes.tmpl index 97efe01438..9786123284 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/barcodes.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/barcodes.tmpl @@ -1,4 +1,7 @@ - + + + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/export.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/export.tmpl index 97adfb4c46..e18eb4c8b6 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/export.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/export.tmpl @@ -1,16 +1,86 @@ -Cataloging: MARC Export + +MARC biblio export + + - -

    MARC Export

    -

    Export in MARC format the following biblios (bibliographic records only):

    -
    -

    From biblio number: -to biblio number:

    -

    (leave blank to export every biblio)

    - - -
    -

    Note : Exporting all by this tool may take some time

    + + +

    Select biblios to export

    +

    + Note : The items are exported by this tool. +

    +
    +
    + + Records + +

    + + + + +

    + +

    + + +

    + +

    + + +

    +

    + + + + +

    +
    +
    + + Options + + + +
    + + + splitted by a blank. (for example: 100a 200 606) +
    +
    +
    + + Output format + +

    + + + format. +

    +
    + + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/holidays.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/holidays.tmpl index bcc7877bb4..1072738232 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/holidays.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/holidays.tmpl @@ -2,7 +2,7 @@ - + @@ -131,7 +131,7 @@

    Working day Unique holiday - Repetible holiday + Repeatable holiday Holiday exception

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/import.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/import.tmpl index 30ce8f9053..c9e217aa32 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/import.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/import.tmpl @@ -1,4 +1,6 @@ Koha -- Cataloging: MARC Import + +

    MARC acquisition system

    Import into the reservoir

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/koha-news.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/koha-news.tmpl index 7fba6f035a..697c63c3a5 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/koha-news.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/koha-news.tmpl @@ -1,103 +1,140 @@ -Ă¯Â»Â¿System Administration - - -

    OPAC & KOHA News

    - + + KOHA -- News Management + -
    - "> - "> - - - - - - - - - - - - - - - - - -
    Language - -
    Title">
    News
    - - -
    -
    + +/includes/calendar/calendar-system.css"> + + + + + + + - - - - -
    - Language: - - - - -
    - -
    - - - - - - - - - - - - - - - - - - - - -
    - LanguageDateTitleNews
    " - ">Edit -
    - - -
    - -
    No news loaded
    - - -
    - - -
    - - - - +
    +

    OPAC & KOHA News

    + +
    + " /> + " /> +

    + + +

    +

    + + " /> +

    +

    + + "/> + +

    +

    + + + + + + +

    +

    News

    + +

    + + +

    +
    + +
    +
    + + + +
    +
    + +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + +
    LanguageNumberCreation DateExpiration DateTitleNews
    + " /> + + + + + + + "> + Edit + +
    + + +
    + +

    No news loaded

    + +
    + Add news +
    +
    + +
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/letter.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/letter.tmpl index 10ba7b1dcc..6b6df9f267 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/letter.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/letter.tmpl @@ -25,14 +25,10 @@ - &code="> - //images/fileopen.png" width="32" hspace="0" vspace="0" border="0"> - + &code=">Edit - &code="> - //images/edittrash.png" width="32" hspace="0" vspace="0" border="0"> - + &code=">Delete @@ -150,46 +146,36 @@

    @@ -200,15 +186,37 @@

    - + + + + + + + + + + + + + + + + + + + + + + + + + + - - - +

    @@ -217,21 +225,22 @@

    - "> + ">

    - "> + ">

    -

    - - + +

    diff --git a/koha-tmpl/intranet-tmpl/prog/en/tools/tools-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/tools/tools-home.tmpl index c7827f0285..9fe5abbee3 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/tools/tools-home.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/tools/tools-home.tmpl @@ -7,41 +7,50 @@ - - - - - - + + - - + + - - + + - - + + - - + + - - + + - - + + + + + + + + + + + + + + + + + + - -
    Various tools
    ZEBRA queue starter--for Windows Starts Zebra queue if stopped or system restarted. ZEBRA queue is required for the system to update ZEBRA
    Barcode generatorGenerate your barcodesBarcode generatorGenerate your barcodes
    HolidaysDefine holidays (days where the library is closed)HolidaysDefine holidays (days where the library is closed)
    ExportExport datasExportExport datas
    ImportImport datas in the reservoirImportImport datas in the reservoir
    NewsA basic news system for OPAC & librarian interfacesNewsA basic news system for OPAC & librarian interfaces
    LettersDefine letters LettersDefine letters
    overdue rulesRules for overdue booksoverdue rulesRules for overdue books
    Inventory/stocktakingTool to inventory (stocktaking) of your catalogue
    Clean borrowersDelete some old private data/reading history relative to borrowers.
    Items lostShow lost items
    Log viewerBrowse the system logs
    Membership cardscreate membership cards from member cardnumbers -
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/z3950/searchresult.tmpl b/koha-tmpl/intranet-tmpl/prog/en/z3950/searchresult.tmpl index 4204e8250f..49a451d7e4 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/z3950/searchresult.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/z3950/searchresult.tmpl @@ -1,76 +1,46 @@ -Koha -- Catalog: Advanced MARC Search - - - - - " /> - - -
    +Z39.50 Search Results +" /> + + + + + + +

    Z3950 Search Results

    + + - -

    Select Search Libraries

    - - - - - - /> - /> - /> - /> -" /> - - - - - - - "> - - - - - - - - - - - - - - - - - - - - "> - - - - - - - - - - -
    LibrarySelect
    checked="1" >
    Bibliographic Records Found
    TitleAuthorISBNcoming from  
    - ,)">Import
    Nothing found
    - - -
    -

    Still requests to go

    - -
    - + + \ No newline at end of file diff --git a/koha-tmpl/opac-tmpl/prog/en/kohaerror.tmpl b/koha-tmpl/opac-tmpl/prog/en/kohaerror.tmpl index b6671dac8f..7274e5650b 100644 --- a/koha-tmpl/opac-tmpl/prog/en/kohaerror.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/kohaerror.tmpl @@ -1,4 +1,4 @@ - Catalog -- An Error Has Occurred + Catalog -- An Error Has Occurred diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl index 9d31f0c85f..72602ef797 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl @@ -1,69 +1,149 @@ - Catalog -- ISBD + Catalog -- ISBD + -
    -

    ISBD

    -

    - - -

    We have subscription(s) associated with this title.

    -

    Below is a list of the three latest issues :

    - - -

    - - - - - - - - - - - -
    Issue numberDateStatus
    - - - - - Pending - - Arrived - - Late - - Missing - - Not Issued - - - - - -
    - - -

    " title="Serial issues">Click here for more information on subscription(s) history

    - - - -
    - - " /> -
    - + + +

    ISBD

    + + +

    + We have subscription(s) associated with this title. +

    +

    Below is a list of the three latest issues :

    + + +

    + + + + + + + + + + + +
    Issue numberDateStatus
    + + + + + Pending + + Arrived + + Late + + Missing + + Not Issued + + + + + +
    + + +

    " title="Serial issues">Click here for more information on subscription(s) history

    + + + +

    Reviews by members:

    + +

    + + Review by + + + + +
    + + + +

    +

    + +

    +
    + + + No reviews has been writed on this biblio. + + + ');"> + Write or modify your reviews on this biblio. + + +
    Log in to your account to write a review here. + + + + + +
    +

    Amazon Reader Reviews:

    +

    + + + &store=books">Add your own review

    + +
    -
    " />
    + +

    Rating (from Amazon.com):

    +
    px">
    -
    " />
    + +
    + +

    + + +

    +

    +
    + + -
    " />'); return false;"/>
    +
    +

    Sorry, there are no reviews available for this title.

    +
    -
    " />'); return false;" />
    + +
    + -
    '); return false;" value="Add to Book Bag" />
    -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-MARCdetail.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-MARCdetail.tmpl index 8177bef033..b2487f0dc5 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-MARCdetail.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-MARCdetail.tmpl @@ -1,143 +1,154 @@ - Catalog -- MARC Details for Record No. + Catalog -- MARC Details for Record No. + -
    -

    MARC View

    - -
    - - " /> -
    - -
    " />
    - -
    " />
    - -
    " />'); return false;"/>
    - -
    " />'); return false;" />
    - -
    '); return false;" value="Add to Book Bag" />
    + - - - - - - - - - +

    MARC View

    - - - - - - - - - +
    + + + + + + + + + + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - + + + + + + + + + - - - - - - - - - -
     
     
     
     
     
     
     
     
     
    + + + +   + + + + + +

    Copies

    - - - - - - - - - - - -
    - -
    -

    No copies available.

    - -
    + + + + + + + + + + + + + +
    +

    No copies available.

    + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-account.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-account.tmpl index efcb9763af..19fa9a0ed2 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-account.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-account.tmpl @@ -1,46 +1,48 @@ - Catalog -- Account for + Catalog -- Account for - - -
    -

    Account for

    - - - - - -

    Fines and Charges

    - - - - - - - - - - - - - - - - - - - - - - - - -
    DateDescriptionFine AmountAmount Outstanding
    Total Due$
    -$$
    -

    You have no Fines or Charges

    -
    + + +

    Account for

    + + + +

    Fines and Charges

    + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    DateDescriptionFine AmountAmount Outstanding
    Total Due$
    + $$
    + +

    You have no Fines or Charges

    + + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-addbookbybiblionumber.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-addbookbybiblionumber.tmpl index 2b447a7749..1a082d95b0 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-addbookbybiblionumber.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-addbookbybiblionumber.tmpl @@ -1,24 +1,62 @@ - Catalog -- Add to My Book List -
    -

    Add by to a Book List

    + + Catalog -- Add to My Book List + -

    Select a Book List:

    -

    + + +

    Add these biblios to a shelf

    + + + by +

    + + +

    Add + + + by + to a Virtual Shelf +

    + + + + +

    Select an Existing Bookshelf

    + + " /> + + +
    +

    ...or...

    + + +
    + Add to a New Bookshelf: +

    + + +

    + + + " /> +
    -

    ...or...

    -
    -

    Add to a new Book List:

    -

    - ">

    -

    +

    +

    + close this window. +

    + -

    -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-auth.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-auth.tmpl index db2c39374c..0659ab02bb 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-auth.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-auth.tmpl @@ -1,10 +1,9 @@ - Catalog -- Log in to Your Account + Catalog -- Log in to Your Account -

    Log In to Your Account

    @@ -44,5 +43,4 @@ -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-basket.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-basket.tmpl index 05254693c9..3cc46ff895 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-basket.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-basket.tmpl @@ -1,85 +1,227 @@ - Catalog -- Your Book Bag - -
    -

    Your Book Bag

    - - - -
    - -
    + + + Catalog -- Your Book Bag + + + + -
    -
    +
    -
    + +

    Your Book Bag

    -
    -
    - - + +
    +

    +Selected items : + + Remove + | + + + Add to a shelf + + +

    - -

    - - + +

    + + + + +
    + " + name="bib" + id="bib" + onclick="selRecord(value,checked)" /> + + + + +

    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    ISBN
    Authors + + + +
    Publisher +
    Details
    Collection
    Subjects + +

    + +
    Copyright
    Notes + +

    -

    + +
    Unified title
    Serial
    Dewey
    Classification
    LCCN
    URL
    Location + +

    + + + () + +

    + +
    + - ISBN: - - Author: - Additional authors: - - Publisher: - - - Details: - - Collection: - Subject: - Copyright: - Notes: - Unified title: - Serial: - Dewey: - Call Number: - LCCN: - URL: - - - - - - - - - - -
    Location: Barcode:
    - - - () - -
    -
    - - - - - - -

    " name="bib" id="bib" onclick="selRecord(value,checked);">

    ',)"> - - - - - -

    -

    + + + + + + + + + + + + + +
    +
    + + +
    + " + name="bib" + id="bib" + onclick="selRecord(value,checked);"> + +
    +
    +

    + ',)"> + + + + - + + - + + + +

    + +
    + -
    +
    + +
    -
    - - + + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl index feb700c524..4ac1b00bd6 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl @@ -1,217 +1,328 @@ - Catalog -- Details for: + Catalog -- Details for: + -
    - - -/ref=sib_dp_pt/002-7879865-0184864#reader-link">.01._PIdp-schmooS,TopRight,7,-26_SCMZZZZZZZ_.jpg" alt="Book Cover Image" />Book Cover Image - - - - - -

    Search for this title in:

    - - -

    -

    By &resultsperpage=20&orderby=biblio.title&op=do_search">

    - - - - - - - - - - - - - - - - - - - - - - - - - - + + + "> + Place Reserve + - - - - + + "> + MARC View + + "> + ISBD + + " onclick="Dopop('opac-detailprint.pl?biblionumber='); return false;"> + Print + + + + " onclick="Dopop('opac-addbookbybiblionumber.pl?biblionumber='); return false;"> + Add to My Book List + + + '); return false;"> + Add to My Book Bag + + - - - - - - - - - + - - - - - - - - - - - -
    Notes:
    Subject(s):">,
    Detailed notes:
    Related links:
    Item Description (from Amazon.com):
    Format:
    Copyright:
    Series Title:&resultsperpage=20&orderby=biblio.title&op=do_search">
    ISBN:
    LCCN:
    Publisher:
    Physical Details:
    Record No.:
    - - - - -
    Related URLs:
    -
    +

    + + () + +

    + + +

    + + ; + +   +

    + + +

    + "> +   + +

    + + +

    + + "> + +   + +

    + + +

     

    + + +

    + "> + +   +

    + + +

     

    + +

    + + ,   +

    + +

     

    + + +

     

    + + +

    + + vol. +   +

    + + +

    +

    + + "> +   + +

    + + +

    + + +

    +

    + +

    -

    + +

    + + +

    + + + +

    + + +

    + + +

    + + +

    + + ">  + +

    + +

    + + + + + +

    - - - - - - - - - - - - - - - - - - - - - --> - - -
    Type/FormatCall NumberLocationStatusDue DateLast Seen
    /images/.gif" align="left" title="" alt="" /> - - - () - - - - On loan - - - - - Available - - -
    + +
    +

    items

    + + + + + + + + + + + + + + + + + + + + +
    Item typeLocationStatusDate DueVolume
    + + On issue to + + + + + + Item lost + + Item CancelledAvailable + + + + + &item=">Fix Itemtype +
    +
    -
    No copies available.
    +

    we don't have any physical item for this document

    - -

    This is a serial subscription (There are subscriptions associated with this title).

    - -

    - -

    The three latest issues related to this subscription:

    - - - - - - - - -
    - - - - - Waited - - Arrived - - Late - - Missing - - Not Issued - - - - - -
    - - -

    For more information: View a record of " title="Serial issues">this subscription's issues

    - + +
    +

    This is a serial subscription

    +

    (We have subscriptions associated with this title).

    + +

    + +

    The three latest issues related to this subscription:

    + + + + + + + + + + + + + + +
    Issue #DateStatusNote
    + + + + + Waited + + Arrived + + Late + + Missing + + Not Issued + + + + + + + +
    + + +
    + + + + +

    Reviews by members:

    + +

    + + Review by + + + + +
    + + + +

    +

    + +

    +
    + + + No reviews has been writed on this biblio. + + + ');"> + Write or modify your reviews on this biblio. + + +
    Log in to your account to write a review here. + + +

    Amazon Reader Reviews:

    - - - &store=books">Add your own review

    - -
    + + + &store=books">Add your own review + +
    -

    Rating (from Amazon.com):

    -
    px">
    +

    Rating (from Amazon.com):

    +
    px">
    - -
    - -

    - - -

    -

    -
    - - + +
    + +

    + + +

    +

    +
    + + -
    -

    Sorry, there are no reviews available for this title.

    -
    +
    +

    Sorry, there are no reviews available for this title.

    +
    - +
    -
    + + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-detailprint.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-detailprint.tmpl index ee4cb2ed0d..0c6285c7d2 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-detailprint.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-detailprint.tmpl @@ -1,4 +1,4 @@ - Catalog -- Details for: + Catalog -- Details for:
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-full-serial-issues.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-full-serial-issues.tmpl index c253416ab7..a47cd10ccb 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-full-serial-issues.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-full-serial-issues.tmpl @@ -1,80 +1,75 @@ - Catalog -- Serials + Catalog -- Serials + - -
    -

    Subscription information for

    -
    " />
    +

    Subscription information for

    + " class="button catalogue">Back to biblio + - - - -
    " id="" class="tab" style="visibility:visible"> - - - - - - - - - - - - - - -
    Issues
    Date - Number - Status -
    - - - - - Arrived - Waited - Late - Missing -
    -
    - -
    + +
    " class="tabsub" style="visibility:visible"> + + + + + + + + + + + + + + + +
    Date + Date received + Number + Status +
    + + + + + + + Waited + Arrived + Late + Missing + Not Published + () +
    +
    + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-main.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-main.tmpl index f5660d3c5f..a0db3d05a3 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-main.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-main.tmpl @@ -1,85 +1,145 @@ - -- Library Catalog + + -- Library Catalog + -
    - -
    - - - -
    -

    Log in to Check Your Account

    -

    -

    -

    -
    + +
    + + + + + + +
    + +
    +

    +

    (published on )

    +
    +
    -
    -

    Search the Library Catalog

    -

    - - - - - - - -

    -

    -

    - Advanced Search (More Options) -

    - -
    + -
    -

    Recent acquisitions

    - -

    - - - - - - - - - acquired in the last - - days - -

    - + +
    +

    Change language

    +
      +
      + + +
      +
    - - -
    -

    You're logged in as (Click here if you're not )

    + - - -

    Message from the library

    -

    - -
    -

    -
    -
    + +
    + + + + + + + + + + + + + + + + + +
    + Title + + Author + + copyright + + publication year + + Date +
    +

    + + "> + + + + (no title) + + + + + "> + + + + (no title) + + + + "> + + + + (no title) + + + + +

    +
    + "> + + + + + + + + +
    +
    + -
    -

    Change Language:

    -
    - - -
    -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-passwd.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-passwd.tmpl index 809db363ac..2adaefda93 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-passwd.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-passwd.tmpl @@ -1,46 +1,43 @@ - Catalog -- Change Your Password + Catalog -- Account for - + - -
    + + + +

    There was a problem with your submission

    +

    + + Passwords do not match. Please re-type your new password. + + + Your new password must be at least 6 characters long + + + Your current password was entered incorrectly. If this problem persists, please ask a librarian to re-set your password for you. + +

    + + + +

    Change your Password

    +
    +

    +

    +

    +

    + + + +

    Password Updated

    + Your password has been changed + + " /> +

    +
    + + - - -

    There was a problem with your submission

    -

    - - Passwords do not match. Please re-type your new password. - - - Your new password must be at least 6 characters long - - - Your current password was entered incorrectly. If this problem persists, please ask a librarian to re-set your password for you. -

    - - - -

    Change your Password

    -
    -
    - - -
    -

    - - - -

    Password Updated

    - Your password has been changed - - " /> -

    - - - - -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-readingrecord.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-readingrecord.tmpl index 7c3fa3a41d..544ba3bc13 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-readingrecord.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-readingrecord.tmpl @@ -1,9 +1,10 @@ - Catalog -- Library Home for + Catalog -- Account for - + -
    + +

    Reading History of

    @@ -14,14 +15,15 @@ You have never borrowed anything from the library. Showing All Items | Show Last 50 Items Only Showing Last 50 Items | Show All Items -Title  +Title  + Author  DateDate -"> +"> (Checked out) @@ -31,5 +33,4 @@ You have never borrowed anything from the library. -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-recacquisitions.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-recacquisitions.tmpl index 5f3632f749..aa6fcca2cc 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-recacquisitions.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-recacquisitions.tmpl @@ -1,4 +1,4 @@ - Catalog -- Recent Acquisitions + Catalog -- Recent Acquisitions diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-reserve.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-reserve.tmpl index 133236e57d..00a73410b5 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-reserve.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-reserve.tmpl @@ -1,30 +1,68 @@ - Catalog -- Reserving for + Catalog -- Reserving for + - -
    -

    Sorry, you cannot place reserves because the library doesn't have up-to-date contact information on file.

    Please contact your librarian, or use the online update form to submit current information (Please note: there may be a delay in restoring your account if you submit online)

    -

    Sorry, you cannot place reserves because your library card has been marked as lost or stolen.

    If this is an error, please take your card to the circulation desk at your local library and the error will be corrected.

    -

    Sorry, you cannot place reserves because your account has been frozen.

    Usually the reason for freezing an account is old overdues or damage fees. If your account page shows your account to be clear, please consult a librarian.

    -

    Sorry, you cannot make reserves because you owe .

    -

    Sorry, you cannot make more than reserves.

    -

    You already have a reserve placed on this item. -

    " />

    - -

    You must select at least one item.

    -

    You must select a branch for pickup!

    + +

    + Sorry, you cannot place reserves because the library doesn't have up-to-date contact information on file. +

    +

    Please contact your librarian, or use the online update form to submit current information (Please note: there may be a delay in restoring your account if you submit online) +

    + + +

    + Sorry, you cannot place reserves because your library card has been marked as lost or stolen. +

    +

    + If this is an error, please take your card to the circulation desk at your local library and the error will be corrected. +

    + + +

    + Sorry, you cannot place reserves because your account has been frozen. +

    +

    Usually the reason for freezing an account is old overdues or damage fees. If your account page shows your account to be clear, please consult a librarian. +

    + + +

    + Sorry, you cannot make reserves because you owe . +

    + + +

    Sorry, you cannot make more than reserves. +

    + + +

    + You already have a reserve placed on this item. +

    + " /> + +
    +

    + + +

    + You must select at least one item. +

    + + +

    + You must select a branch for pickup! +

    +
    -
    -"> +">

    Reservation Details

    @@ -32,15 +70,15 @@
    For: ()
    Pick up from:
    -

    +

    @@ -48,8 +86,10 @@

    Choose Either...

    -

    - Next Available Copy (any format)

    +

    + + +

    ...Or Choose Acceptable Formats

    @@ -60,7 +100,7 @@ @@ -69,32 +109,29 @@

    -
    - -
    -">

    Confirm Reservation

    +">

    Confirm Reservation

    - - +
    Title:
    + - + - - +
    Title:
    Item Type: Any
    Item Type: Any
    Item Types: +
    Item Types: ">;
    Pick up From: ">
    Pick up From: ">

    @@ -102,6 +139,4 @@
    -
    - - \ No newline at end of file + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-sendbasket.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-sendbasket.tmpl index 5f312ab145..2ed2aa251f 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-sendbasket.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-sendbasket.tmpl @@ -9,9 +9,25 @@ Here is your Book Bag, sent from the Koha Online Catalog by -Author: -Additional authors: + + + + + + + + + + + + + + Authors: + + + + + ISBN: Published by: in , , Collection: diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-sendbasketform.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-sendbasketform.tmpl index 4649210b4b..3e14527223 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-sendbasketform.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-sendbasketform.tmpl @@ -1,24 +1,44 @@ - Catalog -- Sending Your Book Bag + Catalog -- Sending Your Book Bag

    Sending your book bag

    + -

    The book bag was sent to:

    - +

    The book bag was sent to:

    + +

    Problem sending the book bag...

    + +
    " method="post"> -

    - -

    - " />

    + +

    + + +

    +

    +
    + +

    +

    + + " /> +

    + -

    +

    + +

    + +
    +

    +
    - - \ No newline at end of file + + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-serial-issues.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-serial-issues.tmpl index 591c900980..179dbbda87 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-serial-issues.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-serial-issues.tmpl @@ -1,11 +1,11 @@ - Catalog -- Serials + Catalog -- Serials - + -

    Issues for a subscription

    -
    " />
    + " class="button">Normal View + " class="button">Full History
    @@ -85,6 +85,5 @@

    -
    - - + + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-shelves.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-shelves.tmpl index 7a89af4d0b..dea8659b7b 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-shelves.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-shelves.tmpl @@ -1,124 +1,200 @@ - Catalog -- Contents of List of Virtual Shelves + Catalog -- Contents of List of Virtual Shelves -
    - - +

    Contents of

    - +Back to Virtual Shelves + + + | "> + Modify this Shelf + + + + + - - - - - - class="highlight"> - - - - - - - - -
    /images/checkall.gif" height="18" width="18" alt="Check All" title="Check All" border="0" /> TitleAuthorCall No. 
    " />" /> - - " />/images/.gif" alt="" title="" />">
    This shelf is empty." />
    -
    " name="shelf" />
    -

    + " /> + + + + Check All + +   + Title + Author + Call No. + + + class="highlight"> + + " /> + "> + + + /images/.gif" alt="" title="" /> + + + + "> + + + + + "> + + + + "> + + + + + + + + + + + + + This shelf is empty. + + " /> + + + + + + +

    With selected items :

    +

    + + +

    +

    + + +

    +

    +

    + + + + + +
    - - - - - - -
    Add an Item to this Shelf by Barcode
    " />" />
    + + + + + + +
    Add an Item to this Shelf by Barcode
    + + + + " /> + + +
    -
    - - -

    - - - -

    - - -
    - -

    Create a New a Virtual Shelf

    - - - -
    ">
    -
    • A private virtual shelf is managed by you and can be seen only by you.
    • A public virtual shelf can be seen by everybody, but managed only by you.
    • -
    • A free virtual shelf can be added to and changed by any user.
    -

    -
    - - -
    - -

    Delete Virtual Shelves

    - - - - - - - - -
     Shelf NameContents
    " />"> item(s)
    -
    - -

    + + +

    + + + +

    + + +
    + +

    Create a New a Virtual Shelf

    + + + +
    ">
    +
    • A private virtual shelf is managed by you and can be seen only by you.
    • A public virtual shelf can be seen by everybody, but managed only by you.
    • +
    • A free virtual shelf can be added to and changed by any user.
    +

    +
    + + +
    + +

    Delete Virtual Shelves

    + + + + + + + + +
     Shelf NameContents
    " />"> item(s)
    +
    + +

    - - -
    - - "> + + + + + ">

    Modify Virtual Shelf

    - - - - -
    " />
    ">
    -
    • A private virtual shelf is managed by you and can be seen only by you.
    • -
    • A public virtual shelf can be seen by everybody, but managed only by you.
    • -
    • A free virtual shelf can be added to or changed by any user.
    -

    + + + + +
    " />
    ">
    +
    • A private virtual shelf is managed by you and can be seen only by you.
    • +
    • A public virtual shelf can be seen by everybody, but managed only by you.
    • +
    • A free virtual shelf can be added to or changed by any user.
    +

    -
    +

    Virtual Shelves

    @@ -126,14 +202,52 @@ Shelf NameCategoryContent Size  class="highlight">">PrivatePublicFree item(s)">Modify  - - -

    - + + +

    +
    -
    - - + + + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-suggestions.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-suggestions.tmpl index 5db9dbb7ec..277e8835ef 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-suggestions.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-suggestions.tmpl @@ -1,155 +1,109 @@ - Catalog -- + Catalog -- Enter a new purchase suggestion Purchase Suggestions -
    -

    Enter a new purchase suggestion

    +

    Enter a new purchase suggestion

    -

    Fill this form to suggest the library a new acquisition. You will be emailed when the library processes your purchase suggestion

    -

    No fields are mandatory. Enter whatever information you have. The "Notes" field can be used to provide any additional information.

    -
    - - - - - - -
    -

    -
    +

    Fill this form to suggest the library a new acquisition. You will be emailed when the library processes your purchase suggestion

    +

    No fields are mandatory. Enter whatever information you have. The "Notes" field can be used to provide any additional information.

    +
    + + + + + + +
    +

    +
    -

    Purchase Suggestions

    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     TitleAuthor©PublisherStatusSuggested byManaged byNote
    - Filter by: - - " /> - - " /> - -   - - " /> - - - - - -   - - -
    - " /> - - - - - - - - - - Requested - Ordered by the library - Suggestion declined - Available in the library - - , - - , - - -
    - -
    -
    There are no pending purchase suggestions
    -
    - - -
    -

    Note : if you're viewing purchase suggestions submitted by anybody, the results will contain only new purchase suggestions. Suggestions being processed by a librarian will not be shown.

    +

    Purchase Suggestions

    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
     SummaryStatusSuggested byManaged byNote
    + Filter by: + + " /> + +   + + + +   + + +
    + " /> + +

    +

    , + - , + - +

    +
    + Requested + Accepted by the library + Ordered by the library + Suggestion declined + Available in the library + () + + , + + , + + +
    + +
    +
    There are no pending purchase suggestions
    +
    + + +
    -
    - - + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl index ecb050c120..32f89e495a 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl @@ -1,138 +1,183 @@ - Catalog -- Library Home for + + Catalog -- Library Home for + + + + -
    - -

    Welcome (Click here if you're not )

    - - -

    Message from the library

    -

    - -
    • Please note: Your account has been frozen. Usually the reason for freezing an account is old overdues or damage fees. If your account page shows your account to be clear, please consult a librarian.
    • -
    • Please note: According to our records, we don't have up-to-date contact information on file. Please contact your librarian, or use the online update form to submit current information (Please note: there may be a delay in restoring your account if you submit online)
    • -
    • Please note: Your library card has been marked as lost or stolen. If this is an error, please take your card to the circulation desk at your local library and the error will be corrected.
    - - -

    Fines and Charges

    - - - -
    Amount
    You currently owe fines and charges amounting to:
    - + +
    +

    + Welcome +

    + (Click here if you're not ) + +

    Message from the library

    +

    + + +
      + +
    • Please note: Your account has been frozen. Usually the reason for freezing an account is old overdues or damage fees.If your account page shows your account to be clear, please consult a librarian.
    • + + +
    • Please note: According to our records, we don't have up-to-date contact information on file. Please contact your librarian, or use the online update form to submit current information (Please note: there may be a delay in restoring your account if you submit online)
    • + + +
    • Please note: Your library card has been marked as lost or stolen. If this is an error, please take your card to the circulation desk at your local library and the error will be corrected.
    • + +
    + + + +

    Fines and Charges

    + + + + + + +
    Amount
    You currently owe fines and charges amounting to:
    + - -

    Fines and Charges

    - - - - -
    Amount
    You currently owe fines and charges amounting to:
    - + +

    Fines and Charges

    + + + + +
    Amount
    You currently owe fines and charges amounting to:
    + - -

    Credits

    - - - -
    Amount
    You have a credit of:
    - + +

    Credits

    + + + +
    Amount
    You have a credit of:
    + - - - -

    Reserved Items Waiting

    - - - - - - - - - - - - -
    TitleReserve datePick Up Branch
    /images/.gif" alt="" title="" /> - "> - - Waiting at - - In transit from to -
    - - - - - -

    Issues ( total)

    - - - - - - - - + - - - - - - - - - - - -
    TitleCall No.DueRenewFines
    /images/.gif" alt="" title="" />">.01.THUMBZZZ.jpg" alt="Book Cover Image" class="thumbnail" /> //Display for NPL -->"> - - -&bornum=">Renew - -Not renewable - -YesNo
    - - - - - -
    Issues
    You have nothing checked out
    - - - -

    Reserves ( total)

    - - - - - - - - - - - - - - - - -
    TitlePlaced OnPick Up LocationStatus
    "> - - Waiting at In transit from to  
    + + +

    Reserved Items Waiting

    + + + + + + + + + + + + + + +
    TitleReserve datePick Up Branch
    + /images/.gif" alt="" title="" /> + + "> + + + + + + + + + + Waiting at + + In transit from to + +
    + + -

    If you no longer want a reserve, please send us an e-mail, or go to the circulation desk at your library to get it removed.

    + +

    Issues ( total)

    + + + + + + + + + + + + + + + + + + + + + + + + + + +
    TitleCall No.DueRenewFines
    + + " title=""/> + + + + + "> + + + + + + &borrowernumber=">Renew + + Not renewable + + YesNo
    + + + + +
    Issues
    You have nothing checked out
    + - + +

    Reserves ( total)

    + + + + + + + + + + + + + + + + +
    TitlePlaced OnPick Up LocationStatus
    + "> + + + Waiting at In transit from to  
    +

    If you no longer want a reserve, please send us an e-mail, or go to the circulation desk at your library to get it removed.

    + -
    diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-userdetails.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-userdetails.tmpl index da2e641bc3..3df4a565a6 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-userdetails.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-userdetails.tmpl @@ -1,15 +1,12 @@ - Catalog -- Personal Details for + Catalog -- Personal Details for - -
    -

    Personal Details:

    - + +

    Personal Details:

    @@ -22,19 +19,19 @@ Card Number:

    Contact Details

    - + - + - + - + - + - +
    Mailing Address:,
    Mailing Address:,
    Permanent Address: ,
    Permanent Address: ,
    Phone (Home): 
    Phone (Daytime): 
    Phone (Daytime): 
    Fax: 
    Fax: 
    E-mail:"> 
    E-mail:"> 
    Textmessaging: 
    Textmessaging: 
    @@ -44,43 +41,39 @@ Card Number: Membership Category: - --> - Joined: -Expires: +Expires: Joining Branch:  -

    Identity Details

    DoB:  
    Sex: 
    -

    Alternate Contact Details

    - - + - + - + - + -
    Alternate Contact:  
    Phone:  
    Phone:  
    Relationship:  
    Relationship:  
    Notes:  
    Notes:  
    Guarantor:  
    +Guarantor:   + +No alternate contact.

    +
    -
    - - \ No newline at end of file + diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-userupdate.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-userupdate.tmpl index 078c7f0332..a3fd45e8b5 100644 --- a/koha-tmpl/opac-tmpl/prog/en/opac-userupdate.tmpl +++ b/koha-tmpl/opac-tmpl/prog/en/opac-userupdate.tmpl @@ -1,13 +1,9 @@ - Catalog -- Updating Details for + Catalog -- Updating Details for - - - -
    +

    Updating Details for

    Please make any necessary changes to your record. Submitting the form will notify a library staff member, who will make the changes permanent.

    @@ -18,22 +14,26 @@ " name="firstname"> -" name="streetaddress"> + + + + + + " name="city"> " name="phone"> -" name="faxnumber"> +" name="faxnumber"> -" name="emailaddress"> +" name="emailaddress">

    Clicking 'Submit Changes' will send an email to a library staff member with the information you've entered. You will then be returned to your patron record.

    - -
    + -- 2.39.5