71: -- end of comments
72:
73: procedure Get_Addn_Params
74: ( p_api_version_number IN number,
75: p_init_msg_list IN varchar2 := fnd_api.g_false,
76: llp_trans_rec IN OUT NOCOPY JTF_TERR_ASSIGN_PUB.bulk_trans_rec_type,
77: llp_source_id IN number,
78: llp_trans_id IN number,
79: x_return_status OUT NOCOPY varchar2
101:
102: FND_MSG_PUB.initialize;
103:
104: -- Standard call to check for call compatibility.
105: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
106: p_api_version_number,
107: l_api_name,
108: G_PKG_NAME)
109: THEN
106: p_api_version_number,
107: l_api_name,
108: G_PKG_NAME)
109: THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112: -- Initialize message list if p_init_msg_list is set to TRUE.
113: IF FND_API.to_Boolean( p_init_msg_list )
114: THEN
109: THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112: -- Initialize message list if p_init_msg_list is set to TRUE.
113: IF FND_API.to_Boolean( p_init_msg_list )
114: THEN
115: FND_MSG_PUB.initialize;
116: END IF;
117:
122: FND_MSG_PUB.Add;
123: END IF;
124:
125: -- API body
126: x_return_status := FND_API.G_RET_STS_SUCCESS;
127:
128: If llp_source_id = -1001 then
129: -- Sales and Telesales
130: If ((llp_trans_id = -1002) and
357: --
358: -- end of comments
359: procedure Get_Winners
360: ( p_api_version_number IN number,
361: p_init_msg_list IN varchar2 := fnd_api.g_false,
362: p_trans_rec IN trans_rec_type,
363: p_source_id IN number,
364: p_trans_id IN number,
365: p_Resource_Type IN varchar2,
411:
412: FND_MSG_PUB.initialize;
413:
414: -- Standard call to check for call compatibility.
415: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
416: p_api_version_number,
417: l_api_name,
418: G_PKG_NAME)
419: THEN
416: p_api_version_number,
417: l_api_name,
418: G_PKG_NAME)
419: THEN
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: END IF;
422: -- Initialize message list if p_init_msg_list is set to TRUE.
423: IF FND_API.to_Boolean( p_init_msg_list )
424: THEN
419: THEN
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: END IF;
422: -- Initialize message list if p_init_msg_list is set to TRUE.
423: IF FND_API.to_Boolean( p_init_msg_list )
424: THEN
425: FND_MSG_PUB.initialize;
426: END IF;
427:
432: FND_MSG_PUB.Add;
433: END IF;
434:
435: -- API body
436: x_return_status := FND_API.G_RET_STS_SUCCESS;
437:
438:
439:
440: --loop thru p_Terrlookup_tbl and assign to lp_trans_Rec
703: p_use_type => 'LOOKUP',
704: p_source_id => p_source_id, -- -1001 Oracle Sales
705: p_trans_id => p_trans_id, -- -1002 Account
706: p_trans_rec => lp_trans_Rec,
707: p_resource_type => FND_API.G_MISS_CHAR,
708: p_role => FND_API.G_MISS_CHAR,
709: p_top_level_terr_id => FND_API.G_MISS_NUM,
710: p_num_winners => FND_API.G_MISS_NUM,
711: x_return_status => lx_return_status,
704: p_source_id => p_source_id, -- -1001 Oracle Sales
705: p_trans_id => p_trans_id, -- -1002 Account
706: p_trans_rec => lp_trans_Rec,
707: p_resource_type => FND_API.G_MISS_CHAR,
708: p_role => FND_API.G_MISS_CHAR,
709: p_top_level_terr_id => FND_API.G_MISS_NUM,
710: p_num_winners => FND_API.G_MISS_NUM,
711: x_return_status => lx_return_status,
712: x_msg_count => lx_msg_count,
705: p_trans_id => p_trans_id, -- -1002 Account
706: p_trans_rec => lp_trans_Rec,
707: p_resource_type => FND_API.G_MISS_CHAR,
708: p_role => FND_API.G_MISS_CHAR,
709: p_top_level_terr_id => FND_API.G_MISS_NUM,
710: p_num_winners => FND_API.G_MISS_NUM,
711: x_return_status => lx_return_status,
712: x_msg_count => lx_msg_count,
713: x_msg_data => lx_msg_data,
706: p_trans_rec => lp_trans_Rec,
707: p_resource_type => FND_API.G_MISS_CHAR,
708: p_role => FND_API.G_MISS_CHAR,
709: p_top_level_terr_id => FND_API.G_MISS_NUM,
710: p_num_winners => FND_API.G_MISS_NUM,
711: x_return_status => lx_return_status,
712: x_msg_count => lx_msg_count,
713: x_msg_data => lx_msg_data,
714: x_winners_rec => lx_winners_rec
785: ,x_return_status => lx_return_status
786: ,x_msg_count => lx_msg_count
787: ,x_msg_data => lx_msg_data);
788:
789: IF (lx_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
790: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
791: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
792: 'jtf.plsql.jtf_terr_assign_pub.get_winners.process_match',
793: 'API JTY_ASSIGN_REALTIME_PUB.process_match has failed');
791: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
792: 'jtf.plsql.jtf_terr_assign_pub.get_winners.process_match',
793: 'API JTY_ASSIGN_REALTIME_PUB.process_match has failed');
794: END IF;
795: RAISE FND_API.G_EXC_ERROR;
796: END IF;
797:
798: -- debug message
799: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
813: ,x_msg_count => lx_msg_count
814: ,x_msg_data => lx_msg_data
815: ,x_winners_rec => lx_winners_rec);
816:
817: IF (lx_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
818: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
819: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
820: 'jtf.plsql.jtf_terr_assign_pub.get_winners.process_winners',
821: 'JTY_ASSIGN_REALTIME_PUB.process_winners has failed');
819: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
820: 'jtf.plsql.jtf_terr_assign_pub.get_winners.process_winners',
821: 'JTY_ASSIGN_REALTIME_PUB.process_winners has failed');
822: END IF;
823: RAISE FND_API.G_EXC_ERROR;
824: END IF;
825:
826: -- debug message
827: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
941: );
942: --dbms_output.put_line('JTF_TERR_LOOKUP_PUB: End ');
943: EXCEPTION
944: WHEN OTHERS THEN
945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
946: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
947: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
948: END IF;
949: FND_MSG_PUB.Count_And_Get