Hi,
I’m new using lotus domino 8 and web services. I’m try to get data from other system using web service, the problem in that I get the error “WebService EmpleadoServerServicePortType_n1 method getEmpleados error Web service EmpleadoServerServicePortType_n1 is unable to create LotusScript object for EmpleadoArr_n1 datatype in method getEmpleados: value “” at element “http://server.empleado:getEmpleadosResponse/http://server.e””. When I import the source wsdl, it create the follow LS code (EmpleadoWS Script Library):
%INCLUDE “lsxsd.lss”
Class EmpleadoArr_n1 As XSD_ANYTYPE
Public nombre As XSD_STRING
Public numero As XSD_STRING
Sub NEW
End Sub
End Class
Class ArrayOfEmpleadoArr_n1_Holder As INOUT_HOLDER
Public Value() As EmpleadoArr_n1
End Class
Const n1 = “http://server.empleado”
Class EmpleadoServerServicePortType_n1 As PortTypeBase
Sub NEW
Call Service.Initialize ("HttpServerEmpleadoEmpleadoServerServiceService", _
"EmpleadoServerServiceService.EmpleadoServerServicePort", "http://1XX.1XX.1XX.XX:8083/cgi-bin/jsmdirect?empleados", _
"EmpleadoServerServicePortType_n1")
End Sub
Function getEmpleados(departamento As String, seccion As String) As ArrayOfEmpleadoArr_n1_Holder
Set getEmpleados = Service.Invoke("getEmpleados", departamento, seccion)
End Function
End Class
This library is called from an agent (Employee), here is the code:
Option Public
Use “EmpleadoWS”
Sub Initialize
Dim thewebservice As New EmpleadoServerServicePortType_n1()
Dim arreglo As New ArrayOfEmpleadoArr_n1_Holder
Dim data_arr1 As New EmpleadoArr_n1()
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set arreglo = thewebservice.getEmpleados("ADM","01")
'Set data_arr.nombre = arreglo.value
Messagebox "End"
End Sub
As you can see, the response must be an data array.
Any body can tell me what i’m doing wrong? or what is missing?
Thanks a lot.