January 2010 - Koha-devel - lists.koha-community.org

Koha and Subversion
by Richard Forristall 28 Jan '10

28 Jan '10

Has anyone setup subversion to manage their Koha modifications? I'm trying to create a subversion repository and get this error: Adding var/run/zebradb svn: Unknown or unversionable type for 'var/run/zebradb/authoritysocket' Thanks, Rick ------------------------------------------- Rick Forristall Programmer Analyst Goodwill of Central AZ 602.535.4078 -------------------------------------------

5 6

SQL for 856 tag in marc record
by David Schuster 27 Jan '10

27 Jan '10

Anyone have a suggestion on how to get at least a count of these 856's in the MARC record in my database? David Schuster -- View this message in context: http://old.nabble.com/SQL-for-856-tag-in-marc-record-tp27329118p27329118.ht… Sent from the Koha - Dev mailing list archive at Nabble.com.

5 6

Re: [Koha-devel] Error while adding authority
by Walid AZIZ 27 Jan '10

27 Jan '10

Thanks a lot but the problem does still exist : No _parse_* routine defined on this driver [XML::LibXML::SAX::Parser=HASH(0x885c408)] at /usr/share/perl5/XML/SAX/Base.pm line 2616. my /etc/perl/XML/SAX/ParserDetails.ini contains : [XML::LibXML::SAX::Parser] http://xml.org/sax/features/namespaces = 1 and ./misc/sax_parser_print.pl gives XML::LibXML::SAX::Parser=HASH(0x82267b8) In advance, great thanks Sincerely Walid Le 26 janv. 2010 à 09:49, LAURENT Henri-Damien a écrit : > Walid AZIZ a écrit : >> Hi, >> When we try to add a new authority, we have the following error : >> Koha error >> >> The following fatal error has occurred: >> >> No _parse_* routine defined on this driver (If it is a filter, remember to >> set the Parent property. If you call the parse() method, make sure to set a >> Source. You may want to call parse_uri, parse_string or parse_file instead.) >> [XML::SAX::Expat=HASH(0x87fb420)] at /usr/share/perl5/XML/SAX/Base.pm line >> 2616. >> > It is always the same old problem : SAX Parser is not correct. > Should be XML::LibXML::SAX::Parser > Try and edit a parserdetails.ini to force that. > > http://old.nabble.com/koha3%3A-XML%3A%3ALibXML%3A%3ASAX-instead-of-XML%3A%3… > Hopes that helps >> Apache Server version: Apache/2.2.9 (Debian) Server built: Aug 8 2008 >> 17:37:15 >> Koha 3.00.00.107 >> Koha DB 3.0000107 >> MySQL mysql Ver 14.12 Distrib 5.0.51a, for debian-linux-gnu (i486) using >> readline 5.2 >> OS Linux komak 2.6.25.4dedibox-r9-smp-x32 #1 SMP Tue May 20 15:28:05 CEST >> 2008 i686 GNU/Linux >> Perl 5.010000 >> >> Thanks for your help >> >

1 0

updatedatabase errors
by Colin Campbell 27 Jan '10

27 Jan '10

I've just been taking a database from 3.01.00.61 to 3.01.00.107. (That's HEAD prior to Galen's last big pile of patches to the current biblibre community 3.2. Enroute updatedatebase throws a lot of errors due to duplication, incorrect sequencing of updates etc. As the may be of interest elsewhere (I'm sure someone said they were looking at these problems) I've uploaded a branch to my github: git@github.com:colinsc/koha.git called dbupgrade3.2 which contains the changes I needed to make to get updatedatabase run error-free. Cheers Colin -- Colin Campbell Chief Software Engineer, PTFS Europe Limited Content Management and Library Solutions +44 (0) 208 366 1295 (phone) +44 (0) 7759 633626 (mobile) colin.campbell(a)ptfs-europe.com skype: colin_campbell2 http://www.ptfs-europe.com

4 5

Re: [Koha-devel] [PATCH] Custom Reports
by Kyle Hall 26 Jan '10

26 Jan '10

