Boa Tarde ..
Segue abaixo a WSDL criada, para quem tiver o conhecimento e puder ajudar
Desde já agradeço.
Paulo
//--------------------------------------------------------------------------
----
// <autogenerated>
// This code was generated by a tool.
// Runtime Version: 1.1.4322.2407
//
// Changes to this file may cause incorrect behavior and will be lost if
// the code is regenerated.
// </autogenerated>
//--------------------------------------------------------------------------
----
//
// This source code was auto-generated by wsdl, Version=1.1.4322.2407.
//
unit WebReference.WSDL;
interface
uses System.Diagnostics,
System.Xml.Serialization,
System.Web.Services.Protocols,
System.ComponentModel,
System.Web.Services,
System.Web.Services.Description, System.Xml.Schema;
type
EDI = class;
RETTRANSP = class;
/// <remarks/>
[System.Diagnostics.DebuggerStepThroughAttribute]
[System.ComponentModel.DesignerCategoryAttribute('code')]
[System.Web.Services.WebServiceBindingAttribute(Name='RecebeFaturaSoap',
Namespace='h' +
'ttp://tempuri.org/WSFaturaCIQ/RecebeFatura')]
RecebeFatura = class(System.Web.Services.Protocols.SoapHttpClientProtocol)
/// <remarks/>
public
constructor Create;
/// <remarks/>
[System.Web.Services.Protocols.SoapDocumentMethodAttribute('http://tempu' +
'ri.org/WSFaturaCIQ/RecebeFatura/RecebeFatura',
RequestNamespace='http:/' +
'/tempuri.org/WSFaturaCIQ/RecebeFatura',
ResponseNamespace='http://tempu' +
'ri.org/WSFaturaCIQ/RecebeFatura',
Use=System.Web.Services.Description.SoapBindingUse.Literal,
ParameterStyle=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)]
[result:
System.Xml.Serialization.XmlElementAttribute(Namespace='http://' +
'IntegracaoCIQ.RetTransp/')]
function
RecebeFatura_([System.Xml.Serialization.XmlElementAttribute(Namespace='h' +
'ttp://IntegracaoCIQ.RecFatura')] fatura: EDI): RETTRANSP;
/// <remarks/>
function BeginRecebeFatura(fatura: EDI; callback: System.AsyncCallback;
asyncState: System.Object): System.IAsyncResult;
/// <remarks/>
function EndRecebeFatura(asyncResult: System.IAsyncResult): RETTRANSP;
end;
EDICPFH = class;
EDICPFD = class;
TArrayOfEDICPFD = array of EDICPFD;
/// <remarks/>
[System.Xml.Serialization.XmlTypeAttribute(Namespace='http://IntegracaoCIQ'
+
'.RecFatura')]
EDI = class
/// <remarks/>
public
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
CPFH: EDICPFH;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute('CPFD',
Form=System.Xml.Schema.XmlSchemaForm.Unqualified)]
CPFD: TArrayOfEDICPFD;
end;
/// <remarks/>
[System.Xml.Serialization.XmlTypeAttribute(Namespace='http://IntegracaoCIQ'
+
'.RecFatura')]
EDICPFH = class
/// <remarks/>
public
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PHUSINC: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PHFCGCT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PHCCGCT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PHDCGCT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PHNRFAT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PHDTEMF: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PHDTVEF: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PHVLFAT: System.Double;
end;
/// <remarks/>
[System.Xml.Serialization.XmlTypeAttribute(Namespace='http://IntegracaoCIQ'
+
'.RetTransp/')]
RETTRANSPCTRCRET = class
/// <remarks/>
public
[System.Xml.Serialization.XmlElementAttribute(DataType='integer')]
CDRETCTRC: string;
/// <remarks/>
DSRETCTRC: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(DataType='integer')]
NRCTRC: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(DataType='integer')]
NRFATURA: string;
end;
/// <remarks/>
[System.Xml.Serialization.XmlTypeAttribute(Namespace='http://IntegracaoCIQ'
+
'.RetTransp/')]
RETTRANSPFATRET = class
/// <remarks/>
public
[System.Xml.Serialization.XmlElementAttribute(DataType='integer')]
CDRETFAT: string;
/// <remarks/>
DSRETFAT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(DataType='integer')]
NRFATURA: string;
end;
TArrayOfRETTRANSPCTRCRET = array of RETTRANSPCTRCRET;
/// <remarks/>
[System.Xml.Serialization.XmlTypeAttribute(Namespace='http://IntegracaoCIQ'
+
'.RetTransp/')]
RETTRANSP = class
/// <remarks/>
public
FATRET: RETTRANSPFATRET;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute('CTRCRET')]
CTRCRET: TArrayOfRETTRANSPCTRCRET;
end;
/// <remarks/>
[System.Xml.Serialization.XmlTypeAttribute(Namespace='http://IntegracaoCIQ'
+
'.RecFatura')]
EDICPFD = class
/// <remarks/>
public
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDCCGCT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDFCGCT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDDCGCT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDNRFAT: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDDTEMF: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDNRCTR: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDSRCTR: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDDTCTR: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDCCGCR: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDFCGCR: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDDCGCR: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDCCGCD: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDFCGCD: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDDCGCD: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified, DataType='i' +
'nteger')]
PDNRNF: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDQTFAT: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDVLTAR: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDVLFPV: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDVLLBF: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDVLLBP: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDVLCTR: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDBCICMS: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDICMST: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDICMSD: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDAICMS: System.Double;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDPLTRA: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDPLSR1: string;
/// <remarks/>
[System.Xml.Serialization.XmlElementAttribute(Form=System.Xml.Schema.XmlSche
maForm.Unqualified)]
PDPLSR2: string;
end;
implementation
{$AUTOBOX ON}
{$HINTS OFF}
{$WARNINGS OFF}
/// <remarks/>
constructor RecebeFatura.Create;
begin
inherited Create;
Self.Url :=
'http://integracao.carbocloro.com.br/WSTransp/RecebeFatura.asm' +
'x';
end;
/// <remarks/>
function
RecebeFatura.RecebeFatura_([System.Xml.Serialization.XmlElementAttribute(Nam
espace='h' +
'ttp://IntegracaoCIQ.RecFatura')] fatura: EDI): RETTRANSP;
type
TArrayOfSystem_Object = array of System.Object;
var
results: TArrayOfSystem_Object;
begin
results := Self.Invoke('RecebeFatura',
TArrayOfSystem_Object.Create(fatura));
Result := (RETTRANSP(results[0]));
end;
/// <remarks/>
function RecebeFatura.BeginRecebeFatura(fatura: EDI; callback:
System.AsyncCallback;
asyncState: System.Object): System.IAsyncResult;
type
TArrayOfSystem_Object = array of System.Object;
begin
Result := Self.BeginInvoke('RecebeFatura',
TArrayOfSystem_Object.Create(fatura),
callback, asyncState);
end;
/// <remarks/>
function RecebeFatura.EndRecebeFatura(asyncResult: System.IAsyncResult):
RETTRANSP;
type
TArrayOfSystem_Object = array of System.Object;
var
results: TArrayOfSystem_Object;
begin
results := Self.EndInvoke(asyncResult);
Result := (RETTRANSP(results[0]));
end;
end.
De: [email protected] [mailto:[email protected]]
Em nome de Paulo Cesar Valadares
Enviada em: sexta-feira, 20 de março de 2009 10:49
Para: [email protected]
Cc: [email protected]
Assunto: [lista-delphi] Erro chamada do Web Service
Bom dia Pessoal .
Estou desenvolvendo uma integração com um Web Service no Delphi 2006,
adicionei a WSDL na Web References, estou utilizando as classes e passando
os valores corretamente, porem quando chamo a única função disponível na
WSDL , esta me retornando o seguinte erro no exception e.message.
Nome do método de Web Service RecebeFatura não é válido.
Onde RecebeFatura é o nome da função disponibilizada pela
WSDL, alguém já teve esse tipo de erro.
Tenho outra aplicação com outro Web Service e também esta
tudo certo, porem quando chamo a função disponibilizada pela WSDL esta
retornando o seguinte erro.
A conexão subjacente estava fechada: Erro
inesperado em um recebimento.
Desde já agradeço.
Paulo Cesar
[As partes desta mensagem que não continham texto foram removidas]
__________ Informação do NOD32 IMON 3949 (20090319) __________
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
_____
Esta mensagem foi verificada pelo E-mail Protegido Terra.
Atualizado em 20/03/2009
[As partes desta mensagem que não continham texto foram removidas]
