[Home] [Help]
PACKAGE: APPS.OKL_CLM_PVT
Source
1 PACKAGE OKL_CLM_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSCLMS.pls 115.6 2002/04/11 19:25:23 pkm ship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 -- OKL_INS_CLAIMS_V Record Spec
7 TYPE clmv_rec_type IS RECORD (
8 id NUMBER := OKC_API.G_MISS_NUM
9 ,object_version_number NUMBER := OKC_API.G_MISS_NUM
10 ,sfwt_flag OKL_INS_CLAIMS_V.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR
11 ,ipy_id NUMBER := OKC_API.G_MISS_NUM
12 ,ltp_code OKL_INS_CLAIMS_V.LTP_CODE%TYPE := OKC_API.G_MISS_CHAR
13 ,csu_code OKL_INS_CLAIMS_V.CSU_CODE%TYPE := OKC_API.G_MISS_CHAR
14 ,claim_number OKL_INS_CLAIMS_V.CLAIM_NUMBER%TYPE := OKC_API.G_MISS_CHAR
15 ,claim_date OKL_INS_CLAIMS_V.CLAIM_DATE%TYPE := OKC_API.G_MISS_DATE
16 ,loss_date OKL_INS_CLAIMS_V.LOSS_DATE%TYPE := OKC_API.G_MISS_DATE
17 ,description OKL_INS_CLAIMS_V.DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR
18 ,police_contact OKL_INS_CLAIMS_V.POLICE_CONTACT%TYPE := OKC_API.G_MISS_CHAR
19 ,police_report OKL_INS_CLAIMS_V.POLICE_REPORT%TYPE := OKC_API.G_MISS_CHAR
20 ,amount NUMBER := OKC_API.G_MISS_NUM
21 ,attribute_category OKL_INS_CLAIMS_V.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR
22 ,attribute1 OKL_INS_CLAIMS_V.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR
23 ,attribute2 OKL_INS_CLAIMS_V.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR
24 ,attribute3 OKL_INS_CLAIMS_V.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR
25 ,attribute4 OKL_INS_CLAIMS_V.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR
26 ,attribute5 OKL_INS_CLAIMS_V.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR
27 ,attribute6 OKL_INS_CLAIMS_V.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR
28 ,attribute7 OKL_INS_CLAIMS_V.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR
29 ,attribute8 OKL_INS_CLAIMS_V.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR
30 ,attribute9 OKL_INS_CLAIMS_V.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR
31 ,attribute10 OKL_INS_CLAIMS_V.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR
32 ,attribute11 OKL_INS_CLAIMS_V.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR
33 ,attribute12 OKL_INS_CLAIMS_V.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR
34 ,attribute13 OKL_INS_CLAIMS_V.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR
35 ,attribute14 OKL_INS_CLAIMS_V.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR
36 ,attribute15 OKL_INS_CLAIMS_V.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR
37 ,hold_date OKL_INS_CLAIMS_V.HOLD_DATE%TYPE := OKC_API.G_MISS_DATE
38 ,org_id NUMBER := OKC_API.G_MISS_NUM
39 ,request_id NUMBER := OKC_API.G_MISS_NUM
40 ,program_application_id NUMBER := OKC_API.G_MISS_NUM
41 ,program_id NUMBER := OKC_API.G_MISS_NUM
42 ,program_update_date OKL_INS_CLAIMS_V.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
43 ,created_by NUMBER := OKC_API.G_MISS_NUM
44 ,creation_date OKL_INS_CLAIMS_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE
45 ,last_updated_by NUMBER := OKC_API.G_MISS_NUM
46 ,last_update_date OKL_INS_CLAIMS_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
47 ,last_update_login NUMBER := OKC_API.G_MISS_NUM);
48 G_MISS_clmv_rec clmv_rec_type;
49 TYPE clmv_tbl_type IS TABLE OF clmv_rec_type
50 INDEX BY BINARY_INTEGER;
51 -- OKL_INS_CLAIMS_B Record Spec
52 TYPE clm_rec_type IS RECORD (
53 id NUMBER := OKC_API.G_MISS_NUM
54 ,claim_number OKL_INS_CLAIMS_B.CLAIM_NUMBER%TYPE := OKC_API.G_MISS_CHAR
55 ,csu_code OKL_INS_CLAIMS_B.CSU_CODE%TYPE := OKC_API.G_MISS_CHAR
56 ,ipy_id NUMBER := OKC_API.G_MISS_NUM
57 ,ltp_code OKL_INS_CLAIMS_B.LTP_CODE%TYPE := OKC_API.G_MISS_CHAR
58 ,program_update_date OKL_INS_CLAIMS_B.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
59 ,claim_date OKL_INS_CLAIMS_B.CLAIM_DATE%TYPE := OKC_API.G_MISS_DATE
60 ,program_id NUMBER := OKC_API.G_MISS_NUM
61 ,loss_date OKL_INS_CLAIMS_B.LOSS_DATE%TYPE := OKC_API.G_MISS_DATE
62 ,police_contact OKL_INS_CLAIMS_B.POLICE_CONTACT%TYPE := OKC_API.G_MISS_CHAR
63 ,amount NUMBER := OKC_API.G_MISS_NUM
64 ,object_version_number NUMBER := OKC_API.G_MISS_NUM
65 ,request_id NUMBER := OKC_API.G_MISS_NUM
66 ,program_application_id NUMBER := OKC_API.G_MISS_NUM
67 ,attribute_category OKL_INS_CLAIMS_B.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR
68 ,attribute1 OKL_INS_CLAIMS_B.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR
69 ,attribute2 OKL_INS_CLAIMS_B.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR
70 ,attribute3 OKL_INS_CLAIMS_B.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR
71 ,attribute4 OKL_INS_CLAIMS_B.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR
72 ,attribute5 OKL_INS_CLAIMS_B.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR
73 ,attribute6 OKL_INS_CLAIMS_B.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR
74 ,attribute7 OKL_INS_CLAIMS_B.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR
75 ,attribute8 OKL_INS_CLAIMS_B.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR
76 ,attribute9 OKL_INS_CLAIMS_B.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR
77 ,attribute10 OKL_INS_CLAIMS_B.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR
78 ,attribute11 OKL_INS_CLAIMS_B.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR
79 ,attribute12 OKL_INS_CLAIMS_B.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR
80 ,attribute13 OKL_INS_CLAIMS_B.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR
81 ,attribute14 OKL_INS_CLAIMS_B.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR
82 ,attribute15 OKL_INS_CLAIMS_B.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR
83 ,hold_date OKL_INS_CLAIMS_B.HOLD_DATE%TYPE := OKC_API.G_MISS_DATE
84 ,org_id NUMBER := OKC_API.G_MISS_NUM
85 ,created_by NUMBER := OKC_API.G_MISS_NUM
86 ,creation_date OKL_INS_CLAIMS_B.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE
87 ,last_updated_by NUMBER := OKC_API.G_MISS_NUM
88 ,last_update_date OKL_INS_CLAIMS_B.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
89 ,last_update_login NUMBER := OKC_API.G_MISS_NUM);
90 G_MISS_clm_rec clm_rec_type;
91 TYPE clm_tbl_type IS TABLE OF clm_rec_type
92 INDEX BY BINARY_INTEGER;
93 -- OKL_INS_CLAIMS_TL Record Spec
94 TYPE okl_ins_claims_tl_rec_type IS RECORD (
95 id NUMBER := OKC_API.G_MISS_NUM
96 ,language OKL_INS_CLAIMS_TL.LANGUAGE%TYPE := OKC_API.G_MISS_CHAR
97 ,description OKL_INS_CLAIMS_TL.DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR
98 ,police_report OKL_INS_CLAIMS_TL.POLICE_REPORT%TYPE := OKC_API.G_MISS_CHAR
99 ,comments OKL_INS_CLAIMS_TL.COMMENTS%TYPE := OKC_API.G_MISS_CHAR
100 ,source_lang OKL_INS_CLAIMS_TL.SOURCE_LANG%TYPE := OKC_API.G_MISS_CHAR
101 ,sfwt_flag OKL_INS_CLAIMS_TL.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR
102 ,created_by NUMBER := OKC_API.G_MISS_NUM
103 ,creation_date OKL_INS_CLAIMS_TL.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE
104 ,last_updated_by NUMBER := OKC_API.G_MISS_NUM
105 ,last_update_date OKL_INS_CLAIMS_TL.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE
106 ,last_update_login NUMBER := OKC_API.G_MISS_NUM);
107 G_MISS_okl_ins_claims_tl_rec okl_ins_claims_tl_rec_type;
108 TYPE okl_ins_claims_tl_tbl_type IS TABLE OF okl_ins_claims_tl_rec_type
109 INDEX BY BINARY_INTEGER;
110 ---------------------------------------------------------------------------
111 -- GLOBAL MESSAGE CONSTANTS
112 ---------------------------------------------------------------------------
113 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
114 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
115 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
116 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
117 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
118 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
119 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
120 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
121 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
122 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
123 G_NO_PARENT_RECORD CONSTANT VARCHAR2(200) := 'OKL_NO_PARENT_RECORD';
124 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_UNEXPECTED_ERROR';
125 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
126 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
127 ---------------------------------------------------------------------------
128 -- GLOBAL EXCEPTIONS
129 ---------------------------------------------------------------------------
130 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
131 ---------------------------------------------------------------------------
132 -- GLOBAL VARIABLES
133 ---------------------------------------------------------------------------
134 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CLM_PVT';
135 G_APP_NAME CONSTANT VARCHAR2(3) := 'OKL';
136 ---------------------------------------------------------------------------
137 -- Procedures and Functions
138 ---------------------------------------------------------------------------
139 PROCEDURE qc;
140 PROCEDURE change_version;
141 PROCEDURE api_copy;
142 PROCEDURE add_language;
143 PROCEDURE insert_row(
144 p_api_version IN NUMBER,
145 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
146 x_return_status OUT NOCOPY VARCHAR2,
147 x_msg_count OUT NOCOPY NUMBER,
148 x_msg_data OUT NOCOPY VARCHAR2,
149 p_clmv_rec IN clmv_rec_type,
150 x_clmv_rec OUT NOCOPY clmv_rec_type);
151 PROCEDURE insert_row(
152 p_api_version IN NUMBER,
153 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type,
158 x_clmv_tbl OUT NOCOPY clmv_tbl_type,
159 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
160 PROCEDURE insert_row(
161 p_api_version IN NUMBER,
162 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type,
167 x_clmv_tbl OUT NOCOPY clmv_tbl_type);
168 PROCEDURE lock_row(
169 p_api_version IN NUMBER,
170 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_rec IN clmv_rec_type);
175 PROCEDURE lock_row(
176 p_api_version IN NUMBER,
177 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type,
182 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
183 PROCEDURE lock_row(
184 p_api_version IN NUMBER,
185 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type);
190 PROCEDURE update_row(
191 p_api_version IN NUMBER,
192 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
193 x_return_status OUT NOCOPY VARCHAR2,
194 x_msg_count OUT NOCOPY NUMBER,
195 x_msg_data OUT NOCOPY VARCHAR2,
196 p_clmv_rec IN clmv_rec_type,
197 x_clmv_rec OUT NOCOPY clmv_rec_type);
198 PROCEDURE update_row(
199 p_api_version IN NUMBER,
200 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type,
205 x_clmv_tbl OUT NOCOPY clmv_tbl_type,
206 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
207 PROCEDURE update_row(
208 p_api_version IN NUMBER,
209 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type,
214 x_clmv_tbl OUT NOCOPY clmv_tbl_type);
215 PROCEDURE delete_row(
216 p_api_version IN NUMBER,
217 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_rec IN clmv_rec_type);
222 PROCEDURE delete_row(
223 p_api_version IN NUMBER,
224 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_tbl IN clmv_tbl_type,
229 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
230 PROCEDURE delete_row(
231 p_api_version IN NUMBER,
232 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
233 x_return_status OUT NOCOPY VARCHAR2,
234 x_msg_count OUT NOCOPY NUMBER,
235 x_msg_data OUT NOCOPY VARCHAR2,
236 p_clmv_tbl IN clmv_tbl_type);
237 PROCEDURE validate_row(
238 p_api_version IN NUMBER,
239 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_clmv_rec IN clmv_rec_type);
244 PROCEDURE validate_row(
245 p_api_version IN NUMBER,
246 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
247 x_return_status OUT NOCOPY VARCHAR2,
248 x_msg_count OUT NOCOPY NUMBER,
249 x_msg_data OUT NOCOPY VARCHAR2,
250 p_clmv_tbl IN clmv_tbl_type,
251 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
252 PROCEDURE validate_row(
253 p_api_version IN NUMBER,
254 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
255 x_return_status OUT NOCOPY VARCHAR2,
256 x_msg_count OUT NOCOPY NUMBER,
257 x_msg_data OUT NOCOPY VARCHAR2,
258 p_clmv_tbl IN clmv_tbl_type);
259 END OKL_CLM_PVT;