Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

Help with finding a Object Not Set

Posted on 2004-09-20
11
Medium Priority
?
248 Views
Last Modified: 2013-12-18
I have a very simple form that I copied from a differnt database.  When I go to save the copied form, I get the prompt box

Object Variable Not Set  - what is the best way to try and find the variable.  This is a exact copy of the form from the other database that works fine.  I am not sure where the variable could be hiding.  Any suggestions would be great.

Jaziar
0
Comment
Question by:Jaziar
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 4
  • 2
  • +1
11 Comments
 
LVL 24

Expert Comment

by:HemanthaKumar
ID: 12102742
Use debugger to find out which line is giving this error.. .then you know what variable is not set !

~Hemanth
0
 

Author Comment

by:Jaziar
ID: 12102783
Set backEndDoc = lookupView.GetDocumentByKey(frontEndDoc.UniversalID)

Here is the line - could you explain a little what he is trying to do here.  I will paste all the querysave for reference

Sub Querysave(Source As Notesuidocument, Continue As Variant)
      Dim doc As NotesDocument
      
      Set doc = Source.Document
      frontEndFieldContent = Source.FieldGetText("MachineRemarks")
      
      If Not doc Is Nothing Then
            If Right(frontEndFieldContent, 1) <> ")" And  frontEndFieldContent <> "" Then
                  Call Source.FieldAppendText("MachineRemarks", "   " & getEntryStamp())
            End If
      End If
      
      Dim session As New NotesSession
      Dim db As NotesDatabase
      Dim ws As New NotesUIWorkspace
      Dim uidoc As NotesUIDocument
      Dim lookupView As NotesView
      
      Set  db = session.CurrentDatabase
      Set uidoc = ws.CurrentDocument
      Set lookupView = db.getView("LookupDocByDocID")
      
      Dim frontEndDoc As NotesDocument
      Dim backEndDoc As NotesDocument
      
      Set frontEndDoc = uidoc.Document
      Set backEndDoc = lookupView.GetDocumentByKey(frontEndDoc.UniversalID)
      
      If Not backEndDoc Is Nothing Then
            Call CompareAndUpdateOwners(frontEndDoc, backEndDoc)
      End If
End Sub
0
 
LVL 14

Expert Comment

by:p_partha
ID: 12102817
Frontenddoc is a uidoc and it's not even saved, how do u expect it's universalid to be in lookupview

Partha
0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 

Author Comment

by:Jaziar
ID: 12102881
The problemis I did not write, I got assigned to make it work.  The other programmer is no longer with us
0
 
LVL 14

Expert Comment

by:p_partha
ID: 12102911
Jaziar
I am sorry, i didn't see it was in querysave, ANyways things u need to check:

a. check whether lookupview object is set, When you start the debugger  u see a twistie for the lookupview object


He checks whether the document exists, if it doesn't then he calls the compareandupdateowners function

Partha
0
 
LVL 19

Expert Comment

by:RanjeetRain
ID: 12103508
Root of all the problems is this line:

Set frontEndDoc = uidoc.Document

You can't do it.
0
 
LVL 19

Expert Comment

by:RanjeetRain
ID: 12103542
When you try accessing the Document property of the uidoc object, it doesn't return a valid NotesDocument object. Hence, your next line fails.

Correct this line >> Set frontEndDoc = uidoc.Document<<

YOu will probably need to use an alternate approach to solve this problem. Anyview that uses UniversalID of a document as a key, will not serve you a purpose in case you try looking up a NEW document that has never been saved. Yes, this code will work just fine on documents that have been saved earlier and are being edited.
0
 
LVL 14

Expert Comment

by:p_partha
ID: 12103552
I disagree with ranjeet

Partha
0
 

Author Comment

by:Jaziar
ID: 12103632
P_Partha There is no twistie when the bugger starts on LookupView
0
 
LVL 14

Accepted Solution

by:
p_partha earned 500 total points
ID: 12103653
Set lookupView = db.getView("LookupDocByDocID"), then that means there is no view by that name
Check the spelling


Partha
0
 

Author Comment

by:Jaziar
ID: 12103834
The view spelling was off - Thanks very much and nice job
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

You’ve got a lotus Domino web server, and you have been told that “leverage browser caching” is a must do. This means that we have to tell the browser everywhere in the web to use cache. In other words, we set (and send) an expiration date in the HT…
For beginners of Lotus Notes user this is important to know about the types of files and their location supported by IBM Notes. Mostly users are unaware about how many file types are created and what their usages are. This Article is fully dedicated…
Sometimes it takes a new vantage point, apart from our everyday security practices, to truly see our Active Directory (AD) vulnerabilities. We get used to implementing the same techniques and checking the same areas for a breach. This pattern can re…
Please read the paragraph below before following the instructions in the video — there are important caveats in the paragraph that I did not mention in the video. If your PaperPort 12 or PaperPort 14 is failing to start, or crashing, or hanging, …
Suggested Courses

609 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