Lines 217-222
sub GetSerialInformation {
Link Here
|
217 |
$data->{'subscriptionexpired'} = HasSubscriptionExpired( $data->{'subscriptionid'} ) && $data->{'status'} == 1; |
217 |
$data->{'subscriptionexpired'} = HasSubscriptionExpired( $data->{'subscriptionid'} ) && $data->{'status'} == 1; |
218 |
$data->{'abouttoexpire'} = abouttoexpire( $data->{'subscriptionid'} ); |
218 |
$data->{'abouttoexpire'} = abouttoexpire( $data->{'subscriptionid'} ); |
219 |
$data->{cannotedit} = not can_edit_subscription( $data ); |
219 |
$data->{cannotedit} = not can_edit_subscription( $data ); |
|
|
220 |
|
221 |
# dealing with number pattern that uses publication date |
222 |
if ( !defined($data->{numberpattern}) && defined($data->{pubdatepatternformat}) ){ |
223 |
my $pubdatepatternformat = $data->{pubdatepatternformat}; |
224 |
if ( $pubdatepatternformat eq 'dmy' ){ |
225 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%d %B %Y'); |
226 |
} elsif ( $pubdatepatternformat eq 'mdy' ){ |
227 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%B %d %Y'); |
228 |
} elsif ( $pubdatepatternformat eq 'ydm' ){ |
229 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%Y %d %B'); |
230 |
} else { |
231 |
$data->{serialseq} = dt_from_string( $data->{publisheddate} )->strftime('%Y %B %d'); |
232 |
} |
233 |
} |
234 |
|
220 |
return $data; |
235 |
return $data; |
221 |
} |
236 |
} |
222 |
|
237 |
|
223 |
- |
|
|