zoneminder/onvif/proxy/lib/ONVIF/PTZ/Elements/GetPresetsResponse.pm

128 lines
1.8 KiB
Perl

package ONVIF::PTZ::Elements::GetPresetsResponse;
use strict;
use warnings;
{ # BLOCK to scope variables
sub get_xmlns { 'http://www.onvif.org/ver20/ptz/wsdl' }
__PACKAGE__->__set_name('GetPresetsResponse');
__PACKAGE__->__set_nillable();
__PACKAGE__->__set_minOccurs();
__PACKAGE__->__set_maxOccurs();
__PACKAGE__->__set_ref();
use base qw(
SOAP::WSDL::XSD::Typelib::Element
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';
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);
Class::Std::initialize();
{ # BLOCK to scope variables
my %Preset_of :ATTR(:get<Preset>);
__PACKAGE__->_factory(
[ qw( Preset
) ],
{
'Preset' => \%Preset_of,
},
{
'Preset' => 'ONVIF::PTZ::Types::PTZPreset',
},
{
'Preset' => 'Preset',
}
);
} # end BLOCK
} # end of BLOCK
1;
=pod
=head1 NAME
ONVIF::PTZ::Elements::GetPresetsResponse
=head1 DESCRIPTION
Perl data type class for the XML Schema defined element
GetPresetsResponse from the namespace http://www.onvif.org/ver20/ptz/wsdl.
=head1 PROPERTIES
The following properties may be accessed using get_PROPERTY / set_PROPERTY
methods:
=over
=item * Preset
$element->set_Preset($data);
$element->get_Preset();
=back
=head1 METHODS
=head2 new
my $element = ONVIF::PTZ::Elements::GetPresetsResponse->new($data);
Constructor. The following data structure may be passed to new():
{
Preset => { # ONVIF::PTZ::Types::PTZPreset
Name => $some_value, # Name
PTZPosition => { # ONVIF::PTZ::Types::PTZVector
PanTilt => ,
Zoom => ,
},
},
},
=head1 AUTHOR
Generated by SOAP::WSDL
=cut