Lines 145-151
elsif ( $op eq 'cud-add_validate' ) {
Link Here
|
145 |
} |
145 |
} |
146 |
|
146 |
|
147 |
#-------------------------------------------------- |
147 |
#-------------------------------------------------- |
148 |
elsif ( $op eq 'cud-delete_confirm' ) { |
148 |
elsif ( $op eq 'delete_confirm' ) { |
149 |
## delete a budget period (preparation) |
149 |
## delete a budget period (preparation) |
150 |
my $funds = GetBudgets({ budget_period_id => $budget_period_id }); |
150 |
my $funds = GetBudgets({ budget_period_id => $budget_period_id }); |
151 |
my $fund_count = scalar @$funds; |
151 |
my $fund_count = scalar @$funds; |
152 |
- |
|
|