What you are trying to do closely ressembles the Newsletter function (simple action).
Why don't you try that ?
If that is not enough, then look up this code :


dim session as new notessession
dim db as notesdatabase
dim view as notesview
dim maildoc as notesdocument
dim doc as notesdocument
dim olddoc as notesdocument
dim rtitem as notesrichtextitem

set db = session.currentdatabase
set maildoc = db.createdocument
maildoc.form = "Memo"
maildoc.sendto = mgr_name
set rtitem = new notesrichtextitem(maildoc,"body")
set view = db.getview("viewname")
set doc = view.getfirstdocument
do while not (doc is nothing)
  call rtitem.appenddoclink(doc,"subject")
  set olddoc = doc
  set doc = view.getnextdocument(olddoc)
  delete olddoc
loop
call maildoc.send(false,recipient)


Of course, the above code is not complete. You'll need to get the manager name from somewhere (please do not hard-code it, use a Profile document or something). You'll also need to dress up the body field and provide a subject for the memo, and no doubt include a dozen other things.
But it is a start, and should work as is.
Have fun !