From: Bill Erickson <berick@esilibrary.com>
Date: Fri, 2 Aug 2013 14:39:29 +0000 (-0400)
Subject: LP1207396 Patron self-registration web form
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=4581aea2612214eaef08616e7fe0e0de46cc3a6d;p=evergreen%2Fequinox.git

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 d808bee7e8..b2265b1bc9 100644
--- 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 d82933d683..262fe40944 100644
--- 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 475f4def11..7e4c7ba244 100644
--- 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>