DBA Data[Home] [Help]

APPS.JTF_TERRITORY_RESOURCE_PVT dependencies on FND_API

Line 112: x_return_status := FND_API.G_RET_STS_SUCCESS;

108:
109: BEGIN
110:
111: -- Initialize API return status to success
112: x_return_status := FND_API.G_RET_STS_SUCCESS;
113:
114: for l_c_res in c_res loop
115: if P_TerrRsc_Rec.START_DATE_ACTIVE is not null then
116: if P_TerrRsc_Rec.START_DATE_ACTIVE between l_c_res.start_date_active and l_c_res.end_date_active then

Line 136: x_return_status := FND_API.G_RET_STS_ERROR ;

132: end loop;
133:
134: if l_temp = 'X' then
135: fnd_msg_pub.initialize;
136: x_return_status := FND_API.G_RET_STS_ERROR ;
137: fnd_message.set_name('JTF', 'JTF_TERR_DUPLICATE_RESOURCE');
138: FND_MSG_PUB.ADD;
139: FND_MSG_PUB.Count_And_Get( P_count => x_msg_count,
140: P_data => x_msg_data);

Line 148: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

144: WHEN NO_DATA_FOUND THEN
145: --no duplicates
146: NULL;
147: WHEN OTHERS THEN
148: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
149: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
150: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others Exception in Check_for_duplicate2 ' || SQLERRM);
151: END IF;
152:

Line 178: x_return_status := FND_API.G_RET_STS_SUCCESS;

174:
175: BEGIN
176:
177: -- Initialize API return status to success
178: x_return_status := FND_API.G_RET_STS_SUCCESS;
179:
180: for l_c_res in c_res loop
181: if P_TerrRsc_Rec.START_DATE_ACTIVE is not null then
182: if P_TerrRsc_Rec.START_DATE_ACTIVE between l_c_res.start_date_active and l_c_res.end_date_active then

Line 202: x_return_status := FND_API.G_RET_STS_ERROR ;

198: end loop;
199:
200: if l_temp = 'X' then
201: fnd_msg_pub.initialize;
202: x_return_status := FND_API.G_RET_STS_ERROR ;
203: fnd_message.set_name('JTF', 'JTF_TERR_DUPLICATE_RESOURCE');
204: FND_MSG_PUB.ADD;
205: FND_MSG_PUB.Count_And_Get ( P_count => x_msg_count, P_data => x_msg_data);
206: end if;

Line 213: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

209: WHEN NO_DATA_FOUND THEN
210: --no duplicates
211: NULL;
212: WHEN OTHERS THEN
213: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
214: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
215: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Others Exception in Check_for_duplicate2 ' || SQLERRM);
216: END IF;
217: END check_for_duplicate2;

Line 243: x_return_status := FND_API.G_RET_STS_SUCCESS;

239:
240: BEGIN
241:
242: -- Initialize API return status to success
243: x_return_status := FND_API.G_RET_STS_SUCCESS;
244:
245: for l_c_res in c_res loop
246: if P_TerrRsc_Rec.START_DATE_ACTIVE is not null then
247: if P_TerrRsc_Rec.START_DATE_ACTIVE between l_c_res.start_date_active and l_c_res.end_date_active then

Line 267: x_return_status := FND_API.G_RET_STS_ERROR ;

263: end loop;
264:
265: if l_temp = 'X' then
266: fnd_msg_pub.initialize;
267: x_return_status := FND_API.G_RET_STS_ERROR ;
268: fnd_message.set_name('JTF', 'JTF_TERR_DUPLICATE_RESOURCE');
269: FND_MSG_PUB.ADD;
270: FND_MSG_PUB.Count_And_Get ( P_count => x_msg_count, P_data => x_msg_data);
271: end if;

Line 278: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

274: WHEN NO_DATA_FOUND THEN
275: --no duplicates
276: NULL;
277: WHEN OTHERS THEN
278: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
279: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
280: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Others Exception in Check_for_duplicate2 ' || SQLERRM);
281: END IF;
282: END check_for_duplicate2;

Line 301: x_return_status := FND_API.G_RET_STS_SUCCESS;

297: BEGIN
298: --
299: --dbms_output.put_line('Inside Validate_Foreign_Keys');
300: -- Initialize API return status to success
301: x_return_status := FND_API.G_RET_STS_SUCCESS;
302: For l_Res_Counter IN p_TerrRsc_Tbl.first .. p_TerrRsc_Tbl.count LOOP
303:
304: --check if duplicate resource_id, group, role exists for this territory
305: Select 'X' into l_temp

Line 315: x_return_status := FND_API.G_RET_STS_ERROR ;

311: and ROLE = p_TerrRsc_Tbl(l_res_counter).ROLE;
312:
313: if l_temp = 'X'
314: then
315: x_return_status := FND_API.G_RET_STS_ERROR ;
316: fnd_message.set_name('JTF', 'JTF_TERR_DUPLICATE_RESOURCE');
317: FND_MSG_PUB.ADD;
318: FND_MSG_PUB.Count_And_Get
319: ( P_count => x_msg_count,

Line 336: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

332: NULL;
333:
334: WHEN OTHERS THEN
335: --dbms_output.put_line('Validate_Foreign_Keys: OTHERS - ' || SQLERRM);
336: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
337: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
338: THEN
339: FND_MSG_PUB.Add_Exc_Msg
340: ( G_PKG_NAME,

Line 365: x_return_status := FND_API.G_RET_STS_SUCCESS;

361: BEGIN
362: --
363: --dbms_output.put_line('Inside Validate_Foreign_Keys');
364: -- Initialize API return status to success
365: x_return_status := FND_API.G_RET_STS_SUCCESS;
366: For l_Res_Counter IN p_TerrRsc_Tbl.first .. p_TerrRsc_Tbl.count LOOP
367:
368: --check if duplicate resource_id, group, role exists for this territory
369: Select 'X' into l_temp

Line 379: x_return_status := FND_API.G_RET_STS_ERROR ;

375: and ROLE = p_TerrRsc_Tbl(l_res_counter).ROLE;
376:
377: if l_temp = 'X'
378: then
379: x_return_status := FND_API.G_RET_STS_ERROR ;
380: fnd_message.set_name('JTF', 'JTF_TERR_DUPLICATE_RESOURCE');
381: FND_MSG_PUB.ADD;
382: FND_MSG_PUB.Count_And_Get
383: ( P_count => x_msg_count,

Line 400: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

396: NULL;
397:
398: WHEN OTHERS THEN
399: --dbms_output.put_line('Validate_Foreign_Keys: OTHERS - ' || SQLERRM);
400: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
401: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
402: THEN
403: FND_MSG_PUB.Add_Exc_Msg
404: ( G_PKG_NAME,

Line 429: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,

425: -- Parameter Name Data Type Default
426: -- p_Api_Version_Number NUMBER
427: -- p_TerrRsc_Tbl TerrResource_tbl_type_wflex := G_MISS_TERRRESOURCE_TBL_WFLEX
428: -- p_TerrRsc_Access_Tbl TerrRsc_Access_tbl_type := G_MISS_TERRRSC_ACCESS_TBL
429: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
430: --
431: -- Optional
432: -- Parameter Name Data Type Default
433: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

Line 433: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

429: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
430: --
431: -- Optional
432: -- Parameter Name Data Type Default
433: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
434: -- p_Commit VARCHAR2 := FND_API.G_FALSE
435: --
436: -- OUT :
437: -- Parameter Name Data Type

Line 434: -- p_Commit VARCHAR2 := FND_API.G_FALSE

430: --
431: -- Optional
432: -- Parameter Name Data Type Default
433: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
434: -- p_Commit VARCHAR2 := FND_API.G_FALSE
435: --
436: -- OUT :
437: -- Parameter Name Data Type
438: -- x_Return_Status VARCHAR2(1)

Line 454: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

450:
451: PROCEDURE Create_TerrResource
452: (
453: p_Api_Version_Number IN NUMBER,
454: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
455: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
456: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
457: x_Return_Status OUT NOCOPY VARCHAR2,
458: x_Msg_Count OUT NOCOPY NUMBER,

Line 455: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

451: PROCEDURE Create_TerrResource
452: (
453: p_Api_Version_Number IN NUMBER,
454: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
455: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
456: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
457: x_Return_Status OUT NOCOPY VARCHAR2,
458: x_Msg_Count OUT NOCOPY NUMBER,
459: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 456: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

452: (
453: p_Api_Version_Number IN NUMBER,
454: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
455: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
456: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
457: x_Return_Status OUT NOCOPY VARCHAR2,
458: x_Msg_Count OUT NOCOPY NUMBER,
459: x_Msg_Data OUT NOCOPY VARCHAR2,
460: p_TerrRsc_Tbl IN TerrResource_tbl_type_wflex := G_MISS_TERRRESOURCE_TBL_WFLEX,

Line 487: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

483: -- Standard Start of API savepoint
484: SAVEPOINT CREATE_TERRRESOURCE_PVT;
485:
486: -- Standard call to check for call compatibility.
487: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
488: p_api_version_number,
489: l_api_name,
490: G_PKG_NAME)
491: THEN

Line 492: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

488: p_api_version_number,
489: l_api_name,
490: G_PKG_NAME)
491: THEN
492: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
493: END IF;
494:
495: -- Initialize message list if p_init_msg_list is set to TRUE.
496: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 496: IF FND_API.to_Boolean( p_init_msg_list ) THEN

492: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
493: END IF;
494:
495: -- Initialize message list if p_init_msg_list is set to TRUE.
496: IF FND_API.to_Boolean( p_init_msg_list ) THEN
497: FND_MSG_PUB.initialize;
498: END IF;
499:
500: -- Debug Message

Line 509: x_return_status := FND_API.G_RET_STS_SUCCESS;

505: FND_MSG_PUB.Add;
506: END IF;
507:
508: -- Initialize API return status to success
509: x_return_status := FND_API.G_RET_STS_SUCCESS;
510: --
511: -- API body
512: --
513: -- ******************************************************************

Line 518: If(p_validation_level <> FND_API.G_VALID_LEVEL_NONE) Then

514: -- Validate Territory parameters Access
515: -- ******************************************************************
516:
517: --mark#2
518: If(p_validation_level <> FND_API.G_VALID_LEVEL_NONE) Then
519: --dbms_output.put_line('Create_TerrResource PVT: About to call Validate_TerrResource_Data');
520:
521: --Validate the incomming data for territory creation
522: Validate_TerrResource_Data(p_TerrRsc_Tbl => p_TerrRsc_Tbl,

Line 528: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

524: x_Return_Status => l_return_status,
525: x_Msg_Count => x_Msg_Count,
526: x_Msg_Data => x_Msg_Data);
527:
528: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
529: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532: End If;

Line 529: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');

525: x_Msg_Count => x_Msg_Count,
526: x_Msg_Data => x_Msg_Data);
527:
528: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
529: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532: End If;
533: --

Line 530: RAISE FND_API.G_EXC_ERROR;

526: x_Msg_Data => x_Msg_Data);
527:
528: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
529: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532: End If;
533: --
534: --

Line 579: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

575:
576: -- Save the terr qualifier id
577: l_TerrRsc_Id := l_TerrRsc_Out_Tbl(1).TERR_RSC_ID;
578:
579: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
580: X_Return_Status := l_return_status;
581: RAISE FND_API.G_EXC_ERROR;
582: END IF;
583: --

Line 581: RAISE FND_API.G_EXC_ERROR;

577: l_TerrRsc_Id := l_TerrRsc_Out_Tbl(1).TERR_RSC_ID;
578:
579: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
580: X_Return_Status := l_return_status;
581: RAISE FND_API.G_EXC_ERROR;
582: END IF;
583: --
584: -- Get into this loop only if there are access records found
585: If l_TerrRsc_Access_Tbl.Count > 0 Then

Line 608: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

604: l_index := l_index + 1;
605: x_TerrRsc_Access_Out_Tbl(l_index) := l_TerrRsc_Access_Out_Tbl(l_counter);
606: End LOOP;
607: --
608: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
609: X_Return_Status := l_return_status;
610: RAISE FND_API.G_EXC_ERROR;
611: END IF;
612:

Line 610: RAISE FND_API.G_EXC_ERROR;

606: End LOOP;
607: --
608: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
609: X_Return_Status := l_return_status;
610: RAISE FND_API.G_EXC_ERROR;
611: END IF;
612:
613: -- Reset the table and records to G_MISS_RECORD and G_MISS_TABLE
614: l_TerrRsc_Tbl := G_MISS_TERRRESOURCE_TBL_WFLEX;

Line 620: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

616: End If;
617: --
618: End LOOP;
619:
620: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
621: X_Return_Status := l_return_status;
622: RAISE FND_API.G_EXC_ERROR;
623: END IF;
624:

Line 622: RAISE FND_API.G_EXC_ERROR;

618: End LOOP;
619:
620: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
621: X_Return_Status := l_return_status;
622: RAISE FND_API.G_EXC_ERROR;
623: END IF;
624:
625: -- Debug Message
626: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 640: IF FND_API.to_Boolean( p_commit )

636: p_data => x_msg_data
637: );
638:
639: -- Standard check for p_commit
640: IF FND_API.to_Boolean( p_commit )
641: THEN
642: COMMIT WORK;
643: END IF;
644:

Line 648: WHEN FND_API.G_EXC_ERROR THEN

644:
645: --dbms_output.put_line('Create_TerrResource PVT: Exiting API');
646: EXCEPTION
647: --
648: WHEN FND_API.G_EXC_ERROR THEN
649: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');
650: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
651: x_return_status := FND_API.G_RET_STS_ERROR ;
652: FND_MSG_PUB.Count_And_Get

Line 649: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');

645: --dbms_output.put_line('Create_TerrResource PVT: Exiting API');
646: EXCEPTION
647: --
648: WHEN FND_API.G_EXC_ERROR THEN
649: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');
650: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
651: x_return_status := FND_API.G_RET_STS_ERROR ;
652: FND_MSG_PUB.Count_And_Get
653: ( p_count => x_msg_count,

Line 651: x_return_status := FND_API.G_RET_STS_ERROR ;

647: --
648: WHEN FND_API.G_EXC_ERROR THEN
649: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');
650: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
651: x_return_status := FND_API.G_RET_STS_ERROR ;
652: FND_MSG_PUB.Count_And_Get
653: ( p_count => x_msg_count,
654: p_data => x_msg_data
655: );

Line 657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

653: ( p_count => x_msg_count,
654: p_data => x_msg_data
655: );
656:
657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
658: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
659: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
660: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
661: FND_MSG_PUB.Count_And_Get

Line 658: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

654: p_data => x_msg_data
655: );
656:
657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
658: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
659: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
660: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
661: FND_MSG_PUB.Count_And_Get
662: ( p_count => x_msg_count,

Line 660: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

656:
657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
658: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
659: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
660: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
661: FND_MSG_PUB.Count_And_Get
662: ( p_count => x_msg_count,
663: p_data => x_msg_data
664: );

Line 669: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

665:
666: WHEN OTHERS THEN
667: --dbms_output.put_line('Create_TerrResource PVT: OTHERS - ' || SQLERRM);
668: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
669: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
671: THEN
672: fnd_msg_pub.add_exc_msg (
673: g_pkg_name,

Line 695: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,

691: -- Parameter Name Data Type Default
692: -- p_Api_Version_Number NUMBER
693: -- p_TerrRsc_Tbl TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL
694: -- p_TerrRsc_Access_Tbl TerrRsc_Access_tbl_type := G_MISS_TERRRSC_ACCESS_TBL
695: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
696: --
697: -- Optional
698: -- Parameter Name Data Type Default
699: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

Line 699: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

695: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
696: --
697: -- Optional
698: -- Parameter Name Data Type Default
699: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
700: -- p_Commit VARCHAR2 := FND_API.G_FALSE
701: --
702: -- OUT :
703: -- Parameter Name Data Type

Line 700: -- p_Commit VARCHAR2 := FND_API.G_FALSE

696: --
697: -- Optional
698: -- Parameter Name Data Type Default
699: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
700: -- p_Commit VARCHAR2 := FND_API.G_FALSE
701: --
702: -- OUT :
703: -- Parameter Name Data Type
704: -- x_Return_Status VARCHAR2(1)

Line 720: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

716:
717: PROCEDURE Create_TerrResource
718: (
719: p_Api_Version_Number IN NUMBER,
720: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
721: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
722: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
723: x_Return_Status OUT NOCOPY VARCHAR2,
724: x_Msg_Count OUT NOCOPY NUMBER,

Line 721: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

717: PROCEDURE Create_TerrResource
718: (
719: p_Api_Version_Number IN NUMBER,
720: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
721: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
722: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
723: x_Return_Status OUT NOCOPY VARCHAR2,
724: x_Msg_Count OUT NOCOPY NUMBER,
725: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 722: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

718: (
719: p_Api_Version_Number IN NUMBER,
720: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
721: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
722: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
723: x_Return_Status OUT NOCOPY VARCHAR2,
724: x_Msg_Count OUT NOCOPY NUMBER,
725: x_Msg_Data OUT NOCOPY VARCHAR2,
726: p_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,

Line 753: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

749: -- Standard Start of API savepoint
750: SAVEPOINT CREATE_TERRRESOURCE_PVT;
751:
752: -- Standard call to check for call compatibility.
753: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
754: p_api_version_number,
755: l_api_name,
756: G_PKG_NAME)
757: THEN

Line 758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

754: p_api_version_number,
755: l_api_name,
756: G_PKG_NAME)
757: THEN
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: END IF;
760:
761: -- Initialize message list if p_init_msg_list is set to TRUE.
762: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 762: IF FND_API.to_Boolean( p_init_msg_list ) THEN

758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: END IF;
760:
761: -- Initialize message list if p_init_msg_list is set to TRUE.
762: IF FND_API.to_Boolean( p_init_msg_list ) THEN
763: FND_MSG_PUB.initialize;
764: END IF;
765:
766: -- Debug Message

Line 775: x_return_status := FND_API.G_RET_STS_SUCCESS;

771: FND_MSG_PUB.Add;
772: END IF;
773:
774: -- Initialize API return status to success
775: x_return_status := FND_API.G_RET_STS_SUCCESS;
776: --
777: -- API body
778: --
779: -- ******************************************************************

Line 784: If(p_validation_level <> FND_API.G_VALID_LEVEL_NONE) Then

780: -- Validate Territory parameters Access
781: -- ******************************************************************
782:
783: --mark#2
784: If(p_validation_level <> FND_API.G_VALID_LEVEL_NONE) Then
785: --dbms_output.put_line('Create_TerrResource PVT: About to call Validate_TerrResource_Data');
786:
787: --Validate the incomming data for territory creation
788: Validate_TerrResource_Data(p_TerrRsc_Tbl => p_TerrRsc_Tbl,

Line 794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

790: x_Return_Status => l_return_status,
791: x_Msg_Count => x_Msg_Count,
792: x_Msg_Data => x_Msg_Data);
793:
794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
795: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');
796: RAISE FND_API.G_EXC_ERROR;
797: END IF;
798: End If;

Line 795: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');

791: x_Msg_Count => x_Msg_Count,
792: x_Msg_Data => x_Msg_Data);
793:
794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
795: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');
796: RAISE FND_API.G_EXC_ERROR;
797: END IF;
798: End If;
799: --

Line 796: RAISE FND_API.G_EXC_ERROR;

792: x_Msg_Data => x_Msg_Data);
793:
794: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
795: --dbms_output.put_line('Create_TerrResource PVT: Returned x_return_status <> FND_API.G_RET_STS_SUCCESS');
796: RAISE FND_API.G_EXC_ERROR;
797: END IF;
798: End If;
799: --
800: --

Line 845: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

841:
842: -- Save the terr qualifier id
843: l_TerrRsc_Id := l_TerrRsc_Out_Tbl(1).TERR_RSC_ID;
844:
845: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
846: X_Return_Status := l_return_status;
847: RAISE FND_API.G_EXC_ERROR;
848: END IF;
849: --

Line 847: RAISE FND_API.G_EXC_ERROR;

843: l_TerrRsc_Id := l_TerrRsc_Out_Tbl(1).TERR_RSC_ID;
844:
845: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
846: X_Return_Status := l_return_status;
847: RAISE FND_API.G_EXC_ERROR;
848: END IF;
849: --
850: -- Get into this loop only if there are access records found
851: If l_TerrRsc_Access_Tbl.Count > 0 Then

Line 874: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

870: l_index := l_index + 1;
871: x_TerrRsc_Access_Out_Tbl(l_index) := l_TerrRsc_Access_Out_Tbl(l_counter);
872: End LOOP;
873: --
874: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
875: X_Return_Status := l_return_status;
876: RAISE FND_API.G_EXC_ERROR;
877: END IF;
878:

Line 876: RAISE FND_API.G_EXC_ERROR;

872: End LOOP;
873: --
874: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
875: X_Return_Status := l_return_status;
876: RAISE FND_API.G_EXC_ERROR;
877: END IF;
878:
879: -- Reset the table and records to G_MISS_RECORD and G_MISS_TABLE
880: l_TerrRsc_Tbl := G_MISS_TERRRESOURCE_TBL;

Line 886: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

882: End If;
883: --
884: End LOOP;
885:
886: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
887: X_Return_Status := l_return_status;
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;
890:

Line 888: RAISE FND_API.G_EXC_ERROR;

884: End LOOP;
885:
886: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
887: X_Return_Status := l_return_status;
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;
890:
891: -- Debug Message
892: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 906: IF FND_API.to_Boolean( p_commit )

902: p_data => x_msg_data
903: );
904:
905: -- Standard check for p_commit
906: IF FND_API.to_Boolean( p_commit )
907: THEN
908: COMMIT WORK;
909: END IF;
910:

Line 914: WHEN FND_API.G_EXC_ERROR THEN

910:
911: --dbms_output.put_line('Create_TerrResource PVT: Exiting API');
912: EXCEPTION
913: --
914: WHEN FND_API.G_EXC_ERROR THEN
915: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');
916: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
917: x_return_status := FND_API.G_RET_STS_ERROR ;
918: FND_MSG_PUB.Count_And_Get

Line 915: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');

911: --dbms_output.put_line('Create_TerrResource PVT: Exiting API');
912: EXCEPTION
913: --
914: WHEN FND_API.G_EXC_ERROR THEN
915: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');
916: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
917: x_return_status := FND_API.G_RET_STS_ERROR ;
918: FND_MSG_PUB.Count_And_Get
919: ( p_count => x_msg_count,

Line 917: x_return_status := FND_API.G_RET_STS_ERROR ;

913: --
914: WHEN FND_API.G_EXC_ERROR THEN
915: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_ERROR');
916: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
917: x_return_status := FND_API.G_RET_STS_ERROR ;
918: FND_MSG_PUB.Count_And_Get
919: ( p_count => x_msg_count,
920: p_data => x_msg_data
921: );

Line 923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

919: ( p_count => x_msg_count,
920: p_data => x_msg_data
921: );
922:
923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
924: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
925: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
926: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
927: FND_MSG_PUB.Count_And_Get

Line 924: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

920: p_data => x_msg_data
921: );
922:
923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
924: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
925: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
926: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
927: FND_MSG_PUB.Count_And_Get
928: ( p_count => x_msg_count,

Line 926: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

922:
923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
924: --dbms_output.put_line('Create_TerrResource PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
925: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
926: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
927: FND_MSG_PUB.Count_And_Get
928: ( p_count => x_msg_count,
929: p_data => x_msg_data
930: );

Line 935: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

931:
932: WHEN OTHERS THEN
933: --dbms_output.put_line('Create_TerrResource PVT: OTHERS - ' || SQLERRM);
934: ROLLBACK TO CREATE_TERRRESOURCE_PVT;
935: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
936: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
937: THEN
938: fnd_msg_pub.add_exc_msg (
939: g_pkg_name,

Line 967: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE

963: -- p_TerrRsc_Id NUMBER
964: --
965: -- Optional
966: -- Parameter Name Data Type Default
967: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
968: -- p_Commit VARCHAR2 FND_API.G_FALSE
969: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
970: --
971: -- OUT :

Line 968: -- p_Commit VARCHAR2 FND_API.G_FALSE

964: --
965: -- Optional
966: -- Parameter Name Data Type Default
967: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
968: -- p_Commit VARCHAR2 FND_API.G_FALSE
969: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
970: --
971: -- OUT :
972: -- Parameter Name Data Type

Line 969: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,

965: -- Optional
966: -- Parameter Name Data Type Default
967: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
968: -- p_Commit VARCHAR2 FND_API.G_FALSE
969: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
970: --
971: -- OUT :
972: -- Parameter Name Data Type
973: -- X_Return_Status VARCHAR2(1)

Line 987: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

983:
984: PROCEDURE Delete_Terr_Resource
985: (
986: p_Api_Version_Number IN NUMBER,
987: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
988: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
989: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
990: X_Return_Status OUT NOCOPY VARCHAR2,
991: X_Msg_Count OUT NOCOPY NUMBER,

Line 988: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

984: PROCEDURE Delete_Terr_Resource
985: (
986: p_Api_Version_Number IN NUMBER,
987: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
988: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
989: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
990: X_Return_Status OUT NOCOPY VARCHAR2,
991: X_Msg_Count OUT NOCOPY NUMBER,
992: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 989: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

985: (
986: p_Api_Version_Number IN NUMBER,
987: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
988: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
989: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
990: X_Return_Status OUT NOCOPY VARCHAR2,
991: X_Msg_Count OUT NOCOPY NUMBER,
992: X_Msg_Data OUT NOCOPY VARCHAR2,
993: p_TerrRsc_Id IN NUMBER

Line 1017: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1013: -- Standard Start of API savepoint
1014: SAVEPOINT DELETE_TERR_RESOURCE_PVT;
1015:
1016: -- Standard call to check for call compatibility.
1017: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1018: p_api_version_number,
1019: l_api_name,
1020: G_PKG_NAME)
1021: THEN

Line 1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1018: p_api_version_number,
1019: l_api_name,
1020: G_PKG_NAME)
1021: THEN
1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1023: END IF;
1024:
1025: -- Initialize message list if p_init_msg_list is set to TRUE.
1026: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1026: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1023: END IF;
1024:
1025: -- Initialize message list if p_init_msg_list is set to TRUE.
1026: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1027: FND_MSG_PUB.initialize;
1028: END IF;
1029:
1030: -- Debug Message

Line 1039: x_return_status := FND_API.G_RET_STS_SUCCESS;

1035: FND_MSG_PUB.Add;
1036: END IF;
1037:
1038: -- Initialize API return status to success
1039: x_return_status := FND_API.G_RET_STS_SUCCESS;
1040: --
1041: -- API body
1042: --
1043: FOR C IN C_GetTerrRscAccess LOOP

Line 1053: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1049: l_Return_Status,
1050: X_Msg_Count,
1051: X_Msg_Data);
1052:
1053: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: END IF;
1056: --
1057: END LOOP;

Line 1054: RAISE FND_API.G_EXC_ERROR;

1050: X_Msg_Count,
1051: X_Msg_Data);
1052:
1053: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: END IF;
1056: --
1057: END LOOP;
1058: --

Line 1068: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1064: l_Return_Status,
1065: X_Msg_Count,
1066: X_Msg_Data);
1067:
1068: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: RAISE FND_API.G_EXC_ERROR;
1070: END IF;
1071:
1072: -- Debug Message

Line 1069: RAISE FND_API.G_EXC_ERROR;

1065: X_Msg_Count,
1066: X_Msg_Data);
1067:
1068: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: RAISE FND_API.G_EXC_ERROR;
1070: END IF;
1071:
1072: -- Debug Message
1073: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1087: IF FND_API.to_Boolean( p_commit )

1083: p_data => x_msg_data
1084: );
1085:
1086: -- Standard check for p_commit
1087: IF FND_API.to_Boolean( p_commit )
1088: THEN
1089: COMMIT WORK;
1090: END IF;
1091:

Line 1094: WHEN FND_API.G_EXC_ERROR THEN

1090: END IF;
1091:
1092: EXCEPTION
1093: --
1094: WHEN FND_API.G_EXC_ERROR THEN
1095: ROLLBACK TO DELETE_TERR_RESOURCE_PVT;
1096: x_return_status := FND_API.G_RET_STS_ERROR ;
1097: FND_MSG_PUB.Count_And_Get
1098: ( p_count => x_msg_count,

Line 1096: x_return_status := FND_API.G_RET_STS_ERROR ;

1092: EXCEPTION
1093: --
1094: WHEN FND_API.G_EXC_ERROR THEN
1095: ROLLBACK TO DELETE_TERR_RESOURCE_PVT;
1096: x_return_status := FND_API.G_RET_STS_ERROR ;
1097: FND_MSG_PUB.Count_And_Get
1098: ( p_count => x_msg_count,
1099: p_data => x_msg_data
1100: );

Line 1102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1098: ( p_count => x_msg_count,
1099: p_data => x_msg_data
1100: );
1101:
1102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1103: ROLLBACK TO DELETE_TERR_RESOURCE_PVT;
1104: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1105: FND_MSG_PUB.Count_And_Get
1106: ( p_count => x_msg_count,

Line 1104: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1100: );
1101:
1102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1103: ROLLBACK TO DELETE_TERR_RESOURCE_PVT;
1104: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1105: FND_MSG_PUB.Count_And_Get
1106: ( p_count => x_msg_count,
1107: p_data => x_msg_data
1108: );

Line 1112: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1108: );
1109:
1110: WHEN OTHERS THEN
1111: ROLLBACK TO DELETE_TERR_RESOURCE_PVT;
1112: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1113: FND_MSG_PUB.Count_And_Get
1114: ( p_count => x_msg_count,
1115: p_data => x_msg_data
1116: );

Line 1143: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

1139: -- p_TerrRsc_Access_Tbl TerrRsc_Access_tbl_type := G_MISS_TERRRSC_ACCESS_TBL
1140: --
1141: -- Optional
1142: -- Parameter Name Data Type Default
1143: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
1144: -- p_Commit VARCHAR2 := FND_API.G_FALSE
1145: --
1146: -- OUT :
1147: -- Parameter Name Data Type

Line 1144: -- p_Commit VARCHAR2 := FND_API.G_FALSE

1140: --
1141: -- Optional
1142: -- Parameter Name Data Type Default
1143: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
1144: -- p_Commit VARCHAR2 := FND_API.G_FALSE
1145: --
1146: -- OUT :
1147: -- Parameter Name Data Type
1148: -- x_Return_Status VARCHAR2(1)

Line 1164: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1160:
1161: PROCEDURE Update_TerrResource
1162: (
1163: p_Api_Version_Number IN NUMBER,
1164: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1165: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1166: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1167: x_Return_Status OUT NOCOPY VARCHAR2,
1168: x_Msg_Count OUT NOCOPY NUMBER,

Line 1165: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

1161: PROCEDURE Update_TerrResource
1162: (
1163: p_Api_Version_Number IN NUMBER,
1164: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1165: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1166: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1167: x_Return_Status OUT NOCOPY VARCHAR2,
1168: x_Msg_Count OUT NOCOPY NUMBER,
1169: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 1166: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1162: (
1163: p_Api_Version_Number IN NUMBER,
1164: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1165: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1166: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1167: x_Return_Status OUT NOCOPY VARCHAR2,
1168: x_Msg_Count OUT NOCOPY NUMBER,
1169: x_Msg_Data OUT NOCOPY VARCHAR2,
1170: p_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,

Line 1191: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1187: x_Return_Status => l_return_status,
1188: x_msg_count => x_msg_count,
1189: x_Msg_Data => x_Msg_Data);
1190:
1191: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1192: x_return_status := l_return_status;
1193: END IF;
1194:
1195: -- Standard call to check for call compatibility.

Line 1196: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1192: x_return_status := l_return_status;
1193: END IF;
1194:
1195: -- Standard call to check for call compatibility.
1196: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1197: p_api_version_number,
1198: l_api_name,
1199: G_PKG_NAME)
1200: THEN

Line 1201: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1197: p_api_version_number,
1198: l_api_name,
1199: G_PKG_NAME)
1200: THEN
1201: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1202: END IF;
1203:
1204: -- Initialize message list if p_init_msg_list is set to TRUE.
1205: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1205: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1201: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1202: END IF;
1203:
1204: -- Initialize message list if p_init_msg_list is set to TRUE.
1205: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1206: FND_MSG_PUB.initialize;
1207: END IF;
1208:
1209: -- Debug Message

Line 1219: x_return_status := FND_API.G_RET_STS_SUCCESS;

1215: END IF;
1216:
1217:
1218: -- Initialize API return status to success
1219: x_return_status := FND_API.G_RET_STS_SUCCESS;
1220: --
1221: -- API body
1222: --
1223: If P_TerrRsc_Tbl.Count > 0 Then

Line 1236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1232: x_msg_data => x_msg_data,
1233: X_TerrRsc_Out_Tbl => X_TerrRsc_Out_Tbl);
1234:
1235:
1236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1237: x_return_status := l_return_status;
1238: RAISE FND_API.G_EXC_ERROR;
1239: END IF;
1240: --

