Bugzilla – Attachment 112361 Details for
Bug 22394
Remove C4::Accounts::manualinvoice
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 22394: Remove C4::Accounts::manualinvoice
Bug-22394-Remove-C4Accountsmanualinvoice.patch (text/plain), 5.68 KB, created by
Nick Clemens (kidclamp)
on 2020-10-24 02:22:33 UTC
(
hide
)
Description:
Bug 22394: Remove C4::Accounts::manualinvoice
Filename:
MIME Type:
Creator:
Nick Clemens (kidclamp)
Created:
2020-10-24 02:22:33 UTC
Size:
5.68 KB
patch
obsolete
>From 13039374ffb032d48973feabf1b08aaf65e8afb4 Mon Sep 17 00:00:00 2001 >From: Martin Renvoize <martin.renvoize@ptfs-europe.com> >Date: Wed, 19 Aug 2020 12:32:08 +0100 >Subject: [PATCH] Bug 22394: Remove C4::Accounts::manualinvoice >MIME-Version: 1.0 >Content-Type: text/plain; charset=UTF-8 >Content-Transfer-Encoding: 8bit > >This patch removes C4::Accounts::manualinvoice and it's corresponding >test. We have been warning deprecation of this method for 18 months (by >the time of 20.11 release). > >Test plan >1/ Apply patch >2/ Ensure no mention of manualinvoice accross the codebase >3/ Run t/db_dependant/Accounts.t and ensure it still passes > >Signed-off-by: Joonas Kylmälä <joonas.kylmala@helsinki.fi> > >Signed-off-by: Nick Clemens <nick@bywatersolutions.com> >--- > C4/Accounts.pm | 76 ----------------------------------------------- > t/db_dependent/Accounts.t | 30 +------------------ > 2 files changed, 1 insertion(+), 105 deletions(-) > >diff --git a/C4/Accounts.pm b/C4/Accounts.pm >index bf8076d804..7d7ac76018 100644 >--- a/C4/Accounts.pm >+++ b/C4/Accounts.pm >@@ -132,82 +132,6 @@ sub chargelostitem { > } > } > >-=head2 manualinvoice >- >- &manualinvoice($borrowernumber, $itemnumber, $description, $type, >- $amount, $note); >- >-This function is now deprecated and not used anywhere within koha. It is due for complete removal in 19.11 >- >-=cut >- >-sub manualinvoice { >- my ( $borrowernumber, $itemnum, $desc, $type, $amount, $note ) = @_; >- >- deprecated "C4::Accounts::manualinvoice is deprecated in favor of Koha::Account->add_debit"; >- >- my $manager_id = C4::Context->userenv ? C4::Context->userenv->{'number'} : undef; >- my $dbh = C4::Context->dbh; >- my $amountleft = $amount; >- >- my $branchcode = C4::Context->userenv ? C4::Context->userenv->{'branch'} : undef; >- >- my $issue_id; >- if ( $type eq 'LOST' && $itemnum ) { >- my $checkouts = Koha::Checkouts->search( >- { itemnumber => $itemnum, borrowernumber => $borrowernumber } ); >- my $checkout = >- $checkouts->count >- ? $checkouts->next >- : Koha::Old::Checkouts->search( >- { itemnumber => $itemnum, borrowernumber => $borrowernumber }, >- { order_by => { -desc => 'returndate' }, rows => 1 } >- )->next; >- $issue_id = $checkout ? $checkout->issue_id : undef; >- } >- >- my $accountline = Koha::Account::Line->new( >- { >- borrowernumber => $borrowernumber, >- date => \'NOW()', >- amount => $amount, >- description => $desc, >- debit_type_code => $type, >- amountoutstanding => $amountleft, >- itemnumber => $itemnum || undef, >- issue_id => $issue_id, >- note => $note, >- manager_id => $manager_id, >- interface => C4::Context->interface, >- branchcode => $branchcode, >- } >- )->store(); >- >- my $account_offset = Koha::Account::Offset->new( >- { >- debit_id => $accountline->id, >- type => 'Manual Debit', >- amount => $amount, >- } >- )->store(); >- >- if ( C4::Context->preference("FinesLog") ) { >- logaction("FINES", 'CREATE',$borrowernumber,Dumper({ >- action => 'create_fee', >- borrowernumber => $borrowernumber, >- amount => $amount, >- description => $desc, >- debit_type_code => $type, >- amountoutstanding => $amountleft, >- note => $note, >- itemnumber => $itemnum, >- manager_id => $manager_id, >- })); >- } >- >- return 0; >-} >- > =head2 purge_zero_balance_fees > > purge_zero_balance_fees( $days ); >diff --git a/t/db_dependent/Accounts.t b/t/db_dependent/Accounts.t >index 49ada1e445..da4d4c3f95 100755 >--- a/t/db_dependent/Accounts.t >+++ b/t/db_dependent/Accounts.t >@@ -18,7 +18,7 @@ > > use Modern::Perl; > >-use Test::More tests => 33; >+use Test::More tests => 27; > use Test::MockModule; > use Test::Warn; > >@@ -45,7 +45,6 @@ BEGIN { > can_ok( 'C4::Accounts', > qw( > chargelostitem >- manualinvoice > purge_zero_balance_fees ) > ); > >@@ -73,33 +72,6 @@ $context->mock( 'userenv', sub { > $context->mock( 'interface', sub { return "commandline" } ); > my $userenv_branchcode = $branchcode; > >-# Test manualinvoice >-my $itemtype = $builder->build( { source => 'Itemtype' } ); >-my $item = $builder->build_sample_item( { itype => $itemtype->{itemtype} } ); >-my $patron = $builder->build( { source => 'Borrower' } ); >-my $amount = 5; >-my $description = "Test fee!"; >-my $type = 'LOST'; >-my $note = 'Test note!'; >-warning_like { >- C4::Accounts::manualinvoice( $patron->{borrowernumber}, >- $item->itemnumber, $description, $type, $amount, $note ) >-} >-qr/C4::Accounts::manualinvoice is deprecated in favor of Koha::Account->add_debit/, >- "deprecation warning received for manualinvoice"; >-my ($accountline) = Koha::Account::Lines->search( >- { >- borrowernumber => $patron->{borrowernumber} >- } >-); >-is( $accountline->debit_type_code, $type, 'Debit type set correctly for manualinvoice' ); >-is( $accountline->amount+0, $amount, 'Accountline amount set correctly for manualinvoice' ); >-ok( $accountline->description =~ /^$description/, 'Accountline description set correctly for manualinvoice' ); >-is( $accountline->note, $note, 'Accountline note set correctly for manualinvoice' ); >-is( $accountline->branchcode, $branchcode, 'Accountline branchcode set correctly for manualinvoice' ); >- >-$dbh->do(q|DELETE FROM accountlines|); >- > # Testing purge_zero_balance_fees > > # The 3rd value in the insert is 'days ago' -- >-- >2.11.0
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 22394
:
108588
|
111991
|
112259
| 112361