Du kannst einen Script Button machen, der das Gerätedokument erstellt und dann die Felder setzt. In etwa so:
dim ws as New NotesUIWorkspace
dim uidoc as NotesUIDocument
dim newuidoc as NotesUIDocument
dim doc as NotesDocument
dim newdoc as NotesDocument
set uidoc = ws.CurrentDocument
set doc = uidoc.Document
set newuidoc = ws.ComposeDocument("","";"<Gerätemaske>")
set newdoc = newuidoc.Document
newdoc.Kundennummer = doc.Kundennummer
call newuidoc.Reload
obwohl, dann würde es auch mit dem Vererben klappen!
Andreas