X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=admin%2Fitemtypes.pl;h=1bfad90762e334980cd5e250022c44693dd00f36;hb=e20270fec4f6d34f01050bea4c5765d5b3c4ed33;hp=3219da340ebe4a23bf56a8c632b4da5b8e562597;hpb=700249eb3cbf765a5a731effd21ba543b74eb334;p=koha-ffzg.git diff --git a/admin/itemtypes.pl b/admin/itemtypes.pl index 3219da340e..1bfad90762 100755 --- a/admin/itemtypes.pl +++ b/admin/itemtypes.pl @@ -42,7 +42,7 @@ written 20/02/2002 by paul.poulain@free.fr use strict; #use warnings; FIXME - Bug 2505 -use CGI; +use CGI qw ( -utf8 ); use List::Util qw/min/; use File::Spec; @@ -73,11 +73,11 @@ my $op = $input->param('op'); $searchfield =~ s/\,//g; my ( $template, $borrowernumber, $cookie ) = get_template_and_user( { - template_name => "admin/itemtypes.tmpl", + template_name => "admin/itemtypes.tt", query => $input, type => "intranet", authnotrequired => 0, - flagsrequired => { parameters => 1 }, + flagsrequired => { parameters => 'parameters_remaining_permissions' }, debug => 1, } ); @@ -91,6 +91,9 @@ if ($op) { my $dbh = C4::Context->dbh; +my $sip_media_type = $input->param('sip_media_type'); +undef($sip_media_type) if defined($sip_media_type) and $sip_media_type =~ /^\s*$/; + ################## ADD_FORM ################################## # called by default. Used to create form to add or modify a record if ( $op eq 'add_form' ) { @@ -117,8 +120,11 @@ if ( $op eq 'add_form' ) { imageurl => $data->{'imageurl'}, template => C4::Context->preference('template'), summary => $data->{summary}, + checkinmsg => $data->{'checkinmsg'}, + checkinmsgtype => $data->{'checkinmsgtype'}, imagesets => $imagesets, remote_image => $remote_image, + sip_media_type => $data->{sip_media_type}, ); # END $OP eq ADD_FORM @@ -141,6 +147,9 @@ elsif ( $op eq 'add_validate' ) { , notforloan = ? , imageurl = ? , summary = ? + , checkinmsg = ? + , checkinmsgtype = ? + , sip_media_type = ? WHERE itemtype = ? '; $sth = $dbh->prepare($query2); @@ -156,15 +165,18 @@ elsif ( $op eq 'add_validate' ) { ) ), $input->param('summary'), + $input->param('checkinmsg'), + $input->param('checkinmsgtype'), + $sip_media_type, $input->param('itemtype') ); } else { # add a new itemtype & not modif an old my $query = " INSERT INTO itemtypes - (itemtype,description,rentalcharge, notforloan, imageurl,summary) + (itemtype,description,rentalcharge, notforloan, imageurl, summary, checkinmsg, checkinmsgtype, sip_media_type) VALUES - (?,?,?,?,?,?); + (?,?,?,?,?,?,?,?,?); "; my $sth = $dbh->prepare($query); my $image = $input->param('image'); @@ -177,6 +189,9 @@ elsif ( $op eq 'add_validate' ) { $image eq 'remoteImage' ? $input->param('remoteImage') : $image, $input->param('summary'), + $input->param('checkinmsg'), + $input->param('checkinmsgtype'), + $sip_media_type, ); } @@ -192,7 +207,7 @@ elsif ( $op eq 'delete_confirm' ) { my $sth = $dbh->prepare(' SELECT COUNT(*) AS total FROM ( SELECT itemtype AS t FROM biblioitems - UNION + UNION ALL SELECT itype AS t FROM items ) AS tmp WHERE tmp.t=?