|
Lines 1630-1637
sub PrepareItemrecordDisplay {
Link Here
|
| 1630 |
$defaultvalue = $defaultvalues->{callnumber}; |
1630 |
$defaultvalue = $defaultvalues->{callnumber}; |
| 1631 |
} |
1631 |
} |
| 1632 |
} |
1632 |
} |
| 1633 |
|
1633 |
if ( ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.holdingbranch' || $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.homebranch' ) |
| 1634 |
if ( ( $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.holdingbranch' || $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.homebranch' ) |
|
|
| 1635 |
&& $defaultvalues |
1634 |
&& $defaultvalues |
| 1636 |
&& $defaultvalues->{'branchcode'} ) { |
1635 |
&& $defaultvalues->{'branchcode'} ) { |
| 1637 |
if ( $itemrecord and $defaultvalues and not $itemrecord->subfield($tag,$subfield) ) { |
1636 |
if ( $itemrecord and $defaultvalues and not $itemrecord->subfield($tag,$subfield) ) { |
|
Lines 1650-1658
sub PrepareItemrecordDisplay {
Link Here
|
| 1650 |
$defaultvalue = $defaultvalues->{location}; |
1649 |
$defaultvalue = $defaultvalues->{location}; |
| 1651 |
} |
1650 |
} |
| 1652 |
} |
1651 |
} |
| 1653 |
#Set the default items.price from the aqorders.unitprice |
1652 |
#Set the default items.price from the aq order budgeted price |
| 1654 |
if ( $lastOrder->{unitprice} && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.price' ) { |
1653 |
if ( $lastOrder->{ecost} && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.price' ) { |
| 1655 |
$defaultvalue = $lastOrder->{unitprice}; |
1654 |
$defaultvalue = $lastOrder->{ecost}; |
| 1656 |
} |
1655 |
} |
| 1657 |
#Set the default items.replacementprice from the aqorders.replacementprice |
1656 |
#Set the default items.replacementprice from the aqorders.replacementprice |
| 1658 |
if ( $lastOrder->{replacementprice} && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.replacementprice' ) { |
1657 |
if ( $lastOrder->{replacementprice} && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.replacementprice' ) { |
|
Lines 1692-1700
sub PrepareItemrecordDisplay {
Link Here
|
| 1692 |
} |
1691 |
} |
| 1693 |
} |
1692 |
} |
| 1694 |
|
1693 |
|
| 1695 |
$defaultvalue = C4::Context->userenv ? C4::Context->userenv->{branch} : undef; |
|
|
| 1696 |
if ( $defaultvalues and $defaultvalues->{branchcode} ) { |
1694 |
if ( $defaultvalues and $defaultvalues->{branchcode} ) { |
| 1697 |
$defaultvalue = $defaultvalues->{branchcode}; |
1695 |
$defaultvalue = C4::Context->userenv ? C4::Context->userenv->{branch} : $defaultvalues->{branchcode}; |
| 1698 |
} |
1696 |
} |
| 1699 |
|
1697 |
|
| 1700 |
#----- itemtypes |
1698 |
#----- itemtypes |