Sponsoring The Perl Toolchain Summit 2025: Help make this important event another success Learn more

$Shipment::Temando::WSDL::Elements::createLocation::VERSION = '3.07';
use strict;
{ # BLOCK to scope variables
sub get_xmlns { 'http://' . $Shipment::Temando::WSDL::Interfaces::quoting_Service::quoting_port::ns_url . '/schema/2009_06/server.xsd' }
__PACKAGE__->__set_name('createLocation');
__PACKAGE__->__set_nillable();
__PACKAGE__->__set_minOccurs();
__PACKAGE__->__set_maxOccurs();
__PACKAGE__->__set_ref();
use base qw(
SOAP::WSDL::XSD::Typelib::ComplexType
);
our $XML_ATTRIBUTE_CLASS;
undef $XML_ATTRIBUTE_CLASS;
sub __get_attr_class {
return $XML_ATTRIBUTE_CLASS;
}
use Class::Std::Fast::Storable constructor => 'none';
Class::Std::initialize();
{ # BLOCK to scope variables
my %clientId_of :ATTR(:get<clientId>);
my %location_of :ATTR(:get<location>);
__PACKAGE__->_factory(
[ qw( clientId
location
) ],
{
'clientId' => \%clientId_of,
'location' => \%location_of,
},
{
'clientId' => 'Shipment::Temando::WSDL::Types::ClientId',
'location' => 'Shipment::Temando::WSDL::Types::Location',
},
{
'clientId' => 'clientId',
'location' => 'location',
}
);
} # end BLOCK
} # end of BLOCK
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
Shipment::Temando::WSDL::Elements::createLocation
=head1 VERSION
version 3.07
=head1 DESCRIPTION
Perl data type class for the XML Schema defined element
createLocation from the namespace http://' . $Shipment::Temando::WSDL::Interfaces::quoting_Service::quoting_port::ns_url . '/schema/2009_06/server.xsd.
=head1 NAME
Shipment::Temando::WSDL::Elements::createLocation
=head1 PROPERTIES
The following properties may be accessed using get_PROPERTY / set_PROPERTY
methods:
=over
=item * clientId
$element->set_clientId($data);
$element->get_clientId();
=item * location
$element->set_location($data);
$element->get_location();
=back
=head1 METHODS
=head2 new
my $element = Shipment::Temando::WSDL::Elements::createLocation->new($data);
Constructor. The following data structure may be passed to new():
{
clientId => $some_value, # ClientId
location => { # Shipment::Temando::WSDL::Types::Location
description => $some_value, # LocationName
type => $some_value, # LocationPosition
contactName => $some_value, # ContactName
companyName => $some_value, # CompanyName
street => $some_value, # Address
suburb => $some_value, # Suburb
state => $some_value, # State
code => $some_value, # PostalCode
country => $some_value, # CountryCode
phone1 => $some_value, # Phone
phone2 => $some_value, # Phone
fax => $some_value, # Fax
email => $some_value, # Email
loadingFacilities => $some_value, # YesNoOption
forklift => $some_value, # YesNoOption
dock => $some_value, # YesNoOption
limitedAccess => $some_value, # YesNoOption
postalBox => $some_value, # YesNoOption
auspostMerchantLocationId => $some_value, # AuspostMerchantLocationId
auspostLodgementFacility => $some_value, # AuspostLodgementFacility
manifesting => $some_value, # YesNoOption
},
},
=head1 AUTHOR
Generated by SOAP::WSDL
=head1 AUTHOR
Andrew Baerg <baergaj@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2018 by Andrew Baerg.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut