EZLocate/Elements/getAccountInfoResponse.pm

   1
   2 package Geo::EZLocate::Elements::getAccountInfoResponse;
   3 use strict;
   4 use warnings;
   5
   6 { # BLOCK to scope variables
   7
   8 sub get_xmlns { 'http://ezlocate.na.teleatlas.com/EZClient.xsd1' }
   9
  10 __PACKAGE__->__set_name('getAccountInfoResponse');
  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 %expiration_of :ATTR(:get<expiration>);
  37 my %maximumRecords_of :ATTR(:get<maximumRecords>);
  38 my %actualRecords_of :ATTR(:get<actualRecords>);
  39 my %accountType_of :ATTR(:get<accountType>);
  40
  41 __PACKAGE__->_factory(
  42     [ qw(        resultCode
  43         expiration
  44         maximumRecords
  45         actualRecords
  46         accountType
  47
  48     ) ],
  49     {
  50         'resultCode' => \%resultCode_of,
  51         'expiration' => \%expiration_of,
  52         'maximumRecords' => \%maximumRecords_of,
  53         'actualRecords' => \%actualRecords_of,
  54         'accountType' => \%accountType_of,
  55     },
  56     {
  57         'resultCode' => 'SOAP::WSDL::XSD::Typelib::Builtin::int',
  58         'expiration' => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
  59         'maximumRecords' => 'SOAP::WSDL::XSD::Typelib::Builtin::int',
  60         'actualRecords' => 'SOAP::WSDL::XSD::Typelib::Builtin::int',
  61         'accountType' => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
  62     },
  63     {
  64
  65         'resultCode' => 'resultCode',
  66         'expiration' => 'expiration',
  67         'maximumRecords' => 'maximumRecords',
  68         'actualRecords' => 'actualRecords',
  69         'accountType' => 'accountType',
  70     }
  71 );
  72
  73 } # end BLOCK
  74
  75
  76
  77
  78
  79
  80 } # end of BLOCK
  81
  82
  83
  84 1;
  85
  86
  87 =pod
  88
  89 =head1 NAME
  90
  91 Geo::EZLocate::Elements::getAccountInfoResponse
  92
  93 =head1 DESCRIPTION
  94
  95 Perl data type class for the XML Schema defined element
  96 getAccountInfoResponse from the namespace http://ezlocate.na.teleatlas.com/EZClient.xsd1.
  97
  98
  99
 100
 101
 102
 103
 104 =head1 PROPERTIES
 105
 106 The following properties may be accessed using get_PROPERTY / set_PROPERTY
 107 methods:
 108
 109 =over
 110
 111 =item * resultCode
 112
 113  $element->set_resultCode($data);
 114  $element->get_resultCode();
 115
 116
 117
 118
 119 =item * expiration
 120
 121  $element->set_expiration($data);
 122  $element->get_expiration();
 123
 124
 125
 126
 127 =item * maximumRecords
 128
 129  $element->set_maximumRecords($data);
 130  $element->get_maximumRecords();
 131
 132
 133
 134
 135 =item * actualRecords
 136
 137  $element->set_actualRecords($data);
 138  $element->get_actualRecords();
 139
 140
 141
 142
 143 =item * accountType
 144
 145  $element->set_accountType($data);
 146  $element->get_accountType();
 147
 148
 149
 150
 151
 152 =back
 153
 154
 155 =head1 METHODS
 156
 157 =head2 new
 158
 159  my $element = Geo::EZLocate::Elements::getAccountInfoResponse->new($data);
 160
 161 Constructor. The following data structure may be passed to new():
 162
 163  {
 164    resultCode =>  $some_value, # int
 165    expiration =>  $some_value, # string
 166    maximumRecords =>  $some_value, # int
 167    actualRecords =>  $some_value, # int
 168    accountType =>  $some_value, # string
 169  },
 170
 171 =head1 AUTHOR
 172
 173 Generated by SOAP::WSDL
 174
 175 =cut
 176