1 package AK_QUERYOBJ_PUB AUTHID CURRENT_USER as
2 /* $Header: akdpqrys.pls 115.1 2002/01/17 12:31:21 pkm ship $ */
3
4 -- Global constants holding the package and file names to be used by
5 -- messaging routines in the case of an unexpected error.
6
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'AK_QUERYOBJ_PUB';
8
9 -- Type definitions
10
11 TYPE queryobj_pk_rec_type is RECORD (
12 query_code varchar2(30) := NULL
13 );
14
15 TYPE queryobj_lines_pk_Rec_Type IS RECORD (
16 query_code VARCHAR2(30) := NULL,
17 seq_num NUMBER := NULL
18 );
19
20 TYPE queryobj_pk_tbl_type IS TABLE OF queryobj_pk_rec_type INDEX BY BINARY_INTEGER;
21
22 TYPE queryobj_lines_pk_Tbl_Type IS TABLE OF queryobj_lines_pk_Rec_Type
23 INDEX BY BINARY_INTEGER;
24
25 TYPE queryobj_Tbl_Type IS TABLE OF ak_query_objects%ROWTYPE
26 INDEX BY BINARY_INTEGER;
27
28 TYPE queryobj_lines_Tbl_Type IS TABLE OF ak_query_object_lines%ROWTYPE
29 INDEX BY BINARY_INTEGER;
30
31 /* Constants for missing data types */
32 G_MISS_QUERYOBJ_REC ak_query_objects%ROWTYPE;
33 G_MISS_QUERYOBJ_LINE_REC ak_query_object_lines%ROWTYPE;
34 G_MISS_QUERYOBJ_PK_TBL queryobj_pk_tbl_type;
35 G_MISS_QUERYOBJ_TBL queryobj_tbl_type;
36 G_MISS_QUERYOBJ_LINES_TBL queryobj_lines_Tbl_Type;
37
38 end AK_QUERYOBJ_PUB;