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

(-)a/t/db_dependent/Circulation_Issuingrule.t (-9 / +15 lines)
Lines 129-135 my $sampleissuingrule1 = { Link Here
129
    renewalsallowed    => 0,
129
    renewalsallowed    => 0,
130
    firstremind        => 0,
130
    firstremind        => 0,
131
    itemtype           => 'BOOK',
131
    itemtype           => 'BOOK',
132
    categorycode       => $samplecat->{categorycode}
132
    categorycode       => $samplecat->{categorycode},
133
    maxsuspensiondays  => 0,
133
};
134
};
134
my $sampleissuingrule2 = {
135
my $sampleissuingrule2 = {
135
    branchcode         => $samplebranch2->{branchcode},
136
    branchcode         => $samplebranch2->{branchcode},
Lines 153-159 my $sampleissuingrule2 = { Link Here
153
    accountsent        => 'Null',
154
    accountsent        => 'Null',
154
    reservecharge      => 'Null',
155
    reservecharge      => 'Null',
155
    chargename         => 'Null',
156
    chargename         => 'Null',
156
    restrictedtype     => 'Null'
157
    restrictedtype     => 'Null',
158
    maxsuspensiondays  => 0,
157
};
159
};
158
my $sampleissuingrule3 = {
160
my $sampleissuingrule3 = {
159
    branchcode         => $samplebranch1->{branchcode},
161
    branchcode         => $samplebranch1->{branchcode},
Lines 177-183 my $sampleissuingrule3 = { Link Here
177
    accountsent        => 'Null',
179
    accountsent        => 'Null',
178
    reservecharge      => 'Null',
180
    reservecharge      => 'Null',
179
    chargename         => 'Null',
181
    chargename         => 'Null',
180
    restrictedtype     => 'Null'
182
    restrictedtype     => 'Null',
183
    maxsuspensiondays  => 0,
181
};
184
};
182
$query = 'INSERT INTO issuingrules (
185
$query = 'INSERT INTO issuingrules (
183
                branchcode,
186
                branchcode,
Lines 201-208 $query = 'INSERT INTO issuingrules ( Link Here
201
                accountsent,
204
                accountsent,
202
                reservecharge,
205
                reservecharge,
203
                chargename,
206
                chargename,
204
                restrictedtype
207
                restrictedtype,
205
                ) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)';
208
                maxsuspensiondays
209
                ) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)';
206
my $sth = $dbh->prepare($query);
210
my $sth = $dbh->prepare($query);
207
$sth->execute(
211
$sth->execute(
208
    $sampleissuingrule1->{branchcode},
212
    $sampleissuingrule1->{branchcode},
Lines 226-232 $sth->execute( Link Here
226
    $sampleissuingrule1->{accountsent},
230
    $sampleissuingrule1->{accountsent},
227
    $sampleissuingrule1->{reservecharge},
231
    $sampleissuingrule1->{reservecharge},
228
    $sampleissuingrule1->{chargename},
232
    $sampleissuingrule1->{chargename},
229
    $sampleissuingrule1->{restrictedtype}
233
    $sampleissuingrule1->{restrictedtype},
234
    $sampleissuingrule1->{maxsuspensiondays},
230
);
235
);
231
$sth->execute(
236
$sth->execute(
232
    $sampleissuingrule2->{branchcode},
237
    $sampleissuingrule2->{branchcode},
Lines 250-256 $sth->execute( Link Here
250
    $sampleissuingrule2->{accountsent},
255
    $sampleissuingrule2->{accountsent},
251
    $sampleissuingrule2->{reservecharge},
256
    $sampleissuingrule2->{reservecharge},
252
    $sampleissuingrule2->{chargename},
257
    $sampleissuingrule2->{chargename},
253
    $sampleissuingrule2->{restrictedtype}
258
    $sampleissuingrule2->{restrictedtype},
259
    $sampleissuingrule2->{maxsuspensiondays},
254
);
260
);
255
$sth->execute(
261
$sth->execute(
256
    $sampleissuingrule3->{branchcode},
262
    $sampleissuingrule3->{branchcode},
Lines 274-280 $sth->execute( Link Here
274
    $sampleissuingrule3->{accountsent},
280
    $sampleissuingrule3->{accountsent},
275
    $sampleissuingrule3->{reservecharge},
281
    $sampleissuingrule3->{reservecharge},
276
    $sampleissuingrule3->{chargename},
282
    $sampleissuingrule3->{chargename},
277
    $sampleissuingrule3->{restrictedtype}
283
    $sampleissuingrule3->{restrictedtype},
284
    $sampleissuingrule3->{maxsuspensiondays},
278
);
285
);
279
286
280
is_deeply(
287
is_deeply(
281
- 

Return to bug 12406