[Home] [Help]
PACKAGE: APPS.OKL_LSQ_PVT
Source
1 PACKAGE OKL_LSQ_PVT AS
2 /* $Header: OKLSLSQS.pls 120.2 2007/03/20 23:16:18 rravikir noship $ */
3
4 --------------------
5 -- PACKAGE CONSTANTS
6 --------------------
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_LSQ_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 lsq_rec_type IS RECORD (
34 id okl_lease_quotes_b.id%TYPE
35 ,object_version_number okl_lease_quotes_b.object_version_number%TYPE
36 ,attribute_category okl_lease_quotes_b.attribute_category%TYPE
37 ,attribute1 okl_lease_quotes_b.attribute1%TYPE
38 ,attribute2 okl_lease_quotes_b.attribute2%TYPE
39 ,attribute3 okl_lease_quotes_b.attribute3%TYPE
40 ,attribute4 okl_lease_quotes_b.attribute4%TYPE
41 ,attribute5 okl_lease_quotes_b.attribute5%TYPE
42 ,attribute6 okl_lease_quotes_b.attribute6%TYPE
43 ,attribute7 okl_lease_quotes_b.attribute7%TYPE
44 ,attribute8 okl_lease_quotes_b.attribute8%TYPE
45 ,attribute9 okl_lease_quotes_b.attribute9%TYPE
46 ,attribute10 okl_lease_quotes_b.attribute10%TYPE
47 ,attribute11 okl_lease_quotes_b.attribute11%TYPE
48 ,attribute12 okl_lease_quotes_b.attribute12%TYPE
49 ,attribute13 okl_lease_quotes_b.attribute13%TYPE
50 ,attribute14 okl_lease_quotes_b.attribute14%TYPE
51 ,attribute15 okl_lease_quotes_b.attribute15%TYPE
52 ,reference_number okl_lease_quotes_b.reference_number%TYPE
53 ,status okl_lease_quotes_b.status%TYPE
54 ,parent_object_code okl_lease_quotes_b.parent_object_code%TYPE
55 ,parent_object_id okl_lease_quotes_b.parent_object_id%TYPE
56 ,valid_from okl_lease_quotes_b.valid_from%TYPE
57 ,valid_to okl_lease_quotes_b.valid_to%TYPE
58 ,customer_bookclass okl_lease_quotes_b.customer_bookclass%TYPE
59 ,customer_taxowner okl_lease_quotes_b.customer_taxowner%TYPE
60 ,expected_start_date okl_lease_quotes_b.expected_start_date%TYPE
61 ,expected_funding_date okl_lease_quotes_b.expected_funding_date%TYPE
62 ,expected_delivery_date okl_lease_quotes_b.expected_delivery_date%TYPE
63 ,pricing_method okl_lease_quotes_b.pricing_method%TYPE
64 ,term okl_lease_quotes_b.term%TYPE
65 ,product_id okl_lease_quotes_b.product_id%TYPE
66 ,end_of_term_option_id okl_lease_quotes_b.end_of_term_option_id%TYPE
67 ,structured_pricing okl_lease_quotes_b.structured_pricing%TYPE
68 ,line_level_pricing okl_lease_quotes_b.line_level_pricing%TYPE
69 ,rate_template_id okl_lease_quotes_b.rate_template_id%TYPE
70 ,rate_card_id okl_lease_quotes_b.rate_card_id%TYPE
71 ,lease_rate_factor okl_lease_quotes_b.lease_rate_factor%TYPE
72 ,target_rate_type okl_lease_quotes_b.target_rate_type%TYPE
73 ,target_rate okl_lease_quotes_b.target_rate%TYPE
74 ,target_amount okl_lease_quotes_b.target_amount%TYPE
75 ,target_frequency okl_lease_quotes_b.target_frequency%TYPE
76 ,target_arrears_yn okl_lease_quotes_b.target_arrears_yn%TYPE
77 ,target_periods okl_lease_quotes_b.target_periods%TYPE
78 ,iir okl_lease_quotes_b.iir%TYPE
79 ,booking_yield okl_lease_quotes_b.booking_yield%TYPE
80 ,pirr okl_lease_quotes_b.pirr%TYPE
81 ,airr okl_lease_quotes_b.airr%TYPE
82 ,sub_iir okl_lease_quotes_b.sub_iir%TYPE
83 ,sub_booking_yield okl_lease_quotes_b.sub_booking_yield%TYPE
84 ,sub_pirr okl_lease_quotes_b.sub_pirr%TYPE
85 ,sub_airr okl_lease_quotes_b.sub_airr%TYPE
86 ,usage_category okl_lease_quotes_b.usage_category%TYPE
87 ,usage_industry_class okl_lease_quotes_b.usage_industry_class%TYPE
88 ,usage_industry_code okl_lease_quotes_b.usage_industry_code%TYPE
89 ,usage_amount okl_lease_quotes_b.usage_amount%TYPE
90 ,usage_location_id okl_lease_quotes_b.usage_location_id%TYPE
91 ,property_tax_applicable okl_lease_quotes_b.property_tax_applicable%TYPE
92 ,property_tax_billing_type okl_lease_quotes_b.property_tax_billing_type%TYPE
93 ,upfront_tax_treatment okl_lease_quotes_b.upfront_tax_treatment%TYPE
94 ,upfront_tax_stream_type okl_lease_quotes_b.upfront_tax_stream_type%TYPE
95 ,transfer_of_title okl_lease_quotes_b.transfer_of_title%TYPE
96 ,age_of_equipment okl_lease_quotes_b.age_of_equipment%TYPE
97 ,purchase_of_lease okl_lease_quotes_b.purchase_of_lease%TYPE
98 ,sale_and_lease_back okl_lease_quotes_b.sale_and_lease_back%TYPE
99 ,interest_disclosed okl_lease_quotes_b.interest_disclosed%TYPE
100 ,primary_quote okl_lease_quotes_b.primary_quote%TYPE
101 ,legal_entity_id okl_lease_quotes_b.legal_entity_id%TYPE
102 -- Bug 5908845. eBTax Enhancement Project
103 ,line_intended_use okl_lease_quotes_b.line_intended_use%TYPE
104 -- End Bug 5908845. eBTax Enhancement Project
105 );
106
107 -- Do not include WHO, LANGUAGE and SFWT_FLAG columns in the _TL record structure
108 TYPE lsqtl_rec_type IS RECORD (
109 id okl_lease_quotes_tl.id%TYPE
110 ,short_description okl_lease_quotes_tl.short_description%TYPE
111 ,description okl_lease_quotes_tl.description%TYPE
112 ,comments okl_lease_quotes_tl.comments%TYPE
113 );
114
115 -- view record structure
116 TYPE lsqv_rec_type IS RECORD (
117 id okl_lease_quotes_b.id%TYPE := OKL_API.G_MISS_NUM
118 ,object_version_number okl_lease_quotes_b.object_version_number%TYPE
119 ,attribute_category okl_lease_quotes_b.attribute_category%TYPE := OKL_API.G_MISS_CHAR
120 ,attribute1 okl_lease_quotes_b.attribute1%TYPE := OKL_API.G_MISS_CHAR
121 ,attribute2 okl_lease_quotes_b.attribute2%TYPE := OKL_API.G_MISS_CHAR
122 ,attribute3 okl_lease_quotes_b.attribute3%TYPE := OKL_API.G_MISS_CHAR
123 ,attribute4 okl_lease_quotes_b.attribute4%TYPE := OKL_API.G_MISS_CHAR
124 ,attribute5 okl_lease_quotes_b.attribute5%TYPE := OKL_API.G_MISS_CHAR
125 ,attribute6 okl_lease_quotes_b.attribute6%TYPE := OKL_API.G_MISS_CHAR
126 ,attribute7 okl_lease_quotes_b.attribute7%TYPE := OKL_API.G_MISS_CHAR
127 ,attribute8 okl_lease_quotes_b.attribute8%TYPE := OKL_API.G_MISS_CHAR
128 ,attribute9 okl_lease_quotes_b.attribute9%TYPE := OKL_API.G_MISS_CHAR
129 ,attribute10 okl_lease_quotes_b.attribute10%TYPE := OKL_API.G_MISS_CHAR
130 ,attribute11 okl_lease_quotes_b.attribute11%TYPE := OKL_API.G_MISS_CHAR
131 ,attribute12 okl_lease_quotes_b.attribute12%TYPE := OKL_API.G_MISS_CHAR
132 ,attribute13 okl_lease_quotes_b.attribute13%TYPE := OKL_API.G_MISS_CHAR
133 ,attribute14 okl_lease_quotes_b.attribute14%TYPE := OKL_API.G_MISS_CHAR
134 ,attribute15 okl_lease_quotes_b.attribute15%TYPE := OKL_API.G_MISS_CHAR
135 ,reference_number okl_lease_quotes_b.reference_number%TYPE := OKL_API.G_MISS_CHAR
136 ,status okl_lease_quotes_b.status%TYPE := OKL_API.G_MISS_CHAR
137 ,parent_object_code okl_lease_quotes_b.parent_object_code%TYPE := OKL_API.G_MISS_CHAR
138 ,parent_object_id okl_lease_quotes_b.parent_object_id%TYPE := OKL_API.G_MISS_NUM
139 ,valid_from okl_lease_quotes_b.valid_from%TYPE := OKL_API.G_MISS_DATE
140 ,valid_to okl_lease_quotes_b.valid_to%TYPE := OKL_API.G_MISS_DATE
141 ,customer_bookclass okl_lease_quotes_b.customer_bookclass%TYPE := OKL_API.G_MISS_CHAR
142 ,customer_taxowner okl_lease_quotes_b.customer_taxowner%TYPE := OKL_API.G_MISS_CHAR
143 ,expected_start_date okl_lease_quotes_b.expected_start_date%TYPE := OKL_API.G_MISS_DATE
144 ,expected_funding_date okl_lease_quotes_b.expected_funding_date%TYPE := OKL_API.G_MISS_DATE
145 ,expected_delivery_date okl_lease_quotes_b.expected_delivery_date%TYPE := OKL_API.G_MISS_DATE
146 ,pricing_method okl_lease_quotes_b.pricing_method%TYPE := OKL_API.G_MISS_CHAR
147 ,term okl_lease_quotes_b.term%TYPE := OKL_API.G_MISS_NUM
148 ,product_id okl_lease_quotes_b.product_id%TYPE := OKL_API.G_MISS_NUM
149 ,end_of_term_option_id okl_lease_quotes_b.end_of_term_option_id%TYPE := OKL_API.G_MISS_NUM
150 ,structured_pricing okl_lease_quotes_b.structured_pricing%TYPE := OKL_API.G_MISS_CHAR
151 ,line_level_pricing okl_lease_quotes_b.line_level_pricing%TYPE := OKL_API.G_MISS_CHAR
152 ,rate_template_id okl_lease_quotes_b.rate_template_id%TYPE := OKL_API.G_MISS_NUM
153 ,rate_card_id okl_lease_quotes_b.rate_card_id%TYPE := OKL_API.G_MISS_NUM
154 ,lease_rate_factor okl_lease_quotes_b.lease_rate_factor%TYPE := OKL_API.G_MISS_NUM
155 ,target_rate_type okl_lease_quotes_b.target_rate_type%TYPE := OKL_API.G_MISS_CHAR
156 ,target_rate okl_lease_quotes_b.target_rate%TYPE := OKL_API.G_MISS_NUM
157 ,target_amount okl_lease_quotes_b.target_amount%TYPE := OKL_API.G_MISS_NUM
158 ,target_frequency okl_lease_quotes_b.target_frequency%TYPE := OKL_API.G_MISS_CHAR
159 ,target_arrears_yn okl_lease_quotes_b.target_arrears_yn%TYPE := OKL_API.G_MISS_CHAR
160 ,target_periods okl_lease_quotes_b.target_periods%TYPE := OKL_API.G_MISS_NUM
161 ,iir okl_lease_quotes_b.iir%TYPE := OKL_API.G_MISS_NUM
162 ,booking_yield okl_lease_quotes_b.booking_yield%TYPE := OKL_API.G_MISS_NUM
163 ,pirr okl_lease_quotes_b.pirr%TYPE := OKL_API.G_MISS_NUM
164 ,airr okl_lease_quotes_b.airr%TYPE := OKL_API.G_MISS_NUM
165 ,sub_iir okl_lease_quotes_b.sub_iir%TYPE := OKL_API.G_MISS_NUM
166 ,sub_booking_yield okl_lease_quotes_b.sub_booking_yield%TYPE := OKL_API.G_MISS_NUM
167 ,sub_pirr okl_lease_quotes_b.sub_pirr%TYPE := OKL_API.G_MISS_NUM
168 ,sub_airr okl_lease_quotes_b.sub_airr%TYPE := OKL_API.G_MISS_NUM
169 ,usage_category okl_lease_quotes_b.usage_category%TYPE := OKL_API.G_MISS_CHAR
170 ,usage_industry_class okl_lease_quotes_b.usage_industry_class%TYPE := OKL_API.G_MISS_CHAR
171 ,usage_industry_code okl_lease_quotes_b.usage_industry_code%TYPE := OKL_API.G_MISS_CHAR
172 ,usage_amount okl_lease_quotes_b.usage_amount%TYPE := OKL_API.G_MISS_NUM
173 ,usage_location_id okl_lease_quotes_b.usage_location_id%TYPE := OKL_API.G_MISS_NUM
174 ,property_tax_applicable okl_lease_quotes_b.property_tax_applicable%TYPE := OKL_API.G_MISS_CHAR
175 ,property_tax_billing_type okl_lease_quotes_b.property_tax_billing_type%TYPE := OKL_API.G_MISS_CHAR
176 ,upfront_tax_treatment okl_lease_quotes_b.upfront_tax_treatment%TYPE := OKL_API.G_MISS_CHAR
177 ,upfront_tax_stream_type okl_lease_quotes_b.upfront_tax_stream_type%TYPE := OKL_API.G_MISS_NUM
178 ,transfer_of_title okl_lease_quotes_b.transfer_of_title%TYPE := OKL_API.G_MISS_CHAR
179 ,age_of_equipment okl_lease_quotes_b.age_of_equipment%TYPE := OKL_API.G_MISS_NUM
180 ,purchase_of_lease okl_lease_quotes_b.purchase_of_lease%TYPE := OKL_API.G_MISS_CHAR
181 ,sale_and_lease_back okl_lease_quotes_b.sale_and_lease_back%TYPE := OKL_API.G_MISS_CHAR
182 ,interest_disclosed okl_lease_quotes_b.interest_disclosed%TYPE := OKL_API.G_MISS_CHAR
183 ,primary_quote okl_lease_quotes_b.primary_quote%TYPE := OKL_API.G_MISS_CHAR
184 ,legal_entity_id okl_lease_quotes_b.legal_entity_id%TYPE := OKL_API.G_MISS_NUM
185 -- Bug 5908845. eBTax Enhancement Project
186 ,line_intended_use okl_lease_quotes_b.line_intended_use%TYPE := OKL_API.G_MISS_CHAR
187 -- End Bug 5908845. eBTax Enhancement Project
188 ,short_description okl_lease_quotes_tl.short_description%TYPE := OKL_API.G_MISS_CHAR
189 ,description okl_lease_quotes_tl.description%TYPE := OKL_API.G_MISS_CHAR
190 ,comments okl_lease_quotes_tl.comments%TYPE := OKL_API.G_MISS_CHAR
191 );
192
193 TYPE lsqv_tbl_type IS TABLE OF lsqv_rec_type INDEX BY BINARY_INTEGER;
194
195 ----------------
196 -- PROGRAM UNITS
197 ----------------
198 PROCEDURE add_language;
199
200 PROCEDURE insert_row(
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2,
203 x_return_status OUT NOCOPY VARCHAR2,
204 x_msg_count OUT NOCOPY NUMBER,
205 x_msg_data OUT NOCOPY VARCHAR2,
206 p_lsqv_tbl IN lsqv_tbl_type,
207 x_lsqv_tbl OUT NOCOPY lsqv_tbl_type);
208
209 PROCEDURE update_row(
210 p_api_version IN NUMBER,
211 p_init_msg_list IN VARCHAR2,
212 x_return_status OUT NOCOPY VARCHAR2,
213 x_msg_count OUT NOCOPY NUMBER,
214 x_msg_data OUT NOCOPY VARCHAR2,
215 p_lsqv_tbl IN lsqv_tbl_type,
216 x_lsqv_tbl OUT NOCOPY lsqv_tbl_type);
217
218 PROCEDURE delete_row(
219 p_api_version IN NUMBER,
220 p_init_msg_list IN VARCHAR2,
221 x_return_status OUT NOCOPY VARCHAR2,
222 x_msg_count OUT NOCOPY NUMBER,
223 x_msg_data OUT NOCOPY VARCHAR2,
224 p_lsqv_tbl IN lsqv_tbl_type);
225
226 PROCEDURE insert_row(
227 p_api_version IN NUMBER,
228 p_init_msg_list IN VARCHAR2,
229 x_return_status OUT NOCOPY VARCHAR2,
230 x_msg_count OUT NOCOPY NUMBER,
231 x_msg_data OUT NOCOPY VARCHAR2,
232 p_lsqv_rec IN lsqv_rec_type,
233 x_lsqv_rec OUT NOCOPY lsqv_rec_type);
234
235 PROCEDURE update_row(
236 p_api_version IN NUMBER,
237 p_init_msg_list IN VARCHAR2,
238 x_return_status OUT NOCOPY VARCHAR2,
239 x_msg_count OUT NOCOPY NUMBER,
240 x_msg_data OUT NOCOPY VARCHAR2,
241 p_lsqv_rec IN lsqv_rec_type,
242 x_lsqv_rec OUT NOCOPY lsqv_rec_type);
243
244 PROCEDURE delete_row(
245 p_api_version IN NUMBER,
246 p_init_msg_list IN VARCHAR2,
247 x_return_status OUT NOCOPY VARCHAR2,
248 x_msg_count OUT NOCOPY NUMBER,
249 x_msg_data OUT NOCOPY VARCHAR2,
250 p_lsqv_rec IN lsqv_rec_type);
251
252 END OKL_LSQ_PVT;