Hello All, I've written a new "Custom Reports" addition for Koha to allow Koha users to trade more complicated reports that cannot be represented in pure SQL. Here's how it works: Each report is downloaded as a .krz file. This filetype is just a zip file with a specific structure ( sort of like .deb is ). The structure is like so: report_dir / report.ini ( other report files ) Pretty simple, I should say. The report.ini file looks something like this: name=Access PA author=Kyle M Hall description=A Report of the data necessary to fill out the Access PA report form. start=access_pa/step1.pl When a report.krz file is uploaded into Koha, it is extracted to KOHA_ROOT/reports/custom_reports/ The custom_reports.pl script reads all the report.ini files it fines and generates the list of available reports dynamically. Please let me know what you think. I'm in the process of rewriting all my php-based reports in perl using this system. I've sent patches for the three I've done so far. The Access PA report is the only one too complicated to represent in pure SQL, but I like being able to have one query and to be able to select the library. I would suggest making all report forms use GET methods. That way, the reports can be cronned using a simple wget command. Please let me know what you think. Thanks, Kyle http://www.kylehall.info Information Technology Crawford County Federated Library System ( http://www.ccfls.org ) On Tue, Jan 26, 2010 at 8:32 AM, Kyle M Hall <kyle.m.hall(a)gmail.com> wrote: > --- > C4/Reports/Custom.pm | 138 ++++++++++++++++++++ > .../prog/en/modules/reports/custom_reports.tmpl | 58 ++++++++ > .../en/modules/reports/custom_reports_upload.tmpl | 66 ++++++++++ > .../prog/en/modules/reports/reports-home.tmpl | 5 + > reports/custom_reports.pl | 52 ++++++++ > reports/custom_reports_upload.pl | 89 +++++++++++++ > 6 files changed, 408 insertions(+), 0 deletions(-) > create mode 100644 C4/Reports/Custom.pm > create mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports.tmpl > create mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports_upload.tmpl > create mode 100755 reports/custom_reports.pl > create mode 100644 reports/custom_reports/empty > create mode 100755 reports/custom_reports_upload.pl > > diff --git a/C4/Reports/Custom.pm b/C4/Reports/Custom.pm > new file mode 100644 > index 0000000..add811c > --- /dev/null > +++ b/C4/Reports/Custom.pm > @@ -0,0 +1,138 @@ > +package C4::Reports::Custom; > + > +# Copyright 2010 Kyle Hall > +# > +# 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 Config::Simple; > + > +use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); > + > +use C4::Context; > +use C4::Output; > +use C4::Dates; > +use C4::Debug; > + > +BEGIN { > + # set the version for version checking > + $VERSION = 0.01; > + require Exporter; > + @ISA = qw(Exporter); > + @EXPORT = qw( > + GetReports > + ); > +} > + > +=head1 NAME > + > +C4::Reports::Custom - Module for loading and managing custom reports. > + > +=head1 SYNOPSIS > + > + use C4::Reports::Custom; > + > +=over 2 > + > +=cut > + > +=item GetReports() > + > +This will return a list of all the available reports > + > +Usage: my ( $reports_hasref, $reports_count ) = C4::Reports::Custom::GetReports(); > + > +=cut > + > +sub GetReports { > + my @reports_ini = _GetReportsIniFiles(); > + > + my @reports; > + foreach my $report_ini ( @reports_ini ) { > + my $ini_hashref = _ParseReportIni( $report_ini ); > + push( @reports, $ini_hashref ); > + } > + > + my $count = @reports; > + > + return ( \@reports, $count ); > +} > + > +=item _GetReportsIniFiles() > + > +This will return an array of all the ini files for the custom reports. > + > +=cut > + > +sub _GetReportsIniFiles { > + my $reports_dir = '/home/koha/kohaclone/reports/custom_reports/'; > + opendir(DIRHANDLE, $reports_dir); > + my @reports_dirs = readdir(DIRHANDLE); > + closedir(DIRHANDLE); > + > + my @reports; > + foreach my $report_dir ( @reports_dirs ) { > + > + my $report_path = $reports_dir . $report_dir; > + > + if ( -d $report_path ) { > + my $ini_path = $report_path . '/report.ini'; > + > + if ( -f $ini_path ) { > + push( @reports, $ini_path ); > + } > + > + } > + > + } > + > + return ( @reports ); > +} > + > +=item _ParseReportIni( $ini_path ) > + > +This will return a hasref of key/value pairs found in the ini file > + > +=cut > + > +sub _ParseReportIni { > + my ( $ini_path ) = @_; > + > + my $ini; > + > + open( INIFILE, '<', $ini_path ) or die("Could not open file $ini_path"); > + foreach my $line ( <INIFILE> ) { > + my ( $key, $value ); > + ( $key, $value ) = split(/=/, $line ); > + $ini->{$key} = $value; > + } > + > + return $ini; > +} > + > +1; > +__END__ > + > +=back > + > +=head1 AUTHOR > + > +Kyle M Hall <kyle.m.hall(a)gmail.com> > + > +=cut > diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports.tmpl > new file mode 100644 > index 0000000..a5db511 > --- /dev/null > +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports.tmpl > @@ -0,0 +1,58 @@ > + > +<title>Koha &rsaquo; Reports &rsaquo; Custom Reports </title> > + > + > +</head> > + > +<body> > + > + > + > +<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> > +&rsaquo; <a href="/cgi-bin/koha/reports/reports-home.pl">Reports</a> > +&rsaquo; <a href="/cgi-bin/koha/reports/custom_reports.pl">Custom Reports</a> > +</div> > + > +<div id="doc3" class="yui-t1"> > + <div id="bd"> > + <div id="yui-main"> > + <div class="yui-b"> > + <div class="details"> > + <h1>Custom Reports</h1> > + > +  > + <h2>No Custom Reports Exist.</h2> > + <p>Please upload one or more Koha Custom Reports files (.krz) before using.</p> > +  > + <table> > + <tr> > + <th>Name</th> > + <th>Description</th> > + <th>Run</th> > + </tr> > + > +  > + <tr> > + <td></td> > + <td></td> > + <td><a href="custom_reports/">Run Report</a></td> > + </tr> > +  > + </table> > +  > + </div> > + </div> > + </div> > + > + <div class="yui-b noprint"> > + <div id="navmenu"> > + <ul id="navmenulist"> > + <li><a href="custom_reports_upload.pl">Upload A Custom Report</a></li> > + </ul> > + </div> > + </div> > + </div> > +</div> > + > + > + > diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports_upload.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports_upload.tmpl > new file mode 100644 > index 0000000..30ff908 > --- /dev/null > +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/custom_reports_upload.tmpl > @@ -0,0 +1,66 @@ > + > +<title>Koha &rsaquo; Reports &rsaquo; Custom Reports &rsaquo; Upload Custom Report > + </title> > + > + > +</head> > + > +<body> > + > + > + > +<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> > +&rsaquo; <a href="/cgi-bin/koha/reports/reports-home.pl">Reports</a> > +&rsaquo; <a href="/cgi-bin/koha/reports/custom_reports.pl">Custom Reports</a> > +&rsaquo; Upload Custom Report > +</div> > + > +<div id="doc3" class="yui-t2"> > + <div id="bd"> > + <div id="yui-main"> > + <div class="yui-b"> > + <div class="yui-g"> > + <div class="yui-u first"> > + <h1>Upload Custom Report</h1> > +  > + <div class="dialog alert"> > +  > + <li><b>The upload file does not appear to be a krz file. The extention is not '.krz'.</b></li> > + <li><b>This script is not able to create/write to the necessary temporary directory.</b></li> > + <li><b>The upload file appears to be empty.</b></li> > + <li><b> failed to unpack.<br />Please verify the integrity of the zip file and retry.</b></li> > + <li><b>Cannot unpack file to the custom reports directory.<br />Please verify that the Apache user can write to the custom reports directory.</b></li> > + <li><b> An unknown error has occurred.<br />Please review the error log for more details.</b></li> > +  > + </div> > +  > + <form method="post" action="/cgi-bin/koha/reports/custom_reports_upload.pl" enctype="multipart/form-data"> > + <fieldset class="brief"> > + <div class="hint"><b>NOTE:</b> Only KRZ file format is supported.</div> > + <ol> > + <li> > + <label for="uploadfile">Select the file to upload: </label><input type="file" id="uploadfile" name="uploadfile" /> > + </li> > + </ol> > + </li></ol> > + </fieldset> > + <fieldset class="action"> > + <input type="hidden" name="op" value="Upload" /> > + <input type="submit" value="Upload" class="submit" /> > + </fieldset> > + </form> > + > + </div> > + </div> > + </div> > +</div> > +<div class="yui-b noprint"> > +<div id="navmenu"> > + <ul id="navmenulist"> > + <li><a href="/cgi-bin/koha/reports/custom_reports.pl">Custom Reports Home</a></li> > + </ul> > +</div> > + > +</div> > +</div> > + > diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/reports-home.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/reports-home.tmpl > index b2d8487..d97c8ef 100644 > --- a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/reports-home.tmpl > +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/reports/reports-home.tmpl > @@ -27,6 +27,11 @@ > <li><a href="/cgi-bin/koha/reports/dictionary.pl?phase=View%20Dictionary">View Dictionary</a></li> > </ul> > > + <h2>Custom Reports</h2> > + <ul> > + <li><a href="/cgi-bin/koha/reports/custom_reports.pl">Custom Reports</a></li> > + </ul> > + > <h2>Statistics wizards</h2> > <ul> > <li><a href="/cgi-bin/koha/reports/acquisitions_stats.pl">Acquisitions</a></li> > diff --git a/reports/custom_reports.pl b/reports/custom_reports.pl > new file mode 100755 > index 0000000..29e23a9 > --- /dev/null > +++ b/reports/custom_reports.pl > @@ -0,0 +1,52 @@ > +#!/usr/bin/perl > + > +# Copyright 2010 Kyle M Hall <kyle.m.hall(a)gmail.com> > +# > +# 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 C4::Reports::Custom; > +use C4::Auth; > +use C4::Output; > +use C4::Dates; > +use C4::Debug; > + > +my $input = new CGI; > + > +my ( $template, $borrowernumber, $cookie ) = get_template_and_user( > + { > + template_name => "reports/custom_reports.tmpl", > + query => $input, > + type => "intranet", > + authnotrequired => 0, > + flagsrequired => { reports => "execute_reports" }, > + debug => 1, > + } > +); > + > +my ( $reports_loop, $reports_count ) = GetReports(); > + > +$template->param( REPORTS_LOOP => $reports_loop ); > + > +unless ( $reports_count ) { > + $template->param( ERROR_NO_REPORTS => 1 ); > +} > + > +output_html_with_http_headers $input, $cookie, $template->output; > diff --git a/reports/custom_reports/empty b/reports/custom_reports/empty > new file mode 100644 > index 0000000..e69de29 > diff --git a/reports/custom_reports_upload.pl b/reports/custom_reports_upload.pl > new file mode 100755 > index 0000000..5bf98bf > --- /dev/null > +++ b/reports/custom_reports_upload.pl > @@ -0,0 +1,89 @@ > +#!/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 > + > +use strict; > +use warnings; > + > +use File::Temp; > +use File::Copy; > +use CGI; > +use GD; > + > +use C4::Context; > +use C4::Auth; > +use C4::Output; > +use C4::Members; > +use C4::Debug; > + > +my $input = new CGI; > + > +my ($template, $loggedinuser, $cookie) > + = get_template_and_user({template_name => "reports/custom_reports_upload.tmpl", > + query => $input, > + type => "intranet", > + authnotrequired => 0, > + flagsrequired => { reports => 'create_report'}, > + debug => 1, > + }); > + > +my $uploadfilename = $input->param('uploadfile'); > +my $uploadfile = $input->upload('uploadfile'); > +my $op = $input->param('op'); > + > +my ( $total, $handled, @counts, $tempfile, $tfh ); > + > +my %errors; > + > +if ( ($op eq 'Upload') && $uploadfile ) { > + my $custom_reports_dir = "/home/koha/kohaclone/reports/custom_reports/"; > + > + my $dirname = File::Temp::tempdir( CLEANUP => 1); > + $debug and warn "dirname = $dirname"; > + > + my $filesuffix = $1 if $uploadfilename =~ m/(\..+)$/i; > + ( $tfh, $tempfile ) = File::Temp::tempfile( SUFFIX => $filesuffix, UNLINK => 1 ); > + > + $debug and warn "tempfile = $tempfile"; > + > + $errors{'NOTKRZ'} = 1 if ( $uploadfilename !~ /\.krz$/i ); > + $errors{'NOWRITETEMP'} = 1 unless ( -w $dirname ); > + $errors{'NOWRITEREPORTS'} = 1 unless ( -w $custom_reports_dir ); > + $errors{'EMPTYUPLOAD'} = 1 unless ( length( $uploadfile ) > 0 ); > + > + if ( %errors ) { > + $template->param( ERRORS => [ \%errors ] ); > + } else { > + while ( <$uploadfile> ) { > + print $tfh $_; > + } > + close $tfh; > + unless (system("unzip $tempfile -d $custom_reports_dir") == 0) { > + $errors{'UZIPFAIL'} = $uploadfilename; > + $template->param( ERRORS => [ \%errors ] ); > + output_html_with_http_headers $input, $cookie, $template->output; > + exit; > + } > + } > +} elsif ( ($op eq 'Upload') && !$uploadfile ) { > + warn "Problem uploading file or no file uploaded."; > +} > + > +if ( $uploadfile && !%errors && !$template->param('ERRORS') ) { > + print $input->redirect ("/cgi-bin/koha/reports/custom_reports.pl"); > +} else { > + output_html_with_http_headers $input, $cookie, $template->output; > +} > -- > 1.5.6.5 > >

