my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{
- template_name => 'serials/serials-edit.tmpl',
+ template_name => 'serials/serials-edit.tt',
query => $query,
type => 'intranet',
authnotrequired => 0,
&& !$processedserialid{$serialid} )
{
my $serinfo = GetSerialInformation($serialid); #TODO duplicates work done by GetSerials2 above
+
for my $d ( qw( publisheddate planneddate )){
if ( $serinfo->{$d} =~m/^00/ ) {
$serinfo->{$d} = q{};
)
|| $serinfo->{'cannotedit'}
);
+ $serinfo->{editdisable} ||= ($serinfo->{status8} and $serinfo->{closed});
push @serialdatalist, $serinfo;
$processedserialid{$serialid} = 1;
}
if ( C4::Context->preference('autoBarcode') eq
'incremental' )
{
- if ( !$bib_record->field($barcodetagfield)
- ->subfield($barcodetagsubfield) )
+ if (
+ !(
+ $bib_record->field($barcodetagfield)
+ && $bib_record->field($barcodetagfield)->subfield($barcodetagsubfield)
+ )
+ )
{
my $sth_barcode = $dbh->prepare(
'select max(abs(barcode)) from items');