At first you have to create a new Shared Action and name it e.g. New Document.

Change Formula to LotusScript and paste following code into your action where <mask_name> should be replaced by your mask.

Sub Click(Source As Button)

Dim workspace As New NotesUIWorkspace

Call workspace.ComposeDocument( '', '', '<mask_name>' )

End Sub