APPS.JTF_TERRITORY_PVT dependencies on FND_MSG_PUB

Line 228: FND_MSG_PUB.initialize;

224: END IF;
225:
226: -- Initialize message list if p_init_msg_list is set to TRUE.
227: IF FND_API.to_Boolean( p_init_msg_list ) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: -- Debug Message
232: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 232: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: -- Debug Message
232: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
233: THEN
234: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
235: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
236: FND_MSG_PUB.Add;

Line 236: FND_MSG_PUB.Add;

232: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
233: THEN
234: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
235: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
236: FND_MSG_PUB.Add;
237: END IF;
238:
239: -- Initialize API return status to success
240: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 244: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

240: x_return_status := FND_API.G_RET_STS_SUCCESS;
241: --
242: --Check whether the Usage records are specified
243: If (p_Terr_Usgs_Tbl.COUNT = 0 ) Then
244: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
245: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
246: FND_MSG_PUB.ADD;
247: END IF;
248: x_return_status := FND_API.G_RET_STS_ERROR;

Line 246: FND_MSG_PUB.ADD;

242: --Check whether the Usage records are specified
243: If (p_Terr_Usgs_Tbl.COUNT = 0 ) Then
244: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
245: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
246: FND_MSG_PUB.ADD;
247: END IF;
248: x_return_status := FND_API.G_RET_STS_ERROR;
249: raise FND_API.G_EXC_ERROR;
250: END IF;

Line 258: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

254: /*
255: -- Check whether the Terr Transaction Types are specified.
256: If (p_Terr_QualTypeUsgs_Tbl.COUNT = 0 and
257: p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG <> 'Y') Then
258: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
259: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL_USG');
260: FND_MSG_PUB.ADD;
261: END IF;
262: x_return_status := FND_API.G_RET_STS_ERROR;

Line 260: FND_MSG_PUB.ADD;

256: If (p_Terr_QualTypeUsgs_Tbl.COUNT = 0 and
257: p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG <> 'Y') Then
258: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
259: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL_USG');
260: FND_MSG_PUB.ADD;
261: END IF;
262: x_return_status := FND_API.G_RET_STS_ERROR;
263: raise FND_API.G_EXC_ERROR;
264: END IF;

Line 307: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

303: --dbms_output.put_line('Value of x_return_status='|| x_return_status);
304:
305: --Check whether the Qualifer records are specified
306: --If (p_Terr_Qual_Tbl.count = 0 ) Then
307: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
308: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL');
309: -- FND_MSG_PUB.ADD;
310: -- END IF;
311: -- x_return_status := FND_API.G_RET_STS_ERROR;

Line 309: -- FND_MSG_PUB.ADD;

305: --Check whether the Qualifer records are specified
306: --If (p_Terr_Qual_Tbl.count = 0 ) Then
307: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
308: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL');
309: -- FND_MSG_PUB.ADD;
310: -- END IF;
311: -- x_return_status := FND_API.G_RET_STS_ERROR;
312: -- raise FND_API.G_EXC_ERROR;
313: --END IF;

Line 376: FND_MSG_PUB.ADD;

372: IF l_index = 0 THEN
373: JTF_TERR_QUAL_PKG.Delete_Row(x_terr_qual_id => l_Terr_Qual_Id );
374: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_MISSING_TERR_VALUES');
375: FND_MESSAGE.Set_Token('QUAL_USG_ID', to_char(l_Terr_Qual_Tbl(1).QUAL_USG_ID));
376: FND_MSG_PUB.ADD;
377: End If;
378: END;
379:
380: IF (l_terr_values_tbl.COUNT > 0) THEN

Line 432: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

428: --If the program reached here, that mena evry thing went smooth
429: x_return_status := FND_API.G_RET_STS_SUCCESS;
430:
431: -- Debug Message
432: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
433: THEN
434: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
435: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
436: FND_MSG_PUB.Add;

Line 436: FND_MSG_PUB.Add;

432: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
433: THEN
434: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
435: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
436: FND_MSG_PUB.Add;
437: END IF;
438:
439:
440: FND_MSG_PUB.Count_And_Get

Line 440: FND_MSG_PUB.Count_And_Get

436: FND_MSG_PUB.Add;
437: END IF;
438:
439:
440: FND_MSG_PUB.Count_And_Get
441: ( p_count => x_msg_count,
442: p_data => x_msg_data
443: );
444:

Line 457: FND_MSG_PUB.Count_And_Get

453: WHEN FND_API.G_EXC_ERROR THEN
454: --dbms_output('Create_Territory PVT: FND_API.G_EXC_ERROR');
455: ROLLBACK TO CREATE_TERRITORY_PVT;
456: x_return_status := FND_API.G_RET_STS_ERROR ;
457: FND_MSG_PUB.Count_And_Get
458: ( p_count => x_msg_count,
459: p_data => x_msg_data
460: );
461:

Line 466: FND_MSG_PUB.Count_And_Get

462: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
463: --dbms_output('Create_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
464: ROLLBACK TO CREATE_TERRITORY_PVT;
465: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
466: FND_MSG_PUB.Count_And_Get
467: ( p_count => x_msg_count,
468: p_data => x_msg_data
469: );
470:

Line 475: FND_MSG_PUB.Count_And_Get

471: WHEN OTHERS THEN
472: --dbms_output('Create_Territory PVT: OTHERS - ' || SQLERRM);
473: ROLLBACK TO CREATE_TERRITORY_PVT;
474: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475: FND_MSG_PUB.Count_And_Get
476: ( p_count => x_msg_count,
477: p_data => x_msg_data
478: );
479: --

Line 572: FND_MSG_PUB.initialize;

568: END IF;
569:
570: -- Initialize message list if p_init_msg_list is set to TRUE.
571: IF FND_API.to_Boolean( p_init_msg_list ) THEN
572: FND_MSG_PUB.initialize;
573: END IF;
574:
575: -- Debug Message
576: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 576: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

572: FND_MSG_PUB.initialize;
573: END IF;
574:
575: -- Debug Message
576: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
577: THEN
578: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
579: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
580: FND_MSG_PUB.Add;

Line 580: FND_MSG_PUB.Add;

576: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
577: THEN
578: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
579: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
580: FND_MSG_PUB.Add;
581: END IF;
582:
583: -- Initialize API return status to success
584: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 628: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

624: --
625: END LOOP;
626:
627: -- Debug Message
628: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
629: THEN
630: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
631: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
632: FND_MSG_PUB.Add;

Line 632: FND_MSG_PUB.Add;

628: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
629: THEN
630: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
631: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
632: FND_MSG_PUB.Add;
633: END IF;
634:
635:
636: FND_MSG_PUB.Count_And_Get

Line 636: FND_MSG_PUB.Count_And_Get

632: FND_MSG_PUB.Add;
633: END IF;
634:
635:
636: FND_MSG_PUB.Count_And_Get
637: ( p_count => x_msg_count,
638: p_data => x_msg_data
639: );
640:

Line 656: FND_MSG_PUB.Count_And_Get

652: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_ERROR');
653: --
654: ROLLBACK TO DELETE_TERRITORY_PVT;
655: x_return_status := FND_API.G_RET_STS_ERROR ;
656: FND_MSG_PUB.Count_And_Get
657: ( p_count => x_msg_count,
658: p_data => x_msg_data
659: );
660:

Line 665: FND_MSG_PUB.Count_And_Get

661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
662: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
663: ROLLBACK TO DELETE_TERRITORY_PVT;
664: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
665: FND_MSG_PUB.Count_And_Get
666: ( p_count => x_msg_count,
667: p_data => x_msg_data
668: );
669:

Line 674: FND_MSG_PUB.Count_And_Get

670: WHEN OTHERS THEN
671: --dbms_output('Delete_Territory PVT: OTHERS - ' || SQLERRM);
672: ROLLBACK TO DELETE_TERRITORY_PVT;
673: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
674: FND_MSG_PUB.Count_And_Get
675: ( p_count => x_msg_count,
676: p_data => x_msg_data
677: );
678: --

Line 765: FND_MSG_PUB.initialize;

761: END IF;
762:
763: -- Initialize message list if p_init_msg_list is set to TRUE.
764: IF FND_API.to_Boolean( p_init_msg_list ) THEN
765: FND_MSG_PUB.initialize;
766: END IF;
767:
768: -- Debug Message
769: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 769: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

765: FND_MSG_PUB.initialize;
766: END IF;
767:
768: -- Debug Message
769: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
770: THEN
771: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
772: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
773: FND_MSG_PUB.Add;

Line 773: FND_MSG_PUB.Add;

769: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
770: THEN
771: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
772: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
773: FND_MSG_PUB.Add;
774: END IF;
775:
776: -- Initialize API return status to success
777: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 786: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

782: -- Parent Terr ID can't be null.
783: If (p_Terr_All_Rec.TERR_ID is null) OR
784: (p_Terr_All_Rec.TERR_ID = FND_API.G_MISS_NUM)
785: Then
786: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
787: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
788: FND_MESSAGE.Set_Token('COL_NAME', 'TERR_ID' );
789: FND_MSG_PUB.ADD;
790: END IF;

Line 789: FND_MSG_PUB.ADD;

785: Then
786: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
787: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
788: FND_MESSAGE.Set_Token('COL_NAME', 'TERR_ID' );
789: FND_MSG_PUB.ADD;
790: END IF;
791: x_Return_Status := FND_API.G_RET_STS_ERROR ;
792: RAISE FND_API.G_EXC_ERROR;
793: END IF;

Line 894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

890: End If;
891: --
892: */
893: -- Debug Message
894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
895: THEN
896: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
897: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
898: FND_MSG_PUB.Add;

Line 898: FND_MSG_PUB.Add;

894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
895: THEN
896: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
897: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
898: FND_MSG_PUB.Add;
899: END IF;
900:
901:
902: FND_MSG_PUB.Count_And_Get

Line 902: FND_MSG_PUB.Count_And_Get

898: FND_MSG_PUB.Add;
899: END IF;
900:
901:
902: FND_MSG_PUB.Count_And_Get
903: ( p_count => x_msg_count,
904: p_data => x_msg_data
905: );
906:

Line 922: FND_MSG_PUB.Count_And_Get

918: WHEN FND_API.G_EXC_ERROR THEN
919: --dbms_output('Update_Territory PVT: FND_API.G_EXC_ERROR');
920: ROLLBACK TO UPDATE_TERRITORY_PVT;
921: x_return_status := FND_API.G_RET_STS_ERROR ;
922: FND_MSG_PUB.Count_And_Get
923: ( p_count => x_msg_count,
924: p_data => x_msg_data
925: );
926:

Line 931: FND_MSG_PUB.Count_And_Get

927: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
928: --dbms_output('Update_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
929: ROLLBACK TO UPDATE_TERRITORY_PVT;
930: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
931: FND_MSG_PUB.Count_And_Get
932: ( p_count => x_msg_count,
933: p_data => x_msg_data
934: );
935:

Line 940: FND_MSG_PUB.Count_And_Get

936: WHEN OTHERS THEN
937: --dbms_output('Update_Territory PVT: OTHERS - ' || SQLERRM);
938: ROLLBACK TO UPDATE_TERRITORY_PVT;
939: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940: FND_MSG_PUB.Count_And_Get
941: ( p_count => x_msg_count,
942: p_data => x_msg_data
943: );
944: --

Line 1070: FND_MSG_PUB.initialize;

1066: END IF;
1067:
1068: -- Initialize message list if p_init_msg_list is set to TRUE.
1069: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1070: FND_MSG_PUB.initialize;
1071: END IF;
1072:
1073: -- Debug Message
1074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1070: FND_MSG_PUB.initialize;
1071: END IF;
1072:
1073: -- Debug Message
1074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1075: THEN
1076: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1077: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1078: FND_MSG_PUB.Add;

Line 1078: FND_MSG_PUB.Add;

1074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1075: THEN
1076: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1077: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1078: FND_MSG_PUB.Add;
1079: END IF;
1080:
1081: -- Initialize API return status to success
1082: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1141: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

1137: l_ref_terr_all_rec.NUM_WINNERS,
1138: l_ref_terr_all_rec.NUM_QUAL;
1139:
1140: If ( C_GetTerritory%NOTFOUND) Then
1141: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1142: THEN
1143: FND_MESSAGE.Set_Name('JTF', 'API_MISSING_UPDATE_TARGET');
1144: FND_MESSAGE.Set_Token('INFO', 'TERRITORY', FALSE);
1145: FND_MSG_PUB.Add;

Line 1145: FND_MSG_PUB.Add;

1141: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1142: THEN
1143: FND_MESSAGE.Set_Name('JTF', 'API_MISSING_UPDATE_TARGET');
1144: FND_MESSAGE.Set_Token('INFO', 'TERRITORY', FALSE);
1145: FND_MSG_PUB.Add;
1146: END IF;
1147: raise FND_API.G_EXC_ERROR;
1148: End if;
1149: CLOSE C_GetTerritory;

Line 1203: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1199:
1200: X_return_status := FND_API.G_RET_STS_SUCCESS;
1201:
1202: -- Debug Message
1203: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1204: THEN
1205: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1206: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1207: FND_MSG_PUB.Add;

Line 1207: FND_MSG_PUB.Add;

1203: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1204: THEN
1205: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1206: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1207: FND_MSG_PUB.Add;
1208: END IF;
1209:
1210:
1211: FND_MSG_PUB.Count_And_Get

Line 1211: FND_MSG_PUB.Count_And_Get

1207: FND_MSG_PUB.Add;
1208: END IF;
1209:
1210:
1211: FND_MSG_PUB.Count_And_Get
1212: ( p_count => x_msg_count,
1213: p_data => x_msg_data
1214: );
1215:

Line 1228: FND_MSG_PUB.Count_And_Get

1224: WHEN FND_API.G_EXC_ERROR THEN
1225: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_ERROR');
1226: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1227: x_return_status := FND_API.G_RET_STS_ERROR ;
1228: FND_MSG_PUB.Count_And_Get
1229: ( p_count => x_msg_count,
1230: p_data => x_msg_data
1231: );
1232:

Line 1237: FND_MSG_PUB.Count_And_Get

1233: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1234: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1235: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1236: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1237: FND_MSG_PUB.Count_And_Get
1238: ( p_count => x_msg_count,
1239: p_data => x_msg_data
1240: );
1241:

Line 1246: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

1242: WHEN OTHERS THEN
1243: --dbms_output('Deactivate_Territory PVT: OTHERS - ' || SQLERRM);
1244: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1245: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1246: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1247: THEN
1248: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,
1249: 'Others exception inside Deactivate_Territory'
1250: || sqlerrm);

Line 1248: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,

1244: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1245: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1246: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1247: THEN
1248: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,
1249: 'Others exception inside Deactivate_Territory'
1250: || sqlerrm);
1251: END IF;
1252: END Deactivate_Territory;

Line 1335: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1331: BEGIN
1332: --dbms_output('Create_Territory_Header PVT: Entering API');
1333:
1334: -- Debug Message
1335: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1336: THEN
1337: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1338: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1339: FND_MSG_PUB.Add;

Line 1339: FND_MSG_PUB.Add;

1335: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1336: THEN
1337: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1338: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1339: FND_MSG_PUB.Add;
1340: END IF;
1341: -- Initialize API return status to success
1342: x_return_status := FND_API.G_RET_STS_SUCCESS;
1343:

Line 1363: FND_MSG_PUB.ADD;

1359: EXCEPTION
1360: WHEN NO_DATA_FOUND THEN
1361: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
1362: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_terr_all_rec.PARENT_TERRITORY_ID));
1363: FND_MSG_PUB.ADD;
1364: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1365: END;
1366: -- Check if the Terr Type is valid for the given source.
1367: BEGIN

Line 1382: FND_MSG_PUB.ADD;

1378:
1379: EXCEPTION
1380: WHEN NO_DATA_FOUND THEN
1381: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_INVALID_TERR_TYPE');
1382: FND_MSG_PUB.ADD;
1383: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1384: END;
1385:
1386:

Line 1509: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1505: RAISE FND_API.G_EXC_ERROR;
1506: END IF;
1507: --
1508: -- Debug Message
1509: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1510: THEN
1511: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
1512: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1513: FND_MSG_PUB.Add;

Line 1513: FND_MSG_PUB.Add;

1509: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1510: THEN
1511: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
1512: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1513: FND_MSG_PUB.Add;
1514: END IF;
1515:
1516: --dbms_output('Create_Territory_Header PVT: Exiting API');
1517: EXCEPTION

Line 1521: FND_MSG_PUB.Count_And_Get

1517: EXCEPTION
1518: WHEN FND_API.G_EXC_ERROR THEN
1519: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_ERROR');
1520: x_return_status := FND_API.G_RET_STS_ERROR ;
1521: FND_MSG_PUB.Count_And_Get
1522: ( P_count => x_msg_count,
1523: P_data => x_msg_data
1524: );
1525:

Line 1529: FND_MSG_PUB.Count_And_Get

1525:
1526: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1527: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1528: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1529: FND_MSG_PUB.Count_And_Get
1530: ( p_count => x_msg_count,
1531: p_data => x_msg_data
1532: );
1533:

Line 1537: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

1533:
1534: WHEN OTHERS THEN
1535: --dbms_output('Create_Territory_Header PVT: OTHERS - ' || SQLERRM);
1536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1537: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1538: THEN
1539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,
1540: 'Others exception inside Create_Territory_Header'
1541: || sqlerrm);

Line 1539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,

1535: --dbms_output('Create_Territory_Header PVT: OTHERS - ' || SQLERRM);
1536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1537: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1538: THEN
1539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,
1540: 'Others exception inside Create_Territory_Header'
1541: || sqlerrm);
1542: END IF;
1543: END Create_Territory_Header;

Line 1607: FND_MSG_PUB.initialize;

1603:
1604: -- Initialize message list if p_init_msg_list is set to TRUE.
1605: IF FND_API.to_Boolean( p_init_msg_list )
1606: THEN
1607: FND_MSG_PUB.initialize;
1608: END IF;
1609:
1610: -- Debug Message
1611: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1611: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1607: FND_MSG_PUB.initialize;
1608: END IF;
1609:
1610: -- Debug Message
1611: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1612: THEN
1613: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1614: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1615: FND_MSG_PUB.Add;

Line 1615: FND_MSG_PUB.Add;

1611: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1612: THEN
1613: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1614: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1615: FND_MSG_PUB.Add;
1616: END IF;
1617:
1618: -- Initialize API return status to success
1619: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1624: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1620:
1621: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1622: THEN
1623: -- Debug message
1624: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1625: THEN
1626: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
1627: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Record');
1628: FND_MSG_PUB.Add;

Line 1628: FND_MSG_PUB.Add;

