View | Details | Raw Unified | Return to bug 17855
Collapse All | Expand All

(-)a/installer/onboarding.pl (-5 / +13 lines)
Lines 45-50 use Koha::LibraryCategories; Link Here
45
use Koha::Database;
45
use Koha::Database;
46
use Koha::DateUtils;
46
use Koha::DateUtils;
47
use Koha::Patron::Categories;
47
use Koha::Patron::Categories;
48
use Koha::Patron::Category;
48
use Koha::Patron::HouseboundRole;
49
use Koha::Patron::HouseboundRole;
49
use Koha::Patron::HouseboundRoles;
50
use Koha::Patron::HouseboundRoles;
50
use Koha::Token;
51
use Koha::Token;
Lines 91-97 my $dbh = DBI->connect( Link Here
91
);
92
);
92
93
93
#Store the value of the template input name='op' in the variable $op so we can check if the user has pressed the button with the name="op" and value="finish" meaning the user has finished the onboarding tool.
94
#Store the value of the template input name='op' in the variable $op so we can check if the user has pressed the button with the name="op" and value="finish" meaning the user has finished the onboarding tool.
94
my $op = $input->param('op');
95
my $op = $input->param('op') || "";
95
$template->param( 'op' => $op );
96
$template->param( 'op' => $op );
96
97
97
if ( $op && $op eq 'finish' )
98
if ( $op && $op eq 'finish' )
Lines 241-248 elsif ( $step && $step == 2 ) { Link Here
241
    #Create a patron
242
    #Create a patron
242
}
243
}
243
elsif ( $step && $step == 3 ) {
244
elsif ( $step && $step == 3 ) {
244
    my $firstpassword  = $input->param('password');
245
    my $firstpassword  = $input->param('password') || "";
245
    my $secondpassword = $input->param('password2');
246
    my $secondpassword = $input->param('password2') || "";
246
247
247
248
248
    #Find all patron records in the database and hand them to the template
249
    #Find all patron records in the database and hand them to the template
Lines 280-285 elsif ( $step && $step == 3 ) { Link Here
280
    my $categories = Koha::Patron::Categories->search();
281
    my $categories = Koha::Patron::Categories->search();
281
    $template->param( 'categories' => $categories, );
282
    $template->param( 'categories' => $categories, );
282
283
284
285
286
283
#Incrementing the highest existing patron cardnumber to prevent duplicate cardnumber entry
287
#Incrementing the highest existing patron cardnumber to prevent duplicate cardnumber entry
284
    my $exisiting_cardnumber = my $sth_search =
288
    my $exisiting_cardnumber = my $sth_search =
285
      $dbh->prepare("SELECT MAX(cardnumber) FROM borrowers");
289
      $dbh->prepare("SELECT MAX(cardnumber) FROM borrowers");
Lines 378-385 elsif ( $step && $step == 3 ) { Link Here
378
            $newdata{userid}         = $input->param('userid');
382
            $newdata{userid}         = $input->param('userid');
379
            $newdata{password}       = $input->param('password');
383
            $newdata{password}       = $input->param('password');
380
            $newdata{password2}      = $input->param('password2');
384
            $newdata{password2}      = $input->param('password2');
381
            $newdata{dateexpiry}     = '12/10/2016';
382
            $newdata{privacy}        = "default";
385
            $newdata{privacy}        = "default";
386
            $newdata{address}        = "";
387
            $newdata{city}           = "";
388
389
#Determine the dateexpiry of the patron based on the patron category it is created from
390
            my $patron_category = Koha::Patron::Categories->find( $newdata{categorycode} );
391
            $newdata{dateexpiry} = $patron_category->get_expiry_date( $newdata{dateenrolled} );
383
392
384
#Hand the newdata hash to the AddMember subroutine in the C4::Members module and it creates a patron and hands back a borrowernumber which is being stored
393
#Hand the newdata hash to the AddMember subroutine in the C4::Members module and it creates a patron and hands back a borrowernumber which is being stored
385
            my $borrowernumber = &AddMember(%newdata);
394
            my $borrowernumber = &AddMember(%newdata);
386
- 

Return to bug 17855