Boa dica, obrigado!<br><br><div class="gmail_quote">2010/4/21 Andre Luis <span dir="ltr"><<a href="mailto:alpbs2003@gmail.com">alpbs2003@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
Valeu Daniel,<br><br>Vou dar uma olhada no XML::Compile::SOAP e vou analisar a possibilidade de mudar.<br><br><br>Joao,<br><br>Sobre o SOAP::Lite um outro meio de você gerar o XML (e mais simple na minha opinião) é :<br>
<br>
my @final;<br><br>my $xml = <<XML;<br><module xmls="<a href="http://teste.com" target="_blank">teste.com</a>"><br> <teste> asas </teste><br></module><br>XML<br><br>push @final, SOAP::Data->type('xml' => $xml);<br>
<br><br>Funciona com o SOAP::Header também.<br><br><br>Abs e obrigado a todos<br><br>André<br><br><br><div class="gmail_quote">2010/4/21 João André Simioni <span dir="ltr"><<a href="mailto:jasimioni@gmail.com" target="_blank">jasimioni@gmail.com</a>></span><div>
<div></div><div class="h5"><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Eu nunca construo WebServices, só acesso e eu sei que eu tenho usado o SOAP::Lite para fazer acesso a WebServices com WSDL e tenho tido vários problemas. O que eu tenho feito agora é baixar o WSDL no SOAPUi, abrir a request e copiar a estrutura que ele monta. Importo os NS e faço o array das variáveis.<br>
<br>Assim não tem dado problema:<br><br> $soap->ns('<a href="http://www.gvt.com/ws/eai/siebel/solicitacaoServico/addContatoSS" target="_blank">http://www.gvt.com/ws/eai/siebel/solicitacaoServico/addContatoSS</a>', 'add');<br>
$soap->ns('<a href="http://www.gvt.com/metaData/cliente" target="_blank">http://www.gvt.com/metaData/cliente</a>', 'cli');<br> $soap->ns('<a href="http://www.gvt.com/metaData/security" target="_blank">http://www.gvt.com/metaData/security</a>', 'sec');<br>
$soap->ns('<a href="http://www.openuri.org/" target="_blank">http://www.openuri.org/</a>', 'open');<br><br> # $soap->outputxml('true');<br> $soap->autotype(0);<br> $soap->readable(1);<br>
<br>
my $var = SOAP::Data->name('add:addContatoSSIn' =><br> \SOAP::Data->value(<br> SOAP::Data->name('add:passport' =><br> \SOAP::Data->value(SOAP::Data->name('sec:system' => ''),<br>
SOAP::Data->name('sec:userName' => 'GENERICO'),<br> SOAP::Data->name('sec:position' => '0-5220'),<br>
SOAP::Data->name('sec:viewMode' => '3'))),<br> SOAP::Data->name('add:addContatoSSIn' =><br> \SOAP::Data->value(SOAP::Data->name('cli:nome' => $nome),<br>
SOAP::Data->name('cli:telefoneComercial' => $telefone))),<br> SOAP::Data->name('add:idSS' => $idSS),<br> )<br>
);<br><br> my $result = $soap->addContatoSS($var);<br><br><br><br><br><div class="gmail_quote">2010/4/21 Daniel Ruoso <span dir="ltr"><<a href="mailto:daniel@ruoso.com" target="_blank">daniel@ruoso.com</a>></span><div>
<div></div><div><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Em Ter, 2010-04-20 às 17:00 -0300, Andre Luis escreveu:<br>
<div>> Salve monges,<br>
> Estou com uma duvida com relação aos SOAP::Fault;<br>
> É possivel adcionar um header ao retorno do SOAP::Fault ?<br>
<br>
</div>O SOAP::Lite é um módulo antigo que não implementa uma boa parte das<br>
especificações - p.e.: só trabalha com SOAP Encoding, não trabalha com<br>
serviços Literal.<br>
<br>
Recomendo você avaliar a possibilidade de você migrar para o<br>
XML::Compile::SOAP, que é muito mais aderente às especificações (onde<br>
você poderá, com certeza, adicionar o header mesmo quando for Fault --<br>
No entanto, ele não suporta SOAP Encoding ainda (mas quem é que ainda<br>
usa isso?)...<br>
<font color="#888888"><br>
daniel<br>
</font><div><div></div><div><br>
_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
</div></div></blockquote></div></div></div><br>
<br>_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br></blockquote></div></div></div><br>
<br>_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br></blockquote></div><br>