Creating a macro
On Connexion, under Tools, Macros, Manage
Opens a box allowing the creation of Local Macros. A macro must appear in a macro book. If you do not already have a Local macro book, create one.
Click New Book button to create new macro book. Type name into text box–Local is good.
Highlight the Local macro book, and click on New Macro button. Opens Macro Description box. Enter brief description, hit okay. Click Edit button, opens Macro Editor and Debugger. Write macro here or copy and paste existing macro.
Hit Save icon on toolbar when macro text complete.
To assign a shortcut key to the macro, under Tools, Keymaps.
Select Keymap File–Custom. Select Macro in Display Commands for Category. In Macro box on left, highlight the macro you wish to assign a key to. In Press New Shortcut Key box, type the shortcut key you want to assign to the macro.
If the shortcut key you have chosen is already assigned, that information will appear below the Shortcut Key Assigned to text. You will need to try a new shortcut key. If is it not assigned, click on Assign button, the shortcut key will appear in the Current Shortcut Keys box. Click Okay button.
More information on writing, debugging, etc of OCLC Macros is contained in Connexion Client Help from within Connexion.
ACQ-EXPORT Macro text
'MacroName:ACQ-EXPORT
'MacroDescription:Macro for inserting 950 ACQ-EXPORTED, export record, and close the record without saving the edit
sub main
dim CS as Object
Set CS = CreateObject("Connex.Client")
CS.GetWindowTitle -1, sTitle
bool = CS.AddFieldLine (999, "950 ACQ-EXPORTED")
bool = CS.Print
bool = CS.Export
bool = CS.CloseRecord (FALSE)
end sub
XPT_N
Description: XPT inserts XPT field set to N for MUB, exports record and closes
‘MacroName:XPT N
‘MacroDescription:XPT N MUB field
Sub Main
Dim CS As Object
Set CS = CreateObject(“Connex.Client”)
CS.GetWindowTitle -1, sTitle
bool = CS.AddFieldLine (999, “XPT ßa N ßb MUB”)
bool = CS.Export
bool = CS.CloseRecord (FALSE)
End Sub