1624: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1625: THEN
1626: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
1627: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Record');
1628: FND_MSG_PUB.Add;
1629: END IF;
1630: --
1631: -- Invoke validation procedures
1632: Validate_Territory_Record(p_init_msg_list => FND_API.G_FALSE,

Line 1711: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1707: X_Terr_Id := l_terr_id;
1708: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
1709:
1710: -- Debug Message
1711: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1712: THEN
1713: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1714: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1715: FND_MSG_PUB.Add;

Line 1715: FND_MSG_PUB.Add;

1711: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1712: THEN
1713: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1714: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1715: FND_MSG_PUB.Add;
1716: END IF;
1717:
1718: -- Standard check for p_commit
1719: IF FND_API.to_Boolean( p_commit )

Line 1726: FND_MSG_PUB.Count_And_Get

1722: END IF;
1723:
1724:
1725: -- Standard call to get message count and if count is 1, get message info.
1726: FND_MSG_PUB.Count_And_Get
1727: ( p_count => x_msg_count,
1728: p_data => x_msg_data
1729: );
1730:

Line 1738: FND_MSG_PUB.Count_And_Get

1734: WHEN FND_API.G_EXC_ERROR THEN
1735: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1736: ROLLBACK TO CREATE_TERR_REC_PVT;
1737: x_return_status := FND_API.G_RET_STS_ERROR ;
1738: FND_MSG_PUB.Count_And_Get
1739: ( p_count => x_msg_count,
1740: p_data => x_msg_data
1741: );
1742:

Line 1747: FND_MSG_PUB.Count_And_Get

1743: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1744: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1745: ROLLBACK TO CREATE_TERR_REC_PVT;
1746: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1747: FND_MSG_PUB.Count_And_Get
1748: ( p_count => x_msg_count,
1749: p_data => x_msg_data
1750: );
1751:

Line 1758: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

1754: --dbms_output('Create_Territory_Record PVT: OTHERS - ' || SQLERRM);
1755: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1756: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1757: ROLLBACK TO CREATE_TERR_REC_PVT;
1758: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1759: THEN
1760: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Record');
1761: END IF;
1762: END Create_Territory_Record;

Line 1760: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Record');

1756: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1757: ROLLBACK TO CREATE_TERR_REC_PVT;
1758: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1759: THEN
1760: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Record');
1761: END IF;
1762: END Create_Territory_Record;
1763: --
1764: --

Line 1830: FND_MSG_PUB.initialize;

1826:
1827: -- Initialize message list if p_init_msg_list is set to TRUE.
1828: IF FND_API.to_Boolean( p_init_msg_list )
1829: THEN
1830: FND_MSG_PUB.initialize;
1831: END IF;
1832:
1833: -- Debug Message
1834: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1834: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1830: FND_MSG_PUB.initialize;
1831: END IF;
1832:
1833: -- Debug Message
1834: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1835: THEN
1836: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1837: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
1838: FND_MSG_PUB.Add;

Line 1838: FND_MSG_PUB.Add;

1834: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1835: THEN
1836: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
1837: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
1838: FND_MSG_PUB.Add;
1839: END IF;
1840:
1841: -- Initialize API return status to success
1842: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1846: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1842: x_return_status := FND_API.G_RET_STS_SUCCESS;
1843:
1844: --
1845: If (p_Terr_Usgs_Tbl.count = 0 ) Then
1846: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1847: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
1848: FND_MSG_PUB.ADD;
1849: END IF;
1850: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1848: FND_MSG_PUB.ADD;

1844: --
1845: If (p_Terr_Usgs_Tbl.count = 0 ) Then
1846: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1847: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
1848: FND_MSG_PUB.ADD;
1849: END IF;
1850: x_return_status := FND_API.G_RET_STS_ERROR;
1851: RAISE FND_API.G_EXC_ERROR;
1852: END IF;

Line 1867: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1863:
1864: IF ( P_validation_level <> FND_API.G_VALID_LEVEL_NONE) THEN
1865:
1866: -- Debug message
1867: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1868: THEN
1869: FND_MESSAGE.Set_Name('JTF', 'Create_Terr_Rec PVT: Valid');
1870: FND_MSG_PUB.Add;
1871: END IF;

Line 1870: FND_MSG_PUB.Add;

1866: -- Debug message
1867: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1868: THEN
1869: FND_MESSAGE.Set_Name('JTF', 'Create_Terr_Rec PVT: Valid');
1870: FND_MSG_PUB.Add;
1871: END IF;
1872: --
1873: -- Invoke validation procedures
1874: Validate_Territory_Usage(p_init_msg_list => FND_API.G_FALSE,

Line 1933: FND_MSG_PUB.Count_And_Get

1929: ROLLBACK TO CREATE_TERR_USG_PVT;
1930: x_return_status := FND_API.G_RET_STS_ERROR ;
1931: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1932: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1933: FND_MSG_PUB.Count_And_Get
1934: ( p_count => x_msg_count,
1935: p_data => x_msg_data
1936: );
1937:

Line 1944: FND_MSG_PUB.Count_And_Get

1940: ROLLBACK TO CREATE_TERR_USG_PVT;
1941: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1942: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1943: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1944: FND_MSG_PUB.Count_And_Get
1945: ( p_count => x_msg_count,
1946: p_data => x_msg_data
1947: );
1948:

Line 1954: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

1950: --dbms_output('Create_Territory_Usages PVT: OTHERS - ' || SQLERRM);
1951: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1953: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1954: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1955: THEN
1956: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Usages');
1957: END IF;
1958: END;

Line 1956: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Usages');

1952: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1953: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1954: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1955: THEN
1956: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Usages');
1957: END IF;
1958: END;
1959: --
1960: END LOOP;

Line 1977: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1973: X_return_status := FND_API.G_RET_STS_ERROR;
1974: END IF;
1975: END LOOP;
1976: --
1977: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1978: THEN
1979: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
1980: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
1981: FND_MSG_PUB.Add;

Line 1981: FND_MSG_PUB.Add;

1977: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1978: THEN
1979: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
1980: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
1981: FND_MSG_PUB.Add;
1982: END IF;
1983: --
1984: -- Standard check for p_commit
1985: IF FND_API.to_Boolean( p_commit )

Line 1991: FND_MSG_PUB.Count_And_Get

1987: COMMIT WORK;
1988: END IF;
1989:
1990: -- Standard call to get message count and if count is 1, get message info.
1991: FND_MSG_PUB.Count_And_Get
1992: ( p_count => x_msg_count,
1993: p_data => x_msg_data
1994: );
1995: --

Line 2063: FND_MSG_PUB.initialize;

2059:
2060: -- Initialize message list if p_init_msg_list is set to TRUE.
2061: IF FND_API.to_Boolean( p_init_msg_list )
2062: THEN
2063: FND_MSG_PUB.initialize;
2064: END IF;
2065:
2066: -- Debug Message
2067: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 2067: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2063: FND_MSG_PUB.initialize;
2064: END IF;
2065:
2066: -- Debug Message
2067: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2068: THEN
2069: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2070: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2071: FND_MSG_PUB.Add;

Line 2071: FND_MSG_PUB.Add;

2067: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2068: THEN
2069: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2070: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2071: FND_MSG_PUB.Add;
2072: END IF;
2073:
2074: -- Initialize API return status to success
2075: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2081: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2077:
2078: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2079:
2080: -- Debug message
2081: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2082: THEN
2083: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
2084: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage');
2085: FND_MSG_PUB.Add;

Line 2085: FND_MSG_PUB.Add;

2081: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2082: THEN
2083: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
2084: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage');
2085: FND_MSG_PUB.Add;
2086: END IF;
2087:
2088: -- Invoke validation procedures
2089: Validate_Terr_Qtype_Usage(p_init_msg_list => FND_API.G_FALSE,

Line 2144: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2140: -- If successful then save the success status for the record
2141: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
2142: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2143:
2144: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2145: THEN
2146: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2147: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2148: FND_MSG_PUB.Add;

Line 2148: FND_MSG_PUB.Add;

2144: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2145: THEN
2146: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2147: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2148: FND_MSG_PUB.Add;
2149: END IF;
2150:
2151: -- Standard check for p_commit
2152: IF FND_API.to_Boolean( p_commit )

Line 2158: FND_MSG_PUB.Count_And_Get

2154: COMMIT WORK;
2155: END IF;
2156:
2157: -- Standard call to get message count and if count is 1, get message info.
2158: FND_MSG_PUB.Count_And_Get
2159: ( p_count => x_msg_count,
2160: p_data => x_msg_data
2161: );
2162:

Line 2172: FND_MSG_PUB.Count_And_Get

2168: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2170: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2171: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2172: FND_MSG_PUB.Count_And_Get
2173: ( p_count => x_msg_count,
2174: p_data => x_msg_data
2175: );
2176:

Line 2183: FND_MSG_PUB.Count_And_Get

2179: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2181: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2182: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2183: FND_MSG_PUB.Count_And_Get
2184: ( p_count => x_msg_count,
2185: p_data => x_msg_data
2186: );
2187:

Line 2194: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

2190: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2192: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2193: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2194: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2195: THEN
2196: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_QualType_Usage(REC)');
2197: END IF;
2198: --

Line 2196: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_QualType_Usage(REC)');

2192: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2193: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2194: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2195: THEN
2196: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_QualType_Usage(REC)');
2197: END IF;
2198: --
2199: End Create_Terr_QualType_Usage;
2200: --

Line 2269: FND_MSG_PUB.initialize;

2265:
2266: -- Initialize message list if p_init_msg_list is set to TRUE.
2267: IF FND_API.to_Boolean( p_init_msg_list )
2268: THEN
2269: FND_MSG_PUB.initialize;
2270: END IF;
2271:
2272: -- Debug Message
2273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 2273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2269: FND_MSG_PUB.initialize;
2270: END IF;
2271:
2272: -- Debug Message
2273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2274: THEN
2275: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2276: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2277: FND_MSG_PUB.Add;

Line 2277: FND_MSG_PUB.Add;

2273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2274: THEN
2275: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2276: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2277: FND_MSG_PUB.Add;
2278: END IF;
2279:
2280: -- Initialize API return status to success
2281: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2334: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2330: X_return_status := FND_API.G_RET_STS_ERROR;
2331: END IF;
2332: END LOOP;
2333:
2334: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2335: THEN
2336: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2337: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2338: FND_MSG_PUB.Add;

Line 2338: FND_MSG_PUB.Add;

2334: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2335: THEN
2336: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2337: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2338: FND_MSG_PUB.Add;
2339: END IF;
2340:
2341: -- Standard check for p_commit
2342: IF FND_API.to_Boolean( p_commit )

Line 2348: FND_MSG_PUB.Count_And_Get

2344: COMMIT WORK;
2345: END IF;
2346:
2347: -- Standard call to get message count and if count is 1, get message info.
2348: FND_MSG_PUB.Count_And_Get
2349: ( p_count => x_msg_count,
2350: p_data => x_msg_data
2351: );
2352:

Line 2448: FND_MSG_PUB.initialize;

2444:
2445: -- Initialize message list if p_init_msg_list is set to TRUE.
2446: IF FND_API.to_Boolean( p_init_msg_list )
2447: THEN
2448: FND_MSG_PUB.initialize;
2449: END IF;
2450:
2451: -- Debug Message
2452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 2452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2448: FND_MSG_PUB.initialize;
2449: END IF;
2450:
2451: -- Debug Message
2452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2453: THEN
2454: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2455: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2456: FND_MSG_PUB.Add;

Line 2456: FND_MSG_PUB.Add;

2452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2453: THEN
2454: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2455: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2456: FND_MSG_PUB.Add;
2457: END IF;
2458:
2459: -- Initialize API return status to success
2460: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2466: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2462: -- Check the validation level
2463: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2464:
2465: -- Debug message
2466: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2467: THEN
2468: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
2469: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifier');
2470: FND_MSG_PUB.Add;

Line 2470: FND_MSG_PUB.Add;

2466: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2467: THEN
2468: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
2469: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifier');
2470: FND_MSG_PUB.Add;
2471: END IF;
2472: -- Check for ORG_ID
2473: IF (P_Terr_Qual_Rec.ORG_ID is NULL OR
2474: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN

Line 2475: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2471: END IF;
2472: -- Check for ORG_ID
2473: IF (P_Terr_Qual_Rec.ORG_ID is NULL OR
2474: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN
2475: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2476: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2477: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
2478: FND_MSG_PUB.ADD;
2479: END IF;

Line 2478: FND_MSG_PUB.ADD;

2474: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN
2475: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2476: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2477: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
2478: FND_MSG_PUB.ADD;
2479: END IF;
2480: x_Return_Status := FND_API.G_RET_STS_ERROR ;
2481: End If;
2482:

Line 2486: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2482:
2483: --Check created by
2484: IF ( P_Terr_Qual_Rec.CREATED_BY is NULL OR
2485: P_Terr_Qual_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
2486: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2487: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2488: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
2489: FND_MSG_PUB.ADD;
2490: END IF;

Line 2489: FND_MSG_PUB.ADD;

2485: P_Terr_Qual_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
2486: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2487: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2488: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
2489: FND_MSG_PUB.ADD;
2490: END IF;
2491: x_Return_Status := FND_API.G_RET_STS_ERROR ;
2492: End If;
2493:

Line 2497: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2493:
2494: --Check creation date
2495: If ( P_Terr_Qual_Rec.CREATION_DATE is NULL OR
2496: P_Terr_Qual_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
2497: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2498: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2499: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
2500: FND_MSG_PUB.ADD;
2501: END IF;

Line 2500: FND_MSG_PUB.ADD;

2496: P_Terr_Qual_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
2497: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2498: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2499: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
2500: FND_MSG_PUB.ADD;
2501: END IF;
2502: x_Return_Status := FND_API.G_RET_STS_ERROR ;
2503: End If;
2504: --

Line 2559: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2555: --update_terr_num_qual(p_terr_id, -1002);
2556: --
2557:
2558: --
2559: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2560: THEN
2561: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2562: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2563: FND_MSG_PUB.Add;

Line 2563: FND_MSG_PUB.Add;

2559: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2560: THEN
2561: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2562: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2563: FND_MSG_PUB.Add;
2564: END IF;
2565:
2566: -- Standard check for p_commit
2567: IF FND_API.to_Boolean( p_commit )

Line 2573: FND_MSG_PUB.Count_And_Get

2569: COMMIT WORK;
2570: END IF;
2571:
2572: -- Standard call to get message count and if count is 1, get message info.
2573: FND_MSG_PUB.Count_And_Get
2574: ( p_count => x_msg_count,
2575: p_data => x_msg_data
2576: );
2577:

Line 2587: FND_MSG_PUB.Count_And_Get

2583: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2584: x_return_status := FND_API.G_RET_STS_ERROR ;
2585: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2586: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2587: FND_MSG_PUB.Count_And_Get
2588: ( p_count => x_msg_count,
2589: p_data => x_msg_data
2590: );
2591:

Line 2598: FND_MSG_PUB.Count_And_Get

2594: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2595: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2596: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2597: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2598: FND_MSG_PUB.Count_And_Get
2599: ( p_count => x_msg_count,
2600: p_data => x_msg_data
2601: );
2602:

Line 2611: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

2607: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2608: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2609: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2610: --
2611: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2612: THEN
2613: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_Qualifier');
2614: END IF;
2615: --

Line 2613: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_Qualifier');

2609: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2610: --
2611: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2612: THEN
2613: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_Qualifier');
2614: END IF;
2615: --
2616: End Create_Terr_Qualifier;
2617: --

Line 2689: FND_MSG_PUB.initialize;

2685:
2686: -- Initialize message list if p_init_msg_list is set to TRUE.
2687: IF FND_API.to_Boolean( p_init_msg_list )
2688: THEN
2689: FND_MSG_PUB.initialize;
2690: END IF;
2691:
2692: -- Debug Message
2693: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 2693: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2689: FND_MSG_PUB.initialize;
2690: END IF;
2691:
2692: -- Debug Message
2693: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2694: THEN
2695: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2696: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2697: FND_MSG_PUB.Add;

Line 2697: FND_MSG_PUB.Add;

2693: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2694: THEN
2695: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2696: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2697: FND_MSG_PUB.Add;
2698: END IF;
2699:
2700: -- Initialize API return status to success
2701: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2754: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2750: X_return_status := FND_API.G_RET_STS_ERROR;
2751: END IF;
2752: END LOOP;
2753: --
2754: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2755: THEN
2756: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2757: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2758: FND_MSG_PUB.Add;

Line 2758: FND_MSG_PUB.Add;

2754: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2755: THEN
2756: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2757: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
2758: FND_MSG_PUB.Add;
2759: END IF;
2760:
2761: -- Standard check for p_commit
2762: IF FND_API.to_Boolean( p_commit )

Line 2768: FND_MSG_PUB.Count_And_Get

2764: COMMIT WORK;
2765: END IF;
2766:
2767: -- Standard call to get message count and if count is 1, get message info.
2768: FND_MSG_PUB.Count_And_Get
2769: ( p_count => x_msg_count,
2770: p_data => x_msg_data
2771: );
2772:

Line 2846: FND_MSG_PUB.initialize;

2842: END IF;
2843:
2844: -- Initialize message list if p_init_msg_list is set to TRUE.
2845: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2846: FND_MSG_PUB.initialize;
2847: END IF;
2848:
2849: -- Debug Message
2850: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 2850: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2846: FND_MSG_PUB.initialize;
2847: END IF;
2848:
2849: -- Debug Message
2850: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2851: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2852: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
2853: FND_MSG_PUB.ADD;
2854: END IF;

Line 2853: FND_MSG_PUB.ADD;

2849: -- Debug Message
2850: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2851: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
2852: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
2853: FND_MSG_PUB.ADD;
2854: END IF;
2855: -- Initialize API return status to success
2856: x_return_status := FND_API.G_RET_STS_SUCCESS;
2857: --

Line 2860: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2856: x_return_status := FND_API.G_RET_STS_SUCCESS;
2857: --
2858: --Check whether the territory values are specified
2859: IF (p_Terr_Values_Tbl.COUNT = 0 ) THEN
2860: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2861: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_VALUES');
2862: FND_MSG_PUB.ADD;
2863: END IF;
2864: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2862: FND_MSG_PUB.ADD;

2858: --Check whether the territory values are specified
2859: IF (p_Terr_Values_Tbl.COUNT = 0 ) THEN
2860: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2861: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_VALUES');
2862: FND_MSG_PUB.ADD;
2863: END IF;
2864: x_return_status := FND_API.G_RET_STS_ERROR;
2865: RAISE FND_API.G_EXC_ERROR;
2866: END IF;

Line 2870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2866: END IF;
2867:
2868: -- Terr ID can't be null.
2869: IF (P_Terr_Qual_Rec.TERR_ID IS NULL) OR (P_Terr_Qual_Rec.TERR_ID = FND_API.G_MISS_NUM) THEN
2870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2871: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2872: FND_MESSAGE.Set_Token('COL_NAME', 'TERR_ID' );
2873: FND_MSG_PUB.ADD;
2874: END IF;

Line 2873: FND_MSG_PUB.ADD;

2869: IF (P_Terr_Qual_Rec.TERR_ID IS NULL) OR (P_Terr_Qual_Rec.TERR_ID = FND_API.G_MISS_NUM) THEN
2870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2871: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
2872: FND_MESSAGE.Set_Token('COL_NAME', 'TERR_ID' );
2873: FND_MSG_PUB.ADD;
2874: END IF;
2875: x_Return_Status := FND_API.G_RET_STS_ERROR ;
2876: RAISE FND_API.G_EXC_ERROR;
2877: END IF;

Line 2884: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2880: If ( P_Terr_Qual_Rec.TERR_ID IS NOT NULL )AND (P_Terr_Qual_Rec.TERR_ID = FND_API.G_MISS_NUM ) Then
2881: --dbms_output('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
2882: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(P_Terr_Qual_Rec.TERR_ID, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
2883: --dbms_output('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
2884: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2885: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
2886: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_ALL');
2887: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
2888: FND_MSG_PUB.ADD;

Line 2888: FND_MSG_PUB.ADD;

2884: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2885: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
2886: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_ALL');
2887: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
2888: FND_MSG_PUB.ADD;
2889: END IF;
2890: x_Return_Status := FND_API.G_RET_STS_ERROR ;
2891: End If;
2892: End If;

Line 2947: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2943: --If the program reached here, that mena evry thing went smooth
2944: x_return_status := FND_API.G_RET_STS_SUCCESS;
2945:
2946: -- Debug Message
2947: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2948: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2949: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
2950: FND_MSG_PUB.ADD;
2951: END IF;

Line 2950: FND_MSG_PUB.ADD;

2946: -- Debug Message
2947: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2948: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2949: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
2950: FND_MSG_PUB.ADD;
2951: END IF;
2952: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2953:
2954: -- Standard check for p_commit

Line 2952: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );

2948: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
2949: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
2950: FND_MSG_PUB.ADD;
2951: END IF;
2952: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2953:
2954: -- Standard check for p_commit
2955: IF FND_API.to_Boolean( p_commit ) THEN
2956: COMMIT WORK;

Line 2964: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );

2960: --
2961: WHEN FND_API.G_EXC_ERROR THEN
2962: ROLLBACK TO CREATE_TERRITORY_PVT;
2963: x_return_status := FND_API.G_RET_STS_ERROR ;
2964: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2966: ROLLBACK TO CREATE_TERRITORY_PVT;
2967: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2968: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );

Line 2968: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );

2964: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2966: ROLLBACK TO CREATE_TERRITORY_PVT;
2967: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2968: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2969: WHEN OTHERS THEN
2970: ROLLBACK TO CREATE_TERRITORY_PVT;
2971: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2972: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );

Line 2972: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );

2968: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2969: WHEN OTHERS THEN
2970: ROLLBACK TO CREATE_TERRITORY_PVT;
2971: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2972: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count, p_data => x_msg_data );
2973:
2974: END Create_Terr_Qualifier;
2975:
2976:

Line 3046: FND_MSG_PUB.initialize;

3042:
3043: -- Initialize message list if p_init_msg_list is set to TRUE.
3044: IF FND_API.to_Boolean( p_init_msg_list )
3045: THEN
3046: FND_MSG_PUB.initialize;
3047: END IF;
3048:
3049: -- Debug Message
3050: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 3050: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3046: FND_MSG_PUB.initialize;
3047: END IF;
3048:
3049: -- Debug Message
3050: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3051: THEN
3052: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3053: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3054: FND_MSG_PUB.Add;

Line 3054: FND_MSG_PUB.Add;

3050: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3051: THEN
3052: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3053: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3054: FND_MSG_PUB.Add;
3055: END IF;
3056:
3057: -- Initialize API return status to success
3058: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3063: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3059:
3060: -- Check the validation level
3061: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
3062: -- Debug message
3063: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3064: THEN
3065: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
3066: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec');
3067: FND_MSG_PUB.Add;

Line 3067: FND_MSG_PUB.Add;

3063: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3064: THEN
3065: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
3066: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec');
3067: FND_MSG_PUB.Add;
3068: END IF;
3069:
3070:
3071: --Check created by

Line 3074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3070:
3071: --Check created by
3072: IF ( p_Terr_Value_Rec.CREATED_BY is NULL OR
3073: p_Terr_Value_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
3074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3075: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3076: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3077: FND_MSG_PUB.ADD;
3078: END IF;

Line 3077: FND_MSG_PUB.ADD;

3073: p_Terr_Value_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
3074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3075: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3076: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3077: FND_MSG_PUB.ADD;
3078: END IF;
3079: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3080: End If;
3081:

Line 3085: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3081:
3082: --Check creation date
3083: If ( p_Terr_Value_Rec.CREATION_DATE is NULL OR
3084: p_Terr_Value_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
3085: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3086: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3087: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3088: FND_MSG_PUB.ADD;
3089: END IF;

Line 3088: FND_MSG_PUB.ADD;

3084: p_Terr_Value_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
3085: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3086: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3087: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3088: FND_MSG_PUB.ADD;
3089: END IF;
3090: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3091: End If;
3092:

Line 3167: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3163: -- If successful then save the success status for the record
3164: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3165:
3166: --
3167: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3168: THEN
3169: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3170: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3171: FND_MSG_PUB.Add;

Line 3171: FND_MSG_PUB.Add;

3167: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3168: THEN
3169: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3170: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3171: FND_MSG_PUB.Add;
3172: END IF;
3173:
3174: -- Standard check for p_commit
3175: IF FND_API.to_Boolean( p_commit )

Line 3181: FND_MSG_PUB.Count_And_Get

3177: COMMIT WORK;
3178: END IF;
3179:
3180: -- Standard call to get message count and if count is 1, get message info.
3181: FND_MSG_PUB.Count_And_Get
3182: ( p_count => x_msg_count,
3183: p_data => x_msg_data
3184: );
3185:

Line 3194: FND_MSG_PUB.Count_And_Get

3190: ROLLBACK TO CREATE_TERR_VALUE_PVT;
3191: x_return_status := FND_API.G_RET_STS_ERROR ;
3192: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
3193: X_Terr_Value_Out_Rec.return_status := x_return_status;
3194: FND_MSG_PUB.Count_And_Get
3195: ( p_count => x_msg_count,
3196: p_data => x_msg_data
3197: );
3198:

Line 3206: FND_MSG_PUB.Count_And_Get

3202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3203: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
3204: X_Terr_Value_Out_Rec.return_status := x_return_status;
3205:
3206: FND_MSG_PUB.Count_And_Get
3207: ( p_count => x_msg_count,
3208: p_data => x_msg_data
3209: );
3210:

Line 3218: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

3214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3215: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
3216: X_Terr_Value_Out_Rec.return_status := x_return_status;
3217: --
3218: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3219: THEN
3220: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_Value');
3221: END IF;
3222: --

Line 3220: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_Value');

3216: X_Terr_Value_Out_Rec.return_status := x_return_status;
3217: --
3218: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3219: THEN
3220: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Terr_Value');
3221: END IF;
3222: --
3223: End Create_Terr_Value;
3224:

Line 3299: FND_MSG_PUB.initialize;

3295:
3296: -- Initialize message list if p_init_msg_list is set to TRUE.
3297: IF FND_API.to_Boolean( p_init_msg_list )
3298: THEN
3299: FND_MSG_PUB.initialize;
3300: END IF;
3301:
3302: -- Debug Message
3303: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 3303: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3299: FND_MSG_PUB.initialize;
3300: END IF;
3301:
3302: -- Debug Message
3303: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3304: THEN
3305: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3306: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3307: FND_MSG_PUB.Add;

Line 3307: FND_MSG_PUB.Add;

3303: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3304: THEN
3305: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3306: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3307: FND_MSG_PUB.Add;
3308: END IF;
3309:
3310: -- Initialize API return status to success
3311: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3367: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3363: END LOOP;
3364: --
3365: --
3366: -- Debug Message
3367: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3368: THEN
3369: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3370: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3371: FND_MSG_PUB.Add;

Line 3371: FND_MSG_PUB.Add;

3367: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3368: THEN
3369: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3370: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
3371: FND_MSG_PUB.Add;
3372: END IF;
3373:
3374: --
3375: -- Standard check for p_commit

Line 3382: FND_MSG_PUB.Count_And_Get

3378: COMMIT WORK;
3379: END IF;
3380:
3381: -- Standard call to get message count and if count is 1, get message info.
3382: FND_MSG_PUB.Count_And_Get
3383: ( p_count => x_msg_count,
3384: p_data => x_msg_data
3385: );
3386:

Line 3488: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3484: BEGIN
3485: --dbms_output('Create_Terr_Value TBL: Entering API');
3486:
3487: -- Debug Message
3488: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3489: THEN
3490: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3491: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3492: FND_MSG_PUB.Add;

Line 3492: FND_MSG_PUB.Add;

3488: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3489: THEN
3490: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3491: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3492: FND_MSG_PUB.Add;
3493: END IF;
3494: -- Initialize API return status to SUCCESS
3495: x_return_status := FND_API.G_RET_STS_SUCCESS;
3496:

Line 3500: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3496:
3497: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
3498: THEN
3499: -- Debug message
3500: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3501: THEN
3502: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
3503: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_TerrRec_Update');
3504: FND_MSG_PUB.Add;

Line 3504: FND_MSG_PUB.Add;

3500: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3501: THEN
3502: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
3503: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_TerrRec_Update');
3504: FND_MSG_PUB.Add;
3505: END IF;
3506: --
3507: -- Invoke validation procedures
3508: Validate_TerrRec_Update (p_init_msg_list => FND_API.G_FALSE,

Line 3573: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

3569: l_ref_terr_all_rec.NUM_QUAL;
3570:
3571: If ( C_GetTerritory%NOTFOUND) Then
3572: --dbms_output('Update_territory_Record: NO-RCORDS-FOUND');
3573: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3574: THEN
3575: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
3576: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3577: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(p_terr_all_rec.terr_id));

Line 3578: FND_MSG_PUB.Add;

3574: THEN
3575: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
3576: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3577: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(p_terr_all_rec.terr_id));
3578: FND_MSG_PUB.Add;
3579: END IF;
3580: raise FND_API.G_EXC_ERROR;
3581: End if;
3582: CLOSE C_GetTerritory;

Line 3639: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3635: X_Terr_All_Out_Rec.Terr_id := P_Terr_All_Rec.Terr_Id;
3636: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3637:
3638: -- Debug Message
3639: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3640: THEN
3641: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3642: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3643: FND_MSG_PUB.Add;

Line 3643: FND_MSG_PUB.Add;

3639: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3640: THEN
3641: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3642: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3643: FND_MSG_PUB.Add;
3644: END IF;
3645:
3646: --dbms_output('Update_territory_Record PVT: Exiting API');
3647: EXCEPTION

Line 3651: FND_MSG_PUB.Count_And_Get

3647: EXCEPTION
3648: WHEN FND_API.G_EXC_ERROR THEN
3649: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
3650: x_return_status := FND_API.G_RET_STS_ERROR ;
3651: FND_MSG_PUB.Count_And_Get
3652: ( P_count => x_msg_count,
3653: P_data => x_msg_data
3654: );
3655:

Line 3662: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

3658: --dbms_output('Update_territory_Record PVT: OTHERS - ' || SQLERRM);
3659: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3660: X_Terr_All_Out_Rec.Terr_id := P_Terr_All_Rec.Terr_Id;
3661: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3662: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3663: THEN
3664: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Record');
3665: END IF;
3666: --

Line 3664: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Record');

3660: X_Terr_All_Out_Rec.Terr_id := P_Terr_All_Rec.Terr_Id;
3661: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3662: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3663: THEN
3664: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Record');
3665: END IF;
3666: --
3667: End Update_territory_Record;
3668: --

Line 3726: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3722: l_return_status VARCHAR2(1);
3723: l_ref_terr_Usg_rec Terr_Usgs_Rec_Type;
3724: BEGIN
3725: -- Debug Message
3726: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3727: THEN
3728: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3729: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3730: FND_MSG_PUB.Add;

Line 3730: FND_MSG_PUB.Add;

3726: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3727: THEN
3728: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3729: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3730: FND_MSG_PUB.Add;
3731: END IF;
3732:
3733: -- Initialize API return status to SUCCESS
3734: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3739: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3735:
3736: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3737: THEN
3738: -- Debug message
3739: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3740: THEN
3741: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
3742: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Usage');
3743: FND_MSG_PUB.Add;

Line 3743: FND_MSG_PUB.Add;

3739: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3740: THEN
3741: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
3742: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Usage');
3743: FND_MSG_PUB.Add;
3744: END IF;
3745: --
3746: -- Invoke validation procedures
3747: Validate_Territory_Usage(p_init_msg_list => FND_API.G_FALSE,

Line 3777: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

3773: l_ref_terr_Usg_rec.SOURCE_ID;
3774:
3775: If ( C_GetTerritoryUsage%NOTFOUND) Then
3776: --dbms_output('Update_Territory_Usages PVT: NO-RCORDS-FOUND');
3777: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3778: THEN
3779: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
3780: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3781: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Usgs_Rec.terr_usg_id));

Line 3782: FND_MSG_PUB.Add;

3778: THEN
3779: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
3780: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3781: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Usgs_Rec.terr_usg_id));
3782: FND_MSG_PUB.Add;
3783: END IF;
3784: raise FND_API.G_EXC_ERROR;
3785: End if;
3786: CLOSE C_GetTerritoryUsage;

Line 3805: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3801: X_Terr_Usgs_Out_Rec.TERR_USG_ID := P_Terr_Usgs_Rec.Terr_Usg_Id;
3802: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3803:
3804: -- Debug Message
3805: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3806: THEN
3807: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3808: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3809: FND_MSG_PUB.Add;

Line 3809: FND_MSG_PUB.Add;

3805: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3806: THEN
3807: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3808: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3809: FND_MSG_PUB.Add;
3810: END IF;
3811:
3812: --dbms_output('Update_Territory_Usages PVT: Exiting API');
3813: EXCEPTION

Line 3817: FND_MSG_PUB.Count_And_Get

3813: EXCEPTION
3814: WHEN FND_API.G_EXC_ERROR THEN
3815: --dbms_output('Update_Territory_Usages: FND_API.G_EXC_ERROR');
3816: x_return_status := FND_API.G_RET_STS_ERROR ;
3817: FND_MSG_PUB.Count_And_Get
3818: ( P_count => x_msg_count,
3819: P_data => x_msg_data
3820: );
3821:

Line 3828: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

3824: --dbms_output('Update_Territory_Usages PVT: OTHERS - ' || SQLERRM);
3825: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3826: X_Terr_Usgs_Out_Rec.Terr_Usg_Id := P_Terr_Usgs_Rec.Terr_Usg_Id;
3827: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3828: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3829: THEN
3830: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Usages');
3831: END IF;
3832: --

Line 3830: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Usages');

3826: X_Terr_Usgs_Out_Rec.Terr_Usg_Id := P_Terr_Usgs_Rec.Terr_Usg_Id;
3827: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3828: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3829: THEN
3830: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Usages');
3831: END IF;
3832: --
3833: End Update_Territory_Usages;
3834: --

Line 3883: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3879: BEGIN
3880: --dbms_output('Update_Territory_Usages TBL: Entering API');
3881:
3882: -- Debug Message
3883: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3884: THEN
3885: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3886: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3887: FND_MSG_PUB.Add;

Line 3887: FND_MSG_PUB.Add;

3883: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3884: THEN
3885: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
3886: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3887: FND_MSG_PUB.Add;
3888: END IF;
3889:
3890: -- Initialize API return status to success
3891: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3943: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

3939: END IF;
3940: END LOOP;
3941:
3942: -- Debug Message
3943: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3944: THEN
3945: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3946: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3947: FND_MSG_PUB.Add;

Line 3947: FND_MSG_PUB.Add;

3943: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3944: THEN
3945: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
3946: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
3947: FND_MSG_PUB.Add;
3948: END IF;
3949: --dbms_output('Update_Territory_Usages TBL: Exiting API');
3950: --
3951: END Update_Territory_Usages;

Line 4010: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4006: BEGIN
4007: --dbms_output('Update_Terr_QualType_Usage REC: Entering API');
4008:
4009: -- Debug Message
4010: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4011: THEN
4012: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4013: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4014: FND_MSG_PUB.Add;

Line 4014: FND_MSG_PUB.Add;

4010: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4011: THEN
4012: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4013: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4014: FND_MSG_PUB.Add;
4015: END IF;
4016:
4017: -- Initialize API return status to SUCCESS
4018: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4023: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4019:
4020: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
4021: THEN
4022: -- Debug message
4023: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4024: THEN
4025: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
4026: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage');
4027: FND_MSG_PUB.Add;

Line 4027: FND_MSG_PUB.Add;

4023: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4024: THEN
4025: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
4026: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage');
4027: FND_MSG_PUB.Add;
4028: END IF;
4029: -- Invoke validation procedures
4030: Validate_Terr_Qtype_Usage(p_init_msg_list => FND_API.G_FALSE,
4031: x_Return_Status => x_return_status,

Line 4056: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

4052: l_ref_Terr_QualTypeUsgs_Rec.TERR_ID,
4053: l_ref_Terr_QualTypeUsgs_Rec.QUAL_TYPE_USG_ID;
4054: If (C_GetTerrQualTypeUsgs%NOTFOUND) Then
4055: --dbms_output('Update_Terr_QualType_Usage REC: NO-RCORDS-FOUND');
4056: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4057: THEN
4058: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4059: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
4060: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID));

