The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Yahoo::Marketing::APT::Test::AdjustmentOrder;
# Copyright (c) 2010 Yahoo! Inc.  All rights reserved.  
# The copyrights to the contents of this file are licensed under the Perl Artistic License (ver. 15 Aug 1997) 

use strict; use warnings;

use base qw/Test::Class/;
use Test::More;

use Yahoo::Marketing::APT::AdjustmentOrder;

sub test_can_create_adjustment_order_and_set_all_fields : Test(17) {

    my $adjustment_order = Yahoo::Marketing::APT::AdjustmentOrder->new
                                                            ->ID( 'id' )
                                                            ->accountID( 'account id' )
                                                            ->agencyName( 'agency name' )
                                                            ->certificationTimestamp( '2009-01-06T17:51:55' )
                                                            ->certifiedByUserID( 'certified by user id' )
                                                            ->certifiedByUserName( 'certified by user name' )
                                                            ->companyName( 'company name' )
                                                            ->currency( 'currency' )
                                                            ->endDate( '2009-01-07T17:51:55' )
                                                            ->lastReconciliationTimestamp( '2009-01-08T17:51:55' )
                                                            ->name( 'name' )
                                                            ->processingStatus( 'processing status' )
                                                            ->reconciliationMonth( 'reconciliation month' )
                                                            ->salesPersonName( 'sales person name' )
                                                            ->startDate( '2009-01-09T17:51:55' )
                                                            ->thirdPartySource( 'third party source' )
                   ;

    ok( $adjustment_order );

    is( $adjustment_order->ID, 'id', 'can get id' );
    is( $adjustment_order->accountID, 'account id', 'can get account id' );
    is( $adjustment_order->agencyName, 'agency name', 'can get agency name' );
    is( $adjustment_order->certificationTimestamp, '2009-01-06T17:51:55', 'can get 2009-01-06T17:51:55' );
    is( $adjustment_order->certifiedByUserID, 'certified by user id', 'can get certified by user id' );
    is( $adjustment_order->certifiedByUserName, 'certified by user name', 'can get certified by user name' );
    is( $adjustment_order->companyName, 'company name', 'can get company name' );
    is( $adjustment_order->currency, 'currency', 'can get currency' );
    is( $adjustment_order->endDate, '2009-01-07T17:51:55', 'can get 2009-01-07T17:51:55' );
    is( $adjustment_order->lastReconciliationTimestamp, '2009-01-08T17:51:55', 'can get 2009-01-08T17:51:55' );
    is( $adjustment_order->name, 'name', 'can get name' );
    is( $adjustment_order->processingStatus, 'processing status', 'can get processing status' );
    is( $adjustment_order->reconciliationMonth, 'reconciliation month', 'can get reconciliation month' );
    is( $adjustment_order->salesPersonName, 'sales person name', 'can get sales person name' );
    is( $adjustment_order->startDate, '2009-01-09T17:51:55', 'can get 2009-01-09T17:51:55' );
    is( $adjustment_order->thirdPartySource, 'third party source', 'can get third party source' );

};



1;