[Home] [Help]
1: PACKAGE BODY JTF_ASSIGN_PUB AS
2: /* $Header: jtfamprb.pls 120.18 2010/07/02 11:24:28 vakulkar ship $ */
3:
4: -- ********************************************************************************
5:
4: -- ********************************************************************************
5:
6: -- Start of Comments
7: --
8: -- Package Name : JTF_ASSIGN_PUB
9: -- Purpose : Joint Task Force Core Foundation Assignment Manager
10: -- Public APIs. This package is for finding the
11: -- a resource based on the customer preferences
12: -- or territory preferences and the availability of
102: -- End of comments
103:
104: -- *******************************************************************************
105:
106: g_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type ;
107: g_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type ;
108: g_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type ;
109: g_continuous_work VARCHAR2(10);
110:
103:
104: -- *******************************************************************************
105:
106: g_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type ;
107: g_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type ;
108: g_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type ;
109: g_continuous_work VARCHAR2(10);
110:
111:
104: -- *******************************************************************************
105:
106: g_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type ;
107: g_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type ;
108: g_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type ;
109: g_continuous_work VARCHAR2(10);
110:
111:
112: FUNCTION am_miss_num RETURN NUMBER IS
227: l_engineer_id IN JTF_NUMBER_TABLE,
228: l_resource_type IN JTF_VARCHAR2_TABLE_100,
229: l_primary_flag IN JTF_VARCHAR2_TABLE_100,
230: l_resource_class IN JTF_VARCHAR2_TABLE_100,
231: l_con_preferred_engineers_tbl OUT NOCOPY JTF_ASSIGN_PUB.prfeng_tbl_type
232: )
233: IS
234:
235: l_ddindx BINARY_INTEGER;
260: END table_copy_in;
261:
262:
263: -- procedure to copy resources from one table to another
264: PROCEDURE table_copy(p_from_table IN JTF_ASSIGN_PUB.AssignResources_tbl_type,
265: x_to_table IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type)
266: IS
267:
268: i number := 0;
261:
262:
263: -- procedure to copy resources from one table to another
264: PROCEDURE table_copy(p_from_table IN JTF_ASSIGN_PUB.AssignResources_tbl_type,
265: x_to_table IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type)
266: IS
267:
268: i number := 0;
269: k number := 0;
291: END table_copy;
292:
293:
294: -- procedure to remove excluded resources
295: PROCEDURE remove_excluded(x_res_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
296: x_exc_res IN OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type)
297: IS
298:
299: i number := 0;
292:
293:
294: -- procedure to remove excluded resources
295: PROCEDURE remove_excluded(x_res_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
296: x_exc_res IN OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type)
297: IS
298:
299: i number := 0;
300: k number := 0;
299: i number := 0;
300: k number := 0;
301: l_count number := 0;
302: l_exclude varchar2(1) := 'N';
303: l_resource_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
304: BEGIN
305: l_resource_tbl.delete;
306: if(x_exc_res.count > 0 and x_res_tbl.count > 0)
307: then
347: PROCEDURE quick_sort_resource_loc
348: (
349: p_left INTEGER,
350: p_right INTEGER,
351: p_list IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type
352: )
353: IS
354:
355: i INTEGER;
355: i INTEGER;
356: j INTEGER;
357: l_left INTEGER := p_left;
358: l_right INTEGER := p_right;
359: l_current_node JTF_ASSIGN_PUB.AssignResources_rec_type;
360: l_dummy_node JTF_ASSIGN_PUB.AssignResources_rec_type;
361:
362: BEGIN
363:
356: j INTEGER;
357: l_left INTEGER := p_left;
358: l_right INTEGER := p_right;
359: l_current_node JTF_ASSIGN_PUB.AssignResources_rec_type;
360: l_dummy_node JTF_ASSIGN_PUB.AssignResources_rec_type;
361:
362: BEGIN
363:
364: IF (l_right > l_left) THEN
435:
436: PROCEDURE quick_sort_terr_rank
437: ( p_left INTEGER,
438: p_right INTEGER,
439: p_list IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type
440: )
441: IS
442:
443: i INTEGER;
443: i INTEGER;
444: j INTEGER;
445: l_left INTEGER := p_left;
446: l_right INTEGER := p_right;
447: l_current_node JTF_ASSIGN_PUB.AssignResources_rec_type;
448: l_dummy_node JTF_ASSIGN_PUB.AssignResources_rec_type;
449:
450: BEGIN
451:
444: j INTEGER;
445: l_left INTEGER := p_left;
446: l_right INTEGER := p_right;
447: l_current_node JTF_ASSIGN_PUB.AssignResources_rec_type;
448: l_dummy_node JTF_ASSIGN_PUB.AssignResources_rec_type;
449:
450: BEGIN
451:
452: IF (l_right > l_left) THEN
535:
536:
537: PROCEDURE Terr_Qual_Dyn_Assign
538: (
539: p_sr_assign_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type,
540: p_sr_task_assign_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type
541: )
542: IS
543:
536:
537: PROCEDURE Terr_Qual_Dyn_Assign
538: (
539: p_sr_assign_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type,
540: p_sr_task_assign_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type
541: )
542: IS
543:
544: BEGIN
546: EXECUTE IMMEDIATE
547: '
548: BEGIN
549:
550: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM23:=:1;
551: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM24:=:2;
552:
553: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM23:=:3;
554: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM24:=:4;
547: '
548: BEGIN
549:
550: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM23:=:1;
551: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM24:=:2;
552:
553: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM23:=:3;
554: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM24:=:4;
555:
549:
550: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM23:=:1;
551: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM24:=:2;
552:
553: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM23:=:3;
554: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM24:=:4;
555:
556: END;
557: '
550: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM23:=:1;
551: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM24:=:2;
552:
553: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM23:=:3;
554: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM24:=:4;
555:
556: END;
557: '
558: USING
592:
593: EXECUTE IMMEDIATE
594: '
595: BEGIN
596: If (JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM23 IS NOT NULL)
597: Or (JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM24 IS NOT NULL)
598: Then
599: :1:=''P'';
600: End If;
593: EXECUTE IMMEDIATE
594: '
595: BEGIN
596: If (JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM23 IS NOT NULL)
597: Or (JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type.SQUAL_NUM24 IS NOT NULL)
598: Then
599: :1:=''P'';
600: End If;
601:
598: Then
599: :1:=''P'';
600: End If;
601:
602: If (JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM23 IS NOT NULL)
603: Or (JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM24 IS NOT NULL)
604: Then
605: :2:=''P'';
606: End If;
599: :1:=''P'';
600: End If;
601:
602: If (JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM23 IS NOT NULL)
603: Or (JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type.SQUAL_NUM24 IS NOT NULL)
604: Then
605: :2:=''P'';
606: End If;
607: End;
631:
632:
633:
634: PROCEDURE get_group_resource(p_group_id IN NUMBER,
635: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type)
636: IS
637:
638: CURSOR check_mem_cur
639: (
648:
649: l_found VARCHAR2(1) := 'N';
650: l_count NUMBER := 0;
651: i NUMBER := 0;
652: l_assign_resource_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
653:
654:
655: BEGIN
656: --FOR i IN 1..x_assign_resources_tbl.COUNT
760:
761:
762:
763: PROCEDURE get_usage_resource(p_usage IN VARCHAR2,
764: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type)
765: IS
766:
767: CURSOR grp_usg_cur
768: (
786:
787: l_found VARCHAR2(1) := 'N';
788: l_count NUMBER := 0;
789: i NUMBER := 0;
790: l_assign_resource_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
791:
792: BEGIN
793: i := x_assign_resources_tbl.FIRST;
794:
903: p_continuous_task IN VARCHAR2,
904: x_return_status IN OUT NOCOPY VARCHAR2,
905: x_msg_count IN OUT NOCOPY NUMBER,
906: x_msg_data IN OUT NOCOPY VARCHAR2,
907: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type
908: )
909: IS
910:
911:
934: l_x_availability_type VARCHAR2(60);
935: l_uom_hour VARCHAR2(200);
936: l_effort_duration NUMBER;
937:
938: l_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
939:
940:
941:
942: BEGIN
1131: p_continuous_task IN VARCHAR2,
1132: x_return_status IN OUT NOCOPY VARCHAR2,
1133: x_msg_count IN OUT NOCOPY NUMBER,
1134: x_msg_data IN OUT NOCOPY VARCHAR2,
1135: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
1136: --Added for Bug # 5573916
1137: p_calendar_check IN VARCHAR2 DEFAULT 'Y'
1138: --Added for Bug # 5573916 Ends here
1139: )
1163: l_x_planned_end_date DATE;
1164: l_x_shift_construct_id NUMBER;
1165: l_x_availability_type VARCHAR2(60);
1166:
1167: l_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
1168:
1169: TYPE l_slots_rec IS RECORD
1170: (slot_value NUMBER);
1171:
1180: l_temp_start_date DATE;
1181: l_temp_end_date DATE;
1182: l_avail_count NUMBER;
1183: l_uom_hour VARCHAR2(200);
1184: l_avail_resource JTF_ASSIGN_PUB.Avail_tbl_type;
1185: l_temp_count NUMBER := 0;
1186: l_planned_end_date DATE;
1187:
1188:
1197: -- initialize the variables
1198: x_return_status := fnd_api.g_ret_sts_success;
1199: l_current_rec := 0;
1200: l_resources_tbl.delete;
1201: JTF_ASSIGN_PUB.g_resource_avail.delete;
1202:
1203:
1204: /* to handle the conversion of duration to hour */
1205: l_uom_hour := nvl(fnd_profile.value('JTF_AM_TASK_HOUR'), 'HR');
1284: THEN
1285:
1286: l_current_record := x_assign_resources_tbl.FIRST;
1287: l_avail_count := 0;
1288: jtf_assign_pub.g_resource_avail.delete;
1289:
1290:
1291:
1292:
1398: l_resources_tbl(l_current_rec).skill_name := x_assign_resources_tbl(l_current_record).skill_name;
1399: l_resources_tbl(l_current_rec).resource_source := x_assign_resources_tbl(l_current_record).resource_source;
1400:
1401: -- assign values to availability table
1402: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := l_resources_tbl(l_current_rec).resource_id;
1403: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type := l_resources_tbl(l_current_rec).resource_type;
1404: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_resources_tbl(l_current_rec).start_date;
1405: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_resources_tbl(l_current_rec).end_date;
1406: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_resources_tbl(l_current_rec).shift_construct_id;
1399: l_resources_tbl(l_current_rec).resource_source := x_assign_resources_tbl(l_current_record).resource_source;
1400:
1401: -- assign values to availability table
1402: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := l_resources_tbl(l_current_rec).resource_id;
1403: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type := l_resources_tbl(l_current_rec).resource_type;
1404: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_resources_tbl(l_current_rec).start_date;
1405: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_resources_tbl(l_current_rec).end_date;
1406: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_resources_tbl(l_current_rec).shift_construct_id;
1407:
1400:
1401: -- assign values to availability table
1402: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := l_resources_tbl(l_current_rec).resource_id;
1403: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type := l_resources_tbl(l_current_rec).resource_type;
1404: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_resources_tbl(l_current_rec).start_date;
1405: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_resources_tbl(l_current_rec).end_date;
1406: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_resources_tbl(l_current_rec).shift_construct_id;
1407:
1408: l_current_rec := l_current_rec + 1;
1401: -- assign values to availability table
1402: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := l_resources_tbl(l_current_rec).resource_id;
1403: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type := l_resources_tbl(l_current_rec).resource_type;
1404: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_resources_tbl(l_current_rec).start_date;
1405: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_resources_tbl(l_current_rec).end_date;
1406: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_resources_tbl(l_current_rec).shift_construct_id;
1407:
1408: l_current_rec := l_current_rec + 1;
1409: l_avail_count := l_avail_count + 1;
1402: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := l_resources_tbl(l_current_rec).resource_id;
1403: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type := l_resources_tbl(l_current_rec).resource_type;
1404: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_resources_tbl(l_current_rec).start_date;
1405: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_resources_tbl(l_current_rec).end_date;
1406: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_resources_tbl(l_current_rec).shift_construct_id;
1407:
1408: l_current_rec := l_current_rec + 1;
1409: l_avail_count := l_avail_count + 1;
1410:
1524: END IF;
1525: END IF;
1526: if(l_x_shift_construct_id is not null)
1527: then
1528: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := x_assign_resources_tbl(l_current_rec).resource_id;
1529: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type :=x_assign_resources_tbl(l_current_rec).resource_type;
1530: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_x_planned_start_date;
1531: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_x_planned_end_date;
1532: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_x_shift_construct_id;
1525: END IF;
1526: if(l_x_shift_construct_id is not null)
1527: then
1528: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := x_assign_resources_tbl(l_current_rec).resource_id;
1529: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type :=x_assign_resources_tbl(l_current_rec).resource_type;
1530: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_x_planned_start_date;
1531: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_x_planned_end_date;
1532: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_x_shift_construct_id;
1533: l_avail_count := l_avail_count + 1;
1526: if(l_x_shift_construct_id is not null)
1527: then
1528: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := x_assign_resources_tbl(l_current_rec).resource_id;
1529: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type :=x_assign_resources_tbl(l_current_rec).resource_type;
1530: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_x_planned_start_date;
1531: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_x_planned_end_date;
1532: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_x_shift_construct_id;
1533: l_avail_count := l_avail_count + 1;
1534: l_temp_start_date := l_x_planned_end_date;
1527: then
1528: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := x_assign_resources_tbl(l_current_rec).resource_id;
1529: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type :=x_assign_resources_tbl(l_current_rec).resource_type;
1530: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_x_planned_start_date;
1531: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_x_planned_end_date;
1532: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_x_shift_construct_id;
1533: l_avail_count := l_avail_count + 1;
1534: l_temp_start_date := l_x_planned_end_date;
1535: l_temp_end_date := p_planned_end_date;
1528: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_id := x_assign_resources_tbl(l_current_rec).resource_id;
1529: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).resource_type :=x_assign_resources_tbl(l_current_rec).resource_type;
1530: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).start_date := l_x_planned_start_date;
1531: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).end_date := l_x_planned_end_date;
1532: JTF_ASSIGN_PUB.g_resource_avail(l_avail_count).shift_construct_id := l_x_shift_construct_id;
1533: l_avail_count := l_avail_count + 1;
1534: l_temp_start_date := l_x_planned_end_date;
1535: l_temp_end_date := p_planned_end_date;
1536: else
1535: l_temp_end_date := p_planned_end_date;
1536: else
1537: -- remove the available slots for the resource
1538: l_temp_count := 0;
1539: FOR k in JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1540: LOOP
1541: IF(JTF_ASSIGN_PUB.g_resource_avail(k).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1542: AND JTF_ASSIGN_PUB.g_resource_avail(k).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1543: THEN
1537: -- remove the available slots for the resource
1538: l_temp_count := 0;
1539: FOR k in JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1540: LOOP
1541: IF(JTF_ASSIGN_PUB.g_resource_avail(k).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1542: AND JTF_ASSIGN_PUB.g_resource_avail(k).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1543: THEN
1544: null ; --l_avail_count := l_avail_count - 1;
1545: ELSE
1538: l_temp_count := 0;
1539: FOR k in JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1540: LOOP
1541: IF(JTF_ASSIGN_PUB.g_resource_avail(k).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1542: AND JTF_ASSIGN_PUB.g_resource_avail(k).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1543: THEN
1544: null ; --l_avail_count := l_avail_count - 1;
1545: ELSE
1546: l_avail_resource(l_temp_count) := JTF_ASSIGN_PUB.g_resource_avail(k);
1542: AND JTF_ASSIGN_PUB.g_resource_avail(k).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1543: THEN
1544: null ; --l_avail_count := l_avail_count - 1;
1545: ELSE
1546: l_avail_resource(l_temp_count) := JTF_ASSIGN_PUB.g_resource_avail(k);
1547: l_temp_count := l_temp_count + 1;
1548: END IF;
1549: END LOOP;
1550: JTF_ASSIGN_PUB.g_resource_avail.delete;
1546: l_avail_resource(l_temp_count) := JTF_ASSIGN_PUB.g_resource_avail(k);
1547: l_temp_count := l_temp_count + 1;
1548: END IF;
1549: END LOOP;
1550: JTF_ASSIGN_PUB.g_resource_avail.delete;
1551: JTF_ASSIGN_PUB.g_resource_avail := l_avail_resource;
1552: l_avail_count := JTF_ASSIGN_PUB.g_resource_avail.last + 1;
1553: exit;
1554: end if; -- end of l_x_shift_contruct_id check
1547: l_temp_count := l_temp_count + 1;
1548: END IF;
1549: END LOOP;
1550: JTF_ASSIGN_PUB.g_resource_avail.delete;
1551: JTF_ASSIGN_PUB.g_resource_avail := l_avail_resource;
1552: l_avail_count := JTF_ASSIGN_PUB.g_resource_avail.last + 1;
1553: exit;
1554: end if; -- end of l_x_shift_contruct_id check
1555:
1548: END IF;
1549: END LOOP;
1550: JTF_ASSIGN_PUB.g_resource_avail.delete;
1551: JTF_ASSIGN_PUB.g_resource_avail := l_avail_resource;
1552: l_avail_count := JTF_ASSIGN_PUB.g_resource_avail.last + 1;
1553: exit;
1554: end if; -- end of l_x_shift_contruct_id check
1555:
1556: END LOOP; -- end of check for l_slots
1562: l_current_record := 0;
1563: While(l_current_rec <= x_assign_resources_tbl.LAST)
1564: Loop
1565: -- remove records that are not there in g_avail_resource
1566: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1567: LOOP
1568: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1569: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1570: THEN
1564: Loop
1565: -- remove records that are not there in g_avail_resource
1566: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1567: LOOP
1568: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1569: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1570: THEN
1571: l_resources_tbl(l_current_record) := x_assign_resources_tbl(l_current_rec);
1572: l_resources_tbl(l_current_record).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1565: -- remove records that are not there in g_avail_resource
1566: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1567: LOOP
1568: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1569: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1570: THEN
1571: l_resources_tbl(l_current_record) := x_assign_resources_tbl(l_current_rec);
1572: l_resources_tbl(l_current_record).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1573: l_resources_tbl(l_current_record).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1568: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1569: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1570: THEN
1571: l_resources_tbl(l_current_record) := x_assign_resources_tbl(l_current_rec);
1572: l_resources_tbl(l_current_record).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1573: l_resources_tbl(l_current_record).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1574: l_resources_tbl(l_current_record).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1575: l_current_record := l_current_record + 1;
1576: exit;
1569: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1570: THEN
1571: l_resources_tbl(l_current_record) := x_assign_resources_tbl(l_current_rec);
1572: l_resources_tbl(l_current_record).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1573: l_resources_tbl(l_current_record).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1574: l_resources_tbl(l_current_record).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1575: l_current_record := l_current_record + 1;
1576: exit;
1577: END IF;
1570: THEN
1571: l_resources_tbl(l_current_record) := x_assign_resources_tbl(l_current_rec);
1572: l_resources_tbl(l_current_record).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1573: l_resources_tbl(l_current_record).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1574: l_resources_tbl(l_current_record).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1575: l_current_record := l_current_record + 1;
1576: exit;
1577: END IF;
1578: END LOOP; -- end of loop for i in g_resource_avail first to last
1591: ELSE -- check p_calendar flag = Y
1592: -- else pass back all resources with the start date and end dates of resources with first availability slot dates
1593: l_current_rec := x_assign_resources_tbl.first;
1594: While(l_current_rec <= x_assign_resources_tbl.LAST
1595: AND JTF_ASSIGN_PUB.g_resource_avail.count > 0)
1596: Loop
1597: -- remove records that are not there in g_avail_resource
1598: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1599: LOOP
1594: While(l_current_rec <= x_assign_resources_tbl.LAST
1595: AND JTF_ASSIGN_PUB.g_resource_avail.count > 0)
1596: Loop
1597: -- remove records that are not there in g_avail_resource
1598: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1599: LOOP
1600: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1601: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1602: THEN
1596: Loop
1597: -- remove records that are not there in g_avail_resource
1598: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1599: LOOP
1600: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1601: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1602: THEN
1603: x_assign_resources_tbl(l_current_rec).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1604: x_assign_resources_tbl(l_current_rec).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1597: -- remove records that are not there in g_avail_resource
1598: FOR i IN JTF_ASSIGN_PUB.g_resource_avail.first..JTF_ASSIGN_PUB.g_resource_avail.last
1599: LOOP
1600: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1601: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1602: THEN
1603: x_assign_resources_tbl(l_current_rec).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1604: x_assign_resources_tbl(l_current_rec).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1605: x_assign_resources_tbl(l_current_rec).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1599: LOOP
1600: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1601: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1602: THEN
1603: x_assign_resources_tbl(l_current_rec).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1604: x_assign_resources_tbl(l_current_rec).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1605: x_assign_resources_tbl(l_current_rec).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1606: exit;
1607: END IF;
1600: IF(JTF_ASSIGN_PUB.g_resource_avail(i).resource_id = x_assign_resources_tbl(l_current_rec).resource_id
1601: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1602: THEN
1603: x_assign_resources_tbl(l_current_rec).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1604: x_assign_resources_tbl(l_current_rec).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1605: x_assign_resources_tbl(l_current_rec).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1606: exit;
1607: END IF;
1608: END LOOP; -- end of loop for i in g_resource_avail first to last
1601: AND JTF_ASSIGN_PUB.g_resource_avail(i).resource_type = x_assign_resources_tbl(l_current_rec).resource_type)
1602: THEN
1603: x_assign_resources_tbl(l_current_rec).shift_construct_id := JTF_ASSIGN_PUB.g_resource_avail(i).shift_construct_id;
1604: x_assign_resources_tbl(l_current_rec).start_date := JTF_ASSIGN_PUB.g_resource_avail(i).start_date;
1605: x_assign_resources_tbl(l_current_rec).end_date := JTF_ASSIGN_PUB.g_resource_avail(i).end_date;
1606: exit;
1607: END IF;
1608: END LOOP; -- end of loop for i in g_resource_avail first to last
1609: IF(x_assign_resources_tbl(l_current_rec).shift_construct_id IS NULL)
1691: p_business_process_date IN DATE,
1692: x_return_status IN OUT NOCOPY VARCHAR2,
1693: x_msg_count IN OUT NOCOPY NUMBER,
1694: x_msg_data IN OUT NOCOPY VARCHAR2,
1695: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
1696: x_excluded_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
1697: --Added for Bug # 5573916
1698: p_calendar_check IN VARCHAR2 DEFAULT 'Y'
1699: --Added for Bug # 5573916 Ends here
1692: x_return_status IN OUT NOCOPY VARCHAR2,
1693: x_msg_count IN OUT NOCOPY NUMBER,
1694: x_msg_data IN OUT NOCOPY VARCHAR2,
1695: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
1696: x_excluded_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
1697: --Added for Bug # 5573916
1698: p_calendar_check IN VARCHAR2 DEFAULT 'Y'
1699: --Added for Bug # 5573916 Ends here
1700: )
1738: l_x_planned_end_date DATE;
1739: l_x_shift_construct_id NUMBER;
1740: l_x_availability_type VARCHAR2(60);
1741:
1742: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
1743: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
1744:
1745: l_business_process_date DATE := p_business_process_date;
1746: l_excl_record NUMBER := 0;
1739: l_x_shift_construct_id NUMBER;
1740: l_x_availability_type VARCHAR2(60);
1741:
1742: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
1743: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
1744:
1745: l_business_process_date DATE := p_business_process_date;
1746: l_excl_record NUMBER := 0;
1747:
2026: p_planned_start_date => p_planned_start_date,
2027: p_planned_end_date => p_planned_end_date,
2028: p_breakdown => null,
2029: p_breakdown_uom => null,
2030: p_continuous_task => jtf_assign_pub.g_continuous_work,
2031: x_return_status => x_return_status,
2032: x_msg_count => x_msg_count,
2033: x_msg_data => x_msg_data,
2034: x_assign_resources_tbl => x_assign_resources_tbl,
2043: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
2044: -- Unexpected Execution Error from call to Get_contracts_resources
2045: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
2046: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
2047: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_CONTRACTS_RESOURCES');
2048: fnd_msg_pub.add;
2049: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2050: RAISE fnd_api.g_exc_error;
2051: ELSE
2126: p_resource_type IN VARCHAR2,
2127: x_return_status IN OUT NOCOPY VARCHAR2,
2128: x_msg_count IN OUT NOCOPY NUMBER,
2129: x_msg_data IN OUT NOCOPY VARCHAR2,
2130: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
2131: x_excluded_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
2132: --Added for Bug # 5573916
2133: p_calendar_check IN VARCHAR2 DEFAULT 'Y'
2134: --Added for Bug # 5573916 Ends here
2127: x_return_status IN OUT NOCOPY VARCHAR2,
2128: x_msg_count IN OUT NOCOPY NUMBER,
2129: x_msg_data IN OUT NOCOPY VARCHAR2,
2130: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
2131: x_excluded_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
2132: --Added for Bug # 5573916
2133: p_calendar_check IN VARCHAR2 DEFAULT 'Y'
2134: --Added for Bug # 5573916 Ends here
2135: )
2159: l_x_planned_end_date DATE;
2160: l_x_shift_construct_id NUMBER;
2161: l_x_availability_type VARCHAR2(60);
2162:
2163: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2164: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2165:
2166: TYPE DYNAMIC_CUR_TYP IS REF CURSOR;
2167: cur_csi_utility DYNAMIC_CUR_TYP;
2160: l_x_shift_construct_id NUMBER;
2161: l_x_availability_type VARCHAR2(60);
2162:
2163: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2164: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2165:
2166: TYPE DYNAMIC_CUR_TYP IS REF CURSOR;
2167: cur_csi_utility DYNAMIC_CUR_TYP;
2168: cur_cs_contacts DYNAMIC_CUR_TYP;
2466: p_effort_duration => p_effort_duration,
2467: p_effort_uom => p_effort_uom,
2468: p_planned_start_date => p_planned_start_date,
2469: p_planned_end_date => p_planned_end_date,
2470: p_continuous_task => jtf_assign_pub.g_continuous_work,
2471: p_breakdown => null,
2472: p_breakdown_uom => null,
2473: x_return_status => x_return_status,
2474: x_msg_count => x_msg_count,
2485: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
2486: -- Unexpected Execution Error from call to Get_contracts_resources
2487: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
2488: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
2489: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_IB_RESOURCES');
2490: fnd_msg_pub.add;
2491: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2492: RAISE fnd_api.g_exc_error;
2493: ELSE
2614:
2615: -- OUT : x_return_status OUT VARCHAR2(1)
2616: -- x_msg_count OUT NUMBER
2617: -- x_msg_data OUT VARCHAR2(2000)
2618: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
2619: -- AssignResources_tbl_type
2620:
2621:
2622: -- Version : Current version 1.0
2656: p_column_list IN VARCHAR2,
2657: p_business_process_id IN NUMBER,
2658: p_business_process_date IN DATE,
2659: p_filter_excluded_resource IN VARCHAR2,
2660: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
2661: x_return_status OUT NOCOPY VARCHAR2,
2662: x_msg_count OUT NOCOPY NUMBER,
2663: x_msg_data OUT NOCOPY VARCHAR2,
2664: --Added for Bug # 5573916
2699: l_return_status VARCHAR2(10);
2700: l_msg_count NUMBER;
2701: l_msg_data VARCHAR2(2000);
2702:
2703: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2704: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2705: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2706:
2707: -- tables for excluded resource
2700: l_msg_count NUMBER;
2701: l_msg_data VARCHAR2(2000);
2702:
2703: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2704: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2705: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2706:
2707: -- tables for excluded resource
2708: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
2701: l_msg_data VARCHAR2(2000);
2702:
2703: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2704: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2705: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2706:
2707: -- tables for excluded resource
2708: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
2709: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2704: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
2705: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2706:
2707: -- tables for excluded resource
2708: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
2709: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2710: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2711:
2712: l_status VARCHAR2(30);
2705: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
2706:
2707: -- tables for excluded resource
2708: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
2709: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2710: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2711:
2712: l_status VARCHAR2(30);
2713: l_industry VARCHAR2(30);
2706:
2707: -- tables for excluded resource
2708: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
2709: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2710: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
2711:
2712: l_status VARCHAR2(30);
2713: l_industry VARCHAR2(30);
2714:
2924: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
2925: -- Unexpected Execution Error from call to Get_contracts_resources
2926: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
2927: fnd_message.set_token('P_PROC_NAME','GET_CONTRACTS_RESOURCES');
2928: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_TASK_RESOURCES');
2929: fnd_msg_pub.add;
2930: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2931: RAISE fnd_api.g_exc_error;
2932: ELSE
2966: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
2967: -- Unexpected Execution Error from call to Get_contracts_resources
2968: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
2969: fnd_message.set_token('P_PROC_NAME','GET_IB_RESOURCES');
2970: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_TASK_RESOURCES');
2971: fnd_msg_pub.add;
2972: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2973: RAISE fnd_api.g_exc_error;
2974: ELSE
3169: p_planned_start_date => l_planned_start_date,
3170: p_planned_end_date => l_planned_end_date,
3171: p_breakdown => null,
3172: p_breakdown_uom => null,
3173: p_continuous_task => jtf_assign_pub.g_continuous_work,
3174: x_return_status => x_return_status,
3175: x_msg_count => x_msg_count,
3176: x_msg_data => x_msg_data,
3177: x_assign_resources_tbl => x_assign_resources_tbl,
3186: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
3187: -- Unexpected Execution Error from call to Get_contracts_resources
3188: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
3189: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
3190: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_TASK_RESOURCES');
3191: fnd_msg_pub.add;
3192: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3193: RAISE fnd_api.g_exc_error;
3194: ELSE
3386: p_planned_start_date => l_planned_start_date,
3387: p_planned_end_date => l_planned_end_date,
3388: p_breakdown => null,
3389: p_breakdown_uom => null,
3390: p_continuous_task => jtf_assign_pub.g_continuous_work,
3391: x_return_status => x_return_status,
3392: x_msg_count => x_msg_count,
3393: x_msg_data => x_msg_data,
3394: x_assign_resources_tbl => x_assign_resources_tbl,
3403: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
3404: -- Unexpected Execution Error from call to Get_contracts_resources
3405: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
3406: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
3407: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_TASK_RESOURCES');
3408: fnd_msg_pub.add;
3409: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3410: RAISE fnd_api.g_exc_error;
3411: ELSE
3667:
3668: -- OUT : x_return_status OUT VARCHAR2(1)
3669: -- x_msg_count OUT NUMBER
3670: -- x_msg_data OUT VARCHAR2(2000)
3671: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
3672: -- AssignResources_tbl_type
3673:
3674:
3675: -- Version : Current version 1.0
3715: p_sr_task_rec IN JTF_TERRITORY_PUB.JTF_Srv_Task_rec_type,
3716: p_business_process_id IN NUMBER,
3717: p_business_process_date IN DATE,
3718: p_filter_excluded_resource IN VARCHAR2,
3719: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
3720: x_return_status OUT NOCOPY VARCHAR2,
3721: x_msg_count OUT NOCOPY NUMBER,
3722: x_msg_data OUT NOCOPY VARCHAR2,
3723: --Added for Bug # 5386560
3753: l_current_rec INTEGER := 0;
3754: l_pref_record INTEGER := 0;
3755:
3756: l_assign_resources_tbl JTF_TERRITORY_PUB.WinningTerrMember_tbl_type;
3757: l_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3758:
3759:
3760: l_return_status VARCHAR2(10);
3761: l_msg_count NUMBER;
3761: l_msg_count NUMBER;
3762: l_msg_data VARCHAR2(2000);
3763:
3764: l_pref_res_order VARCHAR2(20) := 'BOTH';
3765: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3766: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3767: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
3768:
3769: -- tables to handle excluded resource feature
3762: l_msg_data VARCHAR2(2000);
3763:
3764: l_pref_res_order VARCHAR2(20) := 'BOTH';
3765: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3766: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3767: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
3768:
3769: -- tables to handle excluded resource feature
3770: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
3763:
3764: l_pref_res_order VARCHAR2(20) := 'BOTH';
3765: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3766: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3767: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
3768:
3769: -- tables to handle excluded resource feature
3770: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
3771: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3766: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
3767: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
3768:
3769: -- tables to handle excluded resource feature
3770: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
3771: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3772: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3773:
3774:
3767: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
3768:
3769: -- tables to handle excluded resource feature
3770: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
3771: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3772: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3773:
3774:
3775: l_x_planned_start_date DATE;
3768:
3769: -- tables to handle excluded resource feature
3770: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
3771: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3772: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
3773:
3774:
3775: l_x_planned_start_date DATE;
3776: l_x_planned_end_date DATE;
4003: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4004: -- Unexpected Execution Error from call to Get_contracts_resources
4005: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
4006: fnd_message.set_token('P_PROC_NAME','GET_CONTRACTS_RESOURCES');
4007: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
4008: fnd_msg_pub.add;
4009: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4010: RAISE fnd_api.g_exc_error;
4011: ELSE
4040: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4041: -- Unexpected Execution Error from call to Get_contracts_resources
4042: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
4043: fnd_message.set_token('P_PROC_NAME','GET_IB_RESOURCES');
4044: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
4045: fnd_msg_pub.add;
4046: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4047: RAISE fnd_api.g_exc_error;
4048: ELSE
4082: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4083: -- Unexpected Execution Error from call to Get_contracts_resources
4084: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
4085: fnd_message.set_token('P_PROC_NAME','SERVICE_SECURITY_CHECK');
4086: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
4087: fnd_msg_pub.add;
4088: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4089: RAISE fnd_api.g_exc_error;
4090: ELSE
4107: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4108: -- Unexpected Execution Error from call to Get_contracts_resources
4109: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
4110: fnd_message.set_token('P_PROC_NAME','SERVICE_SECURITY_CHECK');
4111: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
4112: fnd_msg_pub.add;
4113: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4114: RAISE fnd_api.g_exc_error;
4115: ELSE
4190: to pass it to the Territory API */
4191:
4192: /**************** Start of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
4193:
4194: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=p_sr_rec;
4195: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=p_sr_task_rec;
4196:
4197: Terr_Qual_Dyn_Check(l_sr_comp_sub, l_sr_task_comp_sub);
4198:
4191:
4192: /**************** Start of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
4193:
4194: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=p_sr_rec;
4195: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=p_sr_task_rec;
4196:
4197: Terr_Qual_Dyn_Check(l_sr_comp_sub, l_sr_task_comp_sub);
4198:
4199: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
4195: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=p_sr_task_rec;
4196:
4197: Terr_Qual_Dyn_Check(l_sr_comp_sub, l_sr_task_comp_sub);
4198:
4199: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
4200: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=Null;
4201:
4202: /**************** End of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
4203:
4196:
4197: Terr_Qual_Dyn_Check(l_sr_comp_sub, l_sr_task_comp_sub);
4198:
4199: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
4200: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=Null;
4201:
4202: /**************** End of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
4203:
4204: IF
4534: p_planned_start_date => l_planned_start_date,
4535: p_planned_end_date => l_planned_end_date,
4536: p_breakdown => null,
4537: p_breakdown_uom => null,
4538: p_continuous_task => jtf_assign_pub.g_continuous_work,
4539: x_return_status => x_return_status,
4540: x_msg_count => x_msg_count,
4541: x_msg_data => x_msg_data,
4542: x_assign_resources_tbl => x_assign_resources_tbl,
4551: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4552: -- Unexpected Execution Error from call to Get_contracts_resources
4553: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
4554: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
4555: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
4556: fnd_msg_pub.add;
4557: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4558: RAISE fnd_api.g_exc_error;
4559: ELSE
4593: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
4594: -- Unexpected Execution Error from call to Get_contracts_resources
4595: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
4596: fnd_message.set_token('P_PROC_NAME','SERVICE_SECURITY_CHECK');
4597: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
4598: fnd_msg_pub.add;
4599: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4600: RAISE fnd_api.g_exc_error;
4601: ELSE
5067:
5068:
5069: -- These parameters contain the Qualifier Values for
5070: -- the Calling Document
5071: -- p_dr_rec JTF_ASSIGN_PUB.
5072: -- JTF_DR_rec_type
5073:
5074: -- OUT : x_return_status OUT VARCHAR2(1)
5075: -- x_msg_count OUT NUMBER
5073:
5074: -- OUT : x_return_status OUT VARCHAR2(1)
5075: -- x_msg_count OUT NUMBER
5076: -- x_msg_data OUT VARCHAR2(2000)
5077: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
5078: -- AssignResources_tbl_type
5079:
5080:
5081: -- Version : Current version 1.0
5117: p_inventory_org_id IN NUMBER ,
5118: p_problem_code IN VARCHAR2 ,
5119: p_dr_id IN NUMBER,
5120: p_column_list IN VARCHAR2 ,
5121: p_dr_rec IN JTF_ASSIGN_PUB.JTF_DR_rec_type ,
5122: p_business_process_id IN NUMBER,
5123: p_business_process_date IN DATE,
5124: p_filter_excluded_resource IN VARCHAR2,
5125: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
5121: p_dr_rec IN JTF_ASSIGN_PUB.JTF_DR_rec_type ,
5122: p_business_process_id IN NUMBER,
5123: p_business_process_date IN DATE,
5124: p_filter_excluded_resource IN VARCHAR2,
5125: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
5126: x_return_status OUT NOCOPY VARCHAR2,
5127: x_msg_count OUT NOCOPY NUMBER,
5128: x_msg_data OUT NOCOPY VARCHAR2,
5129: --Added for Bug # 5573916
5163: l_bind_data_id NUMBER;
5164: l_workflow_key NUMBER;
5165:
5166: l_dr_rec JTF_TERRITORY_PUB.JTF_Srv_Task_rec_type;
5167: l_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5168: l_assign_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5169: l_winningterrmember_tbl JTF_TERRITORY_PUB.WinningTerrMember_tbl_type;
5170:
5171: l_dr_id NUMBER;
5164: l_workflow_key NUMBER;
5165:
5166: l_dr_rec JTF_TERRITORY_PUB.JTF_Srv_Task_rec_type;
5167: l_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5168: l_assign_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5169: l_winningterrmember_tbl JTF_TERRITORY_PUB.WinningTerrMember_tbl_type;
5170:
5171: l_dr_id NUMBER;
5172: l_p_resource_type VARCHAR2(30) := p_resource_type;
5191: l_msg_count NUMBER;
5192: l_msg_data VARCHAR2(2000);
5193:
5194: l_pref_res_order VARCHAR2(20) := 'BOTH';
5195: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5196: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5197: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
5198:
5199: -- tables to handle excluded resource feature
5192: l_msg_data VARCHAR2(2000);
5193:
5194: l_pref_res_order VARCHAR2(20) := 'BOTH';
5195: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5196: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5197: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
5198:
5199: -- tables to handle excluded resource feature
5200: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
5193:
5194: l_pref_res_order VARCHAR2(20) := 'BOTH';
5195: l_ib_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5196: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5197: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
5198:
5199: -- tables to handle excluded resource feature
5200: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
5201: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5196: l_con_preferred_engineers_tbl JTF_ASSIGN_PUB.prfeng_tbl_type;
5197: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
5198:
5199: -- tables to handle excluded resource feature
5200: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
5201: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5202: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5203:
5204:
5197: l_preferred_engineers_tbl JTF_ASSIGN_PUB.Preferred_Engineers_tbl_type;
5198:
5199: -- tables to handle excluded resource feature
5200: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
5201: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5202: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5203:
5204:
5205: l_x_planned_start_date DATE;
5198:
5199: -- tables to handle excluded resource feature
5200: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
5201: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5202: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
5203:
5204:
5205: l_x_planned_start_date DATE;
5206: l_x_planned_end_date DATE;
5286: subcomponent_id IS NULL;
5287:
5288: BEGIN
5289:
5290: SAVEPOINT jtf_assign_pub;
5291:
5292: -- Started Assignment Manager Public API
5293:
5294: /* Standard call to check for call compatibility */
5593: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
5594: -- Unexpected Execution Error from call to Get_contracts_resources
5595: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
5596: fnd_message.set_token('P_PROC_NAME','GET_CONTRACTS_RESOURCES');
5597: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DR_RESOURCES');
5598: fnd_msg_pub.add;
5599: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
5600: RAISE fnd_api.g_exc_error;
5601: ELSE
5630: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
5631: -- Unexpected Execution Error from call to Get_contracts_resources
5632: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
5633: fnd_message.set_token('P_PROC_NAME','GET_IB_RESOURCES');
5634: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DR_RESOURCES');
5635: fnd_msg_pub.add;
5636: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
5637: RAISE fnd_api.g_exc_error;
5638: ELSE
5672: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
5673: -- Unexpected Execution Error from call to Get_contracts_resources
5674: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
5675: fnd_message.set_token('P_PROC_NAME','SERVICE_SECURITY_CHECK');
5676: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DR_RESOURCES');
5677: fnd_msg_pub.add;
5678: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
5679: RAISE fnd_api.g_exc_error;
5680: ELSE
5697: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
5698: -- Unexpected Execution Error from call to Get_contracts_resources
5699: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
5700: fnd_message.set_token('P_PROC_NAME','SERVICE_SECURITY_CHECK');
5701: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DR_RESOURCES');
5702: fnd_msg_pub.add;
5703: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
5704: RAISE fnd_api.g_exc_error;
5705: ELSE
5878: p_planned_start_date => l_planned_start_date,
5879: p_planned_end_date => l_planned_end_date,
5880: p_breakdown => null,
5881: p_breakdown_uom => null,
5882: p_continuous_task => jtf_assign_pub.g_continuous_work,
5883: x_return_status => x_return_status,
5884: x_msg_count => x_msg_count,
5885: x_msg_data => x_msg_data,
5886: x_assign_resources_tbl => l_assign_resources_tbl,
5896: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
5897: -- Unexpected Execution Error from call to Get_contracts_resources
5898: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
5899: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
5900: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DR_RESOURCES');
5901: fnd_msg_pub.add;
5902: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
5903: RAISE fnd_api.g_exc_error;
5904: ELSE
5934: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
5935: -- Unexpected Execution Error from call to Get_contracts_resources
5936: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
5937: fnd_message.set_token('P_PROC_NAME','SERVICE_SECURITY_CHECK');
5938: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DR_RESOURCES');
5939: fnd_msg_pub.add;
5940: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
5941: RAISE fnd_api.g_exc_error;
5942: ELSE
6336:
6337: -- Raise Workflow Event
6338: -- Workflow Test
6339: Begin
6340: jtf_assign_pub.g_assign_resources_tbl.delete;
6341: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
6342: jtf_am_wf_events_pub.assign_dr_resource
6343: (P_API_VERSION => 1.0,
6344: P_INIT_MSG_LIST => 'F',
6337: -- Raise Workflow Event
6338: -- Workflow Test
6339: Begin
6340: jtf_assign_pub.g_assign_resources_tbl.delete;
6341: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
6342: jtf_am_wf_events_pub.assign_dr_resource
6343: (P_API_VERSION => 1.0,
6344: P_INIT_MSG_LIST => 'F',
6345: P_COMMIT => 'F',
6361: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
6362: -- Unexpected Execution Error from call to assign_dr_resource
6363: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
6364: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
6365: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
6366: fnd_msg_pub.add;
6367:
6368: ELSE
6369: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
6365: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
6366: fnd_msg_pub.add;
6367:
6368: ELSE
6369: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
6370: END IF;
6371:
6372:
6373: Exception
6388: FROM dual;
6389:
6390: IF (JTF_USR_HKS.ok_to_execute
6391: (
6392: 'JTF_ASSIGN_PUB',
6393: 'GET_ASSIGN_DR_RESOURCES',
6394: 'W',
6395: 'W'
6396: )
6565:
6566:
6567: -- This parameter contains the Qualifier values for the
6568: -- Calling Document.
6569: -- p_opportunity_rec JTF_ASSIGN_PUB.
6570: -- JTF_Oppor_rec_type
6571: -- REQUIRED
6572:
6573:
6573:
6574: -- OUT : x_return_status OUT VARCHAR2(1)
6575: -- x_msg_count OUT NUMBER
6576: -- x_msg_data OUT VARCHAR2(2000)
6577: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
6578: -- AssignResources_tbl_type
6579:
6580:
6581: -- Version : Current version 1.0
6606: p_start_date IN DATE ,
6607: p_end_date IN DATE ,
6608: p_territory_flag IN VARCHAR2,
6609: p_calendar_flag IN VARCHAR2,
6610: p_opportunity_rec IN JTF_ASSIGN_PUB.JTF_Oppor_rec_type,
6611: p_business_process_id IN NUMBER,
6612: p_business_process_date IN DATE,
6613: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
6614: x_return_status OUT NOCOPY VARCHAR2,
6609: p_calendar_flag IN VARCHAR2,
6610: p_opportunity_rec IN JTF_ASSIGN_PUB.JTF_Oppor_rec_type,
6611: p_business_process_id IN NUMBER,
6612: p_business_process_date IN DATE,
6613: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
6614: x_return_status OUT NOCOPY VARCHAR2,
6615: x_msg_count OUT NOCOPY NUMBER,
6616: x_msg_data OUT NOCOPY VARCHAR2
6617: )
6675:
6676: l_value varchar2(100);
6677:
6678: l_count number := 0;
6679: l_temp_table JTF_ASSIGN_PUB.AssignResources_tbl_type;
6680:
6681: BEGIN
6682:
6683: SAVEPOINT get_assign_oppr_resources;
6959: p_effort_duration => l_effort_duration,
6960: p_effort_uom => l_effort_uom,
6961: p_planned_start_date => l_planned_start_date,
6962: p_planned_end_date => l_planned_end_date,
6963: p_continuous_task => jtf_assign_pub.g_continuous_work,
6964: x_return_status => x_return_status,
6965: x_msg_count => x_msg_count,
6966: x_msg_data => x_msg_data,
6967: x_assign_resources_tbl => x_assign_resources_tbl);
6972: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
6973: -- Unexpected Execution Error from call to Get_contracts_resources
6974: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
6975: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
6976: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_OPPR_RESOURCES');
6977: fnd_msg_pub.add;
6978: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
6979: RAISE fnd_api.g_exc_error;
6980: ELSE
7029:
7030: -- raise workfow event
7031: -- workflow test
7032: Begin
7033: jtf_assign_pub.g_assign_resources_tbl.delete;
7034: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
7035: jtf_am_wf_events_pub.assign_oppr_resource
7036: (P_API_VERSION => 1.0,
7037: P_INIT_MSG_LIST => 'F',
7030: -- raise workfow event
7031: -- workflow test
7032: Begin
7033: jtf_assign_pub.g_assign_resources_tbl.delete;
7034: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
7035: jtf_am_wf_events_pub.assign_oppr_resource
7036: (P_API_VERSION => 1.0,
7037: P_INIT_MSG_LIST => 'F',
7038: P_COMMIT => 'F',
7048: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
7049: -- Unexpected Execution Error from call to assign_sr_resource
7050: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
7051: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
7052: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_OPPR_RESOURCES');
7053: fnd_msg_pub.add;
7054:
7055: ELSE
7056: x_assign_resources_tbl.delete;
7053: fnd_msg_pub.add;
7054:
7055: ELSE
7056: x_assign_resources_tbl.delete;
7057: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
7058: END IF;
7059:
7060:
7061: Exception
7082: FROM dual;
7083:
7084: IF (JTF_USR_HKS.ok_to_execute
7085: (
7086: 'JTF_ASSIGN_PUB',
7087: 'GET_ASSIGN_OPPR_RESOURCES',
7088: 'W',
7089: 'W'
7090: )
7217: -- Parameters :
7218:
7219: -- IN : p_api_version IN NUMBER Required
7220: -- p_init_msg_list IN VARCHAR2 Optional
7221: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
7222: -- p_commit IN VARCHAR2 optional
7223: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
7224:
7225: -- Assignment Manager Specific Parameters
7219: -- IN : p_api_version IN NUMBER Required
7220: -- p_init_msg_list IN VARCHAR2 Optional
7221: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
7222: -- p_commit IN VARCHAR2 optional
7223: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
7224:
7225: -- Assignment Manager Specific Parameters
7226:
7227: -- This determines the Resource Type required by the
7264:
7265: -- OUT : x_return_status OUT VARCHAR2(1)
7266: -- x_msg_count OUT NUMBER
7267: -- x_msg_data OUT VARCHAR2(2000)
7268: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
7269: -- AssignResources_tbl_type
7270:
7271:
7272: -- Version : Current version 1.0
7301: p_lead_rec IN JTF_TERRITORY_PUB.JTF_Lead_BULK_rec_type,
7302: -- x_assign_resources_bulk_rec OUT NOCOPY JTF_TERRITORY_PUB.WINNING_BULK_REC_TYPE,
7303: p_business_process_id IN NUMBER,
7304: p_business_process_date IN DATE,
7305: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
7306: x_return_status OUT NOCOPY VARCHAR2,
7307: x_msg_count OUT NOCOPY NUMBER,
7308: x_msg_data OUT NOCOPY VARCHAR2
7309: )
7361:
7362: l_value varchar2(100);
7363:
7364: l_count number := 0;
7365: l_temp_table JTF_ASSIGN_PUB.AssignResources_tbl_type;
7366: BEGIN
7367:
7368: SAVEPOINT get_assign_lead_resources;
7369:
7547: p_effort_duration => l_effort_duration,
7548: p_effort_uom => l_effort_uom,
7549: p_planned_start_date => l_planned_start_date,
7550: p_planned_end_date => l_planned_end_date,
7551: p_continuous_task => jtf_assign_pub.g_continuous_work,
7552: x_return_status => x_return_status,
7553: x_msg_count => x_msg_count,
7554: x_msg_data => x_msg_data,
7555: x_assign_resources_tbl => x_assign_resources_tbl);
7560: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
7561: -- Unexpected Execution Error from call to Get_contracts_resources
7562: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
7563: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
7564: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_LEAD_RESOURCES');
7565: fnd_msg_pub.add;
7566: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
7567: RAISE fnd_api.g_exc_error;
7568: ELSE
7617:
7618: -- raise workfow event
7619: -- workflow test
7620: Begin
7621: jtf_assign_pub.g_assign_resources_tbl.delete;
7622: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
7623: jtf_am_wf_events_pub.assign_lead_resource
7624: (P_API_VERSION => 1.0,
7625: P_INIT_MSG_LIST => 'F',
7618: -- raise workfow event
7619: -- workflow test
7620: Begin
7621: jtf_assign_pub.g_assign_resources_tbl.delete;
7622: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
7623: jtf_am_wf_events_pub.assign_lead_resource
7624: (P_API_VERSION => 1.0,
7625: P_INIT_MSG_LIST => 'F',
7626: P_COMMIT => 'F',
7637: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
7638: -- Unexpected Execution Error from call to assign_sr_resource
7639: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
7640: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
7641: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_LEAD_RESOURCES');
7642: fnd_msg_pub.add;
7643:
7644: ELSE
7645: x_assign_resources_tbl.delete;
7642: fnd_msg_pub.add;
7643:
7644: ELSE
7645: x_assign_resources_tbl.delete;
7646: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
7647: END IF;
7648:
7649:
7650: Exception
7670: FROM dual;
7671:
7672: IF (JTF_USR_HKS.ok_to_execute
7673: (
7674: 'JTF_ASSIGN_PUB',
7675: 'GET_ASSIGN_LEAD_RESOURCES',
7676: 'W',
7677: 'W'
7678: )
7801: -- availability. This is when the calling doc is
7802: -- LEADS.
7803: -- This parameter contains the values of the Qualifiers
7804: -- defined for the Sales Leads.
7805: -- p_lead_rec JTF_ASSIGN_PUB.
7806: -- JTF_Lead_rec_type
7807: -- REQUIRED
7808:
7809: -- OUT : x_return_status OUT VARCHAR2(1)
7808:
7809: -- OUT : x_return_status OUT VARCHAR2(1)
7810: -- x_msg_count OUT NUMBER
7811: -- x_msg_data OUT VARCHAR2(2000)
7812: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
7813: -- AssignResources_tbl_type
7814:
7815:
7816: -- Version : Current version 1.0
7839: p_start_date IN DATE ,
7840: p_end_date IN DATE ,
7841: p_territory_flag IN VARCHAR2 ,
7842: p_calendar_flag IN VARCHAR2 ,
7843: p_lead_rec IN JTF_ASSIGN_PUB.JTF_Lead_rec_type,
7844: p_business_process_id IN NUMBER,
7845: p_business_process_date IN DATE,
7846: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
7847: x_return_status OUT NOCOPY VARCHAR2,
7842: p_calendar_flag IN VARCHAR2 ,
7843: p_lead_rec IN JTF_ASSIGN_PUB.JTF_Lead_rec_type,
7844: p_business_process_id IN NUMBER,
7845: p_business_process_date IN DATE,
7846: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
7847: x_return_status OUT NOCOPY VARCHAR2,
7848: x_msg_count OUT NOCOPY NUMBER,
7849: x_msg_data OUT NOCOPY VARCHAR2
7850: )
8229:
8230: -- raise workfow event
8231: -- workflow test
8232: Begin
8233: jtf_assign_pub.g_assign_resources_tbl.delete;
8234: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
8235: jtf_am_wf_events_pub.assign_lead_resource
8236: (P_API_VERSION => 1.0,
8237: P_INIT_MSG_LIST => 'F',
8230: -- raise workfow event
8231: -- workflow test
8232: Begin
8233: jtf_assign_pub.g_assign_resources_tbl.delete;
8234: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
8235: jtf_am_wf_events_pub.assign_lead_resource
8236: (P_API_VERSION => 1.0,
8237: P_INIT_MSG_LIST => 'F',
8238: P_COMMIT => 'F',
8249: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
8250: -- Unexpected Execution Error from call to assign_sr_resource
8251: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
8252: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
8253: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_LEAD_RESOURCES');
8254: fnd_msg_pub.add;
8255:
8256: ELSE
8257: x_assign_resources_tbl.delete;
8254: fnd_msg_pub.add;
8255:
8256: ELSE
8257: x_assign_resources_tbl.delete;
8258: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
8259: END IF;
8260:
8261:
8262: Exception
8282: FROM dual;
8283:
8284: IF (JTF_USR_HKS.ok_to_execute
8285: (
8286: 'JTF_ASSIGN_PUB',
8287: 'GET_ASSIGN_LEAD_RESOURCES',
8288: 'W',
8289: 'W'
8290: )
8421: -- Parameters :
8422:
8423: -- IN : p_api_version IN NUMBER Required
8424: -- p_init_msg_list IN VARCHAR2 Optional
8425: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
8426: -- p_commit IN VARCHAR2 optional
8427: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
8428:
8429: -- Assignment Manager Specific Parameters
8423: -- IN : p_api_version IN NUMBER Required
8424: -- p_init_msg_list IN VARCHAR2 Optional
8425: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
8426: -- p_commit IN VARCHAR2 optional
8427: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
8428:
8429: -- Assignment Manager Specific Parameters
8430:
8431: -- This determines the Resource Type required by the
8460:
8461:
8462: -- This parameter contains the values of the Qualifiers
8463: -- defined for the Accounts.
8464: -- p_account_rec JTF_ASSIGN_PUB.
8465: -- JTF_Account_rec_type
8466: -- REQUIRED
8467:
8468: -- OUT : x_return_status OUT VARCHAR2(1)
8467:
8468: -- OUT : x_return_status OUT VARCHAR2(1)
8469: -- x_msg_count OUT NUMBER
8470: -- x_msg_data OUT VARCHAR2(2000)
8471: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
8472: -- AssignResources_tbl_type
8473:
8474:
8475: -- Version : Current version 1.0
8501: p_start_date IN DATE ,
8502: p_end_date IN DATE ,
8503: p_territory_flag IN VARCHAR2,
8504: p_calendar_flag IN VARCHAR2 ,
8505: p_account_rec IN JTF_ASSIGN_PUB.JTF_Account_rec_type,
8506: p_business_process_id IN NUMBER,
8507: p_business_process_date IN DATE,
8508: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
8509: x_return_status OUT NOCOPY VARCHAR2,
8504: p_calendar_flag IN VARCHAR2 ,
8505: p_account_rec IN JTF_ASSIGN_PUB.JTF_Account_rec_type,
8506: p_business_process_id IN NUMBER,
8507: p_business_process_date IN DATE,
8508: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
8509: x_return_status OUT NOCOPY VARCHAR2,
8510: x_msg_count OUT NOCOPY NUMBER,
8511: x_msg_data OUT NOCOPY VARCHAR2
8512: )
8563:
8564: l_value varchar2(100);
8565:
8566: l_count number := 0;
8567: l_temp_table JTF_ASSIGN_PUB.AssignResources_tbl_type;
8568:
8569: BEGIN
8570:
8571: SAVEPOINT get_assign_account_resources;
8809: p_effort_duration => l_effort_duration,
8810: p_effort_uom => l_effort_uom,
8811: p_planned_start_date => l_planned_start_date,
8812: p_planned_end_date => l_planned_end_date,
8813: p_continuous_task => jtf_assign_pub.g_continuous_work,
8814: x_return_status => x_return_status,
8815: x_msg_count => x_msg_count,
8816: x_msg_data => x_msg_data,
8817: x_assign_resources_tbl => x_assign_resources_tbl);
8822: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
8823: -- Unexpected Execution Error from call to Get_contracts_resources
8824: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
8825: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
8826: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_ACCOUNT_RESOURCES');
8827: fnd_msg_pub.add;
8828: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
8829: RAISE fnd_api.g_exc_error;
8830: ELSE
8877:
8878: -- raise workfow event
8879: -- workflow test
8880: Begin
8881: jtf_assign_pub.g_assign_resources_tbl.delete;
8882: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
8883: jtf_am_wf_events_pub.assign_acc_resource
8884: (P_API_VERSION => 1.0,
8885: P_INIT_MSG_LIST => 'F',
8878: -- raise workfow event
8879: -- workflow test
8880: Begin
8881: jtf_assign_pub.g_assign_resources_tbl.delete;
8882: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
8883: jtf_am_wf_events_pub.assign_acc_resource
8884: (P_API_VERSION => 1.0,
8885: P_INIT_MSG_LIST => 'F',
8886: P_COMMIT => 'F',
8896: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
8897: -- Unexpected Execution Error from call to assign_sr_resource
8898: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
8899: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
8900: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_ACCOUNT_RESOURCES');
8901: fnd_msg_pub.add;
8902:
8903: ELSE
8904: x_assign_resources_tbl.delete;
8901: fnd_msg_pub.add;
8902:
8903: ELSE
8904: x_assign_resources_tbl.delete;
8905: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
8906: END IF;
8907:
8908:
8909: Exception
8930: FROM dual;
8931:
8932: IF (JTF_USR_HKS.ok_to_execute
8933: (
8934: 'JTF_ASSIGN_PUB',
8935: 'GET_ASSIGN_ACCOUNT_RESOURCES',
8936: 'W',
8937: 'W'
8938: )
9117:
9118: -- OUT : x_return_status OUT VARCHAR2(1)
9119: -- x_msg_count OUT NUMBER
9120: -- x_msg_data OUT VARCHAR2(2000)
9121: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
9122: -- AssignResources_tbl_type
9123:
9124:
9125: -- Version : Current version 1.0
9152: p_calendar_flag IN VARCHAR2,
9153: p_defect_rec IN JTF_TERRITORY_PUB.JTF_DEF_MGMT_rec_type,
9154: p_business_process_id IN NUMBER,
9155: p_business_process_date IN DATE,
9156: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
9157: x_return_status OUT NOCOPY VARCHAR2,
9158: x_msg_count OUT NOCOPY NUMBER,
9159: x_msg_data OUT NOCOPY VARCHAR2
9160: )
9360: p_effort_duration => p_effort_duration,
9361: p_effort_uom => p_effort_uom,
9362: p_planned_start_date => l_planned_start_date,
9363: p_planned_end_date => l_planned_end_date,
9364: p_continuous_task => jtf_assign_pub.g_continuous_work,
9365: x_return_status => x_return_status,
9366: x_msg_count => x_msg_count,
9367: x_msg_data => x_msg_data,
9368: x_assign_resources_tbl => x_assign_resources_tbl);
9373: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
9374: -- Unexpected Execution Error from call to Get_contracts_resources
9375: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
9376: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
9377: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_DEFECT_RESOURCES');
9378: fnd_msg_pub.add;
9379: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
9380: RAISE fnd_api.g_exc_error;
9381: ELSE
9507:
9508:
9509: -- This parameter contains the values of the Qualifiers
9510: -- defined for the Escalations.
9511: -- p_esc_tbl JTF_ASSIGN_PUB.
9512: -- Escalations_tbl_type
9513: -- REQUIRED
9514:
9515:
9515:
9516: -- OUT : x_return_status OUT VARCHAR2(1)
9517: -- x_msg_count OUT NUMBER
9518: -- x_msg_data OUT VARCHAR2(2000)
9519: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
9520: -- AssignResources_tbl_type
9521:
9522:
9523: -- Version : Current version 1.0
9549: p_end_date IN DATE ,
9550: p_territory_flag IN VARCHAR2 ,
9551: p_calendar_flag IN VARCHAR2 ,
9552: p_web_availability_flag IN VARCHAR2 ,
9553: p_esc_tbl IN JTF_ASSIGN_PUB.Escalations_tbl_type,
9554: p_business_process_id IN NUMBER,
9555: p_business_process_date IN DATE,
9556: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
9557: x_return_status OUT NOCOPY VARCHAR2,
9552: p_web_availability_flag IN VARCHAR2 ,
9553: p_esc_tbl IN JTF_ASSIGN_PUB.Escalations_tbl_type,
9554: p_business_process_id IN NUMBER,
9555: p_business_process_date IN DATE,
9556: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
9557: x_return_status OUT NOCOPY VARCHAR2,
9558: x_msg_count OUT NOCOPY NUMBER,
9559: x_msg_data OUT NOCOPY VARCHAR2
9560: )
9683:
9684: l_value varchar2(100);
9685:
9686: l_count number := 0;
9687: l_temp_table JTF_ASSIGN_PUB.AssignResources_tbl_type;
9688:
9689: BEGIN
9690:
9691: SAVEPOINT get_assign_esc_resources;
10099: p_planned_start_date => l_planned_start_date,
10100: p_planned_end_date => l_planned_end_date,
10101: p_breakdown => null,
10102: p_breakdown_uom => null,
10103: p_continuous_task => jtf_assign_pub.g_continuous_work,
10104: x_return_status => x_return_status,
10105: x_msg_count => x_msg_count,
10106: x_msg_data => x_msg_data,
10107: x_assign_resources_tbl => x_assign_resources_tbl);
10112: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
10113: -- Unexpected Execution Error from call to Get_contracts_resources
10114: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
10115: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
10116: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_ESC_RESOURCES');
10117: fnd_msg_pub.add;
10118: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
10119: RAISE fnd_api.g_exc_error;
10120: ELSE
10360:
10361: -- raise workfow event
10362: -- workflow test
10363: Begin
10364: jtf_assign_pub.g_assign_resources_tbl.delete;
10365: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
10366:
10367: IF (p_esc_tbl.count>0) THEN
10368:
10361: -- raise workfow event
10362: -- workflow test
10363: Begin
10364: jtf_assign_pub.g_assign_resources_tbl.delete;
10365: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
10366:
10367: IF (p_esc_tbl.count>0) THEN
10368:
10369: l_esc_count := p_esc_tbl.FIRST;
10386: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
10387: -- Unexpected Execution Error from call to assign_sr_resource
10388: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
10389: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
10390: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ESC_RESOURCES');
10391: fnd_msg_pub.add;
10392: ELSE
10393: x_assign_resources_tbl.delete;
10394: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
10390: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ESC_RESOURCES');
10391: fnd_msg_pub.add;
10392: ELSE
10393: x_assign_resources_tbl.delete;
10394: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
10395:
10396: END IF;
10397:
10398: l_esc_count := p_esc_tbl.NEXT(l_esc_count);
10416: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
10417: -- Unexpected Execution Error from call to assign_sr_resource
10418: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
10419: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
10420: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ESC_RESOURCES');
10421: fnd_msg_pub.add;
10422: ELSE
10423: x_assign_resources_tbl.delete;
10424: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
10420: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ESC_RESOURCES');
10421: fnd_msg_pub.add;
10422: ELSE
10423: x_assign_resources_tbl.delete;
10424: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
10425: END IF;
10426:
10427: END IF;
10428:
10452: FROM dual;
10453:
10454: IF (JTF_USR_HKS.ok_to_execute
10455: (
10456: 'JTF_ASSIGN_PUB',
10457: 'GET_ASSIGN_ESC_RESOURCES',
10458: 'W',
10459: 'W'
10460: )
10586: -- Parameters :
10587:
10588: -- IN : p_api_version IN NUMBER Required
10589: -- p_init_msg_list IN VARCHAR2 Optional
10590: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
10591: -- p_commit IN VARCHAR2 optional
10592: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
10593:
10594: -- Assignment Manager Specific Parameters
10588: -- IN : p_api_version IN NUMBER Required
10589: -- p_init_msg_list IN VARCHAR2 Optional
10590: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
10591: -- p_commit IN VARCHAR2 optional
10592: -- DEFAULT JTF_ASSIGN_PUB.AM_FALSE
10593:
10594: -- Assignment Manager Specific Parameters
10595:
10596: -- This determines the Resource, Resource Type
10666: -- p_column_list VARCHAR2
10667:
10668: -- These parameters contain the Qualifier Values for
10669: -- the Calling Document
10670: -- p_sr_rec JTF_ASSIGN_PUB.
10671: -- JTF_Serv_Req_rec_type
10672: -- p_sr_task_rec JTF_ASSIGN_PUB.
10673: -- JTF_Srv_Task_rec_type
10674: -- p_defect_rec JTF_ASSIGN_PUB.
10668: -- These parameters contain the Qualifier Values for
10669: -- the Calling Document
10670: -- p_sr_rec JTF_ASSIGN_PUB.
10671: -- JTF_Serv_Req_rec_type
10672: -- p_sr_task_rec JTF_ASSIGN_PUB.
10673: -- JTF_Srv_Task_rec_type
10674: -- p_defect_rec JTF_ASSIGN_PUB.
10675: -- JTF_Def_Mgmt_rec_type
10676:
10670: -- p_sr_rec JTF_ASSIGN_PUB.
10671: -- JTF_Serv_Req_rec_type
10672: -- p_sr_task_rec JTF_ASSIGN_PUB.
10673: -- JTF_Srv_Task_rec_type
10674: -- p_defect_rec JTF_ASSIGN_PUB.
10675: -- JTF_Def_Mgmt_rec_type
10676:
10677: -- OUT : x_return_status OUT VARCHAR2(1)
10678: -- x_msg_count OUT NUMBER
10676:
10677: -- OUT : x_return_status OUT VARCHAR2(1)
10678: -- x_msg_count OUT NUMBER
10679: -- x_msg_data OUT VARCHAR2(2000)
10680: -- x_assign_resources_tbl OUT JTF_ASSIGN_PUB.
10681: -- AssignResources_tbl_type
10682:
10683:
10684: -- Version : Current version 1.0
10724: p_problem_code IN VARCHAR2 ,
10725: p_calling_doc_id IN NUMBER,
10726: p_calling_doc_type IN VARCHAR2,
10727: p_column_list IN VARCHAR2 ,
10728: p_sr_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type ,
10729: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type ,
10730: p_defect_rec IN JTF_ASSIGN_PUB.JTF_Def_Mgmt_rec_type ,
10731: p_business_process_id IN NUMBER,
10732: p_business_process_date IN DATE,
10725: p_calling_doc_id IN NUMBER,
10726: p_calling_doc_type IN VARCHAR2,
10727: p_column_list IN VARCHAR2 ,
10728: p_sr_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type ,
10729: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type ,
10730: p_defect_rec IN JTF_ASSIGN_PUB.JTF_Def_Mgmt_rec_type ,
10731: p_business_process_id IN NUMBER,
10732: p_business_process_date IN DATE,
10733: p_filter_excluded_resource IN VARCHAR2,
10726: p_calling_doc_type IN VARCHAR2,
10727: p_column_list IN VARCHAR2 ,
10728: p_sr_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type ,
10729: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type ,
10730: p_defect_rec IN JTF_ASSIGN_PUB.JTF_Def_Mgmt_rec_type ,
10731: p_business_process_id IN NUMBER,
10732: p_business_process_date IN DATE,
10733: p_filter_excluded_resource IN VARCHAR2,
10734: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
10730: p_defect_rec IN JTF_ASSIGN_PUB.JTF_Def_Mgmt_rec_type ,
10731: p_business_process_id IN NUMBER,
10732: p_business_process_date IN DATE,
10733: p_filter_excluded_resource IN VARCHAR2,
10734: x_assign_resources_tbl OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type,
10735: x_return_status OUT NOCOPY VARCHAR2,
10736: x_msg_count OUT NOCOPY NUMBER,
10737: x_msg_data OUT NOCOPY VARCHAR2,
10738: --Added for Bug # 5386560
10777:
10778: l_sr_rec JTF_TERRITORY_PUB.JTF_Serv_Req_rec_type;
10779: l_sr_task_rec JTF_TERRITORY_PUB.JTF_Srv_Task_rec_type;
10780: l_defect_rec JTF_TERRITORY_PUB.JTF_Def_Mgmt_rec_type;
10781: l_assign_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
10782: t_assign_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type; --6453896
10783:
10784:
10785:
10778: l_sr_rec JTF_TERRITORY_PUB.JTF_Serv_Req_rec_type;
10779: l_sr_task_rec JTF_TERRITORY_PUB.JTF_Srv_Task_rec_type;
10780: l_defect_rec JTF_TERRITORY_PUB.JTF_Def_Mgmt_rec_type;
10781: l_assign_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
10782: t_assign_resources_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type; --6453896
10783:
10784:
10785:
10786: CURSOR cur_resource_type IS
10834: insert into test_values values(v);
10835: commit;
10836: end;*/
10837: BEGIN
10838: SAVEPOINT jtf_assign_pub;
10839:
10840: -- Started Assignment Manager Public API
10841:
10842:
11004: /**************** Start of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
11005:
11006: Terr_Qual_Dyn_Assign(p_sr_rec, p_sr_task_rec);
11007:
11008: l_sr_rec:=JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type;
11009: l_sr_task_rec:=JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type;
11010:
11011: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
11012: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=Null;
11005:
11006: Terr_Qual_Dyn_Assign(p_sr_rec, p_sr_task_rec);
11007:
11008: l_sr_rec:=JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type;
11009: l_sr_task_rec:=JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type;
11010:
11011: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
11012: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=Null;
11013:
11007:
11008: l_sr_rec:=JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type;
11009: l_sr_task_rec:=JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type;
11010:
11011: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
11012: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=Null;
11013:
11014: /**************** End of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
11015:
11008: l_sr_rec:=JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type;
11009: l_sr_task_rec:=JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type;
11010:
11011: JTF_ASSIGN_PUB.G_Terr_Serv_Req_Rec_Type:=Null;
11012: JTF_ASSIGN_PUB.G_Terr_Srv_Task_Rec_Type:=Null;
11013:
11014: /**************** End of addition by SBARAT on 11/01/2005 for Enh 4112155**************/
11015:
11016: l_sr_rec.SERVICE_REQUEST_ID := p_sr_rec.SERVICE_REQUEST_ID;
11277:
11278: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
11279: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
11280: fnd_message.set_token('P_PROC_NAME','GET_ASSIGN_SR_RESOURCES');
11281: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
11282: fnd_msg_pub.add;
11283: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
11284: RAISE fnd_api.g_exc_error;
11285: ELSE
11445:
11446: -- raise workfow event
11447: -- workflow test
11448: begin
11449: jtf_assign_pub.g_assign_resources_tbl.delete;
11450: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
11451: jtf_am_wf_events_pub.assign_sr_resource
11452: (P_API_VERSION => 1.0,
11453: P_INIT_MSG_LIST => 'F',
11446: -- raise workfow event
11447: -- workflow test
11448: begin
11449: jtf_assign_pub.g_assign_resources_tbl.delete;
11450: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
11451: jtf_am_wf_events_pub.assign_sr_resource
11452: (P_API_VERSION => 1.0,
11453: P_INIT_MSG_LIST => 'F',
11454: P_COMMIT => 'F',
11474: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
11475: -- Unexpected Execution Error from call to assign_sr_resource
11476: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
11477: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
11478: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
11479: fnd_msg_pub.add;
11480: /* Not raising the errors as req by tele service team
11481: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
11482: RAISE fnd_api.g_exc_error;
11484: RAISE fnd_api.g_exc_unexpected_error;
11485: END IF;
11486: */
11487: ELSE
11488: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
11489: END IF;
11490:
11491:
11492: exception
11550:
11551: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
11552: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
11553: fnd_message.set_token('P_PROC_NAME','GET_ASSIGN_TASK_RESOURCES');
11554: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
11555: fnd_msg_pub.add;
11556: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
11557: RAISE fnd_api.g_exc_error;
11558: ELSE
11738:
11739: -- raise workfow event
11740: -- workflow test
11741: Begin
11742: jtf_assign_pub.g_assign_resources_tbl.delete;
11743: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
11744: jtf_am_wf_events_pub.assign_task_resource
11745: (P_API_VERSION => 1.0,
11746: P_INIT_MSG_LIST => 'F',
11739: -- raise workfow event
11740: -- workflow test
11741: Begin
11742: jtf_assign_pub.g_assign_resources_tbl.delete;
11743: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
11744: jtf_am_wf_events_pub.assign_task_resource
11745: (P_API_VERSION => 1.0,
11746: P_INIT_MSG_LIST => 'F',
11747: P_COMMIT => 'F',
11760: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
11761: -- Unexpected Execution Error from call to assign_sr_resource
11762: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
11763: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
11764: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
11765: fnd_msg_pub.add;
11766:
11767: ELSE
11768: x_assign_resources_tbl.delete;
11765: fnd_msg_pub.add;
11766:
11767: ELSE
11768: x_assign_resources_tbl.delete;
11769: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
11770: END IF;
11771:
11772: Exception
11773: When OTHERS Then
11822:
11823: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
11824: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
11825: fnd_message.set_token('P_PROC_NAME','GET_ASSIGN_DEFECT_RESOURCES');
11826: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
11827: fnd_msg_pub.add;
11828: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
11829: RAISE fnd_api.g_exc_error;
11830: ELSE
11918:
11919: -- raise workfow event
11920: -- workflow test
11921: Begin
11922: jtf_assign_pub.g_assign_resources_tbl.delete;
11923: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
11924: jtf_am_wf_events_pub.assign_def_resource
11925: (P_API_VERSION => 1.0,
11926: P_INIT_MSG_LIST => 'F',
11919: -- raise workfow event
11920: -- workflow test
11921: Begin
11922: jtf_assign_pub.g_assign_resources_tbl.delete;
11923: jtf_assign_pub.g_assign_resources_tbl := x_assign_resources_tbl;
11924: jtf_am_wf_events_pub.assign_def_resource
11925: (P_API_VERSION => 1.0,
11926: P_INIT_MSG_LIST => 'F',
11927: P_COMMIT => 'F',
11940: IF NOT (l_wf_return_status = fnd_api.g_ret_sts_success) THEN
11941: -- Unexpected Execution Error from call to assign_sr_resource
11942: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
11943: fnd_message.set_token('P_PROC_NAME','JTF_AM_WF_EVENTS_PUB');
11944: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_RESOURCES');
11945: fnd_msg_pub.add;
11946:
11947: ELSE
11948: x_assign_resources_tbl.delete;
11945: fnd_msg_pub.add;
11946:
11947: ELSE
11948: x_assign_resources_tbl.delete;
11949: x_assign_resources_tbl := jtf_assign_pub.g_assign_resources_tbl;
11950: END IF;
11951:
11952:
11953: Exception
11971: FROM dual;
11972:
11973: IF (JTF_USR_HKS.ok_to_execute
11974: (
11975: 'JTF_ASSIGN_PUB',
11976: 'GET_ASSIGN_RESOURCES',
11977: 'W',
11978: 'W'
11979: )
12095: -- this is a procedure added on 2nd July 2002 to get the Excluded Resources for the AM UI
12096: -- when working in assisted Mode
12097: PROCEDURE GET_EXCLUDED_RESOURCES
12098: ( p_api_version IN NUMBER,
12099: p_init_msg_list IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12100: p_commit IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12101: p_contract_id IN NUMBER DEFAULT NULL,
12102: p_customer_product_id IN NUMBER DEFAULT NULL,
12103: p_calling_doc_id IN NUMBER,
12096: -- when working in assisted Mode
12097: PROCEDURE GET_EXCLUDED_RESOURCES
12098: ( p_api_version IN NUMBER,
12099: p_init_msg_list IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12100: p_commit IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12101: p_contract_id IN NUMBER DEFAULT NULL,
12102: p_customer_product_id IN NUMBER DEFAULT NULL,
12103: p_calling_doc_id IN NUMBER,
12104: p_calling_doc_type IN VARCHAR2,
12101: p_contract_id IN NUMBER DEFAULT NULL,
12102: p_customer_product_id IN NUMBER DEFAULT NULL,
12103: p_calling_doc_id IN NUMBER,
12104: p_calling_doc_type IN VARCHAR2,
12105: p_sr_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type DEFAULT pkg_sr_rec,
12106: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type DEFAULT pkg_sr_task_rec,
12107: p_dr_rec IN JTF_ASSIGN_PUB.JTF_DR_rec_type DEFAULT pkg_dr_rec, --Added by SBARAT on 01/11/2004 for Enh-3919046
12108: p_business_process_id IN NUMBER,
12109: p_business_process_date IN DATE,
12102: p_customer_product_id IN NUMBER DEFAULT NULL,
12103: p_calling_doc_id IN NUMBER,
12104: p_calling_doc_type IN VARCHAR2,
12105: p_sr_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type DEFAULT pkg_sr_rec,
12106: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type DEFAULT pkg_sr_task_rec,
12107: p_dr_rec IN JTF_ASSIGN_PUB.JTF_DR_rec_type DEFAULT pkg_dr_rec, --Added by SBARAT on 01/11/2004 for Enh-3919046
12108: p_business_process_id IN NUMBER,
12109: p_business_process_date IN DATE,
12110: x_excluded_resouurce_tbl OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
12103: p_calling_doc_id IN NUMBER,
12104: p_calling_doc_type IN VARCHAR2,
12105: p_sr_rec IN JTF_ASSIGN_PUB.JTF_Serv_Req_rec_type DEFAULT pkg_sr_rec,
12106: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type DEFAULT pkg_sr_task_rec,
12107: p_dr_rec IN JTF_ASSIGN_PUB.JTF_DR_rec_type DEFAULT pkg_dr_rec, --Added by SBARAT on 01/11/2004 for Enh-3919046
12108: p_business_process_id IN NUMBER,
12109: p_business_process_date IN DATE,
12110: x_excluded_resouurce_tbl OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
12111: x_return_status OUT NOCOPY VARCHAR2,
12106: p_sr_task_rec IN JTF_ASSIGN_PUB.JTF_Srv_Task_rec_type DEFAULT pkg_sr_task_rec,
12107: p_dr_rec IN JTF_ASSIGN_PUB.JTF_DR_rec_type DEFAULT pkg_dr_rec, --Added by SBARAT on 01/11/2004 for Enh-3919046
12108: p_business_process_id IN NUMBER,
12109: p_business_process_date IN DATE,
12110: x_excluded_resouurce_tbl OUT NOCOPY JTF_ASSIGN_PUB.excluded_tbl_type,
12111: x_return_status OUT NOCOPY VARCHAR2,
12112: x_msg_count OUT NOCOPY NUMBER,
12113: x_msg_data OUT NOCOPY VARCHAR2
12114: )
12118: l_api_name_1 VARCHAR2(60) := 'GET_EXCLUDED_RESOURCES';
12119: l_api_version NUMBER := 1.0;
12120:
12121: -- tables to habdle excluded resource feature
12122: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
12123: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
12124: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
12125:
12126: l_contract_id NUMBER := p_contract_id;
12119: l_api_version NUMBER := 1.0;
12120:
12121: -- tables to habdle excluded resource feature
12122: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
12123: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
12124: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
12125:
12126: l_contract_id NUMBER := p_contract_id;
12127: l_cp_id NUMBER := p_customer_product_id;
12120:
12121: -- tables to habdle excluded resource feature
12122: l_excluded_resource_tbl JTF_ASSIGN_PUB.excluded_tbl_type;
12123: l_contracts_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
12124: l_ib_tbl JTF_ASSIGN_PUB.AssignResources_tbl_type;
12125:
12126: l_contract_id NUMBER := p_contract_id;
12127: l_cp_id NUMBER := p_customer_product_id;
12128:
12294: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
12295: -- Unexpected Execution Error from call to Get_contracts_resources
12296: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
12297: fnd_message.set_token('P_PROC_NAME','GET_CONTRACTS_RESOURCES');
12298: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_SR_RESOURCES');
12299: fnd_msg_pub.add;
12300: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
12301: RAISE fnd_api.g_exc_error;
12302: ELSE
12328: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
12329: -- Unexpected Execution Error from call to Get_contracts_resources
12330: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
12331: fnd_message.set_token('P_PROC_NAME','GET_IB_RESOURCES');
12332: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_ASSIGN_TASK_RESOURCES');
12333: fnd_msg_pub.add;
12334: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
12335: RAISE fnd_api.g_exc_error;
12336: ELSE
12389: -- this is to be used only from AM UI to get the available slots for the resources fetched in
12390: -- Unassisted mode
12391: PROCEDURE GET_RESOURCE_AVAILABILITY
12392: ( p_api_version IN NUMBER,
12393: p_init_msg_list IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12394: p_commit IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12395: p_calendar_flag IN VARCHAR2,
12396: p_effort_duration IN NUMBER,
12397: p_effort_uom IN VARCHAR2,
12390: -- Unassisted mode
12391: PROCEDURE GET_RESOURCE_AVAILABILITY
12392: ( p_api_version IN NUMBER,
12393: p_init_msg_list IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12394: p_commit IN VARCHAR2 DEFAULT JTF_ASSIGN_PUB.AM_FALSE,
12395: p_calendar_flag IN VARCHAR2,
12396: p_effort_duration IN NUMBER,
12397: p_effort_uom IN VARCHAR2,
12398: p_breakdown IN NUMBER,
12402: p_continuous_task IN VARCHAR2 DEFAULT 'N',
12403: x_return_status IN OUT NOCOPY VARCHAR2,
12404: x_msg_count IN OUT NOCOPY NUMBER,
12405: x_msg_data IN OUT NOCOPY VARCHAR2,
12406: x_assign_resources_tbl IN OUT NOCOPY JTF_ASSIGN_PUB.AssignResources_tbl_type
12407: )
12408: IS
12409: l_return_status_1 VARCHAR2(10);
12410: l_api_name VARCHAR2(100) := 'GET_EXCLUDED_RESOURCES';
12442: p_breakdown => p_breakdown,
12443: p_breakdown_uom => p_breakdown_uom,
12444: p_planned_start_date => p_planned_start_date,
12445: p_planned_end_date => p_planned_end_date,
12446: p_continuous_task => jtf_assign_pub.g_continuous_work,
12447: x_return_status => x_return_status,
12448: x_msg_count => x_msg_count,
12449: x_msg_data => x_msg_data,
12450: x_assign_resources_tbl => x_assign_resources_tbl);
12455: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
12456: -- Unexpected Execution Error from call to Get_contracts_resources
12457: fnd_message.set_name('JTF', 'JTF_AM_GENERIC_API_ERROR');
12458: fnd_message.set_token('P_PROC_NAME','GET_AVAILABLE_RESOURCE');
12459: fnd_message.set_token('P_API_NAME','JTF_ASSIGN_PUB.GET_CONTRACTS_RESOURCES');
12460: fnd_msg_pub.add;
12461: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
12462: RAISE fnd_api.g_exc_error;
12463: ELSE
12508: );
12509:
12510: END GET_RESOURCE_AVAILABILITY;
12511:
12512: END JTF_ASSIGN_PUB;