Line 1238: RAISE FND_API.G_EXC_ERROR;

1234:
1235:
1236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1237: x_return_status := l_return_status;
1238: RAISE FND_API.G_EXC_ERROR;
1239: END IF;
1240: --
1241: End If;
1242: --

Line 1255: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1251: x_msg_count => x_msg_count,
1252: x_msg_data => x_msg_data,
1253: X_TerrRsc_Access_Out_Tbl => x_TerrRsc_Access_Out_Tbl);
1254: --
1255: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1256: x_return_status := l_return_status;
1257: RAISE FND_API.G_EXC_ERROR;
1258: END IF;
1259: --

Line 1257: RAISE FND_API.G_EXC_ERROR;

1253: X_TerrRsc_Access_Out_Tbl => x_TerrRsc_Access_Out_Tbl);
1254: --
1255: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1256: x_return_status := l_return_status;
1257: RAISE FND_API.G_EXC_ERROR;
1258: END IF;
1259: --
1260: End If;
1261:

Line 1277: IF FND_API.to_Boolean( p_commit )

1273: p_data => x_msg_data
1274: );
1275:
1276: -- Standard check for p_commit
1277: IF FND_API.to_Boolean( p_commit )
1278: THEN
1279: COMMIT WORK;
1280: END IF;
1281: --

Line 1284: WHEN FND_API.G_EXC_ERROR THEN

1280: END IF;
1281: --
1282: EXCEPTION
1283: --
1284: WHEN FND_API.G_EXC_ERROR THEN
1285: ROLLBACK TO UPDATE_TERRRESOURCE_PVT;
1286: x_return_status := FND_API.G_RET_STS_ERROR ;
1287: FND_MSG_PUB.Count_And_Get
1288: ( p_count => x_msg_count,

Line 1286: x_return_status := FND_API.G_RET_STS_ERROR ;

1282: EXCEPTION
1283: --
1284: WHEN FND_API.G_EXC_ERROR THEN
1285: ROLLBACK TO UPDATE_TERRRESOURCE_PVT;
1286: x_return_status := FND_API.G_RET_STS_ERROR ;
1287: FND_MSG_PUB.Count_And_Get
1288: ( p_count => x_msg_count,
1289: p_data => x_msg_data
1290: );

Line 1292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1288: ( p_count => x_msg_count,
1289: p_data => x_msg_data
1290: );
1291:
1292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1293: ROLLBACK TO UPDATE_TERRRESOURCE_PVT;
1294: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1295: FND_MSG_PUB.Count_And_Get
1296: ( p_count => x_msg_count,

Line 1294: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1290: );
1291:
1292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1293: ROLLBACK TO UPDATE_TERRRESOURCE_PVT;
1294: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1295: FND_MSG_PUB.Count_And_Get
1296: ( p_count => x_msg_count,
1297: p_data => x_msg_data
1298: );

Line 1302: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1298: );
1299:
1300: WHEN OTHERS THEN
1301: ROLLBACK TO UPDATE_TERRRESOURCE_PVT;
1302: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1303: FND_MSG_PUB.Count_And_Get
1304: ( p_count => x_msg_count,
1305: p_data => x_msg_data
1306: );

Line 1316: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1312: PROCEDURE Create_Terr_Resource
1313: (
1314: P_TerrRsc_Rec IN TerrResource_Rec_type_wflex,
1315: p_Api_Version_Number IN NUMBER,
1316: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1317: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1319: x_Return_Status OUT NOCOPY VARCHAR2,
1320: x_Msg_Count OUT NOCOPY NUMBER,

Line 1317: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

1313: (
1314: P_TerrRsc_Rec IN TerrResource_Rec_type_wflex,
1315: p_Api_Version_Number IN NUMBER,
1316: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1317: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1319: x_Return_Status OUT NOCOPY VARCHAR2,
1320: x_Msg_Count OUT NOCOPY NUMBER,
1321: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 1318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1314: P_TerrRsc_Rec IN TerrResource_Rec_type_wflex,
1315: p_Api_Version_Number IN NUMBER,
1316: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1317: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1319: x_Return_Status OUT NOCOPY VARCHAR2,
1320: x_Msg_Count OUT NOCOPY NUMBER,
1321: x_Msg_Data OUT NOCOPY VARCHAR2,
1322: X_TerrRsc_Out_Rec OUT NOCOPY TerrResource_out_Rec_type

Line 1342: x_return_status := FND_API.G_RET_STS_SUCCESS;

1338: FND_MSG_PUB.Add;
1339: END IF;
1340:
1341: -- Initialize API return status to success
1342: x_return_status := FND_API.G_RET_STS_SUCCESS;
1343:
1344: --ARPATEL: bug#2849410
1345: Check_for_duplicate2 (P_TerrRsc_Rec => P_TerrRsc_Rec,
1346: x_Return_Status => l_return_status,

Line 1351: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1347: x_msg_count => x_msg_count,
1348: x_Msg_Data => x_Msg_Data);
1349:
1350:
1351: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1352: RAISE FND_API.G_EXC_ERROR;
1353: END IF;
1354:
1355: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

Line 1352: RAISE FND_API.G_EXC_ERROR;

1348: x_Msg_Data => x_Msg_Data);
1349:
1350:
1351: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1352: RAISE FND_API.G_EXC_ERROR;
1353: END IF;
1354:
1355: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1356: THEN

Line 1355: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

1351: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1352: RAISE FND_API.G_EXC_ERROR;
1353: END IF;
1354:
1355: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1356: THEN
1357: -- Debug message
1358: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1359: THEN

Line 1366: Validate_Terr_Rsc(p_init_msg_list => FND_API.G_FALSE,

1362: FND_MSG_PUB.Add;
1363: END IF;
1364: --
1365: -- Invoke validation procedures
1366: Validate_Terr_Rsc(p_init_msg_list => FND_API.G_FALSE,
1367: x_Return_Status => x_return_status,
1368: x_msg_count => x_msg_count,
1369: x_msg_data => x_msg_data,
1370: P_TerrRsc_Rec => P_TerrRsc_Rec);

Line 1372: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1368: x_msg_count => x_msg_count,
1369: x_msg_data => x_msg_data,
1370: P_TerrRsc_Rec => P_TerrRsc_Rec);
1371:
1372: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1373: RAISE FND_API.G_EXC_ERROR;
1374: END IF;
1375: --
1376: END IF;

Line 1373: RAISE FND_API.G_EXC_ERROR;

1369: x_msg_data => x_msg_data,
1370: P_TerrRsc_Rec => P_TerrRsc_Rec);
1371:
1372: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1373: RAISE FND_API.G_EXC_ERROR;
1374: END IF;
1375: --
1376: END IF;
1377:

Line 1380: /* Intialise to NULL if FND_API.G_MISS_NUM,

1376: END IF;
1377:
1378: -- Call insert terr_Qual_Type_Usgs table handler
1379: --
1380: /* Intialise to NULL if FND_API.G_MISS_NUM,
1381: ** otherwise used passed in value
1382: */
1383: IF (l_TerrRsc_id = FND_API.G_MISS_NUM) THEN
1384: l_TerrRsc_id := NULL;

Line 1383: IF (l_TerrRsc_id = FND_API.G_MISS_NUM) THEN

1379: --
1380: /* Intialise to NULL if FND_API.G_MISS_NUM,
1381: ** otherwise used passed in value
1382: */
1383: IF (l_TerrRsc_id = FND_API.G_MISS_NUM) THEN
1384: l_TerrRsc_id := NULL;
1385: END IF;
1386:
1387: --dbms_output.put_line('Create_Terr_Resource REC: Before Calling JTF_TERR_RSC_PKG.Insert_Row');

Line 1427: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

1423: -- Save the terr_usg_id and
1424: X_TerrRsc_Out_Rec.TERR_RSC_ID := l_TerrRsc_Id;
1425:
1426: -- If successful then save the success status for the record
1427: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
1428:
1429: -- Debug Message
1430: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1431: THEN

Line 1439: WHEN FND_API.G_EXC_ERROR THEN

1435: END IF;
1436:
1437: --dbms_output.put_line('Create_Terr_Resource REC: Exiting API');
1438: EXCEPTION
1439: WHEN FND_API.G_EXC_ERROR THEN
1440: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');
1441:
1442: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1443: X_TerrRsc_Out_Rec.return_status := x_return_status;

Line 1440: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');

