DBA Data[Home] [Help]

APPS.CSF_RESOURCE_PUB dependencies on CSF_RESOURCE

Line 1: PACKAGE BODY CSF_RESOURCE_PUB AS

1: PACKAGE BODY CSF_RESOURCE_PUB AS
2: /* $Header: CSFPRESB.pls 120.58 2011/04/26 10:09:38 vakulkar ship $ */
3:
4: g_pkg_name CONSTANT VARCHAR2(30) := 'CSF_RESOURCE_PUB';
5: g_assign_doc_type CONSTANT VARCHAR2(2) := 'SR';

Line 4: g_pkg_name CONSTANT VARCHAR2(30) := 'CSF_RESOURCE_PUB';

1: PACKAGE BODY CSF_RESOURCE_PUB AS
2: /* $Header: CSFPRESB.pls 120.58 2011/04/26 10:09:38 vakulkar ship $ */
3:
4: g_pkg_name CONSTANT VARCHAR2(30) := 'CSF_RESOURCE_PUB';
5: g_assign_doc_type CONSTANT VARCHAR2(2) := 'SR';
6: g_earth_radius CONSTANT NUMBER := 6378137;
7: g_pi CONSTANT NUMBER := 2 * ACOS(0);
8: g_res_add_prof VARCHAR2(200);

Line 49: , address csf_resource_address_pvt.address_rec_type

