Lines 209-228
if ($op=~/else/) {
Link Here
|
209 |
my $bud = GetBudget( $suggestion->{budgetid} ); |
209 |
my $bud = GetBudget( $suggestion->{budgetid} ); |
210 |
$suggestion->{budget_name} = $bud->{budget_name} if $bud; |
210 |
$suggestion->{budget_name} = $bud->{budget_name} if $bud; |
211 |
} |
211 |
} |
212 |
foreach my $date qw(suggesteddate manageddate accepteddate) { |
212 |
foreach my $date (qw(suggesteddate manageddate accepteddate)) { |
213 |
if ($suggestion->{$date} and $suggestion->{$date} ne "0000-00-00" && $suggestion->{$date} ne "" ) { |
213 |
if ($suggestion->{$date} and $suggestion->{$date} ne "0000-00-00") { |
214 |
$suggestion->{$date} = format_date( $suggestion->{$date} ); |
214 |
$suggestion->{$date} = format_date( $suggestion->{$date} ); |
215 |
} else { |
215 |
} else { |
216 |
$suggestion->{$date} = ""; |
216 |
$suggestion->{$date} = ""; |
217 |
} |
217 |
} |
218 |
} |
218 |
} |
219 |
foreach my $date ( qw(suggesteddate manageddate accepteddate) ){ |
|
|
220 |
if ($suggestion->{$date} ne "0000-00-00" && $suggestion->{$date} ne "" ){ |
221 |
$suggestion->{$date}=format_date($suggestion->{$date}) ; |
222 |
} else { |
223 |
$suggestion->{$date}="" ; |
224 |
} |
225 |
} |
226 |
} |
219 |
} |
227 |
push @allsuggestions,{ |
220 |
push @allsuggestions,{ |
228 |
"suggestiontype"=>$criteriumvalue||"suggest", |
221 |
"suggestiontype"=>$criteriumvalue||"suggest", |
229 |
- |
|
|