DBA Data[Home] [Help]

PACKAGE: APPS.OKL_LSQ_PVT

Source


1 PACKAGE OKL_LSQ_PVT AUTHID CURRENT_USER 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;