1436:
1437: --dbms_output.put_line('Create_Terr_Resource REC: Exiting API');
1438: EXCEPTION
1439: WHEN FND_API.G_EXC_ERROR THEN
1440: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');
1441:
1442: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1443: X_TerrRsc_Out_Rec.return_status := x_return_status;
1444: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 1444: x_return_status := FND_API.G_RET_STS_ERROR ;

1440: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');
1441:
1442: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1443: X_TerrRsc_Out_Rec.return_status := x_return_status;
1444: x_return_status := FND_API.G_RET_STS_ERROR ;
1445:
1446: FND_MSG_PUB.Count_And_Get
1447: ( P_count => x_msg_count,
1448: P_data => x_msg_data

Line 1453: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1449: );
1450:
1451: WHEN OTHERS THEN
1452: --dbms_output.put_line('Create_Terr_Resource REC: OTHERS - ' || SQLERRM);
1453: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1454: --
1455: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1456: X_TerrRsc_Out_Rec.return_status := x_return_status;
1457: --

Line 1498: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1494: PROCEDURE Create_Terr_Resource
1495: (
1496: P_TerrRsc_Rec IN TerrResource_Rec_type,
1497: p_Api_Version_Number IN NUMBER,
1498: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1499: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1500: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1501: x_Return_Status OUT NOCOPY VARCHAR2,
1502: x_Msg_Count OUT NOCOPY NUMBER,

Line 1499: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

1495: (
1496: P_TerrRsc_Rec IN TerrResource_Rec_type,
1497: p_Api_Version_Number IN NUMBER,
1498: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1499: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1500: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1501: x_Return_Status OUT NOCOPY VARCHAR2,
1502: x_Msg_Count OUT NOCOPY NUMBER,
1503: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 1500: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1496: P_TerrRsc_Rec IN TerrResource_Rec_type,
1497: p_Api_Version_Number IN NUMBER,
1498: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1499: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1500: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1501: x_Return_Status OUT NOCOPY VARCHAR2,
1502: x_Msg_Count OUT NOCOPY NUMBER,
1503: x_Msg_Data OUT NOCOPY VARCHAR2,
1504: X_TerrRsc_Out_Rec OUT NOCOPY TerrResource_out_Rec_type

Line 1524: x_return_status := FND_API.G_RET_STS_SUCCESS;

1520: FND_MSG_PUB.Add;
1521: END IF;
1522:
1523: -- Initialize API return status to success
1524: x_return_status := FND_API.G_RET_STS_SUCCESS;
1525:
1526: --ARPATEL: bug#2849410
1527: Check_for_duplicate2 (P_TerrRsc_Rec => P_TerrRsc_Rec,
1528: x_Return_Status => l_return_status,

Line 1533: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1529: x_msg_count => x_msg_count,
1530: x_Msg_Data => x_Msg_Data);
1531:
1532:
1533: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1534: RAISE FND_API.G_EXC_ERROR;
1535: END IF;
1536:
1537: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

Line 1534: RAISE FND_API.G_EXC_ERROR;

1530: x_Msg_Data => x_Msg_Data);
1531:
1532:
1533: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1534: RAISE FND_API.G_EXC_ERROR;
1535: END IF;
1536:
1537: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1538: THEN

Line 1537: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

1533: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1534: RAISE FND_API.G_EXC_ERROR;
1535: END IF;
1536:
1537: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1538: THEN
1539: -- Debug message
1540: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1541: THEN

Line 1548: Validate_Terr_Rsc(p_init_msg_list => FND_API.G_FALSE,

1544: FND_MSG_PUB.Add;
1545: END IF;
1546: --
1547: -- Invoke validation procedures
1548: Validate_Terr_Rsc(p_init_msg_list => FND_API.G_FALSE,
1549: x_Return_Status => x_return_status,
1550: x_msg_count => x_msg_count,
1551: x_msg_data => x_msg_data,
1552: P_TerrRsc_Rec => P_TerrRsc_Rec);

Line 1554: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1550: x_msg_count => x_msg_count,
1551: x_msg_data => x_msg_data,
1552: P_TerrRsc_Rec => P_TerrRsc_Rec);
1553:
1554: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1555: RAISE FND_API.G_EXC_ERROR;
1556: END IF;
1557: --
1558: END IF;

Line 1555: RAISE FND_API.G_EXC_ERROR;

1551: x_msg_data => x_msg_data,
1552: P_TerrRsc_Rec => P_TerrRsc_Rec);
1553:
1554: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1555: RAISE FND_API.G_EXC_ERROR;
1556: END IF;
1557: --
1558: END IF;
1559:

Line 1562: /* Intialise to NULL if FND_API.G_MISS_NUM,

1558: END IF;
1559:
1560: -- Call insert terr_Qual_Type_Usgs table handler
1561: --
1562: /* Intialise to NULL if FND_API.G_MISS_NUM,
1563: ** otherwise used passed in value
1564: */
1565: IF (l_TerrRsc_id = FND_API.G_MISS_NUM) THEN
1566: l_TerrRsc_id := NULL;

Line 1565: IF (l_TerrRsc_id = FND_API.G_MISS_NUM) THEN

1561: --
1562: /* Intialise to NULL if FND_API.G_MISS_NUM,
1563: ** otherwise used passed in value
1564: */
1565: IF (l_TerrRsc_id = FND_API.G_MISS_NUM) THEN
1566: l_TerrRsc_id := NULL;
1567: END IF;
1568:
1569: --dbms_output.put_line('Create_Terr_Resource REC: Before Calling JTF_TERR_RSC_PKG.Insert_Row');

Line 1593: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

1589: -- Save the terr_usg_id and
1590: X_TerrRsc_Out_Rec.TERR_RSC_ID := l_TerrRsc_Id;
1591:
1592: -- If successful then save the success status for the record
1593: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
1594:
1595: -- Debug Message
1596: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1597: THEN

Line 1605: WHEN FND_API.G_EXC_ERROR THEN

1601: END IF;
1602:
1603: --dbms_output.put_line('Create_Terr_Resource REC: Exiting API');
1604: EXCEPTION
1605: WHEN FND_API.G_EXC_ERROR THEN
1606: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');
1607:
1608: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1609: X_TerrRsc_Out_Rec.return_status := x_return_status;

Line 1606: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');

1602:
1603: --dbms_output.put_line('Create_Terr_Resource REC: Exiting API');
1604: EXCEPTION
1605: WHEN FND_API.G_EXC_ERROR THEN
1606: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');
1607:
1608: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1609: X_TerrRsc_Out_Rec.return_status := x_return_status;
1610: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 1610: x_return_status := FND_API.G_RET_STS_ERROR ;

1606: --dbms_output.put_line('Create_Terr_Resource: FND_API.G_EXC_ERROR');
1607:
1608: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1609: X_TerrRsc_Out_Rec.return_status := x_return_status;
1610: x_return_status := FND_API.G_RET_STS_ERROR ;
1611:
1612: FND_MSG_PUB.Count_And_Get
1613: ( P_count => x_msg_count,
1614: P_data => x_msg_data

Line 1619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1615: );
1616:
1617: WHEN OTHERS THEN
1618: --dbms_output.put_line('Create_Terr_Resource REC: OTHERS - ' || SQLERRM);
1619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1620: --
1621: X_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
1622: X_TerrRsc_Out_Rec.return_status := x_return_status;
1623: --

Line 1636: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1632: PROCEDURE Create_Terr_Resource
1633: (
1634: P_TerrRsc_Tbl IN TerrResource_tbl_type_wflex := G_MISS_TERRRESOURCE_TBL_WFLEX,
1635: p_Api_Version_Number IN NUMBER,
1636: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1637: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1638: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1639: x_Return_Status OUT NOCOPY VARCHAR2,
1640: x_Msg_Count OUT NOCOPY NUMBER,

Line 1637: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

1633: (
1634: P_TerrRsc_Tbl IN TerrResource_tbl_type_wflex := G_MISS_TERRRESOURCE_TBL_WFLEX,
1635: p_Api_Version_Number IN NUMBER,
1636: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1637: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1638: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1639: x_Return_Status OUT NOCOPY VARCHAR2,
1640: x_Msg_Count OUT NOCOPY NUMBER,
1641: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 1638: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1634: P_TerrRsc_Tbl IN TerrResource_tbl_type_wflex := G_MISS_TERRRESOURCE_TBL_WFLEX,
1635: p_Api_Version_Number IN NUMBER,
1636: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1637: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1638: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1639: x_Return_Status OUT NOCOPY VARCHAR2,
1640: x_Msg_Count OUT NOCOPY NUMBER,
1641: x_Msg_Data OUT NOCOPY VARCHAR2,
1642: X_TerrRsc_Out_Tbl OUT NOCOPY TerrResource_out_tbl_type

Line 1667: x_return_status := FND_API.G_RET_STS_SUCCESS;

1663: FND_MSG_PUB.Add;
1664: END IF;
1665:
1666: -- Initialize API return status to success
1667: x_return_status := FND_API.G_RET_STS_SUCCESS;
1668:
1669: -- Call overloaded Create_Terr_Qualifier procedure
1670: --
1671: FOR l_Counter IN 1 .. l_TerrRsc_Tbl_Count LOOP

Line 1686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1682: x_msg_data => x_msg_data,
1683: X_TerrRsc_Out_Rec => l_TerrRsc_Out_Rec);
1684: --
1685: --If there is a major error
1686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1687: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
1688:
1689: -- Save the terr_usg_id and
1690: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;

Line 1687: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');

1683: X_TerrRsc_Out_Rec => l_TerrRsc_Out_Rec);
1684: --
1685: --If there is a major error
1686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1687: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
1688:
1689: -- Save the terr_usg_id and
1690: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
1691:

Line 1693: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1689: -- Save the terr_usg_id and
1690: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
1691:
1692: -- If save the ERROR status for the record
1693: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1694: ELSE
1695: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
1696:
1697: -- Save the terr_usg_id and

Line 1695: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

1691:
1692: -- If save the ERROR status for the record
1693: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1694: ELSE
1695: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
1696:
1697: -- Save the terr_usg_id and
1698: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;
1699:

Line 1701: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

1697: -- Save the terr_usg_id and
1698: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;
1699:
1700: -- If successful then save the success status for the record
1701: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
1702: END IF;
1703: --
1704: END LOOP;
1705:

Line 1708: x_return_status := FND_API.G_RET_STS_SUCCESS;

1704: END LOOP;
1705:
1706: --Get the API overall return status
1707: -- Initialize API return status to success
1708: x_return_status := FND_API.G_RET_STS_SUCCESS;
1709:
1710: --Get number of records in the ouput table
1711: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
1712:

Line 1714: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

1710: --Get number of records in the ouput table
1711: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
1712:
1713: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
1714: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1715: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1716: THEN
1717: X_return_status := FND_API.G_RET_STS_ERROR;
1718: END IF;

Line 1715: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

1711: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
1712:
1713: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
1714: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1715: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1716: THEN
1717: X_return_status := FND_API.G_RET_STS_ERROR;
1718: END IF;
1719: END LOOP;

Line 1717: X_return_status := FND_API.G_RET_STS_ERROR;

1713: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
1714: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1715: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1716: THEN
1717: X_return_status := FND_API.G_RET_STS_ERROR;
1718: END IF;
1719: END LOOP;
1720:
1721: -- Debug Message

Line 1764: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1760: PROCEDURE Create_Terr_Resource
1761: (
1762: P_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,
1763: p_Api_Version_Number IN NUMBER,
1764: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1765: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1766: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1767: x_Return_Status OUT NOCOPY VARCHAR2,
1768: x_Msg_Count OUT NOCOPY NUMBER,

Line 1765: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

1761: (
1762: P_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,
1763: p_Api_Version_Number IN NUMBER,
1764: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1765: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1766: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1767: x_Return_Status OUT NOCOPY VARCHAR2,
1768: x_Msg_Count OUT NOCOPY NUMBER,
1769: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 1766: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1762: P_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,
1763: p_Api_Version_Number IN NUMBER,
1764: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1765: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1766: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1767: x_Return_Status OUT NOCOPY VARCHAR2,
1768: x_Msg_Count OUT NOCOPY NUMBER,
1769: x_Msg_Data OUT NOCOPY VARCHAR2,
1770: X_TerrRsc_Out_Tbl OUT NOCOPY TerrResource_out_tbl_type

Line 1795: x_return_status := FND_API.G_RET_STS_SUCCESS;

1791: FND_MSG_PUB.Add;
1792: END IF;
1793:
1794: -- Initialize API return status to success
1795: x_return_status := FND_API.G_RET_STS_SUCCESS;
1796:
1797: -- Call overloaded Create_Terr_Qualifier procedure
1798: --
1799: FOR l_Counter IN 1 .. l_TerrRsc_Tbl_Count LOOP

Line 1814: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1810: x_msg_data => x_msg_data,
1811: X_TerrRsc_Out_Rec => l_TerrRsc_Out_Rec);
1812: --
1813: --If there is a major error
1814: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1815: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
1816:
1817: -- Save the terr_usg_id and
1818: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;

Line 1815: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');

1811: X_TerrRsc_Out_Rec => l_TerrRsc_Out_Rec);
1812: --
1813: --If there is a major error
1814: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1815: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
1816:
1817: -- Save the terr_usg_id and
1818: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
1819:

Line 1821: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1817: -- Save the terr_usg_id and
1818: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
1819:
1820: -- If save the ERROR status for the record
1821: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1822: ELSE
1823: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
1824:
1825: -- Save the terr_usg_id and

Line 1823: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

1819:
1820: -- If save the ERROR status for the record
1821: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1822: ELSE
1823: --dbms_output.put_line('Create_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
1824:
1825: -- Save the terr_usg_id and
1826: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;
1827:

Line 1829: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

1825: -- Save the terr_usg_id and
1826: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;
1827:
1828: -- If successful then save the success status for the record
1829: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
1830: END IF;
1831: --
1832: END LOOP;
1833:

Line 1836: x_return_status := FND_API.G_RET_STS_SUCCESS;

1832: END LOOP;
1833:
1834: --Get the API overall return status
1835: -- Initialize API return status to success
1836: x_return_status := FND_API.G_RET_STS_SUCCESS;
1837:
1838: --Get number of records in the ouput table
1839: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
1840:

Line 1842: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

1838: --Get number of records in the ouput table
1839: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
1840:
1841: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
1842: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1843: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1844: THEN
1845: X_return_status := FND_API.G_RET_STS_ERROR;
1846: END IF;

Line 1843: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

1839: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
1840:
1841: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
1842: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1843: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1844: THEN
1845: X_return_status := FND_API.G_RET_STS_ERROR;
1846: END IF;
1847: END LOOP;

Line 1845: X_return_status := FND_API.G_RET_STS_ERROR;

1841: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
1842: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1843: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1844: THEN
1845: X_return_status := FND_API.G_RET_STS_ERROR;
1846: END IF;
1847: END LOOP;
1848:
1849: -- Debug Message

Line 1894: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1890: (
1891: p_TerrRsc_Id NUMBER,
1892: P_TerrRsc_Access_Rec TerrRsc_Access_rec_type := G_MISS_TERRRSC_ACCESS_REC,
1893: p_Api_Version_Number IN NUMBER,
1894: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1895: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1897: x_Return_Status OUT NOCOPY VARCHAR2,
1898: x_Msg_Count OUT NOCOPY NUMBER,

Line 1895: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

1891: p_TerrRsc_Id NUMBER,
1892: P_TerrRsc_Access_Rec TerrRsc_Access_rec_type := G_MISS_TERRRSC_ACCESS_REC,
1893: p_Api_Version_Number IN NUMBER,
1894: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1895: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1897: x_Return_Status OUT NOCOPY VARCHAR2,
1898: x_Msg_Count OUT NOCOPY NUMBER,
1899: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1892: P_TerrRsc_Access_Rec TerrRsc_Access_rec_type := G_MISS_TERRRSC_ACCESS_REC,
1893: p_Api_Version_Number IN NUMBER,
1894: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1895: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1897: x_Return_Status OUT NOCOPY VARCHAR2,
1898: x_Msg_Count OUT NOCOPY NUMBER,
1899: x_Msg_Data OUT NOCOPY VARCHAR2,
1900: X_TerrRsc_Access_Out_Rec OUT NOCOPY TerrRsc_Access_out_rec_type

Line 1919: x_return_status := FND_API.G_RET_STS_SUCCESS;

1915: FND_MSG_PUB.Add;
1916: END IF;
1917:
1918: -- Initialize API return status to success
1919: x_return_status := FND_API.G_RET_STS_SUCCESS;
1920:
1921:
1922: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1923: THEN

Line 1922: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

1918: -- Initialize API return status to success
1919: x_return_status := FND_API.G_RET_STS_SUCCESS;
1920:
1921:
1922: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1923: THEN
1924: -- Debug message
1925: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1926: THEN

Line 1933: Validate_Terr_Rsc_Access(p_init_msg_list => FND_API.G_FALSE,

1929: FND_MSG_PUB.Add;
1930: END IF;
1931: --
1932: -- Invoke validation procedures
1933: Validate_Terr_Rsc_Access(p_init_msg_list => FND_API.G_FALSE,
1934: x_Return_Status => x_return_status,
1935: x_msg_count => x_msg_count,
1936: x_msg_data => x_msg_data,
1937: p_TerrRsc_Id => p_TerrRsc_Id,

Line 1940: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1936: x_msg_data => x_msg_data,
1937: p_TerrRsc_Id => p_TerrRsc_Id,
1938: p_TerrRsc_Access_Rec => P_TerrRsc_Access_Rec);
1939:
1940: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1941: RAISE FND_API.G_EXC_ERROR;
1942: END IF;
1943: --
1944: END IF;

Line 1941: RAISE FND_API.G_EXC_ERROR;

1937: p_TerrRsc_Id => p_TerrRsc_Id,
1938: p_TerrRsc_Access_Rec => P_TerrRsc_Access_Rec);
1939:
1940: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1941: RAISE FND_API.G_EXC_ERROR;
1942: END IF;
1943: --
1944: END IF;
1945:

Line 1951: p_init_msg_list => FND_API.G_FALSE,

1947: -- check for Unique Key constraint violation
1948: validate_terr_rsc_access_UK(
1949: p_Terr_Rsc_Id => p_terrrsc_id,
1950: p_Access_Type => p_TerrRsc_access_rec.access_type,
1951: p_init_msg_list => FND_API.G_FALSE,
1952: x_Return_Status => x_return_status,
1953: x_msg_count => x_msg_count,
1954: x_msg_data => x_msg_data );
1955:

Line 1956: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1952: x_Return_Status => x_return_status,
1953: x_msg_count => x_msg_count,
1954: x_msg_data => x_msg_data );
1955:
1956: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1957: RAISE FND_API.G_EXC_ERROR;
1958: END IF;
1959:
1960: -- Call insert Terr_Resource_Access table handler

Line 1957: RAISE FND_API.G_EXC_ERROR;

1953: x_msg_count => x_msg_count,
1954: x_msg_data => x_msg_data );
1955:
1956: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1957: RAISE FND_API.G_EXC_ERROR;
1958: END IF;
1959:
1960: -- Call insert Terr_Resource_Access table handler
1961: --

Line 1962: /* Intialise to NULL if FND_API.G_MISS_NUM,

1958: END IF;
1959:
1960: -- Call insert Terr_Resource_Access table handler
1961: --
1962: /* Intialise to NULL if FND_API.G_MISS_NUM,
1963: ** otherwise used passed in value
1964: */
1965: IF (l_TerrRsc_Access_id = FND_API.G_MISS_NUM) THEN
1966: l_TerrRsc_Access_id := NULL;

Line 1965: IF (l_TerrRsc_Access_id = FND_API.G_MISS_NUM) THEN

1961: --
1962: /* Intialise to NULL if FND_API.G_MISS_NUM,
1963: ** otherwise used passed in value
1964: */
1965: IF (l_TerrRsc_Access_id = FND_API.G_MISS_NUM) THEN
1966: l_TerrRsc_Access_id := NULL;
1967: END IF;
1968:
1969: --dbms_output.put_line('Create_Resource _Access REC: Calling JTF_TERR_RSC_ACCESS_PKG.Insert_Row');

Line 1986: X_TerrRsc_Access_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

1982: -- Save the terr_usg_id and
1983: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := l_terrRsc_Access_id;
1984:
1985: -- If successful then save the success status for the record
1986: X_TerrRsc_Access_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
1987:
1988: -- Debug Message
1989: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1990: THEN

Line 1998: WHEN FND_API.G_EXC_ERROR THEN

1994: END IF;
1995:
1996: --dbms_output.put_line('Create_Resource _Access REC: Exiting API');
1997: EXCEPTION
1998: WHEN FND_API.G_EXC_ERROR THEN
1999: --dbms_output.put_line('Create_Resource_Access: FND_API.G_EXC_ERROR');
2000:
2001: x_return_status := FND_API.G_RET_STS_ERROR ;
2002: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := NULL;