Line 4061: FND_MSG_PUB.Add;

4057: THEN
4058: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4059: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
4060: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID));
4061: FND_MSG_PUB.Add;
4062: END IF;
4063: raise FND_API.G_EXC_ERROR;
4064: End if;
4065: CLOSE C_GetTerrQualTypeUsgs;

Line 4082: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4078: --
4079: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID;
4080: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
4081:
4082: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4083: THEN
4084: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4085: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4086: FND_MSG_PUB.Add;

Line 4086: FND_MSG_PUB.Add;

4082: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4083: THEN
4084: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4085: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4086: FND_MSG_PUB.Add;
4087: END IF;
4088:
4089: --dbms_output('Update_Terr_QualType_Usage REC: Exiting API');
4090: EXCEPTION

Line 4094: FND_MSG_PUB.Count_And_Get

4090: EXCEPTION
4091: WHEN FND_API.G_EXC_ERROR THEN
4092: --dbms_output('Update_Terr_QualType_Usage: FND_API.G_EXC_ERROR');
4093: x_return_status := FND_API.G_RET_STS_ERROR ;
4094: FND_MSG_PUB.Count_And_Get
4095: ( P_count => x_msg_count,
4096: P_data => x_msg_data
4097: );
4098:

Line 4104: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

4100: --dbms_output('Update_Terr_QualType_Usage REC: OTHERS - ' || SQLERRM);
4101: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4102: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID;
4103: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4104: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4105: THEN
4106: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Error: Inside Update_Terr_QualType_Usage');
4107: END IF;
4108: --

Line 4106: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Error: Inside Update_Terr_QualType_Usage');

4102: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID;
4103: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4104: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4105: THEN
4106: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Error: Inside Update_Terr_QualType_Usage');
4107: END IF;
4108: --
4109: End Update_Terr_QualType_Usage;
4110: --

Line 4159: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4155: BEGIN
4156: --dbms_output('Update_Terr_QualType_Usage TBL: Entering API');
4157:
4158: -- Debug Message
4159: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4160: THEN
4161: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4162: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4163: FND_MSG_PUB.Add;

Line 4163: FND_MSG_PUB.Add;

4159: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4160: THEN
4161: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4162: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4163: FND_MSG_PUB.Add;
4164: END IF;
4165:
4166: -- Initialize API return status to success
4167: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4217: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4213: END IF;
4214: END LOOP;
4215:
4216: -- Debug Message
4217: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4218: THEN
4219: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4220: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4221: FND_MSG_PUB.Add;

Line 4221: FND_MSG_PUB.Add;

4217: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4218: THEN
4219: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4220: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4221: FND_MSG_PUB.Add;
4222: END IF;
4223:
4224: --dbms_output('Update_Terr_QualType_Usage TBL: Exiting API');
4225: --

Line 4287: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4283: BEGIN
4284: --dbms_output('Update_Terr_Qualifier REC: Entering API');
4285:
4286: -- Debug Message
4287: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4288: THEN
4289: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4290: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4291: FND_MSG_PUB.Add;

Line 4291: FND_MSG_PUB.Add;

4287: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4288: THEN
4289: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4290: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4291: FND_MSG_PUB.Add;
4292: END IF;
4293:
4294: -- Initialize API return status to SUCCESS
4295: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4300: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4296:
4297: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
4298: THEN
4299: -- Debug message
4300: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4301: THEN
4302: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
4303: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifier');
4304: FND_MSG_PUB.Add;

Line 4304: FND_MSG_PUB.Add;

4300: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4301: THEN
4302: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
4303: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifier');
4304: FND_MSG_PUB.Add;
4305: END IF;
4306: --
4307: -- Invoke validation procedures
4308: Validate_Qualifier(p_init_msg_list => FND_API.G_FALSE,

Line 4339: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

4335: l_ref_Terr_Qual_Rec.GENERATE_FLAG,
4336: l_ref_Terr_Qual_Rec.OVERLAP_ALLOWED_FLAG;
4337: If ( C_GetTerrQualifier%NOTFOUND) Then
4338: --dbms_output('Update_Terr_Qualifier REC: NO-RCORDS-FOUND');
4339: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4340: THEN
4341: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4342: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QUAL');
4343: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Qual_Rec.terr_qual_id));

Line 4344: FND_MSG_PUB.Add;

4340: THEN
4341: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4342: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QUAL');
4343: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Qual_Rec.terr_qual_id));
4344: FND_MSG_PUB.Add;
4345: END IF;
4346: raise FND_API.G_EXC_ERROR;
4347: End if;
4348: CLOSE C_GetTerrQualifier;

Line 4372: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4368: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := P_Terr_Qual_Rec.TERR_QUAL_ID;
4369: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
4370:
4371: -- Debug Message
4372: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4373: THEN
4374: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4375: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4376: FND_MSG_PUB.Add;

Line 4376: FND_MSG_PUB.Add;

4372: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4373: THEN
4374: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4375: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4376: FND_MSG_PUB.Add;
4377: END IF;
4378:
4379: --dbms_output('Update_Terr_Qualifier REC: Exiting API');
4380: EXCEPTION

Line 4384: FND_MSG_PUB.Count_And_Get

4380: EXCEPTION
4381: WHEN FND_API.G_EXC_ERROR THEN
4382: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4383: x_return_status := FND_API.G_RET_STS_ERROR ;
4384: FND_MSG_PUB.Count_And_Get
4385: ( P_count => x_msg_count,
4386: P_data => x_msg_data
4387: );
4388:

Line 4394: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

4390: --dbms_output('Update_Terr_Qualifier REC: OTHERS - ' || SQLERRM);
4391: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4392: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := P_Terr_Qual_Rec.TERR_QUAL_ID;
4393: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4394: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4395: THEN
4396: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Qualifier');
4397: END IF;
4398: End Update_Terr_Qualifier;

Line 4396: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Qualifier');

4392: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := P_Terr_Qual_Rec.TERR_QUAL_ID;
4393: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4394: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4395: THEN
4396: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Qualifier');
4397: END IF;
4398: End Update_Terr_Qualifier;
4399: --
4400: --

Line 4446: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4442: BEGIN
4443: --dbms_output('Update_Terr_Qualifier TBL: Entering API');
4444:
4445: -- Debug Message
4446: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4447: THEN
4448: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4449: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4450: FND_MSG_PUB.Add;

Line 4450: FND_MSG_PUB.Add;

4446: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4447: THEN
4448: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4449: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4450: FND_MSG_PUB.Add;
4451: END IF;
4452:
4453: -- Initialize API return status to success
4454: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4501: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4497: END IF;
4498: END LOOP;
4499:
4500: -- Debug Message
4501: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4502: THEN
4503: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4504: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4505: FND_MSG_PUB.Add;

Line 4505: FND_MSG_PUB.Add;

