[Home] [Help]
6689: from ben_copy_entity_results cpe,
6690: pqh_table_route tr
6691: where cpe.copy_entity_txn_id = p_copy_entity_txn_id
6692: and cpe.table_route_id = tr.table_route_id
6693: -- and tr.where_clause = l_BEN_PGM_F
6694: and tr.table_alias = l_table_alias
6695: and cpe.number_of_copies = 1 --ADDITION
6696: group by cpe.information1,cpe.information2,cpe.information3, cpe.INFORMATION170, cpe.table_route_id,cpe.dml_operation,cpe.datetrack_mode
6697: order by cpe.information1, cpe.information2 /* Bug 5076363 */;
6727: c_business_group_id number,
6728: c_new_pk_id number) is
6729: select
6730: PGM.pgm_id new_value
6731: from BEN_PGM_F PGM
6732: where PGM.name = c_PGM_name
6733: and PGM.business_group_id = c_business_group_id
6734: and PGM.pgm_id <> c_new_pk_id
6735: --TEMPIK
6737: and effective_end_date ;
6738: --END TEMPIK
6739: /*TEMPIK
6740: and exists ( select null
6741: from BEN_PGM_F PGM1
6742: where PGM1.name = c_PGM_name
6743: and PGM1.business_group_id = c_business_group_id
6744: and PGM1.effective_start_date <= c_effective_start_date )
6745: and exists ( select null
6742: where PGM1.name = c_PGM_name
6743: and PGM1.business_group_id = c_business_group_id
6744: and PGM1.effective_start_date <= c_effective_start_date )
6745: and exists ( select null
6746: from BEN_PGM_F PGM2
6747: where PGM2.name = c_PGM_name
6748: and PGM2.business_group_id = c_business_group_id
6749: and PGM2.effective_end_date >= c_effective_end_date )
6750: ;
6794: l_DFLT_INPUT_VALUE_ID number(15);
6795: --
6796: --
6797: --ML
6798: l_susp_if_dpnt_ssn_nt_prv_cd ben_pgm_f.susp_if_dpnt_ssn_nt_prv_cd%type;
6799: l_susp_if_dpnt_dob_nt_prv_cd ben_pgm_f.susp_if_dpnt_dob_nt_prv_cd%type;
6800: l_susp_if_dpnt_adr_nt_prv_cd ben_pgm_f.susp_if_dpnt_adr_nt_prv_cd%type;
6801: --
6802: begin
6795: --
6796: --
6797: --ML
6798: l_susp_if_dpnt_ssn_nt_prv_cd ben_pgm_f.susp_if_dpnt_ssn_nt_prv_cd%type;
6799: l_susp_if_dpnt_dob_nt_prv_cd ben_pgm_f.susp_if_dpnt_dob_nt_prv_cd%type;
6800: l_susp_if_dpnt_adr_nt_prv_cd ben_pgm_f.susp_if_dpnt_adr_nt_prv_cd%type;
6801: --
6802: begin
6803: -- Initialization
6796: --
6797: --ML
6798: l_susp_if_dpnt_ssn_nt_prv_cd ben_pgm_f.susp_if_dpnt_ssn_nt_prv_cd%type;
6799: l_susp_if_dpnt_dob_nt_prv_cd ben_pgm_f.susp_if_dpnt_dob_nt_prv_cd%type;
6800: l_susp_if_dpnt_adr_nt_prv_cd ben_pgm_f.susp_if_dpnt_adr_nt_prv_cd%type;
6801: --
6802: begin
6803: -- Initialization
6804: l_object_found_in_target := false ;
6888: if c_find_PGM_in_target%found then
6889: --
6890: --TEMPIK
6891: l_dt_rec_found := dt_api.check_min_max_dates
6892: (p_base_table_name => 'BEN_PGM_F',
6893: p_base_key_column => 'PGM_ID',
6894: p_base_key_value => l_new_value,
6895: p_from_date => l_min_esd,
6896: p_to_date => l_max_eed );
6966: l_SCORES_CALC_RL := get_fk('FORMULA_ID', r_PGM.INFORMATION261,l_dml_operation );
6967: l_VRFY_FMLY_MMBR_RL := get_fk('FORMULA_ID', r_PGM.INFORMATION274,l_dml_operation );
6968: l_SALARY_CALC_MTHD_RL := get_fk('FORMULA_ID', r_PGM.INFORMATION293,l_dml_operation );
6969: --
6970: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PGM_F',l_prefix || r_PGM.INFORMATION170|| l_suffix);
6971: --
6972:
6973: l_effective_date := r_PGM.information2;
6974: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7008: --
7009:
7010: if l_first_rec and not l_update then
7011: -- Call Create routine.
7012: hr_utility.set_location(' BEN_PGM_F CREATE_PROGRAM ',20);
7013: BEN_PROGRAM_API.CREATE_PROGRAM(
7014: --
7015: P_VALIDATE => false
7016: ,P_EFFECTIVE_DATE => l_effective_date
7170: --
7171: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7172: --
7173: IF l_update OR l_dml_operation <> 'UPDATE' THEN
7174: hr_utility.set_location(' BEN_PGM_F UPDATE_PROGRAM ',30);
7175:
7176: BEN_PROGRAM_API.UPDATE_PROGRAM(
7177: --
7178: P_VALIDATE => false