Line 1999: --dbms_output.put_line('Create_Resource_Access: FND_API.G_EXC_ERROR');

1995:
1996: --dbms_output.put_line('Create_Resource _Access REC: Exiting API');
1997: EXCEPTION
1998: WHEN FND_API.G_EXC_ERROR THEN
1999: --dbms_output.put_line('Create_Resource_Access: FND_API.G_EXC_ERROR');
2000:
2001: x_return_status := FND_API.G_RET_STS_ERROR ;
2002: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := NULL;
2003: X_TerrRsc_Access_Out_Rec.return_status := x_return_status;

Line 2001: x_return_status := FND_API.G_RET_STS_ERROR ;

1997: EXCEPTION
1998: WHEN FND_API.G_EXC_ERROR THEN
1999: --dbms_output.put_line('Create_Resource_Access: FND_API.G_EXC_ERROR');
2000:
2001: x_return_status := FND_API.G_RET_STS_ERROR ;
2002: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := NULL;
2003: X_TerrRsc_Access_Out_Rec.return_status := x_return_status;
2004:
2005: FND_MSG_PUB.Count_And_Get

Line 2013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2009:
2010: WHEN OTHERS THEN
2011: --dbms_output.put_line('Others exception in Create_Resource_Access' || SQLERRM);
2012: --
2013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2014: --
2015: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := NULL;
2016: X_TerrRsc_Access_Out_Rec.return_status := x_return_status;
2017: --

Line 2063: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2059: (
2060: p_TerrRsc_Id NUMBER,
2061: P_TerrRsc_Access_Tbl TerrRsc_Access_Tbl_type := G_MISS_TERRRSC_ACCESS_TBL,
2062: p_Api_Version_Number IN NUMBER,
2063: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2064: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2065: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2066: x_Return_Status OUT NOCOPY VARCHAR2,
2067: x_Msg_Count OUT NOCOPY NUMBER,

Line 2064: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

2060: p_TerrRsc_Id NUMBER,
2061: P_TerrRsc_Access_Tbl TerrRsc_Access_Tbl_type := G_MISS_TERRRSC_ACCESS_TBL,
2062: p_Api_Version_Number IN NUMBER,
2063: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2064: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2065: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2066: x_Return_Status OUT NOCOPY VARCHAR2,
2067: x_Msg_Count OUT NOCOPY NUMBER,
2068: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 2065: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2061: P_TerrRsc_Access_Tbl TerrRsc_Access_Tbl_type := G_MISS_TERRRSC_ACCESS_TBL,
2062: p_Api_Version_Number IN NUMBER,
2063: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2064: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2065: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2066: x_Return_Status OUT NOCOPY VARCHAR2,
2067: x_Msg_Count OUT NOCOPY NUMBER,
2068: x_Msg_Data OUT NOCOPY VARCHAR2,
2069: X_TerrRsc_Access_Out_Tbl OUT NOCOPY TerrRsc_Access_out_Tbl_type

Line 2097: x_return_status := FND_API.G_RET_STS_SUCCESS;

2093: END IF;
2094:
2095:
2096: -- Initialize API return status to success
2097: x_return_status := FND_API.G_RET_STS_SUCCESS;
2098:
2099: -- -- Call overloaded Create_Terr_Qualifier procedure
2100: --
2101: FOR l_Counter IN 1 .. l_TerrRsc_Access_Tbl_Count LOOP

Line 2116: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2112: x_msg_data => x_msg_data,
2113: x_TerrRsc_Access_Out_Rec => l_TerrRsc_Access_Out_Rec);
2114: --
2115: --If there is a major error
2116: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2117: --dbms_output.put_line('Create_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2118: -- Save the terr_usg_id and
2119: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2120: -- If save the ERROR status for the record

Line 2117: --dbms_output.put_line('Create_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');

2113: x_TerrRsc_Access_Out_Rec => l_TerrRsc_Access_Out_Rec);
2114: --
2115: --If there is a major error
2116: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2117: --dbms_output.put_line('Create_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2118: -- Save the terr_usg_id and
2119: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2120: -- If save the ERROR status for the record
2121: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2121: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2117: --dbms_output.put_line('Create_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2118: -- Save the terr_usg_id and
2119: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2120: -- If save the ERROR status for the record
2121: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2122: ELSE
2123: --dbms_output.put_line('Create_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');
2124: -- Save the terr_usg_id and
2125: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := l_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID;

Line 2123: --dbms_output.put_line('Create_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');

2119: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2120: -- If save the ERROR status for the record
2121: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2122: ELSE
2123: --dbms_output.put_line('Create_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');
2124: -- Save the terr_usg_id and
2125: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := l_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID;
2126:
2127: -- If successful then save the success status for the record

Line 2128: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

2124: -- Save the terr_usg_id and
2125: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := l_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID;
2126:
2127: -- If successful then save the success status for the record
2128: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
2129: END IF;
2130: --
2131: END LOOP;
2132:

Line 2135: x_return_status := FND_API.G_RET_STS_SUCCESS;

2131: END LOOP;
2132:
2133: --Get the API overall return status
2134: --Initialize API return status to success
2135: x_return_status := FND_API.G_RET_STS_SUCCESS;
2136:
2137: --Get number of records in the ouput table
2138: l_TerrRscAcc_Out_Tbl_Count := X_TerrRsc_Access_Out_Tbl.Count;
2139:

Line 2141: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

2137: --Get number of records in the ouput table
2138: l_TerrRscAcc_Out_Tbl_Count := X_TerrRsc_Access_Out_Tbl.Count;
2139:
2140: FOR l_Counter IN 1 .. l_TerrRscAcc_Out_Tbl_Count LOOP
2141: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2142: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2143: THEN
2144: X_return_status := FND_API.G_RET_STS_ERROR;
2145: END IF;

Line 2142: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

2138: l_TerrRscAcc_Out_Tbl_Count := X_TerrRsc_Access_Out_Tbl.Count;
2139:
2140: FOR l_Counter IN 1 .. l_TerrRscAcc_Out_Tbl_Count LOOP
2141: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2142: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2143: THEN
2144: X_return_status := FND_API.G_RET_STS_ERROR;
2145: END IF;
2146: END LOOP;

Line 2144: X_return_status := FND_API.G_RET_STS_ERROR;

2140: FOR l_Counter IN 1 .. l_TerrRscAcc_Out_Tbl_Count LOOP
2141: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2142: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2143: THEN
2144: X_return_status := FND_API.G_RET_STS_ERROR;
2145: END IF;
2146: END LOOP;
2147:
2148: -- Debug Message

Line 2173: -- P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE

2169: -- Parameters:
2170: -- IN
2171: -- Parameter Name Data Type Default
2172: -- P_Api_Version_Number IN NUMBER,
2173: -- P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
2174: -- P_Commit IN VARCHAR2 := FND_API.G_FALSE
2175: -- P_TerrRsc_Id IN NUMBER
2176: --
2177: -- Optional:

Line 2174: -- P_Commit IN VARCHAR2 := FND_API.G_FALSE

2170: -- IN
2171: -- Parameter Name Data Type Default
2172: -- P_Api_Version_Number IN NUMBER,
2173: -- P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
2174: -- P_Commit IN VARCHAR2 := FND_API.G_FALSE
2175: -- P_TerrRsc_Id IN NUMBER
2176: --
2177: -- Optional:
2178: --

Line 2191: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2187:
2188: PROCEDURE Delete_TerrRsc_Access
2189: (
2190: P_Api_Version_Number IN NUMBER,
2191: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2192: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2193: P_TerrRsc_Access_Id IN NUMBER,
2194: X_Return_Status OUT NOCOPY VARCHAR2,
2195: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 2192: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2188: PROCEDURE Delete_TerrRsc_Access
2189: (
2190: P_Api_Version_Number IN NUMBER,
2191: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2192: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2193: P_TerrRsc_Access_Id IN NUMBER,
2194: X_Return_Status OUT NOCOPY VARCHAR2,
2195: X_Msg_Count OUT NOCOPY VARCHAR2,
2196: X_Msg_Data OUT NOCOPY VARCHAR2

Line 2209: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2205: -- Standard start of PAI savepoint
2206: SAVEPOINT DELETE_TERRRSC_ACCESS_PVT;
2207:
2208: -- Standard call to check for call compatibility.
2209: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2210: p_api_version_number,
2211: l_api_name,
2212: G_PKG_NAME)
2213: THEN

Line 2214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2210: p_api_version_number,
2211: l_api_name,
2212: G_PKG_NAME)
2213: THEN
2214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2215: END IF;
2216:
2217: -- Initialize message list if p_init_msg_list is set to TRUE.
2218: IF FND_API.to_Boolean( p_init_msg_list )

Line 2218: IF FND_API.to_Boolean( p_init_msg_list )

2214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2215: END IF;
2216:
2217: -- Initialize message list if p_init_msg_list is set to TRUE.
2218: IF FND_API.to_Boolean( p_init_msg_list )
2219: THEN
2220: FND_MSG_PUB.initialize;
2221: END IF;
2222:

Line 2231: x_return_status := FND_API.G_RET_STS_SUCCESS;

2227: FND_MSG_PUB.Add;
2228: END IF;
2229:
2230: --Initialize the return status to success
2231: x_return_status := FND_API.G_RET_STS_SUCCESS;
2232: --
2233: JTF_TERR_RSC_ACCESS_PKG.Delete_Row(x_TERR_RSC_ACCESS_ID => P_TerrRsc_Access_Id );
2234: --
2235: --Prepare message name

Line 2239: x_return_status := FND_API.G_RET_STS_SUCCESS;

2235: --Prepare message name
2236: FND_MESSAGE.SET_NAME('JTF','TERR_RSCACCESSES_DELETED');
2237:
2238: IF SQL%FOUND THEN
2239: x_return_status := FND_API.G_RET_STS_SUCCESS;
2240: l_row_count := SQL%ROWCOUNT;
2241: END IF;
2242:
2243: --Prepare message token

Line 2262: IF FND_API.to_Boolean( p_commit )

2258: p_data => x_msg_data
2259: );
2260:
2261: -- Standard check for p_commit
2262: IF FND_API.to_Boolean( p_commit )
2263: THEN
2264: COMMIT WORK;
2265: END IF;
2266: --

Line 2269: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2265: END IF;
2266: --
2267: EXCEPTION
2268: WHEN NO_DATA_FOUND THEN
2269: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2270: l_row_count := 0;
2271: --Prepare message token
2272: FND_MESSAGE.SET_NAME('ITEMS_DELETED', l_row_count);
2273: --Add message to API message list

Line 2281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2277: ( p_count => x_msg_count,
2278: p_data => x_msg_data
2279: );
2280:
2281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2282: ROLLBACK TO DELETE_TERRRSC_ACCESS_PVT;
2283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2284: FND_MSG_PUB.Count_And_Get
2285: ( p_count => x_msg_count,

Line 2283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2279: );
2280:
2281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2282: ROLLBACK TO DELETE_TERRRSC_ACCESS_PVT;
2283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2284: FND_MSG_PUB.Count_And_Get
2285: ( p_count => x_msg_count,
2286: p_data => x_msg_data
2287: );

Line 2291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2287: );
2288:
2289: WHEN OTHERS THEN
2290: ROLLBACK TO DELETE_TERRRSC_ACCESS_PVT;
2291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2292: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2293: THEN
2294: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_TerrRsc_Access');
2295: END IF;

Line 2313: -- P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE

2309: -- IN
2310: -- Required:
2311: -- Parameter Name Data Type Default
2312: -- P_Api_Version_Number IN NUMBER,
2313: -- P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
2314: -- P_Commit IN VARCHAR2 := FND_API.G_FALSE
2315: -- P_TerrRsc_Id IN NUMBER
2316: --
2317: -- Optional:

Line 2314: -- P_Commit IN VARCHAR2 := FND_API.G_FALSE

2310: -- Required:
2311: -- Parameter Name Data Type Default
2312: -- P_Api_Version_Number IN NUMBER,
2313: -- P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
2314: -- P_Commit IN VARCHAR2 := FND_API.G_FALSE
2315: -- P_TerrRsc_Id IN NUMBER
2316: --
2317: -- Optional:
2318: -- OUT:

Line 2330: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2326:
2327: PROCEDURE Delete_TerrResource
2328: (
2329: P_Api_Version_Number IN NUMBER,
2330: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2331: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2332: P_TerrRsc_Id IN NUMBER,
2333: X_Return_Status OUT NOCOPY VARCHAR2,
2334: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 2331: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2327: PROCEDURE Delete_TerrResource
2328: (
2329: P_Api_Version_Number IN NUMBER,
2330: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2331: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2332: P_TerrRsc_Id IN NUMBER,
2333: X_Return_Status OUT NOCOPY VARCHAR2,
2334: X_Msg_Count OUT NOCOPY VARCHAR2,
2335: X_Msg_Data OUT NOCOPY VARCHAR2

Line 2348: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2344: -- Standard start of PAI savepoint
2345: SAVEPOINT DELETE_TERRRSC_PVT;
2346:
2347: -- Standard call to check for call compatibility.
2348: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2349: p_api_version_number,
2350: l_api_name,
2351: G_PKG_NAME)
2352: THEN

Line 2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2349: p_api_version_number,
2350: l_api_name,
2351: G_PKG_NAME)
2352: THEN
2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2354: END IF;
2355: -- Initialize message list if p_init_msg_list is set to TRUE.
2356: IF FND_API.to_Boolean( p_init_msg_list )
2357: THEN

Line 2356: IF FND_API.to_Boolean( p_init_msg_list )

2352: THEN
2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2354: END IF;
2355: -- Initialize message list if p_init_msg_list is set to TRUE.
2356: IF FND_API.to_Boolean( p_init_msg_list )
2357: THEN
2358: FND_MSG_PUB.initialize;
2359: END IF;
2360:

Line 2370: x_return_status := FND_API.G_RET_STS_SUCCESS;

2366: FND_MSG_PUB.Add;
2367: END IF;
2368:
2369: --Initialize the return status to success
2370: x_return_status := FND_API.G_RET_STS_SUCCESS;
2371: --
2372: JTF_TERR_RSC_PKG.Delete_Row(x_TERR_RSC_ID => P_TerrRsc_Id);
2373: --
2374: --Prepare message name

Line 2378: x_return_status := FND_API.G_RET_STS_SUCCESS;

2374: --Prepare message name
2375: FND_MESSAGE.SET_NAME('JTF','TERR_RESOURCE_DELETED');
2376:
2377: IF SQL%FOUND THEN
2378: x_return_status := FND_API.G_RET_STS_SUCCESS;
2379: l_row_count := SQL%ROWCOUNT;
2380: END IF;
2381:
2382: --Prepare message token

Line 2403: IF FND_API.to_Boolean( p_commit )

2399: p_data => x_msg_data
2400: );
2401:
2402: -- Standard check for p_commit
2403: IF FND_API.to_Boolean( p_commit )
2404: THEN
2405: COMMIT WORK;
2406: END IF;
2407: --

Line 2411: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2407: --
2408: EXCEPTION
2409: WHEN NO_DATA_FOUND THEN
2410: ROLLBACK TO DELETE_TERRRSC_PVT;
2411: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2412: l_row_count := 0;
2413:
2414: --Prepare message token
2415: FND_MESSAGE.SET_NAME('ITEMS_DELETED', l_row_count);

Line 2425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2421: ( p_count => x_msg_count,
2422: p_data => x_msg_data
2423: );
2424:
2425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2426: ROLLBACK TO DELETE_TERRRSC_PVT;
2427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2428: FND_MSG_PUB.Count_And_Get
2429: ( p_count => x_msg_count,

Line 2427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2423: );
2424:
2425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2426: ROLLBACK TO DELETE_TERRRSC_PVT;
2427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2428: FND_MSG_PUB.Count_And_Get
2429: ( p_count => x_msg_count,
2430: p_data => x_msg_data
2431: );

Line 2435: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2431: );
2432:
2433: WHEN OTHERS THEN
2434: ROLLBACK TO DELETE_TERRRSC_PVT;
2435: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2437: THEN
2438: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Territory_Resource');
2439: END IF;

Line 2477: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2473:
2474: PROCEDURE Update_Terr_Resource (
2475: P_TerrRsc_Rec IN TerrResource_Rec_type,
2476: p_Api_Version_Number IN NUMBER,
2477: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2478: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2479: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2480: x_Return_Status OUT NOCOPY VARCHAR2,
2481: x_Msg_Count OUT NOCOPY NUMBER,

Line 2478: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

2474: PROCEDURE Update_Terr_Resource (
2475: P_TerrRsc_Rec IN TerrResource_Rec_type,
2476: p_Api_Version_Number IN NUMBER,
2477: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2478: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2479: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2480: x_Return_Status OUT NOCOPY VARCHAR2,
2481: x_Msg_Count OUT NOCOPY NUMBER,
2482: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 2479: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2475: P_TerrRsc_Rec IN TerrResource_Rec_type,
2476: p_Api_Version_Number IN NUMBER,
2477: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2478: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2479: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2480: x_Return_Status OUT NOCOPY VARCHAR2,
2481: x_Msg_Count OUT NOCOPY NUMBER,
2482: x_Msg_Data OUT NOCOPY VARCHAR2,
2483: x_TerrRsc_Out_Rec OUT NOCOPY TerrResource_out_Rec_type) AS

Line 2502: x_return_status := FND_API.G_RET_STS_SUCCESS;

2498:
2499: BEGIN
2500:
2501: -- Initialize API return status to SUCCESS
2502: x_return_status := FND_API.G_RET_STS_SUCCESS;
2503:
2504: --Vai: Bug # 3520561
2505: Check_for_duplicate2_updates(P_TerrRsc_Rec => P_TerrRsc_Rec,
2506: x_Return_Status => l_return_status,

Line 2510: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2506: x_Return_Status => l_return_status,
2507: x_msg_count => x_msg_count,
2508: x_Msg_Data => x_Msg_Data);
2509:
2510: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2511: RAISE FND_API.G_EXC_ERROR;
2512: END IF;
2513:
2514: --Validate the incomming record

Line 2511: RAISE FND_API.G_EXC_ERROR;

2507: x_msg_count => x_msg_count,
2508: x_Msg_Data => x_Msg_Data);
2509:
2510: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2511: RAISE FND_API.G_EXC_ERROR;
2512: END IF;
2513:
2514: --Validate the incomming record
2515: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE) THEN

Line 2515: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE) THEN

2511: RAISE FND_API.G_EXC_ERROR;
2512: END IF;
2513:
2514: --Validate the incomming record
2515: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE) THEN
2516: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2517: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');
2518: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Rsc');
2519: FND_MSG_PUB.Add;

Line 2523: Validate_Terr_Rsc(p_init_msg_list => FND_API.G_FALSE,

2519: FND_MSG_PUB.Add;
2520: END IF;
2521:
2522: -- Invoke validation procedures
2523: Validate_Terr_Rsc(p_init_msg_list => FND_API.G_FALSE,
2524: x_Return_Status => x_return_status,
2525: x_msg_count => x_msg_count,
2526: x_msg_data => x_msg_data,
2527: p_TerrRsc_Rec => P_TerrRsc_Rec);

Line 2529: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2525: x_msg_count => x_msg_count,
2526: x_msg_data => x_msg_data,
2527: p_TerrRsc_Rec => P_TerrRsc_Rec);
2528:
2529: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2530: RAISE FND_API.G_EXC_ERROR;
2531: END IF;
2532: END IF;
2533:

Line 2530: RAISE FND_API.G_EXC_ERROR;

2526: x_msg_data => x_msg_data,
2527: p_TerrRsc_Rec => P_TerrRsc_Rec);
2528:
2529: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2530: RAISE FND_API.G_EXC_ERROR;
2531: END IF;
2532: END IF;
2533:
2534: OPEN C_GetTerrResource( P_TerrRsc_Rec.TERR_RSC_ID);

Line 2548: raise FND_API.G_EXC_ERROR;