4501: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4502: THEN
4503: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4504: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4505: FND_MSG_PUB.Add;
4506: END IF;
4507: --dbms_output('Update_Terr_Qualifier TBL: Exiting API');
4508: --
4509: END Update_Terr_Qualifier;

Line 4588: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4584: BEGIN
4585: --dbms_output('Update_Terr_Value REC: Entering API');
4586:
4587: -- Debug Message
4588: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4589: THEN
4590: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4591: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4592: FND_MSG_PUB.Add;

Line 4592: FND_MSG_PUB.Add;

4588: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4589: THEN
4590: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4591: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4592: FND_MSG_PUB.Add;
4593: END IF;
4594:
4595: -- Initialize API return status to SUCCESS
4596: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

4603: --
4604: If ( C_GetTerr_qual_id%NOTFOUND) Then
4605: --
4606: --dbms_output('Update_Terr_Value REC: NO-RCORDS-FOUND');
4607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4608: THEN
4609: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4610: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_VALUES');
4611: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Value_Rec.TERR_VALUE_ID));

Line 4612: FND_MSG_PUB.Add;

4608: THEN
4609: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4610: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_VALUES');
4611: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Value_Rec.TERR_VALUE_ID));
4612: FND_MSG_PUB.Add;
4613: END IF;
4614: raise FND_API.G_EXC_ERROR;
4615:
4616: End if;

Line 4623: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4619: -- Check the validation level
4620: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
4621: THEN
4622: -- Debug message
4623: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4624: THEN
4625: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
4626: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec');
4627: FND_MSG_PUB.Add;

Line 4627: FND_MSG_PUB.Add;

4623: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4624: THEN
4625: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
4626: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec');
4627: FND_MSG_PUB.Add;
4628: END IF;
4629:
4630: -- Invoke validation procedures
4631: Validate_Terr_Value_Rec(p_init_msg_list => FND_API.G_FALSE,

Line 4688: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

4684: --
4685: If ( C_GetTerritoryValue%NOTFOUND) Then
4686: --
4687: --dbms_output('Update_Terr_Value REC: NO-RCORDS-FOUND');
4688: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4689: THEN
4690: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4691: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_VALUES');
4692: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Value_Rec.TERR_VALUE_ID));

Line 4693: FND_MSG_PUB.Add;

4689: THEN
4690: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
4691: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_VALUES');
4692: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Value_Rec.TERR_VALUE_ID));
4693: FND_MSG_PUB.Add;
4694: END IF;
4695: raise FND_API.G_EXC_ERROR;
4696:
4697: End if;

Line 4734: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4730: X_Terr_Value_Out_Rec.TERR_VALUE_ID := P_Terr_Value_Rec.TERR_VALUE_ID;
4731: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
4732:
4733: -- Debug Message
4734: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4735: THEN
4736: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4737: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4738: FND_MSG_PUB.Add;

Line 4738: FND_MSG_PUB.Add;

4734: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4735: THEN
4736: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4737: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4738: FND_MSG_PUB.Add;
4739: END IF;
4740:
4741: --dbms_output('Update_Terr_Value REC: Exiting API');
4742: EXCEPTION

Line 4746: FND_MSG_PUB.Count_And_Get

4742: EXCEPTION
4743: WHEN FND_API.G_EXC_ERROR THEN
4744: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4745: x_return_status := FND_API.G_RET_STS_ERROR ;
4746: FND_MSG_PUB.Count_And_Get
4747: ( P_count => x_msg_count,
4748: P_data => x_msg_data
4749: );
4750:

Line 4756: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

4752: --dbms_output('Update_Terr_Value REC: OTHERS - ' || SQLERRM);
4753: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4754: X_Terr_Value_Out_Rec.TERR_VALUE_ID := P_Terr_Value_Rec.TERR_VALUE_ID;
4755: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4756: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4757: THEN
4758: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Value');
4759: END IF;
4760: End Update_Terr_Value;

Line 4758: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Value');

4754: X_Terr_Value_Out_Rec.TERR_VALUE_ID := P_Terr_Value_Rec.TERR_VALUE_ID;
4755: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4756: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4757: THEN
4758: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Value');
4759: END IF;
4760: End Update_Terr_Value;
4761:
4762: --

Line 4813: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4809: BEGIN
4810: --dbms_output('Update_Terr_Value TBL: Entering API');
4811:
4812: -- Debug Message
4813: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4814: THEN
4815: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4816: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4817: FND_MSG_PUB.Add;

Line 4817: FND_MSG_PUB.Add;

4813: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4814: THEN
4815: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4816: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4817: FND_MSG_PUB.Add;
4818: END IF;
4819:
4820: -- Initialize API return status to success
4821: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4866: END IF;
4867: END LOOP;
4868:
4869: -- Debug Message
4870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4871: THEN
4872: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4873: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4874: FND_MSG_PUB.Add;

Line 4874: FND_MSG_PUB.Add;

4870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4871: THEN
4872: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4873: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4874: FND_MSG_PUB.Add;
4875: END IF;
4876:
4877:
4878: --dbms_output('Update_Terr_Value TBL: Exiting API');

Line 4936: FND_MSG_PUB.initialize;

4932: END IF;
4933: -- Initialize message list if p_init_msg_list is set to TRUE.
4934: IF FND_API.to_Boolean( p_init_msg_list )
4935: THEN
4936: FND_MSG_PUB.initialize;
4937: END IF;
4938:
4939: -- Debug Message
4940: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 4940: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4936: FND_MSG_PUB.initialize;
4937: END IF;
4938:
4939: -- Debug Message
4940: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4941: THEN
4942: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4943: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4944: FND_MSG_PUB.Add;

Line 4944: FND_MSG_PUB.Add;

4940: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4941: THEN
4942: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
4943: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4944: FND_MSG_PUB.Add;
4945: END IF;
4946:
4947: --Initialize the return status to success
4948: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4965: FND_MSG_PUB.ADD;

4961: END IF;
4962: --prepare the message
4963: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
4964: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR');
4965: FND_MSG_PUB.ADD;
4966:
4967: -- Debug Message
4968: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4969: THEN

Line 4968: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

4964: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR');
4965: FND_MSG_PUB.ADD;
4966:
4967: -- Debug Message
4968: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4969: THEN
4970: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4971: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4972: FND_MSG_PUB.Add;

Line 4972: FND_MSG_PUB.Add;

4968: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4969: THEN
4970: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
4971: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
4972: FND_MSG_PUB.Add;
4973: END IF;
4974:
4975:
4976: FND_MSG_PUB.Count_And_Get

Line 4976: FND_MSG_PUB.Count_And_Get

4972: FND_MSG_PUB.Add;
4973: END IF;
4974:
4975:
4976: FND_MSG_PUB.Count_And_Get
4977: ( p_count => x_msg_count,
4978: p_data => x_msg_data
4979: );
4980:

Line 4995: FND_MSG_PUB.ADD;

4991: l_row_count := 0;
4992: --Prepare message token
4993: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
4994: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR');
4995: FND_MSG_PUB.ADD;
4996: --
4997: FND_MSG_PUB.Count_And_Get
4998: ( p_count => x_msg_count,
4999: p_data => x_msg_data

Line 4997: FND_MSG_PUB.Count_And_Get

4993: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
4994: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR');
4995: FND_MSG_PUB.ADD;
4996: --
4997: FND_MSG_PUB.Count_And_Get
4998: ( p_count => x_msg_count,
4999: p_data => x_msg_data
5000: );
5001:

Line 5006: FND_MSG_PUB.Count_And_Get

5002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5003: --dbms_output('Delete_territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
5004: ROLLBACK TO Delete_territory_Record_Pvt;
5005: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5006: FND_MSG_PUB.Count_And_Get
5007: ( p_count => x_msg_count,
5008: p_data => x_msg_data
5009: );
5010:

Line 5014: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

5010:
5011: WHEN OTHERS THEN
5012: --dbms_output('Delete_territory_Record: OTHERS - ' || SQLERRM);
5013: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5014: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5015: THEN
5016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_territory_Record');
5017: END IF;
5018: --

Line 5016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_territory_Record');

5012: --dbms_output('Delete_territory_Record: OTHERS - ' || SQLERRM);
5013: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5014: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5015: THEN
5016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_territory_Record');
5017: END IF;
5018: --
5019: END Delete_territory_Record;
5020: --

Line 5072: FND_MSG_PUB.initialize;

5068: END IF;
5069: -- Initialize message list if p_init_msg_list is set to TRUE.
5070: IF FND_API.to_Boolean( p_init_msg_list )
5071: THEN
5072: FND_MSG_PUB.initialize;
5073: END IF;
5074:
5075: -- Debug Message
5076: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 5076: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5072: FND_MSG_PUB.initialize;
5073: END IF;
5074:
5075: -- Debug Message
5076: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5077: THEN
5078: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5079: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5080: FND_MSG_PUB.Add;

Line 5080: FND_MSG_PUB.Add;

5076: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5077: THEN
5078: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5079: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5080: FND_MSG_PUB.Add;
5081: END IF;
5082:
5083: --Initialize the return status to success
5084: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5100: FND_MSG_PUB.ADD;

5096: END IF;
5097: --Prepare message token
5098: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5099: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_USGS');
5100: FND_MSG_PUB.ADD;
5101:
5102: -- Debug Message
5103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5104: THEN

Line 5103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5099: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_USGS');
5100: FND_MSG_PUB.ADD;
5101:
5102: -- Debug Message
5103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5104: THEN
5105: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5106: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5107: FND_MSG_PUB.Add;

Line 5107: FND_MSG_PUB.Add;

5103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5104: THEN
5105: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5106: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5107: FND_MSG_PUB.Add;
5108: END IF;
5109:
5110:
5111: FND_MSG_PUB.Count_And_Get

Line 5111: FND_MSG_PUB.Count_And_Get

5107: FND_MSG_PUB.Add;
5108: END IF;
5109:
5110:
5111: FND_MSG_PUB.Count_And_Get
5112: ( p_count => x_msg_count,
5113: p_data => x_msg_data
5114: );
5115:

Line 5130: FND_MSG_PUB.ADD;

5126: l_row_count := 0;
5127: --Prepare message token
5128: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5129: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_USGS');
5130: FND_MSG_PUB.ADD;
5131: --
5132: FND_MSG_PUB.Count_And_Get
5133: ( p_count => x_msg_count,
5134: p_data => x_msg_data

Line 5132: FND_MSG_PUB.Count_And_Get

5128: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5129: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_USGS');
5130: FND_MSG_PUB.ADD;
5131: --
5132: FND_MSG_PUB.Count_And_Get
5133: ( p_count => x_msg_count,
5134: p_data => x_msg_data
5135: );
5136:

Line 5141: FND_MSG_PUB.Count_And_Get

5137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5138: --dbms_output('Delete_Territory_Usages: FND_API.G_EXC_UNEXPECTED_ERROR');
5139: ROLLBACK TO Delete_Territory_Usages_Pvt;
5140: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5141: FND_MSG_PUB.Count_And_Get
5142: ( p_count => x_msg_count,
5143: p_data => x_msg_data
5144: );
5145:

Line 5149: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

5145:
5146: WHEN OTHERS THEN
5147: --dbms_output('Delete_Territory_Usages: OTHERS - ' || SQLERRM);
5148: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5149: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5150: THEN
5151: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Territory_Usages');
5152: END IF;
5153: END Delete_Territory_Usages;

Line 5151: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Territory_Usages');

5147: --dbms_output('Delete_Territory_Usages: OTHERS - ' || SQLERRM);
5148: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5149: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5150: THEN
5151: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Territory_Usages');
5152: END IF;
5153: END Delete_Territory_Usages;
5154: --
5155: -- *******************************************************

Line 5207: FND_MSG_PUB.initialize;

5203: END IF;
5204: -- Initialize message list if p_init_msg_list is set to TRUE.
5205: IF FND_API.to_Boolean( p_init_msg_list )
5206: THEN
5207: FND_MSG_PUB.initialize;
5208: END IF;
5209:
5210: -- Debug Message
5211: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 5211: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5207: FND_MSG_PUB.initialize;
5208: END IF;
5209:
5210: -- Debug Message
5211: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5212: THEN
5213: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5214: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5215: FND_MSG_PUB.Add;

Line 5215: FND_MSG_PUB.Add;

5211: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5212: THEN
5213: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5214: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5215: FND_MSG_PUB.Add;
5216: END IF;
5217:
5218: --Initialize the return status to success
5219: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5238: FND_MSG_PUB.ADD;

5234:
5235: --Prepare message token
5236: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5237: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
5238: FND_MSG_PUB.ADD;
5239:
5240: -- Debug Message
5241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5242: THEN

Line 5241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5237: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
5238: FND_MSG_PUB.ADD;
5239:
5240: -- Debug Message
5241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5242: THEN
5243: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5244: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5245: FND_MSG_PUB.Add;

Line 5245: FND_MSG_PUB.Add;

5241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5242: THEN
5243: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5244: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5245: FND_MSG_PUB.Add;
5246: END IF;
5247:
5248:
5249: FND_MSG_PUB.Count_And_Get

Line 5249: FND_MSG_PUB.Count_And_Get

5245: FND_MSG_PUB.Add;
5246: END IF;
5247:
5248:
5249: FND_MSG_PUB.Count_And_Get
5250: ( p_count => x_msg_count,
5251: p_data => x_msg_data
5252: );
5253:

Line 5270: FND_MSG_PUB.ADD;

5266:
5267: --Prepare message token
5268: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5269: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
5270: FND_MSG_PUB.ADD;
5271: --
5272: FND_MSG_PUB.Count_And_Get
5273: ( p_count => x_msg_count,
5274: p_data => x_msg_data

Line 5272: FND_MSG_PUB.Count_And_Get

5268: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5269: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
5270: FND_MSG_PUB.ADD;
5271: --
5272: FND_MSG_PUB.Count_And_Get
5273: ( p_count => x_msg_count,
5274: p_data => x_msg_data
5275: );
5276:

Line 5281: FND_MSG_PUB.Count_And_Get

5277: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5278: --dbms_output('Delete_Terr_QualType_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5279: ROLLBACK TO Delete_Terr_QualType_Usage_Pvt;
5280: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5281: FND_MSG_PUB.Count_And_Get
5282: ( p_count => x_msg_count,
5283: p_data => x_msg_data
5284: );
5285:

Line 5290: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

5286: WHEN OTHERS THEN
5287: --dbms_output('Delete_Terr_QualType_Usage: OTHERS - ' || SQLERRM);
5288: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5289:
5290: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5291: THEN
5292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_QualType_Usage');
5293: END IF;
5294: END Delete_Terr_QualType_Usage;

Line 5292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_QualType_Usage');

5288: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5289:
5290: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5291: THEN
5292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_QualType_Usage');
5293: END IF;
5294: END Delete_Terr_QualType_Usage;
5295: --
5296: -- *******************************************************

Line 5355: FND_MSG_PUB.initialize;

5351: END IF;
5352: -- Initialize message list if p_init_msg_list is set to TRUE.
5353: IF FND_API.to_Boolean( p_init_msg_list )
5354: THEN
5355: FND_MSG_PUB.initialize;
5356: END IF;
5357:
5358: -- Debug Message
5359: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 5359: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5355: FND_MSG_PUB.initialize;
5356: END IF;
5357:
5358: -- Debug Message
5359: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5360: THEN
5361: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5362: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5363: FND_MSG_PUB.Add;

Line 5363: FND_MSG_PUB.Add;

5359: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5360: THEN
5361: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5362: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5363: FND_MSG_PUB.Add;
5364: END IF;
5365:
5366: --Initialize the return status to success
5367: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5408: FND_MSG_PUB.ADD();

5404:
5405: --Prepare message token
5406: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5407: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QUALIFIERS');
5408: FND_MSG_PUB.ADD();
5409:
5410: -- Debug Message
5411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5412: THEN

Line 5411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5407: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QUALIFIERS');
5408: FND_MSG_PUB.ADD();
5409:
5410: -- Debug Message
5411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5412: THEN
5413: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5414: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5415: FND_MSG_PUB.Add;

Line 5415: FND_MSG_PUB.Add;

5411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5412: THEN
5413: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5414: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5415: FND_MSG_PUB.Add;
5416: END IF;
5417:
5418:
5419: FND_MSG_PUB.Count_And_Get

Line 5419: FND_MSG_PUB.Count_And_Get

5415: FND_MSG_PUB.Add;
5416: END IF;
5417:
5418:
5419: FND_MSG_PUB.Count_And_Get
5420: ( p_count => x_msg_count,
5421: p_data => x_msg_data
5422: );
5423:

Line 5440: FND_MSG_PUB.ADD();

5436: --Prepare message token
5437: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5438: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QUALIFIERS');
5439: --Add message to API message list
5440: FND_MSG_PUB.ADD();
5441: --
5442: FND_MSG_PUB.Count_And_Get
5443: ( p_count => x_msg_count,
5444: p_data => x_msg_data

Line 5442: FND_MSG_PUB.Count_And_Get

5438: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QUALIFIERS');
5439: --Add message to API message list
5440: FND_MSG_PUB.ADD();
5441: --
5442: FND_MSG_PUB.Count_And_Get
5443: ( p_count => x_msg_count,
5444: p_data => x_msg_data
5445: );
5446:

Line 5451: FND_MSG_PUB.Count_And_Get

5447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5448: --dbms_output('Delete_Terr_Qualifier: FND_API.G_EXC_UNEXPECTED_ERROR');
5449: ROLLBACK TO Delete_Terr_Qualifier_Pvt;
5450: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5451: FND_MSG_PUB.Count_And_Get
5452: ( p_count => x_msg_count,
5453: p_data => x_msg_data
5454: );
5455:

Line 5459: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

5455:
5456: WHEN OTHERS THEN
5457: --dbms_output('Delete_Terr_Qualifier: OTHERS - ' || SQLERRM);
5458: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5459: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5460: THEN
5461: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Qualifier');
5462: END IF;
5463: END Delete_Terr_Qualifier;

Line 5461: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Qualifier');

5457: --dbms_output('Delete_Terr_Qualifier: OTHERS - ' || SQLERRM);
5458: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5459: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5460: THEN
5461: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Qualifier');
5462: END IF;
5463: END Delete_Terr_Qualifier;
5464: --
5465: -- *******************************************************

Line 5516: FND_MSG_PUB.initialize;

5512: END IF;
5513: -- Initialize message list if p_init_msg_list is set to TRUE.
5514: IF FND_API.to_Boolean( p_init_msg_list )
5515: THEN
5516: FND_MSG_PUB.initialize;
5517: END IF;
5518:
5519: -- Debug Message
5520: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 5520: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5516: FND_MSG_PUB.initialize;
5517: END IF;
5518:
5519: -- Debug Message
5520: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5521: THEN
5522: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5523: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5524: FND_MSG_PUB.Add;

Line 5524: FND_MSG_PUB.Add;

5520: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5521: THEN
5522: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
5523: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
5524: FND_MSG_PUB.Add;
5525: END IF;
5526:
5527: --Initialize the return status to success
5528: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5543: FND_MSG_PUB.ADD();

5539: END IF;
5540: --Prepare message token
5541: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5542: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_VALUES');
5543: FND_MSG_PUB.ADD();
5544:
5545: -- Debug Message
5546: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5547: THEN

Line 5546: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

5542: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_VALUES');
5543: FND_MSG_PUB.ADD();
5544:
5545: -- Debug Message
5546: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5547: THEN
5548: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5549: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name );
5550: FND_MSG_PUB.Add;

Line 5550: FND_MSG_PUB.Add;

5546: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
5547: THEN
5548: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
5549: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name );
5550: FND_MSG_PUB.Add;
5551: END IF;
5552:
5553:
5554: FND_MSG_PUB.Count_And_Get

Line 5554: FND_MSG_PUB.Count_And_Get

5550: FND_MSG_PUB.Add;
5551: END IF;
5552:
5553:
5554: FND_MSG_PUB.Count_And_Get
5555: ( p_count => x_msg_count,
5556: p_data => x_msg_data
5557: );
5558:

Line 5576: FND_MSG_PUB.ADD();

5572: --Prepare message token
5573: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5574: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_VALUES');
5575: --Add message to API message list
5576: FND_MSG_PUB.ADD();
5577: --
5578: FND_MSG_PUB.Count_And_Get
5579: ( p_count => x_msg_count,
5580: p_data => x_msg_data

Line 5578: FND_MSG_PUB.Count_And_Get

5574: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_VALUES');
5575: --Add message to API message list
5576: FND_MSG_PUB.ADD();
5577: --
5578: FND_MSG_PUB.Count_And_Get
5579: ( p_count => x_msg_count,
5580: p_data => x_msg_data
5581: );
5582:

Line 5587: FND_MSG_PUB.Count_And_Get

5583: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5584: --dbms_output('Delete_Terr_Value: FND_API.G_EXC_UNEXPECTED_ERROR');
5585: ROLLBACK TO Delete_Terr_Value_Pvt;
5586: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5587: FND_MSG_PUB.Count_And_Get
5588: ( p_count => x_msg_count,
5589: p_data => x_msg_data
5590: );
5591:

Line 5595: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

5591:
5592: WHEN OTHERS THEN
5593: --dbms_output('Delete_Terr_Value: OTHERS - ' || SQLERRM);
5594: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5595: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5596: THEN
5597: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Value');
5598: END IF;
5599: End Delete_Terr_Value;

Line 5597: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Value');

5593: --dbms_output('Delete_Terr_Value: OTHERS - ' || SQLERRM);
5594: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5595: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5596: THEN
5597: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Value');
5598: END IF;
5599: End Delete_Terr_Value;
5600: --
5601: -- This procedure will check whether the qualifiers passed are

Line 5624: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5620: --dbms_output('Validate P_Terr_Qual_Rec.Qual_Usg_Id - ' || to_char(P_Terr_Qual_Rec.Qual_Usg_Id));
5621: --
5622: if (P_Terr_Qual_Rec.Qual_Usg_Id IS NULL) OR
5623: (P_Terr_Qual_Rec.Qual_Usg_Id = FND_API.G_MISS_NUM ) THEN
5624: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5625: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5626: FND_MESSAGE.Set_Token('COL_NAME', 'QUAL_USG_ID' );
5627: FND_MSG_PUB.ADD;
5628: END IF;

Line 5627: FND_MSG_PUB.ADD;

5623: (P_Terr_Qual_Rec.Qual_Usg_Id = FND_API.G_MISS_NUM ) THEN
5624: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5625: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5626: FND_MESSAGE.Set_Token('COL_NAME', 'QUAL_USG_ID' );
5627: FND_MSG_PUB.ADD;
5628: END IF;
5629: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5630: END IF;
5631:

Line 5670: FND_MSG_PUB.ADD;

5666: WHEN NO_DATA_FOUND THEN
5667: --dbms_output('Validate_Qualifier: NO_DATA_FOUND Exception');
5668: x_return_status := FND_API.G_RET_STS_ERROR ;
5669: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
5670: FND_MSG_PUB.ADD;
5671: FND_MSG_PUB.Count_And_Get
5672: ( P_count => x_msg_count,
5673: P_data => x_msg_data
5674: );

Line 5671: FND_MSG_PUB.Count_And_Get

5667: --dbms_output('Validate_Qualifier: NO_DATA_FOUND Exception');
5668: x_return_status := FND_API.G_RET_STS_ERROR ;
5669: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
5670: FND_MSG_PUB.ADD;
5671: FND_MSG_PUB.Count_And_Get
5672: ( P_count => x_msg_count,
5673: P_data => x_msg_data
5674: );
5675: END;

Line 5688: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5684: AND QUAL_USG_ID = P_Terr_Qual_Rec.Qual_Usg_Id ;
5685:
5686: IF ( l_qual_count IS NOT NULL ) AND
5687: ( l_qual_count > 0 ) THEN
5688: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5689: FND_MESSAGE.Set_Name('JTF', 'JTY_DUPLICATE_QUALIFIER');
5690: FND_MSG_PUB.ADD;
5691: END IF;
5692: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 5690: FND_MSG_PUB.ADD;

5686: IF ( l_qual_count IS NOT NULL ) AND
5687: ( l_qual_count > 0 ) THEN
5688: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5689: FND_MESSAGE.Set_Name('JTF', 'JTY_DUPLICATE_QUALIFIER');
5690: FND_MSG_PUB.ADD;
5691: END IF;
5692: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5693: END IF;
5694: END IF ;

Line 5699: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5695:
5696: /* -- Check for ORG_ID - obsolete: org_id is optional
5697: IF (P_Terr_Qual_Rec.ORG_ID is NULL OR
5698: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN
5699: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5700: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5701: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5702: FND_MSG_PUB.ADD;
5703: END IF;

Line 5702: FND_MSG_PUB.ADD;

5698: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN
5699: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5700: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5701: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5702: FND_MSG_PUB.ADD;
5703: END IF;
5704: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5705: End If;
5706: */

Line 5711: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5707:
5708: -- Validate last updated by
5709: IF ( P_Terr_Qual_Rec.LAST_UPDATED_BY is NULL OR
5710: P_Terr_Qual_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5711: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5712: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5713: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5714: FND_MSG_PUB.ADD;
5715: END IF;

Line 5714: FND_MSG_PUB.ADD;

5710: P_Terr_Qual_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5711: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5712: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5713: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5714: FND_MSG_PUB.ADD;
5715: END IF;
5716: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5717: End If;
5718:

Line 5722: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5718:
5719: -- Check last update date
5720: If ( P_Terr_Qual_Rec.LAST_UPDATE_DATE IS NULL OR
5721: P_Terr_Qual_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5722: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5723: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5724: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5725: FND_MSG_PUB.ADD;
5726: END IF;

Line 5725: FND_MSG_PUB.ADD;

5721: P_Terr_Qual_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5722: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5723: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5724: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5725: FND_MSG_PUB.ADD;
5726: END IF;
5727: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5728: End If;
5729:

Line 5734: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5730: --
5731: --Check last update login
5732: If ( P_Terr_Qual_Rec.LAST_UPDATE_LOGIN is NULL OR
5733: P_Terr_Qual_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5734: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5735: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5736: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5737: FND_MSG_PUB.ADD;
5738: END IF;

Line 5737: FND_MSG_PUB.ADD;

5733: P_Terr_Qual_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5734: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5735: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5736: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5737: FND_MSG_PUB.ADD;
5738: END IF;
5739: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5740: End If;
5741: --

Line 5744: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

5740: End If;
5741: --
5742:
5743: --
5744: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
5745: p_data => x_msg_data);
5746:
5747: --dbms_output('Validate_Qualifier: Exiting API');
5748: EXCEPTION

Line 5754: FND_MSG_PUB.ADD;

5750: WHEN NO_DATA_FOUND THEN
5751: --dbms_output('Validate_Qualifier: NO_DATA_FOUND Exception');
5752: x_return_status := FND_API.G_RET_STS_ERROR ;
5753: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
5754: FND_MSG_PUB.ADD;
5755: FND_MSG_PUB.Count_And_Get
5756: ( P_count => x_msg_count,
5757: P_data => x_msg_data
5758: );

Line 5755: FND_MSG_PUB.Count_And_Get

5751: --dbms_output('Validate_Qualifier: NO_DATA_FOUND Exception');
5752: x_return_status := FND_API.G_RET_STS_ERROR ;
5753: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
5754: FND_MSG_PUB.ADD;
5755: FND_MSG_PUB.Count_And_Get
5756: ( P_count => x_msg_count,
5757: P_data => x_msg_data
5758: );
5759:

Line 5766: FND_MSG_PUB.ADD;

5762: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5763: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5764: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifer' );
5765: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
5766: FND_MSG_PUB.ADD;
5767: FND_MSG_PUB.Count_And_Get
5768: ( P_count => x_msg_count,
5769: P_data => x_msg_data
5770: );

Line 5767: FND_MSG_PUB.Count_And_Get

5763: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5764: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifer' );
5765: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
5766: FND_MSG_PUB.ADD;
5767: FND_MSG_PUB.Count_And_Get
5768: ( P_count => x_msg_count,
5769: P_data => x_msg_data
5770: );
5771: --

Line 5798: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5794:
5795: -- Check whether the territory Name is specified
5796: --
5797: IF (p_Terr_All_Rec.NAME is NULL) OR (p_Terr_All_Rec.NAME = FND_API.G_MISS_CHAR) THEN
5798: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5799: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5800: FND_MESSAGE.Set_Token('COL_NAME', 'NAME' );
5801: FND_MSG_PUB.ADD;
5802: END IF;

Line 5801: FND_MSG_PUB.ADD;

5797: IF (p_Terr_All_Rec.NAME is NULL) OR (p_Terr_All_Rec.NAME = FND_API.G_MISS_CHAR) THEN
5798: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5799: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5800: FND_MESSAGE.Set_Token('COL_NAME', 'NAME' );
5801: FND_MSG_PUB.ADD;
5802: END IF;
5803: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5804: ELSE -- Territory Name is not null.
5805: -- Check for Duplicate Territory Names.

Line 5825: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5821: or ((childterr.START_DATE_ACTIVE >= p_Terr_All_Rec.START_DATE_ACTIVE and childterr.START_DATE_ACTIVE <= p_Terr_All_Rec.END_DATE_ACTIVE)
5822: or (childterr.END_DATE_ACTIVE >= p_Terr_All_Rec.START_DATE_ACTIVE and childterr.END_DATE_ACTIVE <= p_Terr_All_Rec.END_DATE_ACTIVE)));
5823:
5824: IF l_ter_name_count IS NOT NULL AND l_ter_name_count > 0 THEN
5825: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5826: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_DUP_NAME');
5827: FND_MESSAGE.Set_Token('TERR_NAME', p_Terr_All_Rec.NAME );
5828: FND_MSG_PUB.ADD;
5829: END IF;

Line 5828: FND_MSG_PUB.ADD;

5824: IF l_ter_name_count IS NOT NULL AND l_ter_name_count > 0 THEN
5825: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5826: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_DUP_NAME');
5827: FND_MESSAGE.Set_Token('TERR_NAME', p_Terr_All_Rec.NAME );
5828: FND_MSG_PUB.ADD;
5829: END IF;
5830: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5831: END IF;
5832: END IF;

Line 5839: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5835: -- Parent Terr ID can't be null.
5836: If (p_Terr_All_Rec.PARENT_TERRITORY_ID is null) OR
5837: (p_Terr_All_Rec.PARENT_TERRITORY_ID = FND_API.G_MISS_NUM)
5838: Then
5839: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5840: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5841: FND_MESSAGE.Set_Token('COL_NAME', 'PARENT_TERRITORY_ID' );
5842: FND_MSG_PUB.ADD;
5843: END IF;

Line 5842: FND_MSG_PUB.ADD;

5838: Then
5839: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5840: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5841: FND_MESSAGE.Set_Token('COL_NAME', 'PARENT_TERRITORY_ID' );
5842: FND_MSG_PUB.ADD;
5843: END IF;
5844: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5845: END IF;
5846:

Line 5853: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5849: If (p_Terr_All_Rec.TERRITORY_TYPE_ID is null) OR
5850: (p_Terr_All_Rec.TERRITORY_TYPE_ID = FND_API.G_MISS_NUM)
5851: then
5852:
5853: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5854: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5855: FND_MESSAGE.Set_Token('COL_NAME', 'TERRITORY_TYPE_ID' );
5856: FND_MSG_PUB.ADD;
5857: END IF;

Line 5856: FND_MSG_PUB.ADD;

5852:
5853: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5854: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5855: FND_MESSAGE.Set_Token('COL_NAME', 'TERRITORY_TYPE_ID' );
5856: FND_MSG_PUB.ADD;
5857: END IF;
5858: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5859: End If;
5860:

Line 5865: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5861: -- Check whether application short name is specified
5862: --
5863: IF (p_Terr_All_Rec.APPLICATION_SHORT_NAME is NULL) OR
5864: (p_Terr_All_Rec.APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR) THEN
5865: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5866: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5867: FND_MESSAGE.Set_Token('COL_NAME', 'APPLICATION_SHORT_NAME' );
5868: FND_MSG_PUB.ADD;
5869: END IF;

Line 5868: FND_MSG_PUB.ADD;

5864: (p_Terr_All_Rec.APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR) THEN
5865: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5866: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5867: FND_MESSAGE.Set_Token('COL_NAME', 'APPLICATION_SHORT_NAME' );
5868: FND_MSG_PUB.ADD;
5869: END IF;
5870: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5871: End If;
5872:

Line 5878: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5874: -- Obsolete: use date effectivity to determine
5875: -- whether territory is enabled
5876: IF (p_Terr_All_Rec.ENABLED_FLAG is NULL) OR
5877: (p_Terr_All_Rec.ENABLED_FLAG = FND_API.G_MISS_CHAR) THEN
5878: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5879: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5880: FND_MESSAGE.Set_Token('COL_NAME', 'ENABLED_FLAG' );
5881: FND_MSG_PUB.ADD;
5882: END IF;

Line 5881: FND_MSG_PUB.ADD;

5877: (p_Terr_All_Rec.ENABLED_FLAG = FND_API.G_MISS_CHAR) THEN
5878: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5879: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5880: FND_MESSAGE.Set_Token('COL_NAME', 'ENABLED_FLAG' );
5881: FND_MSG_PUB.ADD;
5882: END IF;
5883: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5884: End If;
5885: */

Line 5890: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5886:
5887: -- Check for ORG_ID
5888: IF (p_Terr_All_Rec.ORG_ID is NULL) OR
5889: (p_Terr_All_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
5890: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5891: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5892: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5893: FND_MSG_PUB.ADD;
5894: END IF;

Line 5893: FND_MSG_PUB.ADD;

5889: (p_Terr_All_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
5890: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5891: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5892: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5893: FND_MSG_PUB.ADD;
5894: END IF;
5895: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5896: End If;
5897:

Line 5900: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5896: End If;
5897:
5898: If (p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG = 'Y' and
5899: p_Terr_All_Rec.TEMPLATE_FLAG = 'Y' ) Then
5900: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5901: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_OVERLAPPING_FLAG');
5902: FND_MSG_PUB.ADD;
5903: END IF;
5904: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 5902: FND_MSG_PUB.ADD;

5898: If (p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG = 'Y' and
5899: p_Terr_All_Rec.TEMPLATE_FLAG = 'Y' ) Then
5900: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5901: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_OVERLAPPING_FLAG');
5902: FND_MSG_PUB.ADD;
5903: END IF;
5904: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5905: End If;
5906:

Line 5910: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5906:
5907: --Check created by
5908: IF ( p_Terr_All_Rec.CREATED_BY is NULL OR
5909: p_Terr_All_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
5910: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5911: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5912: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5913: FND_MSG_PUB.ADD;
5914: END IF;

Line 5913: FND_MSG_PUB.ADD;

5909: p_Terr_All_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
5910: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5911: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5912: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5913: FND_MSG_PUB.ADD;
5914: END IF;
5915: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5916: End If;
5917:

Line 5921: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5917:
5918: --Check creation date
5919: If ( p_Terr_All_Rec.CREATION_DATE is NULL OR
5920: p_Terr_All_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
5921: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5922: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5923: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5924: FND_MSG_PUB.ADD;
5925: END IF;

Line 5924: FND_MSG_PUB.ADD;

5920: p_Terr_All_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
5921: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5922: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5923: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5924: FND_MSG_PUB.ADD;
5925: END IF;
5926: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5927: End If;
5928:

Line 5932: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5928:
5929: -- Validate last updated by
5930: IF ( p_Terr_All_Rec.LAST_UPDATED_BY is NULL OR
5931: p_Terr_All_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5932: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5933: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5934: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5935: FND_MSG_PUB.ADD;
5936: END IF;

Line 5935: FND_MSG_PUB.ADD;

5931: p_Terr_All_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5932: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5933: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5934: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5935: FND_MSG_PUB.ADD;
5936: END IF;
5937: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5938: End If;
5939:

Line 5943: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5939:
5940: -- Check last update date
5941: If ( p_Terr_All_Rec.LAST_UPDATE_DATE IS NULL OR
5942: p_Terr_All_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5943: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5944: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5945: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5946: FND_MSG_PUB.ADD;
5947: END IF;

Line 5946: FND_MSG_PUB.ADD;

5942: p_Terr_All_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5943: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5944: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5945: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5946: FND_MSG_PUB.ADD;
5947: END IF;
5948: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5949: End If;
5950:

Line 5954: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5950:
5951: --Check last update login
5952: --If ( p_Terr_All_Rec.LAST_UPDATE_LOGIN is NULL OR
5953: -- p_Terr_All_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5954: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5955: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5956: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5957: -- FND_MSG_PUB.ADD;
5958: -- END IF;

Line 5957: -- FND_MSG_PUB.ADD;

5953: -- p_Terr_All_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5954: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5955: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5956: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5957: -- FND_MSG_PUB.ADD;
5958: -- END IF;
5959: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
5960: --End If;
5961:

Line 5965: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5961:
5962: --Check start date active
5963: If ( p_Terr_All_Rec.START_DATE_ACTIVE IS NULL OR
5964: p_Terr_All_Rec.START_DATE_ACTIVE = FND_API.G_MISS_DATE ) THEN
5965: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5966: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5967: FND_MESSAGE.Set_Token('COL_NAME', 'START_DATE_ACTIVE' );
5968: FND_MSG_PUB.ADD;
5969: END IF;

Line 5968: FND_MSG_PUB.ADD;

5964: p_Terr_All_Rec.START_DATE_ACTIVE = FND_API.G_MISS_DATE ) THEN
5965: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5966: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5967: FND_MESSAGE.Set_Token('COL_NAME', 'START_DATE_ACTIVE' );
5968: FND_MSG_PUB.ADD;
5969: END IF;
5970: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5971: End If;
5972:

Line 5976: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5972:
5973: --Check End date active
5974: If ( p_Terr_All_Rec.END_DATE_ACTIVE IS NULL OR
5975: p_Terr_All_Rec.END_DATE_ACTIVE = FND_API.G_MISS_DATE ) THEN
5976: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5977: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5978: FND_MESSAGE.Set_Token('COL_NAME', 'END_DATE_ACTIVE' );
5979: FND_MSG_PUB.ADD;
5980: END IF;

Line 5979: FND_MSG_PUB.ADD;

5975: p_Terr_All_Rec.END_DATE_ACTIVE = FND_API.G_MISS_DATE ) THEN
5976: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5977: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5978: FND_MESSAGE.Set_Token('COL_NAME', 'END_DATE_ACTIVE' );
5979: FND_MSG_PUB.ADD;
5980: END IF;
5981: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5982: End If;
5983:

Line 5987: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5983:
5984: IF (p_Terr_All_Rec.START_DATE_ACTIVE IS NOT NULL AND p_Terr_All_Rec.START_DATE_ACTIVE <> FND_API.G_MISS_DATE )
5985: AND (p_Terr_All_Rec.END_DATE_ACTIVE IS NOT NULL AND p_Terr_All_Rec.END_DATE_ACTIVE <> FND_API.G_MISS_DATE ) THEN
5986: IF ( p_Terr_All_Rec.START_DATE_ACTIVE > p_Terr_All_Rec.END_DATE_ACTIVE ) THEN
5987: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5988: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_END_BAD');
5989: FND_MSG_PUB.ADD;
5990: END IF;
5991: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 5989: FND_MSG_PUB.ADD;

5985: AND (p_Terr_All_Rec.END_DATE_ACTIVE IS NOT NULL AND p_Terr_All_Rec.END_DATE_ACTIVE <> FND_API.G_MISS_DATE ) THEN
5986: IF ( p_Terr_All_Rec.START_DATE_ACTIVE > p_Terr_All_Rec.END_DATE_ACTIVE ) THEN
5987: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5988: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_END_BAD');
5989: FND_MSG_PUB.ADD;
5990: END IF;
5991: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5992: END IF;
5993: END IF;

Line 5998: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5994:
5995: --Check Rank
5996: If ( p_Terr_All_Rec.RANK IS NULL OR
5997: p_Terr_All_Rec.RANK = FND_API.G_MISS_NUM ) THEN
5998: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5999: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6000: FND_MESSAGE.Set_Token('COL_NAME', 'RANK' );
6001: FND_MSG_PUB.ADD;
6002: END IF;

Line 6001: FND_MSG_PUB.ADD;

5997: p_Terr_All_Rec.RANK = FND_API.G_MISS_NUM ) THEN
5998: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5999: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6000: FND_MESSAGE.Set_Token('COL_NAME', 'RANK' );
6001: FND_MSG_PUB.ADD;
6002: END IF;
6003: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6004: End If;
6005:

Line 6045: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

6041: End If;
6042:
6043: -- Since the message stack is already set
6044: --
6045: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6046: p_data => x_msg_data);
6047:
6048: EXCEPTION
6049: --

Line 6053: FND_MSG_PUB.Count_And_Get

6049: --
6050: WHEN FND_API.G_EXC_ERROR THEN
6051: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
6052: x_return_status := FND_API.G_RET_STS_ERROR ;
6053: FND_MSG_PUB.Count_And_Get
6054: ( P_count => x_msg_count,
6055: P_data => x_msg_data
6056: );
6057:

Line 6061: FND_MSG_PUB.Count_And_Get

6057:
6058: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6059: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
6060: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6061: FND_MSG_PUB.Count_And_Get
6062: ( P_count => x_msg_count,
6063: P_data => x_msg_data
6064: );
6065:

Line 6072: FND_MSG_PUB.ADD;

6068: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6069: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6070: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Record' );
6071: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6072: FND_MSG_PUB.ADD;
6073: FND_MSG_PUB.Count_And_Get
6074: ( P_count => x_msg_count,
6075: P_data => x_msg_data
6076: );

Line 6073: FND_MSG_PUB.Count_And_Get

6069: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6070: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Record' );
6071: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6072: FND_MSG_PUB.ADD;
6073: FND_MSG_PUB.Count_And_Get
6074: ( P_count => x_msg_count,
6075: P_data => x_msg_data
6076: );
6077: --

Line 6113: FND_MSG_PUB.ADD;

6109: --dbms_output('Validate_Territory_Usage: l_status <> FND_API.G_TRUE');
6110: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6111: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
6112: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
6113: FND_MSG_PUB.ADD;
6114: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6115: ELSE
6116: -- Terr_ID Is valid.
6117: SELECT name,

Line 6167: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6163: or ((childterr.START_DATE_ACTIVE >= l_start_date_active and childterr.START_DATE_ACTIVE <= l_end_date_active)
6164: or (childterr.END_DATE_ACTIVE >= l_start_date_active and childterr.END_DATE_ACTIVE <= l_end_date_active)));
6165:
6166: IF l_ter_name_count IS NOT NULL AND l_ter_name_count > 0 THEN
6167: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6168: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_DUP_NAME');
6169: FND_MESSAGE.Set_Token('TERR_NAME', p_Terr_All_Rec.NAME );
6170: FND_MSG_PUB.ADD;
6171: END IF;

Line 6170: FND_MSG_PUB.ADD;

6166: IF l_ter_name_count IS NOT NULL AND l_ter_name_count > 0 THEN
6167: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6168: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_DUP_NAME');
6169: FND_MESSAGE.Set_Token('TERR_NAME', p_Terr_All_Rec.NAME );
6170: FND_MSG_PUB.ADD;
6171: END IF;
6172: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6173: END IF;
6174: END IF;

Line 6180: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6176:
6177: IF (l_start_date_active IS NOT NULL )
6178: AND (l_end_date_active IS NOT NULL ) THEN
6179: IF ( l_start_date_active > l_end_date_active ) THEN
6180: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6181: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_END_BAD');
6182: FND_MSG_PUB.ADD;
6183: END IF;
6184: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 6182: FND_MSG_PUB.ADD;

6178: AND (l_end_date_active IS NOT NULL ) THEN
6179: IF ( l_start_date_active > l_end_date_active ) THEN
6180: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6181: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_END_BAD');
6182: FND_MSG_PUB.ADD;
6183: END IF;
6184: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6185: END IF;
6186: END IF;

Line 6199: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6195: WHERE jta.terr_id = l_parent_territory_id ;
6196:
6197: -- Validate Terr start date .
6198: IF ( l_start_date_active IS NOT NULL ) AND ( ( l_start_date_active < l_pterr_start_date ) OR ( l_start_date_active > l_pterr_end_date ) ) THEN
6199: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6200: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_STARTDATE_NOT_VALID');
6201: FND_MESSAGE.Set_Token('RES_NAME', ' ' );
6202: FND_MSG_PUB.ADD;
6203: END IF;

Line 6202: FND_MSG_PUB.ADD;

6198: IF ( l_start_date_active IS NOT NULL ) AND ( ( l_start_date_active < l_pterr_start_date ) OR ( l_start_date_active > l_pterr_end_date ) ) THEN
6199: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6200: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_STARTDATE_NOT_VALID');
6201: FND_MESSAGE.Set_Token('RES_NAME', ' ' );
6202: FND_MSG_PUB.ADD;
6203: END IF;
6204: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6205: END IF;
6206:

Line 6209: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6205: END IF;
6206:
6207: -- Validate Terr end date.
6208: IF (l_end_date_active IS NOT NULL ) AND (( l_end_date_active < l_pterr_start_date ) OR ( l_end_date_active > l_pterr_end_date ) ) THEN
6209: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6210: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_ENDDATE_NOT_VALID');
6211: FND_MESSAGE.Set_Token('RES_NAME', ' ' );
6212: FND_MSG_PUB.ADD;
6213: END IF;

Line 6212: FND_MSG_PUB.ADD;

6208: IF (l_end_date_active IS NOT NULL ) AND (( l_end_date_active < l_pterr_start_date ) OR ( l_end_date_active > l_pterr_end_date ) ) THEN
6209: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6210: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_ENDDATE_NOT_VALID');
6211: FND_MESSAGE.Set_Token('RES_NAME', ' ' );
6212: FND_MSG_PUB.ADD;
6213: END IF;
6214: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6215: END IF;
6216:

Line 6220: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

6216:
6217: EXCEPTION
6218: WHEN OTHERS THEN
6219: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6220: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
6221: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Others Exception in Validate_Terr_Record ' || SQLERRM);
6222: END IF;
6223: END;
6224: END IF; --l_parent_terr_id IS NOT NULL AND l_parent_terr_id <> 1

Line 6221: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Others Exception in Validate_Terr_Record ' || SQLERRM);

6217: EXCEPTION
6218: WHEN OTHERS THEN
6219: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6220: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
6221: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Others Exception in Validate_Terr_Record ' || SQLERRM);
6222: END IF;
6223: END;
6224: END IF; --l_parent_terr_id IS NOT NULL AND l_parent_terr_id <> 1
6225:

Line 6247: FND_MSG_PUB.ADD;

6243: EXCEPTION
6244: WHEN NO_DATA_FOUND THEN
6245: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
6246: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_terr_all_rec.PARENT_TERRITORY_ID));
6247: FND_MSG_PUB.ADD;
6248: END;
6249:
6250: If (p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG = 'Y' and
6251: p_Terr_All_Rec.TEMPLATE_FLAG = 'Y' ) Then

Line 6252: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6248: END;
6249:
6250: If (p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG = 'Y' and
6251: p_Terr_All_Rec.TEMPLATE_FLAG = 'Y' ) Then
6252: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6253: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_OVERLAPPING_FLAG');
6254: FND_MSG_PUB.ADD;
6255: END IF;
6256: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 6254: FND_MSG_PUB.ADD;

6250: If (p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG = 'Y' and
6251: p_Terr_All_Rec.TEMPLATE_FLAG = 'Y' ) Then
6252: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6253: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_OVERLAPPING_FLAG');
6254: FND_MSG_PUB.ADD;
6255: END IF;
6256: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6257: End If;
6258:

Line 6262: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6258:
6259: -- Validate last updated by
6260: IF ( p_Terr_All_Rec.LAST_UPDATED_BY is NULL OR
6261: p_Terr_All_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6262: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6263: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6264: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6265: FND_MSG_PUB.ADD;
6266: END IF;

Line 6265: FND_MSG_PUB.ADD;

6261: p_Terr_All_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6262: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6263: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6264: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6265: FND_MSG_PUB.ADD;
6266: END IF;
6267: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6268: End If;
6269:

Line 6273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6269:
6270: -- Check last update date
6271: If ( p_Terr_All_Rec.LAST_UPDATE_DATE IS NULL OR
6272: p_Terr_All_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6274: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6275: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6276: FND_MSG_PUB.ADD;
6277: END IF;

Line 6276: FND_MSG_PUB.ADD;

6272: p_Terr_All_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6273: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6274: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6275: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6276: FND_MSG_PUB.ADD;
6277: END IF;
6278: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6279: End If;
6280:

Line 6284: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6280:
6281: --Check last update login
6282: If ( p_Terr_All_Rec.LAST_UPDATE_LOGIN is NULL OR
6283: p_Terr_All_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6284: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6285: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6286: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6287: FND_MSG_PUB.ADD;
6288: END IF;

Line 6287: FND_MSG_PUB.ADD;

6283: p_Terr_All_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6284: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6285: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6286: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6287: FND_MSG_PUB.ADD;
6288: END IF;
6289: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6290: End If;
6291:

Line 6305: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

6301: End If;
6302:
6303: -- Since the message stack is already set
6304: --
6305: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6306: p_data => x_msg_data);
6307:
6308: EXCEPTION
6309: --

Line 6313: FND_MSG_PUB.Count_And_Get

6309: --
6310: WHEN FND_API.G_EXC_ERROR THEN
6311: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
6312: x_return_status := FND_API.G_RET_STS_ERROR ;
6313: FND_MSG_PUB.Count_And_Get
6314: ( P_count => x_msg_count,
6315: P_data => x_msg_data
6316: );
6317:

Line 6321: FND_MSG_PUB.Count_And_Get

6317:
6318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6319: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
6320: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6321: FND_MSG_PUB.Count_And_Get
6322: ( P_count => x_msg_count,
6323: P_data => x_msg_data
6324: );
6325:

Line 6332: FND_MSG_PUB.ADD;

6328: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6329: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6330: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_TerrRec_Update' );
6331: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6332: FND_MSG_PUB.ADD;
6333: FND_MSG_PUB.Count_And_Get
6334: ( P_count => x_msg_count,
6335: P_data => x_msg_data
6336: );

Line 6333: FND_MSG_PUB.Count_And_Get

6329: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6330: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_TerrRec_Update' );
6331: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6332: FND_MSG_PUB.ADD;
6333: FND_MSG_PUB.Count_And_Get
6334: ( P_count => x_msg_count,
6335: P_data => x_msg_data
6336: );
6337: --

Line 6367: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6363: --
6364: l_parent_terr_id := p_Terr_All_Rec.parent_territory_Id;
6365: --dbms_output('Validate_Foreign_Key: Returned from JTF_CTM_UTILITY_PVT.fk_id_is_valid');
6366: IF JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_parent_terr_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
6367: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6368: --dbms_output('PARENT Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6369: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
6370: FND_MESSAGE.Set_Token('TERR_ID', to_char(l_parent_terr_id));
6371: FND_MSG_PUB.ADD;

Line 6371: FND_MSG_PUB.ADD;

6367: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6368: --dbms_output('PARENT Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6369: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
6370: FND_MESSAGE.Set_Token('TERR_ID', to_char(l_parent_terr_id));
6371: FND_MSG_PUB.ADD;
6372: End If;
6373: x_return_status := FND_API.G_RET_STS_ERROR;
6374: ELSE
6375: -- Parent Terr is Valid. Hence compare the Start Date active and End Date Active with Child's

Line 6386: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6382: WHERE TERR_ID = p_Terr_All_Rec.PARENT_TERRITORY_ID;
6383:
6384: IF PSTART_DATE_ACTIVE is NOT NULL
6385: AND PSTART_DATE_ACTIVE > p_Terr_All_Rec.START_DATE_ACTIVE THEN
6386: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6387: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_STARTDATE_NOT_VALID');
6388: FND_MSG_PUB.ADD;
6389: END IF;
6390: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 6388: FND_MSG_PUB.ADD;

6384: IF PSTART_DATE_ACTIVE is NOT NULL
6385: AND PSTART_DATE_ACTIVE > p_Terr_All_Rec.START_DATE_ACTIVE THEN
6386: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6387: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_STARTDATE_NOT_VALID');
6388: FND_MSG_PUB.ADD;
6389: END IF;
6390: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6391: END IF;
6392:

Line 6395: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6391: END IF;
6392:
6393: IF PEND_DATE_ACTIVE is NOT NULL
6394: AND PEND_DATE_ACTIVE < p_Terr_All_Rec.END_DATE_ACTIVE THEN
6395: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6396: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_ENDDATE_NOT_VALID');
6397: FND_MSG_PUB.ADD;
6398: END IF;
6399: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 6397: FND_MSG_PUB.ADD;

6393: IF PEND_DATE_ACTIVE is NOT NULL
6394: AND PEND_DATE_ACTIVE < p_Terr_All_Rec.END_DATE_ACTIVE THEN
6395: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6396: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_ENDDATE_NOT_VALID');
6397: FND_MSG_PUB.ADD;
6398: END IF;
6399: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6400: END IF;
6401: END IF ;

Line 6414: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6410: then
6411: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TERRITORY_TYPE_ID, 'TERR_TYPE_ID', 'JTF_TERR_TYPES_ALL');
6412: If l_status <> FND_API.G_TRUE Then
6413: x_return_status := FND_API.G_RET_STS_ERROR;
6414: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6415: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6416: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');
6417: FND_MESSAGE.Set_Token('TERR_TYPE_ID', to_char(p_Terr_All_Rec.TERRITORY_TYPE_ID));
6418: FND_MSG_PUB.ADD;

Line 6418: FND_MSG_PUB.ADD;

6414: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6415: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6416: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');
6417: FND_MESSAGE.Set_Token('TERR_TYPE_ID', to_char(p_Terr_All_Rec.TERRITORY_TYPE_ID));
6418: FND_MSG_PUB.ADD;
6419: End If;
6420: End If;
6421: End If;
6422: --

Line 6431: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6427: then
6428: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.ORG_ID, 'ORGANIZATION_ID', 'HR_OPERATING_UNITS');
6429: If l_status <> FND_API.G_TRUE Then
6430: x_return_status := FND_API.G_RET_STS_ERROR;
6431: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6432: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6433: --Change the message name here
6434: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_MISSING_ORG_ID');
6435: FND_MESSAGE.Set_Token('ORG_ID', to_char(p_Terr_All_Rec.ORG_ID));

Line 6436: FND_MSG_PUB.ADD;

6432: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6433: --Change the message name here
6434: FND_MESSAGE.Set_Name('JTF', 'JTY_TERR_MISSING_ORG_ID');
6435: FND_MESSAGE.Set_Token('ORG_ID', to_char(p_Terr_All_Rec.ORG_ID));
6436: FND_MSG_PUB.ADD;
6437: End If;
6438: End If;
6439: End If;
6440: --

Line 6448: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6444: (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
6445: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID, 'TERR_ID', 'JTF_TERR_ALL');
6446: if l_status <> FND_API.G_TRUE Then
6447: x_return_status := FND_API.G_RET_STS_ERROR;
6448: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6449: --dbms_output('TEMP: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6450: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TEMP_TERR');
6451: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID));
6452: FND_MSG_PUB.ADD;

Line 6452: FND_MSG_PUB.ADD;

6448: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6449: --dbms_output('TEMP: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6450: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TEMP_TERR');
6451: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID));
6452: FND_MSG_PUB.ADD;
6453: End If;
6454: End If;
6455: End If;
6456: --

Line 6464: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6460: (p_Terr_All_Rec.ESCALATION_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
6461: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.escalation_territory_id, 'TERR_ID', 'JTF_TERR_ALL');
6462: if l_status <> FND_API.G_TRUE Then
6463: x_return_status := FND_API.G_RET_STS_ERROR;
6464: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6465: --dbms_output('ESC TERR: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6466: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_ESC_TERR');
6467: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.terr_Id));
6468: FND_MSG_PUB.ADD;

Line 6468: FND_MSG_PUB.ADD;

6464: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6465: --dbms_output('ESC TERR: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6466: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_ESC_TERR');
6467: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.terr_Id));
6468: FND_MSG_PUB.ADD;
6469: End If;
6470: End If;
6471: End If;
6472:

Line 6474: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

6470: End If;
6471: End If;
6472:
6473: --
6474: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6475: p_data => x_msg_data);
6476: EXCEPTION
6477: --
6478: WHEN OTHERS THEN

Line 6484: FND_MSG_PUB.ADD;

6480: X_return_status := FND_API.G_RET_STS_ERROR;
6481: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6482: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Foreign_Key' );
6483: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6484: FND_MSG_PUB.ADD;
6485: FND_MSG_PUB.Count_And_Get
6486: ( p_count => x_msg_count,
6487: p_data => x_msg_data
6488: );

Line 6485: FND_MSG_PUB.Count_And_Get

6481: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6482: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Foreign_Key' );
6483: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6484: FND_MSG_PUB.ADD;
6485: FND_MSG_PUB.Count_And_Get
6486: ( p_count => x_msg_count,
6487: p_data => x_msg_data
6488: );
6489: --

Line 6524: FND_MSG_PUB.ADD;

6520: --dbms_output('Validate_Territory_Usage: l_status <> FND_API.G_TRUE');
6521: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6522: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
6523: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
6524: FND_MSG_PUB.ADD;
6525: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6526: End If;
6527: --dbms_output('Validate_Territory_Usage: TERR_ID(' || to_char(l_Validate_id) || ') is valid');
6528: End If;

Line 6534: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6530: -- Validate the source_id
6531: l_Validate_id := p_Terr_Usgs_rec.SOURCE_ID;
6532: -- Make sure the foreign key source_id is valid
6533: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'SOURCE_ID', 'JTF_SOURCES_ALL') <> FND_API.G_TRUE Then
6534: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6535: --dbms_output('Validate_Territory_Usage: FND_MSG_PUB.ADD');
6536: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6537: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_SOURCES');
6538: FND_MESSAGE.Set_Token('COLUMN_NAME', 'SOURCE_ID');

Line 6535: --dbms_output('Validate_Territory_Usage: FND_MSG_PUB.ADD');

6531: l_Validate_id := p_Terr_Usgs_rec.SOURCE_ID;
6532: -- Make sure the foreign key source_id is valid
6533: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'SOURCE_ID', 'JTF_SOURCES_ALL') <> FND_API.G_TRUE Then
6534: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6535: --dbms_output('Validate_Territory_Usage: FND_MSG_PUB.ADD');
6536: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6537: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_SOURCES');
6538: FND_MESSAGE.Set_Token('COLUMN_NAME', 'SOURCE_ID');
6539: FND_MSG_PUB.ADD;

Line 6539: FND_MSG_PUB.ADD;

6535: --dbms_output('Validate_Territory_Usage: FND_MSG_PUB.ADD');
6536: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6537: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_SOURCES');
6538: FND_MESSAGE.Set_Token('COLUMN_NAME', 'SOURCE_ID');
6539: FND_MSG_PUB.ADD;
6540: End If;
6541: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6542: End If;
6543:

Line 6548: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6544:
6545:
6546: -- Check for ORG_ID
6547: IF JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_Usgs_rec.ORG_ID, 'ORGANIZATION_ID', 'HR_OPERATING_UNITS') <> FND_API.G_TRUE THEN
6548: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6549: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6550: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');
6551: FND_MESSAGE.Set_Token('ORG_ID', to_char(p_Terr_Usgs_rec.ORG_ID));
6552: FND_MSG_PUB.ADD;

Line 6552: FND_MSG_PUB.ADD;

6548: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6549: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6550: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');
6551: FND_MESSAGE.Set_Token('ORG_ID', to_char(p_Terr_Usgs_rec.ORG_ID));
6552: FND_MSG_PUB.ADD;
6553: End If;
6554: x_return_status := FND_API.G_RET_STS_ERROR;
6555: End If;
6556:

