|
Lines 213-222
if ( $op and $op eq 'cud-serialchangestatus' ) {
Link Here
|
| 213 |
my ($plan_date, $pub_date); |
213 |
my ($plan_date, $pub_date); |
| 214 |
|
214 |
|
| 215 |
if (defined $planneddates[$i] && $planneddates[$i] ne 'XXX') { |
215 |
if (defined $planneddates[$i] && $planneddates[$i] ne 'XXX') { |
| 216 |
$plan_date = $planneddates[$i]; |
216 |
$plan_date = $planneddates[$i] || $today; |
| 217 |
} |
217 |
} |
| 218 |
if (defined $publisheddates[$i] && $publisheddates[$i] ne 'XXX') { |
218 |
if (defined $publisheddates[$i] && $publisheddates[$i] ne 'XXX') { |
| 219 |
$pub_date = $publisheddates[$i]; |
219 |
$pub_date = $publisheddates[$i] || $today; |
| 220 |
} |
220 |
} |
| 221 |
|
221 |
|
| 222 |
if ( $serialids[$i] && $serialids[$i] eq 'NEW' ) { |
222 |
if ( $serialids[$i] && $serialids[$i] eq 'NEW' ) { |
| 223 |
- |
|
|