[Home] [Help]
PACKAGE: APPS.OKL_VIR_PVT
Source
1 PACKAGE OKL_VIR_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSVIRS.pls 120.4.12020000.2 2012/08/12 08:56:31 rpillay ship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 -- OKL_VAR_INT_PARAMS_V Record Spec
7 TYPE virv_rec_type IS RECORD (
8 id NUMBER := OKL_API.G_MISS_NUM
9 ,khr_id NUMBER := OKL_API.G_MISS_NUM
10 ,source_table OKL_VAR_INT_PARAMS_V.SOURCE_TABLE%TYPE := OKL_API.G_MISS_CHAR
11 ,source_id NUMBER := OKL_API.G_MISS_NUM
12 ,interest_rate NUMBER := OKL_API.G_MISS_NUM
13 ,interest_calc_start_date OKL_VAR_INT_PARAMS_V.INTEREST_CALC_START_DATE%TYPE := OKL_API.G_MISS_DATE
14 ,interest_calc_end_date OKL_VAR_INT_PARAMS_V.INTEREST_CALC_END_DATE%TYPE := OKL_API.G_MISS_DATE
15 ,calc_method_code OKL_VAR_INT_PARAMS_V.CALC_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR
16 ,principal_balance NUMBER := OKL_API.G_MISS_NUM
17 ,valid_yn OKL_VAR_INT_PARAMS_V.VALID_YN%TYPE := OKL_API.G_MISS_CHAR
18 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
19 ,org_id NUMBER := OKL_API.G_MISS_NUM
20 ,request_id NUMBER := OKL_API.G_MISS_NUM
21 ,program_application_id NUMBER := OKL_API.G_MISS_NUM
22 ,program_id NUMBER := OKL_API.G_MISS_NUM
23 ,program_update_date OKL_VAR_INT_PARAMS_V.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
24 ,attribute_category OKL_VAR_INT_PARAMS_V.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
25 ,attribute1 OKL_VAR_INT_PARAMS_V.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
26 ,attribute2 OKL_VAR_INT_PARAMS_V.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
27 ,attribute3 OKL_VAR_INT_PARAMS_V.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
28 ,attribute4 OKL_VAR_INT_PARAMS_V.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
29 ,attribute5 OKL_VAR_INT_PARAMS_V.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
30 ,attribute6 OKL_VAR_INT_PARAMS_V.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
31 ,attribute7 OKL_VAR_INT_PARAMS_V.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
32 ,attribute8 OKL_VAR_INT_PARAMS_V.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
33 ,attribute9 OKL_VAR_INT_PARAMS_V.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
34 ,attribute10 OKL_VAR_INT_PARAMS_V.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
35 ,attribute11 OKL_VAR_INT_PARAMS_V.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
36 ,attribute12 OKL_VAR_INT_PARAMS_V.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
37 ,attribute13 OKL_VAR_INT_PARAMS_V.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
38 ,attribute14 OKL_VAR_INT_PARAMS_V.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
39 ,attribute15 OKL_VAR_INT_PARAMS_V.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
40 ,created_by NUMBER := OKL_API.G_MISS_NUM
41 ,creation_date OKL_VAR_INT_PARAMS_V.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
42 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
43 ,last_update_date OKL_VAR_INT_PARAMS_V.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
44 ,last_update_login NUMBER := OKL_API.G_MISS_NUM
45 ,interest_amt NUMBER := OKL_API.G_MISS_NUM
46 ,interest_calc_days NUMBER := OKL_API.G_MISS_NUM
47 ,kle_id NUMBER := OKL_API.G_MISS_NUM
48 ,catchup_amt NUMBER := OKL_API.G_MISS_NUM
49 ,catchup_settlement_code OKL_VAR_INT_PARAMS_V.CATCHUP_SETTLEMENT_CODE%TYPE := OKL_API.G_MISS_CHAR);
50 G_MISS_virv_rec virv_rec_type;
51 TYPE virv_tbl_type IS TABLE OF virv_rec_type
52 INDEX BY BINARY_INTEGER;
53 -- OKL_VAR_INT_PARAMS Record Spec
54 TYPE vir_rec_type IS RECORD (
55 id NUMBER := OKL_API.G_MISS_NUM
56 ,khr_id NUMBER := OKL_API.G_MISS_NUM
57 ,source_table OKL_VAR_INT_PARAMS.SOURCE_TABLE%TYPE := OKL_API.G_MISS_CHAR
58 ,source_id NUMBER := OKL_API.G_MISS_NUM
59 ,interest_rate NUMBER := OKL_API.G_MISS_NUM
60 ,interest_calc_start_date OKL_VAR_INT_PARAMS.INTEREST_CALC_START_DATE%TYPE := OKL_API.G_MISS_DATE
61 ,interest_calc_end_date OKL_VAR_INT_PARAMS.INTEREST_CALC_END_DATE%TYPE := OKL_API.G_MISS_DATE
62 ,calc_method_code OKL_VAR_INT_PARAMS.CALC_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR
63 ,principal_balance NUMBER := OKL_API.G_MISS_NUM
64 ,valid_yn OKL_VAR_INT_PARAMS.VALID_YN%TYPE := OKL_API.G_MISS_CHAR
65 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
66 ,org_id NUMBER := OKL_API.G_MISS_NUM
67 ,request_id NUMBER := OKL_API.G_MISS_NUM
68 ,program_application_id NUMBER := OKL_API.G_MISS_NUM
69 ,program_id NUMBER := OKL_API.G_MISS_NUM
70 ,program_update_date OKL_VAR_INT_PARAMS.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
71 ,attribute_category OKL_VAR_INT_PARAMS.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
72 ,attribute1 OKL_VAR_INT_PARAMS.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
73 ,attribute2 OKL_VAR_INT_PARAMS.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
74 ,attribute3 OKL_VAR_INT_PARAMS.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
75 ,attribute4 OKL_VAR_INT_PARAMS.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
79 ,attribute8 OKL_VAR_INT_PARAMS.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
76 ,attribute5 OKL_VAR_INT_PARAMS.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
77 ,attribute6 OKL_VAR_INT_PARAMS.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
78 ,attribute7 OKL_VAR_INT_PARAMS.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
80 ,attribute9 OKL_VAR_INT_PARAMS.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
81 ,attribute10 OKL_VAR_INT_PARAMS.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
82 ,attribute11 OKL_VAR_INT_PARAMS.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
83 ,attribute12 OKL_VAR_INT_PARAMS.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
84 ,attribute13 OKL_VAR_INT_PARAMS.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
85 ,attribute14 OKL_VAR_INT_PARAMS.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
86 ,attribute15 OKL_VAR_INT_PARAMS.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
87 ,created_by NUMBER := OKL_API.G_MISS_NUM
88 ,creation_date OKL_VAR_INT_PARAMS.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
89 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
90 ,last_update_date OKL_VAR_INT_PARAMS.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
91 ,last_update_login NUMBER := OKL_API.G_MISS_NUM
92 ,interest_amt NUMBER := OKL_API.G_MISS_NUM
93 ,interest_calc_days NUMBER := OKL_API.G_MISS_NUM
94 ,kle_id NUMBER := OKL_API.G_MISS_NUM
95 ,catchup_amt NUMBER := OKL_API.G_MISS_NUM
96 ,catchup_settlement_code OKL_VAR_INT_PARAMS_V.CATCHUP_SETTLEMENT_CODE%TYPE := OKL_API.G_MISS_CHAR);
97 G_MISS_vir_rec vir_rec_type;
98 TYPE vir_tbl_type IS TABLE OF vir_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_VIR_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_virv_rec IN virv_rec_type,
141 x_virv_rec OUT NOCOPY virv_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_virv_tbl IN virv_tbl_type,
149 x_virv_tbl OUT NOCOPY virv_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_virv_tbl IN virv_tbl_type,
158 x_virv_tbl OUT NOCOPY virv_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_virv_rec IN virv_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_virv_tbl IN virv_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_virv_tbl IN virv_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_virv_rec IN virv_rec_type,
188 x_virv_rec OUT NOCOPY virv_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_virv_tbl IN virv_tbl_type,
196 x_virv_tbl OUT NOCOPY virv_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_virv_tbl IN virv_tbl_type,
205 x_virv_tbl OUT NOCOPY virv_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_virv_rec IN virv_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_virv_tbl IN virv_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_virv_tbl IN virv_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_virv_rec IN virv_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_virv_tbl IN virv_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_virv_tbl IN virv_tbl_type);
250 END OKL_VIR_PVT;