|
Lines 234-239
sub GetSerialInformation {
Link Here
|
| 234 |
$data->{'subscriptionexpired'} = HasSubscriptionExpired( $data->{'subscriptionid'} ) && $data->{'status'} == 1; |
234 |
$data->{'subscriptionexpired'} = HasSubscriptionExpired( $data->{'subscriptionid'} ) && $data->{'status'} == 1; |
| 235 |
$data->{'abouttoexpire'} = abouttoexpire( $data->{'subscriptionid'} ); |
235 |
$data->{'abouttoexpire'} = abouttoexpire( $data->{'subscriptionid'} ); |
| 236 |
$data->{cannotedit} = not can_edit_subscription( $data ); |
236 |
$data->{cannotedit} = not can_edit_subscription( $data ); |
|
|
237 |
|
| 238 |
# dealing with number pattern that uses publication date |
| 239 |
if ( !defined($data->{numberpattern}) && defined($data->{pubdatepatternformat}) ){ |
| 240 |
my $pubdatepatternformat = $data->{pubdatepatternformat}; |
| 241 |
if ( $pubdatepatternformat eq 'dmy' ){ |
| 242 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%d %B %Y'); |
| 243 |
} elsif ( $pubdatepatternformat eq 'mdy' ){ |
| 244 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%B %d %Y'); |
| 245 |
} elsif ( $pubdatepatternformat eq 'ydm' ){ |
| 246 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%Y %d %B'); |
| 247 |
} else { |
| 248 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%Y %B %d'); |
| 249 |
} |
| 250 |
} |
| 251 |
|
| 237 |
return $data; |
252 |
return $data; |
| 238 |
} |
253 |
} |
| 239 |
|
254 |
|
| 240 |
- |
|
|