Skip to Contents
Location: Home  Contains  OCLC Connexion macros  Contains  CoverTitle macro Properties
Document

CoverTitle macro

Version 7

View Properties

Title:CoverTitle macro
Summary:Converts phrase "Cover title" to "Title from cover." Last updated: 27 October 2006.
Description:
Keywords:
Handle: Document-22807
Owner: Nickeson, Walt (User-54, waltn:LibStaff)
Create Date:Thursday, August 10, 2006 04:05:55 PM EDT
Modified Date:Wednesday, January 30, 2008 12:06:52 PM EST
Modified By: Nickeson, Walt (User-54, waltn:LibStaff)
Expiration Date:
Locked By:
Abstract:
  • '*************************************************************** Option Explicit Sub Main Dim CS As Object Set CS = CreateObject("Connex.Client") Dim BoxLabel$ : BoxLabel$ = "Search for " & Chr$( 034 ) & "Cover title" & Chr$( 034 ) Dim BoxMessage$ : BoxMessage$ = Chr$( 034 ) & "Cover title" & Chr$( 034 ) & " note not found.
  • Add?" Dim Field$ Dim Answer% Dim Instance% : Instance% = 1 Dim TypeOfWindow% Dim Result : Result = TRUE ' First, make sure that a bibliographic record is displayed TypeOfWindow% = CS.ItemType Select Case TypeOfWindow% Case 0 To 2, 17, 19 GoTo Continue: Case Else MsgBox "This macro only works in a bibliographic record!", 48, "Macro cannot proceed" GoTo Done: End Select ...
Add Versions:Allowed
Author:
Content Type: Text Format (.txt) - text/plain
File name:CoverTitle.txt
Is Placeholder:
Max Versions:4
Size:2705
Ready for Declare:No
Appears In: OCLC Connexion macros
Preferred Version: CoverTitle macro