From 7be09bed7f9acdf8a20362c49831dfb39fc4e7a4 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Fri, 2 Nov 2012 14:28:31 -0700 Subject: initial commit --- EZLocate/Types/OutputField.pm | 120 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 120 insertions(+) create mode 100644 EZLocate/Types/OutputField.pm (limited to 'EZLocate/Types/OutputField.pm') diff --git a/EZLocate/Types/OutputField.pm b/EZLocate/Types/OutputField.pm new file mode 100644 index 0000000..b7e237e --- /dev/null +++ b/EZLocate/Types/OutputField.pm @@ -0,0 +1,120 @@ +package Geo::EZLocate::Types::OutputField; +use strict; +use warnings; + + +__PACKAGE__->_set_element_form_qualified(0); + +sub get_xmlns { 'http://ezlocate.na.teleatlas.com/Geocoding.xsd1' }; + +our $XML_ATTRIBUTE_CLASS; +undef $XML_ATTRIBUTE_CLASS; + +sub __get_attr_class { + return $XML_ATTRIBUTE_CLASS; +} + +use Class::Std::Fast::Storable constructor => 'none'; +use base qw(SOAP::WSDL::XSD::Typelib::ComplexType); + +Class::Std::initialize(); + +{ # BLOCK to scope variables + +my %name_of :ATTR(:get); +my %description_of :ATTR(:get); +my %type_of :ATTR(:get); + +__PACKAGE__->_factory( + [ qw( name + description + type + + ) ], + { + 'name' => \%name_of, + 'description' => \%description_of, + 'type' => \%type_of, + }, + { + 'name' => 'SOAP::WSDL::XSD::Typelib::Builtin::string', + 'description' => 'SOAP::WSDL::XSD::Typelib::Builtin::string', + 'type' => 'SOAP::WSDL::XSD::Typelib::Builtin::int', + }, + { + + 'name' => 'name', + 'description' => 'description', + 'type' => 'type', + } +); + +} # end BLOCK + + + + + + + +1; + + +=pod + +=head1 NAME + +Geo::EZLocate::Types::OutputField + +=head1 DESCRIPTION + +Perl data type class for the XML Schema defined complexType +OutputField from the namespace http://ezlocate.na.teleatlas.com/Geocoding.xsd1. + + + + + + +=head2 PROPERTIES + +The following properties may be accessed using get_PROPERTY / set_PROPERTY +methods: + +=over + +=item * name + + +=item * description + + +=item * type + + + + +=back + + +=head1 METHODS + +=head2 new + +Constructor. The following data structure may be passed to new(): + + { # Geo::EZLocate::Types::OutputField + name => $some_value, # string + description => $some_value, # string + type => $some_value, # int + }, + + + + +=head1 AUTHOR + +Generated by SOAP::WSDL + +=cut + -- cgit v1.2.1