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

(-)a/t/db_dependent/Circulation_Issuingrule.t (-2 / +8 lines)
Lines 116-121 my $sampleissuingrule1 = { Link Here
116
    finedays           => 0,
116
    finedays           => 0,
117
    lengthunit         => 'Null',
117
    lengthunit         => 'Null',
118
    renewalperiod      => 5,
118
    renewalperiod      => 5,
119
    norenewalbefore    => 6,
119
    issuelength        => 5,
120
    issuelength        => 5,
120
    chargeperiod       => 0,
121
    chargeperiod       => 0,
121
    rentaldiscount     => '2.000000',
122
    rentaldiscount     => '2.000000',
Lines 137-142 my $sampleissuingrule2 = { Link Here
137
    maxissueqty        => 2,
138
    maxissueqty        => 2,
138
    renewalsallowed    => 'Null',
139
    renewalsallowed    => 'Null',
139
    renewalperiod      => 2,
140
    renewalperiod      => 2,
141
    norenewalbefore    => 7,
140
    reservesallowed    => 'Null',
142
    reservesallowed    => 'Null',
141
    issuelength        => 2,
143
    issuelength        => 2,
142
    lengthunit         => 'Null',
144
    lengthunit         => 'Null',
Lines 160-165 my $sampleissuingrule3 = { Link Here
160
    maxissueqty        => 3,
162
    maxissueqty        => 3,
161
    renewalsallowed    => 'Null',
163
    renewalsallowed    => 'Null',
162
    renewalperiod      => 3,
164
    renewalperiod      => 3,
165
    norenewalbefore    => 8,
163
    reservesallowed    => 'Null',
166
    reservesallowed    => 'Null',
164
    issuelength        => 3,
167
    issuelength        => 3,
165
    lengthunit         => 'Null',
168
    lengthunit         => 'Null',
Lines 183-188 $query = 'INSERT INTO issuingrules ( Link Here
183
                maxissueqty,
186
                maxissueqty,
184
                renewalsallowed,
187
                renewalsallowed,
185
                renewalperiod,
188
                renewalperiod,
189
                norenewalbefore,
186
                reservesallowed,
190
                reservesallowed,
187
                issuelength,
191
                issuelength,
188
                lengthunit,
192
                lengthunit,
Lines 198-204 $query = 'INSERT INTO issuingrules ( Link Here
198
                reservecharge,
202
                reservecharge,
199
                chargename,
203
                chargename,
200
                restrictedtype
204
                restrictedtype
201
                ) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)';
205
                ) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)';
202
my $sth = $dbh->prepare($query);
206
my $sth = $dbh->prepare($query);
203
$sth->execute(
207
$sth->execute(
204
    $sampleissuingrule1->{branchcode},
208
    $sampleissuingrule1->{branchcode},
Lines 207-212 $sth->execute( Link Here
207
    $sampleissuingrule1->{maxissueqty},
211
    $sampleissuingrule1->{maxissueqty},
208
    $sampleissuingrule1->{renewalsallowed},
212
    $sampleissuingrule1->{renewalsallowed},
209
    $sampleissuingrule1->{renewalperiod},
213
    $sampleissuingrule1->{renewalperiod},
214
    $sampleissuingrule1->{norenewalbefore},
210
    $sampleissuingrule1->{reservesallowed},
215
    $sampleissuingrule1->{reservesallowed},
211
    $sampleissuingrule1->{issuelength},
216
    $sampleissuingrule1->{issuelength},
212
    $sampleissuingrule1->{lengthunit},
217
    $sampleissuingrule1->{lengthunit},
Lines 230-235 $sth->execute( Link Here
230
    $sampleissuingrule2->{maxissueqty},
235
    $sampleissuingrule2->{maxissueqty},
231
    $sampleissuingrule2->{renewalsallowed},
236
    $sampleissuingrule2->{renewalsallowed},
232
    $sampleissuingrule2->{renewalperiod},
237
    $sampleissuingrule2->{renewalperiod},
238
    $sampleissuingrule2->{norenewalbefore},
233
    $sampleissuingrule2->{reservesallowed},
239
    $sampleissuingrule2->{reservesallowed},
234
    $sampleissuingrule2->{issuelength},
240
    $sampleissuingrule2->{issuelength},
235
    $sampleissuingrule2->{lengthunit},
241
    $sampleissuingrule2->{lengthunit},
Lines 253-258 $sth->execute( Link Here
253
    $sampleissuingrule3->{maxissueqty},
259
    $sampleissuingrule3->{maxissueqty},
254
    $sampleissuingrule3->{renewalsallowed},
260
    $sampleissuingrule3->{renewalsallowed},
255
    $sampleissuingrule3->{renewalperiod},
261
    $sampleissuingrule3->{renewalperiod},
262
    $sampleissuingrule3->{norenewalbefore},
256
    $sampleissuingrule3->{reservesallowed},
263
    $sampleissuingrule3->{reservesallowed},
257
    $sampleissuingrule3->{issuelength},
264
    $sampleissuingrule3->{issuelength},
258
    $sampleissuingrule3->{lengthunit},
265
    $sampleissuingrule3->{lengthunit},
259
- 

Return to bug 7413