[16/30] Patron Card Creator print interface and code
authorChris Nighswonger <cnighswonger@foundations.edu>
Thu, 19 Nov 2009 16:53:02 +0000 (11:53 -0500)
committerChris Nighswonger <cnighswonger@foundations.edu>
Mon, 11 Jan 2010 23:21:13 +0000 (18:21 -0500)
koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/print.tmpl [new file with mode: 0644]
patroncards/print.pl [new file with mode: 0755]

diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/print.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/print.tmpl
new file mode 100644 (file)
index 0000000..bd9e6c9
--- /dev/null
@@ -0,0 +1,135 @@
+    <!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->
+    <title>Koha &rsaquo; Tools &rsaquo; Patron Cards &rsaquo; Patron Card Printing/Exporting</title>
+    <!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->
+    <script type="text/JavaScript" language="JavaScript">
+        //<![CDATA[
+            function Done() {
+                window.location = "<!-- TMPL_VAR NAME="referer" -->";
+            };
+        //]]>
+    </script>
+    <style type="text/css">#custom-doc {width:47.23em; *width:46.04em; min-width:610px; margin:auto; margin-top:0.4em;}</style>
+    <style type="text/css">table {border-collapse: separate; border-spacing: 0; border: hidden none;} .header {cursor: auto; background-position: center center; background-repeat: repeat;} .tr {border-collapse: separate;}</style>
+</head>
+<body>
+    <div id="custom-doc" class="yui-t2">
+        <div id="bd">
+            <!-- TMPL_IF NAME="batches" -->
+            <form>
+                <div align="center">
+                    <div class="message">
+                        <b>Click on the following link(s) to download the exported batch(es).</b>
+                    </div>
+                </div>
+                <fieldset class="rows">
+                    <table class="borderless">
+                        <!-- TMPL_LOOP NAME="batches" -->
+                        <tr>
+                            <!-- TMPL_IF NAME="label_ids" -->
+                            <td class="borderless">
+                                <!-- TMPL_VAR NAME="card_count" --> Single Patron Cards
+                            </td>
+                            <td class="borderless">
+                                <h1 id="pdf">
+                                    <a href="/cgi-bin/koha/patroncards/<!-- TMPL_VAR NAME="create_script" -->?batch_id=<!-- TMPL_VAR NAME="batch_id" -->&amp;template_id=<!-- TMPL_VAR NAME="template_id" -->&amp;layout_id=<!-- TMPL_VAR NAME="layout_id" -->&amp;start_card=<!-- TMPL_VAR NAME="start_card" --><!-- TMPL_VAR NAME="label_ids" -->">label_single_<!-- TMPL_VAR NAME="card_count" -->.pdf</a>
+                                </h1>
+                            </td>
+                            <!-- TMPL_ELSIF NAME="borrower_numbers" -->
+                            <td class="borderless">
+                                <!-- TMPL_VAR NAME="card_count" --> Single Patron Cards
+                            </td>
+                            <td class="borderless">
+                                <h1 id="pdf">
+                                    <a href="/cgi-bin/koha/patroncards/<!-- TMPL_VAR NAME="create_script" -->?template_id=<!-- TMPL_VAR NAME="template_id" -->&amp;layout_id=<!-- TMPL_VAR NAME="layout_id" -->&amp;start_card=<!-- TMPL_VAR NAME="start_card" --><!-- TMPL_VAR NAME="borrower_numbers" -->">label_single_<!-- TMPL_VAR NAME="card_count" -->.pdf</a>
+                                </h1>
+                            </td>
+                            <!-- TMPL_ELSE -->
+                            <td class="borderless">
+                                Card Batch Number <!-- TMPL_VAR NAME="batch_id" -->
+                            </td>
+                            <td class="borderless">
+                                <h1 id="pdf">
+                                    <a href="/cgi-bin/koha/patroncards/create-pdf.pl?batch_id=<!-- TMPL_VAR NAME="batch_id" -->&amp;template_id=<!-- TMPL_VAR NAME="template_id" -->&amp;layout_id=<!-- TMPL_VAR NAME="layout_id" -->&amp;start_card=<!-- TMPL_VAR NAME="start_card" -->">label_batch_<!-- TMPL_VAR NAME="batch_id" -->.pdf</a>
+                                </h1>
+                            </td>
+                            <!-- /TMPL_IF -->
+                        </tr>
+                        <!-- /TMPL_LOOP -->
+                    </table>
+                </fieldset>
+                <fieldset class="action">
+                    <div style="margin: 10px 10px 10px 0px;">
+                        <span class="yui-button yui-link-button"><span class="first-child"><input type="button" id="done" onclick="parent.parent.GB_hide();" value="Done"></span></span>
+                    </div>
+                </fieldset>
+            </form>
+            <!-- TMPL_ELSE -->
+            <div align="center">
+                <div class="message">
+                    <!-- TMPL_IF NAME="label_ids" -->
+                    <b>Exporting <!-- TMPL_VAR NAME="card_count" --> patroncard(s).</b>
+                    <!-- TMPL_ELSIF NAME="borrower_numbers"-->
+                    <b>Exporting <!-- TMPL_VAR NAME="borrower_count" --> patroncard(s).</b>
+                    <!-- TMPL_ELSE -->
+                    <b><!-- TMPL_VAR NAME="multi_batch_count" --> batch(es) to export.</b>
+                    <!-- /TMPL_IF -->
+                </div>
+            </div>
+            <form name="exporting" method="post" action="/cgi-bin/koha/patroncards/print.pl">
+                <input type="hidden" name="op" value="export" />
+                <input type="hidden" name="referer" value="<!-- TMPL_VAR NAME="referer" -->" />
+                <!-- TMPL_LOOP NAME="batch_ids" -->
+                    <input type="hidden" name="batch_id" value="<!-- TMPL_VAR NAME="batch_id" -->" />
+                <!-- /TMPL_LOOP -->
+                <!-- TMPL_LOOP NAME="label_ids" -->
+                    <input type="hidden" name="label_id" value="<!-- TMPL_VAR NAME="label_id" -->" />
+                <!-- /TMPL_LOOP -->
+                <!-- TMPL_LOOP NAME="borrower_numbers" -->
+                    <input type="hidden" name="borrower_number" value="<!-- TMPL_VAR NAME="borrower_number" -->" />
+                <!-- /TMPL_LOOP -->
+                <fieldset class="rows">
+                    <table class="borderless">
+                        <tr>
+                            <td class="borderless">
+                                <label for="template">Select a template to be applied: </label>
+                            </td>
+                            <td class="borderless">
+                                <select name="template_id">
+                                    <!-- TMPL_LOOP NAME="templates" -->
+                                    <option value="<!-- TMPL_VAR NAME="template_id" -->"><!-- TMPL_VAR NAME="template_code"  --></option>
+                                    <!-- /TMPL_LOOP -->
+                                </select>
+                            </td>
+                        </tr>
+                        <tr>
+                            <td class="borderless">
+                                <label for="layout">Select a layout to be applied: </label>
+                            </td>
+                            <td class="borderless">
+                                <select name="layout_id">
+                                    <!-- TMPL_LOOP NAME="layouts" -->
+                                    <option value="<!-- TMPL_VAR NAME="layout_id" -->"><!-- TMPL_VAR NAME="layout_name"  --></option>
+                                    <!-- /TMPL_LOOP -->
+                                </select>
+                            </td>
+                        </tr>
+                        <tr>
+                            <td class="borderless">
+                                <label for="start_card">Enter starting card number: </label>
+                            </td>
+                            <td class="borderless">
+                                <input type="text" size="5" id="start_card" name="start_card" class="focus" title="Starting card number" value="1"/>
+                            </td>
+                        </tr>
+                    </table>
+                </fieldset>
+                <fieldset class="action">
+                    <div style="margin: 10px 10px 10px 0px;">
+                        <span class="yui-button yui-link-button"><span class="first-child"><input type="submit" value="Export" /></span></span>
+                        <span class="yui-button yui-link-button"><span class="first-child"><input type="button" id="done" onclick="parent.parent.GB_hide();" value="Cancel"></span></span>
+                    </div>
+                </fieldset>
+            </form>
+            <!-- /TMPL_IF -->
+        </div>
+    <!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->
diff --git a/patroncards/print.pl b/patroncards/print.pl
new file mode 100755 (executable)
index 0000000..31f78d1
--- /dev/null
@@ -0,0 +1,131 @@
+#!/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 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 warnings;
+
+use CGI;
+use autouse 'Data::Dumper' => qw(Dumper);
+
+use C4::Auth qw(get_template_and_user);
+use C4::Output qw(output_html_with_http_headers);
+use C4::Creators::Lib 1.000000 qw(get_all_templates get_all_layouts get_output_formats);
+use C4::Patroncards::Batch 1.000000;
+
+my $cgi = new CGI;
+my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
+    {
+        template_name   => "patroncards/print.tmpl",
+        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 card printing; we use label_id to maintain consistency with the column names in the creator_batches table
+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_card = $cgi->param('start_card') || 1;
+my @borrower_numbers = $cgi->param('borrower_number') if $cgi->param('borrower_number');
+my $output_format = $cgi->param('output_format') || 'pdf';
+my $referer = $cgi->param('referer') || undef;
+
+my $layouts = undef;
+my $templates = undef;
+my $output_formats = undef;
+my @batches = ();
+my $multi_batch_count = scalar(@batch_ids);
+my $card_count = scalar(@label_ids);
+my $borrower_count = scalar(@borrower_numbers);
+
+if ($op eq 'export') {
+    if (@label_ids) {
+        my $label_id_param = '&amp;label_id=';
+        $label_id_param .= join ('&amp;label_id=',@label_ids);
+        push (@batches, {create_script   => ($output_format eq 'pdf' ? 'create-pdf.pl' : 'create-csv.pl'),
+                         batch_id        => $batch_ids[0],
+                         template_id     => $template_id,
+                         layout_id       => $layout_id,
+                         start_card      => $start_card,
+                         label_ids       => $label_id_param,
+                         card_count      => scalar(@label_ids),
+                        });
+        $template->param(
+                        batches     => \@batches,
+                        referer     => $referer,
+                        );
+    }
+    elsif (@borrower_numbers) {
+        my $borrower_number_param = '&amp;borrower_number=';
+        $borrower_number_param .= join ('&amp;borrower_number=',@borrower_numbers);
+        push (@batches, {create_script   => ($output_format eq 'pdf' ? 'create-pdf.pl' : 'create-csv.pl'),
+                         template_id     => $template_id,
+                         layout_id       => $layout_id,
+                         start_card      => $start_card,
+                         borrower_numbers    => $borrower_number_param,
+                         card_count      => scalar(@borrower_numbers),
+                        });
+        $template->param(
+                        batches     => \@batches,
+                        referer     => $referer,
+                        );
+    }
+    elsif (@batch_ids) {
+        foreach my $batch_id (@batch_ids) {
+           push (@batches, {create_script   => ($output_format eq 'pdf' ? 'create-pdf.pl' : 'create-csv.pl'),
+                            batch_id        => $batch_id,
+                            template_id     => $template_id,
+                            layout_id       => $layout_id,
+                            start_card      => $start_card,
+                            });
+        }
+        $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;
+    @borrower_numbers = grep{$_ = {borrower_number => $_}} @borrower_numbers;
+    $templates = get_all_templates(field_list => 'template_id, template_code', filter => 'creator = "Patroncards"');
+    $layouts = get_all_layouts(field_list => 'layout_id, layout_name', filter => 'creator = "Patroncards"');
+    $output_formats = get_output_formats();
+    $template->param(
+                    batch_ids                   => \@batch_ids,
+                    label_ids                   => \@label_ids,
+                    borrower_numbers            => \@borrower_numbers,
+                    templates                   => $templates,
+                    layouts                     => $layouts,
+                    output_formats              => $output_formats,
+                    multi_batch_count           => $multi_batch_count,
+                    card_count                  => $card_count,
+                    borrower_count              => $borrower_count,
+                    referer                     => $referer,
+                    );
+}
+output_html_with_http_headers $cgi, $cookie, $template->output;