Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

  • From here you get this menu

  • Put the new macro in the OCLC group by clicking on the New Macro button

  • Name the new macro “Add949”

  • Name it “Add949” again

  • Edit the new macro

  • Select and delete all the default text

  • Copy this text and paste it into the blank macro

    Code Block
    'MacroName:Add949
    'MacroDescription:Add949
    
    Sub Main
    
       Dim CS As Object
       Set CS = GetObject(,"Connex.Client")
    
       CS.AddField 1, "949 1" & Chr(223) & "i  " & Chr(223) & "z  " & Chr(223) & "a "
       CS.AddField 1, "949  *recs=b;ov=.;dflt=[BibTemplate],[ItemTemplate];ins=[login];"
    
    End Sub
Info

Instructions on how these 949 fields work are on these pages

949 commands for controlling bib level fixed fields

MLN1 949 control field to create attached items to loaded records

MLN2 949 control field to create attached items to loaded records

  • Save the new macro and close the editor

...