LP1207396 Patron self-registration web form

Signed-off-by: Bill Erickson <berick@esilibrary.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm
index d808bee..b2265b1 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm
@@ -5,6 +5,8 @@ use OpenSRF::Utils::Logger qw/$logger/;
 use OpenILS::Utils::Fieldmapper;
 use OpenILS::Application::AppUtils;
 use OpenILS::Event;
+use Data::Dumper;
+$Data::Dumper::Indent = 0;
 my $U = 'OpenILS::Application::AppUtils';
 
 sub load_patron_reg {
@@ -46,7 +48,7 @@ sub load_patron_reg {
 
     if (!$resp or ref $resp) {
 
-        $logger->warn("Patron self-reg failed ".($resp || ''));
+        $logger->warn("Patron self-reg failed ".Dumper($resp));
         $ctx->{register}{error} = 1;
 
     } else {

diff --git a/Open-ILS/src/templates/opac/parts/org_selector.tt2 b/Open-ILS/src/templates/opac/parts/org_selector.tt2
index d82933d..262fe40 100644 (file)
--- a/Open-ILS/src/templates/opac/parts/org_selector.tt2
+++ b/Open-ILS/src/templates/opac/parts/org_selector.tt2
@@ -2,6 +2,7 @@
 # Org Unit Selector Widget :
 #   INCLUDE build_org_selector id='selector-id' name='selector-name' 
 #       value=org_id show_loc_groups=1/0 can_have_vols_only=1/0
+#       can_have_users_only=1/0
 #
 # NOTE: DO NOT USE PROCESS
 # Use of PROCESS results in internal variables, such as value or org_unit, to "leak" out
@@ -90,6 +91,12 @@ BLOCK build_org_selector;
                 selected = 'selected="selected"';
             END; 
 
+            IF can_have_users_only AND org_unit.ou_type.can_have_users != 't';
+                disabled = 'disabled="disabled"';
+            ELSIF node_value == value;
+                selected = 'selected="selected"';
+            END; 
+
             pad_depth = 0;
 
             # copy loc groups appear as children of the owning org unit

diff --git a/Open-ILS/src/templates/opac/register.tt2 b/Open-ILS/src/templates/opac/register.tt2
index 475f4de..7e4c7ba 100644 (file)
--- a/Open-ILS/src/templates/opac/register.tt2
+++ b/Open-ILS/src/templates/opac/register.tt2
@@ -1,4 +1,5 @@
 [%- PROCESS "opac/parts/header.tt2";
+    PROCESS "opac/parts/org_selector.tt2";
     WRAPPER "opac/parts/base.tt2";
     INCLUDE "opac/parts/topnav.tt2";
     ctx.page_title = l("Request Library Card") %]
@@ -11,7 +12,7 @@
             [% IF ctx.register.success %]
                 <h2>[% |l %]
                 Registration successful!  Please see library staff to 
-                complete the registration.
+                complete your registration.
                 [% END %]</h2>
             [% ELSIF ctx.register.error %]
                 <h2>[% |l %]
@@ -23,6 +24,16 @@
                 <table>
                     <!-- TODO <label>s -->
                     <tr>
+                        <td>[% l('Home Library') %]</td>
+                        <td>[% INCLUDE build_org_selector 
+                                # TODO: limit to orgs where pending-allowed
+                                name='stgu.home_ou' 
+                                value=ctx.physical_loc || ctx.search_ou
+                                can_have_users_only=1
+                            %]
+                        </td>
+                    </tr>
+                    <tr>
                         <td>[% l('First Name') %]</td>
                         <td><input type='text' name='stgu.first_given_name'/></td>
                     </tr>