[Home] [Help]
1: PACKAGE BODY hxc_self_service_time_deposit AS
2: /* $Header: hxctcdpwr.pkb 120.6 2006/03/23 23:20:44 sgadipal noship $ */
3:
4: g_debug boolean := hr_utility.debug_enabled;
5: --AI7
47: g_workflow workflow_info;
48: g_time_attribute_id NUMBER :=0;
49: g_security_type_id NUMBER := 0;
50:
51: g_package VARCHAR2(72) := 'HXC_SELF_SERVICE_TIME_DEPOSIT';
52: g_new_bbs VARCHAR2(2) := 'N';
53:
54: -- Bug 2384349
55: g_bld_blk_info_types t_bld_blk_info_types;
80: EXIT WHEN NOT p_mapping.exists(l_index);
81: IF(p_mapping(l_index).field_name = p_field_name) THEN
82: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
83: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
84: 'hxc_self_service_time_deposit.mapping_comp_info',
85: 'Found Mapping:'||p_mapping(l_index).field_name);
86: end if;
87: p_mapping_component.field_name := p_mapping(l_index).field_name;
88: p_mapping_component.segment := p_mapping(l_index).segment;
96: END LOOP;
97:
98: if(FND_LOG.LEVEL_ERROR>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
99: fnd_log.string(FND_LOG.LEVEL_ERROR,
100: 'hxc_self_service_time_deposit.mapping_comp_info',
101: 'Failed to find mapping'||p_field_name);
102: end if;
103:
104: END mapping_comp_info;
216: if(nvl(g_deposit_process_id,-1) <> p_deposit_process_id) then
217: -- load deposit process
218: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
219: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
220: 'HXC_SELF_SERVICE_TIME_DEPOSIT',
221: 'Loading Deposit Process');
222: end if;
223: g_deposit_process_id := p_deposit_process_id;
224:
224:
225: for dep_mapping_comp in csr_deposit_mapping(p_deposit_process_id) loop
226: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
227: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
228: 'HXC_SELF_SERVICE_TIME_DEPOSIT.CACHE_MAPPINGS',
229: 'Field Name'||dep_mapping_comp.field_name);
230: end if;
231:
232: g_deposit_mapping(l_index).segment := dep_mapping_comp.segment;
244: if(nvl(g_retrieval_process_id,-1) <> p_retrieval_process_id) then
245: -- load retrieval process
246: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
247: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
248: 'HXC_SELF_SERVICE_TIME_DEPOSIT.CACHE_MAPPINGS',
249: 'Loading Retrieval Process');
250: end if;
251: g_retrieval_process_id := p_retrieval_process_id;
252:
252:
253: for ret_mapping_comp in csr_retrieval_mapping(p_retrieval_process_id) loop
254: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
255: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
256: 'HXC_SELF_SERVICE_TIME_DEPOSIT.CACHE_MAPPINGS',
257: 'Field Name'||ret_mapping_comp.field_name);
258: end if;
259:
260: g_retrieval_mapping(l_index).segment := ret_mapping_comp.segment;
284: ,p_text IN VARCHAR2
285: ,p_resource_id in NUMBER
286: ) IS
287:
288: l_loc VARCHAR2(70) := 'HXC_SELF_SERVICE_TIME_DEPOSIT.'|| p_procedure;
289:
290: BEGIN
291:
292: g_debug_count := g_debug_count + 1;
318: ,p_reference IN NUMBER
319: ,p_text IN VARCHAR2
320: ) IS
321:
322: l_loc VARCHAR2(70) := 'HXC_SELF_SERVICE_TIME_DEPOSIT.'|| p_procedure;
323:
324: BEGIN
325:
326: g_debug_count := g_debug_count + 1;
971:
972: BEGIN
973: if(FND_LOG.LEVEL_PROCEDURE>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
974: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
975: 'HXC_SELF_SERVICE_TIME_DEPOSIT.CORRECT_UPDATE_FLAGS',
976: 'Entering');
977: end if;
978:
979: -- loop over blocks in global (non-application) block structure
992: g_timecard(x).changed:='N';
993:
994: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
995: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
996: 'HXC_SELF_SERVICE_TIME_DEPOSIT.CORRECT_UPDATE_FLAGS',
997: 'Updating CHANGED flag for tbbid:'||g_timecard(x).time_building_block_id);
998: end if;
999:
1000: end if;
1013: -- as it must be the same as the orginal block
1014:
1015: if(FND_LOG.LEVEL_PROCEDURE>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1016: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1017: 'HXC_SELF_SERVICE_TIME_DEPOSIT.CORRECT_UPDATE_FLAGS',
1018: 'Leaving');
1019: end if;
1020:
1021: END correct_update_flags;
2046: AND
2047: (g_attributes(l_attribute_count).attribute_category = p_to_check)
2048: ) THEN
2049: if(1>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2050: fnd_log.string(1,'hxc_self_service_time_deposit.attribute_check',
2051: ' Found the expected attribute');
2052: end if;
2053:
2054: l_doesnt_exist := FALSE;
2188: -- Create the time attribute for security for this block
2189: -- if a security context doesn't already exist
2190: --
2191: if(1>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2192: fnd_log.string(1,'hxc_self_service_time_deposit.add_security',
2193: ' tbb '||g_timecard(l_block_count).time_building_block_id);
2194: end if;
2195:
2196: l_create := attribute_check
2202: IF l_create THEN
2203:
2204:
2205: if(1>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2206: fnd_log.string(1,'hxc_self_service_time_deposit.add_security',
2207: ' Creating a security attribute!');
2208: end if;
2209:
2210:
4001: l_found_name BOOLEAN := FALSE;
4002: l_index BINARY_INTEGER;
4003: l_index_tc NUMBER :=0;
4004:
4005: l_translated_bb_tab hxc_self_service_time_deposit.translate_bb_ids_tab;
4006: l_translated_ta_tab hxc_self_service_time_deposit.translate_ta_ids_tab;
4007:
4008: l_application_set_id NUMBER;
4009:
4002: l_index BINARY_INTEGER;
4003: l_index_tc NUMBER :=0;
4004:
4005: l_translated_bb_tab hxc_self_service_time_deposit.translate_bb_ids_tab;
4006: l_translated_ta_tab hxc_self_service_time_deposit.translate_ta_ids_tab;
4007:
4008: l_application_set_id NUMBER;
4009:
4010: l_ind BINARY_INTEGER;
4045:
4046: -- Set security information from profiles AI8
4047: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4048: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4049: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4050: 'start the set_security');
4051: end if;
4052:
4053: set_security(p_validate_session);
4053: set_security(p_validate_session);
4054:
4055: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4056: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4057: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4058: 'end the set_security');
4059: end if;
4060:
4061: -- Add the security context if required
4065:
4066: -- Correct update flags to reflect database inserts
4067: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4068: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4069: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4070: 'start the correct_update_flags');
4071: end if;
4072:
4073: correct_update_flags(p_allow_error_tc);
4073: correct_update_flags(p_allow_error_tc);
4074:
4075: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4076: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4077: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4078: 'end the correct_update_flags');
4079: end if;
4080:
4081: -- Next translate the entered attributes into the real attributes, in case
4081: -- Next translate the entered attributes into the real attributes, in case
4082: -- there were any aliased fields on the timecard.
4083: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4084: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4085: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4086: 'start the alias_translation');
4087: end if;
4088:
4089: alias_translation;
4089: alias_translation;
4090:
4091: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4092: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4093: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4094: 'end the alias_translation');
4095: end if;
4096:
4097: --
4098: -- Don't do any validation for templates!
4099: --
4100: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4101: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4102: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4103: 'g_timecard_block_oder(1)).scope :');
4104: end if;
4105:
4106: if (instr(g_timecard(
4108:
4109: -- Don't do the validation for save!
4110: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4111: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4112: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4113: 'p_mode :'||p_mode);
4114: end if;
4115:
4116: if(p_mode <> 'SAVE') then
4255: -- submit.
4256: --
4257: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4258: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4259: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4260: 'g_app_attributes step ');
4261: end if;
4262:
4263: g_app_attributes := build_application_attributes(
4267:
4268:
4269: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4270: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4271: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4272: 'HXC_SETUP_VALIDATION_PKG.EXECUTE_OTC_VALIDATION step ');
4273: end if;
4274: /*
4275: HXC_SETUP_VALIDATION_PKG.EXECUTE_OTC_VALIDATION
4404: CLOSE csr_get_auto_approve;
4405:
4406: -- GPM v115.58
4407:
4408: HXC_SELF_SERVICE_TIME_DEPOSIT.SET_WORKFLOW_INFO(P_ITEM_TYPE =>'HXCEMP',
4409: P_PROCESS_NAME => 'HXC_APPROVAL');
4410:
4411: -- loop through the global table to override the
4412: -- approval style id
4431:
4432:
4433: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4434: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4435: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4436: 'l_block :'||l_block);
4437: end if;
4438:
4439: LOOP
4487:
4488: BEGIN
4489: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4490: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4491: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4492: 'process 2 ');
4493: end if;
4494:
4495:
4529: end if;
4530:
4531: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4532: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4533: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4534: 'l_time_building_block_id :'||l_time_building_block_id||
4535: ' l_object_version_number :'||l_object_version_number);
4536: end if;
4537:
4557: l_max_ovn := l_object_version_number;
4558: END IF;
4559: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4560: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4561: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4562: 'l_max_ovn :'||l_max_ovn);
4563: end if;
4564: --
4565: -- Once the building block has been deposited, we can find all
4568: -- db created building block
4569: --
4570: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4571: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4572: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4573: 'z :');
4574: end if;
4575:
4576: l_index_tc := g_timecard.first;
4640: ) THEN
4641: BEGIN
4642: if(FND_LOG.LEVEL_STATEMENT>=FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
4643: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4644: 'hxc_self_service_time_deposit.start_deposit_wrapper',
4645: 'process :'||g_timecard(x).time_building_block_id);
4646: end if;
4647:
4648: hxc_deposit_process_pkg.execute_deposit_process
5181: l_pref_value VARCHAR2(170) := NULL;
5182:
5183: begin
5184:
5185: HXC_SELF_SERVICE_TIME_DEPOSIT.SET_WORKFLOW_INFO(P_ITEM_TYPE =>'HXCEMP',
5186: P_PROCESS_NAME => 'HXC_APPROVAL');
5187: HXC_SELF_SERVICE_TIME_DEPOSIT.INITIALIZE_GLOBALS;
5188:
5189: -- Pick up the timecard block. Trap the no_data_found exeption for this
5183: begin
5184:
5185: HXC_SELF_SERVICE_TIME_DEPOSIT.SET_WORKFLOW_INFO(P_ITEM_TYPE =>'HXCEMP',
5186: P_PROCESS_NAME => 'HXC_APPROVAL');
5187: HXC_SELF_SERVICE_TIME_DEPOSIT.INITIALIZE_GLOBALS;
5188:
5189: -- Pick up the timecard block. Trap the no_data_found exeption for this
5190: -- pl/sql block as it means that p_timecard_block is not a valid building_block
5191:
5191:
5192: begin
5193: for l_tc in get_timecard_building_block(p_time_building_block_id) loop
5194:
5195: HXC_SELF_SERVICE_TIME_DEPOSIT.deposit_block_info(
5196: P_TIME_BUILDING_BLOCK_ID => l_tc.tbb_tim_id
5197: ,P_TYPE => l_tc.tbb_tim_type
5198: ,P_MEASURE => l_tc.tbb_tim_measure
5199: ,P_UNIT_OF_MEASURE => l_tc.tbb_tim_unit_of_measure
5216: );
5217:
5218: for l_tc_attribute in get_attributes(l_tc.tbb_tim_id, l_tc.tbb_tim_ovn) loop
5219:
5220: HXC_SELF_SERVICE_TIME_DEPOSIT.deposit_attribute_info(
5221: p_TIME_ATTRIBUTE_ID => l_tc_attribute.ta_id
5222: ,p_BUILDING_BLOCK_ID => l_tc.tbb_tim_id
5223: ,p_BLD_BLK_INFO_TYPE => l_tc_attribute.ta_BLD_BLK_INFO_TYPE
5224: ,p_ATTRIBUTE_CATEGORY => l_tc_attribute.ta_ATTRIBUTE_CATEGORY
5314: -- now for the DETAILs
5315:
5316: for l_detail in get_detail_building_blocks(l_timecard_block,l_timecard_ovn) loop
5317:
5318: HXC_SELF_SERVICE_TIME_DEPOSIT.deposit_block_info(
5319: P_TIME_BUILDING_BLOCK_ID => l_detail.tbb_det_id
5320: ,P_TYPE => l_detail.tbb_det_type
5321: ,P_MEASURE => l_detail.tbb_det_measure
5322: ,P_UNIT_OF_MEASURE => l_detail.tbb_det_unit_of_measure
5339: );
5340:
5341: for l_detail_attribute in get_attributes(l_detail.tbb_det_id, l_detail.tbb_det_ovn) loop
5342:
5343: HXC_SELF_SERVICE_TIME_DEPOSIT.deposit_attribute_info(
5344: p_TIME_ATTRIBUTE_ID => l_detail_attribute.ta_id
5345: ,p_BUILDING_BLOCK_ID => l_detail.tbb_det_id
5346: ,p_BLD_BLK_INFO_TYPE => l_detail_attribute.ta_BLD_BLK_INFO_TYPE
5347: ,p_ATTRIBUTE_CATEGORY => l_detail_attribute.ta_ATTRIBUTE_CATEGORY
5385: -- now for the DAYs
5386:
5387: for l_day in get_day_building_blocks(l_timecard_block,l_timecard_ovn) loop
5388:
5389: HXC_SELF_SERVICE_TIME_DEPOSIT.deposit_block_info(
5390: P_TIME_BUILDING_BLOCK_ID => l_day.tbb_day_id
5391: ,P_TYPE => l_day.tbb_day_type
5392: ,P_MEASURE => l_day.tbb_day_measure
5393: ,P_UNIT_OF_MEASURE => l_day.tbb_day_unit_of_measure
5411: );
5412:
5413: for l_day_attribute in get_attributes(l_day.tbb_day_id, l_day.tbb_day_ovn) loop
5414:
5415: HXC_SELF_SERVICE_TIME_DEPOSIT.deposit_attribute_info(
5416: p_TIME_ATTRIBUTE_ID => l_day_attribute.ta_id
5417: ,p_BUILDING_BLOCK_ID => l_day.tbb_day_id
5418: ,p_BLD_BLK_INFO_TYPE => l_day_attribute.ta_BLD_BLK_INFO_TYPE
5419: ,p_ATTRIBUTE_CATEGORY => l_day_attribute.ta_ATTRIBUTE_CATEGORY
5456: end loop;
5457:
5458: -- now deposit the delete timecard
5459:
5460: HXC_SELF_SERVICE_TIME_DEPOSIT.DEPOSIT_BLOCKS
5461: (p_timecard_id => l_returned_timecard_id
5462: ,p_timecard_ovn => l_returned_timecard_ovn
5463: ,p_mode => p_mode
5464: ,p_deposit_process => p_deposit_process
5559: --
5560: PROCEDURE get_timecard_tables (
5561: p_timecard_id IN NUMBER,
5562: p_timecard_ovn IN NUMBER,
5563: p_timecard_blocks OUT NOCOPY hxc_self_service_time_deposit.timecard_info,
5564: p_timecard_app_attributes OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info,
5565: p_time_recipient_id IN NUMBER
5566: )
5567: IS
5560: PROCEDURE get_timecard_tables (
5561: p_timecard_id IN NUMBER,
5562: p_timecard_ovn IN NUMBER,
5563: p_timecard_blocks OUT NOCOPY hxc_self_service_time_deposit.timecard_info,
5564: p_timecard_app_attributes OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info,
5565: p_time_recipient_id IN NUMBER
5566: )
5567: IS
5568: CURSOR csr_time_recipients (p_time_recipient_id IN NUMBER)
5602:
5603: PROCEDURE get_timecard_tables (
5604: p_timecard_id IN NUMBER,
5605: p_timecard_ovn IN NUMBER,
5606: p_timecard_blocks OUT NOCOPY hxc_self_service_time_deposit.timecard_info,
5607: p_timecard_app_attributes OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info,
5608: p_deposit_process_id IN NUMBER,
5609: p_retrieval_process_id IN NUMBER
5610: )
5603: PROCEDURE get_timecard_tables (
5604: p_timecard_id IN NUMBER,
5605: p_timecard_ovn IN NUMBER,
5606: p_timecard_blocks OUT NOCOPY hxc_self_service_time_deposit.timecard_info,
5607: p_timecard_app_attributes OUT NOCOPY hxc_self_service_time_deposit.app_attributes_info,
5608: p_deposit_process_id IN NUMBER,
5609: p_retrieval_process_id IN NUMBER
5610: )
5611: IS
5734: g_attributes := p_attributes;
5735:
5736: END set_g_attributes;
5737: --
5738: end hxc_self_service_time_deposit;