Hi Shyam and all
Sorry I could not post the query yesterday as I was on leave. Here are the
details. Pl send the response asap as the whole team is confused and stuck
up.... :(
it is pretty long as the code is also there - but we programmers know that a
little bug in the code generates a page full of errors.
Pl reply at the earliest
Thanks a ton
Arti
Problem in Publishing Crystal Report.
We are creating crystal reports in web services. Then we are publishing
these report as web services .
When we add the references of this service in our project, we are only able
to access the
the last publish report as web service. We are giving below the part of the
code of reference.vb related
to report service
'------------------------------------------------------------------------------
' <autogenerated>
' This code was generated by a tool.
' Runtime Version: 1.0.3705.0
'
' 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 Microsoft.VSDesigner, Version
1.0.3705.0.
'
Namespace dotnetsrv
'<remarks/>
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Web.Services.WebServiceBindingAttribute(Name:="rptAmmendedPOServiceSoap",
[Namespace]:="http://crystaldecisions.com/reportwebservice/9.1/"), _
System.Xml.Serialization.XmlIncludeAttribute(GetType(ParameterValue))>
_
Public Class rptAmmendedPOServiceSoap
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
'<remarks/>
Public Sub New()
MyBase.New
Me.Url =
"http://dotnetsrv/ERPDevWebService/rptAmmendedPOService.asmx"
End Sub
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/GetGroupLevelData",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
GetGroupLevelData(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal request As GroupLevelDataRequest) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("GetGroupLevelData", New
Object() {request})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginGetGroupLevelData(ByVal request As
GroupLevelDataRequest, ByVal callback As System.AsyncCallback, ByVal
asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("GetGroupLevelData", New Object()
{request}, callback, asyncState)
End Function
'<remarks/>
Public Function EndGetGroupLevelData(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/GetReportInfo",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
GetReportInfo(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As RequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("GetReportInfo", New
Object() {reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginGetReportInfo(ByVal reqContext As
RequestContext, ByVal callback As System.AsyncCallback, ByVal asyncState As
Object) As System.IAsyncResult
Return Me.BeginInvoke("GetReportInfo", New Object()
{reqContext}, callback, asyncState)
End Function
'<remarks/>
Public Function EndGetReportInfo(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/Export",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
Export(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As ExportRequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("Export", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginExport(ByVal reqContext As
ExportRequestContext, ByVal callback As System.AsyncCallback, ByVal
asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("Export", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndExport(ByVal asyncResult As System.IAsyncResult)
As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/Refresh",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
Refresh(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As RequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("Refresh", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginRefresh(ByVal reqContext As RequestContext,
ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As
System.IAsyncResult
Return Me.BeginInvoke("Refresh", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndRefresh(ByVal asyncResult As System.IAsyncResult)
As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/DrillGraph",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
DrillGraph(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As DrillDownRequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("DrillGraph", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginDrillGraph(ByVal reqContext As
DrillDownRequestContext, ByVal callback As System.AsyncCallback, ByVal
asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("DrillGraph", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndDrillGraph(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/FindGroup",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
FindGroup(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As FindGroupContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("FindGroup", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginFindGroup(ByVal reqContext As FindGroupContext,
ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As
System.IAsyncResult
Return Me.BeginInvoke("FindGroup", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndFindGroup(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/FindText",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
FindText(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As FindTextRequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("FindText", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginFindText(ByVal reqContext As
FindTextRequestContext, ByVal callback As System.AsyncCallback, ByVal
asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("FindText", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndFindText(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/GetLastPageNumber",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
GetLastPageNumber(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As ReportPageRequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("GetLastPageNumber", New
Object() {reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginGetLastPageNumber(ByVal reqContext As
ReportPageRequestContext, ByVal callback As System.AsyncCallback, ByVal
asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("GetLastPageNumber", New Object()
{reqContext}, callback, asyncState)
End Function
'<remarks/>
Public Function EndGetLastPageNumber(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/GetTotaller",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
GetTotaller(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As TotallerRequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("GetTotaller", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginGetTotaller(ByVal reqContext As
TotallerRequestContext, ByVal callback As System.AsyncCallback, ByVal
asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("GetTotaller", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndGetTotaller(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/GetPage",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function
GetPage(<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ByVal reqContext As PageRequestContext) As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("GetPage", New Object()
{reqContext})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginGetPage(ByVal reqContext As PageRequestContext,
ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As
System.IAsyncResult
Return Me.BeginInvoke("GetPage", New Object() {reqContext},
callback, asyncState)
End Function
'<remarks/>
Public Function EndGetPage(ByVal asyncResult As System.IAsyncResult)
As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://crystaldecisions.com/reportwebservice/9.1/TestReport",
RequestNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
ResponseNamespace:="http://crystaldecisions.com/reportwebservice/9.1/",
Use:=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>
_
Public Function TestReport() As
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=true)>
ResponseContext
Dim results() As Object = Me.Invoke("TestReport", New Object(-1)
{})
Return CType(results(0),ResponseContext)
End Function
'<remarks/>
Public Function BeginTestReport(ByVal callback As
System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("TestReport", New Object(-1) {}, callback,
asyncState)
End Function
'<remarks/>
Public Function EndTestReport(ByVal asyncResult As
System.IAsyncResult) As ResponseContext
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),ResponseContext)
End Function
End Class
_________________________________________________________________
Help STOP SPAM with the new MSN 8 and get 2 months FREE*
http://join.msn.com/?page=features/junkmail