File Coverage

lib/eBay/API/XML/Call/GetTokenStatus.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2              
3             package eBay::API::XML::Call::GetTokenStatus;
4              
5 1     1   2366 use strict;
  1         3  
  1         27  
6 1     1   4 use warnings;
  1         2  
  1         31  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. GetTokenStatus.pm
12             # Generated by: ......... genEBayApiDataTypes.pl
13             # Last Generated: ....... 08/24/2008 16:44
14             # API Release Number: ... 579
15             #
16             ##########################################################################
17              
18             =head1 NAME
19              
20             eBay::API::XML::Call::GetTokenStatus
21              
22             =head1 DESCRIPTION
23              
24              
25              
26             =head1 SYNOPSIS
27              
28             =cut
29              
30              
31             =head1 INHERITANCE
32              
33             eBay::API::XML::Call::GetTokenStatus inherits from the L class
34              
35             =cut
36              
37 1     1   40 use eBay::API::XML::BaseCall;
  0            
  0            
38             our @ISA = ("eBay::API::XML::BaseCall");
39              
40             use eBay::API::XML::Call::GetTokenStatus::GetTokenStatusRequestType;
41             use eBay::API::XML::Call::GetTokenStatus::GetTokenStatusResponseType;
42              
43              
44             =head1 Subroutines:
45              
46             =cut
47              
48             sub getApiCallName {
49             return 'GetTokenStatus';
50             }
51             sub getRequestDataTypeFullPackage {
52             return 'eBay::API::XML::Call::GetTokenStatus::GetTokenStatusRequestType';
53             }
54             sub getResponseDataTypeFullPackage {
55             return 'eBay::API::XML::Call::GetTokenStatus::GetTokenStatusResponseType';
56             }
57              
58             #
59             # input properties
60             #
61              
62              
63              
64             #
65             # output properties
66             #
67              
68             =head2 getTokenStatus()
69              
70             Returns token status and details. For example, if revoked, whether by eBay, the user, or the application, and also when revoked.
71              
72             Returned: Always
73             # Returns: 'ns:TokenStatusType'
74              
75             =cut
76            
77             sub getTokenStatus {
78             my $self = shift;
79             return $self->getResponseDataType()->getTokenStatus();
80             }
81              
82              
83              
84              
85              
86             1;