[Home] [Help]
23: input values provided by the calling routines */
24:
25: PROCEDURE CREATE_RS_RESOURCE_VALUES(
26: P_Api_Version IN NUMBER,
27: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
28: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
29: P_resource_id IN NUMBER,
30: p_resource_param_id IN NUMBER,
31: p_value IN VARCHAR2,
24:
25: PROCEDURE CREATE_RS_RESOURCE_VALUES(
26: P_Api_Version IN NUMBER,
27: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
28: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
29: P_resource_id IN NUMBER,
30: p_resource_param_id IN NUMBER,
31: p_value IN VARCHAR2,
32: P_value_type IN VARCHAR2,
105:
106: BEGIN
107:
108: SAVEPOINT create_rs_resource_values_pvt;
109: x_return_status := fnd_api.g_ret_sts_success;
110: --DBMS_OUTPUT.put_line(' Started Create Resources Values Pvt ');
111:
112: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
108: SAVEPOINT create_rs_resource_values_pvt;
109: x_return_status := fnd_api.g_ret_sts_success;
110: --DBMS_OUTPUT.put_line(' Started Create Resources Values Pvt ');
111:
112: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
115:
116: IF fnd_api.to_boolean(p_init_msg_list) THEN
109: x_return_status := fnd_api.g_ret_sts_success;
110: --DBMS_OUTPUT.put_line(' Started Create Resources Values Pvt ');
111:
112: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
115:
116: IF fnd_api.to_boolean(p_init_msg_list) THEN
117: fnd_msg_pub.initialize;
112: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
115:
116: IF fnd_api.to_boolean(p_init_msg_list) THEN
117: fnd_msg_pub.initialize;
118: END IF;
119:
120: --Initializing the Internal User Hook Record parameter values
143: X_MSG_COUNT => x_msg_count,
144: X_MSG_DATA => x_msg_data
145: );
146:
147: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
150: fnd_msg_pub.add;
151: RAISE fnd_api.g_exc_unexpected_error;
144: X_MSG_DATA => x_msg_data
145: );
146:
147: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
150: fnd_msg_pub.add;
151: RAISE fnd_api.g_exc_unexpected_error;
152: END IF;
147: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
150: fnd_msg_pub.add;
151: RAISE fnd_api.g_exc_unexpected_error;
152: END IF;
153: END IF;
154:
155: --Pre Call to the Vertical Type User Hook
169: X_MSG_COUNT => x_msg_count,
170: X_MSG_DATA => x_msg_data
171: );
172:
173: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
174: x_return_status := fnd_api.g_ret_sts_unexp_error;
175: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
176: fnd_msg_pub.add;
177: RAISE fnd_api.g_exc_unexpected_error;
170: X_MSG_DATA => x_msg_data
171: );
172:
173: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
174: x_return_status := fnd_api.g_ret_sts_unexp_error;
175: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
176: fnd_msg_pub.add;
177: RAISE fnd_api.g_exc_unexpected_error;
178: END IF;
173: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
174: x_return_status := fnd_api.g_ret_sts_unexp_error;
175: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
176: fnd_msg_pub.add;
177: RAISE fnd_api.g_exc_unexpected_error;
178: END IF;
179: END IF;
180:
181: --Pre Call to the Internal Type User Hook
182: jtf_rs_resource_values_iuhk.create_rs_resource_values_pre(
183: X_RETURN_STATUS => x_return_status
184: );
185:
186: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
187: x_return_status := fnd_api.g_ret_sts_unexp_error;
188: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
189: fnd_msg_pub.add;
190: RAISE fnd_api.g_exc_unexpected_error;
183: X_RETURN_STATUS => x_return_status
184: );
185:
186: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
187: x_return_status := fnd_api.g_ret_sts_unexp_error;
188: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
189: fnd_msg_pub.add;
190: RAISE fnd_api.g_exc_unexpected_error;
191: END IF;
186: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
187: x_return_status := fnd_api.g_ret_sts_unexp_error;
188: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
189: fnd_msg_pub.add;
190: RAISE fnd_api.g_exc_unexpected_error;
191: END IF;
192:
193: --Put in all the Validations here
194:
201: );
202: -- added for NOCOPY
203: l_resource_id := l_resource_id_out ;
204:
205: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
206: x_return_status := fnd_api.g_ret_sts_unexp_error;
207: RAISE fnd_api.g_exc_unexpected_error;
208: END IF;
209: --End of Resource Id Validation
202: -- added for NOCOPY
203: l_resource_id := l_resource_id_out ;
204:
205: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
206: x_return_status := fnd_api.g_ret_sts_unexp_error;
207: RAISE fnd_api.g_exc_unexpected_error;
208: END IF;
209: --End of Resource Id Validation
210:
203: l_resource_id := l_resource_id_out ;
204:
205: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
206: x_return_status := fnd_api.g_ret_sts_unexp_error;
207: RAISE fnd_api.g_exc_unexpected_error;
208: END IF;
209: --End of Resource Id Validation
210:
211: --Validate the Resource Param Id
212: jtf_resource_utl.validate_resource_param_id(
213: p_resource_param_id => l_resource_param_id,
214: x_return_status => x_return_status
215: );
216: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
217: x_return_status := fnd_api.g_ret_sts_unexp_error;
218: RAISE fnd_api.g_exc_unexpected_error;
219: END IF;
220: --End of Resource Param Id Validation
213: p_resource_param_id => l_resource_param_id,
214: x_return_status => x_return_status
215: );
216: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
217: x_return_status := fnd_api.g_ret_sts_unexp_error;
218: RAISE fnd_api.g_exc_unexpected_error;
219: END IF;
220: --End of Resource Param Id Validation
221:
214: x_return_status => x_return_status
215: );
216: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
217: x_return_status := fnd_api.g_ret_sts_unexp_error;
218: RAISE fnd_api.g_exc_unexpected_error;
219: END IF;
220: --End of Resource Param Id Validation
221:
222: --Validate Resource Value Type
227: x_return_status => x_return_status
228: );
229: END IF;
230:
231: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
232: x_return_status := fnd_api.g_ret_sts_unexp_error;
233: RAISE fnd_api.g_exc_unexpected_error;
234: END IF;
235: --End of Resource Value Type Validation
228: );
229: END IF;
230:
231: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
232: x_return_status := fnd_api.g_ret_sts_unexp_error;
233: RAISE fnd_api.g_exc_unexpected_error;
234: END IF;
235: --End of Resource Value Type Validation
236:
229: END IF;
230:
231: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
232: x_return_status := fnd_api.g_ret_sts_unexp_error;
233: RAISE fnd_api.g_exc_unexpected_error;
234: END IF;
235: --End of Resource Value Type Validation
236:
237: --Validate Resource Value
239: p_resource_param_id => l_resource_param_id,
240: p_value => l_value,
241: x_return_status => x_return_status
242: );
243: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
244: x_return_status := fnd_api.g_ret_sts_unexp_error;
245: RAISE fnd_api.g_exc_unexpected_error;
246: END IF;
247: --End of Resource Value Validation
240: p_value => l_value,
241: x_return_status => x_return_status
242: );
243: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
244: x_return_status := fnd_api.g_ret_sts_unexp_error;
245: RAISE fnd_api.g_exc_unexpected_error;
246: END IF;
247: --End of Resource Value Validation
248:
241: x_return_status => x_return_status
242: );
243: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
244: x_return_status := fnd_api.g_ret_sts_unexp_error;
245: RAISE fnd_api.g_exc_unexpected_error;
246: END IF;
247: --End of Resource Value Validation
248:
249: --Validate for Duplicate Resource Param ID, Resource ID, Value Type Combination
251: FETCH c_rs_values_dup INTO l_check_char;
252: IF c_rs_values_dup%FOUND THEN
253: fnd_message.set_name ('JTF', 'JTF_RS_MDW_DUP_VALUE');
254: fnd_msg_pub.add;
255: x_return_status := fnd_api.g_ret_sts_unexp_error;
256: END IF;
257: CLOSE c_rs_values_dup;
258:
259: -- This is for bug fix # 3870910
303: X_LAST_UPDATED_BY => jtf_resource_utl.updated_by,
304: X_LAST_UPDATE_LOGIN => jtf_resource_utl.login_id
305: );
306:
307: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
308: --dbms_output.put_line('Failed status from call to table handler');
309: RAISE fnd_api.g_exc_unexpected_error;
310: END IF;
311:
305: );
306:
307: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
308: --dbms_output.put_line('Failed status from call to table handler');
309: RAISE fnd_api.g_exc_unexpected_error;
310: END IF;
311:
312: x_resource_param_value_id := l_resource_param_value_id;
313:
337: X_MSG_COUNT => x_msg_count,
338: X_MSG_DATA => x_msg_data
339: );
340:
341: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
342: x_return_status := fnd_api.g_ret_sts_unexp_error;
343: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
344: fnd_msg_pub.add;
345: RAISE fnd_api.g_exc_unexpected_error;
338: X_MSG_DATA => x_msg_data
339: );
340:
341: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
342: x_return_status := fnd_api.g_ret_sts_unexp_error;
343: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
344: fnd_msg_pub.add;
345: RAISE fnd_api.g_exc_unexpected_error;
346: END IF;
341: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
342: x_return_status := fnd_api.g_ret_sts_unexp_error;
343: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
344: fnd_msg_pub.add;
345: RAISE fnd_api.g_exc_unexpected_error;
346: END IF;
347: END IF;
348:
349: --Initializing the Internal User Hook Record parameter value
368: X_MSG_COUNT => x_msg_count,
369: X_MSG_DATA => x_msg_data
370: );
371:
372: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
373: x_return_status := fnd_api.g_ret_sts_unexp_error;
374: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
375: fnd_msg_pub.add;
376: RAISE fnd_api.g_exc_unexpected_error;
369: X_MSG_DATA => x_msg_data
370: );
371:
372: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
373: x_return_status := fnd_api.g_ret_sts_unexp_error;
374: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
375: fnd_msg_pub.add;
376: RAISE fnd_api.g_exc_unexpected_error;
377: END IF;
372: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
373: x_return_status := fnd_api.g_ret_sts_unexp_error;
374: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
375: fnd_msg_pub.add;
376: RAISE fnd_api.g_exc_unexpected_error;
377: END IF;
378: END IF;
379:
380: --Post Call to the Internal Type User Hook
381:
382: jtf_rs_resource_values_iuhk.create_rs_resource_values_post(
383: X_RETURN_STATUS => x_return_status
384: );
385: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
386: x_return_status := fnd_api.g_ret_sts_unexp_error;
387: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
388: fnd_msg_pub.add;
389: RAISE fnd_api.g_exc_unexpected_error;
382: jtf_rs_resource_values_iuhk.create_rs_resource_values_post(
383: X_RETURN_STATUS => x_return_status
384: );
385: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
386: x_return_status := fnd_api.g_ret_sts_unexp_error;
387: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
388: fnd_msg_pub.add;
389: RAISE fnd_api.g_exc_unexpected_error;
390: END IF;
385: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
386: x_return_status := fnd_api.g_ret_sts_unexp_error;
387: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
388: fnd_msg_pub.add;
389: RAISE fnd_api.g_exc_unexpected_error;
390: END IF;
391:
392: /* Standard call for Message Generation */
393:
414: p_bus_obj_code => 'RS_RPV',
415: p_action_code => 'I',
416: p_bind_data_id => l_bind_data_id,
417: x_return_code => x_return_status);
418: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
419: --dbms_output.put_line('Returned Error status from the Message Generation API');
420: x_return_status := fnd_api.g_ret_sts_unexp_error;
421: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
422: fnd_msg_pub.add;
416: p_bind_data_id => l_bind_data_id,
417: x_return_code => x_return_status);
418: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
419: --dbms_output.put_line('Returned Error status from the Message Generation API');
420: x_return_status := fnd_api.g_ret_sts_unexp_error;
421: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
422: fnd_msg_pub.add;
423: RAISE fnd_api.g_exc_unexpected_error;
424: END IF;
419: --dbms_output.put_line('Returned Error status from the Message Generation API');
420: x_return_status := fnd_api.g_ret_sts_unexp_error;
421: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
422: fnd_msg_pub.add;
423: RAISE fnd_api.g_exc_unexpected_error;
424: END IF;
425: END IF;
426: END IF;
427:
424: END IF;
425: END IF;
426: END IF;
427:
428: IF fnd_api.to_boolean(p_commit) THEN
429: COMMIT WORK;
430: END IF;
431: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
432:
430: END IF;
431: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
432:
433: EXCEPTION
434: WHEN fnd_api.g_exc_unexpected_error THEN
435: --DBMS_OUTPUT.put_line (' ========================================== ');
436: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
437: ROLLBACK TO create_rs_resource_values_pvt;
438: x_return_status := fnd_api.g_ret_sts_unexp_error;
434: WHEN fnd_api.g_exc_unexpected_error THEN
435: --DBMS_OUTPUT.put_line (' ========================================== ');
436: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
437: ROLLBACK TO create_rs_resource_values_pvt;
438: x_return_status := fnd_api.g_ret_sts_unexp_error;
439: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
440: WHEN OTHERS THEN
441: --DBMS_OUTPUT.put_line (' ========================================== ');
442: --DBMS_OUTPUT.put_line (' =========== Raised Others in Create Resource Values Pvt==============');
441: --DBMS_OUTPUT.put_line (' ========================================== ');
442: --DBMS_OUTPUT.put_line (' =========== Raised Others in Create Resource Values Pvt==============');
443: --DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
444: ROLLBACK TO create_rs_resource_values_pvt;
445: x_return_status := fnd_api.g_ret_sts_unexp_error;
446: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
447:
448: END create_rs_resource_values;
449:
450: --Procedure to Update Resource Values based on the input values passed by the calling routines
451:
452: PROCEDURE UPDATE_RS_RESOURCE_VALUES(
453: P_Api_Version IN NUMBER,
454: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
455: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
456: p_resource_param_value_id IN NUMBER,
457: p_value IN VARCHAR2,
458: P_ATTRIBUTE1 IN VARCHAR2,
451:
452: PROCEDURE UPDATE_RS_RESOURCE_VALUES(
453: P_Api_Version IN NUMBER,
454: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
455: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
456: p_resource_param_value_id IN NUMBER,
457: p_value IN VARCHAR2,
458: P_ATTRIBUTE1 IN VARCHAR2,
459: P_ATTRIBUTE2 IN VARCHAR2,
508: WHERE resource_param_value_id = l_resource_param_value_id;
509:
510: CURSOR c_resource_param_value_update( l_resource_param_value_id IN NUMBER ) IS
511: SELECT
512: DECODE(p_value, fnd_api.g_miss_char, value, p_value) l_value,
513: DECODE(p_attribute1,fnd_api.g_miss_char, attribute1, p_attribute1) l_attribute1,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
509:
510: CURSOR c_resource_param_value_update( l_resource_param_value_id IN NUMBER ) IS
511: SELECT
512: DECODE(p_value, fnd_api.g_miss_char, value, p_value) l_value,
513: DECODE(p_attribute1,fnd_api.g_miss_char, attribute1, p_attribute1) l_attribute1,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
510: CURSOR c_resource_param_value_update( l_resource_param_value_id IN NUMBER ) IS
511: SELECT
512: DECODE(p_value, fnd_api.g_miss_char, value, p_value) l_value,
513: DECODE(p_attribute1,fnd_api.g_miss_char, attribute1, p_attribute1) l_attribute1,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
511: SELECT
512: DECODE(p_value, fnd_api.g_miss_char, value, p_value) l_value,
513: DECODE(p_attribute1,fnd_api.g_miss_char, attribute1, p_attribute1) l_attribute1,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
512: DECODE(p_value, fnd_api.g_miss_char, value, p_value) l_value,
513: DECODE(p_attribute1,fnd_api.g_miss_char, attribute1, p_attribute1) l_attribute1,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
513: DECODE(p_attribute1,fnd_api.g_miss_char, attribute1, p_attribute1) l_attribute1,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
514: DECODE(p_attribute2,fnd_api.g_miss_char, attribute2, p_attribute2) l_attribute2,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
515: DECODE(p_attribute3,fnd_api.g_miss_char, attribute3, p_attribute3) l_attribute3,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
516: DECODE(p_attribute4,fnd_api.g_miss_char, attribute4, p_attribute4) l_attribute4,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
517: DECODE(p_attribute5,fnd_api.g_miss_char, attribute5, p_attribute5) l_attribute5,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
518: DECODE(p_attribute6,fnd_api.g_miss_char, attribute6, p_attribute6) l_attribute6,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
519: DECODE(p_attribute7,fnd_api.g_miss_char, attribute7, p_attribute7) l_attribute7,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
527: DECODE(p_attribute15,fnd_api.g_miss_char, attribute15, p_attribute15) l_attribute15,
520: DECODE(p_attribute8,fnd_api.g_miss_char, attribute8, p_attribute8) l_attribute8,
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
527: DECODE(p_attribute15,fnd_api.g_miss_char, attribute15, p_attribute15) l_attribute15,
528: DECODE(p_attribute_category,fnd_api.g_miss_char, attribute1, p_attribute_category) l_attribute_category
521: DECODE(p_attribute9,fnd_api.g_miss_char, attribute9, p_attribute9) l_attribute9,
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
527: DECODE(p_attribute15,fnd_api.g_miss_char, attribute15, p_attribute15) l_attribute15,
528: DECODE(p_attribute_category,fnd_api.g_miss_char, attribute1, p_attribute_category) l_attribute_category
529: FROM jtf_rs_resource_values
522: DECODE(p_attribute10,fnd_api.g_miss_char, attribute10, p_attribute10) l_attribute10,
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
527: DECODE(p_attribute15,fnd_api.g_miss_char, attribute15, p_attribute15) l_attribute15,
528: DECODE(p_attribute_category,fnd_api.g_miss_char, attribute1, p_attribute_category) l_attribute_category
529: FROM jtf_rs_resource_values
530: WHERE resource_param_value_id = l_resource_param_value_id;
523: DECODE(p_attribute11,fnd_api.g_miss_char, attribute11, p_attribute11) l_attribute11,
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
527: DECODE(p_attribute15,fnd_api.g_miss_char, attribute15, p_attribute15) l_attribute15,
528: DECODE(p_attribute_category,fnd_api.g_miss_char, attribute1, p_attribute_category) l_attribute_category
529: FROM jtf_rs_resource_values
530: WHERE resource_param_value_id = l_resource_param_value_id;
531:
524: DECODE(p_attribute12,fnd_api.g_miss_char, attribute12, p_attribute12) l_attribute12,
525: DECODE(p_attribute13,fnd_api.g_miss_char, attribute13, p_attribute13) l_attribute13,
526: DECODE(p_attribute14,fnd_api.g_miss_char, attribute14, p_attribute14) l_attribute14,
527: DECODE(p_attribute15,fnd_api.g_miss_char, attribute15, p_attribute15) l_attribute15,
528: DECODE(p_attribute_category,fnd_api.g_miss_char, attribute1, p_attribute_category) l_attribute_category
529: FROM jtf_rs_resource_values
530: WHERE resource_param_value_id = l_resource_param_value_id;
531:
532: resource_param_value_rec c_resource_param_value_update%ROWTYPE;
541:
542: BEGIN
543:
544: SAVEPOINT update_rs_resource_values_pvt;
545: x_return_status := fnd_api.g_ret_sts_success;
546: --DBMS_OUTPUT.put_line(' Started Update Resources Values Pvt ');
547:
548: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
549: RAISE fnd_api.g_exc_unexpected_error;
544: SAVEPOINT update_rs_resource_values_pvt;
545: x_return_status := fnd_api.g_ret_sts_success;
546: --DBMS_OUTPUT.put_line(' Started Update Resources Values Pvt ');
547:
548: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
549: RAISE fnd_api.g_exc_unexpected_error;
550: END IF;
551:
552: IF fnd_api.to_boolean(p_init_msg_list) THEN
545: x_return_status := fnd_api.g_ret_sts_success;
546: --DBMS_OUTPUT.put_line(' Started Update Resources Values Pvt ');
547:
548: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
549: RAISE fnd_api.g_exc_unexpected_error;
550: END IF;
551:
552: IF fnd_api.to_boolean(p_init_msg_list) THEN
553: fnd_msg_pub.initialize;
548: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
549: RAISE fnd_api.g_exc_unexpected_error;
550: END IF;
551:
552: IF fnd_api.to_boolean(p_init_msg_list) THEN
553: fnd_msg_pub.initialize;
554: END IF;
555:
556: --Initializing the Internal User Hook Record parameter values
576: X_MSG_COUNT => x_msg_count,
577: X_MSG_DATA => x_msg_data
578: );
579:
580: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
581: x_return_status := fnd_api.g_ret_sts_unexp_error;
582: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
583: fnd_msg_pub.add;
584: RAISE fnd_api.g_exc_unexpected_error;
577: X_MSG_DATA => x_msg_data
578: );
579:
580: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
581: x_return_status := fnd_api.g_ret_sts_unexp_error;
582: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
583: fnd_msg_pub.add;
584: RAISE fnd_api.g_exc_unexpected_error;
585: END IF;
580: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
581: x_return_status := fnd_api.g_ret_sts_unexp_error;
582: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
583: fnd_msg_pub.add;
584: RAISE fnd_api.g_exc_unexpected_error;
585: END IF;
586: END IF;
587:
588: --Pre Call to the Vertical Type User Hook
600: X_MSG_COUNT => x_msg_count,
601: X_MSG_DATA => x_msg_data
602: );
603:
604: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
605: x_return_status := fnd_api.g_ret_sts_unexp_error;
606: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
607: fnd_msg_pub.add;
608: RAISE fnd_api.g_exc_unexpected_error;
601: X_MSG_DATA => x_msg_data
602: );
603:
604: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
605: x_return_status := fnd_api.g_ret_sts_unexp_error;
606: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
607: fnd_msg_pub.add;
608: RAISE fnd_api.g_exc_unexpected_error;
609: END IF;
604: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
605: x_return_status := fnd_api.g_ret_sts_unexp_error;
606: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
607: fnd_msg_pub.add;
608: RAISE fnd_api.g_exc_unexpected_error;
609: END IF;
610: END IF;
611:
612: --Pre Call to the Internal Type User Hook
613:
614: jtf_rs_resource_values_iuhk.update_rs_resource_values_pre(
615: X_RETURN_STATUS => x_return_status
616: );
617: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
618: x_return_status := fnd_api.g_ret_sts_unexp_error;
619: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
620: fnd_msg_pub.add;
621: RAISE fnd_api.g_exc_unexpected_error;
614: jtf_rs_resource_values_iuhk.update_rs_resource_values_pre(
615: X_RETURN_STATUS => x_return_status
616: );
617: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
618: x_return_status := fnd_api.g_ret_sts_unexp_error;
619: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
620: fnd_msg_pub.add;
621: RAISE fnd_api.g_exc_unexpected_error;
622: END IF;
617: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
618: x_return_status := fnd_api.g_ret_sts_unexp_error;
619: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
620: fnd_msg_pub.add;
621: RAISE fnd_api.g_exc_unexpected_error;
622: END IF;
623:
624: --Put all Validations here
625:
627: OPEN c_resource_param_value_id(l_resource_param_value_id);
628: FETCH c_resource_param_value_id INTO l_resource_param_value_id;
629: IF c_resource_param_value_id%NOTFOUND THEN
630: --dbms_output.put_line('Resource Param Value Id not found');
631: x_return_status := fnd_api.g_ret_sts_unexp_error;
632: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_VALUE_ID');
633: fnd_message.set_token('P_RESOURCE_PARAM_VALUE_ID', l_resource_param_value_id);
634: fnd_msg_pub.add;
635: CLOSE c_resource_param_value_id;
632: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_VALUE_ID');
633: fnd_message.set_token('P_RESOURCE_PARAM_VALUE_ID', l_resource_param_value_id);
634: fnd_msg_pub.add;
635: CLOSE c_resource_param_value_id;
636: RAISE fnd_api.g_exc_unexpected_error;
637: END IF;
638:
639: --Validate Resource Param Value for Update
640: OPEN c_resource_param_value_update(l_resource_param_value_id);
640: OPEN c_resource_param_value_update(l_resource_param_value_id);
641: FETCH c_resource_param_value_update INTO resource_param_value_rec;
642: IF c_resource_param_value_update%NOTFOUND THEN
643: CLOSE c_resource_param_value_update;
644: x_return_status := fnd_api.g_ret_sts_unexp_error;
645: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_VALUE_ID');
646: fnd_message.set_token('P_RESOURCE_PARAM_VALUE_ID', l_resource_param_value_id);
647: fnd_msg_pub.add;
648: RAISE fnd_api.g_exc_unexpected_error;
644: x_return_status := fnd_api.g_ret_sts_unexp_error;
645: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_VALUE_ID');
646: fnd_message.set_token('P_RESOURCE_PARAM_VALUE_ID', l_resource_param_value_id);
647: fnd_msg_pub.add;
648: RAISE fnd_api.g_exc_unexpected_error;
649: END IF;
650:
651: --Get the Resource Param Id, Resource Id, Value Type from the database
652: SELECT resource_param_id, resource_id, value_type
654: FROM jtf_rs_resource_values
655: WHERE resource_param_value_id = l_resource_param_value_id;
656:
657: --Validate Resource Value
658: IF p_value <> FND_API.G_MISS_CHAR THEN
659: jtf_resource_utl.validate_resource_value(
660: p_resource_param_id => l_resource_param_id,
661: p_value => resource_param_value_rec.l_value,
662: x_return_status => x_return_status
660: p_resource_param_id => l_resource_param_id,
661: p_value => resource_param_value_rec.l_value,
662: x_return_status => x_return_status
663: );
664: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
665: x_return_status := fnd_api.g_ret_sts_unexp_error;
666: RAISE fnd_api.g_exc_unexpected_error;
667: END IF;
668: END IF;
661: p_value => resource_param_value_rec.l_value,
662: x_return_status => x_return_status
663: );
664: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
665: x_return_status := fnd_api.g_ret_sts_unexp_error;
666: RAISE fnd_api.g_exc_unexpected_error;
667: END IF;
668: END IF;
669: --End of Resource Value Validation
662: x_return_status => x_return_status
663: );
664: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
665: x_return_status := fnd_api.g_ret_sts_unexp_error;
666: RAISE fnd_api.g_exc_unexpected_error;
667: END IF;
668: END IF;
669: --End of Resource Value Validation
670:
718: X_LAST_UPDATE_LOGIN => jtf_resource_utl.login_id
719: );
720: p_object_version_number := l_object_version_number;
721:
722: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
723: --dbms_output.put_line('Failed status from call to table handler');
724: RAISE fnd_api.g_exc_unexpected_error;
725: END IF;
726:
720: p_object_version_number := l_object_version_number;
721:
722: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
723: --dbms_output.put_line('Failed status from call to table handler');
724: RAISE fnd_api.g_exc_unexpected_error;
725: END IF;
726:
727: -- This is for bug fix # 3870910
728: -- Password will be stored using fnd_vault API
747: X_MSG_COUNT => x_msg_count,
748: X_MSG_DATA => x_msg_data
749: );
750:
751: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
752: x_return_status := fnd_api.g_ret_sts_unexp_error;
753: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
754: fnd_msg_pub.add;
755: RAISE fnd_api.g_exc_unexpected_error;
748: X_MSG_DATA => x_msg_data
749: );
750:
751: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
752: x_return_status := fnd_api.g_ret_sts_unexp_error;
753: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
754: fnd_msg_pub.add;
755: RAISE fnd_api.g_exc_unexpected_error;
756: END IF;
751: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
752: x_return_status := fnd_api.g_ret_sts_unexp_error;
753: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
754: fnd_msg_pub.add;
755: RAISE fnd_api.g_exc_unexpected_error;
756: END IF;
757: END IF;
758:
759: --Post Call to the Vertical Type User Hook
771: X_MSG_COUNT => x_msg_count,
772: X_MSG_DATA => x_msg_data
773: );
774:
775: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
776: x_return_status := fnd_api.g_ret_sts_unexp_error;
777: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
778: fnd_msg_pub.add;
779: RAISE fnd_api.g_exc_unexpected_error;
772: X_MSG_DATA => x_msg_data
773: );
774:
775: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
776: x_return_status := fnd_api.g_ret_sts_unexp_error;
777: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
778: fnd_msg_pub.add;
779: RAISE fnd_api.g_exc_unexpected_error;
780: END IF;
775: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
776: x_return_status := fnd_api.g_ret_sts_unexp_error;
777: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
778: fnd_msg_pub.add;
779: RAISE fnd_api.g_exc_unexpected_error;
780: END IF;
781: END IF;
782:
783: --Post Call to the Internal Type User Hook
784:
785: jtf_rs_resource_values_iuhk.update_rs_resource_values_post(
786: X_RETURN_STATUS => x_return_status
787: );
788: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
789: x_return_status := fnd_api.g_ret_sts_unexp_error;
790: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
791: fnd_msg_pub.add;
792: RAISE fnd_api.g_exc_unexpected_error;
785: jtf_rs_resource_values_iuhk.update_rs_resource_values_post(
786: X_RETURN_STATUS => x_return_status
787: );
788: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
789: x_return_status := fnd_api.g_ret_sts_unexp_error;
790: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
791: fnd_msg_pub.add;
792: RAISE fnd_api.g_exc_unexpected_error;
793: END IF;
788: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
789: x_return_status := fnd_api.g_ret_sts_unexp_error;
790: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
791: fnd_msg_pub.add;
792: RAISE fnd_api.g_exc_unexpected_error;
793: END IF;
794:
795: /* Standard call for Message Generation */
796:
817: p_bus_obj_code => 'RS_RPV',
818: p_action_code => 'U',
819: p_bind_data_id => l_bind_data_id,
820: x_return_code => x_return_status);
821: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
822: --dbms_output.put_line('Returned Error status from the Message Generation API');
823: x_return_status := fnd_api.g_ret_sts_unexp_error;
824: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
825: fnd_msg_pub.add;
819: p_bind_data_id => l_bind_data_id,
820: x_return_code => x_return_status);
821: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
822: --dbms_output.put_line('Returned Error status from the Message Generation API');
823: x_return_status := fnd_api.g_ret_sts_unexp_error;
824: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
825: fnd_msg_pub.add;
826: RAISE fnd_api.g_exc_unexpected_error;
827: END IF;
822: --dbms_output.put_line('Returned Error status from the Message Generation API');
823: x_return_status := fnd_api.g_ret_sts_unexp_error;
824: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
825: fnd_msg_pub.add;
826: RAISE fnd_api.g_exc_unexpected_error;
827: END IF;
828: END IF;
829: END IF;
830:
827: END IF;
828: END IF;
829: END IF;
830:
831: IF fnd_api.to_boolean(p_commit) THEN
832: COMMIT WORK;
833: END IF;
834: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
835:
833: END IF;
834: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
835:
836: EXCEPTION
837: WHEN fnd_api.g_exc_unexpected_error THEN
838: --DBMS_OUTPUT.put_line (' ========================================== ');
839: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
840: ROLLBACK TO update_rs_resource_values_pvt;
841: x_return_status := fnd_api.g_ret_sts_unexp_error;
837: WHEN fnd_api.g_exc_unexpected_error THEN
838: --DBMS_OUTPUT.put_line (' ========================================== ');
839: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
840: ROLLBACK TO update_rs_resource_values_pvt;
841: x_return_status := fnd_api.g_ret_sts_unexp_error;
842: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
843: WHEN OTHERS THEN
844: --DBMS_OUTPUT.put_line (' ========================================== ');
845: --DBMS_OUTPUT.put_line (' =========== Raised Others in Update Resource Values Pvt============= ');
844: --DBMS_OUTPUT.put_line (' ========================================== ');
845: --DBMS_OUTPUT.put_line (' =========== Raised Others in Update Resource Values Pvt============= ');
846: --DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
847: ROLLBACK TO update_rs_resource_values_pvt;
848: x_return_status := fnd_api.g_ret_sts_unexp_error;
849: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
850:
851: END update_rs_resource_values;
852:
853: --Procedure to Delete Resource Values based on the input values provided by the calling routines
854:
855: PROCEDURE DELETE_RS_RESOURCE_VALUES(
856: P_Api_Version IN NUMBER,
857: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
858: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
859: p_resource_param_value_id IN NUMBER,
860: p_object_version_number IN JTF_RS_RESOURCE_VALUES.OBJECT_VERSION_NUMBER%TYPE,
861: X_Return_Status OUT NOCOPY VARCHAR2,
854:
855: PROCEDURE DELETE_RS_RESOURCE_VALUES(
856: P_Api_Version IN NUMBER,
857: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
858: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
859: p_resource_param_value_id IN NUMBER,
860: p_object_version_number IN JTF_RS_RESOURCE_VALUES.OBJECT_VERSION_NUMBER%TYPE,
861: X_Return_Status OUT NOCOPY VARCHAR2,
862: X_Msg_Count OUT NOCOPY NUMBER,
875: WHERE resource_param_value_id = l_resource_param_value_id;
876:
877: BEGIN
878: SAVEPOINT delete_rs_resource_values_pvt;
879: x_return_status := fnd_api.g_ret_sts_success;
880: --DBMS_OUTPUT.put_line(' Started Delete Resources Values Pvt ');
881: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
882: RAISE fnd_api.g_exc_unexpected_error;
883: END IF;
877: BEGIN
878: SAVEPOINT delete_rs_resource_values_pvt;
879: x_return_status := fnd_api.g_ret_sts_success;
880: --DBMS_OUTPUT.put_line(' Started Delete Resources Values Pvt ');
881: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
882: RAISE fnd_api.g_exc_unexpected_error;
883: END IF;
884: IF fnd_api.to_boolean(p_init_msg_list) THEN
885: fnd_msg_pub.initialize;
878: SAVEPOINT delete_rs_resource_values_pvt;
879: x_return_status := fnd_api.g_ret_sts_success;
880: --DBMS_OUTPUT.put_line(' Started Delete Resources Values Pvt ');
881: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
882: RAISE fnd_api.g_exc_unexpected_error;
883: END IF;
884: IF fnd_api.to_boolean(p_init_msg_list) THEN
885: fnd_msg_pub.initialize;
886: END IF;
880: --DBMS_OUTPUT.put_line(' Started Delete Resources Values Pvt ');
881: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
882: RAISE fnd_api.g_exc_unexpected_error;
883: END IF;
884: IF fnd_api.to_boolean(p_init_msg_list) THEN
885: fnd_msg_pub.initialize;
886: END IF;
887:
888: --Initializing the Internal User Hook Record parameter values
905: X_MSG_COUNT => x_msg_count,
906: X_MSG_DATA => x_msg_data
907: );
908:
909: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
910: x_return_status := fnd_api.g_ret_sts_unexp_error;
911: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
912: fnd_msg_pub.add;
913: RAISE fnd_api.g_exc_unexpected_error;
906: X_MSG_DATA => x_msg_data
907: );
908:
909: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
910: x_return_status := fnd_api.g_ret_sts_unexp_error;
911: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
912: fnd_msg_pub.add;
913: RAISE fnd_api.g_exc_unexpected_error;
914: END IF;
909: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
910: x_return_status := fnd_api.g_ret_sts_unexp_error;
911: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
912: fnd_msg_pub.add;
913: RAISE fnd_api.g_exc_unexpected_error;
914: END IF;
915: END IF;
916:
917: --Pre Call to the Vertical Type User Hook
928: X_MSG_COUNT => x_msg_count,
929: X_MSG_DATA => x_msg_data
930: );
931:
932: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
933: x_return_status := fnd_api.g_ret_sts_unexp_error;
934: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
935: fnd_msg_pub.add;
936: RAISE fnd_api.g_exc_unexpected_error;
929: X_MSG_DATA => x_msg_data
930: );
931:
932: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
933: x_return_status := fnd_api.g_ret_sts_unexp_error;
934: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
935: fnd_msg_pub.add;
936: RAISE fnd_api.g_exc_unexpected_error;
937: END IF;
932: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
933: x_return_status := fnd_api.g_ret_sts_unexp_error;
934: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
935: fnd_msg_pub.add;
936: RAISE fnd_api.g_exc_unexpected_error;
937: END IF;
938: END IF;
939:
940: --Pre Call to the Internal Type User Hook
942: jtf_rs_resource_values_iuhk.delete_rs_resource_values_pre(
943: X_RETURN_STATUS => x_return_status
944: );
945:
946: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
947: x_return_status := fnd_api.g_ret_sts_unexp_error;
948: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
949: fnd_msg_pub.add;
950: RAISE fnd_api.g_exc_unexpected_error;
943: X_RETURN_STATUS => x_return_status
944: );
945:
946: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
947: x_return_status := fnd_api.g_ret_sts_unexp_error;
948: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
949: fnd_msg_pub.add;
950: RAISE fnd_api.g_exc_unexpected_error;
951: END IF;
946: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
947: x_return_status := fnd_api.g_ret_sts_unexp_error;
948: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
949: fnd_msg_pub.add;
950: RAISE fnd_api.g_exc_unexpected_error;
951: END IF;
952:
953: --Put all Validations here
954:
956: OPEN c_resource_param_value_id(l_resource_param_value_id);
957: FETCH c_resource_param_value_id INTO m_resource_param_value_id;
958: IF c_resource_param_value_id%NOTFOUND THEN
959: --dbms_output.put_line('Resource Param Value Id not found');
960: x_return_status := fnd_api.g_ret_sts_unexp_error;
961: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_VALUE_ID');
962: fnd_message.set_token('P_RESOURCE_PARAM_VALUE_ID', l_resource_param_value_id);
963: fnd_msg_pub.add;
964: CLOSE c_resource_param_value_id;
961: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_VALUE_ID');
962: fnd_message.set_token('P_RESOURCE_PARAM_VALUE_ID', l_resource_param_value_id);
963: fnd_msg_pub.add;
964: CLOSE c_resource_param_value_id;
965: RAISE fnd_api.g_exc_unexpected_error;
966: END IF;
967:
968:
969: --Lock the row in the table before delete, by calling the table handler. */
975: --Call Table Handler to Delete the Record
976: jtf_rs_resource_values_pkg.delete_row(
977: X_RESOURCE_PARAM_VALUE_ID => l_resource_param_value_id
978: );
979: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
980: --dbms_output.put_line('Failed status from call to table handler');
981: RAISE fnd_api.g_exc_unexpected_error;
982: END IF;
983:
977: X_RESOURCE_PARAM_VALUE_ID => l_resource_param_value_id
978: );
979: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
980: --dbms_output.put_line('Failed status from call to table handler');
981: RAISE fnd_api.g_exc_unexpected_error;
982: END IF;
983:
984: --Make the post processing call to the user hooks
985:
997: X_MSG_COUNT => x_msg_count,
998: X_MSG_DATA => x_msg_data
999: );
1000:
1001: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1002: x_return_status := fnd_api.g_ret_sts_unexp_error;
1003: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1004: fnd_msg_pub.add;
1005: RAISE fnd_api.g_exc_unexpected_error;
998: X_MSG_DATA => x_msg_data
999: );
1000:
1001: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1002: x_return_status := fnd_api.g_ret_sts_unexp_error;
1003: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1004: fnd_msg_pub.add;
1005: RAISE fnd_api.g_exc_unexpected_error;
1006: END IF;
1001: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1002: x_return_status := fnd_api.g_ret_sts_unexp_error;
1003: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1004: fnd_msg_pub.add;
1005: RAISE fnd_api.g_exc_unexpected_error;
1006: END IF;
1007: END IF;
1008:
1009: --Post Call to the Vertical Type User Hook
1020: X_MSG_COUNT => x_msg_count,
1021: X_MSG_DATA => x_msg_data
1022: );
1023:
1024: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1025: x_return_status := fnd_api.g_ret_sts_unexp_error;
1026: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1027: fnd_msg_pub.add;
1028: RAISE fnd_api.g_exc_unexpected_error;
1021: X_MSG_DATA => x_msg_data
1022: );
1023:
1024: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1025: x_return_status := fnd_api.g_ret_sts_unexp_error;
1026: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1027: fnd_msg_pub.add;
1028: RAISE fnd_api.g_exc_unexpected_error;
1029: END IF;
1024: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1025: x_return_status := fnd_api.g_ret_sts_unexp_error;
1026: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1027: fnd_msg_pub.add;
1028: RAISE fnd_api.g_exc_unexpected_error;
1029: END IF;
1030: END IF;
1031:
1032: --Post Call to the Internal Type User Hook
1033:
1034: jtf_rs_resource_values_iuhk.delete_rs_resource_values_post(
1035: X_RETURN_STATUS => x_return_status
1036: );
1037: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1038: x_return_status := fnd_api.g_ret_sts_unexp_error;
1039: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1040: fnd_msg_pub.add;
1041: RAISE fnd_api.g_exc_unexpected_error;
1034: jtf_rs_resource_values_iuhk.delete_rs_resource_values_post(
1035: X_RETURN_STATUS => x_return_status
1036: );
1037: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1038: x_return_status := fnd_api.g_ret_sts_unexp_error;
1039: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1040: fnd_msg_pub.add;
1041: RAISE fnd_api.g_exc_unexpected_error;
1042: END IF;
1037: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1038: x_return_status := fnd_api.g_ret_sts_unexp_error;
1039: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1040: fnd_msg_pub.add;
1041: RAISE fnd_api.g_exc_unexpected_error;
1042: END IF;
1043:
1044: /* Standard call for Message Generation */
1045:
1066: p_bus_obj_code => 'RS_RPV',
1067: p_action_code => 'D',
1068: p_bind_data_id => l_bind_data_id,
1069: x_return_code => x_return_status);
1070: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1071: --dbms_output.put_line('Returned Error status from the Message Generation API');
1072: x_return_status := fnd_api.g_ret_sts_unexp_error;
1073: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
1074: fnd_msg_pub.add;
1068: p_bind_data_id => l_bind_data_id,
1069: x_return_code => x_return_status);
1070: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1071: --dbms_output.put_line('Returned Error status from the Message Generation API');
1072: x_return_status := fnd_api.g_ret_sts_unexp_error;
1073: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
1074: fnd_msg_pub.add;
1075: RAISE fnd_api.g_exc_unexpected_error;
1076: END IF;
1071: --dbms_output.put_line('Returned Error status from the Message Generation API');
1072: x_return_status := fnd_api.g_ret_sts_unexp_error;
1073: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
1074: fnd_msg_pub.add;
1075: RAISE fnd_api.g_exc_unexpected_error;
1076: END IF;
1077: END IF;
1078: END IF;
1079:
1076: END IF;
1077: END IF;
1078: END IF;
1079:
1080: IF fnd_api.to_boolean(p_commit) THEN
1081: COMMIT WORK;
1082: END IF;
1083: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1084:
1082: END IF;
1083: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1084:
1085: EXCEPTION
1086: WHEN fnd_api.g_exc_unexpected_error THEN
1087: --DBMS_OUTPUT.put_line (' ========================================== ');
1088: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1089: ROLLBACK TO delete_rs_resource_values_pvt;
1090: x_return_status := fnd_api.g_ret_sts_unexp_error;
1086: WHEN fnd_api.g_exc_unexpected_error THEN
1087: --DBMS_OUTPUT.put_line (' ========================================== ');
1088: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1089: ROLLBACK TO delete_rs_resource_values_pvt;
1090: x_return_status := fnd_api.g_ret_sts_unexp_error;
1091: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1092: WHEN OTHERS THEN
1093: --DBMS_OUTPUT.put_line (' ========================================== ');
1094: --DBMS_OUTPUT.put_line (' =========== Raised Others in Delete Resource Values Pvt=============');
1093: --DBMS_OUTPUT.put_line (' ========================================== ');
1094: --DBMS_OUTPUT.put_line (' =========== Raised Others in Delete Resource Values Pvt=============');
1095: --DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
1096: ROLLBACK TO delete_rs_resource_values_pvt;
1097: x_return_status := fnd_api.g_ret_sts_unexp_error;
1098: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1099:
1100: END delete_rs_resource_values;
1101:
1102: --Procedure to Delete all Resource Values based on the Resource Id provided by the calling routines
1103:
1104: PROCEDURE DELETE_ALL_RS_RESOURCE_VALUES(
1105: P_Api_Version IN NUMBER,
1106: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1107: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1108: p_resource_id IN NUMBER,
1109: X_Return_Status OUT NOCOPY VARCHAR2,
1110: X_Msg_Count OUT NOCOPY NUMBER,
1103:
1104: PROCEDURE DELETE_ALL_RS_RESOURCE_VALUES(
1105: P_Api_Version IN NUMBER,
1106: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1107: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1108: p_resource_id IN NUMBER,
1109: X_Return_Status OUT NOCOPY VARCHAR2,
1110: X_Msg_Count OUT NOCOPY NUMBER,
1111: X_Msg_Data OUT NOCOPY VARCHAR2
1127: AND jrv.resource_id = l_resource_id;
1128:
1129: BEGIN
1130: SAVEPOINT delete_all_rs_values_pvt;
1131: x_return_status := fnd_api.g_ret_sts_success;
1132: --DBMS_OUTPUT.put_line(' Started Delete All Resources Values Pvt ');
1133: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1134: RAISE fnd_api.g_exc_unexpected_error;
1135: END IF;
1129: BEGIN
1130: SAVEPOINT delete_all_rs_values_pvt;
1131: x_return_status := fnd_api.g_ret_sts_success;
1132: --DBMS_OUTPUT.put_line(' Started Delete All Resources Values Pvt ');
1133: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1134: RAISE fnd_api.g_exc_unexpected_error;
1135: END IF;
1136: IF fnd_api.to_boolean(p_init_msg_list) THEN
1137: fnd_msg_pub.initialize;
1130: SAVEPOINT delete_all_rs_values_pvt;
1131: x_return_status := fnd_api.g_ret_sts_success;
1132: --DBMS_OUTPUT.put_line(' Started Delete All Resources Values Pvt ');
1133: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1134: RAISE fnd_api.g_exc_unexpected_error;
1135: END IF;
1136: IF fnd_api.to_boolean(p_init_msg_list) THEN
1137: fnd_msg_pub.initialize;
1138: END IF;
1132: --DBMS_OUTPUT.put_line(' Started Delete All Resources Values Pvt ');
1133: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1134: RAISE fnd_api.g_exc_unexpected_error;
1135: END IF;
1136: IF fnd_api.to_boolean(p_init_msg_list) THEN
1137: fnd_msg_pub.initialize;
1138: END IF;
1139:
1140: --Initializing the Internal User Hook Record parameter value
1157: X_MSG_COUNT => x_msg_count,
1158: X_MSG_DATA => x_msg_data
1159: );
1160:
1161: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1162: x_return_status := fnd_api.g_ret_sts_unexp_error;
1163: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1164: fnd_msg_pub.add;
1165: RAISE fnd_api.g_exc_unexpected_error;
1158: X_MSG_DATA => x_msg_data
1159: );
1160:
1161: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1162: x_return_status := fnd_api.g_ret_sts_unexp_error;
1163: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1164: fnd_msg_pub.add;
1165: RAISE fnd_api.g_exc_unexpected_error;
1166: END IF;
1161: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1162: x_return_status := fnd_api.g_ret_sts_unexp_error;
1163: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1164: fnd_msg_pub.add;
1165: RAISE fnd_api.g_exc_unexpected_error;
1166: END IF;
1167: END IF;
1168:
1169: --Pre Call to the Vertical Type User Hook
1180: X_MSG_COUNT => x_msg_count,
1181: X_MSG_DATA => x_msg_data
1182: );
1183:
1184: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1185: x_return_status := fnd_api.g_ret_sts_unexp_error;
1186: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1187: fnd_msg_pub.add;
1188: RAISE fnd_api.g_exc_unexpected_error;
1181: X_MSG_DATA => x_msg_data
1182: );
1183:
1184: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1185: x_return_status := fnd_api.g_ret_sts_unexp_error;
1186: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1187: fnd_msg_pub.add;
1188: RAISE fnd_api.g_exc_unexpected_error;
1189: END IF;
1184: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1185: x_return_status := fnd_api.g_ret_sts_unexp_error;
1186: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1187: fnd_msg_pub.add;
1188: RAISE fnd_api.g_exc_unexpected_error;
1189: END IF;
1190: END IF;
1191:
1192: --Pre Call to the Internal Type User Hook
1194: jtf_rs_resource_values_iuhk.delete_all_rs_values_pre(
1195: X_RETURN_STATUS => x_return_status
1196: );
1197:
1198: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1199: x_return_status := fnd_api.g_ret_sts_unexp_error;
1200: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1201: fnd_msg_pub.add;
1202: RAISE fnd_api.g_exc_unexpected_error;
1195: X_RETURN_STATUS => x_return_status
1196: );
1197:
1198: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1199: x_return_status := fnd_api.g_ret_sts_unexp_error;
1200: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1201: fnd_msg_pub.add;
1202: RAISE fnd_api.g_exc_unexpected_error;
1203: END IF;
1198: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1199: x_return_status := fnd_api.g_ret_sts_unexp_error;
1200: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1201: fnd_msg_pub.add;
1202: RAISE fnd_api.g_exc_unexpected_error;
1203: END IF;
1204:
1205: --Put all Validations here
1206:
1213: );
1214: -- added for NOCOPY
1215: l_resource_id := l_resource_id_out;
1216:
1217: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1218: x_return_status := fnd_api.g_ret_sts_unexp_error;
1219: RAISE fnd_api.g_exc_unexpected_error;
1220: END IF;
1221:
1214: -- added for NOCOPY
1215: l_resource_id := l_resource_id_out;
1216:
1217: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1218: x_return_status := fnd_api.g_ret_sts_unexp_error;
1219: RAISE fnd_api.g_exc_unexpected_error;
1220: END IF;
1221:
1222: --Loop through the Cursor and Delete all the entries for the given Resource ID
1215: l_resource_id := l_resource_id_out;
1216:
1217: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1218: x_return_status := fnd_api.g_ret_sts_unexp_error;
1219: RAISE fnd_api.g_exc_unexpected_error;
1220: END IF;
1221:
1222: --Loop through the Cursor and Delete all the entries for the given Resource ID
1223: FOR i IN c_resource_param_value_id (l_resource_id) LOOP
1229: );
1230: EXCEPTION
1231: WHEN NO_DATA_FOUND THEN
1232: --dbms_output.put_line('Error in Table Handler');
1233: x_return_status := fnd_api.g_ret_sts_unexp_error;
1234: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
1235: fnd_msg_pub.add;
1236: RAISE fnd_api.g_exc_unexpected_error;
1237: END;
1232: --dbms_output.put_line('Error in Table Handler');
1233: x_return_status := fnd_api.g_ret_sts_unexp_error;
1234: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
1235: fnd_msg_pub.add;
1236: RAISE fnd_api.g_exc_unexpected_error;
1237: END;
1238: --Call Table Handler to Delete the Selected Records
1239: BEGIN
1240: jtf_rs_resource_values_pkg.delete_row(
1242: );
1243: EXCEPTION
1244: WHEN NO_DATA_FOUND THEN
1245: --dbms_output.put_line('Error in Table Handler');
1246: x_return_status := fnd_api.g_ret_sts_unexp_error;
1247: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
1248: fnd_msg_pub.add;
1249: RAISE fnd_api.g_exc_unexpected_error;
1250: END;
1245: --dbms_output.put_line('Error in Table Handler');
1246: x_return_status := fnd_api.g_ret_sts_unexp_error;
1247: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
1248: fnd_msg_pub.add;
1249: RAISE fnd_api.g_exc_unexpected_error;
1250: END;
1251: END LOOP;
1252:
1253: --Make the post processing call to the user hooks
1266: X_MSG_COUNT => x_msg_count,
1267: X_MSG_DATA => x_msg_data
1268: );
1269:
1270: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1271: x_return_status := fnd_api.g_ret_sts_unexp_error;
1272: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1273: fnd_msg_pub.add;
1274: RAISE fnd_api.g_exc_unexpected_error;
1267: X_MSG_DATA => x_msg_data
1268: );
1269:
1270: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1271: x_return_status := fnd_api.g_ret_sts_unexp_error;
1272: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1273: fnd_msg_pub.add;
1274: RAISE fnd_api.g_exc_unexpected_error;
1275: END IF;
1270: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1271: x_return_status := fnd_api.g_ret_sts_unexp_error;
1272: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1273: fnd_msg_pub.add;
1274: RAISE fnd_api.g_exc_unexpected_error;
1275: END IF;
1276: END IF;
1277:
1278: --Post Call to the Vertical Type User Hook
1289: X_MSG_COUNT => x_msg_count,
1290: X_MSG_DATA => x_msg_data
1291: );
1292:
1293: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1294: x_return_status := fnd_api.g_ret_sts_unexp_error;
1295: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1296: fnd_msg_pub.add;
1297: RAISE fnd_api.g_exc_unexpected_error;
1290: X_MSG_DATA => x_msg_data
1291: );
1292:
1293: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1294: x_return_status := fnd_api.g_ret_sts_unexp_error;
1295: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1296: fnd_msg_pub.add;
1297: RAISE fnd_api.g_exc_unexpected_error;
1298: END IF;
1293: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1294: x_return_status := fnd_api.g_ret_sts_unexp_error;
1295: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1296: fnd_msg_pub.add;
1297: RAISE fnd_api.g_exc_unexpected_error;
1298: END IF;
1299: END IF;
1300:
1301: --Post Call to the Internal Type User Hook
1302:
1303: jtf_rs_resource_values_iuhk.delete_all_rs_values_post(
1304: X_RETURN_STATUS => x_return_status
1305: );
1306: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1307: x_return_status := fnd_api.g_ret_sts_unexp_error;
1308: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1309: fnd_msg_pub.add;
1310: RAISE fnd_api.g_exc_unexpected_error;
1303: jtf_rs_resource_values_iuhk.delete_all_rs_values_post(
1304: X_RETURN_STATUS => x_return_status
1305: );
1306: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1307: x_return_status := fnd_api.g_ret_sts_unexp_error;
1308: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1309: fnd_msg_pub.add;
1310: RAISE fnd_api.g_exc_unexpected_error;
1311: END IF;
1306: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1307: x_return_status := fnd_api.g_ret_sts_unexp_error;
1308: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1309: fnd_msg_pub.add;
1310: RAISE fnd_api.g_exc_unexpected_error;
1311: END IF;
1312:
1313: IF fnd_api.to_boolean(p_commit) THEN
1314: COMMIT WORK;
1309: fnd_msg_pub.add;
1310: RAISE fnd_api.g_exc_unexpected_error;
1311: END IF;
1312:
1313: IF fnd_api.to_boolean(p_commit) THEN
1314: COMMIT WORK;
1315: END IF;
1316: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1317:
1315: END IF;
1316: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1317:
1318: EXCEPTION
1319: WHEN fnd_api.g_exc_unexpected_error THEN
1320: --DBMS_OUTPUT.put_line (' ========================================== ');
1321: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1322: ROLLBACK TO delete_all_rs_values_pvt;
1323: x_return_status := fnd_api.g_ret_sts_unexp_error;
1319: WHEN fnd_api.g_exc_unexpected_error THEN
1320: --DBMS_OUTPUT.put_line (' ========================================== ');
1321: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1322: ROLLBACK TO delete_all_rs_values_pvt;
1323: x_return_status := fnd_api.g_ret_sts_unexp_error;
1324: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1325: WHEN OTHERS THEN
1326: --DBMS_OUTPUT.put_line (' ========================================== ');
1327: --DBMS_OUTPUT.put_line (' =========== Raised Others in Delete All Resource Values Pvt=============');
1326: --DBMS_OUTPUT.put_line (' ========================================== ');
1327: --DBMS_OUTPUT.put_line (' =========== Raised Others in Delete All Resource Values Pvt=============');
1328: --DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
1329: ROLLBACK TO delete_all_rs_values_pvt;
1330: x_return_status := fnd_api.g_ret_sts_unexp_error;
1331: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1332:
1333: END delete_all_rs_resource_values;
1334:
1335: --Procedure to Get Resource Values based on the input values passed by the calling routines
1336:
1337: PROCEDURE GET_RS_RESOURCE_VALUES(
1338: P_Api_Version IN NUMBER,
1339: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1340: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1341: P_resource_id IN NUMBER,
1342: P_value_type IN VARCHAR2,
1343: p_resource_param_id IN NUMBER,
1336:
1337: PROCEDURE GET_RS_RESOURCE_VALUES(
1338: P_Api_Version IN NUMBER,
1339: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1340: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1341: P_resource_id IN NUMBER,
1342: P_value_type IN VARCHAR2,
1343: p_resource_param_id IN NUMBER,
1344: x_resource_param_value_id OUT NOCOPY NUMBER,
1364: AND ( (value_type = l_value_type) OR (l_value_type is null) );
1365:
1366: BEGIN
1367: SAVEPOINT get_rs_resource_values_pvt;
1368: x_return_status := fnd_api.g_ret_sts_success;
1369: --DBMS_OUTPUT.put_line(' Started Get Resources Values Pvt ');
1370: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1371: RAISE fnd_api.g_exc_unexpected_error;
1372: END IF;
1366: BEGIN
1367: SAVEPOINT get_rs_resource_values_pvt;
1368: x_return_status := fnd_api.g_ret_sts_success;
1369: --DBMS_OUTPUT.put_line(' Started Get Resources Values Pvt ');
1370: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1371: RAISE fnd_api.g_exc_unexpected_error;
1372: END IF;
1373: IF fnd_api.to_boolean(p_init_msg_list) THEN
1374: fnd_msg_pub.initialize;
1367: SAVEPOINT get_rs_resource_values_pvt;
1368: x_return_status := fnd_api.g_ret_sts_success;
1369: --DBMS_OUTPUT.put_line(' Started Get Resources Values Pvt ');
1370: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1371: RAISE fnd_api.g_exc_unexpected_error;
1372: END IF;
1373: IF fnd_api.to_boolean(p_init_msg_list) THEN
1374: fnd_msg_pub.initialize;
1375: END IF;
1369: --DBMS_OUTPUT.put_line(' Started Get Resources Values Pvt ');
1370: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1371: RAISE fnd_api.g_exc_unexpected_error;
1372: END IF;
1373: IF fnd_api.to_boolean(p_init_msg_list) THEN
1374: fnd_msg_pub.initialize;
1375: END IF;
1376:
1377: --Put all Validations here
1376:
1377: --Put all Validations here
1378:
1379: --Initialize API return status to success
1380: x_return_status := FND_API.G_RET_STS_SUCCESS;
1381:
1382: --Validate the Resource Id
1383: jtf_resource_utl.validate_resource_number(
1384: p_resource_id => l_resource_id,
1388: );
1389: -- added for NOCOPY
1390: l_resource_id := l_resource_id_out;
1391:
1392: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1393: x_return_status := fnd_api.g_ret_sts_unexp_error;
1394: RAISE fnd_api.g_exc_unexpected_error;
1395: END IF;
1396: --End of Resource Id Validation
1389: -- added for NOCOPY
1390: l_resource_id := l_resource_id_out;
1391:
1392: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1393: x_return_status := fnd_api.g_ret_sts_unexp_error;
1394: RAISE fnd_api.g_exc_unexpected_error;
1395: END IF;
1396: --End of Resource Id Validation
1397:
1390: l_resource_id := l_resource_id_out;
1391:
1392: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1393: x_return_status := fnd_api.g_ret_sts_unexp_error;
1394: RAISE fnd_api.g_exc_unexpected_error;
1395: END IF;
1396: --End of Resource Id Validation
1397:
1398: --Validate the Resource Param Id
1399: jtf_resource_utl.validate_resource_param_id(
1400: p_resource_param_id => l_resource_param_id,
1401: x_return_status => x_return_status
1402: );
1403: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1404: x_return_status := fnd_api.g_ret_sts_unexp_error;
1405: RAISE fnd_api.g_exc_unexpected_error;
1406: END IF;
1407: --End of Resource Param Id Validation
1400: p_resource_param_id => l_resource_param_id,
1401: x_return_status => x_return_status
1402: );
1403: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1404: x_return_status := fnd_api.g_ret_sts_unexp_error;
1405: RAISE fnd_api.g_exc_unexpected_error;
1406: END IF;
1407: --End of Resource Param Id Validation
1408:
1401: x_return_status => x_return_status
1402: );
1403: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1404: x_return_status := fnd_api.g_ret_sts_unexp_error;
1405: RAISE fnd_api.g_exc_unexpected_error;
1406: END IF;
1407: --End of Resource Param Id Validation
1408:
1409: --Validate the Value Type
1406: END IF;
1407: --End of Resource Param Id Validation
1408:
1409: --Validate the Value Type
1410: IF l_value_type <> FND_API.G_MISS_CHAR THEN
1411: IF l_value_type IS NOT NULL THEN
1412: jtf_resource_utl.validate_rs_value_type(
1413: p_resource_param_id => l_resource_param_id,
1414: p_value_type => l_value_type,
1413: p_resource_param_id => l_resource_param_id,
1414: p_value_type => l_value_type,
1415: x_return_status => x_return_status
1416: );
1417: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1418: x_return_status := fnd_api.g_ret_sts_unexp_error;
1419: RAISE fnd_api.g_exc_unexpected_error;
1420: END IF;
1421: END IF;
1414: p_value_type => l_value_type,
1415: x_return_status => x_return_status
1416: );
1417: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1418: x_return_status := fnd_api.g_ret_sts_unexp_error;
1419: RAISE fnd_api.g_exc_unexpected_error;
1420: END IF;
1421: END IF;
1422: END IF;
1415: x_return_status => x_return_status
1416: );
1417: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1418: x_return_status := fnd_api.g_ret_sts_unexp_error;
1419: RAISE fnd_api.g_exc_unexpected_error;
1420: END IF;
1421: END IF;
1422: END IF;
1423: --End of Value Type Validation
1428: CLOSE c_rs_resource_values;
1429: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_ID');
1430: fnd_message.set_token('P_RESOURCE_PARAM_ID', p_resource_param_id);
1431: fnd_msg_pub.add;
1432: x_return_status := fnd_api.g_ret_sts_unexp_error;
1433: RAISE fnd_api.g_exc_unexpected_error;
1434: END IF;
1435: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1436:
1429: fnd_message.set_name('JTF', 'JTF_RS_INVALID_RS_PRM_ID');
1430: fnd_message.set_token('P_RESOURCE_PARAM_ID', p_resource_param_id);
1431: fnd_msg_pub.add;
1432: x_return_status := fnd_api.g_ret_sts_unexp_error;
1433: RAISE fnd_api.g_exc_unexpected_error;
1434: END IF;
1435: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1436:
1437: EXCEPTION
1434: END IF;
1435: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1436:
1437: EXCEPTION
1438: WHEN fnd_api.g_exc_unexpected_error THEN
1439: --DBMS_OUTPUT.put_line (' ========================================== ');
1440: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1441: ROLLBACK TO get_rs_resource_values_pvt;
1442: x_return_status := fnd_api.g_ret_sts_unexp_error;
1438: WHEN fnd_api.g_exc_unexpected_error THEN
1439: --DBMS_OUTPUT.put_line (' ========================================== ');
1440: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1441: ROLLBACK TO get_rs_resource_values_pvt;
1442: x_return_status := fnd_api.g_ret_sts_unexp_error;
1443: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1444: WHEN OTHERS THEN
1445: --DBMS_OUTPUT.put_line (' ========================================== ');
1446: --DBMS_OUTPUT.put_line (' =========== Raised Others in Get Resource Values Pvt =============');
1445: --DBMS_OUTPUT.put_line (' ========================================== ');
1446: --DBMS_OUTPUT.put_line (' =========== Raised Others in Get Resource Values Pvt =============');
1447: --DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
1448: ROLLBACK TO get_rs_resource_values_pvt;
1449: x_return_status := fnd_api.g_ret_sts_unexp_error;
1450: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1451:
1452: END get_rs_resource_values;
1453:
1454: --Procedure to Get Resource Param List for the given Application Id and Param Type
1455:
1456: PROCEDURE GET_RS_RESOURCE_PARAM_LIST(
1457: P_Api_Version IN NUMBER,
1458: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1459: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1460: P_APPLICATION_ID IN NUMBER,
1461: X_Return_Status OUT NOCOPY VARCHAR2,
1462: X_Msg_Count OUT NOCOPY NUMBER,
1455:
1456: PROCEDURE GET_RS_RESOURCE_PARAM_LIST(
1457: P_Api_Version IN NUMBER,
1458: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1459: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1460: P_APPLICATION_ID IN NUMBER,
1461: X_Return_Status OUT NOCOPY VARCHAR2,
1462: X_Msg_Count OUT NOCOPY NUMBER,
1463: X_Msg_Data OUT NOCOPY VARCHAR2,
1477: AND jrspm.name = fnl.lookup_code
1478: AND fnl.lookup_type = 'IEM_AGENT_PARAMS';
1479: BEGIN
1480: SAVEPOINT get_rs_param_list_pvt;
1481: x_return_status := fnd_api.g_ret_sts_success;
1482: --DBMS_OUTPUT.put_line(' Started Get Resources Param List Pvt ');
1483: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1484: RAISE fnd_api.g_exc_unexpected_error;
1485: END IF;
1479: BEGIN
1480: SAVEPOINT get_rs_param_list_pvt;
1481: x_return_status := fnd_api.g_ret_sts_success;
1482: --DBMS_OUTPUT.put_line(' Started Get Resources Param List Pvt ');
1483: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1484: RAISE fnd_api.g_exc_unexpected_error;
1485: END IF;
1486: IF fnd_api.to_boolean(p_init_msg_list) THEN
1487: fnd_msg_pub.initialize;
1480: SAVEPOINT get_rs_param_list_pvt;
1481: x_return_status := fnd_api.g_ret_sts_success;
1482: --DBMS_OUTPUT.put_line(' Started Get Resources Param List Pvt ');
1483: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1484: RAISE fnd_api.g_exc_unexpected_error;
1485: END IF;
1486: IF fnd_api.to_boolean(p_init_msg_list) THEN
1487: fnd_msg_pub.initialize;
1488: END IF;
1482: --DBMS_OUTPUT.put_line(' Started Get Resources Param List Pvt ');
1483: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1484: RAISE fnd_api.g_exc_unexpected_error;
1485: END IF;
1486: IF fnd_api.to_boolean(p_init_msg_list) THEN
1487: fnd_msg_pub.initialize;
1488: END IF;
1489:
1490: --Put all Validations here
1489:
1490: --Put all Validations here
1491:
1492: --Initialize message return status to success
1493: x_return_status := FND_API.G_RET_STS_SUCCESS;
1494:
1495: OPEN c_rs_resource_param_list;
1496: FETCH c_rs_resource_param_list into l_rs_param_rec;
1497: WHILE c_rs_resource_param_list%FOUND LOOP
1501: END LOOP;
1502: CLOSE c_rs_resource_param_list;
1503: x_no_record :=l_tbl_counter;
1504:
1505: IF fnd_api.to_boolean(p_commit) THEN
1506: COMMIT WORK;
1507: END IF;
1508: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1509:
1507: END IF;
1508: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1509:
1510: EXCEPTION
1511: WHEN fnd_api.g_exc_unexpected_error THEN
1512: --DBMS_OUTPUT.put_line (' ========================================== ');
1513: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1514: ROLLBACK TO get_rs_param_list_pvt;
1515: x_return_status := fnd_api.g_ret_sts_unexp_error;
1511: WHEN fnd_api.g_exc_unexpected_error THEN
1512: --DBMS_OUTPUT.put_line (' ========================================== ');
1513: --DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error =============== ');
1514: ROLLBACK TO get_rs_param_list_pvt;
1515: x_return_status := fnd_api.g_ret_sts_unexp_error;
1516: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1517: WHEN OTHERS THEN
1518: --DBMS_OUTPUT.put_line (' ========================================== ');
1519: --DBMS_OUTPUT.put_line (' =========== Raised Others in Get Resource Param List Pvt =============');
1518: --DBMS_OUTPUT.put_line (' ========================================== ');
1519: --DBMS_OUTPUT.put_line (' =========== Raised Others in Get Resource Param List Pvt =============');
1520: --DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
1521: ROLLBACK TO get_rs_param_list_pvt;
1522: x_return_status := fnd_api.g_ret_sts_unexp_error;
1523: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1524:
1525: END get_rs_resource_param_list;
1526: