Lines 110-119
$sth->execute();
Link Here
|
110 |
while ( my $issue = $sth->fetchrow_hashref ) { |
110 |
while ( my $issue = $sth->fetchrow_hashref ) { |
111 |
|
111 |
|
112 |
my $subscription = &GetSubscription( $issue->{subscriptionid} ); |
112 |
my $subscription = &GetSubscription( $issue->{subscriptionid} ); |
113 |
my $planneddate = $issue->{planneddate}; |
113 |
my $publisheddate = $issue->{publisheddate}; |
114 |
|
114 |
|
115 |
if ( $subscription && $planneddate && $planneddate ne "0000-00-00" ) { |
115 |
if ( $subscription && $publisheddate && $publisheddate ne "0000-00-00" ) { |
116 |
my $nextpublisheddate = GetNextDate( $planneddate, $subscription ); |
116 |
my $nextpublisheddate = GetNextDate( $subscription, $publisheddate ); |
117 |
my $today = format_date_in_iso( C4::Dates->new()->output() ); |
117 |
my $today = format_date_in_iso( C4::Dates->new()->output() ); |
118 |
|
118 |
|
119 |
if ( $nextpublisheddate && $today ) { |
119 |
if ( $nextpublisheddate && $today ) { |
120 |
- |
|
|