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

(-)a/C4/Items.pm (+10 lines)
Lines 535-540 sub ModItem { Link Here
535
535
536
    $item->{onloan} = undef if $item->{itemlost};
536
    $item->{onloan} = undef if $item->{itemlost};
537
537
538
    for my $field ( qw( itemlost wthdrawn ) ) {
539
        if ( defined( $item->{$field} ) ) {
540
            if ( $item->{$field} ) {
541
                $item->{$field . '_on'} = DateTime::Format::MySQL->format_datetime( DateTime->now() );
542
            } else {
543
                $item->{$field . '_on'} = undef;
544
            }
545
        }
546
    }
547
538
    _set_derived_columns_for_mod($item);
548
    _set_derived_columns_for_mod($item);
539
    _do_column_fixes_for_mod($item);
549
    _do_column_fixes_for_mod($item);
540
    # FIXME add checks
550
    # FIXME add checks
(-)a/installer/data/mysql/kohastructure.sql (+2 lines)
Lines 1046-1052 CREATE TABLE `items` ( -- holdings/item information Link Here
1046
  `notforloan` tinyint(1) NOT NULL default 0, -- authorized value defining why this item is not for loan (MARC21 952$7)
1046
  `notforloan` tinyint(1) NOT NULL default 0, -- authorized value defining why this item is not for loan (MARC21 952$7)
1047
  `damaged` tinyint(1) NOT NULL default 0, -- authorized value defining this item as damaged (MARC21 952$4)
1047
  `damaged` tinyint(1) NOT NULL default 0, -- authorized value defining this item as damaged (MARC21 952$4)
1048
  `itemlost` tinyint(1) NOT NULL default 0, -- authorized value defining this item as lost (MARC21 952$1)
1048
  `itemlost` tinyint(1) NOT NULL default 0, -- authorized value defining this item as lost (MARC21 952$1)
1049
  `itemlost_on` datetime DEFAULT NULL, -- the date and time an item was last marked as lost, NULL if not lost
1049
  `wthdrawn` tinyint(1) NOT NULL default 0, -- authorized value defining this item as withdrawn (MARC21 952$0)
1050
  `wthdrawn` tinyint(1) NOT NULL default 0, -- authorized value defining this item as withdrawn (MARC21 952$0)
1051
  `wthdrawn_on` datetime DEFAULT NULL, -- the date and time an item was last marked as withdrawn, NULL if not withdrawn
1050
  `itemcallnumber` varchar(255) default NULL, -- call number for this item (MARC21 952$o)
1052
  `itemcallnumber` varchar(255) default NULL, -- call number for this item (MARC21 952$o)
1051
  `coded_location_qualifier` varchar(10) default NULL, -- coded location qualifier(MARC21 952$f)
1053
  `coded_location_qualifier` varchar(10) default NULL, -- coded location qualifier(MARC21 952$f)
1052
  `issues` smallint(6) default NULL, -- number of times this item has been checked out/issued
1054
  `issues` smallint(6) default NULL, -- number of times this item has been checked out/issued
(-)a/installer/data/mysql/updatedatabase.pl (+9 lines)
Lines 6476-6481 if ( CheckVersion($DBversion) ) { Link Here
6476
    SetVersion($DBversion);
6476
    SetVersion($DBversion);
6477
}
6477
}
6478
6478
6479
$DBversion = "3.11.00.XXX";
6480
if ( CheckVersion($DBversion) ) {
6481
   $dbh->do("ALTER TABLE items ADD itemlost_on DATETIME NULL AFTER itemlost");
6482
   $dbh->do("ALTER TABLE items ADD wthdrawn_on DATETIME NULL AFTER wthdrawn");
6483
   $dbh->do("ALTER TABLE deleteditems ADD itemlost_on DATETIME NULL AFTER itemlost");
6484
   $dbh->do("ALTER TABLE deleteditems ADD wthdrawn_on DATETIME NULL AFTER wthdrawn");
6485
   print "Upgrade to $DBversion done (Bug 9673 - Track when items are marked as lost or withdrawn)\n";
6486
   SetVersion ($DBversion);
6487
}
6479
6488
6480
=head1 FUNCTIONS
6489
=head1 FUNCTIONS
6481
6490
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/moredetail.tt (-1 / +2 lines)
Lines 116-121 Link Here
116
                         
116
                         
117
                    [% END %]
117
                    [% END %]
118
                </li>
118
                </li>
119
                [% IF ITEM_DAT.itemlost_on %]<li><span class="label">Lost on:</span>[% ITEM_DAT.itemlost_on | $KohaDates %] &nbsp;</li>[% END %]
119
            [% END %]
120
            [% END %]
120
            [% IF ( ITEM_DAT.itemdamagedloop ) %]
121
            [% IF ( ITEM_DAT.itemdamagedloop ) %]
121
            <li><span class="label">Damaged status:</span>
122
            <li><span class="label">Damaged status:</span>
Lines 165-170 Link Here
165
                    </form>
166
                    </form>
166
                [% END %]
167
                [% END %]
167
            </li>
168
            </li>
169
            [% IF ITEM_DAT.wthdrawn_on %]<li><span class="label">Withdrawn on:</span>[% ITEM_DAT.wthdrawn_on | $KohaDates %] &nbsp;</li>[% END %]
168
            </ol></div>
170
            </ol></div>
169
            <div class="listgroup"><h4>History</h4>
171
            <div class="listgroup"><h4>History</h4>
170
            <ol class="bibliodetails">
172
            <ol class="bibliodetails">
171
- 

Return to bug 9673