Ok, hab ich.
Set statusmail = db.createdocument
Set rtitem = statusmail.createrichtextitem("body")
Call rtitem.appenddoclink(uiws.currentdocument.document, "Vorgang", "Zum Vorgang")
Call statusmail.Save(True,False)
statusmail.subjekt = "Erhebung"
statusmail.body = "Ihr Vorgang wurde in die " & Inhalt & " erhoben."
absender_var = doc.fieldgettext("Absender")
Call statusmail.send(False, absender_var)
Vorgabeansicht hab ich auch. Der DocLink is immer noch nicht in der Mail...