Bug 21604: Add two trivial test cases

Adding an id in AddBudgetPeriod and an empty string in AddBudget for
budget_encumb.

Test plan:
Run Budgets.t with/without this patch in strict sql mode.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
Marcel de Rooy 2018-11-02 07:44:34 +01:00 committed by Nick Clemens
parent ca3c2b0b63
commit 433fc3f120
1 changed files with 2 additions and 0 deletions

View File

@ -59,6 +59,7 @@ my $my_budgetperiod = {
budget_period_enddate => '2008-12-31',
budget_period_description => 'MAPERI',
budget_period_active => 0,
budget_period_id => '', # Bug 21604
};
$bpid = AddBudgetPeriod($my_budgetperiod);
isnt( $bpid, undef, 'AddBugetPeriod does not returns undef' );
@ -127,6 +128,7 @@ my $my_budget = {
budget_name => 'Periodiques',
budget_notes => 'This is a note',
budget_period_id => $bpid,
budget_encumb => '', # Bug 21604
};
my $budget_id = AddBudget($my_budget);
isnt( $budget_id, undef, 'AddBudget does not returns undef' );