58: ,p_attribute13 IN VARCHAR2
59: ,p_attribute14 IN VARCHAR2
60: ,p_attribute15 IN VARCHAR2
61: ) IS
62: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
63: l_found BOOLEAN;
64: l_msg_count NUMBER ;
65: l_msg_data VARCHAR2(240);
66: BEGIN
66: BEGIN
67:
68: IF p_action NOT IN ('INSERT', 'UPDATE', 'LOCK', 'DELETE') THEN
69: -- unknown exception
70: RAISE fnd_api.g_exc_unexpected_error;
71: END IF;
72:
73: /* check existence */
74: IF check_existence(p_rule_id, p_sequence_number) THEN
74: IF check_existence(p_rule_id, p_sequence_number) THEN
75: IF p_action = 'INSERT' THEN
76: fnd_message.set_name('WMS', 'WMS_RESTRICTION_EXISTS');
77: fnd_msg_pub.ADD;
78: RAISE fnd_api.g_exc_error;
79: END IF;
80: ELSE
81: IF p_action IN ('DELETE','LOCK','UPDATE') THEN
82: fnd_message.set_name('WMS', 'WMS_RESTRICTION_NOT_FOUND');
80: ELSE
81: IF p_action IN ('DELETE','LOCK','UPDATE') THEN
82: fnd_message.set_name('WMS', 'WMS_RESTRICTION_NOT_FOUND');
83: fnd_msg_pub.ADD;
84: RAISE fnd_api.g_exc_error;
85: END IF;
86: END IF;
87:
88: /* more input validation update and insert */
90: /* check foreign keys */
91: wms_rule_form_pkg.find_rule
92: (
93: p_api_version => 1.0
94: ,p_init_msg_list => fnd_api.g_false
95: ,x_return_status => l_return_status
96: ,x_msg_count => l_msg_count
97: ,x_msg_data => l_msg_data
98: ,p_rule_id => p_rule_id
98: ,p_rule_id => p_rule_id
99: ,x_found => l_found
100: );
101:
102: if x_return_status = fnd_api.g_ret_sts_unexp_error then
103: raise fnd_api.g_exc_unexpected_error;
104: elsif x_return_status = fnd_api.g_ret_sts_error then
105: raise fnd_api.g_exc_error;
106: end if;
99: ,x_found => l_found
100: );
101:
102: if x_return_status = fnd_api.g_ret_sts_unexp_error then
103: raise fnd_api.g_exc_unexpected_error;
104: elsif x_return_status = fnd_api.g_ret_sts_error then
105: raise fnd_api.g_exc_error;
106: end if;
107:
100: );
101:
102: if x_return_status = fnd_api.g_ret_sts_unexp_error then
103: raise fnd_api.g_exc_unexpected_error;
104: elsif x_return_status = fnd_api.g_ret_sts_error then
105: raise fnd_api.g_exc_error;
106: end if;
107:
108: IF l_found = FALSE THEN
101:
102: if x_return_status = fnd_api.g_ret_sts_unexp_error then
103: raise fnd_api.g_exc_unexpected_error;
104: elsif x_return_status = fnd_api.g_ret_sts_error then
105: raise fnd_api.g_exc_error;
106: end if;
107:
108: IF l_found = FALSE THEN
109: fnd_message.set_name('WMS', 'WMS_RULE_NOT_FOUND');
107:
108: IF l_found = FALSE THEN
109: fnd_message.set_name('WMS', 'WMS_RULE_NOT_FOUND');
110: fnd_msg_pub.ADD;
111: RAISE fnd_api.g_exc_error;
112: END IF;
113:
114: /* validate p_parameter_id */
115: -- wms_parameter_form_pkg.find_parameter(
113:
114: /* validate p_parameter_id */
115: -- wms_parameter_form_pkg.find_parameter(
116: -- p_api_version => 1.0
117: -- ,p_init_msg_list => fnd_api.g_false
118: -- ,x_return_status => l_return_status
119: -- ,x_msg_count => l_msg_count
120: -- ,x_msg_data => l_msg_data
121: -- ,p_parameter_id => p_parameter_id
120: -- ,x_msg_data => l_msg_data
121: -- ,p_parameter_id => p_parameter_id
122: -- ,x_found => l_found
123: -- );
124: -- if x_return_status = fnd_api.g_ret_sts_unexp_error then
125: -- raise fnd_api.g_exc_unexpected_error;
126: -- elsif x_return_status = fnd_api.g_ret_sts_error then
127: -- raise fnd_api.g_exc_error;
128: -- end if;
121: -- ,p_parameter_id => p_parameter_id
122: -- ,x_found => l_found
123: -- );
124: -- if x_return_status = fnd_api.g_ret_sts_unexp_error then
125: -- raise fnd_api.g_exc_unexpected_error;
126: -- elsif x_return_status = fnd_api.g_ret_sts_error then
127: -- raise fnd_api.g_exc_error;
128: -- end if;
129:
122: -- ,x_found => l_found
123: -- );
124: -- if x_return_status = fnd_api.g_ret_sts_unexp_error then
125: -- raise fnd_api.g_exc_unexpected_error;
126: -- elsif x_return_status = fnd_api.g_ret_sts_error then
127: -- raise fnd_api.g_exc_error;
128: -- end if;
129:
130: -- IF l_found = FALSE THEN
123: -- );
124: -- if x_return_status = fnd_api.g_ret_sts_unexp_error then
125: -- raise fnd_api.g_exc_unexpected_error;
126: -- elsif x_return_status = fnd_api.g_ret_sts_error then
127: -- raise fnd_api.g_exc_error;
128: -- end if;
129:
130: -- IF l_found = FALSE THEN
131: -- fnd_message.set_name('WMS', 'WMS_PARAMETER_NOT_FOUND');
129:
130: -- IF l_found = FALSE THEN
131: -- fnd_message.set_name('WMS', 'WMS_PARAMETER_NOT_FOUND');
132: -- fnd_msg_pub.ADD;
133: -- RAISE fnd_api.g_exc_error;
134: -- END IF;
135:
136: -- other input parameters are not validated currently
137: END IF;
138:
139: x_return_status := l_return_status;
140:
141: EXCEPTION
142: WHEN fnd_api.g_exc_error THEN
143: x_return_status := fnd_api.g_ret_sts_error;
144:
145: WHEN fnd_api.g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
139: x_return_status := l_return_status;
140:
141: EXCEPTION
142: WHEN fnd_api.g_exc_error THEN
143: x_return_status := fnd_api.g_ret_sts_error;
144:
145: WHEN fnd_api.g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147:
141: EXCEPTION
142: WHEN fnd_api.g_exc_error THEN
143: x_return_status := fnd_api.g_ret_sts_error;
144:
145: WHEN fnd_api.g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147:
148: WHEN OTHERS THEN
149: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: WHEN fnd_api.g_exc_error THEN
143: x_return_status := fnd_api.g_ret_sts_error;
144:
145: WHEN fnd_api.g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147:
148: WHEN OTHERS THEN
149: x_return_status := fnd_api.g_ret_sts_unexp_error;
150:
145: WHEN fnd_api.g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147:
148: WHEN OTHERS THEN
149: x_return_status := fnd_api.g_ret_sts_unexp_error;
150:
151: END validate_input;
152:
153: procedure insert_restriction
152:
153: procedure insert_restriction
154: (
155: p_api_version IN NUMBER
156: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
157: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
158: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
159: ,x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
160: ,x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
153: procedure insert_restriction
154: (
155: p_api_version IN NUMBER
156: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
157: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
158: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
159: ,x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
160: ,x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
161: ,p_rowid IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2
192: ) IS
193: -- API standard variables
194: l_api_version constant number := 1.0;
195: l_api_name constant varchar2(30) := 'Insert_Restriction';
196: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
197: l_row_id VARCHAR2(20);
198: l_date DATE;
199: l_user_id NUMBER;
200: l_login_id NUMBER;
201: l_found BOOLEAN;
202: begin
203:
204: -- Standard call to check for call compatibility
205: if not fnd_api.compatible_api_call( l_api_version
206: ,p_api_version
207: ,l_api_name
208: ,g_pkg_name ) then
209: raise fnd_api.g_exc_unexpected_error;
205: if not fnd_api.compatible_api_call( l_api_version
206: ,p_api_version
207: ,l_api_name
208: ,g_pkg_name ) then
209: raise fnd_api.g_exc_unexpected_error;
210: end if;
211:
212: -- Initialize message list if p_init_msg_list is set to TRUE
213: if fnd_api.to_boolean( p_init_msg_list ) then
209: raise fnd_api.g_exc_unexpected_error;
210: end if;
211:
212: -- Initialize message list if p_init_msg_list is set to TRUE
213: if fnd_api.to_boolean( p_init_msg_list ) then
214: fnd_msg_pub.initialize;
215: end if;
216:
217: /* add validation here */
255: ,p_attribute14 => p_attribute14
256: ,p_attribute15 => p_attribute15
257: );
258:
259: if x_return_status = fnd_api.g_ret_sts_unexp_error then
260: raise fnd_api.g_exc_unexpected_error;
261: elsif x_return_status = fnd_api.g_ret_sts_error then
262: raise fnd_api.g_exc_error;
263: end if;
256: ,p_attribute15 => p_attribute15
257: );
258:
259: if x_return_status = fnd_api.g_ret_sts_unexp_error then
260: raise fnd_api.g_exc_unexpected_error;
261: elsif x_return_status = fnd_api.g_ret_sts_error then
262: raise fnd_api.g_exc_error;
263: end if;
264:
257: );
258:
259: if x_return_status = fnd_api.g_ret_sts_unexp_error then
260: raise fnd_api.g_exc_unexpected_error;
261: elsif x_return_status = fnd_api.g_ret_sts_error then
262: raise fnd_api.g_exc_error;
263: end if;
264:
265: /* call the table handler to do the insert */
258:
259: if x_return_status = fnd_api.g_ret_sts_unexp_error then
260: raise fnd_api.g_exc_unexpected_error;
261: elsif x_return_status = fnd_api.g_ret_sts_error then
262: raise fnd_api.g_exc_error;
263: end if;
264:
265: /* call the table handler to do the insert */
266: wms_restrictions_pkg.insert_row
305:
306: x_return_status := l_return_status;
307:
308: EXCEPTION
309: when fnd_api.g_exc_error then
310: x_return_status := fnd_api.g_ret_sts_error;
311: fnd_msg_pub.count_and_get( p_count => x_msg_count
312: ,p_data => x_msg_data );
313:
306: x_return_status := l_return_status;
307:
308: EXCEPTION
309: when fnd_api.g_exc_error then
310: x_return_status := fnd_api.g_ret_sts_error;
311: fnd_msg_pub.count_and_get( p_count => x_msg_count
312: ,p_data => x_msg_data );
313:
314: when fnd_api.g_exc_unexpected_error then
310: x_return_status := fnd_api.g_ret_sts_error;
311: fnd_msg_pub.count_and_get( p_count => x_msg_count
312: ,p_data => x_msg_data );
313:
314: when fnd_api.g_exc_unexpected_error then
315: x_return_status := fnd_api.g_ret_sts_unexp_error;
316: fnd_msg_pub.count_and_get( p_count => x_msg_count
317: ,p_data => x_msg_data );
318:
311: fnd_msg_pub.count_and_get( p_count => x_msg_count
312: ,p_data => x_msg_data );
313:
314: when fnd_api.g_exc_unexpected_error then
315: x_return_status := fnd_api.g_ret_sts_unexp_error;
316: fnd_msg_pub.count_and_get( p_count => x_msg_count
317: ,p_data => x_msg_data );
318:
319: when others then
316: fnd_msg_pub.count_and_get( p_count => x_msg_count
317: ,p_data => x_msg_data );
318:
319: when others then
320: x_return_status := fnd_api.g_ret_sts_unexp_error;
321: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) then
322: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
323: end if;
324: fnd_msg_pub.count_and_get( p_count => x_msg_count
327: end insert_restriction;
328:
329: procedure lock_restriction (
330: p_api_version IN NUMBER
331: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
332: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
333: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
334: ,x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
335: ,x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
328:
329: procedure lock_restriction (
330: p_api_version IN NUMBER
331: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
332: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
333: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
334: ,x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
335: ,x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
336: ,p_rowid IN VARCHAR2
367: ) is
368: -- API standard variables
369: l_api_version constant number := 1.0;
370: l_api_name constant varchar2(30) := 'Lock_Restriction';
371: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
372: begin
373: -- Standard call to check for call compatibility
374: if not fnd_api.compatible_api_call( l_api_version
375: ,p_api_version
370: l_api_name constant varchar2(30) := 'Lock_Restriction';
371: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
372: begin
373: -- Standard call to check for call compatibility
374: if not fnd_api.compatible_api_call( l_api_version
375: ,p_api_version
376: ,l_api_name
377: ,g_pkg_name ) then
378: raise fnd_api.g_exc_unexpected_error;
374: if not fnd_api.compatible_api_call( l_api_version
375: ,p_api_version
376: ,l_api_name
377: ,g_pkg_name ) then
378: raise fnd_api.g_exc_unexpected_error;
379: end if;
380:
381: -- Initialize message list if p_init_msg_list is set to TRUE
382: if fnd_api.to_boolean( p_init_msg_list ) then
378: raise fnd_api.g_exc_unexpected_error;
379: end if;
380:
381: -- Initialize message list if p_init_msg_list is set to TRUE
382: if fnd_api.to_boolean( p_init_msg_list ) then
383: fnd_msg_pub.initialize;
384: end if;
385:
386: validate_input
418: ,p_attribute14 => p_attribute14
419: ,p_attribute15 => p_attribute15
420: );
421:
422: if x_return_status = fnd_api.g_ret_sts_unexp_error then
423: raise fnd_api.g_exc_unexpected_error;
424: elsif x_return_status = fnd_api.g_ret_sts_error then
425: raise fnd_api.g_exc_error;
426: end if;
419: ,p_attribute15 => p_attribute15
420: );
421:
422: if x_return_status = fnd_api.g_ret_sts_unexp_error then
423: raise fnd_api.g_exc_unexpected_error;
424: elsif x_return_status = fnd_api.g_ret_sts_error then
425: raise fnd_api.g_exc_error;
426: end if;
427:
420: );
421:
422: if x_return_status = fnd_api.g_ret_sts_unexp_error then
423: raise fnd_api.g_exc_unexpected_error;
424: elsif x_return_status = fnd_api.g_ret_sts_error then
425: raise fnd_api.g_exc_error;
426: end if;
427:
428: wms_restrictions_pkg.lock_row (
421:
422: if x_return_status = fnd_api.g_ret_sts_unexp_error then
423: raise fnd_api.g_exc_unexpected_error;
424: elsif x_return_status = fnd_api.g_ret_sts_error then
425: raise fnd_api.g_exc_error;
426: end if;
427:
428: wms_restrictions_pkg.lock_row (
429: x_rowid => p_rowid
461:
462: x_return_status := l_return_status;
463:
464: EXCEPTION
465: WHEN fnd_api.g_exc_error THEN
466: x_return_status := fnd_api.g_ret_sts_error;
467: fnd_msg_pub.count_and_get( p_count => x_msg_count
468: ,p_data => x_msg_data );
469:
462: x_return_status := l_return_status;
463:
464: EXCEPTION
465: WHEN fnd_api.g_exc_error THEN
466: x_return_status := fnd_api.g_ret_sts_error;
467: fnd_msg_pub.count_and_get( p_count => x_msg_count
468: ,p_data => x_msg_data );
469:
470: WHEN fnd_api.g_exc_unexpected_error THEN
466: x_return_status := fnd_api.g_ret_sts_error;
467: fnd_msg_pub.count_and_get( p_count => x_msg_count
468: ,p_data => x_msg_data );
469:
470: WHEN fnd_api.g_exc_unexpected_error THEN
471: x_return_status := fnd_api.g_ret_sts_unexp_error;
472: fnd_msg_pub.count_and_get( p_count => x_msg_count
473: ,p_data => x_msg_data );
474:
467: fnd_msg_pub.count_and_get( p_count => x_msg_count
468: ,p_data => x_msg_data );
469:
470: WHEN fnd_api.g_exc_unexpected_error THEN
471: x_return_status := fnd_api.g_ret_sts_unexp_error;
472: fnd_msg_pub.count_and_get( p_count => x_msg_count
473: ,p_data => x_msg_data );
474:
475: WHEN OTHERS THEN
472: fnd_msg_pub.count_and_get( p_count => x_msg_count
473: ,p_data => x_msg_data );
474:
475: WHEN OTHERS THEN
476: x_return_status := fnd_api.g_ret_sts_unexp_error;
477: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) then
478: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
479: end if;
480: fnd_msg_pub.count_and_get( p_count => x_msg_count
483: end lock_restriction ;
484:
485: procedure update_restriction (
486: p_api_version IN NUMBER
487: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
488: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
489: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
490: ,x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
491: ,x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
484:
485: procedure update_restriction (
486: p_api_version IN NUMBER
487: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
488: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
489: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
490: ,x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
491: ,x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
492: ,p_rowid IN VARCHAR2
523: ) is
524: -- API standard variables
525: l_api_version constant number := 1.0;
526: l_api_name constant varchar2(30) := 'Update_Restriction';
527: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
528: l_row_id VARCHAR2(20);
529: l_date DATE;
530: l_user_id NUMBER;
531: l_login_id NUMBER;
531: l_login_id NUMBER;
532: l_found BOOLEAN;
533: begin
534: -- Standard call to check for call compatibility
535: if not fnd_api.compatible_api_call( l_api_version
536: ,p_api_version
537: ,l_api_name
538: ,g_pkg_name ) then
539: raise fnd_api.g_exc_unexpected_error;
535: if not fnd_api.compatible_api_call( l_api_version
536: ,p_api_version
537: ,l_api_name
538: ,g_pkg_name ) then
539: raise fnd_api.g_exc_unexpected_error;
540: end if;
541:
542: -- Initialize message list if p_init_msg_list is set to TRUE
543: if fnd_api.to_boolean( p_init_msg_list ) then
539: raise fnd_api.g_exc_unexpected_error;
540: end if;
541:
542: -- Initialize message list if p_init_msg_list is set to TRUE
543: if fnd_api.to_boolean( p_init_msg_list ) then
544: fnd_msg_pub.initialize;
545: end if;
546:
547: validate_input
579: ,p_attribute14 => p_attribute14
580: ,p_attribute15 => p_attribute15
581: );
582:
583: if x_return_status = fnd_api.g_ret_sts_unexp_error then
584: raise fnd_api.g_exc_unexpected_error;
585: elsif x_return_status = fnd_api.g_ret_sts_error then
586: raise fnd_api.g_exc_error;
587: end if;
580: ,p_attribute15 => p_attribute15
581: );
582:
583: if x_return_status = fnd_api.g_ret_sts_unexp_error then
584: raise fnd_api.g_exc_unexpected_error;
585: elsif x_return_status = fnd_api.g_ret_sts_error then
586: raise fnd_api.g_exc_error;
587: end if;
588:
581: );
582:
583: if x_return_status = fnd_api.g_ret_sts_unexp_error then
584: raise fnd_api.g_exc_unexpected_error;
585: elsif x_return_status = fnd_api.g_ret_sts_error then
586: raise fnd_api.g_exc_error;
587: end if;
588:
589: /* get who column information */
582:
583: if x_return_status = fnd_api.g_ret_sts_unexp_error then
584: raise fnd_api.g_exc_unexpected_error;
585: elsif x_return_status = fnd_api.g_ret_sts_error then
586: raise fnd_api.g_exc_error;
587: end if;
588:
589: /* get who column information */
590: SELECT Sysdate INTO l_date FROM dual;
632:
633: x_return_status := l_return_status;
634:
635: EXCEPTION
636: WHEN fnd_api.g_exc_error THEN
637: x_return_status := fnd_api.g_ret_sts_error;
638: fnd_msg_pub.count_and_get( p_count => x_msg_count
639: ,p_data => x_msg_data );
640:
633: x_return_status := l_return_status;
634:
635: EXCEPTION
636: WHEN fnd_api.g_exc_error THEN
637: x_return_status := fnd_api.g_ret_sts_error;
638: fnd_msg_pub.count_and_get( p_count => x_msg_count
639: ,p_data => x_msg_data );
640:
641: WHEN fnd_api.g_exc_unexpected_error THEN
637: x_return_status := fnd_api.g_ret_sts_error;
638: fnd_msg_pub.count_and_get( p_count => x_msg_count
639: ,p_data => x_msg_data );
640:
641: WHEN fnd_api.g_exc_unexpected_error THEN
642: x_return_status := fnd_api.g_ret_sts_unexp_error;
643: fnd_msg_pub.count_and_get( p_count => x_msg_count
644: ,p_data => x_msg_data );
645:
638: fnd_msg_pub.count_and_get( p_count => x_msg_count
639: ,p_data => x_msg_data );
640:
641: WHEN fnd_api.g_exc_unexpected_error THEN
642: x_return_status := fnd_api.g_ret_sts_unexp_error;
643: fnd_msg_pub.count_and_get( p_count => x_msg_count
644: ,p_data => x_msg_data );
645:
646: when others then
643: fnd_msg_pub.count_and_get( p_count => x_msg_count
644: ,p_data => x_msg_data );
645:
646: when others then
647: x_return_status := fnd_api.g_ret_sts_unexp_error;
648: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) then
649: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
650: end if;
651: fnd_msg_pub.count_and_get( p_count => x_msg_count
654: end update_restriction ;
655:
656: procedure delete_restriction (
657: p_api_version in NUMBER,
658: p_init_msg_list in varchar2 := fnd_api.g_false,
659: p_validation_level in number := fnd_api.g_valid_level_full,
660: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
661: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
662: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
655:
656: procedure delete_restriction (
657: p_api_version in NUMBER,
658: p_init_msg_list in varchar2 := fnd_api.g_false,
659: p_validation_level in number := fnd_api.g_valid_level_full,
660: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
661: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
662: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
663: p_rowid IN VARCHAR2,
666: ) is
667: -- API standard variables
668: l_api_version constant number := 1.0;
669: l_api_name constant varchar2(30) := 'Delete_Restriction';
670: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
671: l_dummy_rowid VARCHAR2(18);
672: BEGIN
673:
674: -- Standard call to check for call compatibility
671: l_dummy_rowid VARCHAR2(18);
672: BEGIN
673:
674: -- Standard call to check for call compatibility
675: if not fnd_api.compatible_api_call( l_api_version
676: ,p_api_version
677: ,l_api_name
678: ,g_pkg_name ) then
679: raise fnd_api.g_exc_unexpected_error;
675: if not fnd_api.compatible_api_call( l_api_version
676: ,p_api_version
677: ,l_api_name
678: ,g_pkg_name ) then
679: raise fnd_api.g_exc_unexpected_error;
680: end if;
681:
682: -- Initialize message list if p_init_msg_list is set to TRUE
683: if fnd_api.to_boolean( p_init_msg_list ) then
679: raise fnd_api.g_exc_unexpected_error;
680: end if;
681:
682: -- Initialize message list if p_init_msg_list is set to TRUE
683: if fnd_api.to_boolean( p_init_msg_list ) then
684: fnd_msg_pub.initialize;
685: end if;
686:
687: validate_input
689: x_return_status => x_return_status
690: ,p_action => 'DELETE'
691: ,p_rule_id => p_rule_id
692: ,p_sequence_number => p_sequence_number
693: ,p_parameter_id => fnd_api.g_miss_num -- dont care
694: ,p_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
690: ,p_action => 'DELETE'
691: ,p_rule_id => p_rule_id
692: ,p_sequence_number => p_sequence_number
693: ,p_parameter_id => fnd_api.g_miss_num -- dont care
694: ,p_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
691: ,p_rule_id => p_rule_id
692: ,p_sequence_number => p_sequence_number
693: ,p_parameter_id => fnd_api.g_miss_num -- dont care
694: ,p_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
692: ,p_sequence_number => p_sequence_number
693: ,p_parameter_id => fnd_api.g_miss_num -- dont care
694: ,p_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
693: ,p_parameter_id => fnd_api.g_miss_num -- dont care
694: ,p_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
694: ,p_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
695: ,p_operand_type_code => fnd_api.g_miss_num
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
696: ,p_operand_constant_number => fnd_api.g_miss_num
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
697: ,p_operand_constant_character => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
698: ,p_operand_constant_date => fnd_api.g_miss_date
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
699: ,p_operand_parameter_id => fnd_api.g_miss_num
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
700: ,p_operand_expression => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
701: ,p_operand_flex_value_set_id => fnd_api.g_miss_num
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
702: ,p_logical_operator_code => fnd_api.g_miss_num
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
703: ,p_bracket_open => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
704: ,p_bracket_close => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
705: ,p_attribute_category => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
706: ,p_attribute1 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
707: ,p_attribute2 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
708: ,p_attribute3 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
709: ,p_attribute4 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
710: ,p_attribute5 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
711: ,p_attribute6 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
719: ,p_attribute14 => fnd_api.g_miss_char
712: ,p_attribute7 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
719: ,p_attribute14 => fnd_api.g_miss_char
720: ,p_attribute15 => fnd_api.g_miss_char
713: ,p_attribute8 => fnd_api.g_miss_char
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
719: ,p_attribute14 => fnd_api.g_miss_char
720: ,p_attribute15 => fnd_api.g_miss_char
721: );
714: ,p_attribute9 => fnd_api.g_miss_char
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
719: ,p_attribute14 => fnd_api.g_miss_char
720: ,p_attribute15 => fnd_api.g_miss_char
721: );
722:
715: ,p_attribute10 => fnd_api.g_miss_char
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
719: ,p_attribute14 => fnd_api.g_miss_char
720: ,p_attribute15 => fnd_api.g_miss_char
721: );
722:
723: if x_return_status = fnd_api.g_ret_sts_unexp_error then
716: ,p_attribute11 => fnd_api.g_miss_char
717: ,p_attribute12 => fnd_api.g_miss_char
718: ,p_attribute13 => fnd_api.g_miss_char
719: ,p_attribute14 => fnd_api.g_miss_char
720: ,p_attribute15 => fnd_api.g_miss_char
721: );
722:
723: if x_return_status = fnd_api.g_ret_sts_unexp_error then
724: raise fnd_api.g_exc_unexpected_error;
719: ,p_attribute14 => fnd_api.g_miss_char
720: ,p_attribute15 => fnd_api.g_miss_char
721: );
722:
723: if x_return_status = fnd_api.g_ret_sts_unexp_error then
724: raise fnd_api.g_exc_unexpected_error;
725: elsif x_return_status = fnd_api.g_ret_sts_error then
726: raise fnd_api.g_exc_error;
727: end if;
720: ,p_attribute15 => fnd_api.g_miss_char
721: );
722:
723: if x_return_status = fnd_api.g_ret_sts_unexp_error then
724: raise fnd_api.g_exc_unexpected_error;
725: elsif x_return_status = fnd_api.g_ret_sts_error then
726: raise fnd_api.g_exc_error;
727: end if;
728:
721: );
722:
723: if x_return_status = fnd_api.g_ret_sts_unexp_error then
724: raise fnd_api.g_exc_unexpected_error;
725: elsif x_return_status = fnd_api.g_ret_sts_error then
726: raise fnd_api.g_exc_error;
727: end if;
728:
729: wms_restrictions_pkg.delete_row(p_rowid);
722:
723: if x_return_status = fnd_api.g_ret_sts_unexp_error then
724: raise fnd_api.g_exc_unexpected_error;
725: elsif x_return_status = fnd_api.g_ret_sts_error then
726: raise fnd_api.g_exc_error;
727: end if;
728:
729: wms_restrictions_pkg.delete_row(p_rowid);
730: fnd_msg_pub.count_and_get( p_count => x_msg_count
731: ,p_data => x_msg_data );
732: x_return_status := l_return_status;
733:
734: EXCEPTION
735: WHEN fnd_api.g_exc_error THEN
736: x_return_status := fnd_api.g_ret_sts_error;
737: fnd_msg_pub.count_and_get( p_count => x_msg_count
738: ,p_data => x_msg_data );
739:
732: x_return_status := l_return_status;
733:
734: EXCEPTION
735: WHEN fnd_api.g_exc_error THEN
736: x_return_status := fnd_api.g_ret_sts_error;
737: fnd_msg_pub.count_and_get( p_count => x_msg_count
738: ,p_data => x_msg_data );
739:
740: WHEN fnd_api.g_exc_unexpected_error THEN
736: x_return_status := fnd_api.g_ret_sts_error;
737: fnd_msg_pub.count_and_get( p_count => x_msg_count
738: ,p_data => x_msg_data );
739:
740: WHEN fnd_api.g_exc_unexpected_error THEN
741: x_return_status := fnd_api.g_ret_sts_unexp_error;
742: fnd_msg_pub.count_and_get( p_count => x_msg_count
743: ,p_data => x_msg_data );
744:
737: fnd_msg_pub.count_and_get( p_count => x_msg_count
738: ,p_data => x_msg_data );
739:
740: WHEN fnd_api.g_exc_unexpected_error THEN
741: x_return_status := fnd_api.g_ret_sts_unexp_error;
742: fnd_msg_pub.count_and_get( p_count => x_msg_count
743: ,p_data => x_msg_data );
744:
745: WHEN OTHERS THEN
742: fnd_msg_pub.count_and_get( p_count => x_msg_count
743: ,p_data => x_msg_data );
744:
745: WHEN OTHERS THEN
746: x_return_status := fnd_api.g_ret_sts_unexp_error;
747: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) then
748: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
749: end if;
750: fnd_msg_pub.count_and_get( p_count => x_msg_count