Skip to main content

Netexpress v3.10 MSSOAP

  • December 12, 2014
  • 7 replies
  • 1 view
D

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

7 replies

D

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

Im using Windows 7 and installed Microsoft SOAP Toolkit v3 and recompiled the application (compilation ok) and when I executed the application, different error is displayed (as below);

Exception 65537 not trapped by the class oleexceptionmanager
Description: "Server defined OLE exception"
(800401F3): Invalid class string

Hit T to terminate program, Hit any other key to continue.

The error statement occurs on;

   invoke MSSOAP "new" returning Soap

I have a Web Service and Microfocus Cobol PDF/documentation and it is supposed to work. Is there any wrong with it?


#COM
#netexpress3.10
#NetExpressSOAPWebservice
D

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

Got the code revised and executed fine by replacing class "$OLE$MSSOAP.SoapClient" with "$OLE$MSSOAP.SoapClient30" in Windows 7 OS.

When I executed though the next line "mssoapinit" made an error, as follows;

invoke MSSOAP "new" returning Soap

invoke Soap "mssoapinit" using wsdlURL   *>ERROR here
                    z"rexService"
                    z"rexservicesSoapPort"
                    wsmlURL.

wsdlURL is set as under working-storage section;

78 wsdlURL value z"http://www.mysite.com/" &
                  "rexservice.wsdl".


I am going to insert my WSDL file (rexservice.wsdl) here as shown below;

<?xml version='1.0' encoding='UTF-8' ?>
<!-- infoDynamics Consulting Web Service/WSDL file -->
<definitions
name='rexService'
targetNamespace='www.mysite.com/.../'
xmlns:wsdlns='www.mysite.com/.../'
xmlns:typens='www.mysite.com/.../'
xmlns:soap='schemas.xmlsoap.org/.../'
xmlns:xsd='www.w3.org/.../XMLSchema'
xmlns:stk='schemas.microsoft.com/.../wsdl-extension'
xmlns:dime='schemas.xmlsoap.org/.../'
xmlns:ref='schemas.xmlsoap.org/.../'
xmlns:content='schemas.xmlsoap.org/.../'
xmlns:wsdl='schemas.xmlsoap.org/.../'
xmlns='schemas.xmlsoap.org/.../'>
<types>
 <schema
 targetNamespace='www.mysite.com/.../'
 xmlns='www.w3.org/.../XMLSchema'
 xmlns:SOAP-ENC='schemas.xmlsoap.org/.../'
 xmlns:wsdl='schemas.xmlsoap.org/.../'
 elementFormDefault='qualified'>

 <import namespace='schemas.xmlsoap.org/.../>
 <import namespace='schemas.xmlsoap.org/.../>
 <import namespace='schemas.xmlsoap.org/.../>
 <import namespace='schemas.xmlsoap.org/.../>
 </schema>
</types>
<message name='rexservices.saveWSDLtran'>
 <part name='p0' type='xsd:string'/>
 <part name='p1' type='xsd:string'/>
</message>

<message name='rexservices.saveWSDLtranResponse'>
 <part name='Result' type='xsd:string'/>
 <part name='p0' type='xsd:string'/>
 <part name='p1' type='xsd:string'/>
</message>

<portType name='rexservicesSoapPort'>
 <operation name='saveWSDLtran' parameterOrder='p0 p1'>
  <input message='wsdlns:rexservices.saveWSDLtran'/>
  <output message='wsdlns:rexservices.saveWSDLtranResponse'/>
 </operation>
</portType>

<binding name='rexservicesSoapBinding' type='wsdlns:rexservicesSoapPort' >
<stk:binding preferredEncoding='UTF-8'/>
<soap:binding style='rpc' transport='schemas.xmlsoap.org/.../>
 <operation name='saveWSDLtran'>
 <soap:operation soapAction='www.mysite.com/.../>
 <input>
  <soap:body
  use='encoded'
  namespace='www.mysite.com/.../'
  encodingStyle='schemas.xmlsoap.org/.../'
  parts='p0 p1'/>
 </input>
 <output> 
  <soap:body
  use='encoded'
  namespace='www.mysite.com/.../'
  encodingStyle='schemas.xmlsoap.org/.../'
  parts='Result p0 p1'/>
 </output>
 </operation>
</binding>

