[Home] [Help]
PACKAGE: APPS.OKL_QQL_PVT
Source
1 PACKAGE OKL_QQL_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSQQLS.pls 120.0 2005/11/30 17:18:17 stmathew noship $ */
3
4 --------------------
5 -- PACKAGE CONSTANTS
6 --------------------
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_QQL_PVT';
8 G_APP_NAME CONSTANT VARCHAR2(30) := OKL_API.G_APP_NAME;
9 G_API_VERSION CONSTANT NUMBER := 1;
10 G_USER_ID CONSTANT NUMBER := FND_GLOBAL.USER_ID;
11 G_LOGIN_ID CONSTANT NUMBER := FND_GLOBAL.LOGIN_ID;
12 G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
13 G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
14 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
15 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
16 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
17 G_DB_ERROR CONSTANT VARCHAR2(30) := 'OKL_DB_ERROR';
18 G_COL_ERROR CONSTANT VARCHAR2(30) := 'OKL_COL_ERROR';
19 G_OVN_ERROR CONSTANT VARCHAR2(30) := 'OKL_OVN_ERROR';
20 G_OVN_ERROR2 CONSTANT VARCHAR2(30) := 'OKL_OVN_ERROR2';
21 G_OVN_ERROR3 CONSTANT VARCHAR2(30) := 'OKL_OVN_ERROR3';
22 G_PKG_NAME_TOKEN CONSTANT VARCHAR2(30) := 'PKG_NAME';
23 G_PROG_NAME_TOKEN CONSTANT VARCHAR2(30) := 'PROG_NAME';
24 G_COL_NAME_TOKEN CONSTANT VARCHAR2(30) := 'COL_NAME';
25 G_SQLCODE_TOKEN CONSTANT VARCHAR2(30) := 'SQLCODE';
26 G_SQLERRM_TOKEN CONSTANT VARCHAR2(30) := 'SQLERRM';
27
28 ------------------
29 -- DATA STRUCTURES
30 ------------------
31
32 -- Do not include WHO columns in the base table record structure
33 TYPE qql_rec_type IS RECORD (
34 id okl_quick_quote_lines_b.id%TYPE
35 ,object_version_number okl_quick_quote_lines_b.object_version_number%TYPE
36 ,attribute_category okl_quick_quote_lines_b.attribute_category%TYPE
37 ,attribute1 okl_quick_quote_lines_b.attribute1%TYPE
38 ,attribute2 okl_quick_quote_lines_b.attribute2%TYPE
39 ,attribute3 okl_quick_quote_lines_b.attribute3%TYPE
40 ,attribute4 okl_quick_quote_lines_b.attribute4%TYPE
41 ,attribute5 okl_quick_quote_lines_b.attribute5%TYPE
42 ,attribute6 okl_quick_quote_lines_b.attribute6%TYPE
43 ,attribute7 okl_quick_quote_lines_b.attribute7%TYPE
44 ,attribute8 okl_quick_quote_lines_b.attribute8%TYPE
45 ,attribute9 okl_quick_quote_lines_b.attribute9%TYPE
46 ,attribute10 okl_quick_quote_lines_b.attribute10%TYPE
47 ,attribute11 okl_quick_quote_lines_b.attribute11%TYPE
48 ,attribute12 okl_quick_quote_lines_b.attribute12%TYPE
49 ,attribute13 okl_quick_quote_lines_b.attribute13%TYPE
50 ,attribute14 okl_quick_quote_lines_b.attribute14%TYPE
51 ,attribute15 okl_quick_quote_lines_b.attribute15%TYPE
52 ,quick_quote_id okl_quick_quote_lines_b.quick_quote_id%TYPE
53 ,type okl_quick_quote_lines_b.type%TYPE
54 ,basis okl_quick_quote_lines_b.basis%TYPE
55 ,value okl_quick_quote_lines_b.value%TYPE
56 ,end_of_term_value_default okl_quick_quote_lines_b.end_of_term_value_default%TYPE
57 ,end_of_term_value okl_quick_quote_lines_b.end_of_term_value%TYPE
58 ,percentage_of_total_cost okl_quick_quote_lines_b.percentage_of_total_cost%TYPE
59 ,item_category_id okl_quick_quote_lines_b.item_category_id%TYPE
60 ,item_category_set_id okl_quick_quote_lines_b.item_category_set_id%TYPE
61 ,lease_rate_factor okl_quick_quote_lines_b.lease_rate_factor%TYPE
62 );
63
64 -- Do not include WHO, LANGUAGE and SFWT_FLAG columns in the _TL record structure
65 TYPE qqltl_rec_type IS RECORD (
66 id okl_quick_quote_lines_tl.id%TYPE
67 ,short_description okl_quick_quote_lines_tl.short_description%TYPE
68 ,description okl_quick_quote_lines_tl.description%TYPE
69 ,comments okl_quick_quote_lines_tl.comments%TYPE
70 );
71
72 -- view record structure
73 TYPE qqlv_rec_type IS RECORD (
74 id okl_quick_quote_lines_b.id%TYPE
75 ,object_version_number okl_quick_quote_lines_b.object_version_number%TYPE
76 ,attribute_category okl_quick_quote_lines_b.attribute_category%TYPE
77 ,attribute1 okl_quick_quote_lines_b.attribute1%TYPE
78 ,attribute2 okl_quick_quote_lines_b.attribute2%TYPE
79 ,attribute3 okl_quick_quote_lines_b.attribute3%TYPE
80 ,attribute4 okl_quick_quote_lines_b.attribute4%TYPE
81 ,attribute5 okl_quick_quote_lines_b.attribute5%TYPE
82 ,attribute6 okl_quick_quote_lines_b.attribute6%TYPE
83 ,attribute7 okl_quick_quote_lines_b.attribute7%TYPE
84 ,attribute8 okl_quick_quote_lines_b.attribute8%TYPE
85 ,attribute9 okl_quick_quote_lines_b.attribute9%TYPE
86 ,attribute10 okl_quick_quote_lines_b.attribute10%TYPE
87 ,attribute11 okl_quick_quote_lines_b.attribute11%TYPE
88 ,attribute12 okl_quick_quote_lines_b.attribute12%TYPE
89 ,attribute13 okl_quick_quote_lines_b.attribute13%TYPE
90 ,attribute14 okl_quick_quote_lines_b.attribute14%TYPE
91 ,attribute15 okl_quick_quote_lines_b.attribute15%TYPE
92 ,quick_quote_id okl_quick_quote_lines_b.quick_quote_id%TYPE
93 ,type okl_quick_quote_lines_b.type%TYPE
94 ,basis okl_quick_quote_lines_b.basis%TYPE
95 ,value okl_quick_quote_lines_b.value%TYPE
96 ,end_of_term_value_default okl_quick_quote_lines_b.end_of_term_value_default%TYPE
97 ,end_of_term_value okl_quick_quote_lines_b.end_of_term_value%TYPE
98 ,percentage_of_total_cost okl_quick_quote_lines_b.percentage_of_total_cost%TYPE
99 ,item_category_id okl_quick_quote_lines_b.item_category_id%TYPE
100 ,item_category_set_id okl_quick_quote_lines_b.item_category_set_id%TYPE
101 ,lease_rate_factor okl_quick_quote_lines_b.lease_rate_factor%TYPE
102 ,short_description okl_quick_quote_lines_tl.short_description%TYPE
103 ,description okl_quick_quote_lines_tl.description%TYPE
104 ,comments okl_quick_quote_lines_tl.comments%TYPE
105 );
106
107 TYPE qqlv_tbl_type IS TABLE OF qqlv_rec_type INDEX BY BINARY_INTEGER;
108
109 ----------------
110 -- PROGRAM UNITS
111 ----------------
112 PROCEDURE add_language;
113
114 PROCEDURE insert_row(
115 p_api_version IN NUMBER,
116 p_init_msg_list IN VARCHAR2,
117 x_return_status OUT NOCOPY VARCHAR2,
118 x_msg_count OUT NOCOPY NUMBER,
119 x_msg_data OUT NOCOPY VARCHAR2,
120 p_qqlv_tbl IN qqlv_tbl_type,
121 x_qqlv_tbl OUT NOCOPY qqlv_tbl_type);
122
123 PROCEDURE update_row(
124 p_api_version IN NUMBER,
125 p_init_msg_list IN VARCHAR2,
126 x_return_status OUT NOCOPY VARCHAR2,
127 x_msg_count OUT NOCOPY NUMBER,
128 x_msg_data OUT NOCOPY VARCHAR2,
129 p_qqlv_tbl IN qqlv_tbl_type,
130 x_qqlv_tbl OUT NOCOPY qqlv_tbl_type);
131
132 PROCEDURE delete_row(
133 p_api_version IN NUMBER,
134 p_init_msg_list IN VARCHAR2,
135 x_return_status OUT NOCOPY VARCHAR2,
136 x_msg_count OUT NOCOPY NUMBER,
137 x_msg_data OUT NOCOPY VARCHAR2,
138 p_qqlv_tbl IN qqlv_tbl_type);
139
140 PROCEDURE insert_row(
141 p_api_version IN NUMBER,
142 p_init_msg_list IN VARCHAR2,
143 x_return_status OUT NOCOPY VARCHAR2,
144 x_msg_count OUT NOCOPY NUMBER,
145 x_msg_data OUT NOCOPY VARCHAR2,
146 p_qqlv_rec IN qqlv_rec_type,
147 x_qqlv_rec OUT NOCOPY qqlv_rec_type);
148
149 PROCEDURE update_row(
150 p_api_version IN NUMBER,
151 p_init_msg_list IN VARCHAR2,
152 x_return_status OUT NOCOPY VARCHAR2,
153 x_msg_count OUT NOCOPY NUMBER,
154 x_msg_data OUT NOCOPY VARCHAR2,
155 p_qqlv_rec IN qqlv_rec_type,
156 x_qqlv_rec OUT NOCOPY qqlv_rec_type);
157
158 PROCEDURE delete_row(
159 p_api_version IN NUMBER,
160 p_init_msg_list IN VARCHAR2,
161 x_return_status OUT NOCOPY VARCHAR2,
162 x_msg_count OUT NOCOPY NUMBER,
163 x_msg_data OUT NOCOPY VARCHAR2,
164 p_qqlv_rec IN qqlv_rec_type);
165
166 END OKL_QQL_PVT;