I've added the following code to the Journal DB's Database QueryClose event to clean up the private views during development and testing:
Sub Queryclose(Source As Notesuidatabase, Continue As Variant)
Dim views As Variant<br/>
Dim view As NotesView<br/>
Dim doc As NotesDocument<br/>
Dim item As NotesItem<br/>
Print "Checking for private views..."<br/>
views = this_db.Views<br/>
Forall v In views<br/>
Set view = v<br/>
Set doc = this_db.GetDocumentByUNID(view.UniversalID)<br/>
If Not doc Is Nothing Then<br/>
Set item = doc.GetFirstItem("$Flags")<br/>
If Instr(item.Values(0),"V") Then<br/>
Print "Removing private view: " & view.Name<br/>
Call view.Remove<br/>
End If<br/>
End If<br/>
End Forall<br/>
Print ""<br/>
End Sub