use strict;
use CGI;
use C4::Auth;
-use C4::Date;
+use C4::Dates qw/format_date format_date_in_iso/;
use C4::Output;
use C4::Context;
use C4::Serials;
my $query = new CGI;
-my $op = $query->param('op');
+my $op = $query->param('op') || q{};
my $dbh = C4::Context->dbh;
my $subscriptionid = $query->param('subscriptionid');
my $auser = $query->param('user');