[Home] [Help]
PACKAGE: APPS.OKL_VIR_PVT
Source
1 PACKAGE OKL_VIR_PVT AS
2 /* $Header: OKLSVIRS.pls 120.4 2005/12/19 18:04:43 rseela noship $ */
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 G_MISS_virv_rec virv_rec_type;
48 TYPE virv_tbl_type IS TABLE OF virv_rec_type
49 INDEX BY BINARY_INTEGER;
50 -- OKL_VAR_INT_PARAMS Record Spec
51 TYPE vir_rec_type IS RECORD (
52 id NUMBER := OKL_API.G_MISS_NUM
53 ,khr_id NUMBER := OKL_API.G_MISS_NUM
54 ,source_table OKL_VAR_INT_PARAMS.SOURCE_TABLE%TYPE := OKL_API.G_MISS_CHAR
55 ,source_id NUMBER := OKL_API.G_MISS_NUM
56 ,interest_rate NUMBER := OKL_API.G_MISS_NUM
57 ,interest_calc_start_date OKL_VAR_INT_PARAMS.INTEREST_CALC_START_DATE%TYPE := OKL_API.G_MISS_DATE
58 ,interest_calc_end_date OKL_VAR_INT_PARAMS.INTEREST_CALC_END_DATE%TYPE := OKL_API.G_MISS_DATE
59 ,calc_method_code OKL_VAR_INT_PARAMS.CALC_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR
60 ,principal_balance NUMBER := OKL_API.G_MISS_NUM
61 ,valid_yn OKL_VAR_INT_PARAMS.VALID_YN%TYPE := OKL_API.G_MISS_CHAR
62 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
63 ,org_id NUMBER := OKL_API.G_MISS_NUM
64 ,request_id NUMBER := OKL_API.G_MISS_NUM
65 ,program_application_id NUMBER := OKL_API.G_MISS_NUM
66 ,program_id NUMBER := OKL_API.G_MISS_NUM
67 ,program_update_date OKL_VAR_INT_PARAMS.PROGRAM_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
68 ,attribute_category OKL_VAR_INT_PARAMS.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
69 ,attribute1 OKL_VAR_INT_PARAMS.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
70 ,attribute2 OKL_VAR_INT_PARAMS.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
71 ,attribute3 OKL_VAR_INT_PARAMS.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
72 ,attribute4 OKL_VAR_INT_PARAMS.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
73 ,attribute5 OKL_VAR_INT_PARAMS.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
74 ,attribute6 OKL_VAR_INT_PARAMS.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
75 ,attribute7 OKL_VAR_INT_PARAMS.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
76 ,attribute8 OKL_VAR_INT_PARAMS.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
77 ,attribute9 OKL_VAR_INT_PARAMS.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
78 ,attribute10 OKL_VAR_INT_PARAMS.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
79 ,attribute11 OKL_VAR_INT_PARAMS.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
80 ,attribute12 OKL_VAR_INT_PARAMS.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
81 ,attribute13 OKL_VAR_INT_PARAMS.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
82 ,attribute14 OKL_VAR_INT_PARAMS.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
83 ,attribute15 OKL_VAR_INT_PARAMS.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
84 ,created_by NUMBER := OKL_API.G_MISS_NUM
85 ,creation_date OKL_VAR_INT_PARAMS.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
86 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
87 ,last_update_date OKL_VAR_INT_PARAMS.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
88 ,last_update_login NUMBER := OKL_API.G_MISS_NUM
89 ,interest_amt NUMBER := OKL_API.G_MISS_NUM
90 ,interest_calc_days NUMBER := OKL_API.G_MISS_NUM );
91 G_MISS_vir_rec vir_rec_type;
92 TYPE vir_tbl_type IS TABLE OF vir_rec_type
93 INDEX BY BINARY_INTEGER;
94 ---------------------------------------------------------------------------
95 -- GLOBAL MESSAGE CONSTANTS
96 ---------------------------------------------------------------------------
97 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
98 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
99 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
100 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
101 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
102 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
103 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
104 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
105 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
106 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
107 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKS_SERVICE_AVAILABILITY_UNEXPECTED_ERROR';
108 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
109 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
110
111 ---------------------------------------------------------------------------
112 -- GLOBAL EXCEPTIONS
113 ---------------------------------------------------------------------------
114 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
115
116 ---------------------------------------------------------------------------
117 -- GLOBAL VARIABLES
118 ---------------------------------------------------------------------------
119 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_VIR_PVT';
120 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
121 ---------------------------------------------------------------------------
122 -- Procedures and Functions
123 ---------------------------------------------------------------------------
124
125 PROCEDURE qc;
126 PROCEDURE change_version;
127 PROCEDURE api_copy;
128 PROCEDURE insert_row(
129 p_api_version IN NUMBER,
130 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
131 x_return_status OUT NOCOPY VARCHAR2,
132 x_msg_count OUT NOCOPY NUMBER,
133 x_msg_data OUT NOCOPY VARCHAR2,
134 p_virv_rec IN virv_rec_type,
135 x_virv_rec OUT NOCOPY virv_rec_type);
136 PROCEDURE insert_row(
137 p_api_version IN NUMBER,
138 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
139 x_return_status OUT NOCOPY VARCHAR2,
140 x_msg_count OUT NOCOPY NUMBER,
141 x_msg_data OUT NOCOPY VARCHAR2,
142 p_virv_tbl IN virv_tbl_type,
143 x_virv_tbl OUT NOCOPY virv_tbl_type,
144 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
145 PROCEDURE insert_row(
146 p_api_version IN NUMBER,
147 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
148 x_return_status OUT NOCOPY VARCHAR2,
149 x_msg_count OUT NOCOPY NUMBER,
150 x_msg_data OUT NOCOPY VARCHAR2,
151 p_virv_tbl IN virv_tbl_type,
152 x_virv_tbl OUT NOCOPY virv_tbl_type);
153 PROCEDURE lock_row(
154 p_api_version IN NUMBER,
155 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
156 x_return_status OUT NOCOPY VARCHAR2,
157 x_msg_count OUT NOCOPY NUMBER,
158 x_msg_data OUT NOCOPY VARCHAR2,
159 p_virv_rec IN virv_rec_type);
160 PROCEDURE lock_row(
161 p_api_version IN NUMBER,
162 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
163 x_return_status OUT NOCOPY VARCHAR2,
164 x_msg_count OUT NOCOPY NUMBER,
165 x_msg_data OUT NOCOPY VARCHAR2,
166 p_virv_tbl IN virv_tbl_type,
167 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
168 PROCEDURE lock_row(
169 p_api_version IN NUMBER,
170 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
171 x_return_status OUT NOCOPY VARCHAR2,
172 x_msg_count OUT NOCOPY NUMBER,
173 x_msg_data OUT NOCOPY VARCHAR2,
174 p_virv_tbl IN virv_tbl_type);
175 PROCEDURE update_row(
176 p_api_version IN NUMBER,
177 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
178 x_return_status OUT NOCOPY VARCHAR2,
179 x_msg_count OUT NOCOPY NUMBER,
180 x_msg_data OUT NOCOPY VARCHAR2,
181 p_virv_rec IN virv_rec_type,
182 x_virv_rec OUT NOCOPY virv_rec_type);
183 PROCEDURE update_row(
184 p_api_version IN NUMBER,
185 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
186 x_return_status OUT NOCOPY VARCHAR2,
187 x_msg_count OUT NOCOPY NUMBER,
188 x_msg_data OUT NOCOPY VARCHAR2,
189 p_virv_tbl IN virv_tbl_type,
190 x_virv_tbl OUT NOCOPY virv_tbl_type,
191 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
192 PROCEDURE update_row(
193 p_api_version IN NUMBER,
194 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
195 x_return_status OUT NOCOPY VARCHAR2,
196 x_msg_count OUT NOCOPY NUMBER,
197 x_msg_data OUT NOCOPY VARCHAR2,
198 p_virv_tbl IN virv_tbl_type,
199 x_virv_tbl OUT NOCOPY virv_tbl_type);
200 PROCEDURE delete_row(
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
203 x_return_status OUT NOCOPY VARCHAR2,
204 x_msg_count OUT NOCOPY NUMBER,
205 x_msg_data OUT NOCOPY VARCHAR2,
206 p_virv_rec IN virv_rec_type);
207 PROCEDURE delete_row(
208 p_api_version IN NUMBER,
209 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
210 x_return_status OUT NOCOPY VARCHAR2,
211 x_msg_count OUT NOCOPY NUMBER,
212 x_msg_data OUT NOCOPY VARCHAR2,
213 p_virv_tbl IN virv_tbl_type,
214 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
215 PROCEDURE delete_row(
216 p_api_version IN NUMBER,
217 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
218 x_return_status OUT NOCOPY VARCHAR2,
219 x_msg_count OUT NOCOPY NUMBER,
220 x_msg_data OUT NOCOPY VARCHAR2,
221 p_virv_tbl IN virv_tbl_type);
222 PROCEDURE validate_row(
223 p_api_version IN NUMBER,
224 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
225 x_return_status OUT NOCOPY VARCHAR2,
226 x_msg_count OUT NOCOPY NUMBER,
227 x_msg_data OUT NOCOPY VARCHAR2,
228 p_virv_rec IN virv_rec_type);
229 PROCEDURE validate_row(
230 p_api_version IN NUMBER,
231 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
232 x_return_status OUT NOCOPY VARCHAR2,
233 x_msg_count OUT NOCOPY NUMBER,
234 x_msg_data OUT NOCOPY VARCHAR2,
235 p_virv_tbl IN virv_tbl_type,
236 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
237 PROCEDURE validate_row(
238 p_api_version IN NUMBER,
239 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
240 x_return_status OUT NOCOPY VARCHAR2,
241 x_msg_count OUT NOCOPY NUMBER,
242 x_msg_data OUT NOCOPY VARCHAR2,
243 p_virv_tbl IN virv_tbl_type);
244 END OKL_VIR_PVT;