2544: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_RSC');
2545: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_TerrRsc_Rec.TERR_RSC_ID));
2546: FND_MSG_PUB.Add;
2547: END IF;
2548: raise FND_API.G_EXC_ERROR;
2549: End if;
2550: CLOSE C_GetTerrResource;
2551:
2552: JTF_TERR_RSC_PKG.Update_Row(x_Rowid => l_rowid,

Line 2574: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

2570: -- Save the terr_usg_id and
2571: X_TerrRsc_Out_Rec.TERR_RSC_ID := P_TerrRsc_Rec.Terr_Rsc_Id;
2572:
2573: -- If successful then save the success status for the record
2574: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2575:
2576: EXCEPTION
2577: WHEN FND_API.G_EXC_ERROR THEN
2578: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 2577: WHEN FND_API.G_EXC_ERROR THEN

2573: -- If successful then save the success status for the record
2574: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2575:
2576: EXCEPTION
2577: WHEN FND_API.G_EXC_ERROR THEN
2578: x_return_status := FND_API.G_RET_STS_ERROR ;
2579: FND_MSG_PUB.Count_And_Get(P_count => x_msg_count,
2580: P_data => x_msg_data);
2581:

Line 2578: x_return_status := FND_API.G_RET_STS_ERROR ;

2574: X_TerrRsc_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2575:
2576: EXCEPTION
2577: WHEN FND_API.G_EXC_ERROR THEN
2578: x_return_status := FND_API.G_RET_STS_ERROR ;
2579: FND_MSG_PUB.Count_And_Get(P_count => x_msg_count,
2580: P_data => x_msg_data);
2581:
2582: WHEN OTHERS THEN

Line 2583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2579: FND_MSG_PUB.Count_And_Get(P_count => x_msg_count,
2580: P_data => x_msg_data);
2581:
2582: WHEN OTHERS THEN
2583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2584: x_TerrRsc_Out_Rec.TERR_RSC_ID := NULL;
2585: x_TerrRsc_Out_Rec.return_status := x_return_status;
2586: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2587: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Update_Territory_Resources');

Line 2625: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2621: PROCEDURE Update_Terr_Resource
2622: (
2623: P_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,
2624: p_Api_Version_Number IN NUMBER,
2625: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2626: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2627: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2628: x_Return_Status OUT NOCOPY VARCHAR2,
2629: x_Msg_Count OUT NOCOPY NUMBER,

Line 2626: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

2622: (
2623: P_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,
2624: p_Api_Version_Number IN NUMBER,
2625: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2626: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2627: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2628: x_Return_Status OUT NOCOPY VARCHAR2,
2629: x_Msg_Count OUT NOCOPY NUMBER,
2630: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 2627: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2623: P_TerrRsc_Tbl IN TerrResource_tbl_type := G_MISS_TERRRESOURCE_TBL,
2624: p_Api_Version_Number IN NUMBER,
2625: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2626: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2627: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2628: x_Return_Status OUT NOCOPY VARCHAR2,
2629: x_Msg_Count OUT NOCOPY NUMBER,
2630: x_Msg_Data OUT NOCOPY VARCHAR2,
2631: X_TerrRsc_Out_Tbl OUT NOCOPY TerrResource_out_tbl_type

Line 2646: x_return_status := FND_API.G_RET_STS_SUCCESS;

2642: BEGIN
2643: --dbms_output.put_line('Update_Terr_Resource TBL: Entering API');
2644:
2645: -- Initialize API return status to success
2646: x_return_status := FND_API.G_RET_STS_SUCCESS;
2647:
2648: -- Call overloaded Create_Terr_Qualifier procedure
2649: --
2650: FOR l_Counter IN 1 .. l_TerrRsc_Tbl_Count LOOP

Line 2665: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2661: x_msg_data => x_msg_data,
2662: X_TerrRsc_Out_Rec => l_TerrRsc_Out_Rec);
2663: --
2664: --If there is a major error
2665: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2666: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2667: -- Save the terr_usg_id and
2668: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
2669:

Line 2666: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');

2662: X_TerrRsc_Out_Rec => l_TerrRsc_Out_Rec);
2663: --
2664: --If there is a major error
2665: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2666: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2667: -- Save the terr_usg_id and
2668: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
2669:
2670: -- If save the ERROR status for the record

Line 2671: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2667: -- Save the terr_usg_id and
2668: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := NULL;
2669:
2670: -- If save the ERROR status for the record
2671: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2672: ELSE
2673: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2674: -- Save the terr_usg_id and
2675: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;

Line 2673: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

2669:
2670: -- If save the ERROR status for the record
2671: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2672: ELSE
2673: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2674: -- Save the terr_usg_id and
2675: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;
2676: -- If successful then save the success status for the record
2677: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 2677: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

2673: --dbms_output.put_line('Update_Terr_Resource TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2674: -- Save the terr_usg_id and
2675: X_TerrRsc_Out_Tbl(l_counter).TERR_RSC_ID := l_TerrRsc_Out_Rec.TERR_RSC_ID;
2676: -- If successful then save the success status for the record
2677: X_TerrRsc_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
2678: END IF;
2679: --
2680: END LOOP;
2681:

Line 2684: x_return_status := FND_API.G_RET_STS_SUCCESS;

2680: END LOOP;
2681:
2682: --Get the API overall return status
2683: -- Initialize API return status to success
2684: x_return_status := FND_API.G_RET_STS_SUCCESS;
2685:
2686: --Get number of records in the ouput table
2687: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
2688:

Line 2690: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

2686: --Get number of records in the ouput table
2687: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
2688:
2689: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
2690: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2691: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2692: THEN
2693: X_return_status := FND_API.G_RET_STS_ERROR;
2694: END IF;

Line 2691: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

2687: l_TerrRsc_Out_Tbl_Count := X_TerrRsc_Out_Tbl.Count;
2688:
2689: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
2690: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2691: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2692: THEN
2693: X_return_status := FND_API.G_RET_STS_ERROR;
2694: END IF;
2695: END LOOP;

Line 2693: X_return_status := FND_API.G_RET_STS_ERROR;

2689: FOR l_Counter IN 1 .. l_TerrRsc_Out_Tbl_Count LOOP
2690: If x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2691: x_TerrRsc_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2692: THEN
2693: X_return_status := FND_API.G_RET_STS_ERROR;
2694: END IF;
2695: END LOOP;
2696: --dbms_output.put_line('Update_Terr_Resource TBL: Exiting API');
2697: --

Line 2734: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2730: PROCEDURE Update_Resource_Access
2731: (
2732: P_TerrRsc_Access_Rec TerrRsc_Access_rec_type := G_MISS_TERRRSC_ACCESS_REC,
2733: p_Api_Version_Number IN NUMBER,
2734: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2735: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2736: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2737: x_Return_Status OUT NOCOPY VARCHAR2,
2738: x_Msg_Count OUT NOCOPY NUMBER,

Line 2735: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

2731: (
2732: P_TerrRsc_Access_Rec TerrRsc_Access_rec_type := G_MISS_TERRRSC_ACCESS_REC,
2733: p_Api_Version_Number IN NUMBER,
2734: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2735: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2736: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2737: x_Return_Status OUT NOCOPY VARCHAR2,
2738: x_Msg_Count OUT NOCOPY NUMBER,
2739: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 2736: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2732: P_TerrRsc_Access_Rec TerrRsc_Access_rec_type := G_MISS_TERRRSC_ACCESS_REC,
2733: p_Api_Version_Number IN NUMBER,
2734: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2735: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2736: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2737: x_Return_Status OUT NOCOPY VARCHAR2,
2738: x_Msg_Count OUT NOCOPY NUMBER,
2739: x_Msg_Data OUT NOCOPY VARCHAR2,
2740: X_TerrRsc_Access_Out_Rec OUT NOCOPY TerrRsc_Access_out_rec_type

Line 2770: x_return_status := FND_API.G_RET_STS_SUCCESS;

2766: BEGIN
2767: --dbms_output.put_line('Update_Resource_Access REC: Entering API');
2768:
2769: -- Initialize API return status to SUCCESS
2770: x_return_status := FND_API.G_RET_STS_SUCCESS;
2771:
2772: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
2773: THEN
2774: -- Debug message

Line 2772: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

2768:
2769: -- Initialize API return status to SUCCESS
2770: x_return_status := FND_API.G_RET_STS_SUCCESS;
2771:
2772: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
2773: THEN
2774: -- Debug message
2775: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2776: THEN

Line 2783: Validate_Terr_Rsc_Access(p_init_msg_list => FND_API.G_FALSE,

2779: FND_MSG_PUB.Add;
2780: END IF;
2781: --
2782: -- Invoke validation procedures
2783: Validate_Terr_Rsc_Access(p_init_msg_list => FND_API.G_FALSE,
2784: x_Return_Status => l_return_status,
2785: x_msg_count => x_msg_count,
2786: x_msg_data => x_msg_data,
2787: p_TerrRsc_Id => P_TerrRsc_Access_Rec.terr_rsc_id,

Line 2790: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2786: x_msg_data => x_msg_data,
2787: p_TerrRsc_Id => P_TerrRsc_Access_Rec.terr_rsc_id,
2788: p_TerrRsc_Access_Rec => P_TerrRsc_Access_Rec);
2789:
2790: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2791: x_return_status := l_return_status;
2792: RAISE FND_API.G_EXC_ERROR;
2793: END IF;
2794: --

Line 2792: RAISE FND_API.G_EXC_ERROR;

2788: p_TerrRsc_Access_Rec => P_TerrRsc_Access_Rec);
2789:
2790: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2791: x_return_status := l_return_status;
2792: RAISE FND_API.G_EXC_ERROR;
2793: END IF;
2794: --
2795: END IF;
2796:

Line 2820: raise FND_API.G_EXC_ERROR;

2816: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_RSC_ACCESS');
2817: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_TerrRsc_Access_Rec.TERR_RSC_ACCESS_ID));
2818: FND_MSG_PUB.Add;
2819: END IF;
2820: raise FND_API.G_EXC_ERROR;
2821: End if;
2822: CLOSE C_GetTerrResAccess;
2823:
2824: -- jdochert 09/09

Line 2829: p_init_msg_list => FND_API.G_FALSE,

2825: -- check for Unique Key constraint violation
2826: validate_terr_rsc_access_UK(
2827: p_Terr_Rsc_Id => p_TerrRsc_access_rec.terr_rsc_id,
2828: p_Access_Type => p_TerrRsc_access_rec.access_type,
2829: p_init_msg_list => FND_API.G_FALSE,
2830: x_Return_Status => x_return_status,
2831: x_msg_count => x_msg_count,
2832: x_msg_data => x_msg_data );
2833:

Line 2834: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2830: x_Return_Status => x_return_status,
2831: x_msg_count => x_msg_count,
2832: x_msg_data => x_msg_data );
2833:
2834: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2835: RAISE FND_API.G_EXC_ERROR;
2836: END IF;
2837:
2838: --

Line 2835: RAISE FND_API.G_EXC_ERROR;

2831: x_msg_count => x_msg_count,
2832: x_msg_data => x_msg_data );
2833:
2834: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2835: RAISE FND_API.G_EXC_ERROR;
2836: END IF;
2837:
2838: --
2839: --dbms_output.put_line('Update_Resource_Access REC: Calling JTF_TERR_RSC_ACCESS_PKG.Insert_Row');

Line 2855: X_TerrRsc_Access_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

2851:
2852: -- Save the terr_usg_id and
2853: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := P_TerrRsc_Access_Rec.TERR_RSC_ACCESS_ID;
2854: -- If successful then save the success status for the record
2855: X_TerrRsc_Access_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2856:
2857: --dbms_output.put_line('Update_Resource_Access REC: Exiting API');
2858: EXCEPTION
2859: WHEN FND_API.G_EXC_ERROR THEN

Line 2859: WHEN FND_API.G_EXC_ERROR THEN

