View | Details | Raw Unified | Return to bug 11492
Collapse All | Expand All

(-)a/C4/Serials.pm (-1 / +1 lines)
Lines 1165-1171 sub ModSerialStatus { Link Here
1165 
                    WHERE  subscriptionid = ?";
 1165 
                    WHERE  subscriptionid = ?";
1166 
        $sth = $dbh->prepare($query);
 1166 
        $sth = $dbh->prepare($query);
1167 
        $sth->execute( $newlastvalue1, $newlastvalue2, $newlastvalue3, $newinnerloop1, $newinnerloop2, $newinnerloop3, $subscriptionid );
 1167 
        $sth->execute( $newlastvalue1, $newlastvalue2, $newlastvalue3, $newinnerloop1, $newinnerloop2, $newinnerloop3, $subscriptionid );
1168 
        NewIssue( $newserialseq, $subscriptionid, $subscription->{'biblionumber'}, 1, $nextpubdate, $nextpubdate, $publisheddatetext, $notes, $routingnotes );
 1168 
        NewIssue( $newserialseq, $subscriptionid, $subscription->{'biblionumber'}, 1, $nextpubdate, $nextpubdate, undef, $notes, $routingnotes );
1169 
        # check if an alert must be sent... (= a letter is defined & status became "arrived"
 1169 
        # check if an alert must be sent... (= a letter is defined & status became "arrived"
1170 
        if ( $subscription->{letter} && $status == ARRIVED && $oldstatus != ARRIVED ) {
 1170 
        if ( $subscription->{letter} && $status == ARRIVED && $oldstatus != ARRIVED ) {
1171 
            require C4::Letters;
 1171 
            require C4::Letters;
(-)a/serials/serials-collection.pl (-2 / +1 lines)
Lines 90-96 if($op eq 'gennext' && @subscriptionid){ Link Here
90 
             my $planneddate = $date_received_today ? dt_from_string : $nextpublisheddate;
 90 
             my $planneddate = $date_received_today ? dt_from_string : $nextpublisheddate;
91 
             ## Creating the new issue
 91 
             ## Creating the new issue
92 
             NewIssue( $newserialseq, $subscriptionid, $subscription->{'biblionumber'},
 92 
             NewIssue( $newserialseq, $subscriptionid, $subscription->{'biblionumber'},
93 
                     1, $planneddate, $nextpublisheddate, $issue->{publisheddatetext},
 93 
                     1, $planneddate, $nextpublisheddate, undef,
94 
                     $issue->{notes}, $issue->{routingnotes} );
 94 
                     $issue->{notes}, $issue->{routingnotes} );
95 

          95
          

        

        

          96
          
             ## Updating the subscription seq status

          96
          
             ## Updating the subscription seq status

        

            

              97
              
- 

              
              
            






  

  Return to bug 11492