moved to "environment" instead of "env".
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 23 Jan 2006 17:37:14 +0000 (17:37 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 23 Jan 2006 17:37:14 +0000 (17:37 +0000)
moved patron_info stuff into environment
inserting objects read-only

git-svn-id: svn://svn.open-ils.org/ILS/trunk@2796 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/javascript/backend/circ/circ_permit.js
Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm

index c46600f..4038563 100644 (file)
@@ -3,25 +3,31 @@ function go() {
 /* load the lib script */
 load_lib('circ_lib.js');
 
+
+
+/* collect some useful variables */
+var standing   = patron.standing.value.toLowerCase();
+var profile            = patron.profile.name.toLowerCase();
+var status             = copy.status.name.toLowerCase();
+var itemsOut   = environment.patronItemsOut;
+var fines              = environment.patronFines;
+var isRenewal  = environment.isRenewal;
+
 log_debug('CIRC PERMIT: permit circ on ' +
        ' Copy: '                                       + copy.id + 
        ', Patron:'                                     + patron.id +
        ', Patron Username:'            + patron.usrname +
        ', Patron Profile: '            + patron.profile.name +
        ', Patron Standing: '   + patron.standing.value +
-       ', Patron copies: '             + patron_info.items_out +
+       ', Patron copies: '             + itemsOut +
        ', Patron Library: '            + patron.home_ou.name +
-       ', Patron fines: '              + patron_info.fines +
+       ', Patron fines: '              + fines +
        ', Copy status: '                       + copy.status.name +
        ', Copy location: '             + copy.location.name +
-       ', Is Renewal: '                        + ( (env.isRenewal) ? "yes" : "no" ) +
+       ', Is Renewal: '                        + ( (isRenewal) ? "yes" : "no" ) +
        '');
 
 
-/* collect some useful variables */
-var standing   = patron.standing.value.toLowerCase();
-var profile            = patron.profile.name.toLowerCase();
-var status             = copy.status.name.toLowerCase();
 
 if( standing != 'good' ) 
        return result.event = 'PATRON_BAD_STANDING';
@@ -38,10 +44,10 @@ if( status != 'available' && status != 'on holds shelf' )
 
 
 
-if( profile == 'patrons' && patron_info.items_out > 10 )
+if( profile == 'patrons' && itemsOut > 10 )
        return result.event = 'PATRON_EXCEEDS_CHECKOUT_COUNT';
 
-if( profile == 'staff' && patron_info.items_out > 30 )
+if( profile == 'staff' && itemsOut > 30 )
        return result.event = 'PATRON_EXCEEDS_CHECKOUT_COUNT';
 
 
index a97f8bf..69cde27 100644 (file)
@@ -186,21 +186,20 @@ sub _build_circ_script_runner {
                $runner->add_path( $_ );
        }
 
-       $runner->insert( 'patron',              $ctx->{patron} );
-       $runner->insert( 'title',               $ctx->{title} );
-       $runner->insert( 'copy',                $ctx->{copy} );
+       $runner->insert( 'patron',              $ctx->{patron}, 1);
+       $runner->insert( 'title',               $ctx->{title}, 1);
+       $runner->insert( 'copy',                $ctx->{copy}, 1);
 
        # circ script result
        $runner->insert( 'result', {} );
        $runner->insert( 'result.event', 'SUCCESS' );
 
-       $runner->insert('env', {});
-       $runner->insert('env.isRenewal', 1) if $ctx->{isrenew};
+       $runner->insert('environment', {}, 1);
+       $runner->insert('environment.isRenewal', 1) if $ctx->{isrenew};
 
        if(ref($ctx->{patron_circ_summary})) {
-               $runner->insert( 'patron_info', {} );
-               $runner->insert( 'patron_info.items_out', $ctx->{patron_circ_summary}->[0] );
-               $runner->insert( 'patron_info.fines', $ctx->{patron_circ_summary}->[1] );
+               $runner->insert( 'environment.patronItemsOut', $ctx->{patron_circ_summary}->[0], 1 );
+               $runner->insert( 'environment.patronFines', $ctx->{patron_circ_summary}->[1], 1 );
        }
 
        $ctx->{runner} = $runner;
@@ -218,7 +217,7 @@ sub _add_script_runner_methods {
                        my $key = shift;
                        my $hold = $holdcode->fetch_open_hold_by_current_copy($ctx->{copy}->id);
                        $hold = undef unless $hold;
-                       $runner->insert( $key, $hold );
+                       $runner->insert( $key, $hold, 1 );
                }
        );
 }