in reply to Re^2: How to disable autotyping of tags in response of SOAP-server?
in thread How to disable autotyping of tags in response of SOAP-server?

without any types! How I can disable response typing on server?

I already told you how :) use basic SOAP::Data.... make some xml

I hate SOAP, and I'm immune to words and xml :) if it helps see my treasure trove of soap examples and lost knowledge,$soap->transport->add_handler("request_send", \&pp_dump );

Sorry :)

  • Comment on Re^3: How to disable autotyping of tags in response of SOAP-server?

Replies are listed 'Best First'.
Re^4: How to disable autotyping of tags in response of SOAP-server?
by Zester (Initiate) on Dec 26, 2012 at 12:58 UTC
    I use basic SOAP::Data on SOAP-server:
    package AnPackage;
use vars qw(@ISA);
@ISA = qw(Exporter SOAP::Server::Parameters);

sub createRequestRequest {
 my $self          = shift;
 my $envelope      = pop;
 my @RequestParams = $envelope->paramsin;
 my $RequestNumber = "1-13";
 return SOAP::Data->name('createRequestResponse')->value(
   SOAP::Data->name( 'requestNumber' => $RequestNumber)
   );
}
1;
__END__

    [download]
    It is not help me(:
    In output:
    <?xml version="1.0" encoding="UTF-8"?><soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"><soap:Body><createRequestRequestResponse xmlns="http://localhost/AnPackage"><requestNumber xsi:type="xsd:string">1-13</requestNumber></createRequestRequestResponse></soap:Body></soap:Envelope>
    problem: exists<<<<xsi:type="xsd:string">>>>
    I test this: 
     return SOAP::Data->name('createRequestResponse')->type(undef)->value(
     SOAP::Data->name('requestNumber')->type(undef)->value($RequestNum
+ber)
    );

    [download]

    but this is not decide problem...
[reply]
[d/l]
[select]
      Try $self->serializer->autotype( 0 );
[reply]

In Section Seekers of Perl Wisdom