[Home] [Help]
1: PACKAGE BODY hxc_timestore_deposit AS
2: /* $Header: hxctsdp.pkb 120.8.12020000.2 2012/11/08 09:45:56 asrajago ship $ */
3:
4: -- Global package name
5: g_package CONSTANT VARCHAR2 (33) := 'hxc_timestore_deposit.';
1: PACKAGE BODY hxc_timestore_deposit AS
2: /* $Header: hxctsdp.pkb 120.8.12020000.2 2012/11/08 09:45:56 asrajago ship $ */
3:
4: -- Global package name
5: g_package CONSTANT VARCHAR2 (33) := 'hxc_timestore_deposit.';
6: g_debug BOOLEAN := hr_utility.debug_enabled;
7:
8: PROCEDURE get_timecard_tables (
9: p_building_block_id IN hxc_time_building_blocks.time_building_block_id%TYPE,
13: p_app_attributes OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info
14: )
15: IS
16: BEGIN
17: hxc_timestore_deposit_util.get_timecard_tables (p_building_block_id,
18: p_deposit_process,
19: p_clear_mapping_cache,
20: p_app_blocks,
21: p_app_attributes
30: p_app_attributes OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info
31: )
32: IS
33: BEGIN
34: hxc_timestore_deposit_util.get_timecard_tables (p_building_block_id,
35: p_deposit_process,
36: p_clear_mapping_cache,
37: p_app_blocks,
38: p_app_attributes
210: hr_utility.set_location ('Entering:' || l_proc, 10);
211: END IF;
212:
213: l_blocks :=
214: hxc_timestore_deposit_util.convert_tbb_to_type
215: (p_blocks => p_app_blocks);
216: create_bb (p_time_building_block_id => p_time_building_block_id,
217: p_type => p_type,
218: p_measure => p_measure,
302:
303: -- We are starting with a new timecard so clear the global tables
304: hxc_self_service_time_deposit.initialize_globals;
305: -- Also clear the local PL/SQL table
306: hxc_timestore_deposit_util.clear_building_block_table
307: (p_app_blocks => p_app_blocks);
308: l_count_building_block := p_app_blocks.LAST;
309:
310: -- 'generate' a TBB ID
416: hr_utility.set_location ('Entering:' || l_proc, 10);
417: END IF;
418:
419: l_blocks :=
420: hxc_timestore_deposit_util.convert_tbb_to_type
421: (p_blocks => p_app_blocks);
422: -- Call overloaded procedure
423: create_timecard_bb (p_start_time => p_start_time,
424: p_stop_time => p_stop_time,
488: hr_utility.set_location ('Entering:' || l_proc, 10);
489: END IF;
490:
491: -- First find the TIMECARD TBB to which this DAY TBB belongs
492: hxc_timestore_deposit_util.find_parent_building_block
493: (p_start_time => p_day,
494: p_resource_id => p_resource_id,
495: p_resource_type => p_resource_type,
496: p_scope => hxc_timecard.c_timecard_scope,
556: hr_utility.set_location ('Entering:' || l_proc, 10);
557: END IF;
558:
559: l_blocks :=
560: hxc_timestore_deposit_util.convert_tbb_to_type
561: (p_blocks => p_app_blocks);
562: -- Call overloaded procedure
563: create_day_bb (p_day => p_day,
564: p_resource_id => p_resource_id,
644: -- First clear the global tables so no garbage gets loaded with the
645: -- updated TC
646: hxc_self_service_time_deposit.initialize_globals;
647: -- then get the TC and attributes out of the DB into the PL/SQL Tables
648: hxc_timestore_deposit_util.get_timecard_tables
649: (p_building_block_id => p_parent_building_block_id,
650: p_deposit_process => p_deposit_process,
651: p_app_blocks => p_app_blocks,
652: p_app_attributes => l_app_attributes
666: END IF;
667:
668: -- lets find the parent of this BB, we will use this to set some attributes = parents attributes
669: l_parent_building_block_index :=
670: hxc_timestore_deposit_util.get_index_in_bb_table
671: (p_bb_table => p_app_blocks,
672: p_bb_id_to_find => p_parent_building_block_id
673: );
674:
778: hr_utility.set_location ('Entering:' || l_proc, 10);
779: END IF;
780:
781: l_blocks :=
782: hxc_timestore_deposit_util.convert_tbb_to_type
783: (p_blocks => p_app_blocks);
784: -- Call overloaded procedure
785: create_day_bb
786: (p_day => p_day,
855: hr_utility.set_location ('Entering:' || l_proc, 10);
856: END IF;
857:
858: -- clear tables
859: hxc_timestore_deposit_util.clear_building_block_table
860: (p_app_blocks => p_app_blocks);
861: hxc_timestore_deposit_util.clear_attribute_table
862: (p_app_attributes => p_app_attributes);
863: hxc_timestore_deposit_util.find_current_period
857:
858: -- clear tables
859: hxc_timestore_deposit_util.clear_building_block_table
860: (p_app_blocks => p_app_blocks);
861: hxc_timestore_deposit_util.clear_attribute_table
862: (p_app_attributes => p_app_attributes);
863: hxc_timestore_deposit_util.find_current_period
864: (p_resource_id => p_resource_id,
865: p_resource_type => 'PERSON',
859: hxc_timestore_deposit_util.clear_building_block_table
860: (p_app_blocks => p_app_blocks);
861: hxc_timestore_deposit_util.clear_attribute_table
862: (p_app_attributes => p_app_attributes);
863: hxc_timestore_deposit_util.find_current_period
864: (p_resource_id => p_resource_id,
865: p_resource_type => 'PERSON',
866: p_day => p_day,
867: p_start_time => l_start_time,
993: -- First clear the global tables so no garbage gets loaded with the
994: -- updated TC
995: hxc_self_service_time_deposit.initialize_globals;
996: -- then get the TC and attributes out of the DB into the PL/SQL Tables
997: hxc_timestore_deposit_util.get_timecard_tables
998: (p_building_block_id => p_parent_building_block_id,
999: p_deposit_process => p_deposit_process,
1000: p_app_blocks => p_app_blocks,
1001: p_app_attributes => p_app_attributes
1040: END IF;
1041:
1042: -- lets find the parent of this BB, we will use this to set some attributes = parents attributes
1043: l_parent_building_block_index :=
1044: hxc_timestore_deposit_util.get_index_in_bb_table
1045: (p_bb_table => p_app_blocks,
1046: p_bb_id_to_find => p_parent_building_block_id
1047: );
1048: create_bb
1139: hr_utility.set_location ('Entering:' || l_proc, 10);
1140: END IF;
1141:
1142: l_blocks :=
1143: hxc_timestore_deposit_util.convert_tbb_to_type
1144: (p_blocks => p_app_blocks);
1145: create_detail_bb
1146: (p_type => p_type,
1147: p_measure => p_measure,
1229: hr_utility.set_location ('Entering:' || l_proc, 10);
1230: END IF;
1231:
1232: -- First find the DAY TBB to which this DETAIL TBB belongs
1233: hxc_timestore_deposit_util.find_parent_building_block
1234: (p_start_time => p_day,
1235: p_resource_id => p_resource_id,
1236: p_resource_type => p_resource_type,
1237: p_scope => hxc_timecard.c_day_scope,
1321: hr_utility.set_location ('Entering:' || l_proc, 10);
1322: END IF;
1323:
1324: l_blocks :=
1325: hxc_timestore_deposit_util.convert_tbb_to_type
1326: (p_blocks => p_app_blocks);
1327: create_time_entry (p_measure => p_measure,
1328: p_day => p_day,
1329: p_resource_id => p_resource_id,
1402: hr_utility.set_location ('Entering:' || l_proc, 10);
1403: END IF;
1404:
1405: -- First find the DAY TBB to which this DETAIL TBB belongs
1406: hxc_timestore_deposit_util.find_parent_building_block
1407: (p_start_time => p_start_time,
1408: p_resource_id => p_resource_id,
1409: p_resource_type => p_resource_type,
1410: p_scope => hxc_timecard.c_day_scope,
1494: hr_utility.set_location ('Entering:' || l_proc, 10);
1495: END IF;
1496:
1497: l_blocks :=
1498: hxc_timestore_deposit_util.convert_tbb_to_type
1499: (p_blocks => p_app_blocks);
1500: create_time_entry (p_start_time => p_start_time,
1501: p_stop_time => p_stop_time,
1502: p_resource_id => p_resource_id,
1578: l_proc := g_package || 'create_attribute';
1579: hr_utility.set_location ('Entering:' || l_proc, 10);
1580: END IF;
1581:
1582: hxc_timestore_deposit_util.get_bld_blk_info_type
1583: (p_attribute_name => p_attribute_name,
1584: p_deposit_process => p_deposit_process,
1585: p_bld_blk_info_type => l_bld_blk_info_type,
1586: p_segment => l_segment
1712: IF (p_app_blocks.COUNT <> 0)
1713: THEN
1714: -- check to see if you can find the BB in the loaded timecard
1715: l_building_block_index :=
1716: hxc_timestore_deposit_util.get_index_in_bb_table
1717: (p_bb_table => p_app_blocks,
1718: p_bb_id_to_find => p_building_block_id
1719: );
1720:
1736: -- First clear the global tables so no garbage gets loaded with the
1737: -- updated TC
1738: hxc_self_service_time_deposit.initialize_globals;
1739: -- then get the TC and attributes out of the DB into the PL/SQL Tables
1740: hxc_timestore_deposit_util.get_timecard_tables
1741: (p_building_block_id => p_building_block_id,
1742: -- p_time_recipient_id=> p_time_recipient_id,
1743: p_deposit_process => p_deposit_process,
1744: p_app_blocks => p_app_blocks,
1745: p_app_attributes => p_app_attributes
1746: );
1747: -- now find where in the p_app_blocks table our TBB is situated
1748: l_building_block_index :=
1749: hxc_timestore_deposit_util.get_index_in_bb_table
1750: (p_bb_table => p_app_blocks,
1751: p_bb_id_to_find => p_building_block_id
1752: );
1753:
1856: hr_utility.set_location ('Entering:' || l_proc, 10);
1857: END IF;
1858:
1859: l_blocks :=
1860: hxc_timestore_deposit_util.convert_tbb_to_type
1861: (p_blocks => p_app_blocks);
1862: update_building_block (p_building_block_id => p_building_block_id,
1863: p_measure => p_measure,
1864: p_unit_of_measure => p_unit_of_measure,
1924:
1925: -- First clear the global tables so no garbage gets loaded with the updated TC
1926: hxc_self_service_time_deposit.initialize_globals;
1927: -- then get the TC and attributes out of the DB into the PL/SQL Tables
1928: hxc_timestore_deposit_util.get_timecard_tables
1929: (p_building_block_id => p_building_block_id,
1930: -- p_time_recipient_id=> p_time_recipient_id,
1931: p_deposit_process => p_deposit_process,
1932: p_app_blocks => p_app_blocks,
1933: p_app_attributes => p_app_attributes
1934: );
1935: -- now find where in the p_app_blocks table our TBB is situated
1936: l_building_block_index :=
1937: hxc_timestore_deposit_util.get_index_in_bb_table
1938: (p_bb_table => p_app_blocks,
1939: p_bb_id_to_find => p_building_block_id
1940: );
1941: -- Set the date_to of the TBB to the sysdate, that will 'delete' the TBB
1991: hr_utility.set_location ('Entering:' || l_proc, 10);
1992: END IF;
1993:
1994: l_blocks :=
1995: hxc_timestore_deposit_util.convert_tbb_to_type
1996: (p_blocks => p_app_blocks);
1997: delete_detail_bb (p_building_block_id => p_building_block_id,
1998: -- p_time_recipient_id => p_time_recipient_id,
1999: p_deposit_process => p_deposit_process,
2057: l_proc := g_package || 'delete_timecard';
2058: hr_utility.set_location ('Entering:' || l_proc, 10);
2059: END IF;
2060:
2061: IF (NOT hxc_timestore_deposit_util.cla_enabled
2062: (p_building_block_id => p_building_block_id)
2063: )
2064: THEN
2065: hxc_timecard.delete_timecard (p_mode => p_mode,
2138: IF (p_app_attributes.COUNT <> 0)
2139: THEN
2140: -- check to see if you can find the attribute in the loaded timecard
2141: l_attribute_index :=
2142: hxc_timestore_deposit_util.get_index_in_attr_table
2143: (p_attr_table => p_app_attributes,
2144: p_attr_id_to_find => p_time_attribute_id,
2145: p_attribute_name_to_find => p_attribute_name
2146: );
2177: -- as only the mapping components for non-null attribute values are created
2178: -- and we may be creating a new attribute, or updating a null attribute
2179: -- in this procedure. Thus, we should regenerate the app attribute
2180: -- mapping cache for deposit and validation.
2181: hxc_timestore_deposit_util.get_timecard_tables
2182: (p_building_block_id => l_tbb_id,
2183: -- p_app_attributes (l_attribute_index).building_block_id,
2184: -- p_time_recipient_id=> p_time_recipient_id,
2185: p_deposit_process => p_deposit_process,
2188: p_app_attributes => p_app_attributes
2189: );
2190: -- Now locate our attribute in the PL/SQL table
2191: l_attribute_index :=
2192: hxc_timestore_deposit_util.get_index_in_attr_table
2193: (p_attr_table => p_app_attributes,
2194: p_attr_id_to_find => p_time_attribute_id,
2195: p_attribute_name_to_find => p_attribute_name
2196: );
2288: hr_utility.set_location ('Entering:' || l_proc, 10);
2289: END IF;
2290:
2291: l_blocks :=
2292: hxc_timestore_deposit_util.convert_tbb_to_type
2293: (p_blocks => p_app_blocks);
2294: update_attribute (p_time_attribute_id => p_time_attribute_id,
2295: -- p_building_block_id => p_building_block_id,
2296: p_attribute_name => p_attribute_name,
2377: -- assign p_validate in global variable.
2378: g_validate := p_validate;
2379:
2380: -- take out a lock on the period
2381: hxc_timestore_deposit_util.request_lock
2382: (p_app_blocks => p_app_blocks,
2383: p_messages => p_messages,
2384: p_locked_success => l_locked_success,
2385: p_row_lock_id => l_row_lock_id
2404:
2405: IF (p_mode = c_migration)
2406: THEN
2407: l_approval_style_id :=
2408: hxc_timestore_deposit_util.approval_style_id
2409: (p_approval_style_name => c_auto_approve_name);
2410: ELSE -- from the employee's preference
2411: IF ( (p_approve_term_emps_on_submit)
2412: AND (hxc_preference_evaluation.employment_ended
2418: )
2419: )
2420: THEN
2421: l_approval_style_id :=
2422: hxc_timestore_deposit_util.approval_style_id
2423: (p_approval_style_name => c_approval_on_submit_name);
2424: ELSE
2425: l_approval_style_id :=
2426: hxc_preference_evaluation.resource_preferences
2449:
2450: LOOP
2451: EXIT WHEN (NOT p_app_blocks.EXISTS (l_building_block_count));
2452: p_app_blocks (l_building_block_count).approval_status :=
2453: hxc_timestore_deposit_util.get_approval_status (p_mode);
2454:
2455: -- In case of MIGRATION we just override what that user passes in as
2456: -- approval style (we set it to Auto Approve regardless), in all other
2457: -- cases we never override, only if nothing is provided we put
2471: p_app_blocks.NEXT (l_building_block_count);
2472: END LOOP;
2473:
2474: -- convert the app_attributes into attributes that the DPWR understands
2475: hxc_timestore_deposit_util.convert_app_attributes_to_type
2476: (p_attributes => l_attributes,
2477: p_app_attributes => p_app_attributes
2478: );
2479:
2493:
2494: -- perform the deposit using NEW DPWR
2495: IF (p_mode = hxc_timecard.c_save)
2496: THEN
2497: hxc_timestore_deposit_util.save_timecard
2498: (p_blocks => p_app_blocks,
2499: p_attributes => l_attributes,
2500: p_messages => p_messages,
2501: p_timecard_id => p_timecard_id,
2502: p_timecard_ovn => p_timecard_ovn
2503: );
2504: ELSIF (p_mode = hxc_timecard.c_submit)
2505: THEN
2506: hxc_timestore_deposit_util.submit_timecard
2507: (p_item_type => p_item_type,
2508: p_approval_prc => p_approval_prc,
2509: p_template => p_template,
2510: p_mode => p_mode,
2533: ELSIF (p_mode = c_migration)
2534: THEN
2535: IF (p_retrieval_process IS NOT NULL)
2536: THEN
2537: hxc_timestore_deposit_util.submit_timecard
2538: (p_item_type => 'HXCEMP',
2539: p_approval_prc => 'HXC_APPROVAL',
2540: p_template => p_template,
2541: p_mode => p_mode,
2551: fnd_msg_pub.ADD;
2552: END IF;
2553: END IF;
2554:
2555: hxc_timestore_deposit_util.release_lock
2556: (p_app_blocks => p_app_blocks,
2557: p_messages => p_messages,
2558: p_released_success => l_released_success,
2559: p_row_lock_id => l_row_lock_id
2569: -- their wrappers as below.
2570: IF (p_mode <> c_migration)
2571: THEN
2572: -- Finished, clean up
2573: hxc_timestore_deposit_util.clear_building_block_table
2574: (p_app_blocks => p_app_blocks);
2575: hxc_timestore_deposit_util.clear_attribute_table
2576: (p_app_attributes => p_app_attributes);
2577: -- We don't really wanna clear this as the user might want to read them.
2571: THEN
2572: -- Finished, clean up
2573: hxc_timestore_deposit_util.clear_building_block_table
2574: (p_app_blocks => p_app_blocks);
2575: hxc_timestore_deposit_util.clear_attribute_table
2576: (p_app_attributes => p_app_attributes);
2577: -- We don't really wanna clear this as the user might want to read them.
2578: -- clear_message_table (p_messages => p_messages);
2579: END IF;
2604: END IF;
2605: WHEN OTHERS
2606: THEN
2607: -- make sure we release the lock
2608: hxc_timestore_deposit_util.release_lock
2609: (p_app_blocks => p_app_blocks,
2610: p_messages => p_messages,
2611: p_released_success => l_released_success,
2612: p_row_lock_id => l_row_lock_id
2663: hr_utility.set_location ('Entering:' || l_proc, 10);
2664: END IF;
2665:
2666: l_blocks :=
2667: hxc_timestore_deposit_util.convert_tbb_to_type
2668: (p_blocks => p_app_blocks);
2669: execute_deposit_process
2670: (p_validate => p_validate,
2671: p_mode => p_mode,
2685: );
2686: p_app_blocks :=
2687: hxc_timecard_block_utils.convert_to_dpwr_blocks (p_blocks => l_blocks);
2688: p_messages :=
2689: hxc_timestore_deposit_util.convert_to_dpwr_messages
2690: (p_messages => l_messages);
2691:
2692: IF g_debug
2693: THEN
2699: p_app_blocks IN OUT NOCOPY hxc_block_table_type
2700: )
2701: IS
2702: BEGIN
2703: hxc_timestore_deposit_util.clear_building_block_table (p_app_blocks);
2704: END clear_building_block_table;
2705:
2706: PROCEDURE clear_attribute_table (
2707: p_app_attributes IN OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info
2707: p_app_attributes IN OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info
2708: )
2709: IS
2710: BEGIN
2711: hxc_timestore_deposit_util.clear_attribute_table (p_app_attributes);
2712: END clear_attribute_table;
2713:
2714: PROCEDURE clear_message_table (
2715: p_messages IN OUT NOCOPY hxc_message_table_type
2715: p_messages IN OUT NOCOPY hxc_message_table_type
2716: )
2717: IS
2718: BEGIN
2719: hxc_timestore_deposit_util.clear_message_table (p_messages);
2720: END clear_message_table;
2721:
2722: PROCEDURE log_timecard (
2723: p_app_blocks IN hxc_block_table_type,
2724: p_app_attributes IN hxc_self_service_time_deposit.app_attributes_info
2725: )
2726: IS
2727: BEGIN
2728: hxc_timestore_deposit_util.log_timecard (p_app_blocks,
2729: p_app_attributes);
2730: END log_timecard;
2731:
2732: PROCEDURE log_timecard (
2734: p_app_attributes IN hxc_self_service_time_deposit.app_attributes_info
2735: )
2736: IS
2737: BEGIN
2738: hxc_timestore_deposit_util.log_timecard (p_app_blocks,
2739: p_app_attributes);
2740: END log_timecard;
2741:
2742: PROCEDURE log_messages (p_messages IN hxc_message_table_type)
2741:
2742: PROCEDURE log_messages (p_messages IN hxc_message_table_type)
2743: IS
2744: BEGIN
2745: hxc_timestore_deposit_util.log_messages (p_messages);
2746: END log_messages;
2747:
2748: PROCEDURE log_messages (
2749: p_messages IN hxc_self_service_time_deposit.message_table
2749: p_messages IN hxc_self_service_time_deposit.message_table
2750: )
2751: IS
2752: BEGIN
2753: hxc_timestore_deposit_util.log_messages (p_messages);
2754: END log_messages;
2755: END hxc_timestore_deposit;
2751: IS
2752: BEGIN
2753: hxc_timestore_deposit_util.log_messages (p_messages);
2754: END log_messages;
2755: END hxc_timestore_deposit;