I've been working on code to produce a CIP (P-CIP in my case) block from a
MARC record, using a very literal translation of Visual Basic code into
Perl. Currently, it should be able to produce the datablock, but does not
yet insert line breaks/formatting. The module is currently tailored for
QBI's PCIP, but if I have a chance, I may post some of the code to my site
this weekend.
Example of input and output:
MARC (MARCMaker format provided for readability):
=LDR 00880nam 22002898a 4500
=001 qbi02200951\
=002 006bb
=003 IOrQBI\\
=005 20030103071854.0
=008 021205s2003\\\\iluabf\\\b\\\\001\0deng\d
=010 \\$a 2001999999
=020 \\$a1999999649
=037 \\$a$bQBI
=040 \\$aIOrQBI$cIOrQBI
=999 \\$aPCIP for QBI Web pages
=050 \4$aBF575.H27$bS65 2002
=082 04$a158.1$221
=100 1\$aSmith, Rob$q(Robert Bobbie Bob),$d1966-
=245 14$aThe library, the phonebook, and the philosophical origins of
happiness /$cby Rob Smith and Bob Jones.
=250 \\$a1st ed.
=263 \\$a03--
=300 \\$ap. cm.
=504 \\$aIncludes bibliographical references and index.
=650 \0$aHappiness.
=650 \0$aLibraries$xPsychological aspects.
=650 \0$aTelephone$vDirectories$xPsychological aspects.
=700 1\$aJones, Bob$q(Bob Robert Rob),$d1981-
becomes:
Smith, Rob (Robert Bobbie Bob), 1966-
The library, the phonebook, and the philosophical origins of happiness /
by Rob Smith and Bob Jones. -- 1st ed.
p. cm.
Includes bibliographical references and index.
LCCN 2001999999
ISBN 1-9999996-4-9
1. Happiness. 2. Libraries--Psychological aspects. 3.
Telephone--Directories--Psychological aspects. I. Jones, Bob (Bob Robert
Rob), 1981- II. Title.
BF575.H27S65 2002
158.1--dc21
qbi02200951
--
Bryan Baldus
[EMAIL PROTECTED]
http://home.inwave.com/eija
