Solved

Not able to bypass values in field

Posted on 2004-08-10
5
190 Views
Last Modified: 2013-12-18
Hi Guys

OK

Well I have a field client
When a document is created,  client is automatically updated by a hidden field that sets the Username. Client_1 also does many lookups and fills in several other fields

However there is occasion where Client is written to manually

The problem is client_1 keeps resetting the client field to it value

Client_1 is above the Client field and contains FIELD client := key;(Key is a value either input computed or pulls from User ID)
Client contains @If(@IsNewDoc & client = "";client_1;client != client_1;client;client)
0
Comment
Question by:imjamesw
[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
5 Comments
 
LVL 31

Accepted Solution

by:
qwaletee earned 500 total points
ID: 11766406
James, slow down!  Hard to understand you this time.

Sounds like you need several fields:

Client_1 to do the calculation
Client_Override for a user to enter a different value
Client to contain the actual current values -- calculated to @If(Client_Override = ""; Client_1; Client_Override)

This way, if user types something in, that value will be used, else, the default value will be used.

0
 

Author Comment

by:imjamesw
ID: 11767091
Hi there

Here is what I did

Added Client_Override field after Client_1 but before client
Added a button that sets Client_Override to new value,also sets new client field value
Added @If(Client_Override = ""; Client_1; Client_Override) to client field

Pushed button entered new name,the name changed until I left the field the it recalculated to original value(BAD)

Sub Click(Source As Button)
      Dim workspace As New NotesUIWorkspace
      Dim s As New NotesSession
      Dim db As NotesDatabase
      Dim Doc As notesdocument
      Dim UIDoc As NotesUIDocument
      Dim NewName As String
      Set db = s.CurrentDatabase
      Set UIDoc=workspace.CurrentDocument
      Set Doc = UIDoc.Document
      
      NewName =Inputbox$("Enter a new name for this Security Access request.")
      doc.client_overide = NewName
      doc.client =NewName
      Print doc.client_overide(0)
End Sub

0
 

Author Comment

by:imjamesw
ID: 11767112
I believe it is the FIELD client := key; in the client_1 that is the culprit
0
 

Author Comment

by:imjamesw
ID: 11767505
Got it
0
 

Author Comment

by:imjamesw
ID: 11767547
I modofied the FIELD client := key

FIELD client := @If(client_override = "" ; key; client_override);



THAnx
0

Featured Post

Industry Leaders: 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

For users on the Lotus Notes 8 Standard client, this article provides information on checking the Java Heap size and adjusting it to half of your system RAM in attempt to get the Lotus Notes 8.x Standard client to run faster.  I've had to exercise t…
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…
There's a multitude of different network monitoring solutions out there, and you're probably wondering what makes NetCrunch so special. It's completely agentless, but does let you create an agent, if you desire. It offers powerful scalability …
In this video you will find out how to export Office 365 mailboxes using the built in eDiscovery tool. Bear in mind that although this method might be useful in some cases, using PST files as Office 365 backup is troublesome in a long run (more on t…

630 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