59:
60: -- Debug Message
61: IF (AS_DEBUG_HIGH_ON) THEN
62:
63: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'start');
64: END IF;
65:
66:
67: -- Initialize API return status to SUCCESS
86:
87: -- Debug message
88: IF (AS_DEBUG_HIGH_ON) THEN
89:
90: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Validate_selattval');
91: END IF;
92:
93: -- Invoke validation procedures
94: Validate_selattval(
93: -- Invoke validation procedures
94: Validate_selattval(
95: p_init_msg_list => FND_API.G_FALSE,
96: p_validation_level => p_validation_level,
97: p_validation_mode => AS_UTILITY_PVT.G_CREATE,
98: P_SELATTVAL_Rec => P_SELATTVAL_Rec,
99: x_return_status => x_return_status,
100: x_msg_count => x_msg_count,
101: x_msg_data => x_msg_data);
108:
109: -- Debug Message
110: IF (AS_DEBUG_HIGH_ON) THEN
111:
112: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling create table handler');
113: END IF;
114:
115: -- Invoke table handler(PV_SELECTED_ATTR_VALUES_PKG.Insert_Row)
116: PV_SELECTED_ATTR_VALUES_PKG.Insert_Row(
165:
166: -- Debug Message
167: IF (AS_DEBUG_HIGH_ON) THEN
168:
169: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'end');
170: END IF;
171:
172:
173: -- Standard call to get message count and if count is 1, get message info.
177: );
178:
179: EXCEPTION
180: WHEN FND_API.G_EXC_ERROR THEN
181: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
182: P_API_NAME => L_API_NAME
183: ,P_PKG_NAME => G_PKG_NAME
184: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
185: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
181: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
182: P_API_NAME => L_API_NAME
183: ,P_PKG_NAME => G_PKG_NAME
184: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
185: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
186: ,X_MSG_COUNT => X_MSG_COUNT
187: ,X_MSG_DATA => X_MSG_DATA
188: ,X_RETURN_STATUS => X_RETURN_STATUS);
189:
187: ,X_MSG_DATA => X_MSG_DATA
188: ,X_RETURN_STATUS => X_RETURN_STATUS);
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
191: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
192: P_API_NAME => L_API_NAME
193: ,P_PKG_NAME => G_PKG_NAME
194: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
195: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
191: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
192: P_API_NAME => L_API_NAME
193: ,P_PKG_NAME => G_PKG_NAME
194: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
195: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
196: ,X_MSG_COUNT => X_MSG_COUNT
197: ,X_MSG_DATA => X_MSG_DATA
198: ,X_RETURN_STATUS => X_RETURN_STATUS);
199:
197: ,X_MSG_DATA => X_MSG_DATA
198: ,X_RETURN_STATUS => X_RETURN_STATUS);
199:
200: WHEN OTHERS THEN
201: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
202: P_API_NAME => L_API_NAME
203: ,P_PKG_NAME => G_PKG_NAME
204: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
205: ,P_SQLCODE => SQLCODE
200: WHEN OTHERS THEN
201: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
202: P_API_NAME => L_API_NAME
203: ,P_PKG_NAME => G_PKG_NAME
204: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
205: ,P_SQLCODE => SQLCODE
206: ,P_SQLERRM => SQLERRM
207: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
208: ,X_MSG_COUNT => X_MSG_COUNT
203: ,P_PKG_NAME => G_PKG_NAME
204: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
205: ,P_SQLCODE => SQLCODE
206: ,P_SQLERRM => SQLERRM
207: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
208: ,X_MSG_COUNT => X_MSG_COUNT
209: ,X_MSG_DATA => X_MSG_DATA
210: ,X_RETURN_STATUS => X_RETURN_STATUS);
211: End Create_selattval;
261:
262: -- Debug Message
263: IF (AS_DEBUG_HIGH_ON) THEN
264:
265: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'start');
266: END IF;
267:
268:
269: -- Initialize API return status to SUCCESS
275:
276: -- Debug Message
277: IF (AS_DEBUG_HIGH_ON) THEN
278:
279: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
280: END IF;
281:
282: Open C_Get_selattval( l_tar_SELATTVAL_rec.ATTR_VALUE_ID);
283: Fetch C_Get_selattval into
295: END IF;
296: -- Debug Message
297: IF (AS_DEBUG_HIGH_ON) THEN
298:
299: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Close Cursor');
300: END IF;
301: Close C_Get_selattval;
302:
303:
324:
325: -- Debug message
326: IF (AS_DEBUG_HIGH_ON) THEN
327:
328: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: Validate_selattval');
329: END IF;
330:
331: -- Invoke validation procedures
332: Validate_selattval(
331: -- Invoke validation procedures
332: Validate_selattval(
333: p_init_msg_list => FND_API.G_FALSE,
334: p_validation_level => p_validation_level,
335: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
336: P_SELATTVAL_Rec => P_SELATTVAL_Rec,
337: x_return_status => x_return_status,
338: x_msg_count => x_msg_count,
339: x_msg_data => x_msg_data);
346:
347: -- Debug Message
348: IF (AS_DEBUG_HIGH_ON) THEN
349:
350: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
351: END IF;
352:
353: -- Invoke table handler(PV_SELECTED_ATTR_VALUES_PKG.Update_Row)
354: PV_SELECTED_ATTR_VALUES_PKG.Update_Row(
396:
397: -- Debug Message
398: IF (AS_DEBUG_HIGH_ON) THEN
399:
400: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'end');
401: END IF;
402:
403:
404: -- Standard call to get message count and if count is 1, get message info.
408: );
409:
410: EXCEPTION
411: WHEN FND_API.G_EXC_ERROR THEN
412: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
413: P_API_NAME => L_API_NAME
414: ,P_PKG_NAME => G_PKG_NAME
415: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
416: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
412: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
413: P_API_NAME => L_API_NAME
414: ,P_PKG_NAME => G_PKG_NAME
415: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
416: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
417: ,X_MSG_COUNT => X_MSG_COUNT
418: ,X_MSG_DATA => X_MSG_DATA
419: ,X_RETURN_STATUS => X_RETURN_STATUS);
420:
418: ,X_MSG_DATA => X_MSG_DATA
419: ,X_RETURN_STATUS => X_RETURN_STATUS);
420:
421: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
422: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
423: P_API_NAME => L_API_NAME
424: ,P_PKG_NAME => G_PKG_NAME
425: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
426: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
422: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
423: P_API_NAME => L_API_NAME
424: ,P_PKG_NAME => G_PKG_NAME
425: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
426: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
427: ,X_MSG_COUNT => X_MSG_COUNT
428: ,X_MSG_DATA => X_MSG_DATA
429: ,X_RETURN_STATUS => X_RETURN_STATUS);
430:
428: ,X_MSG_DATA => X_MSG_DATA
429: ,X_RETURN_STATUS => X_RETURN_STATUS);
430:
431: WHEN OTHERS THEN
432: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
433: P_API_NAME => L_API_NAME
434: ,P_PKG_NAME => G_PKG_NAME
435: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
436: ,P_SQLCODE => SQLCODE
431: WHEN OTHERS THEN
432: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
433: P_API_NAME => L_API_NAME
434: ,P_PKG_NAME => G_PKG_NAME
435: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
436: ,P_SQLCODE => SQLCODE
437: ,P_SQLERRM => SQLERRM
438: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
439: ,X_MSG_COUNT => X_MSG_COUNT
434: ,P_PKG_NAME => G_PKG_NAME
435: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
436: ,P_SQLCODE => SQLCODE
437: ,P_SQLERRM => SQLERRM
438: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
439: ,X_MSG_COUNT => X_MSG_COUNT
440: ,X_MSG_DATA => X_MSG_DATA
441: ,X_RETURN_STATUS => X_RETURN_STATUS);
442: End Update_selattval;
483:
484: -- Debug Message
485: IF (AS_DEBUG_HIGH_ON) THEN
486:
487: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'start');
488: END IF;
489:
490:
491: -- Initialize API return status to SUCCESS
497:
498: -- Debug Message
499: IF (AS_DEBUG_HIGH_ON) THEN
500:
501: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling delete table handler');
502: END IF;
503:
504: -- Invoke table handler(PV_SELECTED_ATTR_VALUES_PKG.Delete_Row)
505: PV_SELECTED_ATTR_VALUES_PKG.Delete_Row(
517:
518: -- Debug Message
519: IF (AS_DEBUG_HIGH_ON) THEN
520:
521: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'end');
522: END IF;
523:
524:
525: -- Standard call to get message count and if count is 1, get message info.
529: );
530:
531: EXCEPTION
532: WHEN FND_API.G_EXC_ERROR THEN
533: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
534: P_API_NAME => L_API_NAME
535: ,P_PKG_NAME => G_PKG_NAME
536: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
537: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
533: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
534: P_API_NAME => L_API_NAME
535: ,P_PKG_NAME => G_PKG_NAME
536: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
537: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
538: ,X_MSG_COUNT => X_MSG_COUNT
539: ,X_MSG_DATA => X_MSG_DATA
540: ,X_RETURN_STATUS => X_RETURN_STATUS);
541:
539: ,X_MSG_DATA => X_MSG_DATA
540: ,X_RETURN_STATUS => X_RETURN_STATUS);
541:
542: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
543: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
544: P_API_NAME => L_API_NAME
545: ,P_PKG_NAME => G_PKG_NAME
546: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
547: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
543: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
544: P_API_NAME => L_API_NAME
545: ,P_PKG_NAME => G_PKG_NAME
546: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
547: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
548: ,X_MSG_COUNT => X_MSG_COUNT
549: ,X_MSG_DATA => X_MSG_DATA
550: ,X_RETURN_STATUS => X_RETURN_STATUS);
551:
549: ,X_MSG_DATA => X_MSG_DATA
550: ,X_RETURN_STATUS => X_RETURN_STATUS);
551:
552: WHEN OTHERS THEN
553: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
554: P_API_NAME => L_API_NAME
555: ,P_PKG_NAME => G_PKG_NAME
556: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
557: ,P_SQLCODE => SQLCODE
552: WHEN OTHERS THEN
553: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
554: P_API_NAME => L_API_NAME
555: ,P_PKG_NAME => G_PKG_NAME
556: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
557: ,P_SQLCODE => SQLCODE
558: ,P_SQLERRM => SQLERRM
559: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
560: ,X_MSG_COUNT => X_MSG_COUNT
555: ,P_PKG_NAME => G_PKG_NAME
556: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
557: ,P_SQLCODE => SQLCODE
558: ,P_SQLERRM => SQLERRM
559: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
560: ,X_MSG_COUNT => X_MSG_COUNT
561: ,X_MSG_DATA => X_MSG_DATA
562: ,X_RETURN_STATUS => X_RETURN_STATUS);
563: End Delete_selattval;
590:
591: -- Initialize API return status to SUCCESS
592: x_return_status := FND_API.G_RET_STS_SUCCESS;
593:
594: IF(p_validation_mode = AS_UTILITY_PVT.G_CREATE)
595: THEN
596: IF (p_attr_value_id IS NOT NULL) AND
597: (p_attr_value_id <> FND_API.G_MISS_NUM)
598: THEN
595: THEN
596: IF (p_attr_value_id IS NOT NULL) AND
597: (p_attr_value_id <> FND_API.G_MISS_NUM)
598: THEN
599: AS_UTILITY_PVT.Set_Message(
600: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
601: p_msg_name => 'API_INVALID_ID',
602: p_token1 => 'attr_value_id',
603: p_token1_value => p_attr_value_id);
604:
605: x_return_status := FND_API.G_RET_STS_ERROR;
606: END IF;
607:
608: ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
609: THEN
610: -- validate NOT NULL column
611: IF (p_attr_value_id IS NULL) OR
612: (p_attr_value_id = FND_API.G_MISS_NUM)
610: -- validate NOT NULL column
611: IF (p_attr_value_id IS NULL) OR
612: (p_attr_value_id = FND_API.G_MISS_NUM)
613: THEN
614: AS_UTILITY_PVT.Set_Message(
615: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
616: p_msg_name => 'API_MISSING_LEAD_ID');
617:
618: x_return_status := FND_API.G_RET_STS_ERROR;
621: FETCH C_attr_value_id_exists into l_val;
622:
623: IF C_attr_value_id_exists%NOTFOUND
624: THEN
625: AS_UTILITY_PVT.Set_Message(
626: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
627: p_msg_name => 'API_INVALID_ID',
628: p_token1 => 'attr_value_id',
629: p_token1_value => p_attr_value_id );
676: -- validate NOT NULL column
677: IF(p_selection_criteria_id is NULL)
678: THEN
679: IF (AS_DEBUG_HIGH_ON) THEN
680: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'Private API: -Violate NOT NULL constraint(selection_criteria_id)');
681: END IF;
682:
683: x_return_status := FND_API.G_RET_STS_ERROR;
684: END IF;
687: FETCH C_select_criteria_id_Exists into l_val;
688:
689: IF C_select_criteria_id_Exists%NOTFOUND
690: THEN
691: AS_UTILITY_PVT.Set_Message(
692: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
693: p_msg_name => 'API_INVALID_ID',
694: p_token1 => 'COLUMN',
695: p_token1_value => 'selection_criteria_id',
740:
741: -- Debug Message
742: IF (AS_DEBUG_HIGH_ON) THEN
743:
744: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'start');
745: END IF;
746:
747:
748: -- Initialize API return status to SUCCESS
790:
791: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_RECORD) THEN
792: -- Hint: Inter-field level validation can be added here
793: -- invoke record level validation procedures
794: -- if p_validation_mode = AS_UTILITY_PVT.G_CREATE then
795: select process_rule_id,attribute_id,selection_type_code into l_rule_id,l_attribute_id,l_selection_type_code from pv_enty_select_criteria
796: where selection_criteria_id = P_SELATTVAL_Rec.selection_criteria_id;
797:
798: open lc_criterion_dup_values_check (pc_rule_id => l_rule_id,
825:
826: -- Debug Message
827: IF (AS_DEBUG_HIGH_ON) THEN
828:
829: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: ' || l_api_name || 'end');
830: END IF;
831:
832: END Validate_selattval;
833: