wiswebserviceSoap / SendRequestB

ASP AutoIt C C (Unicode) C++ C++ (Unicode) C# DataFlex Delphi Foxpro Go Java Node.js Objective-C Perl PHP Extension PowerBuilder Powershell PureBasic Python CkPython Ruby SQL Server Swift TCL VB.NET VB6 VBScript Xojo

-- Important: See this note about {{-https://cknotes.com/sql-sp_oamethod-string-length-return-value-limitations/|||string length limitations for strings returned by sp_OAMethod calls-}}.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    -- Important: Do not use nvarchar(max).  See the {{-https://www.example-code.com/sql/default.asp|||warning about using nvarchar(max)-}}.
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @xml int
    EXEC @hr = sp_OACreate 'Chilkat.Xml', @xml OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    EXEC sp_OASetProperty @xml, 'Tag', 'soapenv:Envelope'
    DECLARE @success int
    EXEC sp_OAMethod @xml, 'AddAttribute', @success OUT, 'xmlns:soapenv', 'http://schemas.xmlsoap.org/soap/envelope/'
    EXEC sp_OAMethod @xml, 'AddAttribute', @success OUT, 'xmlns:wis', 'http://www.wisinspections.com/'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Header|wis:AuthenticateHeader|wis:Username', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Header|wis:AuthenticateHeader|wis:Password', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:RequesterName', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:RequesterExt', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:RequesterEmail', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:ContractHolder', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:ContractSale', 'dateTime'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:ContractMileage', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:VehicleYear', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:VehicleMake', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:VehicleModel', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:Mileage', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:VinNo', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:ContractNo', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:AuthorizationNo', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:InspectionType', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:InspectionReason|wis:anyType', '?'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:RepairSite', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:Address1', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:Address2', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:City', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:State', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:Zip', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:Phone', 'string'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'soapenv:Body|wis:SendRequestB|wis:Contact', 'string'

    -- In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required. 
    EXEC sp_OASetProperty @xml, 'EmitXmlDecl', 0
    DECLARE @soapRequestBody nvarchar(4000)
    EXEC sp_OAMethod @xml, 'GetXml', @soapRequestBody OUT

    DECLARE @endpoint nvarchar(4000)
    SELECT @endpoint = 'http://www.wisinspections.com:8086/wiswebservice.asmx'
    DECLARE @soapAction nvarchar(4000)
    SELECT @soapAction = 'http://www.wisinspections.com/SendRequestB'
    --  For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
    DECLARE @contentType nvarchar(4000)
    SELECT @contentType = 'text/xml'

    DECLARE @http int
    EXEC @hr = sp_OACreate 'Chilkat.Http', @http OUT

    EXEC sp_OAMethod @http, 'ClearHeaders', NULL
    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'Content-Type', @contentType
    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'SOAPAction', @soapAction

    DECLARE @resp int
    EXEC @hr = sp_OACreate 'Chilkat.HttpResponse', @resp OUT

    EXEC sp_OAMethod @http, 'HttpStr', @success OUT, 'POST', @endpoint, @soapRequestBody, 'utf-8', 'application/xml', @resp
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0

        PRINT 'Failed to send SOAP request.'
        EXEC @hr = sp_OADestroy @xml
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @resp
        RETURN
      END

    -- Get the XML response body.
    DECLARE @responseXml int
    EXEC @hr = sp_OACreate 'Chilkat.Xml', @responseXml OUT

    EXEC sp_OAMethod @resp, 'GetBodyXml', @success OUT, @responseXml

    DECLARE @statusCode int
    EXEC sp_OAGetProperty @resp, 'StatusCode', @statusCode OUT

    PRINT 'response status code: ' + @statusCode

    -- If the status code does not indicate succcess, then show the response XML,
    -- which probably contains error information.
    IF @statusCode <> 200
      BEGIN
        EXEC sp_OAMethod @responseXml, 'GetXml', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @xml
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @resp
        EXEC @hr = sp_OADestroy @responseXml
        RETURN
      END

    EXEC sp_OAMethod @responseXml, 'GetXml', @sTmp0 OUT
    PRINT @sTmp0

    -- Parse the successful SOAP response XML.

    -- This is a sample of the response XML, but the namespace prefixes will be different.
    -- We can parse the result using "*" for the namespace prefixes (see below).

    DECLARE @SendRequestBResult nvarchar(4000)
    EXEC sp_OAMethod @responseXml, 'GetChildContent', @SendRequestBResult OUT, '*:Body|*:SendRequestBResponse|*:SendRequestBResult'

    EXEC @hr = sp_OADestroy @xml
    EXEC @hr = sp_OADestroy @http
    EXEC @hr = sp_OADestroy @resp
    EXEC @hr = sp_OADestroy @responseXml


END
GO

Request XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:wis="http://www.wisinspections.com/">
    <soapenv:Header>
        <wis:AuthenticateHeader>
            <wis:Username>string</wis:Username>
            <wis:Password>string</wis:Password>
        </wis:AuthenticateHeader>
    </soapenv:Header>
    <soapenv:Body>
        <wis:SendRequestB>
            <wis:RequesterName>string</wis:RequesterName>
            <wis:RequesterExt>string</wis:RequesterExt>
            <wis:RequesterEmail>string</wis:RequesterEmail>
            <wis:ContractHolder>string</wis:ContractHolder>
            <wis:ContractSale>dateTime</wis:ContractSale>
            <wis:ContractMileage>string</wis:ContractMileage>
            <wis:VehicleYear>string</wis:VehicleYear>
            <wis:VehicleMake>string</wis:VehicleMake>
            <wis:VehicleModel>string</wis:VehicleModel>
            <wis:Mileage>string</wis:Mileage>
            <wis:VinNo>string</wis:VinNo>
            <wis:ContractNo>string</wis:ContractNo>
            <wis:AuthorizationNo>string</wis:AuthorizationNo>
            <wis:InspectionType>string</wis:InspectionType>
            <wis:InspectionReason>
                <wis:anyType>?</wis:anyType>
            </wis:InspectionReason>
            <wis:RepairSite>string</wis:RepairSite>
            <wis:Address1>string</wis:Address1>
            <wis:Address2>string</wis:Address2>
            <wis:City>string</wis:City>
            <wis:State>string</wis:State>
            <wis:Zip>string</wis:Zip>
            <wis:Phone>string</wis:Phone>
            <wis:Contact>string</wis:Contact>
        </wis:SendRequestB>
    </soapenv:Body>
</soapenv:Envelope>

Response XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:wis="http://www.wisinspections.com/">
    <soapenv:Header/>
    <soapenv:Body>
        <wis:SendRequestBResponse>
            <wis:SendRequestBResult>?</wis:SendRequestBResult>
        </wis:SendRequestBResponse>
    </soapenv:Body>
</soapenv:Envelope>