45: resource_id NUMBER
46: , resource_type jtf_objects_b.object_code%TYPE
47: , resource_name jtf_rs_resource_extns_tl.resource_name%TYPE
48: , resource_number jtf_rs_resource_extns.resource_number%TYPE
49: , address csf_resource_address_pvt.address_rec_type
50: );
51:
52: /**
53: * PLSQL Index By Table Type to contain information about many Resources

Line 64: fnd_log.string(p_level, 'csf.plsql.CSF_RESOURCE_PUB.' || p_module, p_message);

60:
61: PROCEDURE debug(p_level NUMBER, p_module VARCHAR2, p_message VARCHAR2) IS
62: BEGIN
63: IF g_debug = 'Y' AND p_level >= g_debug_level THEN
64: fnd_log.string(p_level, 'csf.plsql.CSF_RESOURCE_PUB.' || p_module, p_message);
65: END IF;
66: END debug;
67:
68: /**

Line 781: FROM csf_resource_skills_b rs

777: , p_end
778: ) winend
779: , COUNT(*) count_of_matching_skills
780: , SUM( 1/rsl.step_value ) skill_level
781: FROM csf_resource_skills_b rs
782: , csf_required_skills_b ts
783: , csf_skill_levels_b rsl
784: , csf_skill_levels_b tsl
785: , csf_skills_b ss

Line 833: FROM csf_resource_skills_b rs2

829: AND mic.inventory_item_id = ts.skill_id
830: AND mic.category_set_id = fnd_profile.VALUE('CS_SR_DEFAULT_CATEGORY_SET')
831: AND mic.category_id = ts2.skill_id)
832: AND NOT EXISTS (SELECT 1
833: FROM csf_resource_skills_b rs2
834: WHERE TRUNC(rs2.start_date_active) < p_end
835: AND (TRUNC(rs2.end_date_active + 1) > p_start OR rs2.end_date_active IS NULL)
836: AND rs2.resource_id = rs.resource_id
837: AND rs2.skill_id = ts.skill_id

Line 901: l_res_dist_tbl csf_resource_tbl;

897: l_return_status VARCHAR2(1);
898: l_msg_count NUMBER;
899: l_msg_data VARCHAR2(2000);
900: l_sorted_res_tbl jtf_assign_pub.assignresources_tbl_type;
901: l_res_dist_tbl csf_resource_tbl;
902: i PLS_INTEGER;
903: j PLS_INTEGER;
904: l_pref_res_cnt PLS_INTEGER;
905: l_address csf_resource_address_pvt.address_rec_type;

Line 905: l_address csf_resource_address_pvt.address_rec_type;

901: l_res_dist_tbl csf_resource_tbl;
902: i PLS_INTEGER;
903: j PLS_INTEGER;
904: l_pref_res_cnt PLS_INTEGER;
905: l_address csf_resource_address_pvt.address_rec_type;
906: l_geometry MDSYS.SDO_GEOMETRY;
907: l_task_lat NUMBER;
908: l_task_lon NUMBER;
909: l_res_lat NUMBER;

Line 924: FROM TABLE(CAST(l_res_dist_tbl AS csf_resource_tbl) )

920:
921: CURSOR c_sorted_resources IS
922: SELECT resource_index
923: , distance
924: FROM TABLE(CAST(l_res_dist_tbl AS csf_resource_tbl) )
925: ORDER BY preferred_resource_flag desc, distance, resource_index;
926: BEGIN
927: -- Validate the Geometry of the Task.
928: -- If Task has no or invalid geometry, no need to sort by distance at all

Line 964: l_res_dist_tbl := csf_resource_tbl();

960: l_task_lon := -9999;
961: l_task_lat := -9999;
962: END IF;
963:
964: l_res_dist_tbl := csf_resource_tbl();
965: i := p_unsorted_res_tbl.FIRST;
966: l_pref_res_cnt := 1;
967: WHILE i IS NOT NULL LOOP
968: l_res_position := get_location(p_unsorted_res_tbl(i).resource_id, p_unsorted_res_tbl(i).resource_type, p_start);

Line 978: csf_resource(

974: END IF;
975:
976: l_res_dist_tbl.EXTEND;
977: l_res_dist_tbl(i) :=
978: csf_resource(
979: 'N'
980: , i
981: , l_distance
982: , NULL

Line 1887: , x_res_tbl OUT NOCOPY csf_resource_tbl

1883: , p_contracts_flag IN VARCHAR2 DEFAULT NULL
1884: , p_ib_flag IN VARCHAR2 DEFAULT NULL
1885: , p_territory_flag IN VARCHAR2 DEFAULT NULL
1886: , p_skill_flag IN VARCHAR2 DEFAULT NULL
1887: , x_res_tbl OUT NOCOPY csf_resource_tbl
1888: ) IS
1889: l_api_name CONSTANT VARCHAR2(30) := 'GET_RESOURCES_TO_SCHEDULE(3)';
1890: l_api_version CONSTANT NUMBER := 1.0;
1891:

Line 1914: , TABLE( CAST( x_res_tbl AS csf_resource_tbl ) ) tr

1910: , t.name terr_name
1911: , tr.resource_index
1912: FROM jtf_rs_all_resources_vl r
1913: , jtf_terr_all t
1914: , TABLE( CAST( x_res_tbl AS csf_resource_tbl ) ) tr
1915: WHERE r.resource_id = tr.resource_id
1916: AND r.resource_type = tr.resource_type
1917: AND t.terr_id (+) = tr.terr_id;
1918: BEGIN

Line 1958: x_res_tbl := csf_resource_tbl();

1954:
1955:
1956:
1957: IF x_res_tbl IS NULL THEN
1958: x_res_tbl := csf_resource_tbl();
1959: END IF;
1960:
1961: --start with an empty table so that previous value are deleted
1962: x_res_tbl.delete;

Line 1972: csf_resource(

1968: WHILE j IS NOT NULL LOOP
1969: x_res_tbl.EXTEND;
1970: k := x_res_tbl.LAST;
1971: x_res_tbl(k) :=
1972: csf_resource(
1973: k
1974: , l_assign_resource_tbl(j).resource_id
1975: , l_assign_resource_tbl(j).resource_type
1976: , NULL

Line 2034: ) RETURN csf_resource_tbl IS

2030: , p_contracts_flag IN VARCHAR2 DEFAULT NULL
2031: , p_ib_flag IN VARCHAR2 DEFAULT NULL
2032: , p_territory_flag IN VARCHAR2 DEFAULT NULL
2033: , p_skill_flag IN VARCHAR2 DEFAULT NULL
2034: ) RETURN csf_resource_tbl IS
2035: PRAGMA autonomous_transaction;
2036: --
2037: l_return_status VARCHAR2(1);
2038: l_msg_data VARCHAR2(2000);

Line 2040: l_res_tbl csf_resource_tbl;

2036: --
2037: l_return_status VARCHAR2(1);
2038: l_msg_data VARCHAR2(2000);
2039: l_msg_count NUMBER;
2040: l_res_tbl csf_resource_tbl;
2041: BEGIN
2042: get_resources_to_schedule(
2043: p_api_version => 1.0
2044: , p_init_msg_list => fnd_api.g_true

Line 2068: RETURN csf_resource_tbl IS

2064: , p_ib_flag IN VARCHAR2 DEFAULT NULL
2065: , p_territory_flag IN VARCHAR2 DEFAULT NULL
2066: , p_skill_flag IN VARCHAR2 DEFAULT NULL
2067: )
2068: RETURN csf_resource_tbl IS
2069: l_res_tbl csf_resource_tbl;
2070: BEGIN
2071: l_res_tbl :=
2072: get_resources_to_schedule_pvt(

Line 2069: l_res_tbl csf_resource_tbl;

2065: , p_territory_flag IN VARCHAR2 DEFAULT NULL
2066: , p_skill_flag IN VARCHAR2 DEFAULT NULL
2067: )
2068: RETURN csf_resource_tbl IS
2069: l_res_tbl csf_resource_tbl;
2070: BEGIN
2071: l_res_tbl :=
2072: get_resources_to_schedule_pvt(
2073: p_task_id => p_task_id

Line 2237: csf_resource_address_pvt.get_resource_address(

2233: IF l_res_cache_info.address.party_site_id IS NULL
2234: OR TRUNC(p_date) < l_res_cache_info.address.start_date_active
2235: OR TRUNC(p_date) > NVL(l_res_cache_info.address.end_date_active, p_date + 1)
2236: THEN
2237: csf_resource_address_pvt.get_resource_address(
2238: p_api_version => 1.0
2239: , x_return_status => l_return_status
2240: , x_msg_count => l_msg_count
2241: , x_msg_data => l_msg_data

Line 2317: RETURN csf_resource_address_pvt.address_rec_type IS

2313: , p_res_type VARCHAR2
2314: , p_date DATE
2315: , p_res_shift_add VARCHAR2 DEFAULT NULL
2316: )
2317: RETURN csf_resource_address_pvt.address_rec_type IS
2318: BEGIN
2319: G_RES_ADD_PROF := p_res_shift_add;
2320:
2321: RETURN get_resource_from_cache(p_res_id, p_res_type, TRUE, p_date).address;

Line 2620: l_address csf_resource_address_pvt.address_rec_type;

2616: , x_address OUT NOCOPY VARCHAR2
2617: , x_device_tag OUT NOCOPY VARCHAR2
2618: , x_status_code_meaning OUT NOCOPY VARCHAR2
2619: ) IS
2620: l_address csf_resource_address_pvt.address_rec_type;
2621: l_geometry MDSYS.SDO_GEOMETRY;
2622: l_res_lat NUMBER;
2623: l_res_lon NUMBER;
2624: l_valid_geo VARCHAR2(5);

Line 2921: END csf_resource_pub;

2917: END get_third_party_role;
2918:
2919: BEGIN
2920: init_assign_errors;
2921: END csf_resource_pub;