The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

# Copyright (C) 2012 Xerxes Tsang
# This program is free software; you can redistribute it and/or modify it
# under the terms of Perl Artistic License.
use strict;
use base qw/Test::Class/;
sub test_can_create_conversion_performance_report_request_and_set_all_fields : Test(6) {
my $conversion_performance_report_request = Microsoft::AdCenter::V6::ReportingService::ConversionPerformanceReportRequest->new
->Aggregation('aggregation')
->Columns('columns')
->Filter('filter')
->Scope('scope')
->Time('time')
;
ok($conversion_performance_report_request);
is($conversion_performance_report_request->Aggregation, 'aggregation', 'can get aggregation');
is($conversion_performance_report_request->Columns, 'columns', 'can get columns');
is($conversion_performance_report_request->Filter, 'filter', 'can get filter');
is($conversion_performance_report_request->Scope, 'scope', 'can get scope');
is($conversion_performance_report_request->Time, 'time', 'can get time');
};
1;