SELECT subscription.*,
branches.branchname,
subscriptionhistory.*,
+ subscriptionhistory.enddate as histenddate,
aqbudget.bookfundid,
aqbooksellers.name AS aqbooksellername,
biblio.title AS bibliotitle
while ( my $subs = $sth->fetchrow_hashref ) {
$subs->{startdate} = format_date( $subs->{startdate} );
$subs->{histstartdate} = format_date( $subs->{histstartdate} );
+ $subs->{histenddate} = format_date( $subs->{histenddate} );
$subs->{opacnote} =~ s/\n/\<br\/\>/g;
$subs->{missinglist} =~ s/\n/\<br\/\>/g;
$subs->{recievedlist} =~ s/\n/\<br\/\>/g;
<form method="post" name="f">
<!-- TMPL_LOOP name="subscription_LOOP" -->
<h2>Subscription information for <!-- TMPL_VAR name="bibliotitle" --></h2>
- <p>It began on <!-- TMPL_VAR name="startdate" --> and is issued every
-
+ <p>The current subscription began on <!-- TMPL_VAR name="startdate" --> and is issued every
<!--TMPL_IF name="periodicity1" -->
day
<!-- /TMPL_IF -->
<!--TMPL_IF name="periodicity11" -->
2 years
<!-- /TMPL_IF -->
-
- on
-
<!--TMPL_IF name="arrival1" -->
- Monday
+ on Monday
<!-- /TMPL_IF -->
<!--TMPL_IF name="arrival2" -->
- Tuesday
+ on Tuesday
<!-- /TMPL_IF -->
<!--TMPL_IF name="arrival3" -->
- Wednesday
+ on Wednesday
<!-- /TMPL_IF -->
<!--TMPL_IF name="arrival4" -->
- Thursday
+ on Thursday
<!-- /TMPL_IF -->
<!--TMPL_IF name="arrival5" -->
- Friday
+ on Friday
<!-- /TMPL_IF -->
<!--TMPL_IF name="arrival6" -->
- Saturday
+ on Saturday
<!-- /TMPL_IF -->
<!--TMPL_IF name="arrival7" -->
- Sunday
+ on Sunday
<!-- /TMPL_IF -->
for
<!-- TMPL_IF name="weeklength" --><!-- TMPL_VAR name="weeklength" --> weeks<!-- /TMPL_IF -->
<!-- TMPL_IF name="monthlength" --><!-- TMPL_VAR name="monthlength" --> months<!-- /TMPL_IF -->
- since <!-- TMPl_VAR name="startdate" -->
+ <p>The first subscription was started on <!-- TMPl_VAR name="histstartdate" --></p>
+ <!-- TMPL_IF name="histenddate" -->
+ <p>The subscription expired on <!-- TMPl_VAR name="histenddate" --></p>
+ <!-- /TMPL_IF -->
</p>
<h2><!-- TMPL_VAR name="branchcode" --> <!-- TMPL_VAR name="notes" --></h2>
<!-- TMPL_IF name="recievedlist" -->
foreach (@$subscriptions) {
my $subscription = getalert($loggedinuser,'issue',$_->{subscriptionid});
if (@$subscription[0]) {
- warn ">>>>>>>>> has alert : loggedinuser / ".$_->{subscriptionid};
$_->{hasalert} = 1;
}
}