2855: X_TerrRsc_Access_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2856:
2857: --dbms_output.put_line('Update_Resource_Access REC: Exiting API');
2858: EXCEPTION
2859: WHEN FND_API.G_EXC_ERROR THEN
2860: --dbms_output.put_line('Update_Resource_Access: FND_API.G_EXC_ERROR');
2861: x_return_status := FND_API.G_RET_STS_ERROR ;
2862: FND_MSG_PUB.Count_And_Get
2863: ( P_count => x_msg_count,

Line 2860: --dbms_output.put_line('Update_Resource_Access: FND_API.G_EXC_ERROR');

2856:
2857: --dbms_output.put_line('Update_Resource_Access REC: Exiting API');
2858: EXCEPTION
2859: WHEN FND_API.G_EXC_ERROR THEN
2860: --dbms_output.put_line('Update_Resource_Access: FND_API.G_EXC_ERROR');
2861: x_return_status := FND_API.G_RET_STS_ERROR ;
2862: FND_MSG_PUB.Count_And_Get
2863: ( P_count => x_msg_count,
2864: P_data => x_msg_data

Line 2861: x_return_status := FND_API.G_RET_STS_ERROR ;

2857: --dbms_output.put_line('Update_Resource_Access REC: Exiting API');
2858: EXCEPTION
2859: WHEN FND_API.G_EXC_ERROR THEN
2860: --dbms_output.put_line('Update_Resource_Access: FND_API.G_EXC_ERROR');
2861: x_return_status := FND_API.G_RET_STS_ERROR ;
2862: FND_MSG_PUB.Count_And_Get
2863: ( P_count => x_msg_count,
2864: P_data => x_msg_data
2865: );

Line 2870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2866:
2867: WHEN OTHERS THEN
2868: --dbms_output.put_line('Others exception in Update_Territory_Qualifiers');
2869: --
2870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2871: --
2872: X_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID := NULL;
2873: X_TerrRsc_Access_Out_Rec.return_status := x_return_status;
2874: --

Line 2918: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2914: PROCEDURE Update_Resource_Access
2915: (
2916: P_TerrRsc_Access_Tbl TerrRsc_Access_Tbl_type := G_MISS_TERRRSC_ACCESS_TBL,
2917: p_Api_Version_Number IN NUMBER,
2918: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2919: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2920: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2921: x_Return_Status OUT NOCOPY VARCHAR2,
2922: x_Msg_Count OUT NOCOPY NUMBER,

Line 2919: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

2915: (
2916: P_TerrRsc_Access_Tbl TerrRsc_Access_Tbl_type := G_MISS_TERRRSC_ACCESS_TBL,
2917: p_Api_Version_Number IN NUMBER,
2918: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2919: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2920: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2921: x_Return_Status OUT NOCOPY VARCHAR2,
2922: x_Msg_Count OUT NOCOPY NUMBER,
2923: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 2920: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2916: P_TerrRsc_Access_Tbl TerrRsc_Access_Tbl_type := G_MISS_TERRRSC_ACCESS_TBL,
2917: p_Api_Version_Number IN NUMBER,
2918: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2919: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2920: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2921: x_Return_Status OUT NOCOPY VARCHAR2,
2922: x_Msg_Count OUT NOCOPY NUMBER,
2923: x_Msg_Data OUT NOCOPY VARCHAR2,
2924: X_TerrRsc_Access_Out_Tbl OUT NOCOPY TerrRsc_Access_out_Tbl_type

Line 2943: x_return_status := FND_API.G_RET_STS_SUCCESS;

2939: BEGIN
2940: --dbms_output.put_line('Update_Resource _Access REC: Entering API');
2941:
2942: -- Initialize API return status to success
2943: x_return_status := FND_API.G_RET_STS_SUCCESS;
2944:
2945: -- -- Call overloaded Update_Terr_Qualifier procedure
2946: --
2947: FOR l_Counter IN 1 .. l_TerrRsc_Access_Tbl_Count LOOP

Line 2961: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2957: x_msg_data => x_msg_data,
2958: x_TerrRsc_Access_Out_Rec => l_TerrRsc_Access_Out_Rec);
2959: --
2960: --If there is a major error
2961: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2962: --dbms_output.put_line('Update_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2963: -- Save the terr_usg_id and
2964: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2965: -- If save the ERROR status for the record

Line 2962: --dbms_output.put_line('Update_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');

2958: x_TerrRsc_Access_Out_Rec => l_TerrRsc_Access_Out_Rec);
2959: --
2960: --If there is a major error
2961: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2962: --dbms_output.put_line('Update_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2963: -- Save the terr_usg_id and
2964: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2965: -- If save the ERROR status for the record
2966: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2966: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2962: --dbms_output.put_line('Update_Resource _Access REC: l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR');
2963: -- Save the terr_usg_id and
2964: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2965: -- If save the ERROR status for the record
2966: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2967: ELSE
2968: --dbms_output.put_line('Update_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');
2969: -- Save the terr_usg_id and
2970: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := l_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID;

Line 2968: --dbms_output.put_line('Update_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');

2964: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := NULL;
2965: -- If save the ERROR status for the record
2966: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2967: ELSE
2968: --dbms_output.put_line('Update_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');
2969: -- Save the terr_usg_id and
2970: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := l_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID;
2971: -- If successful then save the success status for the record
2972: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 2972: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

2968: --dbms_output.put_line('Update_Resource _Access REC: l_return_status = FND_API.G_RET_STS_SUCCESS');
2969: -- Save the terr_usg_id and
2970: X_TerrRsc_Access_Out_Tbl(l_counter).TERR_RSC_ACCESS_ID := l_TerrRsc_Access_Out_Rec.TERR_RSC_ACCESS_ID;
2971: -- If successful then save the success status for the record
2972: X_TerrRsc_Access_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
2973: END IF;
2974: --
2975: END LOOP;
2976:

Line 2979: x_return_status := FND_API.G_RET_STS_SUCCESS;

2975: END LOOP;
2976:
2977: --Get the API overall return status
2978: --Initialize API return status to success
2979: x_return_status := FND_API.G_RET_STS_SUCCESS;
2980:
2981: --Get number of records in the ouput table
2982: l_TerrRscAcc_Out_Tbl_Count := X_TerrRsc_Access_Out_Tbl.Count;
2983:

Line 2985: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

2981: --Get number of records in the ouput table
2982: l_TerrRscAcc_Out_Tbl_Count := X_TerrRsc_Access_Out_Tbl.Count;
2983:
2984: FOR l_Counter IN 1 .. l_TerrRscAcc_Out_Tbl_Count LOOP
2985: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2986: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2987: THEN
2988: X_return_status := FND_API.G_RET_STS_ERROR;
2989: END IF;

Line 2986: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

2982: l_TerrRscAcc_Out_Tbl_Count := X_TerrRsc_Access_Out_Tbl.Count;
2983:
2984: FOR l_Counter IN 1 .. l_TerrRscAcc_Out_Tbl_Count LOOP
2985: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2986: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2987: THEN
2988: X_return_status := FND_API.G_RET_STS_ERROR;
2989: END IF;
2990: END LOOP;

Line 2988: X_return_status := FND_API.G_RET_STS_ERROR;

2984: FOR l_Counter IN 1 .. l_TerrRscAcc_Out_Tbl_Count LOOP
2985: If x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2986: x_TerrRsc_Access_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2987: THEN
2988: X_return_status := FND_API.G_RET_STS_ERROR;
2989: END IF;
2990: END LOOP;
2991: --
2992: End Update_Resource_Access;

Line 3014: x_return_status := FND_API.G_RET_STS_SUCCESS;

3010: --
3011: --dbms_output.put_line('Inside Validate_Foreign_Keys');
3012:
3013: -- Initialize API return status to success
3014: x_return_status := FND_API.G_RET_STS_SUCCESS;
3015:
3016: For l_Res_Counter IN p_TerrRsc_Tbl.first .. p_TerrRsc_Tbl.count LOOP
3017: --
3018: l_Terr_Id := p_TerrRsc_Tbl(l_res_counter).Terr_Id;

Line 3032: x_return_status := FND_API.G_RET_STS_ERROR ;

3028: EXCEPTION
3029: --
3030: WHEN NO_DATA_FOUND THEN
3031: --dbms_output.put_line('Validate_Foreign_Keys: NO_DATA_FOUND');
3032: x_return_status := FND_API.G_RET_STS_ERROR ;
3033: fnd_message.set_name('JTF', 'JTF_TERR_INVALID_TERRITORY');
3034: fnd_message.Set_Token('TERR_ID', to_char(l_Terr_Id) );
3035: FND_MSG_PUB.ADD;
3036: FND_MSG_PUB.Count_And_Get

Line 3043: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3039: );
3040:
3041: WHEN OTHERS THEN
3042: --dbms_output.put_line('Validate_Foreign_Keys: OTHERS - ' || SQLERRM);
3043: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3044: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3045: THEN
3046: FND_MSG_PUB.Add_Exc_Msg
3047: ( G_PKG_NAME,

Line 3100: x_return_status := FND_API.G_RET_STS_SUCCESS;

3096: --
3097: --dbms_output.put_line('Inside Validate_Foreign_Keys');
3098:
3099: -- Initialize API return status to success
3100: x_return_status := FND_API.G_RET_STS_SUCCESS;
3101:
3102: For l_Res_Counter IN p_TerrRsc_Tbl.first .. p_TerrRsc_Tbl.count LOOP
3103: --
3104: l_Terr_Id := p_TerrRsc_Tbl(l_res_counter).Terr_Id;

Line 3118: x_return_status := FND_API.G_RET_STS_ERROR ;

3114: EXCEPTION
3115: --
3116: WHEN NO_DATA_FOUND THEN
3117: --dbms_output.put_line('Validate_Foreign_Keys: NO_DATA_FOUND');
3118: x_return_status := FND_API.G_RET_STS_ERROR ;
3119: fnd_message.set_name('JTF', 'JTF_TERR_INVALID_TERRITORY');
3120: fnd_message.Set_Token('TERR_ID', to_char(l_Terr_Id) );
3121: FND_MSG_PUB.ADD;
3122: FND_MSG_PUB.Count_And_Get

Line 3129: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3125: );
3126:
3127: WHEN OTHERS THEN
3128: --dbms_output.put_line('Validate_Foreign_Keys: OTHERS - ' || SQLERRM);
3129: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3130: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3131: THEN
3132: FND_MSG_PUB.Add_Exc_Msg
3133: ( G_PKG_NAME,

Line 3157: x_return_status := FND_API.G_RET_STS_SUCCESS;

3153:
3154: BEGIN
3155: --
3156: --Initialize API return status to success
3157: x_return_status := FND_API.G_RET_STS_SUCCESS;
3158:
3159: For l_Res_Counter IN p_TerrRsc_Tbl.first .. p_TerrRsc_Tbl.count LOOP
3160: --
3161: If p_TerrRsc_Tbl(l_Res_Counter).PRIMARY_CONTACT_FLAG = 'Y' Then

Line 3172: raise FND_API.G_EXC_ERROR;

3168: If l_Primary_Count > 1 Then
3169: --
3170: fnd_message.set_name('JTF', 'JTF_TERR_MULTIPLE_PRIMARY_FLAG');
3171: FND_MSG_PUB.ADD;
3172: raise FND_API.G_EXC_ERROR;
3173: --
3174: End If;
3175: --
3176: EXCEPTION

Line 3178: WHEN FND_API.G_EXC_ERROR THEN

3174: End If;
3175: --
3176: EXCEPTION
3177: --
3178: WHEN FND_API.G_EXC_ERROR THEN
3179: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');
3180: x_return_status := FND_API.G_RET_STS_ERROR ;
3181: FND_MSG_PUB.Count_And_Get
3182: ( P_count => x_msg_count,

Line 3179: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');

3175: --
3176: EXCEPTION
3177: --
3178: WHEN FND_API.G_EXC_ERROR THEN
3179: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');
3180: x_return_status := FND_API.G_RET_STS_ERROR ;
3181: FND_MSG_PUB.Count_And_Get
3182: ( P_count => x_msg_count,
3183: P_data => x_msg_data

Line 3180: x_return_status := FND_API.G_RET_STS_ERROR ;

3176: EXCEPTION
3177: --
3178: WHEN FND_API.G_EXC_ERROR THEN
3179: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');
3180: x_return_status := FND_API.G_RET_STS_ERROR ;
3181: FND_MSG_PUB.Count_And_Get
3182: ( P_count => x_msg_count,
3183: P_data => x_msg_data
3184: );

Line 3186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3182: ( P_count => x_msg_count,
3183: P_data => x_msg_data
3184: );
3185:
3186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3187: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');
3188: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3189: FND_MSG_PUB.Count_And_Get
3190: ( P_count => x_msg_count,

Line 3187: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');

3183: P_data => x_msg_data
3184: );
3185:
3186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3187: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');
3188: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3189: FND_MSG_PUB.Count_And_Get
3190: ( P_count => x_msg_count,
3191: P_data => x_msg_data

Line 3188: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3184: );
3185:
3186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3187: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');
3188: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3189: FND_MSG_PUB.Count_And_Get
3190: ( P_count => x_msg_count,
3191: P_data => x_msg_data
3192: );

Line 3196: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3192: );
3193:
3194: WHEN OTHERS THEN
3195: --dbms_output.put_line('Validate_Primary_Flag: OTHERS - ' || SQLERRM);
3196: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3197: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3198: THEN
3199: FND_MSG_PUB.Add_Exc_Msg
3200: ( G_PKG_NAME,

Line 3252: x_return_status := FND_API.G_RET_STS_SUCCESS;

3248:
3249: BEGIN
3250: --
3251: --Initialize API return status to success
3252: x_return_status := FND_API.G_RET_STS_SUCCESS;
3253:
3254: For l_Res_Counter IN p_TerrRsc_Tbl.first .. p_TerrRsc_Tbl.count LOOP
3255: --
3256: If p_TerrRsc_Tbl(l_Res_Counter).PRIMARY_CONTACT_FLAG = 'Y' Then

Line 3267: raise FND_API.G_EXC_ERROR;

3263: If l_Primary_Count > 1 Then
3264: --
3265: fnd_message.set_name('JTF', 'JTF_TERR_MULTIPLE_PRIMARY_FLAG');
3266: FND_MSG_PUB.ADD;
3267: raise FND_API.G_EXC_ERROR;
3268: --
3269: End If;
3270: --
3271: EXCEPTION

Line 3273: WHEN FND_API.G_EXC_ERROR THEN

3269: End If;
3270: --
3271: EXCEPTION
3272: --
3273: WHEN FND_API.G_EXC_ERROR THEN
3274: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: FND_MSG_PUB.Count_And_Get
3277: ( P_count => x_msg_count,

Line 3274: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');

3270: --
3271: EXCEPTION
3272: --
3273: WHEN FND_API.G_EXC_ERROR THEN
3274: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: FND_MSG_PUB.Count_And_Get
3277: ( P_count => x_msg_count,
3278: P_data => x_msg_data

Line 3275: x_return_status := FND_API.G_RET_STS_ERROR ;

3271: EXCEPTION
3272: --
3273: WHEN FND_API.G_EXC_ERROR THEN
3274: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_ERROR');
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: FND_MSG_PUB.Count_And_Get
3277: ( P_count => x_msg_count,
3278: P_data => x_msg_data
3279: );

Line 3281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3277: ( P_count => x_msg_count,
3278: P_data => x_msg_data
3279: );
3280:
3281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3282: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');
3283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3284: FND_MSG_PUB.Count_And_Get
3285: ( P_count => x_msg_count,

Line 3282: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');

3278: P_data => x_msg_data
3279: );
3280:
3281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3282: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');
3283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3284: FND_MSG_PUB.Count_And_Get
3285: ( P_count => x_msg_count,
3286: P_data => x_msg_data

Line 3283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3279: );
3280:
3281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3282: --dbms_output.put_line('Validate_Primary_Flag: FND_API.G_EXC_UNEXPECTED_ERROR');
3283: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3284: FND_MSG_PUB.Count_And_Get
3285: ( P_count => x_msg_count,
3286: P_data => x_msg_data
3287: );

Line 3291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3287: );
3288:
3289: WHEN OTHERS THEN
3290: --dbms_output.put_line('Validate_Primary_Flag: OTHERS - ' || SQLERRM);
3291: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3292: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3293: THEN
3294: FND_MSG_PUB.Add_Exc_Msg
3295: ( G_PKG_NAME,

Line 3346: x_return_status := FND_API.G_RET_STS_SUCCESS;

3342: --
3343: --dbms_output.put_line('Inside Validate_TerrResource_Data');
3344:
3345: -- Initialize API return status to success
3346: x_return_status := FND_API.G_RET_STS_SUCCESS;
3347:
3348: --ARPATEL: bug#2849410
3349: Check_for_duplicate (p_TerrRsc_Tbl => p_TerrRsc_Tbl,
3350: x_Return_Status => l_return_status,

Line 3354: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3350: x_Return_Status => l_return_status,
3351: x_msg_count => x_msg_count,
3352: x_Msg_Data => x_Msg_Data);
3353:
3354: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3355: x_return_status := l_return_status;
3356: END IF;
3357:
3358: -- If the territory Usage records is missing

Line 3364: x_return_status := FND_API.G_RET_STS_ERROR;

3360: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3361: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERRRES_REC');
3362: FND_MSG_PUB.ADD;
3363: END IF;
3364: x_return_status := FND_API.G_RET_STS_ERROR;
3365: raise FND_API.G_EXC_ERROR;
3366: END IF;
3367:
3368: -- Initialize API return status to success

Line 3365: raise FND_API.G_EXC_ERROR;

3361: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERRRES_REC');
3362: FND_MSG_PUB.ADD;
3363: END IF;
3364: x_return_status := FND_API.G_RET_STS_ERROR;
3365: raise FND_API.G_EXC_ERROR;
3366: END IF;
3367:
3368: -- Initialize API return status to success
3369: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3369: x_return_status := FND_API.G_RET_STS_SUCCESS;

3365: raise FND_API.G_EXC_ERROR;
3366: END IF;
3367:
3368: -- Initialize API return status to success
3369: x_return_status := FND_API.G_RET_STS_SUCCESS;
3370:
3371:
3372: --dbms_output.put_line('Before Calling Validate_Primary_Flag');
3373: Validate_Primary_Flag(p_TerrRsc_Tbl => p_TerrRsc_Tbl ,

Line 3379: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3375: x_Return_Status => l_Return_Status,
3376: x_msg_count => x_msg_count,
3377: x_Msg_Data => x_Msg_Data);
3378:
3379: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3380: x_return_status := l_return_status;
3381: END IF;
3382:
3383: --dbms_output.put_line('Before Calling Validate_Foreign_Keys');

Line 3389: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3385: x_Return_Status => l_return_status,
3386: x_msg_count => x_msg_count,
3387: x_Msg_Data => x_Msg_Data);
3388:
3389: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3390: x_return_status := l_return_status;
3391: END IF;
3392: --
3393: EXCEPTION

Line 3395: WHEN FND_API.G_EXC_ERROR THEN

3391: END IF;
3392: --
3393: EXCEPTION
3394: --
3395: WHEN FND_API.G_EXC_ERROR THEN
3396: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');
3397: x_return_status := FND_API.G_RET_STS_ERROR ;
3398: FND_MSG_PUB.Count_And_Get
3399: ( P_count => x_msg_count,

Line 3396: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');

3392: --
3393: EXCEPTION
3394: --
3395: WHEN FND_API.G_EXC_ERROR THEN
3396: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');
3397: x_return_status := FND_API.G_RET_STS_ERROR ;
3398: FND_MSG_PUB.Count_And_Get
3399: ( P_count => x_msg_count,
3400: P_data => x_msg_data

Line 3397: x_return_status := FND_API.G_RET_STS_ERROR ;

3393: EXCEPTION
3394: --
3395: WHEN FND_API.G_EXC_ERROR THEN
3396: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');
3397: x_return_status := FND_API.G_RET_STS_ERROR ;
3398: FND_MSG_PUB.Count_And_Get
3399: ( P_count => x_msg_count,
3400: P_data => x_msg_data
3401: );

Line 3403: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3399: ( P_count => x_msg_count,
3400: P_data => x_msg_data
3401: );
3402:
3403: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3404: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');
3405: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3406: FND_MSG_PUB.Count_And_Get
3407: ( P_count => x_msg_count,

Line 3404: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');

3400: P_data => x_msg_data
3401: );
3402:
3403: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3404: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');
3405: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3406: FND_MSG_PUB.Count_And_Get
3407: ( P_count => x_msg_count,
3408: P_data => x_msg_data

Line 3405: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3401: );
3402:
3403: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3404: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');
3405: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3406: FND_MSG_PUB.Count_And_Get
3407: ( P_count => x_msg_count,
3408: P_data => x_msg_data
3409: );

Line 3413: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3409: );
3410:
3411: WHEN OTHERS THEN
3412: --dbms_output.put_line('Validate_TerrResource_Data: OTHERS - ' || SQLERRM);
3413: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3414: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3415: THEN
3416: FND_MSG_PUB.Add_Exc_Msg
3417: ( G_PKG_NAME,

Line 3470: x_return_status := FND_API.G_RET_STS_SUCCESS;

3466: --
3467: --dbms_output.put_line('Inside Validate_TerrResource_Data');
3468:
3469: -- Initialize API return status to success
3470: x_return_status := FND_API.G_RET_STS_SUCCESS;
3471:
3472: --ARPATEL: bug#2849410
3473: Check_for_duplicate (p_TerrRsc_Tbl => p_TerrRsc_Tbl,
3474: x_Return_Status => l_return_status,

Line 3478: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3474: x_Return_Status => l_return_status,
3475: x_msg_count => x_msg_count,
3476: x_Msg_Data => x_Msg_Data);
3477:
3478: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3479: x_return_status := l_return_status;
3480: END IF;
3481:
3482: -- If the territory Usage records is missing

Line 3488: x_return_status := FND_API.G_RET_STS_ERROR;

3484: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3485: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERRRES_REC');
3486: FND_MSG_PUB.ADD;
3487: END IF;
3488: x_return_status := FND_API.G_RET_STS_ERROR;
3489: raise FND_API.G_EXC_ERROR;
3490: END IF;
3491:
3492: -- Initialize API return status to success

Line 3489: raise FND_API.G_EXC_ERROR;

3485: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERRRES_REC');
3486: FND_MSG_PUB.ADD;
3487: END IF;
3488: x_return_status := FND_API.G_RET_STS_ERROR;
3489: raise FND_API.G_EXC_ERROR;
3490: END IF;
3491:
3492: -- Initialize API return status to success
3493: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3493: x_return_status := FND_API.G_RET_STS_SUCCESS;

3489: raise FND_API.G_EXC_ERROR;
3490: END IF;
3491:
3492: -- Initialize API return status to success
3493: x_return_status := FND_API.G_RET_STS_SUCCESS;
3494:
3495:
3496: --dbms_output.put_line('Before Calling Validate_Primary_Flag');
3497: Validate_Primary_Flag(p_TerrRsc_Tbl => p_TerrRsc_Tbl ,

Line 3503: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3499: x_Return_Status => l_Return_Status,
3500: x_msg_count => x_msg_count,
3501: x_Msg_Data => x_Msg_Data);
3502:
3503: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3504: x_return_status := l_return_status;
3505: END IF;
3506:
3507: --dbms_output.put_line('Before Calling Validate_Foreign_Keys');

Line 3513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3509: x_Return_Status => l_return_status,
3510: x_msg_count => x_msg_count,
3511: x_Msg_Data => x_Msg_Data);
3512:
3513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3514: x_return_status := l_return_status;
3515: END IF;
3516: --
3517: EXCEPTION

Line 3519: WHEN FND_API.G_EXC_ERROR THEN

3515: END IF;
3516: --
3517: EXCEPTION
3518: --
3519: WHEN FND_API.G_EXC_ERROR THEN
3520: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');
3521: x_return_status := FND_API.G_RET_STS_ERROR ;
3522: FND_MSG_PUB.Count_And_Get
3523: ( P_count => x_msg_count,

Line 3520: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');

3516: --
3517: EXCEPTION
3518: --
3519: WHEN FND_API.G_EXC_ERROR THEN
3520: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');
3521: x_return_status := FND_API.G_RET_STS_ERROR ;
3522: FND_MSG_PUB.Count_And_Get
3523: ( P_count => x_msg_count,
3524: P_data => x_msg_data

Line 3521: x_return_status := FND_API.G_RET_STS_ERROR ;

3517: EXCEPTION
3518: --
3519: WHEN FND_API.G_EXC_ERROR THEN
3520: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_ERROR');
3521: x_return_status := FND_API.G_RET_STS_ERROR ;
3522: FND_MSG_PUB.Count_And_Get
3523: ( P_count => x_msg_count,
3524: P_data => x_msg_data
3525: );

Line 3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3523: ( P_count => x_msg_count,
3524: P_data => x_msg_data
3525: );
3526:
3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3528: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');
3529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3530: FND_MSG_PUB.Count_And_Get
3531: ( P_count => x_msg_count,

Line 3528: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');

3524: P_data => x_msg_data
3525: );
3526:
3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3528: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');
3529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3530: FND_MSG_PUB.Count_And_Get
3531: ( P_count => x_msg_count,
3532: P_data => x_msg_data

Line 3529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3525: );
3526:
3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3528: --dbms_output.put_line('Validate_TerrResource_Data: FND_API.G_EXC_UNEXPECTED_ERROR');
3529: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3530: FND_MSG_PUB.Count_And_Get
3531: ( P_count => x_msg_count,
3532: P_data => x_msg_data
3533: );

Line 3537: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3533: );
3534:
3535: WHEN OTHERS THEN
3536: --dbms_output.put_line('Validate_TerrResource_Data: OTHERS - ' || SQLERRM);
3537: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3539: THEN
3540: FND_MSG_PUB.Add_Exc_Msg
3541: ( G_PKG_NAME,

Line 3553: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

3549:
3550:
3551: PROCEDURE Validate_Terr_Rsc
3552: (
3553: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3554: x_Return_Status OUT NOCOPY VARCHAR2,
3555: x_msg_count OUT NOCOPY NUMBER,
3556: x_msg_data OUT NOCOPY VARCHAR2,
3557: p_TerrRsc_Rec IN TerrResource_Rec_type_wflex

Line 3567: x_return_status := FND_API.G_RET_STS_SUCCESS;

3563: BEGIN
3564: --dbms_output.put_line('Inside Validate_Terr_Rsc: Entering API');
3565:
3566: -- Initialize the status to success
3567: x_return_status := FND_API.G_RET_STS_SUCCESS;
3568:
3569: -- Validate the territory Id
3570: l_Validate_id := p_TerrRsc_Rec.Terr_Id;
3571: If l_Validate_id IS NOT NULL Then

Line 3573: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR') <> FND_API.G_TRUE Then

3569: -- Validate the territory Id
3570: l_Validate_id := p_TerrRsc_Rec.Terr_Id;
3571: If l_Validate_id IS NOT NULL Then
3572: -- --dbms_output.put_line('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
3573: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR') <> FND_API.G_TRUE Then
3574: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
3575: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3576: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3577: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');

Line 3574: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

3570: l_Validate_id := p_TerrRsc_Rec.Terr_Id;
3571: If l_Validate_id IS NOT NULL Then
3572: -- --dbms_output.put_line('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
3573: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR') <> FND_API.G_TRUE Then
3574: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
3575: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3576: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3577: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
3578: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');

Line 3581: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3577: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
3578: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
3579: FND_MSG_PUB.ADD;
3580: END IF;
3581: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3582: End If;
3583: Else
3584: -- Invalid Territory Id specified
3585: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');

Line 3589: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3585: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3586: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
3587: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
3588: FND_MSG_PUB.ADD;
3589: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3590: End If;
3591:
3592: --Check last update login
3593: If ( p_TerrRsc_Rec.RESOURCE_TYPE is NULL OR

Line 3594: p_TerrRsc_Rec.RESOURCE_TYPE = FND_API.G_MISS_CHAR ) THEN

3590: End If;
3591:
3592: --Check last update login
3593: If ( p_TerrRsc_Rec.RESOURCE_TYPE is NULL OR
3594: p_TerrRsc_Rec.RESOURCE_TYPE = FND_API.G_MISS_CHAR ) THEN
3595: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3596: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3597: FND_MESSAGE.Set_Token('COL_NAME', 'RESOURCE_TYPE' );
3598: FND_MSG_PUB.ADD;

Line 3600: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3596: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3597: FND_MESSAGE.Set_Token('COL_NAME', 'RESOURCE_TYPE' );
3598: FND_MSG_PUB.ADD;
3599: END IF;
3600: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3601: End If;
3602:
3603: --Check created by
3604: IF ( p_TerrRsc_Rec.CREATED_BY is NULL OR

Line 3605: p_TerrRsc_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

3601: End If;
3602:
3603: --Check created by
3604: IF ( p_TerrRsc_Rec.CREATED_BY is NULL OR
3605: p_TerrRsc_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
3606: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3607: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3608: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3609: FND_MSG_PUB.ADD;

Line 3611: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3607: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3608: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3609: FND_MSG_PUB.ADD;
3610: END IF;
3611: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3612: End If;
3613:
3614: --Check creation date
3615: If ( p_TerrRsc_Rec.CREATION_DATE is NULL OR

Line 3616: p_TerrRsc_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

3612: End If;
3613:
3614: --Check creation date
3615: If ( p_TerrRsc_Rec.CREATION_DATE is NULL OR
3616: p_TerrRsc_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
3617: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3618: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3619: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3620: FND_MSG_PUB.ADD;

Line 3622: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3618: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3619: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3620: FND_MSG_PUB.ADD;
3621: END IF;
3622: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3623: End If;
3624:
3625: -- Validate last updated by
3626: IF ( p_TerrRsc_Rec.LAST_UPDATED_BY is NULL OR

Line 3627: p_TerrRsc_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

3623: End If;
3624:
3625: -- Validate last updated by
3626: IF ( p_TerrRsc_Rec.LAST_UPDATED_BY is NULL OR
3627: p_TerrRsc_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
3628: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3629: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3630: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
3631: FND_MSG_PUB.ADD;

Line 3633: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3629: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3630: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
3631: FND_MSG_PUB.ADD;
3632: END IF;
3633: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3634: End If;
3635:
3636: -- Check last update date
3637: If ( p_TerrRsc_Rec.LAST_UPDATE_DATE IS NULL OR

Line 3638: p_TerrRsc_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

3634: End If;
3635:
3636: -- Check last update date
3637: If ( p_TerrRsc_Rec.LAST_UPDATE_DATE IS NULL OR
3638: p_TerrRsc_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
3639: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3640: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3641: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
3642: FND_MSG_PUB.ADD;

Line 3644: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3640: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3641: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
3642: FND_MSG_PUB.ADD;
3643: END IF;
3644: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3645: End If;
3646:
3647: --Check last update login
3648: If ( p_TerrRsc_Rec.LAST_UPDATE_LOGIN is NULL OR

Line 3649: p_TerrRsc_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

3645: End If;
3646:
3647: --Check last update login
3648: If ( p_TerrRsc_Rec.LAST_UPDATE_LOGIN is NULL OR
3649: p_TerrRsc_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
3650: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3651: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3652: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
3653: FND_MSG_PUB.ADD;

Line 3655: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3651: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3652: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
3653: FND_MSG_PUB.ADD;
3654: END IF;
3655: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3656: End If;
3657:
3658: --
3659: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 3663: WHEN FND_API.G_EXC_ERROR THEN

3659: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3660: p_data => x_msg_data);
3661: EXCEPTION
3662: --
3663: WHEN FND_API.G_EXC_ERROR THEN
3664: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3665: x_return_status := FND_API.G_RET_STS_ERROR ;
3666: FND_MSG_PUB.Count_And_Get
3667: ( P_count => x_msg_count,

Line 3664: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');

3660: p_data => x_msg_data);
3661: EXCEPTION
3662: --
3663: WHEN FND_API.G_EXC_ERROR THEN
3664: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3665: x_return_status := FND_API.G_RET_STS_ERROR ;
3666: FND_MSG_PUB.Count_And_Get
3667: ( P_count => x_msg_count,
3668: P_data => x_msg_data

Line 3665: x_return_status := FND_API.G_RET_STS_ERROR ;

3661: EXCEPTION
3662: --
3663: WHEN FND_API.G_EXC_ERROR THEN
3664: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3665: x_return_status := FND_API.G_RET_STS_ERROR ;
3666: FND_MSG_PUB.Count_And_Get
3667: ( P_count => x_msg_count,
3668: P_data => x_msg_data
3669: );

Line 3671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3667: ( P_count => x_msg_count,
3668: P_data => x_msg_data
3669: );
3670:
3671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3672: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3673: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3674: FND_MSG_PUB.Count_And_Get
3675: ( P_count => x_msg_count,

Line 3672: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

3668: P_data => x_msg_data
3669: );
3670:
3671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3672: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3673: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3674: FND_MSG_PUB.Count_And_Get
3675: ( P_count => x_msg_count,
3676: P_data => x_msg_data

Line 3673: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3669: );
3670:
3671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3672: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3673: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3674: FND_MSG_PUB.Count_And_Get
3675: ( P_count => x_msg_count,
3676: P_data => x_msg_data
3677: );

Line 3681: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3677: );
3678:
3679: WHEN OTHERS THEN
3680: --dbms_output.put_line('Validate_Terr_Qtype_Usage: OTHERS - ' || SQLERRM);
3681: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3682: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3683: THEN
3684: FND_MSG_PUB.Add_Exc_Msg
3685: ( G_PKG_NAME,

Line 3703: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

3699: ---------------------------------------------------------------------
3700:
3701: PROCEDURE Validate_Terr_Rsc
3702: (
3703: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3704: x_Return_Status OUT NOCOPY VARCHAR2,
3705: x_msg_count OUT NOCOPY NUMBER,
3706: x_msg_data OUT NOCOPY VARCHAR2,
3707: p_TerrRsc_Rec IN TerrResource_Rec_type

Line 3717: x_return_status := FND_API.G_RET_STS_SUCCESS;

3713: BEGIN
3714: --dbms_output.put_line('Inside Validate_Terr_Rsc: Entering API');
3715:
3716: -- Initialize the status to success
3717: x_return_status := FND_API.G_RET_STS_SUCCESS;
3718:
3719: -- Validate the territory Id
3720: l_Validate_id := p_TerrRsc_Rec.Terr_Id;
3721: If l_Validate_id IS NOT NULL Then

Line 3723: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR') <> FND_API.G_TRUE Then

3719: -- Validate the territory Id
3720: l_Validate_id := p_TerrRsc_Rec.Terr_Id;
3721: If l_Validate_id IS NOT NULL Then
3722: -- --dbms_output.put_line('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
3723: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR') <> FND_API.G_TRUE Then
3724: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
3725: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3726: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3727: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');

Line 3724: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

3720: l_Validate_id := p_TerrRsc_Rec.Terr_Id;
3721: If l_Validate_id IS NOT NULL Then
3722: -- --dbms_output.put_line('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
3723: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR') <> FND_API.G_TRUE Then
3724: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
3725: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3726: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3727: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
3728: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');

Line 3731: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3727: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
3728: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
3729: FND_MSG_PUB.ADD;
3730: END IF;
3731: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3732: End If;
3733: Else
3734: -- Invalid Territory Id specified
3735: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');

Line 3739: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3735: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3736: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
3737: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
3738: FND_MSG_PUB.ADD;
3739: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3740: End If;
3741:
3742: --Check last update login
3743: If ( p_TerrRsc_Rec.RESOURCE_TYPE is NULL OR

Line 3744: p_TerrRsc_Rec.RESOURCE_TYPE = FND_API.G_MISS_CHAR ) THEN

3740: End If;
3741:
3742: --Check last update login
3743: If ( p_TerrRsc_Rec.RESOURCE_TYPE is NULL OR
3744: p_TerrRsc_Rec.RESOURCE_TYPE = FND_API.G_MISS_CHAR ) THEN
3745: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3746: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3747: FND_MESSAGE.Set_Token('COL_NAME', 'RESOURCE_TYPE' );
3748: FND_MSG_PUB.ADD;

Line 3750: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3746: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3747: FND_MESSAGE.Set_Token('COL_NAME', 'RESOURCE_TYPE' );
3748: FND_MSG_PUB.ADD;
3749: END IF;
3750: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3751: End If;
3752:
3753: --Check created by
3754: IF ( p_TerrRsc_Rec.CREATED_BY is NULL OR

Line 3755: p_TerrRsc_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

3751: End If;
3752:
3753: --Check created by
3754: IF ( p_TerrRsc_Rec.CREATED_BY is NULL OR
3755: p_TerrRsc_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
3756: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3757: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3758: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3759: FND_MSG_PUB.ADD;

Line 3761: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3757: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3758: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3759: FND_MSG_PUB.ADD;
3760: END IF;
3761: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3762: End If;
3763:
3764: --Check creation date
3765: If ( p_TerrRsc_Rec.CREATION_DATE is NULL OR

Line 3766: p_TerrRsc_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

3762: End If;
3763:
3764: --Check creation date
3765: If ( p_TerrRsc_Rec.CREATION_DATE is NULL OR
3766: p_TerrRsc_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
3767: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3768: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3769: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3770: FND_MSG_PUB.ADD;

Line 3772: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3768: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3769: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3770: FND_MSG_PUB.ADD;
3771: END IF;
3772: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3773: End If;
3774:
3775: -- Validate last updated by
3776: IF ( p_TerrRsc_Rec.LAST_UPDATED_BY is NULL OR

Line 3777: p_TerrRsc_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

3773: End If;
3774:
3775: -- Validate last updated by
3776: IF ( p_TerrRsc_Rec.LAST_UPDATED_BY is NULL OR
3777: p_TerrRsc_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
3778: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3779: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3780: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
3781: FND_MSG_PUB.ADD;

Line 3783: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3779: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3780: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
3781: FND_MSG_PUB.ADD;
3782: END IF;
3783: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3784: End If;
3785:
3786: -- Check last update date
3787: If ( p_TerrRsc_Rec.LAST_UPDATE_DATE IS NULL OR

Line 3788: p_TerrRsc_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

3784: End If;
3785:
3786: -- Check last update date
3787: If ( p_TerrRsc_Rec.LAST_UPDATE_DATE IS NULL OR
3788: p_TerrRsc_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
3789: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3790: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3791: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
3792: FND_MSG_PUB.ADD;

Line 3794: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3790: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3791: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
3792: FND_MSG_PUB.ADD;
3793: END IF;
3794: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3795: End If;
3796:
3797: --Check last update login
3798: If ( p_TerrRsc_Rec.LAST_UPDATE_LOGIN is NULL OR

Line 3799: p_TerrRsc_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

3795: End If;
3796:
3797: --Check last update login
3798: If ( p_TerrRsc_Rec.LAST_UPDATE_LOGIN is NULL OR
3799: p_TerrRsc_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
3800: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3801: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3802: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
3803: FND_MSG_PUB.ADD;

Line 3805: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3801: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3802: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
3803: FND_MSG_PUB.ADD;
3804: END IF;
3805: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3806: End If;
3807:
3808: --
3809: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 3813: WHEN FND_API.G_EXC_ERROR THEN

3809: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3810: p_data => x_msg_data);
3811: EXCEPTION
3812: --
3813: WHEN FND_API.G_EXC_ERROR THEN
3814: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3815: x_return_status := FND_API.G_RET_STS_ERROR ;
3816: FND_MSG_PUB.Count_And_Get
3817: ( P_count => x_msg_count,

Line 3814: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');

3810: p_data => x_msg_data);
3811: EXCEPTION
3812: --
3813: WHEN FND_API.G_EXC_ERROR THEN
3814: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3815: x_return_status := FND_API.G_RET_STS_ERROR ;
3816: FND_MSG_PUB.Count_And_Get
3817: ( P_count => x_msg_count,
3818: P_data => x_msg_data

Line 3815: x_return_status := FND_API.G_RET_STS_ERROR ;

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

Line 3821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3817: ( P_count => x_msg_count,
3818: P_data => x_msg_data
3819: );
3820:
3821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3822: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3823: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3824: FND_MSG_PUB.Count_And_Get
3825: ( P_count => x_msg_count,

Line 3822: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

3818: P_data => x_msg_data
3819: );
3820:
3821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3822: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3823: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3824: FND_MSG_PUB.Count_And_Get
3825: ( P_count => x_msg_count,
3826: P_data => x_msg_data

Line 3823: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3819: );
3820:
3821: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3822: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3823: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3824: FND_MSG_PUB.Count_And_Get
3825: ( P_count => x_msg_count,
3826: P_data => x_msg_data
3827: );

Line 3831: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3827: );
3828:
3829: WHEN OTHERS THEN
3830: --dbms_output.put_line('Validate_Terr_Qtype_Usage: OTHERS - ' || SQLERRM);
3831: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3832: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3833: THEN
3834: FND_MSG_PUB.Add_Exc_Msg
3835: ( G_PKG_NAME,

Line 3855: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

3851: ---------------------------------------------------------------------
3852:
3853: PROCEDURE Validate_Terr_Rsc_Access
3854: (
3855: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3856: x_Return_Status OUT NOCOPY VARCHAR2,
3857: x_msg_count OUT NOCOPY NUMBER,
3858: x_msg_data OUT NOCOPY VARCHAR2,
3859: p_TerrRsc_Id IN NUMBER,

Line 3871: x_return_status := FND_API.G_RET_STS_SUCCESS;

3867: BEGIN
3868: --dbms_output.put_line('Inside Validate_Terr_Rsc_Access: TERR_RSC_ID ' || to_char(p_TerrRsc_Access_Rec.TERR_RSC_ID) );
3869:
3870: -- Initialize the status to success
3871: x_return_status := FND_API.G_RET_STS_SUCCESS;
3872:
3873: -- Validate the territory Id
3874: l_Validate_id := p_TerrRsc_Id;
3875: If l_Validate_id IS NOT NULL Then

Line 3877: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_RSC_ID', 'JTF_TERR_RSC') <> FND_API.G_TRUE Then

3873: -- Validate the territory Id
3874: l_Validate_id := p_TerrRsc_Id;
3875: If l_Validate_id IS NOT NULL Then
3876: -- --dbms_output.put_line('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
3877: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_RSC_ID', 'JTF_TERR_RSC') <> FND_API.G_TRUE Then
3878: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
3879: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3880: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3881: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_RSC');

Line 3878: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

3874: l_Validate_id := p_TerrRsc_Id;
3875: If l_Validate_id IS NOT NULL Then
3876: -- --dbms_output.put_line('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
3877: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_RSC_ID', 'JTF_TERR_RSC') <> FND_API.G_TRUE Then
3878: --dbms_output.put_line('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
3879: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3880: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3881: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_RSC');
3882: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_RSC_ID');

Line 3885: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3881: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_RSC');
3882: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_RSC_ID');
3883: FND_MSG_PUB.ADD;
3884: END IF;
3885: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3886: End If;
3887: Else
3888: -- Invalid Territory Id specified
3889: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');

Line 3893: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3889: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3890: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_RSC');
3891: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_RSC_ID');
3892: FND_MSG_PUB.ADD;
3893: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3894: End If;
3895:
3896: -- Validate the access type
3897: BEGIN

Line 3909: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3905: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
3906: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_QUAL_TYPES');
3907: FND_MESSAGE.Set_Token('COLUMN_NAME', 'ACCESS_TYPE');
3908: FND_MSG_PUB.ADD;
3909: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3910: END;
3911:
3912: --Check created by
3913: IF ( p_TerrRsc_Access_Rec.CREATED_BY is NULL OR

Line 3914: p_TerrRsc_Access_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

3910: END;
3911:
3912: --Check created by
3913: IF ( p_TerrRsc_Access_Rec.CREATED_BY is NULL OR
3914: p_TerrRsc_Access_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
3915: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3916: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3917: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3918: FND_MSG_PUB.ADD;

Line 3920: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3916: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3917: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
3918: FND_MSG_PUB.ADD;
3919: END IF;
3920: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3921: End If;
3922:
3923: --Check creation date
3924: If ( p_TerrRsc_Access_Rec.CREATION_DATE is NULL OR

Line 3925: p_TerrRsc_Access_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

3921: End If;
3922:
3923: --Check creation date
3924: If ( p_TerrRsc_Access_Rec.CREATION_DATE is NULL OR
3925: p_TerrRsc_Access_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
3926: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3927: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3928: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3929: FND_MSG_PUB.ADD;

Line 3931: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3927: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3928: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
3929: FND_MSG_PUB.ADD;
3930: END IF;
3931: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3932: End If;
3933:
3934: -- Validate last updated by
3935: IF ( p_TerrRsc_Access_Rec.LAST_UPDATED_BY is NULL OR

Line 3936: p_TerrRsc_Access_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

3932: End If;
3933:
3934: -- Validate last updated by
3935: IF ( p_TerrRsc_Access_Rec.LAST_UPDATED_BY is NULL OR
3936: p_TerrRsc_Access_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
3937: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3938: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3939: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
3940: FND_MSG_PUB.ADD;

Line 3942: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3938: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3939: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
3940: FND_MSG_PUB.ADD;
3941: END IF;
3942: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3943: End If;
3944:
3945: -- Check last update date
3946: If ( p_TerrRsc_Access_Rec.LAST_UPDATE_DATE IS NULL OR

Line 3947: p_TerrRsc_Access_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

3943: End If;
3944:
3945: -- Check last update date
3946: If ( p_TerrRsc_Access_Rec.LAST_UPDATE_DATE IS NULL OR
3947: p_TerrRsc_Access_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
3948: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3949: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3950: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
3951: FND_MSG_PUB.ADD;

Line 3953: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3949: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3950: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
3951: FND_MSG_PUB.ADD;
3952: END IF;
3953: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3954: End If;
3955:
3956: --Check last update login
3957: If ( p_TerrRsc_Access_Rec.LAST_UPDATE_LOGIN is NULL OR

Line 3958: p_TerrRsc_Access_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

3954: End If;
3955:
3956: --Check last update login
3957: If ( p_TerrRsc_Access_Rec.LAST_UPDATE_LOGIN is NULL OR
3958: p_TerrRsc_Access_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
3959: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3960: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3961: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
3962: FND_MSG_PUB.ADD;

Line 3964: x_Return_Status := FND_API.G_RET_STS_ERROR ;

3960: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
3961: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
3962: FND_MSG_PUB.ADD;
3963: END IF;
3964: x_Return_Status := FND_API.G_RET_STS_ERROR ;
3965: End If;
3966:
3967: --
3968: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 3972: WHEN FND_API.G_EXC_ERROR THEN

3968: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3969: p_data => x_msg_data);
3970: EXCEPTION
3971: --
3972: WHEN FND_API.G_EXC_ERROR THEN
3973: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3974: x_return_status := FND_API.G_RET_STS_ERROR ;
3975: FND_MSG_PUB.Count_And_Get
3976: ( P_count => x_msg_count,

Line 3973: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');

3969: p_data => x_msg_data);
3970: EXCEPTION
3971: --
3972: WHEN FND_API.G_EXC_ERROR THEN
3973: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3974: x_return_status := FND_API.G_RET_STS_ERROR ;
3975: FND_MSG_PUB.Count_And_Get
3976: ( P_count => x_msg_count,
3977: P_data => x_msg_data

Line 3974: x_return_status := FND_API.G_RET_STS_ERROR ;

3970: EXCEPTION
3971: --
3972: WHEN FND_API.G_EXC_ERROR THEN
3973: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
3974: x_return_status := FND_API.G_RET_STS_ERROR ;
3975: FND_MSG_PUB.Count_And_Get
3976: ( P_count => x_msg_count,
3977: P_data => x_msg_data
3978: );

Line 3980: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3976: ( P_count => x_msg_count,
3977: P_data => x_msg_data
3978: );
3979:
3980: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3981: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3982: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3983: FND_MSG_PUB.Count_And_Get
3984: ( P_count => x_msg_count,

Line 3981: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

3977: P_data => x_msg_data
3978: );
3979:
3980: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3981: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3982: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3983: FND_MSG_PUB.Count_And_Get
3984: ( P_count => x_msg_count,
3985: P_data => x_msg_data

Line 3982: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3978: );
3979:
3980: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3981: --dbms_output.put_line('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
3982: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3983: FND_MSG_PUB.Count_And_Get
3984: ( P_count => x_msg_count,
3985: P_data => x_msg_data
3986: );

Line 3990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3986: );
3987:
3988: WHEN OTHERS THEN
3989: --dbms_output.put_line('Validate_Terr_Qtype_Usage: OTHERS - ' || SQLERRM);
3990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3991: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3992: THEN
3993: FND_MSG_PUB.Add_Exc_Msg
3994: ( G_PKG_NAME,

Line 4355: IF ( p_group_id = FND_API.G_MISS_NUM OR

4351: AND rownum < 2;
4352:
4353: BEGIN
4354:
4355: IF ( p_group_id = FND_API.G_MISS_NUM OR
4356: p_group_id IS NULL) THEN
4357:
4358: /* no group_id so return NULL */
4359: RETURN NULL;

Line 4464: -- p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4460: -- IN :
4461: -- Required
4462: -- Parameter Name Data Type Default
4463: -- p_Api_Version_Number IN NUMBER,
4464: -- p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4465: -- p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4466: -- p_source_terr_id NUMBER := G_MISS_NUM
4467: -- p_dest_terr_id NUMBER := G_MISS_NUM
4468: --

Line 4465: -- p_Commit IN VARCHAR2 := FND_API.G_FALSE,

4461: -- Required
4462: -- Parameter Name Data Type Default
4463: -- p_Api_Version_Number IN NUMBER,
4464: -- p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4465: -- p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4466: -- p_source_terr_id NUMBER := G_MISS_NUM
4467: -- p_dest_terr_id NUMBER := G_MISS_NUM
4468: --
4469: -- Optional

Line 4485: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4481: --
4482: PROCEDURE Copy_Terr_Resources
4483: (
4484: p_Api_Version_Number IN NUMBER,
4485: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4486: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4488: p_source_terr_id IN NUMBER,
4489: p_dest_terr_id IN NUMBER,

Line 4486: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

4482: PROCEDURE Copy_Terr_Resources
4483: (
4484: p_Api_Version_Number IN NUMBER,
4485: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4486: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4488: p_source_terr_id IN NUMBER,
4489: p_dest_terr_id IN NUMBER,
4490: x_msg_count OUT NOCOPY NUMBER,

Line 4487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

4483: (
4484: p_Api_Version_Number IN NUMBER,
4485: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4486: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4488: p_source_terr_id IN NUMBER,
4489: p_dest_terr_id IN NUMBER,
4490: x_msg_count OUT NOCOPY NUMBER,
4491: x_msg_data OUT NOCOPY VARCHAR2,

Line 4554: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4550: SAVEPOINT COPY_TERR_RESOURCES;
4551:
4552: /*
4553: -- Standard call to check for call compatibility.
4554: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4555: p_api_version_number,
4556: l_api_name,
4557: G_PKG_NAME)
4558: THEN

Line 4559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4555: p_api_version_number,
4556: l_api_name,
4557: G_PKG_NAME)
4558: THEN
4559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4560: END IF;
4561:
4562:
4563: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 4564: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4560: END IF;
4561:
4562:
4563: -- Initialize message list if p_init_msg_list is set to TRUE.
4564: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4565: FND_MSG_PUB.initialize;
4566: END IF;
4567: */
4568:

Line 4579: x_return_status := FND_API.G_RET_STS_SUCCESS;

4575: FND_MSG_PUB.Add;
4576: END IF;
4577:
4578: -- Initialize API return status to success
4579: x_return_status := FND_API.G_RET_STS_SUCCESS;
4580:
4581:
4582: -- API Body starts here
4583:

Line 4621: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN

4617: x_Msg_Data => x_Msg_Data,
4618: x_TerrRsc_Out_Rec => l_TerrRsc_Out_rec
4619: );
4620:
4621: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
4622:
4623: /*
4624: dbms_output.put_line(
4625: 'Unexpected Execution Error from call to Create Terr Resource API');

Line 4630: RAISE fnd_api.g_exc_unexpected_error;

4626: */
4627:
4628: fnd_message.set_name('JTF', 'JTF_ERROR_TERRRSC_API');
4629: fnd_msg_pub.add;
4630: RAISE fnd_api.g_exc_unexpected_error;
4631:
4632: END IF;
4633:
4634: l_dest_terr_rsc_id := l_TerrRsc_Out_rec.terr_rsc_id;

Line 4660: p_Init_Msg_List => FND_API.G_FALSE,

4656: (
4657: p_TerrRsc_Id => l_dest_terr_rsc_id,
4658: p_TerrRsc_Access_Rec => l_TerrRsc_Access_rec,
4659: p_Api_Version_Number => l_api_version_number,
4660: p_Init_Msg_List => FND_API.G_FALSE,
4661: p_Commit => FND_API.G_FALSE,
4662: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
4663: x_Return_Status => x_Return_Status,
4664: x_Msg_Count => x_Msg_Count,

Line 4661: p_Commit => FND_API.G_FALSE,

4657: p_TerrRsc_Id => l_dest_terr_rsc_id,
4658: p_TerrRsc_Access_Rec => l_TerrRsc_Access_rec,
4659: p_Api_Version_Number => l_api_version_number,
4660: p_Init_Msg_List => FND_API.G_FALSE,
4661: p_Commit => FND_API.G_FALSE,
4662: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
4663: x_Return_Status => x_Return_Status,
4664: x_Msg_Count => x_Msg_Count,
4665: x_Msg_Data => x_Msg_Data,

Line 4662: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

4658: p_TerrRsc_Access_Rec => l_TerrRsc_Access_rec,
4659: p_Api_Version_Number => l_api_version_number,
4660: p_Init_Msg_List => FND_API.G_FALSE,
4661: p_Commit => FND_API.G_FALSE,
4662: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
4663: x_Return_Status => x_Return_Status,
4664: x_Msg_Count => x_Msg_Count,
4665: x_Msg_Data => x_Msg_Data,
4666: x_TerrRsc_Access_Out_Rec => l_TerrRsc_Access_Out_rec

Line 4669: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN

4665: x_Msg_Data => x_Msg_Data,
4666: x_TerrRsc_Access_Out_Rec => l_TerrRsc_Access_Out_rec
4667: );
4668:
4669: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4670: /*
4671: dbms_output.put_line(
4672: 'Unexpected Execution Error from call to Create Terr Resource Access API');
4673: */

Line 4676: RAISE fnd_api.g_exc_unexpected_error;

4672: 'Unexpected Execution Error from call to Create Terr Resource Access API');
4673: */
4674: fnd_message.set_name('JTF', 'JTF_ERROR_TERRRSCACCESS_API');
4675: fnd_msg_pub.add;
4676: RAISE fnd_api.g_exc_unexpected_error;
4677: END IF;
4678:
4679: END LOOP;
4680: CLOSE csr_rsc_access_all;

Line 4703: WHEN FND_API.G_EXC_ERROR THEN

4699: );
4700:
4701:
4702: EXCEPTION
4703: WHEN FND_API.G_EXC_ERROR THEN
4704: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_ERROR');
4705: x_return_status := FND_API.G_RET_STS_ERROR ;
4706: FND_MSG_PUB.Count_And_Get
4707: ( P_count => x_msg_count,

Line 4704: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_ERROR');

4700:
4701:
4702: EXCEPTION
4703: WHEN FND_API.G_EXC_ERROR THEN
4704: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_ERROR');
4705: x_return_status := FND_API.G_RET_STS_ERROR ;
4706: FND_MSG_PUB.Count_And_Get
4707: ( P_count => x_msg_count,
4708: P_data => x_msg_data

Line 4705: x_return_status := FND_API.G_RET_STS_ERROR ;

4701:
4702: EXCEPTION
4703: WHEN FND_API.G_EXC_ERROR THEN
4704: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_ERROR');
4705: x_return_status := FND_API.G_RET_STS_ERROR ;
4706: FND_MSG_PUB.Count_And_Get
4707: ( P_count => x_msg_count,
4708: P_data => x_msg_data
4709: );

Line 4711: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4707: ( P_count => x_msg_count,
4708: P_data => x_msg_data
4709: );
4710:
4711: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4712: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_UNEXPECTED_ERROR');
4713: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4714: FND_MSG_PUB.Count_And_Get
4715: ( P_count => x_msg_count,

Line 4712: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_UNEXPECTED_ERROR');

4708: P_data => x_msg_data
4709: );
4710:
4711: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4712: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_UNEXPECTED_ERROR');
4713: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4714: FND_MSG_PUB.Count_And_Get
4715: ( P_count => x_msg_count,
4716: P_data => x_msg_data

Line 4713: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4709: );
4710:
4711: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4712: --dbms_output.put_line('Copy Territory Resources : FND_API.G_EXC_UNEXPECTED_ERROR');
4713: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4714: FND_MSG_PUB.Count_And_Get
4715: ( P_count => x_msg_count,
4716: P_data => x_msg_data
4717: );

Line 4721: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4717: );
4718:
4719: WHEN OTHERS THEN
4720: --dbms_output.put_line('Copy Territory Resources : OTHERS - ' || SQLERRM);
4721: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4722: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4723: THEN
4724: FND_MSG_PUB.Add_Exc_Msg
4725: ( G_PKG_NAME,

Line 4741: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

4737: */
4738: PROCEDURE validate_terr_rsc_access_UK(
4739: p_Terr_Rsc_Id IN NUMBER,
4740: p_Access_Type IN VARCHAR2,
4741: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4742: x_Return_Status OUT NOCOPY VARCHAR2,
4743: x_msg_count OUT NOCOPY NUMBER,
4744: x_msg_data OUT NOCOPY VARCHAR2 )
4745: AS

Line 4761: x_return_status := FND_API.G_RET_STS_SUCCESS;

4757: BEGIN
4758:
4759: --dbms_output('Validate_Unique_Key: Entering API');
4760: -- Initialize the status to success
4761: x_return_status := FND_API.G_RET_STS_SUCCESS;
4762:
4763: /* check that Unique Key constraint not violated */
4764: IF ( p_terr_rsc_id IS NOT NULL AND p_terr_rsc_id <> FND_API.G_MISS_NUM AND
4765: p_access_type IS NOT NULL AND p_access_type <> FND_API.G_MISS_CHAR ) THEN

Line 4764: IF ( p_terr_rsc_id IS NOT NULL AND p_terr_rsc_id <> FND_API.G_MISS_NUM AND

4760: -- Initialize the status to success
4761: x_return_status := FND_API.G_RET_STS_SUCCESS;
4762:
4763: /* check that Unique Key constraint not violated */
4764: IF ( p_terr_rsc_id IS NOT NULL AND p_terr_rsc_id <> FND_API.G_MISS_NUM AND
4765: p_access_type IS NOT NULL AND p_access_type <> FND_API.G_MISS_CHAR ) THEN
4766:
4767: /* check if rec already exists */
4768: OPEN csr_chk_uk_violation ( p_terr_rsc_id

Line 4765: p_access_type IS NOT NULL AND p_access_type <> FND_API.G_MISS_CHAR ) THEN

4761: x_return_status := FND_API.G_RET_STS_SUCCESS;
4762:
4763: /* check that Unique Key constraint not violated */
4764: IF ( p_terr_rsc_id IS NOT NULL AND p_terr_rsc_id <> FND_API.G_MISS_NUM AND
4765: p_access_type IS NOT NULL AND p_access_type <> FND_API.G_MISS_CHAR ) THEN
4766:
4767: /* check if rec already exists */
4768: OPEN csr_chk_uk_violation ( p_terr_rsc_id
4769: , p_access_type);

Line 4774: x_return_status := FND_API.G_RET_STS_ERROR;

4770: FETCH csr_chk_uk_violation INTO l_return_csr;
4771:
4772: IF csr_chk_uk_violation%FOUND THEN
4773:
4774: x_return_status := FND_API.G_RET_STS_ERROR;
4775:
4776: /* Debug message */
4777: --arpatel bug#1500581 (part of fix)
4778: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 4796: X_return_status := FND_API.G_RET_STS_ERROR;

4792: EXCEPTION
4793:
4794: WHEN OTHERS THEN
4795: --dbms_output('Validate_Foreign_Key: Others exception' || SQLERRM);
4796: X_return_status := FND_API.G_RET_STS_ERROR;
4797: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4798: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
4799: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
4800: FND_MSG_PUB.ADD;

Line 4824: -- p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4820: -- IN :
4821: -- Required
4822: -- Parameter Name Data Type Default
4823: -- p_Api_Version_Number IN NUMBER,
4824: -- p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4825: -- p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4826: -- p_source_resource_rec TerrResource_Rec_type
4827: -- p_p_dest_resource_rec TerrResource_Rec_type
4828: -- p_all_terr_flag IN VARCHAR2 := 'Y',

Line 4825: -- p_Commit IN VARCHAR2 := FND_API.G_FALSE,

4821: -- Required
4822: -- Parameter Name Data Type Default
4823: -- p_Api_Version_Number IN NUMBER,
4824: -- p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4825: -- p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4826: -- p_source_resource_rec TerrResource_Rec_type
4827: -- p_p_dest_resource_rec TerrResource_Rec_type
4828: -- p_all_terr_flag IN VARCHAR2 := 'Y',
4829: -- p_terr_ids_tbl IN Terr_Ids_Tbl_Type,

Line 4850: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4846: --
4847: PROCEDURE Transfer_Resource_Territories
4848: (
4849: p_Api_Version_Number IN NUMBER,
4850: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4851: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4853: p_source_resource_rec IN TerrResource_Rec_type,
4854: p_dest_resource_rec IN TerrResource_Rec_type,

Line 4851: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

4847: PROCEDURE Transfer_Resource_Territories
4848: (
4849: p_Api_Version_Number IN NUMBER,
4850: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4851: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4853: p_source_resource_rec IN TerrResource_Rec_type,
4854: p_dest_resource_rec IN TerrResource_Rec_type,
4855: p_all_terr_flag IN VARCHAR2 := 'Y',

Line 4852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

4848: (
4849: p_Api_Version_Number IN NUMBER,
4850: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4851: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
4852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4853: p_source_resource_rec IN TerrResource_Rec_type,
4854: p_dest_resource_rec IN TerrResource_Rec_type,
4855: p_all_terr_flag IN VARCHAR2 := 'Y',
4856: p_terr_ids_tbl IN Terr_Ids_Tbl_Type,

Line 4900: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4896: SAVEPOINT TRANSFER_TERR_RES;
4897:
4898:
4899: -- Standard call to check for call compatibility.
4900: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4901: p_api_version_number,
4902: l_api_name,
4903: G_PKG_NAME)
4904: THEN

Line 4905: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4901: p_api_version_number,
4902: l_api_name,
4903: G_PKG_NAME)
4904: THEN
4905: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4906: END IF;
4907:
4908:
4909: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 4910: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4906: END IF;
4907:
4908:
4909: -- Initialize message list if p_init_msg_list is set to TRUE.
4910: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4911: FND_MSG_PUB.initialize;
4912: END IF;
4913:
4914:

Line 4925: x_return_status := FND_API.G_RET_STS_SUCCESS;

4921: FND_MSG_PUB.Add;
4922: END IF;
4923:
4924: -- Initialize API return status to success
4925: x_return_status := FND_API.G_RET_STS_SUCCESS;
4926:
4927:
4928: -- API Body starts here
4929: -- create list of the source resource territories

Line 4970: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),

4966: FULL_ACCESS_FLAG,
4967: ORG_ID
4968: ) VALUES (
4969: JTF_TERR_RSC_s.nextval,
4970: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),

Line 4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),

4967: ORG_ID
4968: ) VALUES (
4969: JTF_TERR_RSC_s.nextval,
4970: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),

Line 4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),

4968: ) VALUES (
4969: JTF_TERR_RSC_s.nextval,
4970: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),

Line 4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),

4969: JTF_TERR_RSC_s.nextval,
4970: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),

Line 4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),

4970: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),

Line 4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),

4971: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),

Line 4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),

4972: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),

Line 4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),

4973: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),

Line 4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),

4974: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),

Line 4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),

4975: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),

Line 4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),

4976: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
4984: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)

Line 4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),

4977: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
4984: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
4985: );

Line 4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),

4978: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
4984: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
4985: );
4986:

Line 4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),

4979: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
4984: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
4985: );
4986:
4987:

Line 4984: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)

4980: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
4981: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
4982: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
4983: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
4984: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
4985: );
4986:
4987:
4988: ELSIF p_replace_flag = 'Y'

Line 5013: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),

5009: FULL_ACCESS_FLAG,
5010: ORG_ID
5011: ) VALUES (
5012: JTF_TERR_RSC_s.nextval,
5013: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),

Line 5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),

5010: ORG_ID
5011: ) VALUES (
5012: JTF_TERR_RSC_s.nextval,
5013: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),

Line 5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),

5011: ) VALUES (
5012: JTF_TERR_RSC_s.nextval,
5013: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),

Line 5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),

5012: JTF_TERR_RSC_s.nextval,
5013: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),

Line 5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),

5013: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),

Line 5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),

5014: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),

Line 5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),

5015: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),

Line 5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),

5016: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),

Line 5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),

5017: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),

Line 5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),

5018: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),

Line 5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),

5019: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5027: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)

Line 5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),

5020: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5027: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5028: );

Line 5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),

5021: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5027: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5028: );
5029:

