398:
399: -- Check that encumbrance items exist for the group
400: DECLARE
401: cursor count_ei is
402: select count(*) from gms_encumbrance_items
403: where encumbrance_id in
404: (select encumbrance_id from gms_encumbrances
405: where encumbrance_group = x_encumbrance_group);
406: x_count NUMBER;
424: where encumbrance_group = x_encumbrance_group;
425:
426: cursor totals is
427: select sum(amount)
428: from gms_encumbrance_items
429: where encumbrance_id in
430: (select encumbrance_id from gms_encumbrances
431: where encumbrance_group = x_encumbrance_group);
432:
463:
464: -- Make sure no quantities of null have been entered.
465: DECLARE
466: cursor null_qty is
467: select count(*) from gms_encumbrance_items
468: where encumbrance_id in (
469: select encumbrance_id from gms_encumbrances
470: where encumbrance_group = x_encumbrance_group )
471: and amount is null ;