[Rio-pm] SOAP::Lite

[Andre Luis]

Valeu Daniel,

Vou dar uma olhada no XML::Compile::SOAP  e vou analisar a possibilidade de
mudar.


Joao,

Sobre o SOAP::Lite um outro meio de você gerar o XML (e mais simple na minha
opinião) é :

my @final;

my $xml = <<XML;
<module xmls="teste.com">
   <teste> asas </teste>
</module>
XML

push @final, SOAP::Data->type('xml' =>  $xml);


Funciona com o SOAP::Header também.


Abs e obrigado a todos

André


2010/4/21 João André Simioni <jasimioni em gmail.com>

> 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.
>
> Assim não tem dado problema:
>
>     $soap->ns('
> http://www.gvt.com/ws/eai/siebel/solicitacaoServico/addContatoSS', 'add');
>     $soap->ns('http://www.gvt.com/metaData/cliente', 'cli');
>     $soap->ns('http://www.gvt.com/metaData/security', 'sec');
>     $soap->ns('http://www.openuri.org/', 'open');
>
>     # $soap->outputxml('true');
>     $soap->autotype(0);
>     $soap->readable(1);
>
>     my $var = SOAP::Data->name('add:addContatoSSIn' =>
>                     \SOAP::Data->value(
>                         SOAP::Data->name('add:passport' =>
>
> \SOAP::Data->value(SOAP::Data->name('sec:system'   => ''),
>
> SOAP::Data->name('sec:userName' => 'GENERICO'),
>
> SOAP::Data->name('sec:position' => '0-5220'),
>
> SOAP::Data->name('sec:viewMode' => '3'))),
>                        SOAP::Data->name('add:addContatoSSIn' =>
>
> \SOAP::Data->value(SOAP::Data->name('cli:nome'   => $nome),
>
> SOAP::Data->name('cli:telefoneComercial' => $telefone))),
>                        SOAP::Data->name('add:idSS'    => $idSS),
>                     )
>               );
>
>     my $result = $soap->addContatoSS($var);
>
>
>
>
> 2010/4/21 Daniel Ruoso <daniel em ruoso.com>
>
> Em Ter, 2010-04-20 às 17:00 -0300, Andre Luis escreveu:
>> > Salve monges,
>> > Estou com uma duvida com relação aos SOAP::Fault;
>> > É possivel adcionar um header ao retorno do SOAP::Fault ?
>>
>> O SOAP::Lite é um módulo antigo que não implementa uma boa parte das
>> especificações - p.e.: só trabalha com SOAP Encoding, não trabalha com
>> serviços Literal.
>>
>> Recomendo você avaliar a possibilidade de você migrar para o
>> XML::Compile::SOAP, que é muito mais aderente às especificações (onde
>> você poderá, com certeza, adicionar o header mesmo quando for Fault --
>> No entanto, ele não suporta SOAP Encoding ainda (mas quem é que ainda
>> usa isso?)...
>>
>> daniel
>>
>> _______________________________________________
>> Rio-pm mailing list
>> Rio-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/rio-pm
>>
>
>
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20100421/1bd8fd8d/attachment.html>