[Home] [Help]
180: IS
181: l_proc VARCHAR2 (72);
182: l_resubmit VARCHAR2 (10) := hxc_timecard.c_no;
183: l_item_key wf_items.item_key%TYPE := NULL;
184: l_messages hxc_message_table_type := hxc_message_table_type();
185: l_timecard_props hxc_timecard_prop_table_type := hxc_timecard_prop_table_type();
186: l_timecard_index number;
187: l_message fnd_new_messages.message_text%type;
188: TC_APPROVAL_EXCEPTION EXCEPTION;
309: -----------------------------------------------------------------------------
310: PROCEDURE save_timecard (
311: p_blocks IN OUT NOCOPY hxc_block_table_type,
312: p_attributes IN OUT NOCOPY hxc_attribute_table_type,
313: p_messages IN OUT NOCOPY hxc_message_table_type,
314: p_timecard_id OUT NOCOPY hxc_time_building_blocks.time_building_block_id%TYPE,
315: p_timecard_ovn OUT NOCOPY hxc_time_building_blocks.object_version_number%TYPE
316: )
317: IS
346:
347: --This is done in the call to hxc_timecard_validation.deposit_validation
348: --hxc_time_category_utils_pkg.push_timecard (p_blocks, p_attributes);
349:
350: p_messages := hxc_message_table_type ();
351: hxc_timecard_block_utils.initialize_timecard_index;
352:
353: -- set savepoint
354: savepoint TC_SAVE_SAVEPOINT;
737: p_mode IN VARCHAR2,
738: p_retrieval_process IN hxc_retrieval_processes.NAME%TYPE,
739: p_blocks IN OUT NOCOPY hxc_block_table_type,
740: p_attributes IN OUT NOCOPY hxc_attribute_table_type,
741: p_messages IN OUT NOCOPY hxc_message_table_type,
742: p_timecard_id OUT NOCOPY hxc_time_building_blocks.time_building_block_id%TYPE,
743: p_timecard_ovn OUT NOCOPY hxc_time_building_blocks.object_version_number%TYPE
744: )
745: IS
773: BEGIN
774: fnd_msg_pub.initialize;
775: hxc_timecard_message_helper.initializeerrors;
776:
777: p_messages := hxc_message_table_type ();
778: hxc_timecard_block_utils.initialize_timecard_index;
779:
780: -- set savepoint
781: savepoint TC_SUB_SAVEPOINT ;
1928: -- Description: Private Function that will convert the new TYPE to the old
1929: -- PL/SQL message structure that is then returned.
1930: --
1931: -----------------------------------------------------------------------------
1932: FUNCTION convert_to_dpwr_messages (p_messages IN hxc_message_table_type)
1933: RETURN hxc_self_service_time_deposit.message_table
1934: IS
1935: l_proc VARCHAR2 (72);
1936: l_messages hxc_self_service_time_deposit.message_table;
1984: -----------------------------------------------------------------------------
1985: -- Type: Function
1986: -- Scope: Public
1987: -- Name: convert_msg_to_type
1988: -- Returns: hxc_message_table_type
1989: -- IN Parameters: p_messages -> The PL/SQL msg structure you want to convert
1990: --
1991: -- Description: Private Function that will convert the old PL/SQL message
1992: -- structure to the new TYPE that is then returned.
1994: -----------------------------------------------------------------------------
1995: FUNCTION convert_msg_to_type (
1996: p_messages IN hxc_self_service_time_deposit.message_table
1997: )
1998: RETURN hxc_message_table_type
1999: IS
2000: l_proc VARCHAR2 (72);
2001: l_messages hxc_message_table_type;
2002: l_index PLS_INTEGER;
1997: )
1998: RETURN hxc_message_table_type
1999: IS
2000: l_proc VARCHAR2 (72);
2001: l_messages hxc_message_table_type;
2002: l_index PLS_INTEGER;
2003: BEGIN
2004: IF g_debug
2005: THEN
2007: hr_utility.set_location ('Entering:' || l_proc, 10);
2008: END IF;
2009:
2010: -- Initialize the collection
2011: l_messages := hxc_message_table_type ();
2012: l_index := p_messages.FIRST;
2013:
2014: LOOP
2015: EXIT WHEN NOT p_messages.EXISTS (l_index);
3170: -- Description: This procedure will allow you to clear the Message PL/SQL Table
3171: --
3172: -----------------------------------------------------------------------------
3173: PROCEDURE clear_message_table (
3174: p_messages IN OUT NOCOPY hxc_message_table_type
3175: )
3176: IS
3177: l_proc VARCHAR2 (72);
3178: BEGIN
3208: --
3209: -----------------------------------------------------------------------------
3210: PROCEDURE request_lock (
3211: p_app_blocks IN hxc_block_table_type,
3212: p_messages IN OUT NOCOPY hxc_message_table_type,
3213: p_locked_success OUT NOCOPY BOOLEAN,
3214: p_row_lock_id OUT NOCOPY ROWID
3215: )
3216: IS
3279: --
3280: -----------------------------------------------------------------------------
3281: PROCEDURE release_lock (
3282: p_app_blocks IN hxc_block_table_type,
3283: p_messages IN OUT NOCOPY hxc_message_table_type,
3284: p_released_success OUT NOCOPY BOOLEAN,
3285: p_row_lock_id IN OUT NOCOPY ROWID
3286: )
3287: IS
3583: --
3584: -- This procedure is provided for debugging purposes.
3585: --
3586: -----------------------------------------------------------------------------
3587: PROCEDURE log_messages (p_messages IN hxc_message_table_type)
3588: IS
3589: l_proc VARCHAR2 (72);
3590: l_message fnd_new_messages.MESSAGE_TEXT%TYPE;
3591: i PLS_INTEGER;
3689: p_messages IN hxc_self_service_time_deposit.message_table
3690: )
3691: IS
3692: l_proc VARCHAR2 (72);
3693: l_messages hxc_message_table_type;
3694: BEGIN
3695: g_debug := hr_utility.debug_enabled;
3696:
3697: IF g_debug
3946: -----------------------------------------------------------------------------
3947: PROCEDURE get_past_future_limits (p_resource_id IN hxc_time_building_blocks.resource_id%TYPE,
3948: p_timecard_start_time IN date,
3949: p_timecard_stop_time IN date,
3950: p_messages IN OUT NOCOPY hxc_message_table_type)
3951: IS
3952: l_index BINARY_INTEGER;
3953: l_pref_table hxc_preference_evaluation.t_pref_table;
3954: l_num_past_days NUMBER;