use C4::Dates qw/format_date format_date_in_iso/;
use C4::Debug;
use C4::Serials;
+use C4::Log;
use Date::Calc qw/Date_to_Days check_date/;
use Getopt::Long;
pod2usage(1) if $help;
pod2usage( -verbose => 2 ) if $man;
+cronlogaction();
+
$verbose and !$confirm and print "### Database will not be modified ###\n";
if ( $note && $nonote ) {
{
$confirm
and ModSerialStatus( $issue->{serialid}, $issue->{serialseq},
- $issue->{planneddate}, $issue->{publisheddate},
+ $issue->{planneddate}, $issue->{publisheddate}, $issue->{publisheddatetext},
3, $note );
$verbose
and print "Serial issue with id=" . $issue->{serialid} . " updated\n";