From 7ebbc8311d7308d39e8d08c8ba4ce8a11e98a854 Mon Sep 17 00:00:00 2001
From: amillar <amillar>
Date: Thu, 23 May 2002 22:59:37 +0000
Subject: [PATCH] Added "lccn" and "marc" fields to newbiblioitem

---
 C4/Acquisitions.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/C4/Acquisitions.pm b/C4/Acquisitions.pm
index fa22e409ae..4e5b2a9bcf 100644
--- a/C4/Acquisitions.pm
+++ b/C4/Acquisitions.pm
@@ -642,6 +642,8 @@ sub newbiblioitem {
   $biblioitem->{'notes'}           = $dbh->quote($biblioitem->{'notes'});
   $biblioitem->{'size'}            = $dbh->quote($biblioitem->{'size'});
   $biblioitem->{'place'}           = $dbh->quote($biblioitem->{'place'});
+  $biblioitem->{'lccn'}            = $dbh->quote($biblioitem->{'lccn'});
+  $biblioitem->{'marc'}            = $dbh->quote($biblioitem->{'marc'});
   
   $sth->execute;
   $data       = $sth->fetchrow_arrayref;
@@ -669,6 +671,8 @@ illus		 = $biblioitem->{'illus'},
 pages		 = $biblioitem->{'pages'},
 notes		 = $biblioitem->{'notes'},
 size		 = $biblioitem->{'size'},
+lccn		 = $biblioitem->{'lccn'},
+marc		 = $biblioitem->{'marc'},
 place		 = $biblioitem->{'place'}";
 
   $sth = $dbh->prepare($query);
-- 
2.39.5