1 PACKAGE BODY hxc_static_timecard_utilities AS
2 /* $Header: hxcstutil.pkb 115.6 2002/06/10 00:37:50 pkm ship $ */
3
4 FUNCTION oracle_internal_id RETURN NUMBER IS
5
6 CURSOR c_oracle_internal IS
7 SELECT bld_blk_info_type_id
8 FROM hxc_bld_blk_info_types
9 WHERE bld_blk_info_type = 'ORACLE_INTERNAL';
10
11 l_oracle_internal hxc_bld_blk_info_types.bld_blk_info_type_id%TYPE;
12
13 BEGIN
14
15 OPEN c_oracle_internal;
16 FETCH c_oracle_internal INTO l_oracle_internal;
17 CLOSE c_oracle_internal;
18
19 RETURN l_oracle_internal;
20
21 END oracle_internal_id;
22
23 END hxc_static_timecard_utilities;