if ($key =~ /^PERIODEND/ && !$budgetdata) {
    BudgetGroup->budget($input, $myclass, 3)
}