Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
aislan.torres Novato
Registrado: Quinta-Feira, 21 de Junho de 2012 Mensagens: 2
|
Enviada: Qui Jun 21, 2012 5:57 pm Assunto: Não consigo consultar StatusServico em webservice SVAN |
|
|
Boa tarde a todos!
Preciso de ajuda, não consigo consultar status do serviço utilizando o ambiente svan (cliente do ES). A rotina funciona normalmente para MG, mas quando vou utilizar os serviços do SVAN, retorna a mensagem:
"Server did not recognize the value of HTTP Header SOAPAction: http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico2."
O estranho é que utilizando os webservices de MG funciona normalmente.
Meu código:
Código: |
procedure TEsSeFaz2.ExecuteNovo(MostraMsg : Boolean);
var
Texto, S, Certas, Erradas: string;
Resposta: TStringStream;
ReqResp: THTTPReqResp;
begin
// Cria stream para armazenar o XML de resposta.
Resposta := TStringStream.Create('');
// Define texto XML para status de serviço.
Texto := '<xml>'
+ ' <soap12> '
+ '<soap12>'
+ ' <nfeCabecMsg> '
+ ' <cUF>32</cUF> '
+ ' <versaoDados>2.00</versaoDados> '
+ ' </nfeCabecMsg>'
+ '</soap12>'
+ '<soap12>'
+ ' <nfeDadosMsg>'
+ ' <consStatServ>'
+ ' <tpAmb>2</tpAmb>'
+ ' <cUF>32</cUF>'
+ ' <xServ>STATUS</xServ>'
+ ' </consStatServ>'
+ ' </nfeDadosMsg>'
+ '</soap12>'
+ '</soap12>';
// Cria e configura objeto para comunicação com o webservice.
ReqResp := THTTPReqResp.Create(nil);
ReqResp.OnBeforePost := OnBeforePost;
ReqResp.UseUTF8InHeader := True;
ReqResp.URL := FURL;
ReqResp.SoapAction := nfe.GetSoapAction(self.FConfig.FModalidade,FServico);
ReqResp.Execute(Texto, Resposta);
self.FRetWS := Resposta.DataString;
.
.
.
.
.
end;
|
P.S.: Conferi no componente ACBrNfe e está praticamente do mesmo jeito, mas lá consegue a comunicação normalmente e no meu programa não. |
|
Voltar ao Topo |
|
|
aislan.torres Novato
Registrado: Quinta-Feira, 21 de Junho de 2012 Mensagens: 2
|
Enviada: Seg Jun 25, 2012 3:38 pm Assunto: Re: Não consigo consultar StatusServico em webservice SVAN |
|
|
Após ficar levando na cara do programa por alguns dias, consegui descobrir meu erro, eu não estava formatando o contentheader antes de enviar (requerido para os webservices .asmx - por isso em MG dava certo).
Agradeço a atenção de todos. |
|
Voltar ao Topo |
|
|
hmzbr Novato
Registrado: Segunda-Feira, 17 de Janeiro de 2011 Mensagens: 3
|
Enviada: Ter Abr 22, 2014 4:34 pm Assunto: Ajuda |
|
|
Aislan, tudo bem?
Sei que o tópico é antigo, mas acredito que estou com o mesmo problema que aconteceu contigo...
Poderia me ajudar falando como você fez para solucionar o problema?
Agradeço desde já.
Um abraço. |
|
Voltar ao Topo |
|
|
|