We know that, we can see the saved documents in database in views.
Is there any chance to view all design elements in a single view?
Yes, we can view those design elements in view by changing the value of reserved field.
Hint: Fields name start with $ be the reserve field.
In view there is a reserve field called $FormulaClass. As default its value is 1. If the value is 1, it shows only the saved documents in the view.
Value of $FormulaClass Viewing Elements
4 Forms and Subforms
8 Views, Folders and Navigators
16 Database Title
32 Design Collection
64 ACL Note (in compiled format)
512 Agents (Shared)
1024 Shared Fields
1548 Forms, Sub-forms, Views, Folders, Navigators, Agents(Shared), Shared Fields
If we change the value of &FormulaClass into 1548(sum of 4 + 8 + 512 + 1024) it shows all Forms, Sub-forms, Views, Folders, Navigators, Agents (Shared), Shared Fields.
For Example: Follow the below steps to get clear idea on that.
Step 1: Create a new view named as “ViewDesignElements”(user defined name) and give “SELECT @All” as view selection formula in programming pane.
Step 2: Create two columns and name as “Design Element Type” & “Design Element Name”.
Step 3: For “Design Element Name” column give “$Title” as formula for column value. And categorize “Design Element Type” column.
Step 4 : Then create an LotusScript Agent and name it as “designAgent”.
Step 5 : Type the following code in Initialize of the agent.
This script is to change the value of “$FormulaClass”.
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view= db.GetView(”ViewDesignElements”)
Set doc = db.GetDocumentByUNID(view.UniversalID)
Call doc.ReplaceItemValue(”$FormulaClass”, “1548″)
doc.Save True, True
Step 6 : Create an action button in the view to run the agent by event. Now enter the following code for action button.
Step 7 : Now Preview the view and click the action button. It will run agent and changes the $FormulaClass value as 1548 to view all design elements.
Step 8 : Then press Shift + F9 to refresh. It will show all the design elements.