- [% IF ( batches ) %] -

- Click on the following link(s) to download the exported batch(es). -

- - [% FOREACH batche IN batches %] - - [% IF ( batche.label_ids ) %] - - - - - [% ELSIF ( batche.item_numbers ) %] - - - - - [% ELSE %] - - - - - [% END %] - - [% END %] -

- [% batche.label_count %] Single cards -

- label_single_[% batche.label_count %].pdf -

- label_single_[% batche.label_count %].csv -

- label_single_[% batche.label_count %].xml -

- [% batche.label_count %] Single Cards -

- label_single_[% batche.label_count %].pdf -

- label_single_[% batche.label_count %].csv -

- label_single_[% batche.label_count %].xml -

- Card batch number [% batche.batch_id %] -

- label_batch_[% batche.batch_id %].pdf -

- label_batch_[% batche.batch_id %].csv -

- label_batch_[% batche.batch_id %].xml -

- -

- [% ELSE %] -

- [% IF ( label_ids ) %] - Exporting [% label_count %] cards(s). - [% ELSIF ( item_numbers ) %] - Exporting [% item_count %] cards(s). - [% ELSE %] - [% multi_batch_count %] batch(es) to export. - [% END %] -

- - - [% FOREACH batch_id IN batch_ids %] - - [% END %] - [% FOREACH label_id IN label_ids %] - - [% END %] - [% FOREACH item_number IN item_numbers %] - - [% END %] -

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

- Select a template to be applied: -	- -
- Select a layout to be applied: -	- -
- Enter starting card number: -	- -

- - -

- [% END %] -

- [% INCLUDE 'intranet-bottom.inc' %] diff --git a/patroncards/card-print.pl b/patroncards/card-print.pl deleted file mode 100755 index 6f2970a72c..0000000000 --- a/patroncards/card-print.pl +++ /dev/null @@ -1,131 +0,0 @@ -#!/usr/bin/perl -# -# Copyright 2009 Foundations Bible College. -# -# 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 3 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, see . - -use strict; -use warnings; - -use CGI qw ( -utf8 ); -use Data::Dumper; - -use C4::Auth qw(get_template_and_user); -use C4::Output qw(output_html_with_http_headers); -use C4::Creators; -use C4::Labels; - -my $cgi = new CGI; -my ( $template, $loggedinuser, $cookie ) = get_template_and_user( - { - template_name => "patroncards/card-print.tt", - query => $cgi, - type => "intranet", - authnotrequired => 0, - flagsrequired => { catalogue => 1 }, - debug => 1, - } -); - -my $op = $cgi->param('op') || 'none'; -my @label_ids = $cgi->param('label_id') if $cgi->param('label_id'); # this will handle individual label printing -my @batch_ids = $cgi->param('batch_id') if $cgi->param('batch_id'); -my $layout_id = $cgi->param('layout_id') || undef; -my $template_id = $cgi->param('template_id') || undef; -my $start_label = $cgi->param('start_label') || 1; -my @item_numbers = $cgi->param('item_number') if $cgi->param('item_number'); -my $output_format = $cgi->param('output_format') || 'pdf'; -my $referer = $cgi->param('referer') || undef; - -my $layouts = undef; -my $templates = undef; -my $label_output_formats = undef; -my @batches = (); -my $multi_batch_count = scalar(@batch_ids); -my $label_count = scalar(@label_ids); -my $item_count = scalar(@item_numbers); - -if ($op eq 'export') { - if (@label_ids) { - my $label_id_param = '&label_id='; - $label_id_param .= join ('&label_id=',@label_ids); - push (@batches, {create_script => ($output_format eq 'pdf' ? 'label-create-pdf.pl' : 'label-create-csv.pl'), - batch_id => $batch_ids[0], - template_id => $template_id, - layout_id => $layout_id, - start_label => $start_label, - label_ids => $label_id_param, - label_count => scalar(@label_ids), - }); - $template->param( - batches => \@batches, - referer => $referer, - ); - } - elsif (@item_numbers) { - my $item_number_param = '&item_number='; - $item_number_param .= join ('&item_number=',@item_numbers); - push (@batches, {create_script => ($output_format eq 'pdf' ? 'label-create-pdf.pl' : 'label-create-csv.pl'), - template_id => $template_id, - layout_id => $layout_id, - start_label => $start_label, - item_numbers => $item_number_param, - label_count => scalar(@item_numbers), - }); - $template->param( - batches => \@batches, - referer => $referer, - ); - } - elsif (@batch_ids) { - foreach my $batch_id (@batch_ids) { - push (@batches, {create_script => ($output_format eq 'pdf' ? 'label-create-pdf.pl' : 'label-create-csv.pl'), - batch_id => $batch_id, - template_id => $template_id, - layout_id => $layout_id, - start_label => $start_label, - }); - } - $template->param( - batches => \@batches, - referer => $referer, - ); - } -} -elsif ($op eq 'none') { - # setup select menus for selecting layout and template for this run... - $referer = $ENV{'HTTP_REFERER'}; - $referer =~ s/^.*?:\/\/.*?(\/.*)$/$1/m; - @batch_ids = grep{$_ = {batch_id => $_}} @batch_ids; - @label_ids = grep{$_ = {label_id => $_}} @label_ids; - @item_numbers = grep{$_ = {item_number => $_}} @item_numbers; - $templates = get_all_templates(field_list => 'template_id, template_code'); - $layouts = get_all_layouts(field_list => 'layout_id, layout_name'); - $label_output_formats = get_label_output_formats(); - $template->param( - batch_ids => \@batch_ids, - label_ids => \@label_ids, - item_numbers => \@item_numbers, - templates => $templates, - layouts => $layouts, - label_output_formats => $label_output_formats, - multi_batch_count => $multi_batch_count, - label_count => $label_count, - item_count => $item_count, - referer => $referer, - ); -} -output_html_with_http_headers $cgi, $cookie, $template->output; -- 2.39.2