1: PACKAGE BODY hxc_timecard_block_utils AS
2: /* $Header: hxctcbkut.pkb 120.5 2006/03/29 12:54:44 jdupont noship $ */
3:
4: g_package varchar2(25) := 'hxc_timecard_block_utils.';
5: g_timecard_index number;
1: PACKAGE BODY hxc_timecard_block_utils AS
2: /* $Header: hxctcbkut.pkb 120.5 2006/03/29 12:54:44 jdupont noship $ */
3:
4: g_package varchar2(25) := 'hxc_timecard_block_utils.';
5: g_timecard_index number;
6:
7: e_no_existing_block exception;
8:
663: return (l_bb_id-100);
664:
665: End next_block_id;
666:
667: END hxc_timecard_block_utils;