Lines 22-28
$dbh->{RaiseError} = 1;
Link Here
|
22 |
my %data = ( |
22 |
my %data = ( |
23 |
firstname => 'my firstname', |
23 |
firstname => 'my firstname', |
24 |
surname => 'my surname', |
24 |
surname => 'my surname', |
25 |
categorycode => 'UT', |
25 |
categorycode => 'PT', |
26 |
branchcode => 'UT', |
26 |
branchcode => 'UT', |
27 |
cardnumber => 'ilsdi-cardnumber', |
27 |
cardnumber => 'ilsdi-cardnumber', |
28 |
userid => 'ilsdi-userid', |
28 |
userid => 'ilsdi-userid', |
Lines 30-40
my %data = (
Link Here
|
30 |
); |
30 |
); |
31 |
|
31 |
|
32 |
# Crate patron category |
32 |
# Crate patron category |
33 |
unless ( GetBorrowercategory('UT') ) { |
33 |
unless ( GetBorrowercategory('PT') ) { |
34 |
$dbh->do("INSERT INTO categories |
34 |
$dbh->do("INSERT INTO categories |
35 |
(categorycode,description,enrolmentperiod,upperagelimit,enrolmentfee,overduenoticerequired,reservefee,category_type) |
35 |
(categorycode,description,enrolmentperiod,upperagelimit,enrolmentfee,overduenoticerequired,reservefee,category_type,default_privacy) |
36 |
VALUES |
36 |
VALUES |
37 |
('UT','Unit tester',99,99,0.000000,1,0.000000,'C');"); |
37 |
('PT','Unit tester',99,99,0.000000,1,0.000000,'C','default');"); |
38 |
} |
38 |
} |
39 |
|
39 |
|
40 |
# Create branch |
40 |
# Create branch |
41 |
- |
|
|