File Coverage

blib/lib/XML/SRS/Handle/Update.pm
Criterion Covered Total %
statement 1 3 33.3
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 2 4 50.0


line stmt bran cond sub pod time code
1             package XML::SRS::Handle::Update;
2              
3 1     1   1399 use Moose;
  0            
  0            
4             use PRANG::Graph;
5             use XML::SRS::Types;
6             use XML::SRS::Server::List;
7             use PRANG::XMLSchema::Types;
8              
9             # attributes
10             has_attr 'handle_id' =>
11             is => "ro",
12             isa => "Str",
13             xml_name => "HandleId",
14             predicate => "has_handle_id",
15             ;
16              
17             has_attr 'name' =>
18             is => "ro",
19             isa => "Str",
20             xml_name => "Name",
21             xml_required => 0,
22             predicate => "has_name",
23             ;
24              
25             has_attr 'email' =>
26             is => "ro",
27             isa => "Str",
28             xml_name => "Email",
29             xml_required => 0,
30             predicate => "has_email",
31             ;
32              
33             has_attr 'action_id' =>
34             is => "ro",
35             isa => "Str",
36             xml_name => "ActionId",
37             xml_required => 0,
38             predicate => "has_action_id",
39             ;
40              
41             has_attr 'delete' =>
42             is => 'rw',
43             isa => 'PRANG::XMLSchema::boolean',
44             xml_name => 'Delete',
45             xml_required => 0,
46             ;
47              
48             # elements
49             has_element 'address' =>
50             is => "ro",
51             isa => "XML::SRS::Contact::Address",
52             xml_nodeName => "PostalAddress",
53             predicate => "has_address",
54             xml_required => 0,
55             coerce => 1,
56             ;
57              
58             has_element 'phone' =>
59             is => "ro",
60             isa => "XML::SRS::Contact::PSTN",
61             predicate => "has_phone",
62             xml_nodeName => "Phone",
63             xml_required => 0,
64             coerce => 1,
65             ;
66              
67             has_element 'fax' =>
68             is => "ro",
69             isa => "XML::SRS::Contact::PSTN",
70             predicate => "has_fax",
71             xml_nodeName => "Fax",
72             xml_required => 0,
73             coerce => 1,
74             ;
75              
76             has_element 'audit' =>
77             is => "rw",
78             isa => "XML::SRS::AuditDetails",
79             xml_nodeName => "AuditDetails",
80             xml_required => 0,
81             predicate => "has_audit",
82             ;
83              
84             with 'XML::SRS::Audit';
85              
86             sub root_element { 'HandleUpdate' }
87             with 'XML::SRS::Action';
88              
89             1;