153: -- length of Update array for AS_TERRITORY_ACCESSES
154: g_tu_count NUMBER := 0;
155:
156:
157: g_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
158: g_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
159: g_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
160:
161: -- The follwing is the meaning of g_resource_flag_tbl:
154: g_tu_count NUMBER := 0;
155:
156:
157: g_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
158: g_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
159: g_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
160:
161: -- The follwing is the meaning of g_resource_flag_tbl:
162: -- 'D': This resource is the default resource from profile
155:
156:
157: g_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
158: g_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
159: g_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
160:
161: -- The follwing is the meaning of g_resource_flag_tbl:
162: -- 'D': This resource is the default resource from profile
163: -- AS_DEFAULT_RESOURCE_ID, "OS: Default Resource ID used for Sales
163: -- AS_DEFAULT_RESOURCE_ID, "OS: Default Resource ID used for Sales
164: -- Lead Assignment".
165: -- 'L': This resource is the login user.
166: -- 'T': This resource is defined in territory.
167: g_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
168:
169: AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
170: AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
171: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
784:
785: -- Debug Message
786: IF (AS_DEBUG_LOW_ON) THEN
787: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
788: 'Calling AS_LEAD_ROUTING_WF.STARTPROCESS');
789: END IF;
790:
791: AS_LEAD_ROUTING_WF.STARTPROCESS (
792: p_sales_lead_id => p_sales_lead_id,
787: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
788: 'Calling AS_LEAD_ROUTING_WF.STARTPROCESS');
789: END IF;
790:
791: AS_LEAD_ROUTING_WF.STARTPROCESS (
792: p_sales_lead_id => p_sales_lead_id,
793: p_salesgroup_id => fnd_api.g_miss_num,
794: x_return_status => x_return_status,
795: x_item_type => l_itemtype,
4673: x_msg_data OUT NOCOPY VARCHAR2)
4674: IS
4675: l_sales_lead_rec AS_SALES_LEADS_PUB.SALES_LEAD_Rec_Type;
4676:
4677: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4678: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4679: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4680: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
4681:
4674: IS
4675: l_sales_lead_rec AS_SALES_LEADS_PUB.SALES_LEAD_Rec_Type;
4676:
4677: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4678: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4679: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4680: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
4681:
4682: l_rs_id NUMBER;
4675: l_sales_lead_rec AS_SALES_LEADS_PUB.SALES_LEAD_Rec_Type;
4676:
4677: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4678: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4679: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4680: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
4681:
4682: l_rs_id NUMBER;
4683: l_resource_id NUMBER;
4676:
4677: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4678: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4679: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
4680: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
4681:
4682: l_rs_id NUMBER;
4683: l_resource_id NUMBER;
4684: l_group_id NUMBER;
4753: BEGIN
4754: -- give sales_lead_id only for Oracle internal
4755: l_sales_lead_rec.sales_lead_id := p_sales_lead_id;
4756:
4757: AS_LEAD_ROUTING_WF_CUHK.Get_Owner_Pre(
4758: p_api_version_number => 2.0,
4759: p_init_msg_list => FND_API.G_FALSE,
4760: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
4761: p_commit => FND_API.G_FALSE,
5479: x_msg_count OUT NOCOPY NUMBER,
5480: x_msg_data OUT NOCOPY VARCHAR2)
5481: IS
5482: l_sales_lead_id NUMBER;
5483: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5484: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5485: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5486: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
5487: l_check_calendar VARCHAR2(1);
5480: x_msg_data OUT NOCOPY VARCHAR2)
5481: IS
5482: l_sales_lead_id NUMBER;
5483: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5484: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5485: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5486: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
5487: l_check_calendar VARCHAR2(1);
5488: l_index1 NUMBER; -- point to l_resource_id_tbl
5481: IS
5482: l_sales_lead_id NUMBER;
5483: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5484: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5485: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5486: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
5487: l_check_calendar VARCHAR2(1);
5488: l_index1 NUMBER; -- point to l_resource_id_tbl
5489: l_index2 NUMBER; -- point to g_resource_id_tbl
5482: l_sales_lead_id NUMBER;
5483: l_resource_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5484: l_group_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5485: l_person_id_tbl AS_LEAD_ROUTING_WF.NUMBER_TABLE;
5486: l_resource_flag_tbl AS_LEAD_ROUTING_WF.FLAG_TABLE;
5487: l_check_calendar VARCHAR2(1);
5488: l_index1 NUMBER; -- point to l_resource_id_tbl
5489: l_index2 NUMBER; -- point to g_resource_id_tbl
5490: l_last NUMBER; -- total number of rec in l_resource_id_tbl
5675: THEN
5676: Get_Alternate_Resource(p_salesgroup_id);
5677: END IF;
5678:
5679: l_call_user_hook := JTF_USR_HKS.Ok_to_execute('AS_LEAD_ROUTING_WF',
5680: 'GetOwner','B','C');
5681:
5682: -- USER HOOK standard : customer pre-processing section - mandatory
5683: IF l_call_user_hook
5762: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
5763: 'desc:' || l_sales_lead_rec.description);
5764: END IF;
5765:
5766: AS_LEAD_ROUTING_WF_CUHK.Get_Owner_Pre(
5767: p_api_version_number => 2.0,
5768: p_init_msg_list => FND_API.G_FALSE,
5769: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
5770: p_commit => FND_API.G_FALSE,