Lines 58-68
sub list {
Link Here
|
58 |
|
58 |
|
59 |
# Create new "formatted" columns for each date column |
59 |
# Create new "formatted" columns for each date column |
60 |
# that needs formatting |
60 |
# that needs formatting |
61 |
foreach(@requests) { |
61 |
foreach $req(@requests) { |
62 |
foreach my $field(@format_dates) { |
62 |
foreach my $field(@format_dates) { |
63 |
if (defined $_->{$field}) { |
63 |
if (defined $req->{$field}) { |
64 |
$_->{$field . "_formatted"} = format_sqldatetime( |
64 |
$req->{$field . "_formatted"} = format_sqldatetime( |
65 |
$_->{$field}, |
65 |
$req->{$field}, |
66 |
undef, |
66 |
undef, |
67 |
undef, |
67 |
undef, |
68 |
1 |
68 |
1 |
69 |
- |
|
|