|
Lines 32-38
my $builder = t::lib::TestBuilder->new;
Link Here
|
| 32 |
|
32 |
|
| 33 |
subtest '_build_url_query' => sub { |
33 |
subtest '_build_url_query' => sub { |
| 34 |
|
34 |
|
| 35 |
plan tests => 2; |
35 |
plan tests => 3; |
| 36 |
|
36 |
|
| 37 |
$schema->storage->txn_begin; |
37 |
$schema->storage->txn_begin; |
| 38 |
|
38 |
|
|
Lines 47-53
subtest '_build_url_query' => sub {
Link Here
|
| 47 |
class => 'Koha::ERM::EUsage::UsageDataProviders', |
47 |
class => 'Koha::ERM::EUsage::UsageDataProviders', |
| 48 |
value => { |
48 |
value => { |
| 49 |
service_url => $service_url, api_key => $api_key, requestor_id => $requestor_id, |
49 |
service_url => $service_url, api_key => $api_key, requestor_id => $requestor_id, |
| 50 |
customer_id => $customer_id, name => $name, service_platform => undef |
50 |
customer_id => $customer_id, name => $name, service_platform => undef, report_release => 5 |
| 51 |
} |
51 |
} |
| 52 |
} |
52 |
} |
| 53 |
); |
53 |
); |
|
Lines 79-86
subtest '_build_url_query' => sub {
Link Here
|
| 79 |
{ |
79 |
{ |
| 80 |
class => 'Koha::ERM::EUsage::UsageDataProviders', |
80 |
class => 'Koha::ERM::EUsage::UsageDataProviders', |
| 81 |
value => { |
81 |
value => { |
| 82 |
service_url => $service_url, api_key => $api_key, requestor_id => $requestor_id, |
82 |
service_url => $service_url, api_key => $api_key, requestor_id => $requestor_id, |
| 83 |
customer_id => $customer_id, name => $name, service_platform => $test_platform |
83 |
customer_id => $customer_id, name => $name, service_platform => $test_platform, report_release => 5 |
| 84 |
} |
84 |
} |
| 85 |
} |
85 |
} |
| 86 |
); |
86 |
); |
|
Lines 108-113
subtest '_build_url_query' => sub {
Link Here
|
| 108 |
. $test_platform |
108 |
. $test_platform |
| 109 |
); |
109 |
); |
| 110 |
|
110 |
|
|
|
111 |
my $usage_data_provider_51 = $builder->build_object( |
| 112 |
{ |
| 113 |
class => 'Koha::ERM::EUsage::UsageDataProviders', |
| 114 |
value => { |
| 115 |
service_url => $service_url, api_key => $api_key, requestor_id => $requestor_id, |
| 116 |
customer_id => $customer_id, name => $name, service_platform => $test_platform, report_release => '5.1' |
| 117 |
} |
| 118 |
} |
| 119 |
); |
| 120 |
|
| 121 |
$usage_data_provider_51->{report_type} = 'TR_J1'; |
| 122 |
$usage_data_provider_51->{begin_date} = '2023-08-01'; |
| 123 |
$usage_data_provider_51->{end_date} = '2023-09-30'; |
| 124 |
|
| 125 |
is( |
| 126 |
$usage_data_provider_51->_build_url_query, |
| 127 |
$service_url |
| 128 |
. '/r51/reports/' |
| 129 |
. lc( $usage_data_provider->{report_type} ) |
| 130 |
. '?customer_id=' |
| 131 |
. $customer_id |
| 132 |
. '&requestor_id=' |
| 133 |
. $requestor_id |
| 134 |
. '&api_key=' |
| 135 |
. $api_key |
| 136 |
. '&begin_date=' |
| 137 |
. substr( $usage_data_provider->{begin_date}, 0, 7 ) |
| 138 |
. '&end_date=' |
| 139 |
. substr( $usage_data_provider->{end_date}, 0, 7 ) |
| 140 |
. '&platform=' |
| 141 |
. $test_platform |
| 142 |
); |
| 143 |
|
| 111 |
$schema->storage->txn_rollback; |
144 |
$schema->storage->txn_rollback; |
| 112 |
|
145 |
|
| 113 |
}; |
146 |
}; |
| 114 |
- |
|
|