Lines 1707-1712
sub PrepareItemrecordDisplay {
Link Here
|
1707 |
$defaultvalue = $defaultvalues->{ccode}; |
1707 |
$defaultvalue = $defaultvalues->{ccode}; |
1708 |
} |
1708 |
} |
1709 |
} |
1709 |
} |
|
|
1710 |
if ( ( $subfield->{kohafield} eq 'items.dateaccessioned' ) |
1711 |
&& !$itemrecord |
1712 |
&& $defaultvalues |
1713 |
&& $defaultvalues->{'dateaccessioned'} ) |
1714 |
{ |
1715 |
my $date = dt_from_string(); |
1716 |
$date = $date->ymd; |
1717 |
$defaultvalue = $date; |
1718 |
} |
1710 |
if ( $subfield->{authorised_value} ) { |
1719 |
if ( $subfield->{authorised_value} ) { |
1711 |
my @authorised_values; |
1720 |
my @authorised_values; |
1712 |
my %authorised_lib; |
1721 |
my %authorised_lib; |
1713 |
- |
|
|