Merge remote-tracking branch 'origin/new/bug_7613'
[koha_fer] / t / db_dependent / Serials.t
index 7097642..424effc 100644 (file)
@@ -9,7 +9,7 @@ use YAML;
 
 use C4::Serials;
 use C4::Debug;
-use Test::More tests => 5;
+use Test::More tests => 34;
 
 BEGIN {
     use_ok('C4::Serials');
@@ -24,7 +24,10 @@ $debug && warn scalar(@subscriptions);
 @subscriptions = GetSubscriptions( undef, $$subscriptioninformation{issn} );
 isa_ok( \@subscriptions, 'ARRAY' );
 $debug && warn scalar(@subscriptions);
-@subscriptions = GetSubscriptions( undef,undef ,$$subscriptioninformation{bibnum} );
+@subscriptions = GetSubscriptions( undef, undef, $$subscriptioninformation{ean} );
+isa_ok( \@subscriptions, 'ARRAY' );
+$debug && warn scalar(@subscriptions);
+@subscriptions = GetSubscriptions( undef, undef, undef, $$subscriptioninformation{bibnum} );
 isa_ok( \@subscriptions, 'ARRAY' );
 $debug && warn scalar(@subscriptions);
 if ($subscriptioninformation->{periodicity} % 16==0){
@@ -40,3 +43,57 @@ if ($subscriptioninformation->{periodicity} % 16==0){
 my $expirationdate = GetExpirationDate(1) ;
 ok( $expirationdate, "not NULL" );
 $debug && warn "$expirationdate";
+
+is(C4::Serials::GetLateIssues(),"0", 'test getting late issues');
+
+ok(C4::Serials::GetSubscriptionHistoryFromSubscriptionId(), 'test getting history from sub-scription');
+
+ok(C4::Serials::GetSerialStatusFromSerialId(), 'test getting Serial Status From Serial Id');
+
+ok(C4::Serials::GetSerialInformation(), 'test getting Serial Information');
+
+ok(C4::Serials::AddItem2Serial(), 'test adding item to serial');
+
+ok(C4::Serials::UpdateClaimdateIssues(), 'test updating claim date');
+
+ok(C4::Serials::GetFullSubscription(), 'test getting full subscription');
+
+ok(C4::Serials::PrepareSerialsData(), 'test preparing serial data');
+
+ok(C4::Serials::GetSubscriptionsFromBiblionumber(), 'test getting subscriptions form biblio number');
+
+is(C4::Serials::GetSerials(),"0", 'test getting serials when you enter nothing');
+is(C4::Serials::GetSerials2(),"0", 'test getting serials when you enter nothing');
+
+ok(C4::Serials::GetLatestSerials(), 'test getting lastest serials');
+
+is(C4::Serials::GetDistributedTo(),"0", 'test getting distributed when nothing is entered');
+
+is(C4::Serials::GetNextSeq(),"0", 'test getting next seq when you enter nothing');
+
+is(C4::Serials::GetSeq(),undef, 'test getting seq when you enter nothing');
+
+is(C4::Serials::CountSubscriptionFromBiblionumber(),"0", 'test counting subscription when nothing is entered');
+
+is(C4::Serials::ModSubscriptionHistory(),"0", 'test modding subscription history');
+
+is(C4::Serials::ModSerialStatus(),undef, 'test modding serials');
+
+is(C4::Serials::NewIssue(),"0", 'test getting 0 when nothing is entered');
+
+is(C4::Serials::ItemizeSerials(),undef, 'test getting nothing when nothing is entered');
+
+ok(C4::Serials::HasSubscriptionStrictlyExpired(), 'test if the subscriptions has expired');
+is(C4::Serials::HasSubscriptionExpired(),"0", 'test if the subscriptions has expired');
+
+is(C4::Serials::GetLateOrMissingIssues(),"0", 'test getting last or missing issues');
+
+is(C4::Serials::removeMissingIssue(),undef, 'test removing a missing issue');
+
+is(C4::Serials::updateClaim(),undef, 'test updating claim');
+
+is(C4::Serials::getsupplierbyserialid(),undef, 'test getting supplier idea');
+
+is(C4::Serials::check_routing(),"0", 'test checking route');
+
+is(C4::Serials::addroutingmember(),undef, 'test adding route member');