[Home] [Help]
PACKAGE: APPS.AMW_CONTROL_PVT
Source
1 PACKAGE AMW_CONTROL_PVT AUTHID CURRENT_USER AS
2 /* $Header: amwvctls.pls 120.1.12000000.2 2007/03/20 19:22:37 npanandi ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- AMW_Control_PVT
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- End of Comments
14 -- ===============================================================
15
16 -- Default number of records fetch per call
17 G_DEFAULT_NUM_REC_FETCH NUMBER := 30;
18
19 G_FALSE VARCHAr2(1) := FND_API.G_FALSE;
20 G_TRUE VARCHAr2(1) := FND_API.G_TRUE;
21
22 --===================================================================
23 -- Start of Comments
24 -- -------------------------------------------------------
25 -- Record name
26 -- control_rec_type
27 -- -------------------------------------------------------
28 -- Parameters:
29 -- control_id
30 -- last_update_date
31 -- last_updated_by
32 -- creation_date
33 -- created_by
34 -- last_update_login
35 -- control_type
36 -- category
37 -- attribute_category
38 -- source
39 -- attribute1
40 -- attribute2
41 -- attribute3
42 -- attribute4
43 -- attribute5
44 -- attribute6
45 -- attribute7
46 -- attribute8
47 -- attribute9
48 -- attribute10
49 -- attribute11
50 -- attribute12
51 -- attribute13
52 -- attribute14
53 -- attribute15
54 -- security_group_id
55 -- control_location
56 -- automation_type
57 -- application_id
58 -- job_id
59 -- object_version_number
60 -- control_rev_id
61 -- rev_num
62 -- end_date
63 -- approval_status
64 -- approval_date
65 -- requestor_id
66 -- created_by_module
67 -- curr_approved_flag
68 -- latest_revision_flag
69 -- orig_system_reference
70 --
71 -- Required
72 --
73 -- Defaults
74 --
75 -- Note: This is automatic generated record definition, it includes all columns
76 -- defined in the table, developer must manually add or delete some of the attributes.
77 --
78 -- End of Comments
79
80 --===================================================================
81 /*TYPE control_rec_type IS RECORD
82 (
83 control_id NUMBER ,
84 last_update_date DATE ,
85 last_updated_by NUMBER ,
86 creation_date DATE ,
87 created_by NUMBER ,
88 last_update_login NUMBER ,
89 control_type VARCHAR2(30) ,
90 category VARCHAR2(30) ,
91 attribute_category VARCHAR2(30) ,
92 source VARCHAR2(30) ,
93 attribute1 VARCHAR2(150) ,
94 attribute2 VARCHAR2(150) ,
95 attribute3 VARCHAR2(150) ,
96 attribute4 VARCHAR2(150) ,
97 attribute5 VARCHAR2(150) ,
98 attribute6 VARCHAR2(150) ,
99 attribute7 VARCHAR2(150) ,
100 attribute8 VARCHAR2(150) ,
101 attribute9 VARCHAR2(150) ,
102 attribute10 VARCHAR2(150) ,
103 attribute11 VARCHAR2(150) ,
104 attribute12 VARCHAR2(150) ,
105 attribute13 VARCHAR2(150) ,
106 attribute14 VARCHAR2(150) ,
107 attribute15 VARCHAR2(150) ,
108 security_group_id NUMBER ,
109 control_location VARCHAR2(30) ,
110 automation_type VARCHAR2(30) ,
111 application_id NUMBER ,
112 job_id NUMBER ,
113 object_version_number NUMBER ,
114 control_rev_id NUMBER ,
115 rev_num NUMBER ,
116 end_date DATE ,
117 approval_status VARCHAR2(30) ,
118 approval_date DATE ,
119 requestor_id NUMBER ,
120 created_by_module VARCHAR2(150) ,
121 curr_approved_flag VARCHAR2(1) ,
122 latest_revision_flag VARCHAR2(1) ,
123 orig_system_reference VARCHAR2(240) ,
124 name VARCHAR2(240) := null,
125 description varchar2(4000) := null,
126 language varchar2(4) := null,
127 source_lang varchar2(4) := null,
128 physical_evidence varchar2(240) := null
129 );
130 */
131 TYPE control_rec_type IS RECORD
132 (
133 control_id NUMBER := null,
134 last_update_date DATE := null ,
135 last_updated_by NUMBER := null ,
136 creation_date DATE := null ,
137 created_by NUMBER := null ,
138 last_update_login NUMBER := null ,
139 control_type VARCHAR2(30) := null,
140 category VARCHAR2(30) := null,
141 attribute_category VARCHAR2(30) := null,
142 /*03.20.2007 npanandi: bug 4492239 fix -- increased the length of controlSource,
143 to 240, to make it consistent with length of AmwControlsB.Source*/
144 source VARCHAR2(240) := null,
145 attribute1 VARCHAR2(150) := null,
146 attribute2 VARCHAR2(150) := null,
147 attribute3 VARCHAR2(150) := null,
148 attribute4 VARCHAR2(150) := null,
149 attribute5 VARCHAR2(150) := null,
150 attribute6 VARCHAR2(150) := null,
151 attribute7 VARCHAR2(150) := null,
152 attribute8 VARCHAR2(150) := null,
153 attribute9 VARCHAR2(150) := null,
154 attribute10 VARCHAR2(150) := null,
155 attribute11 VARCHAR2(150) := null,
156 attribute12 VARCHAR2(150) := null,
157 attribute13 VARCHAR2(150) := null,
158 attribute14 VARCHAR2(150) := null,
159 attribute15 VARCHAR2(150) := null,
160 security_group_id NUMBER := null,
161 control_location VARCHAR2(30) := null,
162 automation_type VARCHAR2(30) := null,
163 application_id NUMBER := null,
164 job_id NUMBER := null,
165 object_version_number NUMBER := null,
166 control_rev_id NUMBER := null,
167 rev_num NUMBER := null,
168 end_date DATE := null,
169 approval_status VARCHAR2(30) := null,
170 approval_date DATE := null,
171 requestor_id NUMBER := null,
172 created_by_module VARCHAR2(150) := null,
173 curr_approved_flag VARCHAR2(1) := null,
174 latest_revision_flag VARCHAR2(1) := null,
175 orig_system_reference VARCHAR2(240) := null,
176 name VARCHAR2(240) := null,
177 description varchar2(4000) := null,
178 language varchar2(4) := null,
179 source_lang varchar2(4) := null,
180 physical_evidence varchar2(240) := null,
181 preventive_control varchar2(1) := null,
182 detective_control varchar2(1) := null,
183 disclosure_control varchar2(1) := null,
184 key_mitigating varchar2(1) := null,
185 verification_source varchar2(1) := null,
186 verification_source_name varchar2(240) := null,
187 verification_instruction varchar2(2000) := null,
188 --- NPANANDI 04.08,2005: changed the length of uom_code column
189 ---below -- bug 4283757 fix
190 UOM_CODE VARCHAR2(30) DEFAULT NULL
191 ,CONTROL_FREQUENCY NUMBER DEFAULT NULL
192 --NPANANDI 12.10.2004: ADDED BELOW FOR CTRL CLASSIFICATION
193 ,CLASSIFICATION NUMBER DEFAULT NULL
194 );
195
196 g_control_rec control_rec_type;
197 TYPE control_tbl_type IS TABLE OF control_rec_type INDEX BY BINARY_INTEGER;
198 g_control_tbl control_tbl_type;
199
200 -- ==============================================================================
201 -- Start of Comments
202 -- ==============================================================================
203 -- API Name
204 -- Load_Control
205 -- Type
206 -- Private
207 -- Pre-Req
208 --
209 -- Parameters
210 --
211 -- IN
212 -- p_api_version_number IN NUMBER Required
213 -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
214 -- p_commit IN VARCHAR2 Optional Default = G_FALSE
215 -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
216 -- p_control_rec IN control_rec_type Required
217 -- p_load_control_mode IN VARCHAR2 Required
218 --
219 -- OUT
220 -- x_return_status OUT VARCHAR2
221 -- x_msg_count OUT NUMBER
222 -- x_msg_data OUT VARCHAR2
223 -- Version : Current version 1.0
224 -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
225 -- and basic operation, developer must manually add parameters and business logic as necessary.
226 --
227 -- End of Comments
228 -- ==============================================================================
229 --
230 /*
231 PROCEDURE Load1_Control(
232 p_api_version_number IN NUMBER,
233 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
234 p_commit IN VARCHAR2 := FND_API.G_FALSE,
235 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
236
237 x_return_status OUT nocopy VARCHAR2,
238 x_msg_count OUT nocopy NUMBER,
239 x_msg_data OUT nocopy VARCHAR2,
240
241 x_create_control_rev_id out nocopy number,
242 x_update_control_rev_id out nocopy number,
243 x_revise_control_rev_id out nocopy number,
244 x_mode_affected out nocopy varchar2,
245
246 p_control_rec IN control_rec_type,
247 ----p_load_control_mode IN VARCHAR2,
248 p_party_id in number
249 );
250 */
251 procedure load_Control(
252 p_api_version_number IN NUMBER,
253 p_init_msg_list IN VARCHAR2 := G_FALSE,
254 p_commit IN VARCHAR2 := G_FALSE,
255 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
256
257 x_return_status OUT nocopy VARCHAR2,
258 x_msg_count OUT nocopy NUMBER,
259 x_msg_data OUT nocopy VARCHAR2,
260
261 ---x_create_control_rev_id out number,
262 ---x_update_control_rev_id out number,
263 ---x_revision_control_rev_id out number,
264 x_control_rev_id out nocopy number,
265 x_control_id out nocopy number,
266 x_mode_affected out nocopy varchar2,
267
268 p_control_rec IN control_rec_type ----- := g_miss_control_rec,
269 -----p_load_control_mode IN VARCHAR2,
270 -----p_party_id in number
271 );
272
273 -- ==============================================================================
274 -- Start of Comments
275 -- ==============================================================================
276 -- API Name
277 -- Create_Control
278 -- Type
279 -- Private
280 -- Pre-Req
281 --
282 -- Parameters
283 --
284 -- IN
285 -- p_api_version_number IN NUMBER Required
286 -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
287 -- p_commit IN VARCHAR2 Optional Default = G_FALSE
288 -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
289 -- p_control_rec IN control_rec_type Required
290 --
291 -- OUT
292 -- x_return_status OUT VARCHAR2
293 -- x_msg_count OUT NUMBER
294 -- x_msg_data OUT VARCHAR2
295 -- Version : Current version 1.0
296 -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
297 -- and basic operation, developer must manually add parameters and business logic as necessary.
298 --
299 -- End of Comments
300 -- ==============================================================================
301 --
302
303 PROCEDURE Create_Control(
304 p_api_version_number IN NUMBER,
305 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
306 p_commit IN VARCHAR2 := FND_API.G_FALSE,
307 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
308
309 x_return_status OUT nocopy VARCHAR2,
313 ---p_control_rec IN control_rec_type := g_miss_control_rec,
310 x_msg_count OUT nocopy NUMBER,
311 x_msg_data OUT nocopy VARCHAR2,
312
314 p_control_rec IN control_rec_type, ---- := g_miss_control_rec,
315 x_control_rev_id OUT nocopy NUMBER
316 );
317
318 -- ==============================================================================
319 -- Start of Comments
320 -- ==============================================================================
321 -- API Name
322 -- Update_Control
323 -- Type
324 -- Private
325 -- Pre-Req
326 --
327 -- Parameters
328 --
329 -- IN
330 -- p_api_version_number IN NUMBER Required
331 -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
332 -- p_commit IN VARCHAR2 Optional Default = G_FALSE
333 -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
334 -- p_control_rec IN control_rec_type Required
335 --
336 -- OUT
337 -- x_return_status OUT VARCHAR2
338 -- x_msg_count OUT NUMBER
339 -- x_msg_data OUT VARCHAR2
340 -- Version : Current version 1.0
341 -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
342 -- and basic operation, developer must manually add parameters and business logic as necessary.
343 --
344 -- End of Comments
345 -- ==============================================================================
346 --
347
348 PROCEDURE Update_Control(
349 p_api_version_number IN NUMBER,
350 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
351 p_commit IN VARCHAR2 := FND_API.G_FALSE,
352 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
353
354 x_return_status OUT nocopy VARCHAR2,
355 x_msg_count OUT nocopy NUMBER,
356 x_msg_data OUT nocopy VARCHAR2,
357
358 p_control_rec IN control_rec_type,
359 x_object_version_number OUT nocopy NUMBER
360 );
361
362 -- ==============================================================================
363 -- Start of Comments
364 -- ==============================================================================
365 -- API Name
366 -- Delete_Control
367 -- Type
368 -- Private
369 -- Pre-Req
370 --
371 -- Parameters
372 --
373 -- IN
374 -- p_api_version_number IN NUMBER Required
375 -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
376 -- p_commit IN VARCHAR2 Optional Default = G_FALSE
377 -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
378 -- p_CONTROL_REV_ID IN NUMBER
379 -- p_object_version_number IN NUMBER Optional Default = NULL
380 --
381 -- OUT
382 -- x_return_status OUT VARCHAR2
383 -- x_msg_count OUT NUMBER
384 -- x_msg_data OUT VARCHAR2
385 -- Version : Current version 1.0
386 -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
387 -- and basic operation, developer must manually add parameters and business logic as necessary.
388 --
389 -- End of Comments
390 -- ==============================================================================
391 --
392
393 PROCEDURE Delete_Control(
394 p_api_version_number IN NUMBER,
395 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
396 p_commit IN VARCHAR2 := FND_API.G_FALSE,
397 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
398 x_return_status OUT nocopy VARCHAR2,
399 x_msg_count OUT nocopy NUMBER,
400 x_msg_data OUT nocopy VARCHAR2,
401 p_control_rev_id IN NUMBER,
402 p_object_version_number IN NUMBER
403 );
404
405 -- ==============================================================================
406 -- Start of Comments
407 -- ==============================================================================
408 -- API Name
409 -- Lock_Control
410 -- Type
411 -- Private
412 -- Pre-Req
413 --
414 -- Parameters
415 --
416 -- IN
417 -- p_api_version_number IN NUMBER Required
418 -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
419 -- p_commit IN VARCHAR2 Optional Default = G_FALSE
420 -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
421 -- p_control_rec IN control_rec_type Required
422 --
423 -- OUT
424 -- x_return_status OUT VARCHAR2
425 -- x_msg_count OUT NUMBER
426 -- x_msg_data OUT VARCHAR2
427 -- Version : Current version 1.0
428 -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
429 -- and basic operation, developer must manually add parameters and business logic as necessary.
430 --
434
431 -- End of Comments
432 -- ==============================================================================
433 --
435 PROCEDURE Lock_Control(
436 p_api_version_number IN NUMBER,
437 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
438
439 x_return_status OUT nocopy VARCHAR2,
440 x_msg_count OUT nocopy NUMBER,
441 x_msg_data OUT nocopy VARCHAR2,
442
443 p_control_rev_id IN NUMBER,
444 p_object_version IN NUMBER
445 );
446
447
448 -- Start of Comments
449 --
450 -- validation procedures
451 --
452 -- p_validation_mode is a constant defined in AMS_UTILITY_PVT package
453 -- For create: G_CREATE, for update: G_UPDATE
454 -- Note: 1. This is automated generated item level validation procedure.
455 -- The actual validation detail is needed to be added.
456 -- 2. We can also validate table instead of record. There will be an option for user to choose.
457 -- End of Comments
458
459 PROCEDURE Validate_control(
460 p_mode in varchar2,
461 p_api_version_number IN NUMBER,
462 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
463 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
464 p_control_rec IN out nocopy control_rec_type,
465 x_return_status OUT nocopy VARCHAR2,
466 x_msg_count OUT nocopy NUMBER,
467 x_msg_data OUT nocopy VARCHAR2
468 );
469
470 -- Start of Comments
471 --
472 -- validation procedures
473 --
474 -- p_validation_mode is a constant defined in AMS_UTILITY_PVT package
475 -- For create: G_CREATE, for update: G_UPDATE
476 -- Note: 1. This is automated generated item level validation procedure.
477 -- The actual validation detail is needed to be added.
478 -- 2. Validate the unique keys, lookups here
479 -- End of Comments
480
481 PROCEDURE Check_control_Items (
482 P_control_rec IN control_rec_type,
483 p_validation_mode IN VARCHAR2,
484 x_return_status OUT nocopy VARCHAR2
485 );
486
487 -- Start of Comments
488 --
489 -- Record level validation procedures
490 --
491 -- p_validation_mode is a constant defined in AMS_UTILITY_PVT package
492 -- For create: G_CREATE, for update: G_UPDATE
493 -- Note: 1. This is automated generated item level validation procedure.
494 -- The actual validation detail is needed to be added.
495 -- 2. Developer can manually added inter-field level validation.
496 -- End of Comments
497
498 PROCEDURE Validate_control_rec(
499 p_mode in varchar2 := 'CREATE',
500 p_api_version_number IN NUMBER,
501 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
502 x_return_status OUT nocopy VARCHAR2,
503 x_msg_count OUT nocopy NUMBER,
504 x_msg_data OUT nocopy VARCHAR2,
505 p_control_rec IN control_rec_type
506 );
507 END AMW_Control_PVT;