Not sub or function

What is wrong with below script. i get error “Not a sub or function name: uidoc”

Sub Postopen(Source As Notesuidocument)

If Not source.InPreviewPane Then

	Set s = New NotesSession     

	Set uidoc = Source

	Set thisdoc = Source.document

	uidoc.Gotofield("HTTPPassword")

Else

	Msgbox "The Web Password update does not work in Preview mode."

End If

End Sub

please advise

amp

Subject: No declarations of uidoc or thisdoc

Dim uidoc as notesuidocument is missing etc - using just source.gotofield is easier anyway

Subject: thanks

I thought of it same. I will try to see if works out. Thank you for your quick response…

Subject: Re: not sub or function

Why do you Set uidoc = Source? Source is alreay a NotesUIDocment so you can refer to the fields on it without adding another uidocument object. Don’t know if that’s your problem or not, but it would clean up the coding.

Subject: maybe - check the help

The help documentation specifies the following as correct syntax.

Call notesUIDocument.GotoField( fieldName$ )

Just a suggestion, but why don’t you try what is in the help documentation and see what happens ?

:wink: