21: BEGIN
22: -- Initialize message list IF p_init_msg_list is set to TRUE.
23: IF FND_API.to_Boolean( p_init_msg_list )
24: THEN
25: FND_MSG_PUB.initialize;
26: END IF;
27: l_status_rule_rec := p_status_rule_rec;
28: IEX_UTILITIES.VALIDATE_ANY_ID(P_COL_ID => l_status_rule_rec.status_rule_id,
29: P_COL_NAME => 'STATUS_RULE_ID',
67: BEGIN
68: -- Initialize message list IF p_init_msg_list is set to TRUE.
69: IF FND_API.to_Boolean( p_init_msg_list )
70: THEN
71: FND_MSG_PUB.initialize;
72: END IF;
73:
74: -- Initialize API return status to SUCCESS
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
78: THEN
79: FND_MESSAGE.Set_Name('IEX', 'IEX_API_ALL_MISSING_PARAM');
80: FND_MESSAGE.Set_Token('API_NAME', 'Validate_Status_Rule_Name', FALSE);
81: FND_MESSAGE.Set_Token('MISSING_PARAM', 'STATUS_RULE_NAME', FALSE);
82: FND_MSG_PUB.Add;
83: x_return_status := FND_API.G_RET_STS_ERROR;
84:
85: ELSE -- IF P_STATUS_RULE_Name is NULL
86:
88: FETCH C_Get_Status_Rule_Name INTO l_status_rule_Name;
89:
90: IF (C_Get_Status_Rule_Name%FOUND)
91: THEN
92: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)
93: THEN
94: FND_MESSAGE.Set_Name('IEX', 'IEX_API_DUPLICATE_NAME');
95: FND_MESSAGE.Set_Token('COLUMN', 'STATUS_RULE_NAME', FALSE);
96: FND_MESSAGE.Set_Token('VALUE', p_status_rule_Name, FALSE);
93: THEN
94: FND_MESSAGE.Set_Name('IEX', 'IEX_API_DUPLICATE_NAME');
95: FND_MESSAGE.Set_Token('COLUMN', 'STATUS_RULE_NAME', FALSE);
96: FND_MESSAGE.Set_Token('VALUE', p_status_rule_Name, FALSE);
97: FND_MSG_PUB.Add;
98: END IF;
99: x_return_status := FND_API.G_RET_STS_ERROR;
100: x_dup_status := IEX_DUPLICATE_NAME;
101: END IF;
103: END IF;
104:
105: -- Standard call to get message count and IF count is 1, get message info.
106:
107: FND_MSG_PUB.Count_And_Get
108: ( p_count => x_msg_count,
109: p_data => x_msg_data );
110:
111: END Validate_Status_Rule_Name;
129: BEGIN
130: -- Initialize message list IF p_init_msg_list is set to TRUE.
131: IF FND_API.to_Boolean( p_init_msg_list )
132: THEN
133: FND_MSG_PUB.initialize;
134: END IF;
135:
136: -- Initialize API return status to SUCCESS
137: x_return_status := FND_API.G_RET_STS_SUCCESS;
140: THEN
141: FND_MESSAGE.Set_Name('IEX', 'IEX_API_ALL_MISSING_PARAM');
142: FND_MESSAGE.Set_Token('API_NAME', 'Validate_STATUS_RULE_ID_Name', FALSE);
143: FND_MESSAGE.Set_Token('MISSING_PARAM', 'STATUS_RULE_NAME', FALSE);
144: FND_MSG_PUB.Add;
145: x_return_status := FND_API.G_RET_STS_ERROR;
146:
147: ELSE -- IF P_STATUS_RULE_Name is NULL or P_STATUS_RULE_Name = FND_API.G_FALSE
148:
150: FETCH C_Get_Status_Rule_ID_Name INTO l_status_rule_Name;
151:
152: IF (C_Get_Status_Rule_ID_Name%FOUND)
153: THEN
154: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)
155: THEN
156: FND_MESSAGE.Set_Name('IEX', 'IEX_API_DUPLICATE_NAME');
157: FND_MESSAGE.Set_Token('COLUMN', 'STATUS_RULE_NAME', FALSE);
158: FND_MESSAGE.Set_Token('VALUE', p_status_rule_Name, FALSE);
155: THEN
156: FND_MESSAGE.Set_Name('IEX', 'IEX_API_DUPLICATE_NAME');
157: FND_MESSAGE.Set_Token('COLUMN', 'STATUS_RULE_NAME', FALSE);
158: FND_MESSAGE.Set_Token('VALUE', p_status_rule_Name, FALSE);
159: FND_MSG_PUB.Add;
160: END IF;
161: x_return_status := FND_API.G_RET_STS_ERROR;
162: x_dup_status := IEX_DUPLICATE_NAME;
163: END IF;
165: END IF;
166:
167: -- Standard call to get message count and IF count is 1, get message info.
168:
169: FND_MSG_PUB.Count_And_Get
170: ( p_count => x_msg_count,
171: p_data => x_msg_data );
172:
173: END Validate_Status_Rule_ID_Name;
213:
214: -- Initialize message list IF p_init_msg_list is set to TRUE.
215: IF FND_API.to_Boolean( p_init_msg_list )
216: THEN
217: FND_MSG_PUB.initialize;
218: END IF;
219:
220:
221: -- Initialize API return status to SUCCESS
241: -- Validate Environment
242: -- ******************************************************************
243: IF FND_GLOBAL.User_Id IS NULL
244: THEN
245: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
246: THEN
247: AS_UTILITY_PVT.Set_Message(
248: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
249: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
244: THEN
245: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
246: THEN
247: AS_UTILITY_PVT.Set_Message(
248: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
249: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
250: p_token1 => 'PROFILE',
251: p_token1_value => 'USER_ID');
252:
298: END IF;
299:
300:
301: -- Standard call to get message count and IF count is 1, get message info.
302: FND_MSG_PUB.Count_And_Get
303: ( p_count => x_msg_count,
304: p_data => x_msg_data
305: );
306:
307: EXCEPTION
308: WHEN FND_API.G_EXC_ERROR THEN
309: ROLLBACK TO CREATE_STATUS_RULE_PVT;
310: x_return_status := FND_API.G_RET_STS_ERROR;
311: FND_MSG_PUB.Count_And_Get
312: ( p_count => x_msg_count,
313: p_data => x_msg_data
314: );
315:
315:
316: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
317: ROLLBACK TO CREATE_STATUS_RULE_PVT;
318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
319: FND_MSG_PUB.Count_And_Get
320: ( p_count => x_msg_count,
321: p_data => x_msg_data
322: );
323:
323:
324: WHEN OTHERS THEN
325: ROLLBACK TO CREATE_STATUS_RULE_PVT;
326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
327: FND_MSG_PUB.Count_And_Get
328: ( p_count => x_msg_count,
329: p_data => x_msg_data
330: );
331:
390:
391: -- Initialize message list IF p_init_msg_list is set to TRUE.
392: IF FND_API.to_Boolean( p_init_msg_list )
393: THEN
394: FND_MSG_PUB.initialize;
395: END IF;
396:
397:
398: -- Initialize API return status to SUCCESS
419: l_status_rule_ref_rec.LAST_UPDATE_LOGIN,
420: l_status_rule_ref_rec.OBJECT_VERSION_NUMBER;
421:
422: IF ( C_Get_STATUS_RULE_REC%NOTFOUND) THEN
423: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
424: THEN
425: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
426: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rules', FALSE);
427: FND_MSG_PUB.Add;
423: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
424: THEN
425: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
426: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rules', FALSE);
427: FND_MSG_PUB.Add;
428: END IF;
429: RAISE FND_API.G_EXC_ERROR;
430: END IF;
431:
434:
435:
436: IF (l_status_rule_rec.last_update_date is NULL)
437: THEN
438: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
439: THEN
440: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
441: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
442: FND_MSG_PUB.ADD;
438: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
439: THEN
440: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
441: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
442: FND_MSG_PUB.ADD;
443: END IF;
444: RAISE FND_API.G_EXC_ERROR;
445: End IF;
446:
499: COMMIT WORK;
500: END IF;
501:
502: -- Standard call to get message count and IF count is 1, get message info.
503: FND_MSG_PUB.Count_And_Get
504: ( p_count => x_msg_count,
505: p_data => x_msg_data );
506:
507: EXCEPTION
507: EXCEPTION
508: WHEN FND_API.G_EXC_ERROR THEN
509: ROLLBACK TO UPDATE_STATUS_RULE_PVT;
510: x_return_status := FND_API.G_RET_STS_ERROR;
511: FND_MSG_PUB.Count_And_Get
512: ( p_count => x_msg_count,
513: p_data => x_msg_data
514: );
515:
515:
516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
517: ROLLBACK TO UPDATE_STATUS_RULE_PVT;
518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
519: FND_MSG_PUB.Count_And_Get
520: ( p_count => x_msg_count,
521: p_data => x_msg_data
522: );
523:
523:
524: WHEN OTHERS THEN
525: ROLLBACK TO UPDATE_STATUS_RULE_PVT;
526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
527: FND_MSG_PUB.Count_And_Get
528: ( p_count => x_msg_count,
529: p_data => x_msg_data
530: );
531:
576:
577: -- Initialize message list IF p_init_msg_list is set to TRUE.
578: IF FND_API.to_Boolean( p_init_msg_list )
579: THEN
580: FND_MSG_PUB.initialize;
581: END IF;
582:
583:
584: -- Initialize API return status to SUCCESS
592: Fetch C_Get_STATUS_RULE into
593: l_rowid;
594:
595: IF ( C_Get_Status_Rule%NOTFOUND) THEN
596: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
597: THEN
598: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
599: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rules', FALSE);
600: FND_MSG_PUB.Add;
596: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
597: THEN
598: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
599: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rules', FALSE);
600: FND_MSG_PUB.Add;
601: END IF;
602: RAISE FND_API.G_EXC_ERROR;
603: END IF;
604:
624: COMMIT WORK;
625: END IF;
626:
627:
628: FND_MSG_PUB.Count_And_Get
629: ( p_count => x_msg_count,
630: p_data => x_msg_data );
631:
632: EXCEPTION
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: ROLLBACK TO DELETE_STATUS_RULE_PVT;
635: x_return_status := FND_API.G_RET_STS_ERROR;
636: FND_MSG_PUB.Count_And_Get
637: ( p_count => x_msg_count,
638: p_data => x_msg_data
639: );
640:
640:
641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
642: ROLLBACK TO DELETE_STATUS_RULE_PVT;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: FND_MSG_PUB.Count_And_Get
645: ( p_count => x_msg_count,
646: p_data => x_msg_data
647: );
648:
648:
649: WHEN OTHERS THEN
650: ROLLBACK TO DELETE_STATUS_RULE_PVT;
651: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
652: FND_MSG_PUB.Count_And_Get
653: ( p_count => x_msg_count,
654: p_data => x_msg_data
655: );
656:
695:
696: -- Initialize message list IF p_init_msg_list is set to TRUE.
697: IF FND_API.to_Boolean( p_init_msg_list )
698: THEN
699: FND_MSG_PUB.initialize;
700: END IF;
701:
702:
703: -- Initialize API return status to SUCCESS
751: END IF;
752:
753:
754: -- Standard call to get message count and IF count is 1, get message info.
755: FND_MSG_PUB.Count_And_Get
756: ( p_count => x_msg_count,
757: p_data => x_msg_data
758: );
759:
760: EXCEPTION
761: WHEN FND_API.G_EXC_ERROR THEN
762: ROLLBACK To CREATE_status_rule_line_PVT;
763: x_return_status := FND_API.G_RET_STS_ERROR;
764: FND_MSG_PUB.Count_And_Get
765: ( p_count => x_msg_count,
766: p_data => x_msg_data );
767:
768: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
767:
768: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
769: ROLLBACK To CREATE_status_rule_line_PVT;
770: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
771: FND_MSG_PUB.Count_And_Get
772: ( p_count => x_msg_count,
773: p_data => x_msg_data );
774:
775: WHEN OTHERS THEN
774:
775: WHEN OTHERS THEN
776: ROLLBACK To CREATE_status_rule_line_PVT;
777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
778: FND_MSG_PUB.Count_And_Get
779: ( p_count => x_msg_count,
780: p_data => x_msg_data );
781:
782: END Create_status_rule_line;
835:
836: -- Initialize message list IF p_init_msg_list is set to TRUE.
837: IF FND_API.to_Boolean( p_init_msg_list )
838: THEN
839: FND_MSG_PUB.initialize;
840: END IF;
841:
842:
843: -- Initialize API return status to SUCCESS
863: l_status_rule_line_ref_rec.LAST_UPDATE_LOGIN,
864: l_status_rule_line_ref_Rec.OBJECT_VERSION_NUMBER;
865:
866: IF ( C_Get_status_rule_line_REC%NOTFOUND) THEN
867: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
868: THEN
869: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
870: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rule_lines', FALSE);
871: FND_MSG_PUB.Add;
867: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
868: THEN
869: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
870: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rule_lines', FALSE);
871: FND_MSG_PUB.Add;
872: END IF;
873: RAISE FND_API.G_EXC_ERROR;
874: END IF;
875:
878:
879:
880: IF (l_status_rule_line_rec.last_update_date is NULL)
881: THEN
882: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
883: THEN
884: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
885: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
886: FND_MSG_PUB.ADD;
882: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
883: THEN
884: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
885: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
886: FND_MSG_PUB.ADD;
887: END IF;
888: RAISE FND_API.G_EXC_ERROR;
889: End IF;
890:
937: END IF;
938:
939:
940: -- Standard call to get message count and IF count is 1, get message info.
941: FND_MSG_PUB.Count_And_Get
942: ( p_count => x_msg_count,
943: p_data => x_msg_data );
944:
945: EXCEPTION
945: EXCEPTION
946: WHEN FND_API.G_EXC_ERROR THEN
947: ROLLBACK To UPDATE_status_rule_line_PVT;
948: x_return_status := FND_API.G_RET_STS_ERROR;
949: FND_MSG_PUB.Count_And_Get
950: ( p_count => x_msg_count,
951: p_data => x_msg_data );
952:
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
952:
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: ROLLBACK To UPDATE_status_rule_line_PVT;
955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
956: FND_MSG_PUB.Count_And_Get
957: ( p_count => x_msg_count,
958: p_data => x_msg_data );
959:
960: WHEN OTHERS THEN
959:
960: WHEN OTHERS THEN
961: ROLLBACK To UPDATE_status_rule_line_PVT;
962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
963: FND_MSG_PUB.Count_And_Get
964: ( p_count => x_msg_count,
965: p_data => x_msg_data );
966: END Update_status_rule_line;
967:
1005:
1006: -- Initialize message list IF p_init_msg_list is set to TRUE.
1007: IF FND_API.to_Boolean( p_init_msg_list )
1008: THEN
1009: FND_MSG_PUB.initialize;
1010: END IF;
1011:
1012:
1013: -- Initialize API return status to SUCCESS
1020: Fetch C_Get_status_rule_line into
1021: l_rowid;
1022:
1023: IF ( C_Get_status_rule_line%NOTFOUND) THEN
1024: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1025: THEN
1026: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
1027: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rule_lines', FALSE);
1028: FND_MSG_PUB.Add;
1024: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1025: THEN
1026: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
1027: FND_MESSAGE.Set_Token ('INFO', 'iex_status_rule_lines', FALSE);
1028: FND_MSG_PUB.Add;
1029: END IF;
1030: RAISE FND_API.G_EXC_ERROR;
1031: END IF;
1032:
1052: COMMIT WORK;
1053: END IF;
1054:
1055:
1056: FND_MSG_PUB.Count_And_Get
1057: ( p_count => x_msg_count,
1058: p_data => x_msg_data );
1059:
1060: EXCEPTION
1060: EXCEPTION
1061: WHEN FND_API.G_EXC_ERROR THEN
1062: ROLLBACK To DELETE_status_rule_line_PVT;
1063: x_return_status := FND_API.G_RET_STS_ERROR;
1064: FND_MSG_PUB.Count_And_Get
1065: ( p_count => x_msg_count,
1066: p_data => x_msg_data );
1067:
1068: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1067:
1068: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1069: ROLLBACK To DELETE_status_rule_line_PVT;
1070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1071: FND_MSG_PUB.Count_And_Get
1072: ( p_count => x_msg_count,
1073: p_data => x_msg_data );
1074:
1075: WHEN OTHERS THEN
1074:
1075: WHEN OTHERS THEN
1076: ROLLBACK To DELETE_status_rule_line_PVT;
1077: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1078: FND_MSG_PUB.Count_And_Get
1079: ( p_count => x_msg_count,
1080: p_data => x_msg_data );
1081: END Delete_status_rule_line;
1082: BEGIN