Added "noissuescharge" parameter

diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm
index 3a4ca3a..a37751d 100755 (executable)
--- a/C4/Circulation/Circ2.pm
+++ b/C4/Circulation/Circ2.pm
@@ -1133,8 +1133,9 @@ sub patronflags {
        my $amount = checkaccount($env, $patroninformation->{'borrowernumber'}, $dbh);
        if ($amount > 0) {
                my %flaginfo;
+               my $noissuescharge = C4::Context->preference("noissuescharge");
                $flaginfo{'message'}= sprintf "Patron owes \$%.02f", $amount;
-               if ($amount > 5) {
+               if ($amount > $noissuescharge) {
                $flaginfo{'noissues'} = 1;
                }
                $flags{'CHARGES'} = \%flaginfo;

diff --git a/koha-tmpl/intranet-tmpl/default/en/circ/returns.tmpl b/koha-tmpl/intranet-tmpl/default/en/circ/returns.tmpl
index 770a581..59f0d5d 100644 (file)
--- a/koha-tmpl/intranet-tmpl/default/en/circ/returns.tmpl
+++ b/koha-tmpl/intranet-tmpl/default/en/circ/returns.tmpl
@@ -66,7 +66,7 @@ to be picked up by <TMPL_VAR Name="name"> (<a href=/cgi-bin/koha/moremember.pl?b
                                <input type=hidden name=bn-<TMPL_VAR Name="counter"> value=<TMPL_VAR Name="bornum">>
                        </TMPL_LOOP>
                        <input type=hidden name=itemnumber value=<TMPL_VAR Name="itemnumber">>
-                       <input type=hidden name=borrowernumber value=<TMPL_VAR Name="borrowernumber">>
+                       <input type=hidden name=borrowernumber value=<TMPL_VAR Name="bornum">>
                        <input type=hidden name=resbarcode value=<TMPL_VAR Name="barcode">>
                        <input type=hidden name=resslip value="~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Date: <TMPL_VAR Name="today">
@@ -167,7 +167,7 @@ Phone: <TMPL_VAR Name="borphone">
                        <TMPL_LOOP Name="flagloop">
                                <tr><td valign=top><TMPL_IF Name="redfont"><font color="red"></TMPL_IF><TMPL_VAR Name="flag"><TMPL_IF Name="redfont"></font></TMPL_IF></td>
                                <TMPL_IF Name="charges">
-                                       <td bgcolor=<TMPL_VAR Name="color">><b><TMPL_VAR Name="msg"></b><a href=/cgi-bin/koha/pay.pl?bornum=<TMPL_VAR Name="borrowernumber"> onClick="openWindow(this, 'Payment', 480,640)">Payment</a></td></tr>
+                                       <td bgcolor=<TMPL_VAR Name="color">><b><TMPL_VAR Name="msg"></b><a href=/cgi-bin/koha/pay.pl?bornum=<TMPL_VAR Name="bornum"> onClick="openWindow(this, 'Payment', 480,640)">Payment</a></td></tr>
                                </TMPL_IF>
                                <TMPL_IF Name="waiting">
                                        <td bgcolor=<TMPL_VAR Name="color">>

diff --git a/updater/updatedatabase b/updater/updatedatabase
index 6a74470..2a6790b 100755 (executable)
--- a/updater/updatedatabase
+++ b/updater/updatedatabase
@@ -449,6 +449,13 @@ my %tabledata = (
         },
         {
             uniquefieldrequired => 'variable',
+            variable            => 'noissuescharge',
+            value               => '5',
+            explanation         =>
+            'maximum amount withstanding to be able to check out an item '
+        },
+        {
+            uniquefieldrequired => 'variable',
             variable            => 'KohaAdminEmailAddress',
             value               => 'your.mail@here',
             explanation => 'the email adress where borrowers modifs are sent'
@@ -771,6 +778,9 @@ $sth->finish;
 exit;
 
 # $Log$
+# Revision 1.46  2003/05/08 12:48:24  wolfpac444
+# Added "noissuescharge" parameter
+#
 # Revision 1.45  2003/05/08 12:26:16  wolfpac444
 # Bug fixes
 #