Listing F
'------------------------------------------------------------------------------
' <autogenerated>
'     This code was generated by a tool.
'     Runtime Version: 1.0.3705.288
'
'     Changes to this file may cause incorrect behavior and will be lost if
'    the code is regenerated.
' </autogenerated>
'------------------------------------------------------------------------------
 
 
Option Strict Off
Option Explicit On
 
 
Imports System
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.Xml.Serialization
 
 
'
'This source code was auto-generated by wsdl, Version=1.0.3705.288.
'
Namespace BookProxy
   
    '<remarks/>
    <System.Diagnostics.DebuggerStepThroughAttribute(),  _
     System.ComponentModel.DesignerCategoryAttribute("code"),  _
     System.Web.Services.WebServiceBindingAttribute(Name:="BookWSSoap", [Namespace]:="http://tempuri.org/"),  _
     System.Xml.Serialization.XmlIncludeAttribute(GetType(System.Object()))>  _
    Public Class BookWS
        Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
       
        Public BookSecurityContextValue As BookSecurityContext
       
        '<remarks/>
        Public Sub New()
            MyBase.New
            Me.Url = "http://localhost/WSB2BJohn/ws/BookWS.asmx"
        End Sub
       
        '<remarks/>
        <System.Web.Services.Protocols.SoapHeaderAttribute("BookSecurityContextValue"),  _
         System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/SearchBooks", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>  _
        Public Function SearchBooks(ByVal BookId As Integer, ByVal AuthorName As String, ByVal BookName As String, ByVal AvailabilityId As Integer) As System.Data.DataSet
            Dim results() As Object = Me.Invoke("SearchBooks", New Object() {BookId, AuthorName, BookName, AvailabilityId})
            Return CType(results(0),System.Data.DataSet)
        End Function
       
        '<remarks/>
       Public Function BeginSearchBooks(ByVal BookId As Integer, ByVal AuthorName As String, ByVal BookName As String, ByVal AvailabilityId As Integer, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("SearchBooks", New Object() {BookId, AuthorName, BookName, AvailabilityId}, callback, asyncState)
        End Function
       
        '<remarks/>
        Public Function EndSearchBooks(ByVal asyncResult As System.IAsyncResult) As System.Data.DataSet
            Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0),System.Data.DataSet)
        End Function
       
        '<remarks/>
        <System.Web.Services.Protocols.SoapHeaderAttribute("BookSecurityContextValue"),  _
         System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/GetBooksByIds", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>  _
        Public Function GetBooksByIds(ByVal BookIds() As Object) As System.Data.DataSet
            Dim results() As Object = Me.Invoke("GetBooksByIds", New Object() {BookIds})
            Return CType(results(0),System.Data.DataSet)
        End Function
       
        '<remarks/>
        Public Function BeginGetBooksByIds(ByVal BookIds() As Object, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("GetBooksByIds", New Object() {BookIds}, callback, asyncState)
        End Function
       
        '<remarks/>
        Public Function EndGetBooksByIds(ByVal asyncResult As System.IAsyncResult) As System.Data.DataSet
            Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0),System.Data.DataSet)
        End Function
       
        '<remarks/>
        <System.Web.Services.Protocols.SoapHeaderAttribute("BookSecurityContextValue"),  _
         System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/GetAvailabilityDs", RequestNamespace:="http://tempuri.org/", ResponseNamespace:="http://tempuri.org/", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>  _
        Public Function GetAvailabilityDs() As System.Data.DataSet
            Dim results() As Object = Me.Invoke("GetAvailabilityDs", New Object(-1) {})
            Return CType(results(0),System.Data.DataSet)
        End Function
       
        '<remarks/>
        Public Function BeginGetAvailabilityDs(ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
           Return Me.BeginInvoke("GetAvailabilityDs", New Object(-1) {}, callback, asyncState)
        End Function
       
        '<remarks/>
        Public Function EndGetAvailabilityDs(ByVal asyncResult As System.IAsyncResult) As System.Data.DataSet
           Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0),System.Data.DataSet)
        End Function
    End Class
   
    '<remarks/>
    <System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://tempuri.org/"),  _
     System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://tempuri.org/", IsNullable:=false)>  _
    Public Class BookSecurityContext
        Inherits SoapHeader
       
        '<remarks/>
        Public ClientId As Integer
       
        '<remarks/>
        Public WSToken As String
    End Class
End Namespace