you miss a check in your code
Set conn = ##class(%Net.Remote.Gateway).%New () // No error here
Set tSC = conn.%Connect("127.0.0.1", "55000", "NETTEST") // No error here
Set tSC = conn.%Connect("127.0.0.1", "55000", "NETTEST") // No error here
IF 'tSC ........... // check if connection was succesful
Set api = ##class(writetofile.WriteFile). %New(conn) //Here comes the error
set strFile = "d:\temp\example.txt"
set strInput = "Hello world"
set ret = api.FilePut(strFile,strInput)
Set tSC = conn.%Disconnect()
set strFile = "d:\temp\example.txt"
set strInput = "Hello world"
set ret = api.FilePut(strFile,strInput)
Set tSC = conn.%Disconnect()
Your connection may have failed, so next call will fail too,
- Log in to post comments