<service name='rexService' >
 <port name='rexservicesSoapPort' binding='wsdlns:rexservicesSoapBinding' >
  <soap:address location='www.mysite.com/.../>
 </port>
</service>
</definitions>

Executed the above and error message (shown below) is under second invoke Soap "mssoapinit" occurs.

Exception 65537 not trapped by the class oleexceptionmanager.
Description: "Server defined OLE exception"
(80020009): WSDLReader"XML Parser failed at linenumber 16, lineposition7,
reason is: The name in the end tag of the element must match the element
type in the start tag.
HRESULT=0x1: Incorrect function.
- WSDLReader: Loading of the WSDL file failed
HRESULT=0x80070057: The parameter is incorrect.
- Client:One of the parameters supplied is invalid.
HRESULT=0x80070057: The parameter is incorrect.

Hit T to terminate program. Hit any other key to continue.

What wrong this time with my WSDL file?


#netexpress
#webservice
#COM
#wsdl
Chris Glazier
Forum|alt.badge.img+2
  • Chris GlazierModerator
  • Moderator
  • December 16, 2014

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

First let me point out that you are using an unsupported Microsoft technology (Soap Toolkit) with a version of Net Express (3.1) that is unsupported under Windows 7.

I would recommend that you take a look at the KB article and example here:
Try the example just to make sure that it is working with NX 3.1 in that environment.

In Net Express 5.1, which is the only version actually supported under Windows 7, we have newer technology that will allow you to automatically generate a COBOL client that will consume your web service.

In Visual COBOL you can do this as either native code or .NET managed code.

Thanks.

D

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

Ok, thanks Chris.

D

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

Ok, thanks Chris.

D

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

Hi Chris, looking the example wsdl program that you linked; got it working with NetExpress v3.10 with the following code below;

class-control.
   entrycallback is class "entrycll"
   exceptMgr is class "exptnmgr"
   oleExceptMgr is class "oleexpt"
* MSSOAP is class "$OLE$MSSOAP.SoapClient" *>WinXP
   MSSOAP is class "$OLE$MSSOAP.SoapClient30" *>Windows 7
   olesup is class "olesup".

   :
   :
   78 wsdlURL
        value z"www.myservice.com/rexService.WSDL".

   :
   :
   invoke MSSOAP "new" returning Soap

   invoke Soap "mssoapinit" using wsdlURL
                                 z"rexService".


#COM
#netexpress
#webservice
Chris Glazier
Forum|alt.badge.img+2
  • Chris GlazierModerator
  • Moderator
  • December 19, 2014

I'm using NetExpress v3.10 and doing a web service application. Created a COM and already in my registry, created WSDL using MSSOAP toolkit v3.0, and now I want to call the web service thru NetExpress application. Code is as below;

$set ooctrl( p)
environment division.
special-names.
call-convention 74 is winAPI.

object section.
class-control.
  entrycallback is class "entrycll"
  exceptMgr is class "exptnmgr"
  oleExceptMgr is class "oleexpt"
  MSSOAP is class "$OLE$MSSOAP.SoapClient"
  olesup is class "olesup".

    :
    :
    :
78 wsdlURL value z"www.mysite.com/.../" &
                  "myservice.wsdl".
01 Soap object reference.
01 wsmlURL pic x value x"00".

    :
    :
    :

*>configure WSDL/SOAP using myService module

invoke MSSOAP "new" returning Soap  *>ERROR here

invoke Soap "mssoapinit" using wsdlURL
                            z"myService"
                            z"myservicesSoapPort"
                            wsmlURL.

Executed the application (using animate), and the first invoke MSSOAP "new" statement error below message appears;

Exception 65537 not trapped by the class oleexceptionmanager.
Description; "Server defined OLE exception"
Cannot bind to server MSSOAP.SoapClient
Hit T to terminate program. Hit any other key to continue.

What is wrong with it??


#NetExpressSOAPWebservice

Oh yes I see your original error clearly now. You had the wsdl string specified as:

78 wsdlURL value z"http://www.mysite.com/&quot; &  "rexservice.wsdl".

Since you had the z" on the first literal it was embedding a null character in the middle of your string instead of at the end.

You should have specified as one string like you now have it or place the z" on the second literal being concatenated.

78 wsdlURL value "http://www.mysite.com/&quot; &  z"rexservice.wsdl".

Thanks.

Recent badge winners

Explore all badges
Terms & ConditionsAccessibility statement