Bryan, man, that worked like a champ. Thank you so much for suggesting it. I
like its clean-ness and efficiency.
If someone else is following this in the archives, here's the final version of
my code:
#Producer information and address.
#Another field 270 could also be used for Distributor
On Wednesday, August 03, 2005 12:31 PM, KEVIN ZEMBOWER wrote:
>I'd like to create a 270 field (I think) from this information. I'd like to
do something similar to this pseudo-code:
>my $mprod = MARC::Field->new('270', ' ', ' ',); #Base record
>$mprod = MARC::Field->update($mprod, a=>$ADP) if $ADP;
Jon, now I'm beginning to see the light. My problem with your suggestion:
$record = MARC::Record->new():
$field = MARC::Field->new('270','','',
a => $ADP,
b => $CTYP,
c => $STP);
$record->append_fields($field)
was tha
On Wed, 3 Aug 2005, KEVIN ZEMBOWER wrote:
I think that what I would like to do is something like this:
if ($ADP) {
my $madp = MARC::Field->new('270',' ', '4', a=>$ADP);
$marcrecord->append_fields($madp);
}
if ($CTPY)
my $mctpy = MARC::Field->new('270',' ', '4', b=>$CTPY);
$marcrecord->
Paul, thank you so much for your reply. Looking at my example again, I see I've
really botched it up. It should have been:
I have fields like these in my existing database:
ADP - Producer's address
CTYP - Producer's city
STP - Producer's state or province
etc.
Any or all of these could be missi
Jonathan, thanks for your suggestions. Sorry for my sloppy use of terminology.
You're right, I want to create a single MARC record for each item in my
collection, and each MARC record will have fields like 245 and 270.
I think that what I would like to do is something like this:
if ($ADP) {
m
On Wed, 3 Aug 2005, KEVIN ZEMBOWER wrote:
I'm a newbie trying to wrap my computer science mind around MARC
Don't know what you're using for learning marc, but you might want to keep
http://www.loc.gov/marc. Just remember it's based off of flat file
processing and your computer science mi
KEVIN ZEMBOWER a écrit :
My ultimate goal is to import them into Koha to manage the collection.
good goal ;-)
Can anyone help me out with a way of doing this efficiently? Thanks for your
advice and suggestions.
You should do this in 2 steps :
my $newRecord = MARC::Record->new(); #
I'm a newbie trying to wrap my computer science mind around MARC, and at the
same time write a program to translate a database of reproductive health
behavior change communication materials (i.e., posters to encourage condom use)
into MARC records. My ultimate goal is to import them into Koha to