Line 5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),

5022: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5027: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5028: );
5029:
5030: --ARPATEL: 11/06/2003 BUG#2798581 START

Line 5027: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)

5023: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5024: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5025: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5026: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5027: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5028: );
5029:
5030: --ARPATEL: 11/06/2003 BUG#2798581 START
5031: FORALL i IN l_terr_ids_tbl.FIRST..l_terr_ids_tbl.LAST

Line 5099: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),

5095: FULL_ACCESS_FLAG,
5096: ORG_ID
5097: ) VALUES (
5098: JTF_TERR_RSC_s.nextval,
5099: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),

Line 5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),

5096: ORG_ID
5097: ) VALUES (
5098: JTF_TERR_RSC_s.nextval,
5099: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),

Line 5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),

5097: ) VALUES (
5098: JTF_TERR_RSC_s.nextval,
5099: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),

Line 5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),

5098: JTF_TERR_RSC_s.nextval,
5099: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),

Line 5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),

5099: decode( p_dest_resource_rec.LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.LAST_UPDATE_DATE),
5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),

Line 5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),

5100: decode( p_dest_resource_rec.LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATED_BY),
5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),

Line 5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),

5101: decode( p_dest_resource_rec.CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),p_dest_resource_rec.CREATION_DATE),
5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),

