Re: Help with Error in Forms Code!!!

Bill — Mon, 14 Apr 2008 13:06:11 GMT

ON do have an upload event and I have reviewed all of the objects that are updated and mad sure that they were not set to read only: See Code Below...Did I or am I missing something: I am looking into any rules or other events that could trigger code execution when opening the form but so far I am not finding anything.

Dim i, hold, contsupref As String

Dim var As String

Dim strOut, txtXMLIn, xmlOut, frmFileLocation, frmFileName, frmFileSaveAs As String

Dim GMUI As GoldMine.UI

Dim doc, xmldoc, docReturned As MSXML2.DOMDocument40

Dim elRoot As MSXML.IXMLDOMElement

Dim Child As MSXML.IXMLDOMElement

Dim timer As System.Timers.Timer

'Assign Accountno to the interview

If Left(thisXDocument.URI.ToString, 4) = "Form" Then

'Pull data from GM to use for saving document

var = "AccountNo"

i = GetAccntVal(var)

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:AccountNoKey").text = i

var = "RecID"

i = GetAccntVal(var)

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:CandI/my:RecID").text = i

var = "Contact"

i = GetAccntVal(var)

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:CandI/my:Contact").text = i

var = "&UserName"

i = GetAccntVal(var)

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:CandI/my:FullUserName").text = i

End If

If Left(thisXDocument.URI.ToString(), 4) <> "Form" Then

frmChangeTextFlag = False

'MsgBox("I made it to the query")

Dim chkvalue, passsql As String

chkvalue = " "

chkvalue = "contsupref"

passsql = "SELECT " & chkvalue & " FROM CONTSUPP" & " Where RecID = " & "'" & thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:CONSUPPREF").text & "'"

FldRunQry(chkvalue, passsql)

'MsgBox(frmContSupRef)

'Check to see if document should be set to read only

If frmContSupRef = "MA App FILED" Then

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:ApplicationType").text = "MA App FILED"

thisXDocument.Save()

End If

thisXDocument.DOM.selectSingleNode("/dfs:myFields/my:EditFlag").text = "FALSE"

Re: Help with Error in Forms Code!!!

Albert — Mon, 14 Apr 2008 12:25:36 GMT

Hi, just some ideas:

Is there an OnLoad event and what code are you executing? Maybe some code that actually uses the view (like 'thisXDocument.View.ExecuteAction("xCollection::insert", "group1_1");' ?
Are you using any rules or other events that could trigger code execution when opening the form?
Are you using digital signatures?

Albert

Help with Error in Forms Code!!!

Bill — Mon, 14 Apr 2008 11:40:19 GMT

Good Morning:

I am hoping that someone can point me in the right direction in what to look for or how to solve. I have an Infopath solution that everytime I open the publish form I receive the following error:

InfoPath cannot open the selected form because of an error in the form's code. Attempt to modify a read only node.

This error started appearing after I added a couple of tables to my solution and a few Master/Detail sections to my existing form.

Any help would be greatly appreciated!!!!!!!

Thanks!

Bill