Line 6560: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6556:
6557: --Check created by
6558: IF ( p_Terr_Usgs_rec.CREATED_BY is NULL OR
6559: p_Terr_Usgs_rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
6560: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6561: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6562: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
6563: FND_MSG_PUB.ADD;
6564: END IF;

Line 6563: FND_MSG_PUB.ADD;

6559: p_Terr_Usgs_rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
6560: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6561: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6562: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
6563: FND_MSG_PUB.ADD;
6564: END IF;
6565: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6566: End If;
6567:

Line 6571: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6567:
6568: --Check creation date
6569: If ( p_Terr_Usgs_rec.CREATION_DATE is NULL OR
6570: p_Terr_Usgs_rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
6571: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6572: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6573: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
6574: FND_MSG_PUB.ADD;
6575: END IF;

Line 6574: FND_MSG_PUB.ADD;

6570: p_Terr_Usgs_rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
6571: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6572: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6573: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
6574: FND_MSG_PUB.ADD;
6575: END IF;
6576: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6577: End If;
6578:

Line 6582: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6578:
6579: -- Validate last updated by
6580: IF ( p_Terr_Usgs_rec.LAST_UPDATED_BY is NULL OR
6581: p_Terr_Usgs_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6582: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6583: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6584: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6585: FND_MSG_PUB.ADD;
6586: END IF;

Line 6585: FND_MSG_PUB.ADD;

6581: p_Terr_Usgs_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6582: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6583: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6584: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6585: FND_MSG_PUB.ADD;
6586: END IF;
6587: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6588: End If;
6589:

Line 6593: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6589:
6590: -- Check last update date
6591: If ( p_Terr_Usgs_rec.LAST_UPDATE_DATE IS NULL OR
6592: p_Terr_Usgs_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6593: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6594: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6595: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6596: FND_MSG_PUB.ADD;
6597: END IF;

Line 6596: FND_MSG_PUB.ADD;

6592: p_Terr_Usgs_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6593: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6594: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6595: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6596: FND_MSG_PUB.ADD;
6597: END IF;
6598: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6599: End If;
6600:

Line 6604: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6600:
6601: --Check last update login
6602: --If ( p_Terr_Usgs_rec.LAST_UPDATE_LOGIN is NULL OR
6603: -- p_Terr_Usgs_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6604: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6605: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6606: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6607: -- FND_MSG_PUB.ADD;
6608: -- END IF;

Line 6607: -- FND_MSG_PUB.ADD;

6603: -- p_Terr_Usgs_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6604: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6605: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6606: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6607: -- FND_MSG_PUB.ADD;
6608: -- END IF;
6609: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
6610: --End If;
6611:

Line 6613: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

6609: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
6610: --End If;
6611:
6612: --
6613: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6614: p_data => x_msg_data);
6615:
6616: EXCEPTION
6617: --

Line 6621: FND_MSG_PUB.Count_And_Get

6617: --
6618: WHEN FND_API.G_EXC_ERROR THEN
6619: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_ERROR');
6620: x_return_status := FND_API.G_RET_STS_ERROR ;
6621: FND_MSG_PUB.Count_And_Get
6622: ( P_count => x_msg_count,
6623: P_data => x_msg_data
6624: );
6625:

Line 6629: FND_MSG_PUB.Count_And_Get

6625:
6626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6627: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
6628: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6629: FND_MSG_PUB.Count_And_Get
6630: ( P_count => x_msg_count,
6631: P_data => x_msg_data
6632: );
6633:

Line 6640: FND_MSG_PUB.ADD;

6636: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6637: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6638: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Usage' );
6639: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6640: FND_MSG_PUB.ADD;
6641: FND_MSG_PUB.Count_And_Get
6642: ( P_count => x_msg_count,
6643: P_data => x_msg_data
6644: );

Line 6641: FND_MSG_PUB.Count_And_Get

6637: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6638: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Usage' );
6639: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6640: FND_MSG_PUB.ADD;
6641: FND_MSG_PUB.Count_And_Get
6642: ( P_count => x_msg_count,
6643: P_data => x_msg_data
6644: );
6645: --

Line 6690: FND_MSG_PUB.ADD;

6686:
6687: EXCEPTION
6688: WHEN NO_DATA_FOUND THEN
6689: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_QTYPE');
6690: FND_MSG_PUB.ADD;
6691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6692: END;
6693:
6694: -- Validate the territory Id

Line 6700: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6696: If p_Terr_Id IS NOT NULL Then
6697: --dbms_output('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
6698: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
6699: --dbms_output('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
6700: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6701: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6702: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_ALL');
6703: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
6704: FND_MSG_PUB.ADD;

Line 6704: FND_MSG_PUB.ADD;

6700: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6701: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
6702: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_ALL');
6703: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
6704: FND_MSG_PUB.ADD;
6705: END IF;
6706: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6707: End If;
6708: End If;

Line 6715: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6711: --
6712: /*-- Check for ORG_ID - obsolete: org_id is optional
6713: IF (p_Terr_QualTypeUsgs_Rec.ORG_ID is NULL) OR
6714: (p_Terr_QualTypeUsgs_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
6715: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6716: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6717: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
6718: FND_MSG_PUB.ADD;
6719: END IF;

Line 6718: FND_MSG_PUB.ADD;

6714: (p_Terr_QualTypeUsgs_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
6715: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6716: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6717: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
6718: FND_MSG_PUB.ADD;
6719: END IF;
6720: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6721: End If;
6722: */

Line 6727: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6723:
6724: --Check created by
6725: IF ( p_Terr_QualTypeUsgs_Rec.CREATED_BY is NULL OR
6726: p_Terr_QualTypeUsgs_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
6727: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6728: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6729: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
6730: FND_MSG_PUB.ADD;
6731: END IF;

Line 6730: FND_MSG_PUB.ADD;

6726: p_Terr_QualTypeUsgs_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
6727: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6728: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6729: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
6730: FND_MSG_PUB.ADD;
6731: END IF;
6732: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6733: End If;
6734:

Line 6738: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6734:
6735: --Check creation date
6736: If ( p_Terr_QualTypeUsgs_Rec.CREATION_DATE is NULL OR
6737: p_Terr_QualTypeUsgs_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
6738: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6739: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6740: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
6741: FND_MSG_PUB.ADD;
6742: END IF;

Line 6741: FND_MSG_PUB.ADD;

6737: p_Terr_QualTypeUsgs_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
6738: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6739: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6740: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
6741: FND_MSG_PUB.ADD;
6742: END IF;
6743: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6744: End If;
6745:

Line 6749: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6745:
6746: -- Validate last updated by
6747: IF ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY is NULL OR
6748: p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6749: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6750: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6751: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6752: FND_MSG_PUB.ADD;
6753: END IF;

Line 6752: FND_MSG_PUB.ADD;

6748: p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6749: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6750: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6751: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6752: FND_MSG_PUB.ADD;
6753: END IF;
6754: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6755: End If;
6756:

Line 6760: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6756:
6757: -- Check last update date
6758: If ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE IS NULL OR
6759: p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6760: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6761: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6762: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6763: FND_MSG_PUB.ADD;
6764: END IF;

Line 6763: FND_MSG_PUB.ADD;

6759: p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6760: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6761: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6762: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6763: FND_MSG_PUB.ADD;
6764: END IF;
6765: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6766: End If;
6767:

Line 6771: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6767:
6768: --Check last update login
6769: --If ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN is NULL OR
6770: -- p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6771: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6772: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6773: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6774: -- FND_MSG_PUB.ADD;
6775: -- END IF;

Line 6774: -- FND_MSG_PUB.ADD;

6770: -- p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6771: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6772: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6773: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6774: -- FND_MSG_PUB.ADD;
6775: -- END IF;
6776: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
6777: --End If;
6778:

Line 6780: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

6776: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
6777: --End If;
6778:
6779: --
6780: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6781: p_data => x_msg_data);
6782: EXCEPTION
6783: --
6784: WHEN FND_API.G_EXC_ERROR THEN

Line 6787: FND_MSG_PUB.Count_And_Get

6783: --
6784: WHEN FND_API.G_EXC_ERROR THEN
6785: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
6786: x_return_status := FND_API.G_RET_STS_ERROR ;
6787: FND_MSG_PUB.Count_And_Get
6788: ( P_count => x_msg_count,
6789: P_data => x_msg_data
6790: );
6791:

Line 6795: FND_MSG_PUB.Count_And_Get

6791:
6792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6793: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
6794: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6795: FND_MSG_PUB.Count_And_Get
6796: ( P_count => x_msg_count,
6797: P_data => x_msg_data
6798: );
6799:

Line 6807: FND_MSG_PUB.ADD;

6803:
6804: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6805: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage' );
6806: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6807: FND_MSG_PUB.ADD;
6808: FND_MSG_PUB.Count_And_Get
6809: ( P_count => x_msg_count,
6810: P_data => x_msg_data
6811: );

Line 6808: FND_MSG_PUB.Count_And_Get

6804: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6805: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage' );
6806: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6807: FND_MSG_PUB.ADD;
6808: FND_MSG_PUB.Count_And_Get
6809: ( P_count => x_msg_count,
6810: P_data => x_msg_data
6811: );
6812: --

Line 6873: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6869:
6870: EXCEPTION
6871: WHEN NO_DATA_FOUND THEN
6872: X_return_status := FND_API.G_RET_STS_ERROR;
6873: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6874: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6875: FND_MSG_PUB.ADD;
6876: END IF;
6877:

Line 6875: FND_MSG_PUB.ADD;

6871: WHEN NO_DATA_FOUND THEN
6872: X_return_status := FND_API.G_RET_STS_ERROR;
6873: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6874: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6875: FND_MSG_PUB.ADD;
6876: END IF;
6877:
6878: WHEN OTHERS THEN
6879: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6883: FND_MSG_PUB.ADD;

6879: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6880: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6881: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value' );
6882: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6883: FND_MSG_PUB.ADD;
6884: FND_MSG_PUB.Count_And_Get
6885: ( P_count => x_msg_count,
6886: P_data => x_msg_data
6887: );

Line 6884: FND_MSG_PUB.Count_And_Get

6880: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6881: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value' );
6882: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
6883: FND_MSG_PUB.ADD;
6884: FND_MSG_PUB.Count_And_Get
6885: ( P_count => x_msg_count,
6886: P_data => x_msg_data
6887: );
6888:

Line 6961: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6957:
6958: /*-- Check for ORG_ID - obsolete: org_id is optional
6959: IF (p_Terr_Value_Rec.ORG_ID is NULL) OR
6960: (p_Terr_Value_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
6961: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6962: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6963: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
6964: FND_MSG_PUB.ADD;
6965: END IF;

Line 6964: FND_MSG_PUB.ADD;

6960: (p_Terr_Value_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
6961: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6962: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6963: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
6964: FND_MSG_PUB.ADD;
6965: END IF;
6966: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6967: End If;
6968: */

Line 6975: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6971: /* ----- ARPATEL 041101 Bug#1508750 FIX -----------------------------------
6972:
6973: If ( p_Terr_Value_Rec.ID_USED_FLAG IS NULL OR
6974: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR ) Then
6975: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6976: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6977: FND_MESSAGE.Set_Token('COL_NAME', 'ID_USED_FLAG' );
6978: FND_MSG_PUB.ADD;
6979: END IF;

Line 6978: FND_MSG_PUB.ADD;

6974: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR ) Then
6975: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6976: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6977: FND_MESSAGE.Set_Token('COL_NAME', 'ID_USED_FLAG' );
6978: FND_MSG_PUB.ADD;
6979: END IF;
6980: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6981: End If;
6982: -------------------------------------------------------------------------*/

Line 6988: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6984:
6985: -- Validate last updated by
6986: IF ( p_Terr_Value_Rec.LAST_UPDATED_BY is NULL OR
6987: p_Terr_Value_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6988: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6989: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6990: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6991: FND_MSG_PUB.ADD;
6992: END IF;

Line 6991: FND_MSG_PUB.ADD;

6987: p_Terr_Value_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6988: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6989: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6990: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6991: FND_MSG_PUB.ADD;
6992: END IF;
6993: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6994: End If;
6995:

Line 6999: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

6995:
6996: -- Check last update date
6997: If ( p_Terr_Value_Rec.LAST_UPDATE_DATE IS NULL OR
6998: p_Terr_Value_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6999: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7000: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
7001: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
7002: FND_MSG_PUB.ADD;
7003: END IF;

Line 7002: FND_MSG_PUB.ADD;

6998: p_Terr_Value_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6999: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7000: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
7001: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
7002: FND_MSG_PUB.ADD;
7003: END IF;
7004: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7005: End If;
7006:

Line 7010: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7006:
7007: --Check last update login
7008: If ( p_Terr_Value_Rec.LAST_UPDATE_LOGIN is NULL OR
7009: p_Terr_Value_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
7010: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7011: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
7012: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
7013: FND_MSG_PUB.ADD;
7014: END IF;

Line 7013: FND_MSG_PUB.ADD;

7009: p_Terr_Value_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
7010: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7011: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
7012: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
7013: FND_MSG_PUB.ADD;
7014: END IF;
7015: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7016: End If;
7017:

Line 7041: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7037:
7038: -- groupType = "GROUP1";
7039: IF ( p_Terr_Value_Rec.COMPARISON_OPERATOR <> '=' ) THEN
7040:
7041: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7042:
7043: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7044: FND_MSG_PUB.ADD;
7045:

Line 7044: FND_MSG_PUB.ADD;

7040:
7041: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7042:
7043: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7044: FND_MSG_PUB.ADD;
7045:
7046: END IF;
7047:
7048: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7060: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7056:
7057: -- groupType = "GROUP4";
7058: IF ( p_Terr_Value_Rec.COMPARISON_OPERATOR <> '=' ) THEN
7059:
7060: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7061:
7062: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7063: FND_MSG_PUB.ADD;
7064:

Line 7063: FND_MSG_PUB.ADD;

7059:
7060: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7061:
7062: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7063: FND_MSG_PUB.ADD;
7064:
7065: END IF;
7066:
7067: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7077: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7073: IF ( p_Terr_Value_Rec.COMPARISON_OPERATOR <> '='
7074: AND p_Terr_Value_Rec.COMPARISON_OPERATOR <> 'LIKE'
7075: AND p_Terr_Value_Rec.COMPARISON_OPERATOR <> 'BETWEEN' ) THEN
7076:
7077: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7078:
7079: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7080: FND_MSG_PUB.ADD;
7081:

Line 7080: FND_MSG_PUB.ADD;

7076:
7077: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7078:
7079: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7080: FND_MSG_PUB.ADD;
7081:
7082: END IF;
7083:
7084: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7097: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7093: -- groupType = "GROUP3";
7094: IF ( p_Terr_Value_Rec.COMPARISON_OPERATOR <> '='
7095: AND p_Terr_Value_Rec.COMPARISON_OPERATOR <> 'BETWEEN') THEN
7096:
7097: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7098:
7099: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7100: FND_MSG_PUB.ADD;
7101:

Line 7100: FND_MSG_PUB.ADD;

7096:
7097: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7098:
7099: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7100: FND_MSG_PUB.ADD;
7101:
7102: END IF;
7103:
7104: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7117: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7113: -- DEP_3FIELDS_CHAR_3IDS
7114: -- groupType = "GROUP4";
7115: IF ( p_Terr_Value_Rec.COMPARISON_OPERATOR <> '=' ) THEN
7116:
7117: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7118:
7119: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7120: FND_MSG_PUB.ADD;
7121:

Line 7120: FND_MSG_PUB.ADD;

7116:
7117: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7118:
7119: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7120: FND_MSG_PUB.ADD;
7121:
7122: END IF;
7123:
7124: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7150: p_Terr_Value_Rec.HIGH_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
7151: ( p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
7152: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
7153:
7154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7155: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7156: FND_MSG_PUB.ADD;
7157: END IF;
7158:

Line 7156: FND_MSG_PUB.ADD;

7152: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
7153:
7154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7155: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7156: FND_MSG_PUB.ADD;
7157: END IF;
7158:
7159: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7160: ELSE

Line 7204: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7200: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
7201: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
7202: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
7203:
7204: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7205: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7206: FND_MSG_PUB.ADD;
7207: END IF;
7208:

Line 7206: FND_MSG_PUB.ADD;

7202: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
7203:
7204: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7205: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7206: FND_MSG_PUB.ADD;
7207: END IF;
7208:
7209: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7210:

Line 7243: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7239: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR
7240: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
7241: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7242:
7243: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7244: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7245: FND_MSG_PUB.ADD;
7246: END IF;
7247:

Line 7245: FND_MSG_PUB.ADD;

7241: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7242:
7243: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7244: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7245: FND_MSG_PUB.ADD;
7246: END IF;
7247:
7248: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7249:

Line 7270: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7266: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) OR
7267: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
7268: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
7269:
7270: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7271: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7272: FND_MSG_PUB.ADD;
7273: END IF;
7274:

Line 7272: FND_MSG_PUB.ADD;

7268: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
7269:
7270: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7271: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7272: FND_MSG_PUB.ADD;
7273: END IF;
7274:
7275: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7276: --ELSIF

Line 7296: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7292: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
7293: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) ) THEN
7294:
7295: --dbms_output('Error INTEREST_TYPE');
7296: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7297: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7298: FND_MSG_PUB.ADD;
7299: END IF;
7300:

Line 7298: FND_MSG_PUB.ADD;

7294:
7295: --dbms_output('Error INTEREST_TYPE');
7296: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7297: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7298: FND_MSG_PUB.ADD;
7299: END IF;
7300:
7301: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7302:

Line 7379: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7375: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
7376: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) ) THEN
7377:
7378: --dbms_output('Error INTEREST_TYPE');
7379: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7380: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7381: FND_MSG_PUB.ADD;
7382: END IF;
7383:

Line 7381: FND_MSG_PUB.ADD;

7377:
7378: --dbms_output('Error INTEREST_TYPE');
7379: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7380: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7381: FND_MSG_PUB.ADD;
7382: END IF;
7383:
7384: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7385:

Line 7417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7413: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
7414: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7415:
7416: --dbms_output('Error INTEREST_TYPE');
7417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7418: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7419: FND_MSG_PUB.ADD;
7420: END IF;
7421:

Line 7419: FND_MSG_PUB.ADD;

7415:
7416: --dbms_output('Error INTEREST_TYPE');
7417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7418: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7419: FND_MSG_PUB.ADD;
7420: END IF;
7421:
7422: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7423:

Line 7473: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7469: p_Terr_Value_Rec.VALUE1_ID = FND_API.G_MISS_NUM ) OR
7470: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
7471: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7472:
7473: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7474: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7475: FND_MSG_PUB.ADD;
7476: END IF;
7477: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7475: FND_MSG_PUB.ADD;

7471: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7472:
7473: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7474: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7475: FND_MSG_PUB.ADD;
7476: END IF;
7477: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7478: ELSE
7479: IF ( p_Terr_Value_Rec.VALUE1_ID IS NOT NULL AND

Line 7529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7525: p_Terr_Value_Rec.VALUE1_ID = FND_API.G_MISS_NUM ) OR
7526: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
7527: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7528:
7529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7530: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7531: FND_MSG_PUB.ADD;
7532: END IF;
7533: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7531: FND_MSG_PUB.ADD;

7527: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7528:
7529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7530: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7531: FND_MSG_PUB.ADD;
7532: END IF;
7533: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7534: ELSE
7535: IF ( p_Terr_Value_Rec.VALUE1_ID IS NOT NULL AND

Line 7607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7603: p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR ) OR
7604: ( p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
7605: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7606:
7607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7608: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7609: FND_MSG_PUB.ADD;
7610: END IF;
7611: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7609: FND_MSG_PUB.ADD;

7605: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
7606:
7607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7608: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
7609: FND_MSG_PUB.ADD;
7610: END IF;
7611: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7612: ELSE
7613: IF ( p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL AND

Line 7659: /* FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

7655: End If;
7656:
7657:
7658: --
7659: /* FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
7660: p_data => x_msg_data);
7661: */
7662: EXCEPTION
7663: --

Line 7667: FND_MSG_PUB.Count_And_Get

7663: --
7664: WHEN FND_API.G_EXC_ERROR THEN
7665: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
7666: x_return_status := FND_API.G_RET_STS_ERROR ;
7667: FND_MSG_PUB.Count_And_Get
7668: ( P_count => x_msg_count,
7669: P_data => x_msg_data
7670: );
7671:

Line 7675: FND_MSG_PUB.Count_And_Get

7671:
7672: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7673: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
7674: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7675: FND_MSG_PUB.Count_And_Get
7676: ( P_count => x_msg_count,
7677: P_data => x_msg_data
7678: );
7679:

Line 7687: FND_MSG_PUB.ADD;

7683:
7684: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
7685: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec' );
7686: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
7687: FND_MSG_PUB.ADD;
7688:
7689: FND_MSG_PUB.Count_And_Get
7690: ( P_count => x_msg_count,
7691: P_data => x_msg_data

Line 7689: FND_MSG_PUB.Count_And_Get

7685: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec' );
7686: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
7687: FND_MSG_PUB.ADD;
7688:
7689: FND_MSG_PUB.Count_And_Get
7690: ( P_count => x_msg_count,
7691: P_data => x_msg_data
7692: );
7693:

Line 7732: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7728: AND nvl(VALUE3_ID , -9999) = nvl( decode(P_Terr_Value_Rec.VALUE3_ID, FND_API.G_MISS_NUM, NULL , P_Terr_Value_Rec.VALUE3_ID ) , -9999)
7729: AND nvl(VALUE4_ID , -9999) = nvl( decode(P_Terr_Value_Rec.VALUE4_ID, FND_API.G_MISS_NUM, NULL , P_Terr_Value_Rec.VALUE4_ID ) , -9999) ;
7730:
7731: IF l_dummy = 'X' THEN
7732: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7733: FND_MESSAGE.Set_Name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
7734: FND_MSG_PUB.ADD;
7735: END IF;
7736: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7734: FND_MSG_PUB.ADD;

7730:
7731: IF l_dummy = 'X' THEN
7732: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7733: FND_MESSAGE.Set_Name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
7734: FND_MSG_PUB.ADD;
7735: END IF;
7736: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7737: End If;
7738: EXCEPTION

Line 7745: FND_MSG_PUB.Count_And_Get

7741: NULL;
7742: WHEN FND_API.G_EXC_ERROR THEN
7743: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
7744: x_return_status := FND_API.G_RET_STS_ERROR ;
7745: FND_MSG_PUB.Count_And_Get
7746: ( P_count => x_msg_count,
7747: P_data => x_msg_data
7748: );
7749:

Line 7753: FND_MSG_PUB.Count_And_Get

7749:
7750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7751: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
7752: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7753: FND_MSG_PUB.Count_And_Get
7754: ( P_count => x_msg_count,
7755: P_data => x_msg_data
7756: );
7757:

Line 7765: FND_MSG_PUB.ADD;

7761:
7762: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
7763: FND_MESSAGE.Set_Token('PROC_NAME', 'Check_duplicate_Value');
7764: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
7765: FND_MSG_PUB.ADD;
7766:
7767: FND_MSG_PUB.Count_And_Get
7768: ( P_count => x_msg_count,
7769: P_data => x_msg_data

Line 7767: FND_MSG_PUB.Count_And_Get

7763: FND_MESSAGE.Set_Token('PROC_NAME', 'Check_duplicate_Value');
7764: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
7765: FND_MSG_PUB.ADD;
7766:
7767: FND_MSG_PUB.Count_And_Get
7768: ( P_count => x_msg_count,
7769: P_data => x_msg_data
7770: );
7771:

Line 7809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

7805: AND nvl(VALUE3_ID , -9999) = nvl( decode(P_Terr_Value_Rec.VALUE3_ID, FND_API.G_MISS_NUM, NULL , P_Terr_Value_Rec.VALUE3_ID ) , -9999)
7806: AND nvl(VALUE4_ID , -9999) = nvl( decode(P_Terr_Value_Rec.VALUE4_ID, FND_API.G_MISS_NUM, NULL , P_Terr_Value_Rec.VALUE4_ID ) , -9999) ;
7807:
7808: IF l_dummy = 'X' THEN
7809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7810: FND_MESSAGE.Set_Name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
7811: FND_MSG_PUB.ADD;
7812: END IF;
7813: x_Return_Status := FND_API.G_RET_STS_ERROR ;

Line 7811: FND_MSG_PUB.ADD;

7807:
7808: IF l_dummy = 'X' THEN
7809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7810: FND_MESSAGE.Set_Name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
7811: FND_MSG_PUB.ADD;
7812: END IF;
7813: x_Return_Status := FND_API.G_RET_STS_ERROR ;
7814: End If;
7815: EXCEPTION

Line 7822: FND_MSG_PUB.Count_And_Get

7818: NULL;
7819: WHEN FND_API.G_EXC_ERROR THEN
7820: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
7821: x_return_status := FND_API.G_RET_STS_ERROR ;
7822: FND_MSG_PUB.Count_And_Get
7823: ( P_count => x_msg_count,
7824: P_data => x_msg_data
7825: );
7826:

Line 7830: FND_MSG_PUB.Count_And_Get

7826:
7827: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7828: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
7829: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7830: FND_MSG_PUB.Count_And_Get
7831: ( P_count => x_msg_count,
7832: P_data => x_msg_data
7833: );
7834:

Line 7842: FND_MSG_PUB.ADD;

7838:
7839: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
7840: FND_MESSAGE.Set_Token('PROC_NAME', 'Check_duplicate_Value');
7841: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
7842: FND_MSG_PUB.ADD;
7843:
7844: FND_MSG_PUB.Count_And_Get
7845: ( P_count => x_msg_count,
7846: P_data => x_msg_data

Line 7844: FND_MSG_PUB.Count_And_Get

7840: FND_MESSAGE.Set_Token('PROC_NAME', 'Check_duplicate_Value');
7841: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
7842: FND_MSG_PUB.ADD;
7843:
7844: FND_MSG_PUB.Count_And_Get
7845: ( P_count => x_msg_count,
7846: P_data => x_msg_data
7847: );
7848:

Line 7940: --fnd_msg_pub.add;

7936: FETCH c_chk_template INTO l_csr_rtn;
7937: IF (c_chk_template%NOTFOUND) THEN
7938:
7939: fnd_message.set_name('JTF', 'JTF_TERR_INVALID_TEMPLATE');
7940: --fnd_msg_pub.add;
7941: x_return_status := FND_API.G_RET_STS_ERROR;
7942:
7943: END IF;
7944: CLOSE c_chk_template;

Line 7955: fnd_msg_pub.add;

7951: --IF (c_chk_qual_mode%NOTFOUND) THEN
7952:
7953: IF (l_dynamic_qual_count = 0) THEN
7954: fnd_message.set_name ('JTF', 'JTF_TERR_NO_DYNAMIC_QUALIFIERS');
7955: fnd_msg_pub.add;
7956: x_return_status := FND_API.G_RET_STS_ERROR;
7957:
7958: END IF;
7959: CLOSE c_chk_qual_mode;

Line 7986: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

7982: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7983: RAISE FND_API.G_EXC_ERROR;
7984: END IF;
7985:
7986: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
7987: p_data => x_msg_data);
7988:
7989: EXCEPTION
7990: WHEN FND_API.G_EXC_ERROR THEN

Line 7993: FND_MSG_PUB.Count_And_Get

7989: EXCEPTION
7990: WHEN FND_API.G_EXC_ERROR THEN
7991: --dbms_output('Validate_Template_Record: FND_API.G_EXC_ERROR');
7992: x_return_status := FND_API.G_RET_STS_ERROR ;
7993: FND_MSG_PUB.Count_And_Get
7994: ( P_count => x_msg_count,
7995: P_data => x_msg_data
7996: );
7997:

Line 8001: FND_MSG_PUB.Count_And_Get

7997:
7998: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7999: --dbms_output('Validate_Template_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
8000: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8001: FND_MSG_PUB.Count_And_Get
8002: ( P_count => x_msg_count,
8003: P_data => x_msg_data
8004: );
8005:

Line 8009: FND_MSG_PUB.Count_And_Get

8005:
8006: WHEN OTHERS THEN
8007: --dbms_output('Validate_Template_Record: OTHERS - ' || SQLERRM);
8008: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8009: FND_MSG_PUB.Count_And_Get
8010: ( P_count => x_msg_count,
8011: P_data => x_msg_data
8012: );
8013:

Line 9394: FND_MSG_PUB.initialize;

9390: END IF;
9391:
9392: -- Initialize message list if p_init_msg_list is set to TRUE.
9393: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9394: FND_MSG_PUB.initialize;
9395: END IF;
9396:
9397: -- Debug Message
9398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 9398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

9394: FND_MSG_PUB.initialize;
9395: END IF;
9396:
9397: -- Debug Message
9398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9399: THEN
9400: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
9401: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9402: FND_MSG_PUB.Add;

Line 9402: FND_MSG_PUB.Add;

9398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9399: THEN
9400: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
9401: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9402: FND_MSG_PUB.Add;
9403: END IF;
9404:
9405: -- Initialize API return status to success
9406: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 9417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

9413: --arpatel 07/13 bug#1872642
9414: --IF (p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
9415:
9416: /* Debug message */
9417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9418: THEN
9419: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
9420: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Template_Record');
9421: FND_MSG_PUB.Add;

Line 9421: FND_MSG_PUB.Add;

9417: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9418: THEN
9419: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
9420: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Template_Record');
9421: FND_MSG_PUB.Add;
9422: END IF;
9423:
9424: /* Invoke validation procedures */
9425: Validate_Template_Record( p_init_msg_list => FND_API.G_FALSE

Line 9562: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

9558: /* API BODY END */
9559: /* ======================*/
9560:
9561: -- Debug Message
9562: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9563: THEN
9564: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
9565: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9566: FND_MSG_PUB.Add;

Line 9566: FND_MSG_PUB.Add;

9562: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9563: THEN
9564: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
9565: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9566: FND_MSG_PUB.Add;
9567: END IF;
9568:
9569: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9570: RAISE FND_API.G_EXC_ERROR;

Line 9573: FND_MSG_PUB.Count_And_Get

9569: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9570: RAISE FND_API.G_EXC_ERROR;
9571: END IF;
9572:
9573: FND_MSG_PUB.Count_And_Get
9574: ( p_count => x_msg_count,
9575: p_data => x_msg_data
9576: );
9577:

Line 9589: FND_MSG_PUB.Count_And_Get

9585: WHEN FND_API.G_EXC_ERROR THEN
9586: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_ERROR');
9587: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
9588: x_return_status := FND_API.G_RET_STS_ERROR ;
9589: FND_MSG_PUB.Count_And_Get
9590: ( p_count => x_msg_count,
9591: p_data => x_msg_data
9592: );
9593:

Line 9598: FND_MSG_PUB.Count_And_Get

9594: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9595: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
9596: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
9597: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9598: FND_MSG_PUB.Count_And_Get
9599: ( p_count => x_msg_count,
9600: p_data => x_msg_data
9601: );
9602:

Line 9607: FND_MSG_PUB.Count_And_Get

9603: WHEN OTHERS THEN
9604: --dbms_output('Generate_Template_Territories PVT: OTHERS - ' || SQLERRM);
9605: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
9606: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9607: FND_MSG_PUB.Count_And_Get
9608: ( p_count => x_msg_count,
9609: p_data => x_msg_data
9610: );
9611:

Line 9682: FND_MSG_PUB.initialize;

9678: END IF;
9679:
9680: -- Initialize message list if p_init_msg_list is set to TRUE.
9681: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9682: FND_MSG_PUB.initialize;
9683: END IF;
9684:
9685: -- Debug Message
9686: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 9686: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

9682: FND_MSG_PUB.initialize;
9683: END IF;
9684:
9685: -- Debug Message
9686: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9687: THEN
9688: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
9689: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9690: FND_MSG_PUB.Add;

Line 9690: FND_MSG_PUB.Add;

9686: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9687: THEN
9688: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_START_MSG');
9689: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9690: FND_MSG_PUB.Add;
9691: END IF;
9692:
9693: -- Initialize API return status to success
9694: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 9785: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

9781: /* API BODY END */
9782: /* ======================*/
9783:
9784: -- Debug Message
9785: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9786: THEN
9787: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
9788: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9789: FND_MSG_PUB.Add;

Line 9789: FND_MSG_PUB.Add;

9785: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
9786: THEN
9787: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');
9788: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
9789: FND_MSG_PUB.Add;
9790: END IF;
9791:
9792: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9793: RAISE FND_API.G_EXC_ERROR;

Line 9796: FND_MSG_PUB.Count_And_Get

9792: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9793: RAISE FND_API.G_EXC_ERROR;
9794: END IF;
9795:
9796: FND_MSG_PUB.Count_And_Get
9797: ( p_count => x_msg_count,
9798: p_data => x_msg_data
9799: );
9800:

Line 9812: FND_MSG_PUB.Count_And_Get

9808: WHEN FND_API.G_EXC_ERROR THEN
9809: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_ERROR');
9810: ROLLBACK TO COPY_TERR_PVT;
9811: x_return_status := FND_API.G_RET_STS_ERROR ;
9812: FND_MSG_PUB.Count_And_Get
9813: ( p_count => x_msg_count,
9814: p_data => x_msg_data
9815: );
9816:

Line 9821: FND_MSG_PUB.Count_And_Get

9817: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9818: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
9819: ROLLBACK TO COPY_TERR_PVT;
9820: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9821: FND_MSG_PUB.Count_And_Get
9822: ( p_count => x_msg_count,
9823: p_data => x_msg_data
9824: );
9825:

Line 9830: FND_MSG_PUB.Count_And_Get

9826: WHEN OTHERS THEN
9827: --dbms_output('Generate_Duplicate_Territory PVT: OTHERS - ' || SQLERRM);
9828: ROLLBACK TO COPY_TERR_PVT;
9829: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9830: FND_MSG_PUB.Count_And_Get
9831: ( p_count => x_msg_count,
9832: p_data => x_msg_data
9833: );
9834:

Line 10119: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

10115:
10116: x_return_status := FND_API.G_RET_STS_ERROR;
10117:
10118: /* Debug message */
10119: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10120: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_USGS_UK_CON');
10121: FND_MSG_PUB.ADD;
10122: END IF;
10123:

Line 10121: FND_MSG_PUB.ADD;

10117:
10118: /* Debug message */
10119: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10120: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_USGS_UK_CON');
10121: FND_MSG_PUB.ADD;
10122: END IF;
10123:
10124: END IF; /* c_chk_uk_violation%FOUND */
10125: CLOSE csr_chk_uk_violation;

Line 10129: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

10125: CLOSE csr_chk_uk_violation;
10126:
10127: END IF;
10128:
10129: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10130: p_data => x_msg_data);
10131:
10132: EXCEPTION
10133:

Line 10140: FND_MSG_PUB.ADD;

10136: X_return_status := FND_API.G_RET_STS_ERROR;
10137: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10138: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
10139: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10140: FND_MSG_PUB.ADD;
10141: FND_MSG_PUB.Count_And_Get
10142: ( p_count => x_msg_count,
10143: p_data => x_msg_data
10144: );

Line 10141: FND_MSG_PUB.Count_And_Get

10137: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10138: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
10139: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10140: FND_MSG_PUB.ADD;
10141: FND_MSG_PUB.Count_And_Get
10142: ( p_count => x_msg_count,
10143: p_data => x_msg_data
10144: );
10145:

Line 10191: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

10187: x_return_status := FND_API.G_RET_STS_ERROR;
10188:
10189: /* Debug message */
10190: --arpatel 09/18 - set message for form to pick up.
10191: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10192: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_QTYPE_USGS_UK_CON');
10193: FND_MSG_PUB.ADD;
10194:
10195: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 10193: FND_MSG_PUB.ADD;

10189: /* Debug message */
10190: --arpatel 09/18 - set message for form to pick up.
10191: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10192: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_QTYPE_USGS_UK_CON');
10193: FND_MSG_PUB.ADD;
10194:
10195: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10196: p_data => x_msg_data);
10197:

Line 10195: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

10191: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10192: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_QTYPE_USGS_UK_CON');
10193: FND_MSG_PUB.ADD;
10194:
10195: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10196: p_data => x_msg_data);
10197:
10198: --END IF;
10199:

Line 10205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

10201: CLOSE csr_chk_uk_violation;
10202:
10203: END IF;
10204:
10205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10206: p_data => x_msg_data);
10207:
10208: EXCEPTION
10209:

Line 10216: FND_MSG_PUB.ADD;

10212: X_return_status := FND_API.G_RET_STS_ERROR;
10213: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10214: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
10215: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10216: FND_MSG_PUB.ADD;
10217: FND_MSG_PUB.Count_And_Get
10218: ( p_count => x_msg_count,
10219: p_data => x_msg_data
10220: );

Line 10217: FND_MSG_PUB.Count_And_Get

10213: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10214: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
10215: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10216: FND_MSG_PUB.ADD;
10217: FND_MSG_PUB.Count_And_Get
10218: ( p_count => x_msg_count,
10219: p_data => x_msg_data
10220: );
10221:

Line 10272: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

10268:
10269: x_return_status := FND_API.G_RET_STS_ERROR;
10270:
10271: /* Debug message */
10272: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10273: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_NUM_WINNERS_TOP_LEVEL');
10274: FND_MSG_PUB.ADD;
10275: END IF;
10276:

Line 10274: FND_MSG_PUB.ADD;

10270:
10271: /* Debug message */
10272: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10273: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_NUM_WINNERS_TOP_LEVEL');
10274: FND_MSG_PUB.ADD;
10275: END IF;
10276:
10277: END IF;
10278:

Line 10279: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

10275: END IF;
10276:
10277: END IF;
10278:
10279: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10280: p_data => x_msg_data);
10281:
10282: EXCEPTION
10283:

Line 10290: FND_MSG_PUB.ADD;

10286: X_return_status := FND_API.G_RET_STS_ERROR;
10287: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10288: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Num_Winners' );
10289: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10290: FND_MSG_PUB.ADD;
10291: FND_MSG_PUB.Count_And_Get
10292: ( p_count => x_msg_count,
10293: p_data => x_msg_data
10294: );

Line 10291: FND_MSG_PUB.Count_And_Get

10287: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10288: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Num_Winners' );
10289: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10290: FND_MSG_PUB.ADD;
10291: FND_MSG_PUB.Count_And_Get
10292: ( p_count => x_msg_count,
10293: p_data => x_msg_data
10294: );
10295:

Line 10336: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

10332: END IF;
10333:
10334:
10335: /* Debug message */
10336: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10337: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_NUM_COPY_TERR');
10338: FND_MSG_PUB.ADD;
10339: END IF;
10340:

Line 10338: FND_MSG_PUB.ADD;

10334:
10335: /* Debug message */
10336: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10337: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_NUM_COPY_TERR');
10338: FND_MSG_PUB.ADD;
10339: END IF;
10340:
10341: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10342: p_data => x_msg_data);

Line 10341: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

10337: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_NUM_COPY_TERR');
10338: FND_MSG_PUB.ADD;
10339: END IF;
10340:
10341: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10342: p_data => x_msg_data);
10343:
10344: EXCEPTION
10345: WHEN OTHERS THEN

Line 10351: FND_MSG_PUB.ADD;

10347: X_return_status := FND_API.G_RET_STS_ERROR;
10348: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10349: FND_MESSAGE.Set_Token('PROC_NAME', 'chk_num_copy_terr' );
10350: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10351: FND_MSG_PUB.ADD;
10352: FND_MSG_PUB.Count_And_Get
10353: ( p_count => x_msg_count,
10354: p_data => x_msg_data
10355: );

Line 10352: FND_MSG_PUB.Count_And_Get

10348: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10349: FND_MESSAGE.Set_Token('PROC_NAME', 'chk_num_copy_terr' );
10350: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10351: FND_MSG_PUB.ADD;
10352: FND_MSG_PUB.Count_And_Get
10353: ( p_count => x_msg_count,
10354: p_data => x_msg_data
10355: );
10356:

Line 10604: FND_MSG_PUB.add;

10600:
10601: FND_MESSAGE.Set_Name ('JTF', 'JTF_CONC_REQ_COPY_TERR');
10602: FND_MESSAGE.Set_Token ('Template Territory ID', p_copy_source_terr_Id);
10603: FND_MESSAGE.Set_Token('Concurrent request ID',l_process_id);
10604: FND_MSG_PUB.add;
10605:
10606: RETURN l_process_id;
10607: END conc_req_copy_terr;
10608:

Line 10670: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

10666:
10667: --dbms_output.put_line('[3]l_return_csr = ' || l_return_csr);
10668:
10669: /* Debug message */
10670: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10671: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_CIRCULAR_REFERENCE');
10672: FND_MSG_PUB.ADD;
10673: END IF;
10674:

Line 10672: FND_MSG_PUB.ADD;

10668:
10669: /* Debug message */
10670: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
10671: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_CIRCULAR_REFERENCE');
10672: FND_MSG_PUB.ADD;
10673: END IF;
10674:
10675: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10676: p_data => x_msg_data);

Line 10675: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

10671: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_CIRCULAR_REFERENCE');
10672: FND_MSG_PUB.ADD;
10673: END IF;
10674:
10675: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
10676: p_data => x_msg_data);
10677:
10678: EXCEPTION
10679:

Line 10688: FND_MSG_PUB.ADD;

10684:
10685: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_CIRCULAR_REFERENCE');
10686: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
10687: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10688: FND_MSG_PUB.ADD;
10689:
10690: FND_MSG_PUB.Count_And_Get
10691: ( p_count => x_msg_count,
10692: p_data => x_msg_data

Line 10690: FND_MSG_PUB.Count_And_Get

10686: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
10687: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10688: FND_MSG_PUB.ADD;
10689:
10690: FND_MSG_PUB.Count_And_Get
10691: ( p_count => x_msg_count,
10692: p_data => x_msg_data
10693: );
10694:

Line 10700: FND_MSG_PUB.Count_And_Get

10696: --dbms_output.put_line('Validate_Parent: FND_API.G_EXC_UNEXPECTED_ERROR');
10697: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10698: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10699: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
10700: FND_MSG_PUB.Count_And_Get
10701: ( P_count => x_msg_count,
10702: P_data => x_msg_data
10703: );
10704:

Line 10711: FND_MSG_PUB.ADD;

10707: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10708: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10709: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
10710: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10711: FND_MSG_PUB.ADD;
10712: FND_MSG_PUB.Count_And_Get
10713: ( p_count => x_msg_count,
10714: p_data => x_msg_data
10715: );

Line 10712: FND_MSG_PUB.Count_And_Get

10708: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
10709: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
10710: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
10711: FND_MSG_PUB.ADD;
10712: FND_MSG_PUB.Count_And_Get
10713: ( p_count => x_msg_count,
10714: p_data => x_msg_data
10715: );
10716: END validate_parent;