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

x
?
Solved

Setting a field value with lotusscript

Posted on 2000-04-13
5
Medium Priority
?
2,700 Views
Last Modified: 2013-12-18
I can set the value of a text field to any string using "FieldSetText". How do i set the value of a numeric field?

I have a variable, type double, i want to set a field equal to this.

Dim aDouble As Double
aDouble = 1
Call uidoc.FieldSetText("MyField", aDouble)?





      
0
Comment
Question by:roosterup
[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
  • 3
5 Comments
 
LVL 2

Expert Comment

by:amit_dutta
ID: 2714897
Hi roosterup,

All u need to do is:-

Dim doc as NotesDocument
set doc = uidoc.document
doc.MyField = aDouble
doc.Save(False,True)

This should serve ur purpose.
0
 
LVL 1

Author Comment

by:roosterup
ID: 2716374
Adjusted points from 10 to 30
0
 
LVL 1

Author Comment

by:roosterup
ID: 2716375
Dim aString As String
Dim aDouble As Double
Dim con As New ODBCConnection
Dim qry As New ODBCQuery
Dim res As New ODBCResultSet
Dim WS As New notesUIWorkspace
Dim uidoc As NotesUiDocument
Set uidoc = ws.currentdocument
status=Con.ConnectTo("","","")
Set qry.Connection = Con
Qry.SQL = "sql statement"
Set Res.Query = Qry
Res.Execute

aString=res.getvalue("I00AMM")
Call uidoc.FieldSetText("month"aString)

I have to set aString to a number so a data conversion takes place, then use fieldsettext to get the text into the field. how can i just set a field equal to an integer value?

res.getvalue("I00AMM") is an int, how do i set a number field to this value?
0
 

Accepted Solution

by:
andyDale earned 120 total points
ID: 2716482
I am wandering why you regected the privious answer, it is the way to do it. You'll need to set the value throught the back-end, the front-end only has text methods. I would agree that the .save is overkill as a simple uidoc.refresh would bring your backend change into the UI without having to save the document:

Dim doc as NotesDocument
set doc = uidoc.document
doc.MyField = daInt
uidoc.refresh

if you don't like the abrieviated field assignment method try

call doc.replaceItemValue("myField",daInt)
0
 
LVL 1

Author Comment

by:roosterup
ID: 2716552
This works, but i don't understand why some of the other fields I have assigned a text value using Call uidoc.FieldSetText will have thier values erased.
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

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…
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…
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…
Want to learn how to record your desktop screen without having to use an outside camera. Click on this video and learn how to use the cool google extension called "Screencastify"! Step 1: Open a new google tab Step 2: Go to the left hand upper corn…
Suggested Courses

636 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