Lines 767-773
sub GetSerials {
Link Here
|
767 |
my $counter = 0; |
767 |
my $counter = 0; |
768 |
$count = 5 unless ($count); |
768 |
$count = 5 unless ($count); |
769 |
my @serials; |
769 |
my @serials; |
770 |
my $query = "SELECT serialid,serialseq, status, publisheddate, planneddate,notes, routingnotes |
770 |
my $query = "SELECT serialid,serialseq, status, publisheddate, planneddate,notes |
771 |
FROM serial |
771 |
FROM serial |
772 |
WHERE subscriptionid = ? AND status NOT IN (2, 4, 41, 42, 43, 44, 5) |
772 |
WHERE subscriptionid = ? AND status NOT IN (2, 4, 41, 42, 43, 44, 5) |
773 |
ORDER BY IF(publisheddate<>'0000-00-00',publisheddate,planneddate) DESC"; |
773 |
ORDER BY IF(publisheddate<>'0000-00-00',publisheddate,planneddate) DESC"; |
Lines 787-793
sub GetSerials {
Link Here
|
787 |
} |
787 |
} |
788 |
|
788 |
|
789 |
# OK, now add the last 5 issues arrives/missing |
789 |
# OK, now add the last 5 issues arrives/missing |
790 |
$query = "SELECT serialid,serialseq, status, planneddate, publisheddate,notes, routingnotes |
790 |
$query = "SELECT serialid,serialseq, status, planneddate, publisheddate,notes |
791 |
FROM serial |
791 |
FROM serial |
792 |
WHERE subscriptionid = ? |
792 |
WHERE subscriptionid = ? |
793 |
AND (status in (2, 4, 41, 42, 43, 44, 5)) |
793 |
AND (status in (2, 4, 41, 42, 43, 44, 5)) |
Lines 832-838
sub GetSerials2 {
Link Here
|
832 |
|
832 |
|
833 |
my $dbh = C4::Context->dbh; |
833 |
my $dbh = C4::Context->dbh; |
834 |
my $query = qq| |
834 |
my $query = qq| |
835 |
SELECT serialid,serialseq, status, planneddate, publisheddate,notes, routingnotes |
835 |
SELECT serialid,serialseq, status, planneddate, publisheddate,notes |
836 |
FROM serial |
836 |
FROM serial |
837 |
WHERE subscriptionid=$subscription AND status IN ($status) |
837 |
WHERE subscriptionid=$subscription AND status IN ($status) |
838 |
ORDER BY publisheddate,serialid DESC |
838 |
ORDER BY publisheddate,serialid DESC |