EZLocate/Elements/getServicesResponse.pm

   1
   2 package Geo::EZLocate::Elements::getServicesResponse;
   3 use strict;
   4 use warnings;
   5
   6 { # BLOCK to scope variables
   7
   8 sub get_xmlns { 'http://ezlocate.na.teleatlas.com/Geocoding.xsd1' }
   9
  10 __PACKAGE__->__set_name('getServicesResponse');
  11 __PACKAGE__->__set_nillable();
  12 __PACKAGE__->__set_minOccurs();
  13 __PACKAGE__->__set_maxOccurs();
  14 __PACKAGE__->__set_ref();
  15
  16 use base qw(
  17     SOAP::WSDL::XSD::Typelib::Element
  18     SOAP::WSDL::XSD::Typelib::ComplexType
  19 );
  20
  21 our $XML_ATTRIBUTE_CLASS;
  22 undef $XML_ATTRIBUTE_CLASS;
  23
  24 sub __get_attr_class {
  25     return $XML_ATTRIBUTE_CLASS;
  26 }
  27
  28 use Class::Std::Fast::Storable constructor => 'none';
  29 use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);
  30
  31 Class::Std::initialize();
  32
  33 { # BLOCK to scope variables
  34
  35 my %resultCode_of :ATTR(:get<resultCode>);
  36 my %services_of :ATTR(:get<services>);
  37
  38 __PACKAGE__->_factory(
  39     [ qw(        resultCode
  40         services
  41
  42     ) ],
  43     {
  44         'resultCode' => \%resultCode_of,
  45         'services' => \%services_of,
  46     },
  47     {
  48         'resultCode' => 'SOAP::WSDL::XSD::Typelib::Builtin::int',
  49         'services' => 'Geo::EZLocate::Types::Record',
  50     },
  51     {
  52
  53         'resultCode' => 'resultCode',
  54         'services' => 'services',
  55     }
  56 );
  57
  58 } # end BLOCK
  59
  60
  61
  62
  63
  64
  65 } # end of BLOCK
  66
  67
  68
  69 1;
  70
  71
  72 =pod
  73
  74 =head1 NAME
  75
  76 Geo::EZLocate::Elements::getServicesResponse
  77
  78 =head1 DESCRIPTION
  79
  80 Perl data type class for the XML Schema defined element
  81 getServicesResponse from the namespace http://ezlocate.na.teleatlas.com/Geocoding.xsd1.
  82
  83
  84
  85
  86
  87
  88
  89 =head1 PROPERTIES
  90
  91 The following properties may be accessed using get_PROPERTY / set_PROPERTY
  92 methods:
  93
  94 =over
  95
  96 =item * resultCode
  97
  98  $element->set_resultCode($data);
  99  $element->get_resultCode();
 100
 101
 102
 103
 104 =item * services
 105
 106  $element->set_services($data);
 107  $element->get_services();
 108
 109
 110
 111
 112
 113 =back
 114
 115
 116 =head1 METHODS
 117
 118 =head2 new
 119
 120  my $element = Geo::EZLocate::Elements::getServicesResponse->new($data);
 121
 122 Constructor. The following data structure may be passed to new():
 123
 124  {
 125    resultCode =>  $some_value, # int
 126    services =>  { # Geo::EZLocate::Types::Record
 127      nv =>  { # Geo::EZLocate::Types::NameValue
 128        name =>  $some_value, # string
 129        value =>  $some_value, # string
 130      },
 131    },
 132  },
 133
 134 =head1 AUTHOR
 135
 136 Generated by SOAP::WSDL
 137
 138 =cut
 139