a554e87f49
git-cpan-module: SOAP-WSDL git-cpan-version: 2.00_09 git-cpan-authorid: MKUTTER git-cpan-file: authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00_09.tar.gz
85 lines
1.7 KiB
Perl
85 lines
1.7 KiB
Perl
package MyElements::GetWeatherResponse;
|
|
use strict;
|
|
use Class::Std::Storable;
|
|
use SOAP::WSDL::XSD::Typelib::Element;
|
|
|
|
# atomic complexType
|
|
# <element name="GetWeatherResponse"><complexType> definition
|
|
use SOAP::WSDL::XSD::Typelib::ComplexType;
|
|
use base qw(
|
|
SOAP::WSDL::XSD::Typelib::Element
|
|
SOAP::WSDL::XSD::Typelib::ComplexType
|
|
);
|
|
|
|
|
|
my %GetWeatherResult_of :ATTR(:get<GetWeatherResult>);
|
|
|
|
|
|
__PACKAGE__->_factory(
|
|
[ qw(
|
|
GetWeatherResult
|
|
) ],
|
|
{
|
|
GetWeatherResult => \%GetWeatherResult_of,
|
|
|
|
},
|
|
{
|
|
|
|
GetWeatherResult => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
|
|
|
|
}
|
|
);
|
|
|
|
|
|
|
|
sub get_xmlns { 'http://www.webserviceX.NET' }
|
|
|
|
__PACKAGE__->__set_name('GetWeatherResponse');
|
|
__PACKAGE__->__set_nillable();
|
|
__PACKAGE__->__set_minOccurs();
|
|
__PACKAGE__->__set_maxOccurs();
|
|
__PACKAGE__->__set_ref('');
|
|
|
|
1;
|
|
|
|
|
|
__END__
|
|
|
|
=pod
|
|
|
|
=head1 NAME MyElements::GetWeatherResponse
|
|
|
|
=head1 SYNOPSIS
|
|
|
|
=head1 DESCRIPTION
|
|
|
|
Type class for the XML element GetWeatherResponse.
|
|
|
|
=head1 PROPERTIES
|
|
|
|
The following properties may be accessed using get_PROPERTY / set_PROPERTY
|
|
methods:
|
|
|
|
GetWeatherResult
|
|
|
|
=head1 Object structure
|
|
|
|
GetWeatherResult => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
|
|
|
|
|
|
Structure as perl hash:
|
|
|
|
The object structure is displayed as hash below though this is not correct.
|
|
Complex hash elements actually are objects of their corresponding classes
|
|
(look for classes of the same name in your typleib).
|
|
new() will accept a hash structure like this, but transform it to a object
|
|
tree.
|
|
|
|
'GetWeatherResponse'=> {
|
|
'GetWeatherResult' => $someValue,
|
|
},
|
|
|
|
|
|
=cut
|
|
|