Vielen Dank für die Info. Der Fehler war einfach: ich hatte db nicht gesetzt.
Mit nachfolgendem Skript bekomme ich nun einen String mit ID an das Room-Dokument übergeben. Das Equip-Dokument soll dort als Doc-Link anzeigen. Leider weiss ich nicht, wie ich aus der ID jetzt eine Dokumentenverknüpfung erzeuge. Wer kann helfen?
Anbei mein Skript
Sub Querysave(Source As Notesuidocument, Continue As Variant)
Dim s As New NotesSession
Dim db As NotesDatabase
Dim roomdoc As NotesDocument
Dim roomitem As NotesItem
Dim roomdocid As String
Dim equipdocid As String
Set db = s.CurrentDatabase
'auslesen der RoomDocID aus aktuellem Dokument
Set roomitem = source.Document.GetFirstItem("RoomDocID")
roomdocid = roomitem.Text
'auffinden der zughörigen Raumbuchung über RoomDocID
Set roomdoc = db.GetDocumentByUNID(roomdocid)
' auslesen der EquipDocID aus aktuellem Dokument
equipdocid = source.Document.UniversalID
'einfügen der EquipDocID in Raumbuchung
roomdoc.EquipDocID = equipdocid
'speichern der Raumbuchung
Call roomdoc.Save(True, True)
End Sub