2 3

no success with build_browser_and_cloud.pl
by Rick Welykochy 26 Jan '10

26 Jan '10

Hi all, Anyone have experience with the tag cloud feature in Koha? We have a Koha 3.00.02 and another 3.00.04 install. When I run the build_browser_and_cloud.pl script, the tags table in the database remains empty. We wish to populate it with Subjects as found in MARC 650$a. cheers rick -- _________________________________ Rick Welykochy || Praxis Services Hofstadter's Law. "It always takes longer than you expect, even when you take into account Hofstadter's law."

2 4

CORRECTION: Re: February General IRC Meeting Re-scheduled
by Chris Nighswonger 26 Jan '10

26 Jan '10

The time for the General Meeting should be 1100 GMT. On Tue, Jan 26, 2010 at 8:27 AM, Chris Nighswonger <cnighswonger(a)foundations.edu> wrote: > Hi all, > > Please note that due to a scheduling conflict with the February 2, > 2010 Community Handover Meeting, the Koha General Meeting has been > re-scheduled to February 9, 2010 @ 1900 GMT. > > Kind Regards, > Chris >

2 1

February General IRC Meeting Re-scheduled
by Chris Nighswonger 26 Jan '10

26 Jan '10

Hi all, Please note that due to a scheduling conflict with the February 2, 2010 Community Handover Meeting, the Koha General Meeting has been re-scheduled to February 9, 2010 @ 1900 GMT. Kind Regards, Chris

