|
Lines 212-224
$subscription = {
Link Here
|
| 212 |
}; |
212 |
}; |
| 213 |
$publisheddate = $subscription->{firstacquidate}; |
213 |
$publisheddate = $subscription->{firstacquidate}; |
| 214 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
214 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 215 |
is($publisheddate, '1970-01-03'); |
215 |
is($publisheddate, '1970-01-04'); |
| 216 |
# when more than 1 issue per week, date is automatically set to the same day of |
|
|
| 217 |
# week as firstacquidate |
| 218 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
216 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 219 |
is($publisheddate, '1970-01-08'); |
217 |
is($publisheddate, '1970-01-08'); |
| 220 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
218 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 221 |
is($publisheddate, '1970-01-10'); |
219 |
is($publisheddate, '1970-01-11'); |
| 222 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
220 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 223 |
is($publisheddate, '1970-01-15'); |
221 |
is($publisheddate, '1970-01-15'); |
| 224 |
|
222 |
|
|
Lines 231-243
$subscription = {
Link Here
|
| 231 |
}; |
229 |
}; |
| 232 |
$publisheddate = $subscription->{firstacquidate}; |
230 |
$publisheddate = $subscription->{firstacquidate}; |
| 233 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
231 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 234 |
is($publisheddate, '1970-01-03'); |
232 |
is($publisheddate, '1970-01-04'); |
| 235 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
233 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 236 |
is($publisheddate, '1970-01-10'); |
234 |
is($publisheddate, '1970-01-11'); |
| 237 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
235 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 238 |
is($publisheddate, '1970-01-22'); |
236 |
is($publisheddate, '1970-01-22'); |
| 239 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
237 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 240 |
is($publisheddate, '1970-01-24'); |
238 |
is($publisheddate, '1970-01-25'); |
| 241 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
239 |
$publisheddate = GetNextDate($subscription, $publisheddate); |
| 242 |
is($publisheddate, '1970-01-29'); |
240 |
is($publisheddate, '1970-01-29'); |
| 243 |
|
241 |
|
| 244 |
- |
|
|