Line 5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),

5102: decode( p_dest_resource_rec.CREATED_BY, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.CREATED_BY),
5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),

Line 5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),

5103: decode( p_dest_resource_rec.LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.LAST_UPDATE_LOGIN),
5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),

Line 5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),

5104: decode( l_terr_ids_tbl(i), FND_API.G_MISS_NUM, NULL,l_terr_ids_tbl(i)),
5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),

Line 5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),

5105: decode( p_dest_resource_rec.RESOURCE_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.RESOURCE_ID),
5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5113: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)

Line 5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),

5106: decode( p_dest_resource_rec.GROUP_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.GROUP_ID),
5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5113: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5114: );

Line 5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),

5107: decode( p_dest_resource_rec.RESOURCE_TYPE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.RESOURCE_TYPE),
5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5113: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5114: );
5115:

Line 5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),

5108: decode( p_dest_resource_rec.ROLE, FND_API.G_MISS_CHAR, NULL, p_dest_resource_rec.ROLE),
5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5113: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5114: );
5115:
5116: --ARPATEL: 11/06/2003 BUG#2798581 START

Line 5113: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)

5109: decode( p_dest_resource_rec.PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.PRIMARY_CONTACT_FLAG),
5110: decode( p_dest_resource_rec.START_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.START_DATE_ACTIVE),
5111: decode( p_dest_resource_rec.END_DATE_ACTIVE, FND_API.G_MISS_DATE, NULL,p_dest_resource_rec.END_DATE_ACTIVE),
5112: decode( p_dest_resource_rec.FULL_ACCESS_FLAG, FND_API.G_MISS_CHAR, NULL,p_dest_resource_rec.FULL_ACCESS_FLAG),
5113: decode( p_dest_resource_rec.ORG_ID, FND_API.G_MISS_NUM, NULL,p_dest_resource_rec.ORG_ID)
5114: );
5115:
5116: --ARPATEL: 11/06/2003 BUG#2798581 START
5117: FORALL i IN l_terr_ids_tbl.FIRST..l_terr_ids_tbl.LAST

Line 5183: IF FND_API.to_Boolean( p_commit )

5179: p_data => x_msg_data
5180: );
5181:
5182: -- Standard check for p_commit
5183: IF FND_API.to_Boolean( p_commit )
5184: THEN
5185: COMMIT WORK;
5186: END IF;
5187:

Line 5191: WHEN FND_API.G_EXC_ERROR THEN

5187:
5188: --dbms_output.put_line('Transfer_Resource_Territories: Exiting API');
5189: EXCEPTION
5190: --
5191: WHEN FND_API.G_EXC_ERROR THEN
5192: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_ERROR');
5193: ROLLBACK TO TRANSFER_TERR_RES;
5194: x_return_status := FND_API.G_RET_STS_ERROR ;
5195: FND_MSG_PUB.Count_And_Get

Line 5192: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_ERROR');

5188: --dbms_output.put_line('Transfer_Resource_Territories: Exiting API');
5189: EXCEPTION
5190: --
5191: WHEN FND_API.G_EXC_ERROR THEN
5192: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_ERROR');
5193: ROLLBACK TO TRANSFER_TERR_RES;
5194: x_return_status := FND_API.G_RET_STS_ERROR ;
5195: FND_MSG_PUB.Count_And_Get
5196: ( p_count => x_msg_count,

Line 5194: x_return_status := FND_API.G_RET_STS_ERROR ;

5190: --
5191: WHEN FND_API.G_EXC_ERROR THEN
5192: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_ERROR');
5193: ROLLBACK TO TRANSFER_TERR_RES;
5194: x_return_status := FND_API.G_RET_STS_ERROR ;
5195: FND_MSG_PUB.Count_And_Get
5196: ( p_count => x_msg_count,
5197: p_data => x_msg_data
5198: );

Line 5200: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5196: ( p_count => x_msg_count,
5197: p_data => x_msg_data
5198: );
5199:
5200: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5201: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_UNEXPECTED_ERROR');
5202: ROLLBACK TO TRANSFER_TERR_RES;
5203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5204: FND_MSG_PUB.Count_And_Get

Line 5201: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_UNEXPECTED_ERROR');

5197: p_data => x_msg_data
5198: );
5199:
5200: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5201: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_UNEXPECTED_ERROR');
5202: ROLLBACK TO TRANSFER_TERR_RES;
5203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5204: FND_MSG_PUB.Count_And_Get
5205: ( p_count => x_msg_count,

Line 5203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5199:
5200: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5201: --dbms_output.put_line('Transfer_Resource_Territories: FND_API.G_EXC_UNEXPECTED_ERROR');
5202: ROLLBACK TO TRANSFER_TERR_RES;
5203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5204: FND_MSG_PUB.Count_And_Get
5205: ( p_count => x_msg_count,
5206: p_data => x_msg_data
5207: );

Line 5212: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5208:
5209: WHEN OTHERS THEN
5210: --dbms_output.put_line('Transfer_Resource_Territories PVT: OTHERS - ' || SQLERRM);
5211: ROLLBACK TO TRANSFER_TERR_RES;
5212: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5213: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
5214: THEN
5215: fnd_msg_pub.add_exc_msg (
5216: g_pkg_name,