1 0

Error while adding authority
by Walid AZIZ 26 Jan '10

26 Jan '10

Hi, When we try to add a new authority, we have the following error : Koha error The following fatal error has occurred: No _parse_* routine defined on this driver (If it is a filter, remember to set the Parent property. If you call the parse() method, make sure to set a Source. You may want to call parse_uri, parse_string or parse_file instead.) [XML::SAX::Expat=HASH(0x87fb420)] at /usr/share/perl5/XML/SAX/Base.pm line 2616. Apache Server version: Apache/2.2.9 (Debian) Server built: Aug 8 2008 17:37:15 Koha 3.00.00.107 Koha DB 3.0000107 MySQL mysql Ver 14.12 Distrib 5.0.51a, for debian-linux-gnu (i486) using readline 5.2 OS Linux komak 2.6.25.4dedibox-r9-smp-x32 #1 SMP Tue May 20 15:28:05 CEST 2008 i686 GNU/Linux Perl 5.010000 Thanks for your help

1 0

check-url.pl
by David Schuster 26 Jan '10

26 Jan '10

Has anyone configured and ran this utility in the misc folder? Looks like a cool tool but I don't know enough about perl to know what needs to be modified. I'll take it to my resident perl expert and have him interpret for me and maybe play with it. Just checking before I spend time on it. -- View this message in context: http://old.nabble.com/check-url.pl-tp27307963p27307963.html Sent from the Koha - Dev mailing list archive at Nabble.com.

4 3