18: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
19:
20: PROCEDURE Create_entyattmap(
21: P_Api_Version_Number IN NUMBER,
22: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
23: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
25: P_Identity_Resource_Id IN NUMBER,
26: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type
19:
20: PROCEDURE Create_entyattmap(
21: P_Api_Version_Number IN NUMBER,
22: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
23: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
25: P_Identity_Resource_Id IN NUMBER,
26: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type
27: := PV_RULE_RECTYPE_PUB.G_MISS_ENTYATTMAP_REC,
20: PROCEDURE Create_entyattmap(
21: P_Api_Version_Number IN NUMBER,
22: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
23: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
25: P_Identity_Resource_Id IN NUMBER,
26: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type
27: := PV_RULE_RECTYPE_PUB.G_MISS_ENTYATTMAP_REC,
28: X_MAPPING_ID OUT NOCOPY NUMBER,
40: -- Standard Start of API savepoint
41: SAVEPOINT CREATE_ENTYATTMAP_PVT;
42:
43: -- Standard call to check for call compatibility.
44: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
45: p_api_version_number,
46: l_api_name,
47: G_PKG_NAME)
48: THEN
45: p_api_version_number,
46: l_api_name,
47: G_PKG_NAME)
48: THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
50: END IF;
51:
52:
53: -- Initialize message list if p_init_msg_list is set to TRUE.
50: END IF;
51:
52:
53: -- Initialize message list if p_init_msg_list is set to TRUE.
54: IF FND_API.to_Boolean( p_init_msg_list )
55: THEN
56: FND_MSG_PUB.initialize;
57: END IF;
58:
64: END IF;
65:
66:
67: -- Initialize API return status to SUCCESS
68: x_return_status := FND_API.G_RET_STS_SUCCESS;
69:
70: --
71: -- API body
72: --
80: FND_MESSAGE.Set_Name('PV', 'UT_CANNOT_GET_PROFILE_VALUE');
81: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
82: FND_MSG_PUB.ADD;
83: END IF;
84: RAISE FND_API.G_EXC_ERROR;
85: END IF;
86:
87: -- Debug message
88: IF (AS_DEBUG_HIGH_ON) THEN
91: END IF;
92:
93: -- Invoke validation procedures
94: Validate_entyattmap(
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_ENTYATTMAP_Rec => P_ENTYATTMAP_Rec,
99: x_return_status => x_return_status,
99: x_return_status => x_return_status,
100: x_msg_count => x_msg_count,
101: x_msg_data => x_msg_data);
102:
103: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
104: RAISE FND_API.G_EXC_ERROR;
105: END IF;
106:
107: -- Hint: Add corresponding Master-Detail business logic here if necessary.
100: x_msg_count => x_msg_count,
101: x_msg_data => x_msg_data);
102:
103: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
104: RAISE FND_API.G_EXC_ERROR;
105: END IF;
106:
107: -- Hint: Add corresponding Master-Detail business logic here if necessary.
108:
148: ,p_ATTRIBUTE14 => p_ENTYATTMAP_rec.ATTRIBUTE14
149: ,p_ATTRIBUTE15 => p_ENTYATTMAP_rec.ATTRIBUTE15
150: );
151:
152: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
153: RAISE FND_API.G_EXC_ERROR;
154: END IF;
155:
156: --
149: ,p_ATTRIBUTE15 => p_ENTYATTMAP_rec.ATTRIBUTE15
150: );
151:
152: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
153: RAISE FND_API.G_EXC_ERROR;
154: END IF;
155:
156: --
157: -- End of API body
157: -- End of API body
158: --
159:
160: -- Standard check for p_commit
161: IF FND_API.to_Boolean( p_commit )
162: THEN
163: COMMIT WORK;
164: END IF;
165:
177: p_data => x_msg_data
178: );
179:
180: EXCEPTION
181: WHEN FND_API.G_EXC_ERROR THEN
182: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
183: P_API_NAME => L_API_NAME
184: ,P_PKG_NAME => G_PKG_NAME
185: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
187: ,X_MSG_COUNT => X_MSG_COUNT
188: ,X_MSG_DATA => X_MSG_DATA
189: ,X_RETURN_STATUS => X_RETURN_STATUS);
190:
191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
192: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
193: P_API_NAME => L_API_NAME
194: ,P_PKG_NAME => G_PKG_NAME
195: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
214:
215: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
216: PROCEDURE Update_entyattmap(
217: P_Api_Version_Number IN NUMBER,
218: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
219: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
220: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
221: P_Identity_Resource_Id IN NUMBER,
222: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
215: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
216: PROCEDURE Update_entyattmap(
217: P_Api_Version_Number IN NUMBER,
218: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
219: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
220: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
221: P_Identity_Resource_Id IN NUMBER,
222: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
223: X_Return_Status OUT NOCOPY VARCHAR2,
216: PROCEDURE Update_entyattmap(
217: P_Api_Version_Number IN NUMBER,
218: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
219: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
220: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
221: P_Identity_Resource_Id IN NUMBER,
222: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
223: X_Return_Status OUT NOCOPY VARCHAR2,
224: X_Msg_Count OUT NOCOPY NUMBER,
243: -- Standard Start of API savepoint
244: SAVEPOINT UPDATE_ENTYATTMAP_PVT;
245:
246: -- Standard call to check for call compatibility.
247: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
248: p_api_version_number,
249: l_api_name,
250: G_PKG_NAME)
251: THEN
248: p_api_version_number,
249: l_api_name,
250: G_PKG_NAME)
251: THEN
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
253: END IF;
254:
255:
256: -- Initialize message list if p_init_msg_list is set to TRUE.
253: END IF;
254:
255:
256: -- Initialize message list if p_init_msg_list is set to TRUE.
257: IF FND_API.to_Boolean( p_init_msg_list )
258: THEN
259: FND_MSG_PUB.initialize;
260: END IF;
261:
267: END IF;
268:
269:
270: -- Initialize API return status to SUCCESS
271: x_return_status := FND_API.G_RET_STS_SUCCESS;
272:
273: --
274: -- Api body
275: --
291: FND_MESSAGE.Set_Token ('INFO', 'entyattmap', FALSE);
292: FND_MSG_PUB.Add;
293: END IF;
294: Close C_Get_entyattmap;
295: raise FND_API.G_EXC_ERROR;
296: END IF;
297: -- Debug Message
298: IF (AS_DEBUG_HIGH_ON) THEN
299:
302: Close C_Get_entyattmap;
303:
304:
305: If (l_tar_ENTYATTMAP_rec.object_version_number is NULL or
306: l_tar_ENTYATTMAP_rec.object_version_number = FND_API.G_MISS_NUM ) Then
307: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
308: THEN
309: FND_MESSAGE.Set_Name('PV', 'API_MISSING_ID');
310: FND_MESSAGE.Set_Token('COLUMN', 'object_version_number', FALSE);
309: FND_MESSAGE.Set_Name('PV', 'API_MISSING_ID');
310: FND_MESSAGE.Set_Token('COLUMN', 'object_version_number', FALSE);
311: FND_MSG_PUB.ADD;
312: END IF;
313: raise FND_API.G_EXC_ERROR;
314: End if;
315: -- Check Whether record has been changed by someone else
316: If (l_tar_ENTYATTMAP_rec.object_version_number <> l_ref_ENTYATTMAP_rec.object_version_number) Then
317: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
319: FND_MESSAGE.Set_Name('PV', 'API_RECORD_CHANGED');
320: FND_MESSAGE.Set_Token('INFO', 'entyattmap', FALSE);
321: FND_MSG_PUB.ADD;
322: END IF;
323: raise FND_API.G_EXC_ERROR;
324: End if;
325:
326: -- Debug message
327: IF (AS_DEBUG_HIGH_ON) THEN
330: END IF;
331:
332: -- Invoke validation procedures
333: Validate_entyattmap(
334: p_init_msg_list => FND_API.G_FALSE,
335: p_validation_level => p_validation_level,
336: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
337: P_ENTYATTMAP_Rec => P_ENTYATTMAP_Rec,
338: x_return_status => x_return_status,
338: x_return_status => x_return_status,
339: x_msg_count => x_msg_count,
340: x_msg_data => x_msg_data);
341:
342: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
343: RAISE FND_API.G_EXC_ERROR;
344: END IF;
345:
346: -- Hint: Add corresponding Master-Detail business logic here if necessary.
339: x_msg_count => x_msg_count,
340: x_msg_data => x_msg_data);
341:
342: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
343: RAISE FND_API.G_EXC_ERROR;
344: END IF;
345:
346: -- Hint: Add corresponding Master-Detail business logic here if necessary.
347:
355: PV_ENTITY_ATTR_MAPPINGS_PKG.Update_Row(
356: p_MAPPING_ID => p_ENTYATTMAP_rec.MAPPING_ID
357: ,p_LAST_UPDATE_DATE => SYSDATE
358: ,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
359: ,p_CREATION_DATE => FND_API.G_MISS_DATE
360: ,p_CREATED_BY => FND_API.G_MISS_NUM
361: ,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID
362: ,p_OBJECT_VERSION_NUMBER => p_ENTYATTMAP_rec.OBJECT_VERSION_NUMBER
363: ,p_REQUEST_ID => p_ENTYATTMAP_rec.REQUEST_ID
356: p_MAPPING_ID => p_ENTYATTMAP_rec.MAPPING_ID
357: ,p_LAST_UPDATE_DATE => SYSDATE
358: ,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
359: ,p_CREATION_DATE => FND_API.G_MISS_DATE
360: ,p_CREATED_BY => FND_API.G_MISS_NUM
361: ,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID
362: ,p_OBJECT_VERSION_NUMBER => p_ENTYATTMAP_rec.OBJECT_VERSION_NUMBER
363: ,p_REQUEST_ID => p_ENTYATTMAP_rec.REQUEST_ID
364: ,p_PROGRAM_APPLICATION_ID => p_ENTYATTMAP_rec.PROGRAM_APPLICATION_ID
390: -- End of API body.
391: --
392:
393: -- Standard check for p_commit
394: IF FND_API.to_Boolean( p_commit )
395: THEN
396: COMMIT WORK;
397: END IF;
398:
410: p_data => x_msg_data
411: );
412:
413: EXCEPTION
414: WHEN FND_API.G_EXC_ERROR THEN
415: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
416: P_API_NAME => L_API_NAME
417: ,P_PKG_NAME => G_PKG_NAME
418: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
420: ,X_MSG_COUNT => X_MSG_COUNT
421: ,X_MSG_DATA => X_MSG_DATA
422: ,X_RETURN_STATUS => X_RETURN_STATUS);
423:
424: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
425: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
426: P_API_NAME => L_API_NAME
427: ,P_PKG_NAME => G_PKG_NAME
428: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
448: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
449: -- The Master delete procedure may not be needed depends on different business requirements.
450: PROCEDURE Delete_entyattmap(
451: P_Api_Version_Number IN NUMBER,
452: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
453: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
454: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
455: P_Identity_Resource_Id IN NUMBER,
456: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
449: -- The Master delete procedure may not be needed depends on different business requirements.
450: PROCEDURE Delete_entyattmap(
451: P_Api_Version_Number IN NUMBER,
452: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
453: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
454: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
455: P_Identity_Resource_Id IN NUMBER,
456: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
457: X_Return_Status OUT NOCOPY VARCHAR2,
450: PROCEDURE Delete_entyattmap(
451: P_Api_Version_Number IN NUMBER,
452: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
453: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
454: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
455: P_Identity_Resource_Id IN NUMBER,
456: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
457: X_Return_Status OUT NOCOPY VARCHAR2,
458: X_Msg_Count OUT NOCOPY NUMBER,
466: -- Standard Start of API savepoint
467: SAVEPOINT DELETE_ENTYATTMAP_PVT;
468:
469: -- Standard call to check for call compatibility.
470: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
471: p_api_version_number,
472: l_api_name,
473: G_PKG_NAME)
474: THEN
471: p_api_version_number,
472: l_api_name,
473: G_PKG_NAME)
474: THEN
475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
476: END IF;
477:
478:
479: -- Initialize message list if p_init_msg_list is set to TRUE.
476: END IF;
477:
478:
479: -- Initialize message list if p_init_msg_list is set to TRUE.
480: IF FND_API.to_Boolean( p_init_msg_list )
481: THEN
482: FND_MSG_PUB.initialize;
483: END IF;
484:
490: END IF;
491:
492:
493: -- Initialize API return status to SUCCESS
494: x_return_status := FND_API.G_RET_STS_SUCCESS;
495:
496: --
497: -- Api body
498: --
510: -- End of API body
511: --
512:
513: -- Standard check for p_commit
514: IF FND_API.to_Boolean( p_commit )
515: THEN
516: COMMIT WORK;
517: END IF;
518:
530: p_data => x_msg_data
531: );
532:
533: EXCEPTION
534: WHEN FND_API.G_EXC_ERROR THEN
535: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
536: P_API_NAME => L_API_NAME
537: ,P_PKG_NAME => G_PKG_NAME
538: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
540: ,X_MSG_COUNT => X_MSG_COUNT
541: ,X_MSG_DATA => X_MSG_DATA
542: ,X_RETURN_STATUS => X_RETURN_STATUS);
543:
544: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
545: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
546: P_API_NAME => L_API_NAME
547: ,P_PKG_NAME => G_PKG_NAME
548: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
566:
567:
568: -- Item-level validation procedures
569: PROCEDURE Validate_MAPPING_ID (
570: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
571: P_Validation_mode IN VARCHAR2,
572: P_MAPPING_ID IN NUMBER,
573: X_Return_Status OUT NOCOPY VARCHAR2,
574: X_Msg_Count OUT NOCOPY NUMBER,
583: l_val VARCHAR2(1);
584: BEGIN
585:
586: -- Initialize message list if p_init_msg_list is set to TRUE.
587: IF FND_API.to_Boolean( p_init_msg_list )
588: THEN
589: FND_MSG_PUB.initialize;
590: END IF;
591:
590: END IF;
591:
592:
593: -- Initialize API return status to SUCCESS
594: x_return_status := FND_API.G_RET_STS_SUCCESS;
595:
596: IF(p_validation_mode = AS_UTILITY_PVT.G_CREATE)
597: THEN
598: IF (p_mapping_id IS NOT NULL) AND
595:
596: IF(p_validation_mode = AS_UTILITY_PVT.G_CREATE)
597: THEN
598: IF (p_mapping_id IS NOT NULL) AND
599: (p_mapping_id <> FND_API.G_MISS_NUM)
600: THEN
601: AS_UTILITY_PVT.Set_Message(
602: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
603: p_msg_name => 'API_INVALID_ID',
603: p_msg_name => 'API_INVALID_ID',
604: p_token1 => 'MAPPING_ID',
605: p_token1_value => p_mapping_id);
606:
607: x_return_status := FND_API.G_RET_STS_ERROR;
608: END IF;
609:
610: ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
611: THEN
610: ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
611: THEN
612: -- validate NOT NULL column
613: IF (p_mapping_id IS NULL) OR
614: (p_mapping_id = FND_API.G_MISS_NUM)
615: THEN
616: AS_UTILITY_PVT.Set_Message(
617: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
618: p_msg_name => 'API_MISSING_LEAD_ID');
616: AS_UTILITY_PVT.Set_Message(
617: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
618: p_msg_name => 'API_MISSING_LEAD_ID');
619:
620: x_return_status := FND_API.G_RET_STS_ERROR;
621: ELSE
622: OPEN C_mapping_id_exists (p_mapping_id);
623: FETCH C_mapping_id_exists into l_val;
624:
629: p_msg_name => 'API_INVALID_ID',
630: p_token1 => 'MAPPING_ID',
631: p_token1_value => p_mapping_id );
632:
633: x_return_status := FND_API.G_RET_STS_ERROR;
634: END IF;
635:
636: CLOSE C_mapping_id_exists;
637: END IF;
646: END Validate_MAPPING_ID;
647:
648:
649: PROCEDURE Validate_MAPPING_OPERATOR (
650: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
651: P_Validation_mode IN VARCHAR2,
652: P_ATTRIBUTE_ID IN NUMBER,
653: P_OPERATOR IN VARCHAR2,
654: X_Return_Status OUT NOCOPY VARCHAR2,
658: IS
659: BEGIN
660:
661: -- Initialize message list if p_init_msg_list is set to TRUE.
662: IF FND_API.to_Boolean( p_init_msg_list )
663: THEN
664: FND_MSG_PUB.initialize;
665: END IF;
666:
664: FND_MSG_PUB.initialize;
665: END IF;
666:
667: -- Initialize API return status to SUCCESS
668: x_return_status := FND_API.G_RET_STS_SUCCESS;
669:
670: if p_operator is NULL or p_operator = FND_API.G_MISS_CHAR then
671:
672: AS_UTILITY_PVT.Set_Message(
666:
667: -- Initialize API return status to SUCCESS
668: x_return_status := FND_API.G_RET_STS_SUCCESS;
669:
670: if p_operator is NULL or p_operator = FND_API.G_MISS_CHAR then
671:
672: AS_UTILITY_PVT.Set_Message(
673: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
674: p_msg_name => 'API_MISSING_OPERATOR');
672: AS_UTILITY_PVT.Set_Message(
673: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
674: p_msg_name => 'API_MISSING_OPERATOR');
675:
676: x_return_status := FND_API.G_RET_STS_ERROR;
677:
678: elsif p_operator not in ('EQUALS', 'NOT_EQUALS',
679: 'LESS_THAN', 'GREATER_THAN',
680: 'LESS_THAN_OR_EQUALS', 'GREATER_THAN_OR_EQUALS')
682: FND_MESSAGE.SET_NAME('PV', 'API_INVALID_MAPPING_OPERATOR');
683: FND_MESSAGE.SET_TOKEN('OPERATOR', p_operator);
684: FND_MSG_PUB.ADD;
685:
686: x_return_status := FND_API.G_RET_STS_ERROR;
687:
688: else
689: pv_common_checks_pvt.Validate_OPERATOR(
690: p_init_msg_list => FND_API.G_FALSE,
686: x_return_status := FND_API.G_RET_STS_ERROR;
687:
688: else
689: pv_common_checks_pvt.Validate_OPERATOR(
690: p_init_msg_list => FND_API.G_FALSE,
691: p_validation_mode => p_validation_mode,
692: p_TABLE_NAME => 'PV_ENTITY_ATTR_MAPPINGS',
693: p_COLUMN_NAME => 'OPERATOR',
694: p_attribute_id => p_ATTRIBUTE_ID,
696: x_return_status => x_return_status,
697: x_msg_count => x_msg_count,
698: x_msg_data => x_msg_data);
699:
700: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
701: raise FND_API.G_EXC_ERROR;
702: END IF;
703:
704: end if;
697: x_msg_count => x_msg_count,
698: x_msg_data => x_msg_data);
699:
700: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
701: raise FND_API.G_EXC_ERROR;
702: END IF;
703:
704: end if;
705:
712: END Validate_MAPPING_OPERATOR;
713:
714:
715: PROCEDURE Validate_entyattmap(
716: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
717: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
718: P_Validation_mode IN VARCHAR2,
719: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
720: X_Return_Status OUT NOCOPY VARCHAR2,
713:
714:
715: PROCEDURE Validate_entyattmap(
716: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
717: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
718: P_Validation_mode IN VARCHAR2,
719: P_ENTYATTMAP_Rec IN PV_RULE_RECTYPE_PUB.ENTYATTMAP_Rec_Type,
720: X_Return_Status OUT NOCOPY VARCHAR2,
721: X_Msg_Count OUT NOCOPY NUMBER,
732: END IF;
733:
734:
735: -- Initialize API return status to SUCCESS
736: x_return_status := FND_API.G_RET_STS_SUCCESS;
737:
738: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM) THEN
739:
740: Validate_MAPPING_ID(
737:
738: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM) THEN
739:
740: Validate_MAPPING_ID(
741: p_init_msg_list => FND_API.G_FALSE,
742: p_validation_mode => p_validation_mode,
743: p_MAPPING_ID => P_ENTYATTMAP_Rec.MAPPING_ID,
744: x_return_status => x_return_status,
745: x_msg_count => x_msg_count,
744: x_return_status => x_return_status,
745: x_msg_count => x_msg_count,
746: x_msg_data => x_msg_data);
747:
748: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
749: raise FND_API.G_EXC_ERROR;
750: END IF;
751:
752: pv_common_checks_pvt.Validate_OBJECT_VERSION_NUMBER(
745: x_msg_count => x_msg_count,
746: x_msg_data => x_msg_data);
747:
748: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
749: raise FND_API.G_EXC_ERROR;
750: END IF;
751:
752: pv_common_checks_pvt.Validate_OBJECT_VERSION_NUMBER(
753: p_init_msg_list => FND_API.G_FALSE,
749: raise FND_API.G_EXC_ERROR;
750: END IF;
751:
752: pv_common_checks_pvt.Validate_OBJECT_VERSION_NUMBER(
753: p_init_msg_list => FND_API.G_FALSE,
754: p_validation_mode => p_validation_mode,
755: p_OBJECT_VERSION_NUMBER => p_ENTYATTMAP_rec.OBJECT_VERSION_NUMBER,
756: x_return_status => x_return_status,
757: x_msg_count => x_msg_count,
756: x_return_status => x_return_status,
757: x_msg_count => x_msg_count,
758: x_msg_data => x_msg_data);
759:
760: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
761: raise FND_API.G_EXC_ERROR;
762: END IF;
763:
764: pv_common_checks_pvt.Validate_PROCESS_RULE_ID(
757: x_msg_count => x_msg_count,
758: x_msg_data => x_msg_data);
759:
760: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
761: raise FND_API.G_EXC_ERROR;
762: END IF;
763:
764: pv_common_checks_pvt.Validate_PROCESS_RULE_ID(
765: p_init_msg_list => FND_API.G_FALSE,
761: raise FND_API.G_EXC_ERROR;
762: END IF;
763:
764: pv_common_checks_pvt.Validate_PROCESS_RULE_ID(
765: p_init_msg_list => FND_API.G_FALSE,
766: p_validation_mode => p_validation_mode,
767: p_PROCESS_RULE_ID => P_ENTYATTMAP_Rec.PROCESS_RULE_ID,
768: x_return_status => x_return_status,
769: x_msg_count => x_msg_count,
768: x_return_status => x_return_status,
769: x_msg_count => x_msg_count,
770: x_msg_data => x_msg_data);
771:
772: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
773: raise FND_API.G_EXC_ERROR;
774: END IF;
775:
776: pv_common_checks_pvt.Validate_Lookup(
769: x_msg_count => x_msg_count,
770: x_msg_data => x_msg_data);
771:
772: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
773: raise FND_API.G_EXC_ERROR;
774: END IF;
775:
776: pv_common_checks_pvt.Validate_Lookup(
777: p_init_msg_list => FND_API.G_FALSE,
773: raise FND_API.G_EXC_ERROR;
774: END IF;
775:
776: pv_common_checks_pvt.Validate_Lookup(
777: p_init_msg_list => FND_API.G_FALSE,
778: p_validation_mode => p_validation_mode,
779: p_TABLE_NAME => 'PV_ENTITY_ATTR_MAPPINGS',
780: p_COLUMN_NAME => 'SOURCE_ATTR_TYPE',
781: p_LOOKUP_TYPE => 'PV_ATTRIBUTE_ENTITY_TYPE',
783: x_return_status => x_return_status,
784: x_msg_count => x_msg_count,
785: x_msg_data => x_msg_data);
786:
787: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
788: raise FND_API.G_EXC_ERROR;
789: END IF;
790:
791: pv_common_checks_pvt.Validate_attribute_id(
784: x_msg_count => x_msg_count,
785: x_msg_data => x_msg_data);
786:
787: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
788: raise FND_API.G_EXC_ERROR;
789: END IF;
790:
791: pv_common_checks_pvt.Validate_attribute_id(
792: p_init_msg_list => FND_API.G_FALSE,
788: raise FND_API.G_EXC_ERROR;
789: END IF;
790:
791: pv_common_checks_pvt.Validate_attribute_id(
792: p_init_msg_list => FND_API.G_FALSE,
793: p_validation_mode => p_validation_mode,
794: p_attribute_id => P_ENTYATTMAP_Rec.SOURCE_ATTR_ID,
795: x_return_status => x_return_status,
796: x_msg_count => x_msg_count,
794: p_attribute_id => P_ENTYATTMAP_Rec.SOURCE_ATTR_ID,
795: x_return_status => x_return_status,
796: x_msg_count => x_msg_count,
797: x_msg_data => x_msg_data);
798: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
799: raise FND_API.G_EXC_ERROR;
800: END IF;
801:
802: pv_common_checks_pvt.Validate_Lookup(
795: x_return_status => x_return_status,
796: x_msg_count => x_msg_count,
797: x_msg_data => x_msg_data);
798: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
799: raise FND_API.G_EXC_ERROR;
800: END IF;
801:
802: pv_common_checks_pvt.Validate_Lookup(
803: p_init_msg_list => FND_API.G_FALSE,
799: raise FND_API.G_EXC_ERROR;
800: END IF;
801:
802: pv_common_checks_pvt.Validate_Lookup(
803: p_init_msg_list => FND_API.G_FALSE,
804: p_validation_mode => p_validation_mode,
805: p_TABLE_NAME => 'PV_ENTITY_ATTR_MAPPINGS',
806: p_COLUMN_NAME => 'TARGET_ATTR_TYPE',
807: p_LOOKUP_TYPE => 'PV_ATTRIBUTE_ENTITY_TYPE',
809: x_return_status => x_return_status,
810: x_msg_count => x_msg_count,
811: x_msg_data => x_msg_data);
812:
813: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
814: raise FND_API.G_EXC_ERROR;
815: END IF;
816:
817: pv_common_checks_pvt.Validate_attribute_id(
810: x_msg_count => x_msg_count,
811: x_msg_data => x_msg_data);
812:
813: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
814: raise FND_API.G_EXC_ERROR;
815: END IF;
816:
817: pv_common_checks_pvt.Validate_attribute_id(
818: p_init_msg_list => FND_API.G_FALSE,
814: raise FND_API.G_EXC_ERROR;
815: END IF;
816:
817: pv_common_checks_pvt.Validate_attribute_id(
818: p_init_msg_list => FND_API.G_FALSE,
819: p_validation_mode => p_validation_mode,
820: p_attribute_id => P_ENTYATTMAP_Rec.TARGET_ATTR_ID,
821: x_return_status => x_return_status,
822: x_msg_count => x_msg_count,
821: x_return_status => x_return_status,
822: x_msg_count => x_msg_count,
823: x_msg_data => x_msg_data);
824:
825: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
826: raise FND_API.G_EXC_ERROR;
827: END IF;
828:
829: Validate_MAPPING_OPERATOR(
822: x_msg_count => x_msg_count,
823: x_msg_data => x_msg_data);
824:
825: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
826: raise FND_API.G_EXC_ERROR;
827: END IF;
828:
829: Validate_MAPPING_OPERATOR(
830: p_init_msg_list => FND_API.G_FALSE,
826: raise FND_API.G_EXC_ERROR;
827: END IF;
828:
829: Validate_MAPPING_OPERATOR(
830: p_init_msg_list => FND_API.G_FALSE,
831: p_validation_mode => p_validation_mode,
832: p_attribute_id => P_ENTYATTMAP_Rec.SOURCE_ATTR_ID,
833: p_OPERATOR => P_ENTYATTMAP_Rec.OPERATOR,
834: x_return_status => x_return_status,
833: p_OPERATOR => P_ENTYATTMAP_Rec.OPERATOR,
834: x_return_status => x_return_status,
835: x_msg_count => x_msg_count,
836: x_msg_data => x_msg_data);
837: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
838: raise FND_API.G_EXC_ERROR;
839: END IF;
840:
841: END IF;
834: x_return_status => x_return_status,
835: x_msg_count => x_msg_count,
836: x_msg_data => x_msg_data);
837: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
838: raise FND_API.G_EXC_ERROR;
839: END IF;
840:
841: END IF;
842:
846:
847: if (p_validation_mode = AS_UTILITY_PVT.G_CREATE) then
848:
849: if (P_ENTYATTMAP_Rec.SOURCE_ATTR_ID IS NULL or
850: P_ENTYATTMAP_Rec.SOURCE_ATTR_ID = FND_API.G_MISS_NUM or
851: P_ENTYATTMAP_Rec.OPERATOR IS NULL or
852: P_ENTYATTMAP_Rec.OPERATOR = FND_API.G_MISS_CHAR or
853: P_ENTYATTMAP_Rec.TARGET_ATTR_ID IS NULL or
854: P_ENTYATTMAP_Rec.TARGET_ATTR_ID = FND_API.G_MISS_NUM) then
848:
849: if (P_ENTYATTMAP_Rec.SOURCE_ATTR_ID IS NULL or
850: P_ENTYATTMAP_Rec.SOURCE_ATTR_ID = FND_API.G_MISS_NUM or
851: P_ENTYATTMAP_Rec.OPERATOR IS NULL or
852: P_ENTYATTMAP_Rec.OPERATOR = FND_API.G_MISS_CHAR or
853: P_ENTYATTMAP_Rec.TARGET_ATTR_ID IS NULL or
854: P_ENTYATTMAP_Rec.TARGET_ATTR_ID = FND_API.G_MISS_NUM) then
855:
856: FND_MESSAGE.Set_Name('PV', 'PV_INVALID_ENTITY_MAPPING');
850: P_ENTYATTMAP_Rec.SOURCE_ATTR_ID = FND_API.G_MISS_NUM or
851: P_ENTYATTMAP_Rec.OPERATOR IS NULL or
852: P_ENTYATTMAP_Rec.OPERATOR = FND_API.G_MISS_CHAR or
853: P_ENTYATTMAP_Rec.TARGET_ATTR_ID IS NULL or
854: P_ENTYATTMAP_Rec.TARGET_ATTR_ID = FND_API.G_MISS_NUM) then
855:
856: FND_MESSAGE.Set_Name('PV', 'PV_INVALID_ENTITY_MAPPING');
857: FND_MSG_PUB.Add;
858: x_return_status := FND_API.G_RET_STS_ERROR;
854: P_ENTYATTMAP_Rec.TARGET_ATTR_ID = FND_API.G_MISS_NUM) then
855:
856: FND_MESSAGE.Set_Name('PV', 'PV_INVALID_ENTITY_MAPPING');
857: FND_MSG_PUB.Add;
858: x_return_status := FND_API.G_RET_STS_ERROR;
859:
860: END IF;
861: END IF;
862: