[Home] [Help]
PACKAGE: APPS.OKL_CBL_PVT
Source
1 PACKAGE OKL_CBL_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSCBLS.pls 120.3 2006/07/14 05:06:38 pagarg noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 -- OKL_CONTRACT_BALANCES_V Record Spec
7 TYPE cblv_rec_type IS RECORD (
8 id NUMBER := OKL_API.G_MISS_NUM
9 ,khr_id NUMBER := OKL_API.G_MISS_NUM
10 ,kle_id NUMBER := OKL_API.G_MISS_NUM
11 ,actual_principal_balance_amt NUMBER := OKL_API.G_MISS_NUM
12 ,actual_principal_balance_date OKL_CONTRACT_BALANCES.ACTUAL_PRINCIPAL_BALANCE_DATE%TYPE := OKL_API.G_MISS_DATE
13 ,interest_amt NUMBER := OKL_API.G_MISS_NUM
14 ,interest_calc_date OKL_CONTRACT_BALANCES.INTEREST_CALC_DATE%TYPE := OKL_API.G_MISS_DATE
15 ,interest_accrued_amt NUMBER := OKL_API.G_MISS_NUM
16 ,interest_accrued_date OKL_CONTRACT_BALANCES.INTEREST_ACCRUED_DATE%TYPE := OKL_API.G_MISS_DATE
17 ,interest_billed_amt NUMBER := OKL_API.G_MISS_NUM
18 ,interest_billed_date OKL_CONTRACT_BALANCES.INTEREST_BILLED_DATE%TYPE := OKL_API.G_MISS_DATE
19 ,interest_received_amt NUMBER := OKL_API.G_MISS_NUM
20 ,interest_received_date OKL_CONTRACT_BALANCES.INTEREST_RECEIVED_DATE%TYPE := OKL_API.G_MISS_DATE
21 ,termination_value_amt NUMBER := OKL_API.G_MISS_NUM
22 ,termination_date OKL_CONTRACT_BALANCES.TERMINATION_DATE%TYPE := OKL_API.G_MISS_DATE
23 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
24 ,org_id NUMBER := OKL_API.G_MISS_NUM
25 ,request_id NUMBER := OKL_API.G_MISS_NUM
26 ,program_application_id NUMBER := OKL_API.G_MISS_NUM
27 ,program_id NUMBER := OKL_API.G_MISS_NUM
28 ,program_update_date OKL_CONTRACT_BALANCES.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
29 ,attribute_category OKL_CONTRACT_BALANCES.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
30 ,attribute1 OKL_CONTRACT_BALANCES.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
31 ,attribute2 OKL_CONTRACT_BALANCES.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
32 ,attribute3 OKL_CONTRACT_BALANCES.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
33 ,attribute4 OKL_CONTRACT_BALANCES.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
34 ,attribute5 OKL_CONTRACT_BALANCES.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
35 ,attribute6 OKL_CONTRACT_BALANCES.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
36 ,attribute7 OKL_CONTRACT_BALANCES.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
37 ,attribute8 OKL_CONTRACT_BALANCES.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
38 ,attribute9 OKL_CONTRACT_BALANCES.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
39 ,attribute10 OKL_CONTRACT_BALANCES.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
40 ,attribute11 OKL_CONTRACT_BALANCES.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
41 ,attribute12 OKL_CONTRACT_BALANCES.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
42 ,attribute13 OKL_CONTRACT_BALANCES.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
43 ,attribute14 OKL_CONTRACT_BALANCES.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
44 ,attribute15 OKL_CONTRACT_BALANCES.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
45 ,created_by NUMBER := OKL_API.G_MISS_NUM
46 ,creation_date OKL_CONTRACT_BALANCES.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
47 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
48 ,last_update_date OKL_CONTRACT_BALANCES.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
49 ,last_update_login NUMBER := OKL_API.G_MISS_NUM);
50 G_MISS_cblv_rec cblv_rec_type;
51 TYPE cblv_tbl_type IS TABLE OF cblv_rec_type
52 INDEX BY BINARY_INTEGER;
53 -- OKL_CONTRACT_BALANCES Record Spec
54 TYPE cbl_rec_type IS RECORD (
55 id NUMBER := OKL_API.G_MISS_NUM
56 ,khr_id NUMBER := OKL_API.G_MISS_NUM
57 ,kle_id NUMBER := OKL_API.G_MISS_NUM
58 ,actual_principal_balance_amt NUMBER := OKL_API.G_MISS_NUM
59 ,actual_principal_balance_date OKL_CONTRACT_BALANCES.ACTUAL_PRINCIPAL_BALANCE_DATE%TYPE := OKL_API.G_MISS_DATE
60 ,interest_amt NUMBER := OKL_API.G_MISS_NUM
61 ,interest_calc_date OKL_CONTRACT_BALANCES.INTEREST_CALC_DATE%TYPE := OKL_API.G_MISS_DATE
62 ,interest_accrued_amt NUMBER := OKL_API.G_MISS_NUM
63 ,interest_accrued_date OKL_CONTRACT_BALANCES.INTEREST_ACCRUED_DATE%TYPE := OKL_API.G_MISS_DATE
64 ,interest_billed_amt NUMBER := OKL_API.G_MISS_NUM
65 ,interest_billed_date OKL_CONTRACT_BALANCES.INTEREST_BILLED_DATE%TYPE := OKL_API.G_MISS_DATE
66 ,interest_received_amt NUMBER := OKL_API.G_MISS_NUM
67 ,interest_received_date OKL_CONTRACT_BALANCES.INTEREST_RECEIVED_DATE%TYPE := OKL_API.G_MISS_DATE
68 ,termination_value_amt NUMBER := OKL_API.G_MISS_NUM
69 ,termination_date OKL_CONTRACT_BALANCES.TERMINATION_DATE%TYPE := OKL_API.G_MISS_DATE
70 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
71 ,org_id NUMBER := OKL_API.G_MISS_NUM
72 ,request_id NUMBER := OKL_API.G_MISS_NUM
73 ,program_application_id NUMBER := OKL_API.G_MISS_NUM
74 ,program_id NUMBER := OKL_API.G_MISS_NUM
75 ,program_update_date OKL_CONTRACT_BALANCES.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
76 ,attribute_category OKL_CONTRACT_BALANCES.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
77 ,attribute1 OKL_CONTRACT_BALANCES.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
78 ,attribute2 OKL_CONTRACT_BALANCES.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
79 ,attribute3 OKL_CONTRACT_BALANCES.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
80 ,attribute4 OKL_CONTRACT_BALANCES.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
81 ,attribute5 OKL_CONTRACT_BALANCES.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
82 ,attribute6 OKL_CONTRACT_BALANCES.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
83 ,attribute7 OKL_CONTRACT_BALANCES.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
84 ,attribute8 OKL_CONTRACT_BALANCES.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
85 ,attribute9 OKL_CONTRACT_BALANCES.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
86 ,attribute10 OKL_CONTRACT_BALANCES.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
87 ,attribute11 OKL_CONTRACT_BALANCES.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
88 ,attribute12 OKL_CONTRACT_BALANCES.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
89 ,attribute13 OKL_CONTRACT_BALANCES.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
90 ,attribute14 OKL_CONTRACT_BALANCES.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
91 ,attribute15 OKL_CONTRACT_BALANCES.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
92 ,created_by NUMBER := OKL_API.G_MISS_NUM
93 ,creation_date OKL_CONTRACT_BALANCES.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
94 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
95 ,last_update_date OKL_CONTRACT_BALANCES.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
96 ,last_update_login NUMBER := OKL_API.G_MISS_NUM);
97 G_MISS_cbl_rec cbl_rec_type;
98 TYPE cbl_tbl_type IS TABLE OF cbl_rec_type
99 INDEX BY BINARY_INTEGER;
100 ---------------------------------------------------------------------------
101 -- GLOBAL MESSAGE CONSTANTS
102 ---------------------------------------------------------------------------
103 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
104 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
105 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
106 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
107 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
108 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
109 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
110 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
111 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
112 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
113 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKS_SERVICE_AVAILABILITY_UNEXPECTED_ERROR';
114 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
115 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
116
117 ---------------------------------------------------------------------------
118 -- GLOBAL EXCEPTIONS
119 ---------------------------------------------------------------------------
120 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
121
122 ---------------------------------------------------------------------------
123 -- GLOBAL VARIABLES
124 ---------------------------------------------------------------------------
125 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CBL_PVT';
126 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
127 ---------------------------------------------------------------------------
128 -- Procedures and Functions
129 ---------------------------------------------------------------------------
130
131 PROCEDURE qc;
132 PROCEDURE change_version;
133 PROCEDURE api_copy;
134 PROCEDURE insert_row(
135 p_api_version IN NUMBER,
136 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
137 x_return_status OUT NOCOPY VARCHAR2,
138 x_msg_count OUT NOCOPY NUMBER,
139 x_msg_data OUT NOCOPY VARCHAR2,
140 p_cblv_rec IN cblv_rec_type,
141 x_cblv_rec OUT NOCOPY cblv_rec_type);
142 PROCEDURE insert_row(
143 p_api_version IN NUMBER,
144 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
145 x_return_status OUT NOCOPY VARCHAR2,
146 x_msg_count OUT NOCOPY NUMBER,
147 x_msg_data OUT NOCOPY VARCHAR2,
148 p_cblv_tbl IN cblv_tbl_type,
149 x_cblv_tbl OUT NOCOPY cblv_tbl_type,
150 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
151 PROCEDURE insert_row(
152 p_api_version IN NUMBER,
153 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
154 x_return_status OUT NOCOPY VARCHAR2,
155 x_msg_count OUT NOCOPY NUMBER,
156 x_msg_data OUT NOCOPY VARCHAR2,
157 p_cblv_tbl IN cblv_tbl_type,
158 x_cblv_tbl OUT NOCOPY cblv_tbl_type);
159 PROCEDURE lock_row(
160 p_api_version IN NUMBER,
161 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
162 x_return_status OUT NOCOPY VARCHAR2,
163 x_msg_count OUT NOCOPY NUMBER,
164 x_msg_data OUT NOCOPY VARCHAR2,
165 p_cblv_rec IN cblv_rec_type);
166 PROCEDURE lock_row(
167 p_api_version IN NUMBER,
168 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
169 x_return_status OUT NOCOPY VARCHAR2,
170 x_msg_count OUT NOCOPY NUMBER,
171 x_msg_data OUT NOCOPY VARCHAR2,
172 p_cblv_tbl IN cblv_tbl_type,
173 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
174 PROCEDURE lock_row(
175 p_api_version IN NUMBER,
176 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
177 x_return_status OUT NOCOPY VARCHAR2,
178 x_msg_count OUT NOCOPY NUMBER,
179 x_msg_data OUT NOCOPY VARCHAR2,
180 p_cblv_tbl IN cblv_tbl_type);
181 PROCEDURE update_row(
182 p_api_version IN NUMBER,
183 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
184 x_return_status OUT NOCOPY VARCHAR2,
185 x_msg_count OUT NOCOPY NUMBER,
186 x_msg_data OUT NOCOPY VARCHAR2,
187 p_cblv_rec IN cblv_rec_type,
188 x_cblv_rec OUT NOCOPY cblv_rec_type);
189 PROCEDURE update_row(
190 p_api_version IN NUMBER,
191 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
192 x_return_status OUT NOCOPY VARCHAR2,
193 x_msg_count OUT NOCOPY NUMBER,
194 x_msg_data OUT NOCOPY VARCHAR2,
195 p_cblv_tbl IN cblv_tbl_type,
196 x_cblv_tbl OUT NOCOPY cblv_tbl_type,
197 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
198 PROCEDURE update_row(
199 p_api_version IN NUMBER,
200 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
201 x_return_status OUT NOCOPY VARCHAR2,
202 x_msg_count OUT NOCOPY NUMBER,
203 x_msg_data OUT NOCOPY VARCHAR2,
204 p_cblv_tbl IN cblv_tbl_type,
205 x_cblv_tbl OUT NOCOPY cblv_tbl_type);
206 PROCEDURE delete_row(
207 p_api_version IN NUMBER,
208 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
209 x_return_status OUT NOCOPY VARCHAR2,
210 x_msg_count OUT NOCOPY NUMBER,
211 x_msg_data OUT NOCOPY VARCHAR2,
212 p_cblv_rec IN cblv_rec_type);
213 PROCEDURE delete_row(
214 p_api_version IN NUMBER,
215 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
216 x_return_status OUT NOCOPY VARCHAR2,
217 x_msg_count OUT NOCOPY NUMBER,
218 x_msg_data OUT NOCOPY VARCHAR2,
219 p_cblv_tbl IN cblv_tbl_type,
220 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
221 PROCEDURE delete_row(
222 p_api_version IN NUMBER,
223 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
224 x_return_status OUT NOCOPY VARCHAR2,
225 x_msg_count OUT NOCOPY NUMBER,
226 x_msg_data OUT NOCOPY VARCHAR2,
227 p_cblv_tbl IN cblv_tbl_type);
228 PROCEDURE validate_row(
229 p_api_version IN NUMBER,
230 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
231 x_return_status OUT NOCOPY VARCHAR2,
232 x_msg_count OUT NOCOPY NUMBER,
233 x_msg_data OUT NOCOPY VARCHAR2,
234 p_cblv_rec IN cblv_rec_type);
235 PROCEDURE validate_row(
236 p_api_version IN NUMBER,
237 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
238 x_return_status OUT NOCOPY VARCHAR2,
239 x_msg_count OUT NOCOPY NUMBER,
240 x_msg_data OUT NOCOPY VARCHAR2,
241 p_cblv_tbl IN cblv_tbl_type,
242 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
243 PROCEDURE validate_row(
244 p_api_version IN NUMBER,
245 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
246 x_return_status OUT NOCOPY VARCHAR2,
247 x_msg_count OUT NOCOPY NUMBER,
248 x_msg_data OUT NOCOPY VARCHAR2,
249 p_cblv_tbl IN cblv_tbl_type);
250 END OKL_CBL_PVT;