Lines 119-125
my $borrowernumber = $input->param('borrowernumber');
Link Here
|
119 |
|
119 |
|
120 |
#start the page and read in includes |
120 |
#start the page and read in includes |
121 |
my $data = GetMember( 'borrowernumber' => $borrowernumber ); |
121 |
my $data = GetMember( 'borrowernumber' => $borrowernumber ); |
122 |
my $reregistration = $input->param('reregistration'); |
|
|
123 |
|
122 |
|
124 |
if ( not defined $data ) { |
123 |
if ( not defined $data ) { |
125 |
$template->param (unknowuser => 1); |
124 |
$template->param (unknowuser => 1); |
Lines 127-137
if ( not defined $data ) {
Link Here
|
127 |
exit; |
126 |
exit; |
128 |
} |
127 |
} |
129 |
|
128 |
|
130 |
# re-reregistration function to automatic calcul of date expiry |
|
|
131 |
if ( $reregistration eq 'y' ) { |
132 |
$data->{'dateexpiry'} = ExtendMemberSubscriptionTo( $borrowernumber ); |
133 |
} |
134 |
|
135 |
my $category_type = $data->{'category_type'}; |
129 |
my $category_type = $data->{'category_type'}; |
136 |
|
130 |
|
137 |
### $category_type |
131 |
### $category_type |
Lines 414-420
$template->param(
Link Here
|
414 |
borrowernumber => $borrowernumber, |
408 |
borrowernumber => $borrowernumber, |
415 |
othernames => $data->{'othernames'}, |
409 |
othernames => $data->{'othernames'}, |
416 |
categoryname => $data->{'description'}, |
410 |
categoryname => $data->{'description'}, |
417 |
reregistration => $reregistration, |
411 |
was_renewed => $input->param('was_renewed') ? 1 : 0, |
418 |
branch => $branch, |
412 |
branch => $branch, |
419 |
todaysdate => C4::Dates->today(), |
413 |
todaysdate => C4::Dates->today(), |
420 |
totalprice => sprintf("%.2f", $totalprice), |
414 |
totalprice => sprintf("%.2f", $totalprice), |