[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-devel] CVS: koha/marc test,NONE,1.1

From: Steve Tonnesen
Subject: [Koha-devel] CVS: koha/marc test,NONE,1.1
Date: Tue Nov 6 10:25:07 2001

Update of /cvsroot/koha/koha/marc
In directory usw-pr-cvs1:/tmp/cvs-serv13206

Added Files:
Log Message:
Script that I'm using to check MARC record support.

--- NEW FILE ---

use C4::Database;
use C4::Catalogue;
use CGI;
use DBI;
#use strict;
use C4::Acquisitions;
use C4::Output;
my $userid=$ENV{'REMOTE_USER'};

my $dbh=C4Connect;

my $newschool=$ARGV[0];
($newschool) || ($newschool='SHE');


my $sth=$dbh->prepare("select * from items where barcode='1024'");
my $item=$sth->fetchrow_hashref();
print $item->{'homebranch'}."\n";
print $item->{'barcode'}."\n";
print $item->{'biblionumber'}."\n";
print $item->{'homebranch'}."\n";
updateItem($env, $item);

reply via email to

[Prev in Thread] Current Thread [Next in Thread]