[Home] [Help]
1: Package Body hxc_timecard AS
2: /* $Header: hxctimecard.pkb 120.39 2012/01/03 13:24:49 bbayragi ship $ */
3:
4: type attribute_list is table of number index by binary_integer;
5:
4: type attribute_list is table of number index by binary_integer;
5:
6: attribute_id_list attribute_list;
7:
8: g_package varchar2(12) := 'HXC_TIMECARD';
9: g_debug boolean := hr_utility.debug_enabled;
10: g_deposit_blocks hxc_block_table_type;
11: g_deposit_attributes hxc_attribute_table_type;
12: g_audit_messages hxc_message_table_type;
23: l_proc varchar2(31) := g_package||'.alias_translation';
24:
25: Begin
26:
27: hxc_timecard_attribute_utils.set_bld_blk_info_type_id(p_attributes);
28:
29: HXC_ALIAS_TRANSLATOR.DO_DEPOSIT_TRANSLATION
30: (p_attributes => p_attributes
31: ,p_messages => p_messages
134:
135: Procedure save_timecard
136: (p_blocks in out nocopy HXC_BLOCK_TABLE_TYPE
137: ,p_attributes in out nocopy HXC_ATTRIBUTE_TABLE_TYPE
138: ,p_timecard_props in HXC_TIMECARD_PROP_TABLE_TYPE
139: ,p_messages in out nocopy HXC_MESSAGE_TABLE_TYPE
140: ,p_timecard_id out nocopy hxc_time_building_blocks.time_building_block_id%type
141: ,p_timecard_ovn out nocopy hxc_time_building_blocks.object_version_number%type
142: ,p_resubmit in varchar2
141: ,p_timecard_ovn out nocopy hxc_time_building_blocks.object_version_number%type
142: ,p_resubmit in varchar2
143: ) is
144:
145: l_timecard_blocks hxc_timecard.block_list;
146: l_day_blocks hxc_timecard.block_list;
147: l_detail_blocks hxc_timecard.block_list;
148: l_transaction_info hxc_timecard.transaction_info;
149: l_proc varchar2(33) := g_package||'.save_timecard';
142: ,p_resubmit in varchar2
143: ) is
144:
145: l_timecard_blocks hxc_timecard.block_list;
146: l_day_blocks hxc_timecard.block_list;
147: l_detail_blocks hxc_timecard.block_list;
148: l_transaction_info hxc_timecard.transaction_info;
149: l_proc varchar2(33) := g_package||'.save_timecard';
150: l_old_style_blks hxc_self_service_time_deposit.timecard_info;
143: ) is
144:
145: l_timecard_blocks hxc_timecard.block_list;
146: l_day_blocks hxc_timecard.block_list;
147: l_detail_blocks hxc_timecard.block_list;
148: l_transaction_info hxc_timecard.transaction_info;
149: l_proc varchar2(33) := g_package||'.save_timecard';
150: l_old_style_blks hxc_self_service_time_deposit.timecard_info;
151: l_old_style_attrs hxc_self_service_time_deposit.building_block_attribute_info;
144:
145: l_timecard_blocks hxc_timecard.block_list;
146: l_day_blocks hxc_timecard.block_list;
147: l_detail_blocks hxc_timecard.block_list;
148: l_transaction_info hxc_timecard.transaction_info;
149: l_proc varchar2(33) := g_package||'.save_timecard';
150: l_old_style_blks hxc_self_service_time_deposit.timecard_info;
151: l_old_style_attrs hxc_self_service_time_deposit.building_block_attribute_info;
152: l_old_messages hxc_self_service_time_deposit.message_table;
165:
166: /*
167: Sort blocks
168: */
169: hxc_timecard_block_utils.sort_blocks
170: (p_blocks => p_blocks
171: ,p_timecard_blocks => l_timecard_blocks
172: ,p_day_blocks => l_day_blocks
173: ,p_detail_blocks => l_detail_blocks
187: );
188:
189:
190:
191: hxc_timecard_message_helper.processerrors
192: (p_messages => p_messages);
193:
194: /*
195: Add the security attributes
201: p_timecard_props => p_timecard_props,
202: p_messages => p_messages
203: );
204:
205: hxc_timecard_message_helper.processerrors
206: (p_messages => p_messages);
207:
208: /*
209: Translate any aliases
213: ,p_attributes => p_attributes
214: ,p_messages => p_messages
215: );
216:
217: hxc_timecard_message_helper.processerrors
218: (p_messages => p_messages);
219:
220: -- OTL - ABS Integration
221: hxc_retrieve_absences.verify_view_only_absences(p_blocks => p_blocks,
225: -- Added for Bug 10326049
226: -- OTL - Projects Payroll Integration
227:
228: IF g_debug THEN
229: hr_utility.trace('PA-PAY> In hxc_timecard.save_timecard');
230: hr_utility.trace('PA-PAY> calling hxc_proj_pay_dep_validation.verify_proj_pay_setup');
231: END IF;
232:
233: hxc_proj_pay_dep_validation.verify_proj_pay_setup(p_blocks => p_blocks,
248: /*
249: Removed any deleted attributes
250: */
251:
252: hxc_timecard_attribute_utils.remove_deleted_attributes
253: (p_attributes => p_attributes);
254:
255: /* Fix for bug 6489820 */
256:
260:
261: /* End of fix for bug 6489820 */
262:
263: /* fix by senthil for bug 5099360*/
264: hxc_timecard_block_utils.sort_blocks
265: (p_blocks => p_blocks
266: ,p_timecard_blocks => l_timecard_blocks
267: ,p_day_blocks => l_day_blocks
268: ,p_detail_blocks => l_detail_blocks
278: ,p_attributes => p_attributes
279: ,p_timecard_props => p_timecard_props
280: ,p_days => l_day_blocks
281: ,p_details => l_detail_blocks
282: ,p_template => hxc_timecard.c_no
283: ,p_deposit_mode => hxc_timecard.c_save
284: ,p_messages => p_messages
285: );
286:
279: ,p_timecard_props => p_timecard_props
280: ,p_days => l_day_blocks
281: ,p_details => l_detail_blocks
282: ,p_template => hxc_timecard.c_no
283: ,p_deposit_mode => hxc_timecard.c_save
284: ,p_messages => p_messages
285: );
286:
287: hxc_timecard_message_helper.processerrors
283: ,p_deposit_mode => hxc_timecard.c_save
284: ,p_messages => p_messages
285: );
286:
287: hxc_timecard_message_helper.processerrors
288: (p_messages => p_messages);
289:
290: /*
291: Validate blocks, attributes - including TERs.
290: /*
291: Validate blocks, attributes - including TERs.
292: */
293:
294: hxc_timecard_validation.recipients_update_validation
295: (p_blocks => p_blocks
296: ,p_attributes => p_attributes
297: ,p_messages => p_messages
298: ,p_props => p_timecard_props
295: (p_blocks => p_blocks
296: ,p_attributes => p_attributes
297: ,p_messages => p_messages
298: ,p_props => p_timecard_props
299: ,p_deposit_mode => hxc_timecard.c_save
300: ,p_resubmit => p_resubmit
301: );
302:
303: hxc_timecard_message_helper.processerrors
299: ,p_deposit_mode => hxc_timecard.c_save
300: ,p_resubmit => p_resubmit
301: );
302:
303: hxc_timecard_message_helper.processerrors
304: (p_messages => p_messages);
305:
306: hxc_timecard_validation.data_set_validation
307: (p_blocks => p_blocks
302:
303: hxc_timecard_message_helper.processerrors
304: (p_messages => p_messages);
305:
306: hxc_timecard_validation.data_set_validation
307: (p_blocks => p_blocks
308: ,p_messages => p_messages
309: );
310:
307: (p_blocks => p_blocks
308: ,p_messages => p_messages
309: );
310:
311: hxc_timecard_message_helper.processerrors
312: (p_messages => p_messages);
313:
314: --svg start Bug 9181950
315: if NOT hxc_timecard_message_helper.noErrors then
311: hxc_timecard_message_helper.processerrors
312: (p_messages => p_messages);
313:
314: --svg start Bug 9181950
315: if NOT hxc_timecard_message_helper.noErrors then
316: --HXC_SVG_LOG.record_log('Reached here:svg');
317: if g_debug then
318: hr_utility.trace('SVG: Rollingback to savepoint TC_SAVE_SAVEPOINT for any Projects related updates');
319: end if;
326: /*
327: Store blocks and attributes
328: */
329:
330: if hxc_timecard_message_helper.noErrors then
331:
332: hxc_timecard_deposit.execute
333: (p_blocks => p_blocks
334: ,p_attributes => p_attributes
328: */
329:
330: if hxc_timecard_message_helper.noErrors then
331:
332: hxc_timecard_deposit.execute
333: (p_blocks => p_blocks
334: ,p_attributes => p_attributes
335: ,p_timecard_blocks => l_timecard_blocks
336: ,p_day_blocks => l_day_blocks
338: ,p_messages => p_messages
339: ,p_transaction_info => l_transaction_info
340: );
341:
342: hxc_timecard_message_helper.processerrors
343: (p_messages => p_messages);
344:
345: end if;
346:
343: (p_messages => p_messages);
344:
345: end if;
346:
347: if hxc_timecard_message_helper.noErrors then
348:
349: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
350:
351: /*
345: end if;
346:
347: if hxc_timecard_message_helper.noErrors then
348:
349: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
350:
351: /*
352: Bug 3345143 - this is done in the summary apis now.
353:
355: */
356: --
357: -- Maintain summary table
358: --
359: hxc_timecard_summary_api.timecard_deposit
360: (p_blocks => p_blocks
361: ,p_approval_item_type => NULL
362: ,p_approval_process_name => NULL
363: ,p_approval_item_key => NULL
365: ,p_tk_audit_process_name => NULL
366: ,p_tk_audit_item_key => NULL
367: );
368:
369: hxc_timecard_audit.maintain_latest_details
370: (p_blocks => p_blocks );
371:
372:
373: /* Bug 8888904 */
370: (p_blocks => p_blocks );
371:
372:
373: /* Bug 8888904 */
374: hxc_timecard_audit.maintain_rdb_snapshot
375: (p_blocks => p_blocks,
376: p_attributes => p_attributes);
377:
378:
376: p_attributes => p_attributes);
377:
378:
379:
380: hxc_timecard_message_helper.processerrors
381: (p_messages => p_messages);
382:
383: end if;
384:
381: (p_messages => p_messages);
382:
383: end if;
384:
385: p_timecard_id := p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).time_building_block_id;
386: p_timecard_ovn:= p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).object_version_number;
387:
388:
389: -- OTL-Absences Integration (Bug 8779478)
382:
383: end if;
384:
385: p_timecard_id := p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).time_building_block_id;
386: p_timecard_ovn:= p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).object_version_number;
387:
388:
389: -- OTL-Absences Integration (Bug 8779478)
390: -- Moved the following code inside a BEGIN-EXCEPTION-END block to handle exceptions effectively
390: -- Moved the following code inside a BEGIN-EXCEPTION-END block to handle exceptions effectively
391: -- for Bug 8888138
392: BEGIN
393: IF (nvl(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y') THEN
394: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors
395: and p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).SCOPE <> hxc_timecard.c_template_scope) THEN
396:
397: IF g_debug THEN
398: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.SAVE_TIMECARD');
391: -- for Bug 8888138
392: BEGIN
393: IF (nvl(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y') THEN
394: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors
395: and p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).SCOPE <> hxc_timecard.c_template_scope) THEN
396:
397: IF g_debug THEN
398: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.SAVE_TIMECARD');
399: END IF;
394: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors
395: and p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).SCOPE <> hxc_timecard.c_template_scope) THEN
396:
397: IF g_debug THEN
398: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.SAVE_TIMECARD');
399: END IF;
400:
401: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time);
402: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time);
397: IF g_debug THEN
398: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.SAVE_TIMECARD');
399: END IF;
400:
401: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time);
402: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time);
403: l_resource_id := p_blocks(l_timecard_index).resource_id;
404: l_tc_status := p_blocks(l_timecard_index).approval_status;
405:
398: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.SAVE_TIMECARD');
399: END IF;
400:
401: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time);
402: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time);
403: l_resource_id := p_blocks(l_timecard_index).resource_id;
404: l_tc_status := p_blocks(l_timecard_index).approval_status;
405:
406: HXC_ABS_RETRIEVAL_PKG.POST_ABSENCES(l_resource_id,
432: hr_utility.trace('ABS: Exception TC_SAVE_EXCEPTION');
433: END IF;
434:
435: rollback to TC_SAVE_SAVEPOINT;
436: hxc_timecard_message_helper.processerrors
437: (p_messages => p_messages);
438:
439:
440: END ; -- Absences end
458: ,p_timecard_id out nocopy hxc_time_building_blocks.time_building_block_id%type
459: ,p_timecard_ovn out nocopy hxc_time_building_blocks.object_version_number%type
460: ) IS
461:
462: l_timecard_blocks hxc_timecard.block_list;
463: l_day_blocks hxc_timecard.block_list;
464: l_detail_blocks hxc_timecard.block_list;
465: l_attributes hxc_attribute_table_type;
466: l_blocks hxc_block_table_type;
459: ,p_timecard_ovn out nocopy hxc_time_building_blocks.object_version_number%type
460: ) IS
461:
462: l_timecard_blocks hxc_timecard.block_list;
463: l_day_blocks hxc_timecard.block_list;
464: l_detail_blocks hxc_timecard.block_list;
465: l_attributes hxc_attribute_table_type;
466: l_blocks hxc_block_table_type;
467: l_transaction_info hxc_timecard.transaction_info;
460: ) IS
461:
462: l_timecard_blocks hxc_timecard.block_list;
463: l_day_blocks hxc_timecard.block_list;
464: l_detail_blocks hxc_timecard.block_list;
465: l_attributes hxc_attribute_table_type;
466: l_blocks hxc_block_table_type;
467: l_transaction_info hxc_timecard.transaction_info;
468: l_timecard_props hxc_timecard_prop_table_type;
463: l_day_blocks hxc_timecard.block_list;
464: l_detail_blocks hxc_timecard.block_list;
465: l_attributes hxc_attribute_table_type;
466: l_blocks hxc_block_table_type;
467: l_transaction_info hxc_timecard.transaction_info;
468: l_timecard_props hxc_timecard_prop_table_type;
469: l_proc varchar2(33) := g_package||'.DEPOSIT_CONTROLLER';
470: l_can_deposit boolean := true;
471: l_resubmit varchar2(10) := c_no;
464: l_detail_blocks hxc_timecard.block_list;
465: l_attributes hxc_attribute_table_type;
466: l_blocks hxc_block_table_type;
467: l_transaction_info hxc_timecard.transaction_info;
468: l_timecard_props hxc_timecard_prop_table_type;
469: l_proc varchar2(33) := g_package||'.DEPOSIT_CONTROLLER';
470: l_can_deposit boolean := true;
471: l_resubmit varchar2(10) := c_no;
472: l_timecard_index number;
551: l_index := l_attributes.next(l_index);
552: END LOOP;
553: END IF;
554:
555: hxc_timecard_block_utils.initialize_timecard_index;
556:
557: ----------------- Default Attributes -------------------------------------------------------
558: l_active_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
559: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).start_time);
554:
555: hxc_timecard_block_utils.initialize_timecard_index;
556:
557: ----------------- Default Attributes -------------------------------------------------------
558: l_active_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
559: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).start_time);
560: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).stop_time);
561: l_resource_id := p_blocks(l_active_index).resource_id;
562:
555: hxc_timecard_block_utils.initialize_timecard_index;
556:
557: ----------------- Default Attributes -------------------------------------------------------
558: l_active_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
559: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).start_time);
560: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).stop_time);
561: l_resource_id := p_blocks(l_active_index).resource_id;
562:
563:
556:
557: ----------------- Default Attributes -------------------------------------------------------
558: l_active_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
559: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).start_time);
560: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_active_index).stop_time);
561: l_resource_id := p_blocks(l_active_index).resource_id;
562:
563:
564: hxc_preference_evaluation.resource_preferences(p_resource_id => l_resource_id,
583: ,p_template => p_template
584: ,p_messages => p_messages
585: );
586:
587: hxc_timecard_message_helper.processerrors
588: (p_messages => p_messages);
589:
590: /*
591: Determine if this is a resubmitted timecard
590: /*
591: Determine if this is a resubmitted timecard
592: */
593:
594: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
595:
596: if(hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).date_to) = hr_general.end_of_time) then
597: l_resubmit := hxc_timecard_approval.is_timecard_resubmitted
598: (p_blocks(l_timecard_index).time_building_block_id
592: */
593:
594: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
595:
596: if(hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).date_to) = hr_general.end_of_time) then
597: l_resubmit := hxc_timecard_approval.is_timecard_resubmitted
598: (p_blocks(l_timecard_index).time_building_block_id
599: ,p_blocks(l_timecard_index).object_version_number
600: ,p_blocks(l_timecard_index).resource_id
593:
594: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
595:
596: if(hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).date_to) = hr_general.end_of_time) then
597: l_resubmit := hxc_timecard_approval.is_timecard_resubmitted
598: (p_blocks(l_timecard_index).time_building_block_id
599: ,p_blocks(l_timecard_index).object_version_number
600: ,p_blocks(l_timecard_index).resource_id
601: ,hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time)
597: l_resubmit := hxc_timecard_approval.is_timecard_resubmitted
598: (p_blocks(l_timecard_index).time_building_block_id
599: ,p_blocks(l_timecard_index).object_version_number
600: ,p_blocks(l_timecard_index).resource_id
601: ,hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time)
602: ,hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time)
603: );
604: else
605: l_resubmit := c_delete;
598: (p_blocks(l_timecard_index).time_building_block_id
599: ,p_blocks(l_timecard_index).object_version_number
600: ,p_blocks(l_timecard_index).resource_id
601: ,hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time)
602: ,hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time)
603: );
604: else
605: l_resubmit := c_delete;
606: end if;
611: this information in from the
612: middle tier, to avoid another
613: pref evaluation
614: */
615: l_tbb_id :=p_blocks(hxc_timecard_block_utils.find_active_timecard_index (p_blocks)).time_building_block_id;
616: l_tbb_ovn :=p_blocks(hxc_timecard_block_utils.find_active_timecard_index (p_blocks)).object_version_number;
617:
618: if (l_tbb_id <0 ) then -- when we are creating tmecard/template the id will be -ve value,so in this case we pass
619: l_tbb_id := null; -- NULL instead of -ve value
612: middle tier, to avoid another
613: pref evaluation
614: */
615: l_tbb_id :=p_blocks(hxc_timecard_block_utils.find_active_timecard_index (p_blocks)).time_building_block_id;
616: l_tbb_ovn :=p_blocks(hxc_timecard_block_utils.find_active_timecard_index (p_blocks)).object_version_number;
617:
618: if (l_tbb_id <0 ) then -- when we are creating tmecard/template the id will be -ve value,so in this case we pass
619: l_tbb_id := null; -- NULL instead of -ve value
620: l_tbb_ovn :=null;
619: l_tbb_id := null; -- NULL instead of -ve value
620: l_tbb_ovn :=null;
621: end if;
622:
623: hxc_timecard_properties.get_preference_properties
624: (p_validate => c_yes
625: ,p_resource_id => p_blocks(l_timecard_index).resource_id
626: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time)
627: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time)
622:
623: hxc_timecard_properties.get_preference_properties
624: (p_validate => c_yes
625: ,p_resource_id => p_blocks(l_timecard_index).resource_id
626: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time)
627: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time)
628: ,p_for_timecard => false
629: ,p_messages => p_messages
630: ,p_property_table => l_timecard_props
623: hxc_timecard_properties.get_preference_properties
624: (p_validate => c_yes
625: ,p_resource_id => p_blocks(l_timecard_index).resource_id
626: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time)
627: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time)
628: ,p_for_timecard => false
629: ,p_messages => p_messages
630: ,p_property_table => l_timecard_props
631: ,p_timecard_bb_id => l_tbb_id -- passs the extra parameter timecard ID
631: ,p_timecard_bb_id => l_tbb_id -- passs the extra parameter timecard ID
632: ,p_timecard_bb_ovn => l_tbb_ovn -- pass the extra parameter timecard OVN
633: );
634:
635: hxc_timecard_message_helper.processerrors
636: (p_messages => p_messages);
637:
638: p_messages.delete;
639:
657: elsif (p_deposit_mode = c_audit) then
658:
659:
660: l_blocks := g_deposit_blocks;
661: hxc_timecard_attribute_utils.append_additional_reasons
662: (g_deposit_attributes
663: ,p_attributes);
664: l_attributes := g_deposit_attributes;
665:
687: ,p_attributes => l_attributes
688: ,p_messages => p_messages
689: );
690:
691: hxc_timecard_message_helper.processerrors
692: (p_messages => p_messages);
693:
694: /*
695: Hold the completed blocks and attributes
697: there were no error messages from audit
698: validation
699: */
700:
701: if(hxc_timecard_message_helper.noerrors) then
702: g_deposit_blocks := l_blocks;
703: g_deposit_attributes := l_attributes;
704: end if;
705:
705:
706: else
707: if((p_validate = c_yes)OR(p_template=c_yes)) then
708:
709: hxc_timecard_block_utils.sort_blocks
710: (p_blocks => p_blocks
711: ,p_timecard_blocks => l_timecard_blocks
712: ,p_day_blocks => l_day_blocks
713: ,p_detail_blocks => l_detail_blocks
741: ,p_messages => p_messages
742: );
743:
744:
745: hxc_timecard_message_helper.processerrors
746: (p_messages => p_messages);
747:
748: p_messages.delete;
749:
759: p_timecard_props => l_timecard_props,
760: p_messages => p_messages
761: );
762:
763: hxc_timecard_message_helper.processerrors
764: (p_messages => p_messages);
765:
766: /*
767: Translate any aliases
774: ,p_messages => p_messages
775: );
776:
777:
778: hxc_timecard_message_helper.processerrors
779: (p_messages => p_messages);
780:
781: /*
782: Set the block and attribute update process flags
795:
796: if p_cla_save = 'NO' then ------------- CLA change
797:
798:
799: hxc_timecard_attribute_utils.remove_deleted_attributes
800: (p_attributes => l_attributes);
801:
802: /*
803: Perform process checks
813: ,p_deposit_mode => p_deposit_mode
814: ,p_messages => p_messages
815: );
816:
817: hxc_timecard_message_helper.processerrors
818: (p_messages => p_messages);
819: /*
820: Validate blocks, attributes
821: */
827: -- Added for Bug 10326049
828: -- OTL - Projects Payroll Integration
829:
830: IF g_debug THEN
831: hr_utility.trace('PA-PAY> In hxc_timecard.deposit_controller');
832: hr_utility.trace('PA-PAY> calling hxc_proj_pay_dep_validation.verify_proj_pay_setup');
833: END IF;
834:
835: hxc_proj_pay_dep_validation.verify_proj_pay_setup(p_blocks => p_blocks,
836: p_attributes => l_attributes,
837: p_messages => p_messages);
838:
839:
840: hxc_timecard_validation.deposit_validation
841: (p_blocks => l_blocks
842: ,p_attributes => l_attributes
843: ,p_messages => p_messages
844: ,p_props => l_timecard_props
847: ,p_resubmit => l_resubmit
848: ,p_can_deposit => l_can_deposit
849: );
850:
851: hxc_timecard_message_helper.processerrors
852: (p_messages => p_messages);
853:
854: --
855: -- Validate the set up for the user
867: );
868:
869: end if;
870:
871: hxc_timecard_message_helper.processerrors
872: (p_messages => p_messages);
873:
874: */
875: /*
879:
880:
881: elsif p_cla_save = 'YES' then ------- CLA change
882:
883: hxc_timecard_validation.timecard_validation
884: (p_blocks => l_blocks,
885: p_attributes => l_attributes,
886: p_messages => p_messages,
887: p_props => l_timecard_props,
900: for immeadiate deposit if required
901: */
902: g_deposit_blocks := l_blocks;
903: g_deposit_attributes := l_attributes;
904: g_audit_messages := hxc_timecard_message_helper.getMessages;
905:
906: end if;
907:
908: if(((p_validate=c_no)OR(p_template=c_yes))AND(l_can_deposit))then
910: if(l_day_blocks.count = 0) then
911: --
912: -- Only bother to resort if we have to
913: --
914: hxc_timecard_block_utils.sort_blocks
915: (p_blocks => g_deposit_blocks
916: ,p_timecard_blocks => l_timecard_blocks
917: ,p_day_blocks => l_day_blocks
918: ,p_detail_blocks => l_detail_blocks
932: ,p_details => l_detail_blocks
933: ,p_messages => p_messages
934: );
935:
936: hxc_timecard_message_helper.processerrors
937: (p_messages => p_messages);
938:
939: p_messages.delete;
940:
940:
941: end if;
942:
943: --svg start Bug 9181950
944: if NOT hxc_timecard_message_helper.noErrors then
945: --HXC_SVG_LOG.record_log('Reached here:svg');
946: if g_debug then
947: hr_utility.trace('SVG: Rollingback to savepoint TC_SUB_SAVEPOINT for any Projects related updates');
948: end if;
953:
954: /*
955: Store blocks and attributes
956: */
957: if(hxc_timecard_message_helper.noErrors) then
958:
959: /*
960: At this point, if we're saving a template,
961: we should look to see if the id corresponding
963: in which case, we'll need to replace the ids
964: to ensure the template is saved properly
965: */
966:
967: if(p_template = hxc_timecard.c_yes) then
968:
969: hxc_block_attribute_update.replace_ids
970: (p_blocks => g_deposit_blocks
971: ,p_attributes => g_deposit_attributes
1027:
1028:
1029: hr_utility.trace('Restrict Blank Rows on Save : '||l_restrict_blank_rows_on_save);
1030: -- Added for DA
1031: IF((p_template <> c_yes) and (hxc_timecard_message_helper.noErrors)) THEN
1032: l_index := g_deposit_blocks.first;
1033: LOOP
1034: EXIT WHEN NOT g_deposit_blocks.exists(l_index);
1035:
1117: END IF; -- IF l_restrict_blank_rows_on_save = 'N'
1118:
1119: --------------------------- Default Attributes -----------------------------------------
1120:
1121: hxc_timecard_deposit.execute
1122: (p_blocks => g_deposit_blocks
1123: ,p_attributes => g_deposit_attributes
1124: ,p_timecard_blocks => l_timecard_blocks
1125: ,p_day_blocks => l_day_blocks
1127: ,p_messages => p_messages
1128: ,p_transaction_info => l_transaction_info
1129: );
1130:
1131: hxc_timecard_message_helper.processerrors
1132: (p_messages => p_messages);
1133:
1134: p_timecard_id := g_deposit_blocks
1135: (hxc_timecard_block_utils.find_active_timecard_index(g_deposit_blocks)).time_building_block_id;
1131: hxc_timecard_message_helper.processerrors
1132: (p_messages => p_messages);
1133:
1134: p_timecard_id := g_deposit_blocks
1135: (hxc_timecard_block_utils.find_active_timecard_index(g_deposit_blocks)).time_building_block_id;
1136:
1137: p_timecard_ovn := g_deposit_blocks
1138: (hxc_timecard_block_utils.find_active_timecard_index(g_deposit_blocks)).object_version_number;
1139:
1134: p_timecard_id := g_deposit_blocks
1135: (hxc_timecard_block_utils.find_active_timecard_index(g_deposit_blocks)).time_building_block_id;
1136:
1137: p_timecard_ovn := g_deposit_blocks
1138: (hxc_timecard_block_utils.find_active_timecard_index(g_deposit_blocks)).object_version_number;
1139:
1140: if((p_template <> c_yes) and (hxc_timecard_message_helper.noErrors)) then
1141:
1142:
1136:
1137: p_timecard_ovn := g_deposit_blocks
1138: (hxc_timecard_block_utils.find_active_timecard_index(g_deposit_blocks)).object_version_number;
1139:
1140: if((p_template <> c_yes) and (hxc_timecard_message_helper.noErrors)) then
1141:
1142:
1143: -- Maintain summary table
1144:
1141:
1142:
1143: -- Maintain summary table
1144:
1145: hxc_timecard_summary_api.timecard_deposit
1146: (p_blocks => g_deposit_blocks
1147: ,p_approval_item_type => NULL
1148: ,p_approval_process_name => NULL
1149: ,p_approval_item_key => NULL
1151: ,p_tk_audit_process_name => NULL
1152: ,p_tk_audit_item_key => NULL
1153: );
1154:
1155: hxc_timecard_audit.maintain_latest_details
1156: (p_blocks => g_deposit_blocks );
1157:
1158:
1159: /*Bug 8888904 */
1156: (p_blocks => g_deposit_blocks );
1157:
1158:
1159: /*Bug 8888904 */
1160: hxc_timecard_audit.maintain_rdb_snapshot
1161: (p_blocks => g_deposit_blocks,
1162: p_attributes => g_deposit_attributes);
1163:
1164:
1161: (p_blocks => g_deposit_blocks,
1162: p_attributes => g_deposit_attributes);
1163:
1164:
1165: hxc_timecard_message_helper.processerrors
1166: (p_messages => p_messages);
1167:
1168: -- OTL-Absences Integration (Bug 8779478)
1169: -- Moved the following code inside a BEGIN-EXCEPTION-END block to handle exceptions effectively
1170: -- for Bug 8888138
1171: BEGIN
1172: IF (nvl(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y')
1173: THEN
1174: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors
1175: and p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).SCOPE <> hxc_timecard.c_template_scope)
1176: THEN
1177:
1178: IF g_debug THEN
1171: BEGIN
1172: IF (nvl(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y')
1173: THEN
1174: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors
1175: and p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).SCOPE <> hxc_timecard.c_template_scope)
1176: THEN
1177:
1178: IF g_debug THEN
1179: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.DEPOSIT_CONTROLLER');
1175: and p_blocks(hxc_timecard_block_utils.find_active_timecard_index(p_blocks)).SCOPE <> hxc_timecard.c_template_scope)
1176: THEN
1177:
1178: IF g_debug THEN
1179: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.DEPOSIT_CONTROLLER');
1180: END IF;
1181:
1182: l_resource_id := p_blocks(l_timecard_index).resource_id ;
1183: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time);
1179: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.DEPOSIT_CONTROLLER');
1180: END IF;
1181:
1182: l_resource_id := p_blocks(l_timecard_index).resource_id ;
1183: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time);
1184: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time) ;
1185: l_tc_status := p_blocks(l_timecard_index).approval_status ;
1186:
1187: HXC_ABS_RETRIEVAL_PKG.POST_ABSENCES(l_resource_id,
1180: END IF;
1181:
1182: l_resource_id := p_blocks(l_timecard_index).resource_id ;
1183: l_start_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).start_time);
1184: l_stop_date := hxc_timecard_block_utils.date_value(p_blocks(l_timecard_index).stop_time) ;
1185: l_tc_status := p_blocks(l_timecard_index).approval_status ;
1186:
1187: HXC_ABS_RETRIEVAL_PKG.POST_ABSENCES(l_resource_id,
1188: l_start_date,
1211: hr_utility.trace('ABS: Exception TC_SUB_EXCEPTION');
1212: END IF;
1213:
1214: rollback to TC_SUB_SAVEPOINT;
1215: hxc_timecard_message_helper.processerrors
1216: (p_messages => p_messages);
1217:
1218:
1219: END;
1218:
1219: END;
1220: -- Absences end
1221:
1222: hxc_timecard_message_helper.processerrors
1223: (p_messages => p_messages);
1224:
1225: l_item_key :=
1226: hxc_timecard_approval.begin_approval
1222: hxc_timecard_message_helper.processerrors
1223: (p_messages => p_messages);
1224:
1225: l_item_key :=
1226: hxc_timecard_approval.begin_approval
1227: (p_blocks => g_deposit_blocks,
1228: p_item_type => p_item_type,
1229: p_process_name => p_approval_prc,
1230: p_resubmitted => l_resubmit,
1255: IF g_debug THEN
1256: hr_utility.trace('ABS: Exception TC_SUB_EXCEPTION');
1257: END IF;
1258: rollback to TC_SUB_SAVEPOINT;
1259: hxc_timecard_message_helper.processerrors
1260: (p_messages => p_messages);
1261:
1262:
1263: END;
1263: END;
1264: -- Absences end
1265:
1266:
1267: hxc_timecard_message_helper.processerrors
1268: (p_messages => p_messages);
1269:
1270: hxc_timecard_summary_pkg.update_summary_row
1271: (p_timecard_id => p_timecard_id
1266:
1267: hxc_timecard_message_helper.processerrors
1268: (p_messages => p_messages);
1269:
1270: hxc_timecard_summary_pkg.update_summary_row
1271: (p_timecard_id => p_timecard_id
1272: ,p_approval_item_type => p_item_type
1273: ,p_approval_process_name => p_approval_prc
1274: ,p_approval_item_key => l_item_key
1285: --
1286: --115.43 Change Note: The delete on the structures are
1287: --in both the if and elsif clauses here, since we must only
1288: --delete the structures if there has been a successful deposit,
1289: --namely the hxc_timecard_message_helper.noErrors function
1290: --returns true. Customer tested this configuration.
1291: --
1292: g_deposit_blocks.delete;
1293: g_deposit_attributes.delete;
1291: --
1292: g_deposit_blocks.delete;
1293: g_deposit_attributes.delete;
1294: g_audit_messages.delete;
1295: elsif((p_template = c_yes) and (hxc_timecard_message_helper.noErrors)) then
1296: hxc_template_summary_api.template_deposit
1297: (p_blocks => g_deposit_blocks,
1298: p_attributes =>g_deposit_attributes,
1299: p_template_id =>p_timecard_id);
1309: /*
1310: Audit this transaction
1311: */
1312:
1313: hxc_timecard_audit.audit_deposit
1314: (p_transaction_info => l_transaction_info
1315: ,p_messages => p_messages
1316: );
1317:
1314: (p_transaction_info => l_transaction_info
1315: ,p_messages => p_messages
1316: );
1317:
1318: hxc_timecard_message_helper.processerrors
1319: (p_messages => p_messages);
1320:
1321: end if;
1322:
1323: /*
1324: Finally, deal with the errors
1325: */
1326:
1327: p_messages := hxc_timecard_message_helper.prepareMessages;
1328:
1329: IF g_debug THEN
1330: hr_utility.trace('Leaving '||l_proc);
1331: END IF;
1381:
1382: g_debug := hr_utility.debug_enabled;
1383:
1384: IF g_debug THEN
1385: hr_utility.trace('ABS> In hxc_timecard.create_timecard procedure');
1386: l_index := p_attributes.first;
1387: LOOP
1388: EXIT WHEN NOT p_attributes.exists(l_index);
1389: -- l_attribute := p_attributes(l_index);
1436: transaction reference has been updated, but the user has clicked
1437: the back button. No code should be updated in the validate phase
1438: in OTL
1439: */
1440: if(p_validate=hxc_timecard.c_yes) then
1441: rollback;
1442: end if;
1443:
1444: l_index := p_blocks.FIRST;
1457: END LOOP;
1458:
1459: fnd_msg_pub.initialize;
1460:
1461: hxc_timecard_message_helper.initializeErrors;
1462:
1463: p_messages := hxc_message_table_type();
1464:
1465: -- Bug 10196997
1506:
1507: IF g_debug
1508: THEN
1509: hr_utility.trace('p_template ::' || p_template);
1510: hr_utility.trace('hxc_timecard.c_yes ::' || hxc_timecard.c_yes);
1511:
1512: hr_utility.trace('p_lock_rowid ::' || p_lock_rowid);
1513: hr_utility.trace('d_lock_rowid ::' || d_lock_rowid);
1514: hr_utility.trace('d_exists ::' || d_exists);
1513: hr_utility.trace('d_lock_rowid ::' || d_lock_rowid);
1514: hr_utility.trace('d_exists ::' || d_exists);
1515: END IF;
1516:
1517: IF(p_template <> hxc_timecard.c_yes
1518: AND d_exists = 1 ) THEN
1519:
1520: hr_utility.trace('THROW HXC_MULTIPLE_SESSION ');
1521:
1518: AND d_exists = 1 ) THEN
1519:
1520: hr_utility.trace('THROW HXC_MULTIPLE_SESSION ');
1521:
1522: hxc_timecard_message_helper.adderrortocollection(p_messages,
1523: 'HXC_MULTIPLE_SESSION',
1524: hxc_timecard.c_error,
1525: NULL, NULL,
1526: hxc_timecard.c_hxc,
1520: hr_utility.trace('THROW HXC_MULTIPLE_SESSION ');
1521:
1522: hxc_timecard_message_helper.adderrortocollection(p_messages,
1523: 'HXC_MULTIPLE_SESSION',
1524: hxc_timecard.c_error,
1525: NULL, NULL,
1526: hxc_timecard.c_hxc,
1527: NULL,
1528: NULL,
1522: hxc_timecard_message_helper.adderrortocollection(p_messages,
1523: 'HXC_MULTIPLE_SESSION',
1524: hxc_timecard.c_error,
1525: NULL, NULL,
1526: hxc_timecard.c_hxc,
1527: NULL,
1528: NULL,
1529: NULL,
1530: NULL);
1532: END IF;
1533:
1534: END IF;
1535:
1536: if(p_template = hxc_timecard.c_no) then
1537: if(hxc_lock_api.check_lock(p_lock_rowid)) then
1538: l_valid_lock := true;
1539: else
1540: --
1541: -- For bug
1542: -- If the lock is invalid, it might just have timed out, therefore
1543: -- request a new lock.
1544: --
1545: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
1546:
1547: if(hxc_timecard_block_utils.is_new_block(p_blocks(l_timecard_index))) then
1548:
1549: hxc_lock_api.request_lock
1543: -- request a new lock.
1544: --
1545: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
1546:
1547: if(hxc_timecard_block_utils.is_new_block(p_blocks(l_timecard_index))) then
1548:
1549: hxc_lock_api.request_lock
1550: (p_process_locker_type=> hxc_lock_util.c_ss_timecard_action
1551: ,p_resource_id=> p_blocks(l_timecard_index).resource_id
1579: end if;
1580:
1581: -- OTL - ABS Integration
1582:
1583: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(p_blocks);
1584:
1585: hxc_retrieve_absences.g_lock_row_id := p_lock_rowid;
1586: hxc_retrieve_absences.g_person_id := p_blocks(l_timecard_index).resource_id;
1587: hxc_retrieve_absences.g_start_time := FND_DATE.canonical_to_date(p_blocks(l_timecard_index).start_time);
1589:
1590: -- Added for OTL ABS Integration 8888902
1591: -- OTL-ABS START
1592: IF g_debug THEN
1593: hr_utility.trace('ABS> In hxc_timecard.create_timeecard');
1594: hr_utility.trace('ABS> call hxc_retrieve_absences.insert_absence_summary_row');
1595: END IF;
1596:
1597: IF (NVL(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y') THEN
1598: hxc_retrieve_absences.insert_absence_summary_row;
1599: END IF;
1600: -- OTL-ABS END
1601:
1602: if((l_valid_lock) OR (p_template = hxc_timecard.c_yes)) then
1603:
1604: deposit_controller
1605: (p_validate => p_validate
1606: ,p_blocks => p_blocks
1615: ,p_timecard_ovn => p_timecard_ovn
1616: );
1617:
1618: if(
1619: ((p_deposit_mode = hxc_timecard.c_save) AND (hxc_timecard_message_helper.noerrors))
1620: OR
1621: ((p_deposit_mode = hxc_timecard.c_submit) AND (p_validate = hxc_timecard.c_no) AND (p_template = hxc_timecard.c_no))
1622: ) then
1623:
1617:
1618: if(
1619: ((p_deposit_mode = hxc_timecard.c_save) AND (hxc_timecard_message_helper.noerrors))
1620: OR
1621: ((p_deposit_mode = hxc_timecard.c_submit) AND (p_validate = hxc_timecard.c_no) AND (p_template = hxc_timecard.c_no))
1622: ) then
1623:
1624: hxc_lock_api.release_lock
1625: (P_ROW_LOCK_ID => p_lock_rowid
1633: ,P_MESSAGES => p_messages
1634: ,P_RELEASED_SUCCESS => l_released_success
1635: );
1636:
1637: elsif ((p_template = hxc_timecard.c_yes) AND (hxc_timecard_message_helper.noerrors))then
1638: --
1639: -- This is important, because we might have saved
1640: -- a timecard as a template, in which case, we should
1641: -- release the lock that we might have
1646: end if;
1647:
1648: else
1649:
1650: hxc_timecard_message_helper.addErrorToCollection
1651: (p_messages
1652: ,'HXC_TIMECARD_LOCK_FAILED'
1653: ,hxc_timecard.c_error
1654: ,null
1648: else
1649:
1650: hxc_timecard_message_helper.addErrorToCollection
1651: (p_messages
1652: ,'HXC_TIMECARD_LOCK_FAILED'
1653: ,hxc_timecard.c_error
1654: ,null
1655: ,null
1656: ,hxc_timecard.c_hxc
1649:
1650: hxc_timecard_message_helper.addErrorToCollection
1651: (p_messages
1652: ,'HXC_TIMECARD_LOCK_FAILED'
1653: ,hxc_timecard.c_error
1654: ,null
1655: ,null
1656: ,hxc_timecard.c_hxc
1657: ,null
1652: ,'HXC_TIMECARD_LOCK_FAILED'
1653: ,hxc_timecard.c_error
1654: ,null
1655: ,null
1656: ,hxc_timecard.c_hxc
1657: ,null
1658: ,null
1659: ,null
1660: ,null
1689: Begin
1690:
1691: for block_rec in c_blocks(p_timecard_id) loop
1692: l_blocks.extend;
1693: l_blocks(l_block_count) := hxc_timecard_block_utils.build_block
1694: (block_rec.time_building_block_id
1695: ,block_rec.object_version_number);
1696: if(p_load_mode = c_delete) then
1697: --
1845: --
1846: cursor c_timecard_attachment_exists
1847: (p_timecard_id in hxc_time_building_blocks.time_building_block_id%type) is
1848: select distinct fad.pk1_value,fad.pk2_value ,fad.pk3_value
1849: from hxc_timecard_summary hts,
1850: fnd_attached_documents fad
1851: where fad.entity_name = 'HXC_TIMECARD_SUMMARY'
1852: and hts.timecard_id = p_timecard_id
1853: and hts.resource_id = fad.pk1_value
1847: (p_timecard_id in hxc_time_building_blocks.time_building_block_id%type) is
1848: select distinct fad.pk1_value,fad.pk2_value ,fad.pk3_value
1849: from hxc_timecard_summary hts,
1850: fnd_attached_documents fad
1851: where fad.entity_name = 'HXC_TIMECARD_SUMMARY'
1852: and hts.timecard_id = p_timecard_id
1853: and hts.resource_id = fad.pk1_value
1854: and regexp_replace(fnd_date.date_to_canonical(trunc(hts.start_time)),' .*') = fad.pk2_value
1855: and regexp_replace(fnd_date.date_to_canonical(trunc(hts.stop_time)),' .*') = fad.pk3_value
1863: l_blocks hxc_block_table_type := hxc_block_table_type();
1864: l_attributes hxc_attribute_table_type := hxc_attribute_table_type();
1865: l_messages hxc_message_table_type := hxc_message_table_type();
1866:
1867: l_timecard_blocks hxc_timecard.block_list;
1868: l_day_blocks hxc_timecard.block_list;
1869: l_detail_blocks hxc_timecard.block_list;
1870:
1871: l_transaction_info hxc_timecard.transaction_info;
1864: l_attributes hxc_attribute_table_type := hxc_attribute_table_type();
1865: l_messages hxc_message_table_type := hxc_message_table_type();
1866:
1867: l_timecard_blocks hxc_timecard.block_list;
1868: l_day_blocks hxc_timecard.block_list;
1869: l_detail_blocks hxc_timecard.block_list;
1870:
1871: l_transaction_info hxc_timecard.transaction_info;
1872: l_timecard_props hxc_timecard_prop_table_type;
1865: l_messages hxc_message_table_type := hxc_message_table_type();
1866:
1867: l_timecard_blocks hxc_timecard.block_list;
1868: l_day_blocks hxc_timecard.block_list;
1869: l_detail_blocks hxc_timecard.block_list;
1870:
1871: l_transaction_info hxc_timecard.transaction_info;
1872: l_timecard_props hxc_timecard_prop_table_type;
1873:
1867: l_timecard_blocks hxc_timecard.block_list;
1868: l_day_blocks hxc_timecard.block_list;
1869: l_detail_blocks hxc_timecard.block_list;
1870:
1871: l_transaction_info hxc_timecard.transaction_info;
1872: l_timecard_props hxc_timecard_prop_table_type;
1873:
1874: l_dummy boolean := true;
1875:
1868: l_day_blocks hxc_timecard.block_list;
1869: l_detail_blocks hxc_timecard.block_list;
1870:
1871: l_transaction_info hxc_timecard.transaction_info;
1872: l_timecard_props hxc_timecard_prop_table_type;
1873:
1874: l_dummy boolean := true;
1875:
1876: l_timecard_ovn hxc_time_building_blocks.object_version_number%type;
1893: open c_timecard_ovn(p_timecard_id);
1894: fetch c_timecard_ovn into l_timecard_ovn, l_resource_id, l_start_time, l_stop_time;
1895: if(c_timecard_ovn%notfound) then
1896: close c_timecard_ovn;
1897: p_timecard_ok := hxc_timecard.c_no;
1898: else
1899:
1900: savepoint TC_DEL_SAVEPOINT;
1901: --
1900: savepoint TC_DEL_SAVEPOINT;
1901: --
1902: -- Timecard is ok, continue.
1903: --
1904: p_timecard_ok := hxc_timecard.c_yes;
1905: close c_timecard_ovn;
1906:
1907: --
1908: -- Initialize the message stack
1908: -- Initialize the message stack
1909: --
1910:
1911: fnd_msg_pub.initialize;
1912: hxc_timecard_message_helper.initializeErrors;
1913: --
1914: -- Get the timecard or timecard template blocks and attributes
1915: --
1916:
1919: --
1920: -- Main delete processing
1921: --
1922:
1923: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(l_blocks);
1924:
1925: hxc_timecard_properties.get_preference_properties
1926: (p_validate => hxc_timecard.c_yes
1927: ,p_resource_id => l_blocks(l_timecard_index).resource_id
1921: --
1922:
1923: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(l_blocks);
1924:
1925: hxc_timecard_properties.get_preference_properties
1926: (p_validate => hxc_timecard.c_yes
1927: ,p_resource_id => l_blocks(l_timecard_index).resource_id
1928: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).start_time)
1929: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).stop_time)
1922:
1923: l_timecard_index := hxc_timecard_block_utils.find_active_timecard_index(l_blocks);
1924:
1925: hxc_timecard_properties.get_preference_properties
1926: (p_validate => hxc_timecard.c_yes
1927: ,p_resource_id => l_blocks(l_timecard_index).resource_id
1928: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).start_time)
1929: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).stop_time)
1930: ,p_for_timecard => false
1924:
1925: hxc_timecard_properties.get_preference_properties
1926: (p_validate => hxc_timecard.c_yes
1927: ,p_resource_id => l_blocks(l_timecard_index).resource_id
1928: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).start_time)
1929: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).stop_time)
1930: ,p_for_timecard => false
1931: ,p_messages => l_messages
1932: ,p_property_table => l_timecard_props
1925: hxc_timecard_properties.get_preference_properties
1926: (p_validate => hxc_timecard.c_yes
1927: ,p_resource_id => l_blocks(l_timecard_index).resource_id
1928: ,p_timecard_start_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).start_time)
1929: ,p_timecard_stop_time => hxc_timecard_block_utils.date_value(l_blocks(l_timecard_index).stop_time)
1930: ,p_for_timecard => false
1931: ,p_messages => l_messages
1932: ,p_property_table => l_timecard_props
1933: ,p_timecard_bb_id => p_timecard_id --passs the extra parameter timecard ID
1933: ,p_timecard_bb_id => p_timecard_id --passs the extra parameter timecard ID
1934: ,p_timecard_bb_ovn => l_timecard_ovn -- pass the extra parameter timecard OVN
1935: );
1936:
1937: hxc_timecard_message_helper.processerrors
1938: (p_messages => l_messages);
1939:
1940: l_messages.delete;
1941:
1938: (p_messages => l_messages);
1939:
1940: l_messages.delete;
1941:
1942: hxc_timecard_block_utils.sort_blocks
1943: (p_blocks => l_blocks
1944: ,p_timecard_blocks => l_timecard_blocks
1945: ,p_day_blocks => l_day_blocks
1946: ,p_detail_blocks => l_detail_blocks
1969: p_deposit_mode => p_mode,
1970: p_messages => l_messages
1971: );
1972:
1973: hxc_timecard_message_helper.processerrors
1974: (p_messages => l_messages);
1975:
1976: hxc_timecard_validation.deposit_validation
1977: (p_blocks => l_blocks
1972:
1973: hxc_timecard_message_helper.processerrors
1974: (p_messages => l_messages);
1975:
1976: hxc_timecard_validation.deposit_validation
1977: (p_blocks => l_blocks
1978: ,p_attributes => l_attributes
1979: ,p_messages => l_messages
1980: ,p_props => l_timecard_props
1977: (p_blocks => l_blocks
1978: ,p_attributes => l_attributes
1979: ,p_messages => l_messages
1980: ,p_props => l_timecard_props
1981: ,p_deposit_mode => hxc_timecard.c_submit
1982: ,p_template => p_template
1983: ,p_resubmit => c_delete
1984: ,p_can_deposit => l_dummy
1985: );
1983: ,p_resubmit => c_delete
1984: ,p_can_deposit => l_dummy
1985: );
1986:
1987: hxc_timecard_message_helper.processerrors
1988: (p_messages => l_messages);
1989:
1990: elsif(l_blocks(l_timecard_index).scope = c_template_scope) then
1991:
1993: (l_blocks(l_timecard_index).time_building_block_id
1994: ,l_messages
1995: );
1996:
1997: hxc_timecard_message_helper.processerrors
1998: (p_messages => l_messages);
1999:
2000: end if;
2001:
1998: (p_messages => l_messages);
1999:
2000: end if;
2001:
2002: if(hxc_timecard_message_helper.noErrors) then
2003:
2004: hxc_timecard_deposit.execute
2005: (p_blocks => l_blocks
2006: ,p_attributes => l_attributes
2000: end if;
2001:
2002: if(hxc_timecard_message_helper.noErrors) then
2003:
2004: hxc_timecard_deposit.execute
2005: (p_blocks => l_blocks
2006: ,p_attributes => l_attributes
2007: ,p_timecard_blocks => l_timecard_blocks
2008: ,p_day_blocks => l_day_blocks
2009: ,p_detail_blocks => l_detail_blocks
2010: ,p_messages => l_messages
2011: ,p_transaction_info => l_transaction_info
2012: );
2013: hxc_timecard_message_helper.processerrors
2014: (p_messages => l_messages);
2015:
2016: /*
2017: Bug 3345143
2019: summary api.
2020: hxc_find_notify_aprs_pkg.cancel_previous_notifications(p_timecard_id);
2021: */
2022:
2023: if(hxc_timecard_message_helper.noErrors) then
2024: if(l_blocks(l_timecard_index).scope = c_template_scope) then --Only for templates.
2025: hxc_template_summary_api.DELETE_TEMPLATE(l_blocks(l_timecard_index).time_building_block_id);
2026: else --For Timecard.
2027:
2041: IF l_pk1_value is not null
2042: THEN
2043: hr_utility.trace('call to delete attachments...fnd_attached_documents2_pkg.delete_attachments');
2044: fnd_attached_documents2_pkg.delete_attachments
2045: ( X_entity_name => 'HXC_TIMECARD_SUMMARY'
2046: , X_pk1_value => l_pk1_value
2047: , X_pk2_value => l_pk2_value
2048: , X_pk3_value => l_pk3_value
2049: , X_delete_document_flag => 'Y');
2051: hr_utility.trace('End of delete attachments');
2052: -- End of Delete Attachments
2053:
2054:
2055: hxc_timecard_summary_api.delete_timecard
2056: (p_blocks => l_blocks
2057: ,p_timecard_id => p_timecard_id
2058: );
2059:
2056: (p_blocks => l_blocks
2057: ,p_timecard_id => p_timecard_id
2058: );
2059:
2060: hxc_timecard_audit.audit_deposit
2061: (p_transaction_info => l_transaction_info
2062: ,p_messages => l_messages
2063: );
2064:
2061: (p_transaction_info => l_transaction_info
2062: ,p_messages => l_messages
2063: );
2064:
2065: hxc_timecard_audit.maintain_latest_details
2066: (p_blocks => l_blocks );
2067:
2068: /* Bug 8888904 */
2069: hxc_timecard_audit.maintain_rdb_snapshot
2065: hxc_timecard_audit.maintain_latest_details
2066: (p_blocks => l_blocks );
2067:
2068: /* Bug 8888904 */
2069: hxc_timecard_audit.maintain_rdb_snapshot
2070: (p_blocks => l_blocks,
2071: p_attributes => l_attributes);
2072:
2073:
2070: (p_blocks => l_blocks,
2071: p_attributes => l_attributes);
2072:
2073:
2074: hxc_timecard_message_helper.processerrors
2075: (p_messages => l_messages);
2076:
2077:
2078:
2080: -- Moved the following code inside a BEGIN-EXCEPTION-END block to handle exceptions effectively
2081: -- for Bug 8888138
2082: BEGIN
2083: IF (nvl(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y') THEN
2084: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors) THEN
2085: IF g_debug THEN
2086: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.DELETE_TIMECARD');
2087: END IF;
2088:
2082: BEGIN
2083: IF (nvl(fnd_profile.value('HR_ABS_OTL_INTEGRATION'), 'N') = 'Y') THEN
2084: IF (p_timecard_id > 0 and hxc_timecard_message_helper.noerrors) THEN
2085: IF g_debug THEN
2086: hr_utility.trace('ABS:Initiated Online Retrieval from HXC_TIMECARD.DELETE_TIMECARD');
2087: END IF;
2088:
2089: HXC_ABS_RETRIEVAL_PKG.POST_ABSENCES(l_resource_id,
2090: l_start_time,
2113: hr_utility.trace('ABS: Exception TC_DEL_EXCEPTION');
2114: END IF;
2115:
2116: rollback to TC_DEL_SAVEPOINT;
2117: hxc_timecard_message_helper.processerrors
2118: (p_messages => l_messages);
2119:
2120:
2121: END; -- Absences end
2129:
2130: hxc_lock_api.release_lock
2131: (p_row_lock_id => l_lock_rowid);
2132:
2133: hxc_timecard_message_helper.prepareErrors;
2134:
2135: end if; -- Is the timecard ok?
2136:
2137: End delete_timecard;
2184: CLOSE c_null_blocks;
2185:
2186: End delete_null_entries;
2187:
2188: END hxc_timecard;
2189: