Index: APPS/common/Document/impl/DocBase/DocumentVerwerker/PDFMailer.cls.xml
===================================================================
diff -u -r67392 -r67401
--- APPS/common/Document/impl/DocBase/DocumentVerwerker/PDFMailer.cls.xml	(.../PDFMailer.cls.xml)	(revision 67392)
+++ APPS/common/Document/impl/DocBase/DocumentVerwerker/PDFMailer.cls.xml	(.../PDFMailer.cls.xml)	(revision 67401)
@@ -41,6 +41,7 @@
 	Set DataStream=""   ; Unswizzle CacheStream after being copied into the TaskDoc 
 	
 	Set Status = Task.AddActionMail(DocBaseMailParams.Aan, DocBaseMailParams.Subject, DocBaseMailParams.Body, DocBaseMailParams.From, DocBaseMailParams.CC, DocBaseMailParams.BCC)
+	Set Task.ActionMail.Attachments = DocBaseDocument.Bladen.GetAt(1).Naam_".pdf"
 	Do ..ControleerStatus(Status,"AddActionMail niet gelukt.")
 	
 	Quit Task