From b920b7739f1f58568f0d0f5b7906b747ee507017 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 2 Mar 2021 15:25:29 +0100
Subject: [PATCH] added old inventory number (copynumber) and statuses:
 withdrawn, itemlost, dameged

---
 intranet/cgi-bin/fer/inventura.pl | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/intranet/cgi-bin/fer/inventura.pl b/intranet/cgi-bin/fer/inventura.pl
index 6d88bb4..458ca1c 100755
--- a/intranet/cgi-bin/fer/inventura.pl
+++ b/intranet/cgi-bin/fer/inventura.pl
@@ -75,10 +75,14 @@ if ( $barcode ) {
 		biblioitems.editionstatement,
 		biblio.copyrightdate,
 		items.stocknumber,
+		items.copynumber,
 		items.itemcallnumber,
 		items.barcode,
 		items.homebranch,
-		items.location
+		items.location,
+		items.withdrawn,
+		items.itemlost,
+		items.damaged
 	from items
 	join biblio on items.biblionumber = biblio.biblionumber
 	join biblioitems on items.biblionumber = biblioitems.biblionumber
@@ -100,10 +104,14 @@ autor: $row->{author}<br>
 izdavač: $row->{publishercode}<br>
 izdanje: $row->{editionstatement}<br>
 godina izdanja: $row->{copyrightdate}<br>
-inventarni broj: $row->{stocknumber}<br>
+inventarni broj novi: $row->{stocknumber}<br>
+inventarni broj stari: $row->{copynumber}<br>
 signatura: $row->{itemcallnumber}<br>
 stalna lokacija: $row->{homebranch}<br>
 lokacija na polici: $row->{location}<br>
+status otpisano: $row->{withdrawn}<br>
+status izgubljeno: $row->{itemlost}<br>
+status uništeno: $row->{damaged}<br>
 			|;
 
 			my $sth_update = $dbh->prepare(qq{
-- 
2.20.1