All View Titles formula?

HCL Domino Domino Forum
1

Hello All,

Is there any way to get the current list of view names into formula language?

I know I can go the db.Views route, but I need the names strictly in formuala language and without using any new forms or documents.

Thanks for any help,

Ben

2

Subject: You could look in the DB synopsis (eom)

3

Subject: I need the title list in formula language

For a piece of code. Actually I just need two view names(not the same) and in a generic sense, so I can’t know what they are.

Thanks for the input Cathy

4

Subject: Grasping at straws here Ben but

can you write an agent using a simple action that will simply send you a newsletter summary of the names of the views? Hope someone else knows how to get there from formula language because I’m sorry, I don’t have a clue. Good luck! Cathy

5

Subject: All View Titles formula?

I don’t believe this is possible. The best you can get with the formula language is the name of the current view. You could, though, have a LotusScript agent maintain a list of views in a profile document and access that field with a formula. What do you need this for, exactly?

6

Subject: Thanks for the response(s)!

I’m trying to solve the debug issue. See if you have the same issue. If I’m in the notes client and I switch to debug mode, notes says it’s in debug mode but really isn’t yet. But, if you change views and then go back, it will start the debugger. I am trying to make a generic “Switch To Debug” that I can throw in to any DB. Here’s what I’ve got so far.

In LS:

Sub Initialize

Dim ws As New NotesUIWorkspace

Dim uidb As NotesUIDatabase

Dim uiview As NotesUIView

Dim uidoc As NotesUIDocument



Dim s As New NotesSession

Dim db As NotesDatabase

Dim view As NotesView

Dim views As Variant

Dim NotesViewArray() As NotesView

Dim agt As NotesAgent

'Dim i As Integer



Set uidb = ws.CurrentDatabase

Set uiview = ws.CurrentView

Set uidoc =ws.CurrentDocument 'prompt for close and switch views then reopen



Set db = s.CurrentDatabase

views = db.Views

'i = Ubound(db.Views)

Forall v In views

	If v.name <> uiview.View.Name Then

		currentname = uiview.View.Name

		selectname = v.name

		Exit Forall

	Else

		selectname=uiview.View.Name

		currentname = selectname

	End If

End Forall



If currentname <> selectname Then

	uidb.OpenView(Cstr(selectname))

	uidb.OpenView(Cstr(currentname))

End If

End Sub

**But I don’t know how to switch to debug mode from LS

and in formula:

@Command([DebugLotusScript]);

viewTitle:=@ViewTitle;

@Command([SwitchView]);

@Command([switchview];viewTitle);

@all;

**But I can’t find the view names, namely one to switch to. @viewtitle will get the current for me, but I need to find an alternative view if one exists and use it in the first switchview. It works now but I have to manually select a view via a goto dialog when the first switchview is executed.

Okay, There’s my predicament. Thanks greatly for the help. This is just a fun side tool that I’ve wanted. If anyone has an alternative suggestion I’m up for that too.

Thanks,

Ben