EZLocate/Types/Geocode.pm

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