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