Lines 2851-2857
sub AddRenewal {
Link Here
|
2851 |
# Charge a new rental fee, if applicable? |
2851 |
# Charge a new rental fee, if applicable? |
2852 |
my ( $charge, $type ) = GetIssuingCharges( $itemnumber, $borrowernumber ); |
2852 |
my ( $charge, $type ) = GetIssuingCharges( $itemnumber, $borrowernumber ); |
2853 |
if ( $charge > 0 ) { |
2853 |
if ( $charge > 0 ) { |
2854 |
my $accountno = C4::Accounts->getnextacctno( $borrowernumber ); |
2854 |
my $accountno = C4::Accounts::getnextacctno( $borrowernumber ); |
2855 |
my $manager_id = 0; |
2855 |
my $manager_id = 0; |
2856 |
$manager_id = C4::Context->userenv->{'number'} if C4::Context->userenv; |
2856 |
$manager_id = C4::Context->userenv->{'number'} if C4::Context->userenv; |
2857 |
$sth = $dbh->prepare( |
2857 |
$sth = $dbh->prepare( |
Lines 3191-3197
sub AddIssuingCharge {
Link Here
|
3191 |
|
3191 |
|
3192 |
# FIXME What if checkout does not exist? |
3192 |
# FIXME What if checkout does not exist? |
3193 |
|
3193 |
|
3194 |
my $nextaccntno = C4::Accounts->getnextacctno($checkout->borrowernumber); |
3194 |
my $nextaccntno = C4::Accounts::getnextacctno( $checkout->borrowernumber ); |
3195 |
|
3195 |
|
3196 |
my $manager_id = 0; |
3196 |
my $manager_id = 0; |
3197 |
$manager_id = C4::Context->userenv->{'number'} if C4::Context->userenv; |
3197 |
$manager_id = C4::Context->userenv->{'number'} if C4::Context->userenv; |
3198 |
- |
|
|