MARCEDIT-L Archives

October 2013

MARCEDIT-L@LISTSERV.GMU.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Terry Reese <[log in to unmask]>
Reply To:
MarcEdit support in technical and instructional matters <[log in to unmask]>
Date:
Mon, 28 Oct 2013 22:07:24 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (58 lines)
I'm not sure there was ever an example for how to do this.  In the
MarcEditor itself, there are built in functions to do this.  There is no
support for this in the script wizard but you can obviously write this
yourself -- something like:

If Mid(str_MARC, ,4) = "=245"  then
   arr_val = split(str_MARC, "$")
   for x=lbound(arr_val) to Ubound(arr_val)
         if mid(arr_val(x)="a" then
             arr_line = split(arr_val(x), " ")
             for y=lbound(arr_line) to Ubound(arr_line)
                   if y = 0 then
                        arr_line(y) = Mid(arr_line(y),1,1) +
Ucase(Mid(arr_line(y), 2,1)) + Mid(arr_line(y), 3)
                   else
                        arr_line(y) = Ucase(Mid(arr_line(y),1,1)) +
Mid(arr_line(y), 2)
                   end if
             next
             arr_val(x) = join(arr_line, " ")
          end if
   next


-tr 

-----Original Message-----
From: MarcEdit support in technical and instructional matters
[mailto:[log in to unmask]] On Behalf Of Kaiser, Don
Sent: Monday, October 28, 2013 6:08 PM
To: [log in to unmask]
Subject: [MARCEDIT-L] Uppercase 245 $a

I am trying to script the uppercasing of the 245$a in a file.  Actually I
want to make it as easy as possible for a person to run. I have found
"ucase" and the script wizard, but so far no success. The good news is that
dragging a .mrc file over the .vbs works great!

I found an old tutorial that is similar, but I probably need more of a basic
tutorial on scripts.  

If someone can point me to a resouce (sorry Terry but many of your Oregon
links are now invalid), that would be very helpful.

Thanks

________________________________________________________________________

This message comes to you via MARCEDIT-L, a Listserv(R) list for technical
and instructional support in MarcEdit.  If you wish to communicate directly
with the list owners, write to [log in to unmask] To
unsubscribe, send a message "SIGNOFF MARCEDIT-L" to
[log in to unmask]

________________________________________________________________________

This message comes to you via MARCEDIT-L, a Listserv(R) list for technical and instructional support in MarcEdit.  If you wish to communicate directly with the list owners, write to [log in to unmask] To unsubscribe, send a message "SIGNOFF MARCEDIT-L" to [log in to unmask]

ATOM RSS1 RSS2