Solved

Debug My Debug Code.

Posted on 2004-04-27
4
205 Views
Last Modified: 2013-12-18
Hello all,
This one should be simple enough, I'm just not seeing it.

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.
0
Comment
Question by:yoshi78
  • 2
  • 2
4 Comments
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 10928663
There is some timing issue here

try this instead

@Command([DebugLotusScript]);
viewTitle:=@ViewTitle;
@PostedCommand([SwitchView]);
@PostedCommand([switchview];viewTitle);


~Hemanth
0
 
LVL 1

Author Comment

by:yoshi78
ID: 10928718
This still asks me which view to switch to(@PostedCommand([SwitchView]);).  I'm looking, if it's in formuala language, for a way to grab the view names so I don't have to ask which view to switch to.

Thanks for the input Heman.
Yoshi
0
 
LVL 24

Accepted Solution

by:
HemanthaKumar earned 125 total points
ID: 10929371

Then remove that line and chck with this

@Command([DebugLotusScript]);
viewTitle:=@ViewTitle;
@PostedCommand([switchview];viewTitle);
0
 
LVL 1

Author Comment

by:yoshi78
ID: 10930084
I was about to say that this wouldn't do anything, but then I tried it and apparently it doesn't care which view - even if it's the current view - it switches to, it works.

Very Nice Job.
Thanks for sorting my little problem out.
Yoshi
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

This is an old article, please see an updated version of this article, located here: http://www.experts-exchange.com/articles/23619/Notes-8-5x-Windows-7-Notes-info-and-tips.html
  In today’s Arena we can’t imagine our lives without Internet as we are highly used to of it. If we consider our life style just for only 2 min we found that face to face communication is swapped by e-communication.  Every Where from Works place to…
This demo shows you how to set up the containerized NetScaler CPX with NetScaler Management and Analytics System in a non-routable Mesos/Marathon environment for use with Micro-Services applications.
This video demonstrates how to create an example email signature rule for a department in a company using CodeTwo Exchange Rules. The signature will be inserted beneath users' latest emails in conversations and will be displayed in users' Sent Items…

930 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now