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

(-)a/C4/Stats.pm (-7 / +7 lines)
Lines 118-130 sub UpdateStats { Link Here
118
# get the parameters
118
# get the parameters
119
    my $branch            = $params->{branch};
119
    my $branch            = $params->{branch};
120
    my $type              = $params->{type};
120
    my $type              = $params->{type};
121
    my $borrowernumber    = exists $params->{borrowernumber} ? $params->{borrowernumber} :'';
121
    my $borrowernumber    = exists $params->{borrowernumber} ? $params->{borrowernumber} : undef;
122
    my $itemnumber        = exists $params->{itemnumber}     ? $params->{itemnumber} :'';
122
    my $itemnumber        = exists $params->{itemnumber}     ? $params->{itemnumber} : undef;
123
    my $amount            = exists $params->{amount}         ? $params->{amount} :'';
123
    my $amount            = exists $params->{amount}         ? $params->{amount} : undef;
124
    my $other             = exists $params->{other}          ? $params->{other} :'';
124
    my $other             = exists $params->{other}          ? $params->{other} : undef;
125
    my $itemtype          = exists $params->{itemtype}       ? $params->{itemtype} :'';
125
    my $itemtype          = exists $params->{itemtype}       ? $params->{itemtype} : undef;
126
    my $accountno         = exists $params->{accountno}      ? $params->{accountno} :'';
126
    my $accountno         = exists $params->{accountno}      ? $params->{accountno} : undef;
127
    my $ccode             = exists $params->{ccode}          ? $params->{ccode} :'';
127
    my $ccode             = exists $params->{ccode}          ? $params->{ccode} : undef;
128
128
129
    my $dbh = C4::Context->dbh;
129
    my $dbh = C4::Context->dbh;
130
    my $sth = $dbh->prepare(
130
    my $sth = $dbh->prepare(
(-)a/t/db_dependent/Circulation/issue.t (-13 / +16 lines)
Lines 118-134 Koha::Library->new($samplebranch2)->store; Link Here
118
my $samplecat = {
118
my $samplecat = {
119
    categorycode          => 'CAT1',
119
    categorycode          => 'CAT1',
120
    description           => 'Description1',
120
    description           => 'Description1',
121
    enrolmentperiod       => 'Null',
121
    enrolmentperiod       => undef,
122
    enrolmentperioddate   => 'Null',
122
    enrolmentperioddate   => undef,
123
    dateofbirthrequired   => 'Null',
123
    dateofbirthrequired   => undef,
124
    finetype              => 'Null',
124
    finetype              => undef,
125
    bulk                  => 'Null',
125
    bulk                  => undef,
126
    enrolmentfee          => 'Null',
126
    enrolmentfee          => undef,
127
    overduenoticerequired => 'Null',
127
    overduenoticerequired => undef,
128
    issuelimit            => 'Null',
128
    issuelimit            => undef,
129
    reservefee            => 'Null',
129
    reservefee            => undef,
130
    hidelostitems         => 0,
130
    hidelostitems         => 0,
131
    category_type         => 'Null'
131
    category_type         => 'A',
132
};
132
};
133
my $query =
133
my $query =
134
"INSERT INTO categories (categorycode,description,enrolmentperiod,enrolmentperioddate,dateofbirthrequired ,finetype,bulk,enrolmentfee,overduenoticerequired,issuelimit ,reservefee ,hidelostitems ,category_type) VALUES( ?,?,?,?,?,?,?,?,?,?,?,?,?)";
134
"INSERT INTO categories (categorycode,description,enrolmentperiod,enrolmentperioddate,dateofbirthrequired ,finetype,bulk,enrolmentfee,overduenoticerequired,issuelimit ,reservefee ,hidelostitems ,category_type) VALUES( ?,?,?,?,?,?,?,?,?,?,?,?,?)";
Lines 179-192 my $item_id2 = $sampleitem2[2]; Link Here
179
#Add borrower
179
#Add borrower
180
my $borrower_id1 = C4::Members::AddMember(
180
my $borrower_id1 = C4::Members::AddMember(
181
    firstname    => 'firstname1',
181
    firstname    => 'firstname1',
182
    surname      => 'surname1 ',
182
    surname      => 'surname1',
183
    address      => 'address 1',
184
    city         => 'city 1',
183
    categorycode => $samplecat->{categorycode},
185
    categorycode => $samplecat->{categorycode},
184
    branchcode   => $samplebranch1->{branchcode},
186
    branchcode   => $samplebranch1->{branchcode},
185
);
187
);
186
my $borrower_1 = C4::Members::GetMember(borrowernumber => $borrower_id1);
188
my $borrower_1 = C4::Members::GetMember(borrowernumber => $borrower_id1);
187
my $borrower_id2 = C4::Members::AddMember(
189
my $borrower_id2 = C4::Members::AddMember(
188
    firstname    => 'firstname2',
190
    firstname    => 'firstname2',
189
    surname      => 'surname2 ',
191
    surname      => 'surname2',
192
    address      => 'address 2',
193
    city         => 'city 2',
190
    categorycode => $samplecat->{categorycode},
194
    categorycode => $samplecat->{categorycode},
191
    branchcode   => $samplebranch2->{branchcode},
195
    branchcode   => $samplebranch2->{branchcode},
192
);
196
);
193
- 

Return to bug 14803