File: ArrayOfPerson.pm

package info (click to toggle)
libsoap-wsdl-perl 3.004-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 2,600 kB
  • sloc: perl: 8,433; xml: 1,769; java: 19; makefile: 15
file content (98 lines) | stat: -rw-r--r-- 2,073 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
package MyTypes::ArrayOfPerson;
use strict;
use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);

Class::Std::initialize();

{ # BLOCK to scope variables

my %NewElement_of :ATTR(:get<NewElement>);

__PACKAGE__->_factory(
    [ qw(
        NewElement
    ) ],
    {
        NewElement => \%NewElement_of,
    },
    {
        NewElement => 'MyTypes::Person',
    }
);

} # end BLOCK






1;

=pod

=head1 NAME

MyTypes::ArrayOfPerson

=head1 DESCRIPTION

Perl data type class for the XML Schema defined complextype
ArrayOfPerson from the namespace http://www.example.org/benchmark/.

=head2 PROPERTIES

The following properties may be accessed using get_PROPERTY / set_PROPERTY
methods:

 NewElement


=head1 METHODS

=head2 new

Constructor. The following data structure may be passed to new():

 { # MyTypes::ArrayOfPerson
   NewElement =>    { # MyTypes::Person
     PersonID =>      { # MyTypes::PersonID
       ID =>  $some_value, # int
     },
     Salutation =>  $some_value, # string
     Name =>  $some_value, # string
     GivenName =>  $some_value, # string
     DateOfBirth =>  $some_value, # date
     HomeAddress =>      { # MyTypes::Address
       Street =>  $some_value, # string
       ZIP =>  $some_value, # string
       City =>  $some_value, # string
       Country =>  $some_value, # string
       PhoneNumber => $some_value, # PhoneNumber
       MobilePhoneNumber => $some_value, # PhoneNumber
     },
     WorkAddress =>      { # MyTypes::Address
       Street =>  $some_value, # string
       ZIP =>  $some_value, # string
       City =>  $some_value, # string
       Country =>  $some_value, # string
       PhoneNumber => $some_value, # PhoneNumber
       MobilePhoneNumber => $some_value, # PhoneNumber
     },
     Contracts =>      { # MyTypes::ArrayOfContract
       Contract =>        { # MyTypes::Contract
         ContractID =>  $some_value, # long
         ContractName =>  $some_value, # string
       },
     },
   },
 },

=head1 AUTHOR

Generated by SOAP::WSDL

=cut