|
Lines 42-48
use C4::Output;
Link Here
|
| 42 |
use C4::Members; |
42 |
use C4::Members; |
| 43 |
use C4::Members::Attributes; |
43 |
use C4::Members::Attributes; |
| 44 |
use C4::Members::AttributeTypes; |
44 |
use C4::Members::AttributeTypes; |
| 45 |
use C4::Dates; |
|
|
| 46 |
use C4::Reserves; |
45 |
use C4::Reserves; |
| 47 |
use C4::Circulation; |
46 |
use C4::Circulation; |
| 48 |
use C4::Koha; |
47 |
use C4::Koha; |
|
Lines 136-142
foreach (qw(dateenrolled dateexpiry dateofbirth)) {
Link Here
|
| 136 |
$data->{$_} = ''; |
135 |
$data->{$_} = ''; |
| 137 |
next; |
136 |
next; |
| 138 |
} |
137 |
} |
| 139 |
$userdate = C4::Dates->new($userdate,'iso')->output('syspref'); |
138 |
$userdate = output_pref({ dt => dt_from_string( $userdate ), dateonly => 1 }); |
| 140 |
$data->{$_} = $userdate || ''; |
139 |
$data->{$_} = $userdate || ''; |
| 141 |
$template->param( $_ => $userdate ); |
140 |
$template->param( $_ => $userdate ); |
| 142 |
} |
141 |
} |
|
Lines 150-156
if ( IsDebarred($borrowernumber) ) {
Link Here
|
| 150 |
$template->param( 'userdebarred' => 1, 'flagged' => 1 ); |
149 |
$template->param( 'userdebarred' => 1, 'flagged' => 1 ); |
| 151 |
my $debar = $data->{'debarred'}; |
150 |
my $debar = $data->{'debarred'}; |
| 152 |
if ( $debar ne "9999-12-31" ) { |
151 |
if ( $debar ne "9999-12-31" ) { |
| 153 |
$template->param( 'userdebarreddate' => C4::Dates::format_date($debar) ); |
152 |
$template->param( 'userdebarreddate' => output_pref( { dt => dt_from_string( $debar ), dateonly => 1 } ) ); |
| 154 |
$template->param( 'debarredcomment' => $data->{debarredcomment} ); |
153 |
$template->param( 'debarredcomment' => $data->{debarredcomment} ); |
| 155 |
} |
154 |
} |
| 156 |
} |
155 |
} |
|
Lines 349-355
$template->param(
Link Here
|
| 349 |
categoryname => $data->{'description'}, |
348 |
categoryname => $data->{'description'}, |
| 350 |
was_renewed => $input->param('was_renewed') ? 1 : 0, |
349 |
was_renewed => $input->param('was_renewed') ? 1 : 0, |
| 351 |
branch => $branch, |
350 |
branch => $branch, |
| 352 |
todaysdate => C4::Dates->today(), |
351 |
todaysdate => output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 }), |
| 353 |
totalprice => sprintf("%.2f", $totalprice), |
352 |
totalprice => sprintf("%.2f", $totalprice), |
| 354 |
totaldue => sprintf("%.2f", $total), |
353 |
totaldue => sprintf("%.2f", $total), |
| 355 |
totaldue_raw => $total, |
354 |
totaldue_raw => $total, |
| 356 |
- |
|
|