1: Package BODY BEN_PD_COPY_TO_BEN_ONE as
2: /* $Header: bepdccp1.pkb 120.24 2006/12/04 09:44:53 vborkar noship $ */
3: --
4: -- {Start Of Comments}
5: --
1278:
1279: -- End Prefix Sufix derivation
1280: FOR r_fff_unique IN c_unique_fff ('FFF')
1281: LOOP
1282: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NULL
1283: OR (ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1284: AND r_fff_unique.information3 >= ben_pd_copy_to_ben_one.g_copy_effective_date
1285: )
1286: )
1279: -- End Prefix Sufix derivation
1280: FOR r_fff_unique IN c_unique_fff ('FFF')
1281: LOOP
1282: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NULL
1283: OR (ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1284: AND r_fff_unique.information3 >= ben_pd_copy_to_ben_one.g_copy_effective_date
1285: )
1286: )
1287: THEN
1280: FOR r_fff_unique IN c_unique_fff ('FFF')
1281: LOOP
1282: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NULL
1283: OR (ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1284: AND r_fff_unique.information3 >= ben_pd_copy_to_ben_one.g_copy_effective_date
1285: )
1286: )
1287: THEN
1288: --
1342: l_max_eed := NULL;
1343: OPEN c_fff_min_max_dates (r_fff_unique.table_route_id,r_fff_unique.information1);
1344: FETCH c_fff_min_max_dates INTO l_min_esd, l_max_eed;
1345:
1346: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1347: AND l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date
1348: )
1349: THEN
1350: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
1343: OPEN c_fff_min_max_dates (r_fff_unique.table_route_id,r_fff_unique.information1);
1344: FETCH c_fff_min_max_dates INTO l_min_esd, l_max_eed;
1345:
1346: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1347: AND l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date
1348: )
1349: THEN
1350: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
1351: END IF;
1346: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1347: AND l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date
1348: )
1349: THEN
1350: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
1351: END IF;
1352:
1353: -- l_min_esd := greatest(l_min_esd,r_XXX_unique.information2);
1354: hr_utility.set_location ('Formula l_min_esd,l_max_eed '|| l_min_esd,30);
1453: --
1454: END IF;
1455:
1456: --
1457: ben_pd_copy_to_ben_one.ben_chk_col_len ('FORMULA_NAME', 'FF_FORMULAS_F',l_prefix|| r_fff.information112|| l_suffix);
1458: l_effective_date := r_fff.information2;
1459:
1460: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1461: AND l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date
1456: --
1457: ben_pd_copy_to_ben_one.ben_chk_col_len ('FORMULA_NAME', 'FF_FORMULAS_F',l_prefix|| r_fff.information112|| l_suffix);
1458: l_effective_date := r_fff.information2;
1459:
1460: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1461: AND l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date
1462: )
1463: THEN
1464: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
1457: ben_pd_copy_to_ben_one.ben_chk_col_len ('FORMULA_NAME', 'FF_FORMULAS_F',l_prefix|| r_fff.information112|| l_suffix);
1458: l_effective_date := r_fff.information2;
1459:
1460: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1461: AND l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date
1462: )
1463: THEN
1464: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
1465: END IF;
1460: IF ( ben_pd_copy_to_ben_one.g_copy_effective_date IS NOT NULL
1461: AND l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date
1462: )
1463: THEN
1464: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
1465: END IF;
1466:
1467: IF l_first_rec AND NOT l_update
1468: THEN
1840: hr_utility.set_location(' BEN_ACTN_TYP CREATE_ACTION_TYPE ',20);
1841: BEN_ACTION_TYPE_API.CREATE_ACTION_TYPE(
1842: --
1843: P_VALIDATE => false
1844: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
1845: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
1846: --
1847:
1848: ,P_ACTN_TYP_ID => l_actn_typ_id
1907: end loop;
1908: --
1909: exception when others then
1910: --
1911: BEN_PD_COPY_TO_BEN_ONE.raise_error_message( 'EAT',r_eat.information5 );
1912: --
1913: end create_EAT_rows;
1914:
1915: -- ----------------------------------------------------------------------------
2063: -- End Initialization
2064:
2065: for r_CPL_unique in c_unique_CPL('CPL') loop
2066:
2067: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
2068: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2069: r_CPL_unique.information3 >=
2070: ben_pd_copy_to_ben_one.g_copy_effective_date)
2071: ) then
2064:
2065: for r_CPL_unique in c_unique_CPL('CPL') loop
2066:
2067: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
2068: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2069: r_CPL_unique.information3 >=
2070: ben_pd_copy_to_ben_one.g_copy_effective_date)
2071: ) then
2072: --
2066:
2067: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
2068: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2069: r_CPL_unique.information3 >=
2070: ben_pd_copy_to_ben_one.g_copy_effective_date)
2071: ) then
2072: --
2073: if p_prefix_suffix_cd = 'PREFIX' then
2074: l_prefix := p_prefix_suffix_text ;
2138: l_max_eed := null ;
2139: open c_CPL_min_max_dates(r_CPL_unique.table_route_id, r_CPL_unique.information1 ) ;
2140: fetch c_CPL_min_max_dates into l_min_esd,l_max_eed ;
2141:
2142: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2143: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2144: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
2145: end if;
2146: l_min_esd := greatest(l_min_esd,r_CPL_unique.information2);
2139: open c_CPL_min_max_dates(r_CPL_unique.table_route_id, r_CPL_unique.information1 ) ;
2140: fetch c_CPL_min_max_dates into l_min_esd,l_max_eed ;
2141:
2142: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2143: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2144: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
2145: end if;
2146: l_min_esd := greatest(l_min_esd,r_CPL_unique.information2);
2147: --
2140: fetch c_CPL_min_max_dates into l_min_esd,l_max_eed ;
2141:
2142: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2143: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2144: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
2145: end if;
2146: l_min_esd := greatest(l_min_esd,r_CPL_unique.information2);
2147: --
2148: /*
2173: p_from_date => l_min_esd,
2174: p_to_date => l_max_eed );
2175: if l_dt_rec_found THEN
2176: --END TEMPIK
2177: if r_CPL_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2178: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PLIP_ID' then
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2174: p_to_date => l_max_eed );
2175: if l_dt_rec_found THEN
2176: --END TEMPIK
2177: if r_CPL_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2178: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PLIP_ID' then
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2175: if l_dt_rec_found THEN
2176: --END TEMPIK
2177: if r_CPL_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2178: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PLIP_ID' then
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2176: --END TEMPIK
2177: if r_CPL_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2178: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PLIP_ID' then
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2184: --
2177: if r_CPL_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2178: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PLIP_ID' then
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2184: --
2185: -- -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2178: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PLIP_ID' then
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2184: --
2185: -- -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2186: --
2179: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2180: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL_unique.information1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2184: --
2185: -- -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2186: --
2187: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2181: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2182: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2184: --
2185: -- -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2186: --
2187: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2188: --
2189: log_data('CPL',l_new_value,l_prefix || r_CPL_unique.name|| l_suffix,'REUSED');
2183: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2184: --
2185: -- -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2186: --
2187: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2188: --
2189: log_data('CPL',l_new_value,l_prefix || r_CPL_unique.name|| l_suffix,'REUSED');
2190: --
2191: end if ;
2247: l_first_rec := true ;
2248: --
2249: end if ;
2250: --
2251: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_PLIP_F' ,l_prefix || r_CPL.information170 || l_suffix);
2252: --
2253:
2254: l_effective_date := r_CPL.information2;
2255: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2251: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_PLIP_F' ,l_prefix || r_CPL.information170 || l_suffix);
2252: --
2253:
2254: l_effective_date := r_CPL.information2;
2255: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2256: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2257: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
2258: end if;
2259:
2252: --
2253:
2254: l_effective_date := r_CPL.information2;
2255: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2256: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2257: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
2258: end if;
2259:
2260: if l_first_rec and not l_update then
2253:
2254: l_effective_date := r_CPL.information2;
2255: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2256: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2257: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
2258: end if;
2259:
2260: if l_first_rec and not l_update then
2261: -- Call Create routine.
2308: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2309: -- Update all relevent cer records with new pk_id
2310: hr_utility.set_location('Before plsql table ',222);
2311: hr_utility.set_location('new_value id '||l_cmbn_plip_id,222);
2312: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2313: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL.information1 ;
2314: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PLIP_ID ;
2315: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2316: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2309: -- Update all relevent cer records with new pk_id
2310: hr_utility.set_location('Before plsql table ',222);
2311: hr_utility.set_location('new_value id '||l_cmbn_plip_id,222);
2312: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2313: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL.information1 ;
2314: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PLIP_ID ;
2315: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2316: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2317: hr_utility.set_location('After plsql table ',222);
2310: hr_utility.set_location('Before plsql table ',222);
2311: hr_utility.set_location('new_value id '||l_cmbn_plip_id,222);
2312: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2313: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL.information1 ;
2314: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PLIP_ID ;
2315: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2316: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2317: hr_utility.set_location('After plsql table ',222);
2318: --
2311: hr_utility.set_location('new_value id '||l_cmbn_plip_id,222);
2312: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2313: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL.information1 ;
2314: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PLIP_ID ;
2315: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2316: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2317: hr_utility.set_location('After plsql table ',222);
2318: --
2319: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2312: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PLIP_ID' ;
2313: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPL.information1 ;
2314: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PLIP_ID ;
2315: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2316: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2317: hr_utility.set_location('After plsql table ',222);
2318: --
2319: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2320: --
2315: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2316: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPL_unique.table_route_id;
2317: hr_utility.set_location('After plsql table ',222);
2318: --
2319: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2320: --
2321: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2322: --
2323: log_data('CPL',l_new_value,l_prefix || r_CPL.information170 || l_suffix,'COPIED');
2317: hr_utility.set_location('After plsql table ',222);
2318: --
2319: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2320: --
2321: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2322: --
2323: log_data('CPL',l_new_value,l_prefix || r_CPL.information170 || l_suffix,'COPIED');
2324: --
2325: else
2580: -- End Initialization
2581:
2582: for r_CBP_unique in c_unique_CBP('CBP') loop
2583:
2584: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
2585: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2586: r_CBP_unique.information3 >=
2587: ben_pd_copy_to_ben_one.g_copy_effective_date)
2588: ) then
2581:
2582: for r_CBP_unique in c_unique_CBP('CBP') loop
2583:
2584: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
2585: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2586: r_CBP_unique.information3 >=
2587: ben_pd_copy_to_ben_one.g_copy_effective_date)
2588: ) then
2589: --
2583:
2584: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
2585: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2586: r_CBP_unique.information3 >=
2587: ben_pd_copy_to_ben_one.g_copy_effective_date)
2588: ) then
2589: --
2590: if p_prefix_suffix_cd = 'PREFIX' then
2591: l_prefix := p_prefix_suffix_text ;
2610: open c_CBP_min_max_dates(r_CBP_unique.table_route_id, r_CBP_unique.information1 ) ;
2611: fetch c_CBP_min_max_dates into l_min_esd,l_max_eed ;
2612: --
2613:
2614: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2615: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2616: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
2617: end if;
2618: l_min_esd := greatest(l_min_esd,r_CBP_unique.information2);
2611: fetch c_CBP_min_max_dates into l_min_esd,l_max_eed ;
2612: --
2613:
2614: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2615: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2616: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
2617: end if;
2618: l_min_esd := greatest(l_min_esd,r_CBP_unique.information2);
2619: open c_CBP(r_CBP_unique.table_route_id,
2612: --
2613:
2614: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2615: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2616: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
2617: end if;
2618: l_min_esd := greatest(l_min_esd,r_CBP_unique.information2);
2619: open c_CBP(r_CBP_unique.table_route_id,
2620: r_CBP_unique.information1,
2678: p_to_date => l_max_eed );
2679: if l_dt_rec_found THEN
2680: --END TEMPIK
2681: --
2682: if r_CBP_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2683: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_ID' then
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2679: if l_dt_rec_found THEN
2680: --END TEMPIK
2681: --
2682: if r_CBP_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2683: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_ID' then
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2680: --END TEMPIK
2681: --
2682: if r_CBP_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2683: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_ID' then
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2681: --
2682: if r_CBP_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2683: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_ID' then
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2689: --
2682: if r_CBP_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
2683: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_ID' then
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2689: --
2690: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2683: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_ID' then
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2689: --
2690: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2691: --
2684: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2685: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP_unique.information1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2689: --
2690: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2691: --
2692: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2686: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
2687: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2689: --
2690: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2691: --
2692: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2693: --
2694: log_data('CBP',l_new_value,l_prefix || r_CBP_unique.name|| l_suffix,'REUSED');
2688: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2689: --
2690: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
2691: --
2692: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2693: --
2694: log_data('CBP',l_new_value,l_prefix || r_CBP_unique.name|| l_suffix,'REUSED');
2695: --
2696: end if ;
2747: l_first_rec := true ;
2748: --
2749: end if ;
2750: --
2751: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_PTIP_F' ,l_prefix || r_CBP.INFORMATION170 || l_suffix);
2752: --
2753:
2754: l_effective_date := r_CBP.information2;
2755: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2751: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_PTIP_F' ,l_prefix || r_CBP.INFORMATION170 || l_suffix);
2752: --
2753:
2754: l_effective_date := r_CBP.information2;
2755: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2756: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2757: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
2758: end if;
2759:
2752: --
2753:
2754: l_effective_date := r_CBP.information2;
2755: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2756: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2757: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
2758: end if;
2759:
2760: if l_first_rec and not l_update then
2753:
2754: l_effective_date := r_CBP.information2;
2755: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
2756: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
2757: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
2758: end if;
2759:
2760: if l_first_rec and not l_update then
2761: -- Call Create routine.
2808: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2809: -- Update all relevent cer records with new pk_id
2810: hr_utility.set_location('Before plsql table ',222);
2811: hr_utility.set_location('new_value id '||l_cmbn_ptip_id,222);
2812: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2813: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP.information1 ;
2814: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_ID ;
2815: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2816: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2809: -- Update all relevent cer records with new pk_id
2810: hr_utility.set_location('Before plsql table ',222);
2811: hr_utility.set_location('new_value id '||l_cmbn_ptip_id,222);
2812: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2813: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP.information1 ;
2814: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_ID ;
2815: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2816: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2817: hr_utility.set_location('After plsql table ',222);
2810: hr_utility.set_location('Before plsql table ',222);
2811: hr_utility.set_location('new_value id '||l_cmbn_ptip_id,222);
2812: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2813: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP.information1 ;
2814: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_ID ;
2815: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2816: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2817: hr_utility.set_location('After plsql table ',222);
2818: --
2811: hr_utility.set_location('new_value id '||l_cmbn_ptip_id,222);
2812: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2813: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP.information1 ;
2814: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_ID ;
2815: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2816: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2817: hr_utility.set_location('After plsql table ',222);
2818: --
2819: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2812: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_ID' ;
2813: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CBP.information1 ;
2814: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_ID ;
2815: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2816: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2817: hr_utility.set_location('After plsql table ',222);
2818: --
2819: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2820: --
2815: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
2816: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CBP_unique.table_route_id;
2817: hr_utility.set_location('After plsql table ',222);
2818: --
2819: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2820: --
2821: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2822: --
2823: log_data('CBP',l_new_value,l_prefix || r_CBP.INFORMATION170 || l_suffix,'COPIED');
2817: hr_utility.set_location('After plsql table ',222);
2818: --
2819: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
2820: --
2821: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2822: --
2823: log_data('CBP',l_new_value,l_prefix || r_CBP.INFORMATION170 || l_suffix,'COPIED');
2824: --
2825: else
3061: -- End Initialization
3062:
3063: for r_CPT_unique in c_unique_CPT('CPT') loop
3064:
3065: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
3066: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3067: r_CPT_unique.information3 >=
3068: ben_pd_copy_to_ben_one.g_copy_effective_date)
3069: ) then
3062:
3063: for r_CPT_unique in c_unique_CPT('CPT') loop
3064:
3065: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
3066: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3067: r_CPT_unique.information3 >=
3068: ben_pd_copy_to_ben_one.g_copy_effective_date)
3069: ) then
3070: --
3064:
3065: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
3066: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3067: r_CPT_unique.information3 >=
3068: ben_pd_copy_to_ben_one.g_copy_effective_date)
3069: ) then
3070: --
3071: if p_prefix_suffix_cd = 'PREFIX' then
3072: l_prefix := p_prefix_suffix_text ;
3091: open c_CPT_min_max_dates(r_CPT_unique.table_route_id, r_CPT_unique.information1 ) ;
3092: fetch c_CPT_min_max_dates into l_min_esd,l_max_eed ;
3093: --
3094:
3095: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3096: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3097: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
3098: end if;
3099: l_min_esd := greatest(l_min_esd,r_CPT_unique.information2);
3092: fetch c_CPT_min_max_dates into l_min_esd,l_max_eed ;
3093: --
3094:
3095: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3096: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3097: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
3098: end if;
3099: l_min_esd := greatest(l_min_esd,r_CPT_unique.information2);
3100: open c_CPT(r_CPT_unique.table_route_id,
3093: --
3094:
3095: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3096: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3097: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
3098: end if;
3099: l_min_esd := greatest(l_min_esd,r_CPT_unique.information2);
3100: open c_CPT(r_CPT_unique.table_route_id,
3101: r_CPT_unique.information1,
3161: p_from_date => l_min_esd,
3162: p_to_date => l_max_eed );
3163: if l_dt_rec_found THEN
3164: --END TEMPIK
3165: if r_CPT_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
3166: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_OPT_ID' then
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3162: p_to_date => l_max_eed );
3163: if l_dt_rec_found THEN
3164: --END TEMPIK
3165: if r_CPT_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
3166: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_OPT_ID' then
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3163: if l_dt_rec_found THEN
3164: --END TEMPIK
3165: if r_CPT_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
3166: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_OPT_ID' then
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3164: --END TEMPIK
3165: if r_CPT_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
3166: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_OPT_ID' then
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3172: --
3165: if r_CPT_unique.information1 <> nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).old_value, -999) or
3166: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_OPT_ID' then
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3172: --
3173: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
3166: nvl(ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count-1).pk_id_column, '999') <> 'CMBN_PTIP_OPT_ID' then
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3172: --
3173: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
3174: --
3167: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3168: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT_unique.information1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3172: --
3173: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
3174: --
3175: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
3169: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_new_value ;
3170: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'REUSED';
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3172: --
3173: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
3174: --
3175: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
3176: --
3177: log_data('CPT',l_new_value,l_prefix || r_CPT_unique.name|| l_suffix,'REUSED');
3171: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3172: --
3173: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count) , p_copy_entity_txn_id) ;
3174: --
3175: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
3176: --
3177: log_data('CPT',l_new_value,l_prefix || r_CPT_unique.name|| l_suffix,'REUSED');
3178: --
3179: end if ;
3231: l_first_rec := true ;
3232: --
3233: end if ;
3234: --
3235: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_PTIP_OPT_F' ,l_prefix || r_CPT.INFORMATION170 || l_suffix);
3236: --
3237:
3238: l_effective_date := r_CPT.information2;
3239: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3235: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_PTIP_OPT_F' ,l_prefix || r_CPT.INFORMATION170 || l_suffix);
3236: --
3237:
3238: l_effective_date := r_CPT.information2;
3239: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3240: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3241: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
3242: end if;
3243:
3236: --
3237:
3238: l_effective_date := r_CPT.information2;
3239: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3240: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3241: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
3242: end if;
3243:
3244: if l_first_rec and not l_update then
3237:
3238: l_effective_date := r_CPT.information2;
3239: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3240: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3241: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
3242: end if;
3243:
3244: if l_first_rec and not l_update then
3245: -- Call Create routine.
3294: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3295: -- Update all relevent cer records with new pk_id
3296: hr_utility.set_location('Before plsql table ',222);
3297: hr_utility.set_location('new_value id '||l_cmbn_ptip_opt_id,222);
3298: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3299: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT.information1 ;
3300: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_OPT_ID ;
3301: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
3302: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3295: -- Update all relevent cer records with new pk_id
3296: hr_utility.set_location('Before plsql table ',222);
3297: hr_utility.set_location('new_value id '||l_cmbn_ptip_opt_id,222);
3298: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3299: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT.information1 ;
3300: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_OPT_ID ;
3301: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
3302: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3303: hr_utility.set_location('After plsql table ',222);
3296: hr_utility.set_location('Before plsql table ',222);
3297: hr_utility.set_location('new_value id '||l_cmbn_ptip_opt_id,222);
3298: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3299: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT.information1 ;
3300: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_OPT_ID ;
3301: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
3302: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3303: hr_utility.set_location('After plsql table ',222);
3304: --
3297: hr_utility.set_location('new_value id '||l_cmbn_ptip_opt_id,222);
3298: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3299: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT.information1 ;
3300: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_OPT_ID ;
3301: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
3302: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3303: hr_utility.set_location('After plsql table ',222);
3304: --
3305: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
3298: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'CMBN_PTIP_OPT_ID' ;
3299: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_CPT.information1 ;
3300: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_CMBN_PTIP_OPT_ID ;
3301: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
3302: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3303: hr_utility.set_location('After plsql table ',222);
3304: --
3305: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
3306: --
3301: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
3302: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_CPT_unique.table_route_id;
3303: hr_utility.set_location('After plsql table ',222);
3304: --
3305: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
3306: --
3307: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
3308: --
3309: log_data('CPT',l_new_value,l_prefix || r_CPT.INFORMATION170 || l_suffix,'COPIED');
3303: hr_utility.set_location('After plsql table ',222);
3304: --
3305: -- update_cer_with_target( ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count),p_copy_entity_txn_id ) ;
3306: --
3307: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
3308: --
3309: log_data('CPT',l_new_value,l_prefix || r_CPT.INFORMATION170 || l_suffix,'COPIED');
3310: --
3311: else
3571: end if ;
3572: -- End Prefix Sufix derivation
3573: for r_BNB_unique in c_unique_BNB('BNB') loop
3574:
3575: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
3576: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3577: r_BNB_unique.information3 >=
3578: ben_pd_copy_to_ben_one.g_copy_effective_date)
3579: ) then
3572: -- End Prefix Sufix derivation
3573: for r_BNB_unique in c_unique_BNB('BNB') loop
3574:
3575: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
3576: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3577: r_BNB_unique.information3 >=
3578: ben_pd_copy_to_ben_one.g_copy_effective_date)
3579: ) then
3580: --
3574:
3575: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
3576: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3577: r_BNB_unique.information3 >=
3578: ben_pd_copy_to_ben_one.g_copy_effective_date)
3579: ) then
3580: --
3581: hr_utility.set_location(' r_BNB_unique.table_route_id '||r_BNB_unique.table_route_id,10);
3582: hr_utility.set_location(' r_BNB_unique.information1 '||r_BNB_unique.information1,10);
3629: l_max_eed := null ;
3630: open c_BNB_min_max_dates(r_BNB_unique.table_route_id, r_BNB_unique.information1 ) ;
3631: fetch c_BNB_min_max_dates into l_min_esd,l_max_eed ;
3632: --
3633: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3634: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3635: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
3636: end if;
3637: l_min_esd := greatest(l_min_esd,r_BNB_unique.information2);
3630: open c_BNB_min_max_dates(r_BNB_unique.table_route_id, r_BNB_unique.information1 ) ;
3631: fetch c_BNB_min_max_dates into l_min_esd,l_max_eed ;
3632: --
3633: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3634: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3635: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
3636: end if;
3637: l_min_esd := greatest(l_min_esd,r_BNB_unique.information2);
3638: if p_reuse_object_flag = 'Y' then
3631: fetch c_BNB_min_max_dates into l_min_esd,l_max_eed ;
3632: --
3633: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3634: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3635: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
3636: end if;
3637: l_min_esd := greatest(l_min_esd,r_BNB_unique.information2);
3638: if p_reuse_object_flag = 'Y' then
3639: if c_BNB_min_max_dates%found then
3711: l_first_rec := true ;
3712: --
3713: end if ;
3714: --
3715: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_BNFTS_BAL_F' ,l_prefix || r_BNB.INFORMATION170 || l_suffix);
3716: --
3717:
3718: l_effective_date := r_BNB.information2;
3719: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3715: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_BNFTS_BAL_F' ,l_prefix || r_BNB.INFORMATION170 || l_suffix);
3716: --
3717:
3718: l_effective_date := r_BNB.information2;
3719: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3720: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3721: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
3722: end if;
3723: --UPD START
3716: --
3717:
3718: l_effective_date := r_BNB.information2;
3719: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3720: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3721: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
3722: end if;
3723: --UPD START
3724: --if l_first_rec and not l_update then
3717:
3718: l_effective_date := r_BNB.information2;
3719: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
3720: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
3721: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
3722: end if;
3723: --UPD START
3724: --if l_first_rec and not l_update then
3725: if l_first_rec and not l_update then
4154: l_first_rec := true ;
4155: --
4156: end if ;
4157: --
4158: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_COMP_LVL_FCTR' ,l_prefix || r_CLF.INFORMATION170 || l_suffix);
4159: --
4160:
4161: l_parent_effective_start_date := r_CLF.information10;
4162: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4158: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_COMP_LVL_FCTR' ,l_prefix || r_CLF.INFORMATION170 || l_suffix);
4159: --
4160:
4161: l_parent_effective_start_date := r_CLF.information10;
4162: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4163: if l_parent_effective_start_date is null then
4164: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4165: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4166: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4160:
4161: l_parent_effective_start_date := r_CLF.information10;
4162: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4163: if l_parent_effective_start_date is null then
4164: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4165: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4166: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4167: end if;
4168: end if;
4161: l_parent_effective_start_date := r_CLF.information10;
4162: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4163: if l_parent_effective_start_date is null then
4164: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4165: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4166: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4167: end if;
4168: end if;
4169:
4162: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4163: if l_parent_effective_start_date is null then
4164: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4165: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4166: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4167: end if;
4168: end if;
4169:
4170: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
4166: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4167: end if;
4168: end if;
4169:
4170: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
4171: l_defined_balance_id := r_CLF.information176 ;
4172: else
4173: l_defined_balance_id := r_CLF.information174 ;
4174: end if ;
4591: hr_utility.set_location(' true',20);
4592: --
4593: end if ;
4594: --
4595: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
4596: l_DEFINED_BALANCE_ID := r_HWF.information176; -- Mapping
4597: else
4598: l_DEFINED_BALANCE_ID := r_HWF.information174;
4599: end if;
4597: else
4598: l_DEFINED_BALANCE_ID := r_HWF.information174;
4599: end if;
4600: --
4601: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_HRS_WKD_IN_PERD_FCTR' ,l_prefix || r_HWF.INFORMATION170 || l_suffix);
4602: --
4603:
4604: l_parent_effective_start_date := r_HWF.information10;
4605: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4601: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_HRS_WKD_IN_PERD_FCTR' ,l_prefix || r_HWF.INFORMATION170 || l_suffix);
4602: --
4603:
4604: l_parent_effective_start_date := r_HWF.information10;
4605: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4606: if l_parent_effective_start_date is null then
4607: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4608: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4609: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4603:
4604: l_parent_effective_start_date := r_HWF.information10;
4605: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4606: if l_parent_effective_start_date is null then
4607: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4608: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4609: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4610: end if;
4611: end if;
4604: l_parent_effective_start_date := r_HWF.information10;
4605: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4606: if l_parent_effective_start_date is null then
4607: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4608: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4609: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4610: end if;
4611: end if;
4612: --
4605: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null ) then
4606: if l_parent_effective_start_date is null then
4607: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4608: elsif l_parent_effective_start_date < ben_pd_copy_to_ben_one.g_copy_effective_date then
4609: l_parent_effective_start_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4610: end if;
4611: end if;
4612: --
4613: -- To avoid creating a child with out parent
4988: l_AGE_CALC_RL := get_fk('FORMULA_ID', r_AGF.INFORMATION262,l_dml_operation);
4989: l_AGE_DET_RL := get_fk('FORMULA_ID', r_AGF.INFORMATION261,l_dml_operation);
4990: l_RNDG_RL := get_fk('FORMULA_ID', r_AGF.INFORMATION257,l_dml_operation);
4991: --
4992: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_AGE_FCTR' ,l_prefix || r_AGF.INFORMATION170 || l_suffix);
4993: --
4994: if l_first_rec and not l_update then
4995: -- Call Create routine.
4996: hr_utility.set_location(' BEN_AGE_FCTR CREATE_AGE_FACTOR ',20);
4996: hr_utility.set_location(' BEN_AGE_FCTR CREATE_AGE_FACTOR ',20);
4997: BEN_AGE_FACTOR_API.CREATE_AGE_FACTOR(
4998: --
4999: P_VALIDATE => false
5000: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
5001: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
5002: --
5003: ,P_AGE_CALC_RL => l_AGE_CALC_RL
5004: ,P_AGE_DET_CD => r_AGF.INFORMATION16
5069: hr_utility.set_location(' BEN_AGE_FCTR UPDATE_AGE_FACTOR ',20);
5070: BEN_AGE_FACTOR_API.UPDATE_AGE_FACTOR(
5071: --
5072: P_VALIDATE => false
5073: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
5074: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
5075: --
5076: ,P_AGE_CALC_RL => l_AGE_CALC_RL
5077: ,P_AGE_DET_CD => r_AGF.INFORMATION16
5345: l_LOS_DET_RL := get_fk('FORMULA_ID', r_LSF.INFORMATION257,l_dml_operation);
5346: l_LOS_DT_TO_USE_RL := get_fk('FORMULA_ID', r_LSF.INFORMATION258,l_dml_operation);
5347: l_RNDG_RL := get_fk('FORMULA_ID', r_LSF.INFORMATION259,l_dml_operation);
5348: --
5349: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_LOS_FCTR',l_prefix || r_LSF.INFORMATION170 || l_suffix);
5350: --
5351: if l_first_rec and not l_update then
5352: -- Call Create routine.
5353: hr_utility.set_location(' BEN_LOS_FCTR CREATE_LOS_FACTORS ',20);
5353: hr_utility.set_location(' BEN_LOS_FCTR CREATE_LOS_FACTORS ',20);
5354: BEN_LOS_FACTORS_API.CREATE_LOS_FACTORS(
5355: --
5356: P_VALIDATE => false
5357: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date,p_effective_date)
5358: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
5359: --
5360: -- ,P_hrs_ALT_VAL_TO_USE_CD => r_LSF.information11
5361: -- ,P_LOS_ALT_VAL_TO_USE_CD => r_LSF.INFORMATION19
5429: --
5430: BEN_LOS_FACTORS_API.UPDATE_LOS_FACTORS(
5431: --
5432: P_VALIDATE => false
5433: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date,p_effective_date)
5434: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
5435: --
5436: -- ,P_hrs_ALT_VAL_TO_USE_CD => r_LSF.information11
5437: -- ,P_LOS_ALT_VAL_TO_USE_CD => r_LSF.INFORMATION19
5702: end if ;
5703: --
5704: l_RNDG_RL := get_fk('FORMULA_ID', r_PFF.INFORMATION257,l_dml_operation);
5705: --
5706: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PCT_FL_TM_FCTR',l_prefix || r_PFF.INFORMATION218 || l_suffix);
5707: --
5708: if l_first_rec and not l_update then
5709: -- Call Create routine.
5710: hr_utility.set_location(' BEN_PCT_FL_TM_FCTR CREATE_PERCENT_FT_FACTORS ',20);
5710: hr_utility.set_location(' BEN_PCT_FL_TM_FCTR CREATE_PERCENT_FT_FACTORS ',20);
5711: BEN_PERCENT_FT_FACTORS_API.CREATE_PERCENT_FT_FACTORS(
5712: --
5713: P_VALIDATE => false
5714: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
5715: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
5716: --
5717: ,P_MN_PCT_VAL => r_PFF.INFORMATION294
5718: ,P_MX_PCT_VAL => r_PFF.INFORMATION293
5780: hr_utility.set_location(' BEN_PCT_FL_TM_FCTR UPDATE_PERCENT_FT_FACTORS ',20);
5781: BEN_PERCENT_FT_FACTORS_API.UPDATE_PERCENT_FT_FACTORS(
5782: --
5783: P_VALIDATE => false
5784: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
5785: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
5786: --
5787: ,P_MN_PCT_VAL => r_PFF.INFORMATION294
5788: ,P_MX_PCT_VAL => r_PFF.INFORMATION293
6054: if l_AGE_FCTR_ID is null and l_LOS_FCTR_ID is null then
6055: l_first_rec:=false;
6056: end if;
6057: --
6058: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CMBN_AGE_LOS_FCTR',l_prefix || r_CLA.INFORMATION170 || l_suffix);
6059: --
6060: if l_first_rec and not l_update then
6061: -- Call Create routine.
6062: hr_utility.set_location(' BEN_CMBN_AGE_LOS_FCTR CREATE_CMBN_AGE_LOS_FCTR ',20);
6316: end if ;
6317: -- End Prefix Sufix derivation
6318: for r_PTP_unique in c_unique_PTP('PTP') loop
6319:
6320: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
6321: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6322: r_PTP_unique.information3 >=
6323: ben_pd_copy_to_ben_one.g_copy_effective_date)
6324: ) then
6317: -- End Prefix Sufix derivation
6318: for r_PTP_unique in c_unique_PTP('PTP') loop
6319:
6320: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
6321: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6322: r_PTP_unique.information3 >=
6323: ben_pd_copy_to_ben_one.g_copy_effective_date)
6324: ) then
6325: --
6319:
6320: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
6321: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6322: r_PTP_unique.information3 >=
6323: ben_pd_copy_to_ben_one.g_copy_effective_date)
6324: ) then
6325: --
6326: hr_utility.set_location(' r_PTP_unique.table_route_id '||r_PTP_unique.table_route_id,10);
6327: hr_utility.set_location(' r_PTP_unique.information1 '||r_PTP_unique.information1,10);
6372: l_max_eed := null ;
6373: open c_PTP_min_max_dates(r_PTP_unique.table_route_id, r_PTP_unique.information1 ) ;
6374: fetch c_PTP_min_max_dates into l_min_esd,l_max_eed ;
6375:
6376: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6377: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6378: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
6379: end if;
6380: --
6373: open c_PTP_min_max_dates(r_PTP_unique.table_route_id, r_PTP_unique.information1 ) ;
6374: fetch c_PTP_min_max_dates into l_min_esd,l_max_eed ;
6375:
6376: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6377: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6378: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
6379: end if;
6380: --
6381: -- if there are update rows
6374: fetch c_PTP_min_max_dates into l_min_esd,l_max_eed ;
6375:
6376: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6377: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6378: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
6379: end if;
6380: --
6381: -- if there are update rows
6382: --
6458: l_first_rec := true ;
6459: --
6460: end if ;
6461: --
6462: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PL_TYP_F',l_prefix || r_PTP.INFORMATION170 || l_suffix);
6463: --
6464:
6465: l_effective_date := r_PTP.information2;
6466: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6462: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PL_TYP_F',l_prefix || r_PTP.INFORMATION170 || l_suffix);
6463: --
6464:
6465: l_effective_date := r_PTP.information2;
6466: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6467: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6468: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
6469: end if;
6470:
6463: --
6464:
6465: l_effective_date := r_PTP.information2;
6466: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6467: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6468: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
6469: end if;
6470:
6471: if l_first_rec and not l_update then
6464:
6465: l_effective_date := r_PTP.information2;
6466: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6467: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6468: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
6469: end if;
6470:
6471: if l_first_rec and not l_update then
6472: -- Call Create routine.
6814: end if ;
6815: -- End Prefix Sufix derivation
6816: for r_PGM_unique in c_unique_PGM('PGM') loop
6817:
6818: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
6819: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6820: r_PGM_unique.information3 >=
6821: ben_pd_copy_to_ben_one.g_copy_effective_date)
6822: ) then
6815: -- End Prefix Sufix derivation
6816: for r_PGM_unique in c_unique_PGM('PGM') loop
6817:
6818: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
6819: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6820: r_PGM_unique.information3 >=
6821: ben_pd_copy_to_ben_one.g_copy_effective_date)
6822: ) then
6823: --
6817:
6818: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
6819: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6820: r_PGM_unique.information3 >=
6821: ben_pd_copy_to_ben_one.g_copy_effective_date)
6822: ) then
6823: --
6824: hr_utility.set_location(' r_PGM_unique.table_route_id '||r_PGM_unique.table_route_id,10);
6825: hr_utility.set_location(' r_PGM_unique.information1 '||r_PGM_unique.information1,10);
6869: --end if; --dml_operation
6870: open c_PGM_min_max_dates(r_PGM_unique.table_route_id, r_PGM_unique.information1 ) ;
6871: fetch c_PGM_min_max_dates into l_min_esd,l_max_eed ;
6872:
6873: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6874: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6875: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
6876: end if;
6877: --
6870: open c_PGM_min_max_dates(r_PGM_unique.table_route_id, r_PGM_unique.information1 ) ;
6871: fetch c_PGM_min_max_dates into l_min_esd,l_max_eed ;
6872:
6873: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6874: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6875: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
6876: end if;
6877: --
6878: -- if there are update rows
6871: fetch c_PGM_min_max_dates into l_min_esd,l_max_eed ;
6872:
6873: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6874: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6875: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
6876: end if;
6877: --
6878: -- if there are update rows
6879: --
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
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
6975: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6976: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
6977: end if;
6978:
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
6975: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6976: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
6977: end if;
6978:
6979: --
6972:
6973: l_effective_date := r_PGM.information2;
6974: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
6975: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
6976: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
6977: end if;
6978:
6979: --
6980: -- Bug : If called from plan design wizard copy the value selected by
6979: --
6980: -- Bug : If called from plan design wizard copy the value selected by
6981: -- by the user.
6982: --
6983: if BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ' then
6984: l_status_cd := r_pgm.information38;
6985: else
6986: l_status_cd := 'P';
6987: end if;
7456: end if ;
7457: -- End Prefix Sufix derivation
7458: for r_REG_unique in c_unique_REG('REG') loop
7459:
7460: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
7461: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7462: r_REG_unique.information3 >=
7463: ben_pd_copy_to_ben_one.g_copy_effective_date)
7464: ) then
7457: -- End Prefix Sufix derivation
7458: for r_REG_unique in c_unique_REG('REG') loop
7459:
7460: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
7461: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7462: r_REG_unique.information3 >=
7463: ben_pd_copy_to_ben_one.g_copy_effective_date)
7464: ) then
7465: --
7459:
7460: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
7461: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7462: r_REG_unique.information3 >=
7463: ben_pd_copy_to_ben_one.g_copy_effective_date)
7464: ) then
7465: --
7466: hr_utility.set_location(' r_REG_unique.table_route_id '||r_REG_unique.table_route_id,10);
7467: hr_utility.set_location(' r_REG_unique.information1 '||r_REG_unique.information1,10);
7476: l_max_eed := null ;
7477: open c_REG_min_max_dates(r_REG_unique.table_route_id, r_REG_unique.information1 ) ;
7478: fetch c_REG_min_max_dates into l_min_esd,l_max_eed ;
7479:
7480: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7481: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7482: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
7483: end if;
7484: l_min_esd := greatest(l_min_esd,r_REG_unique.information2);
7477: open c_REG_min_max_dates(r_REG_unique.table_route_id, r_REG_unique.information1 ) ;
7478: fetch c_REG_min_max_dates into l_min_esd,l_max_eed ;
7479:
7480: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7481: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7482: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
7483: end if;
7484: l_min_esd := greatest(l_min_esd,r_REG_unique.information2);
7485:
7478: fetch c_REG_min_max_dates into l_min_esd,l_max_eed ;
7479:
7480: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7481: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7482: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
7483: end if;
7484: l_min_esd := greatest(l_min_esd,r_REG_unique.information2);
7485:
7486: -- if p_reuse_object_flag = 'Y' then /* Always Reuse Regulations, Never create */
7556: end if ;
7557: --
7558: l_ORGANIZATION_ID := get_fk('ORGANIZATION_ID', r_REG.INFORMATION252);
7559: --
7560: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_REGN_F',l_prefix || r_REG.INFORMATION170 || l_suffix);
7561: --
7562:
7563: l_effective_date := r_REG.information2;
7564: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7560: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_REGN_F',l_prefix || r_REG.INFORMATION170 || l_suffix);
7561: --
7562:
7563: l_effective_date := r_REG.information2;
7564: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7565: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7566: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
7567: end if;
7568:
7561: --
7562:
7563: l_effective_date := r_REG.information2;
7564: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7565: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7566: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
7567: end if;
7568:
7569: if l_first_rec and not l_update then
7562:
7563: l_effective_date := r_REG.information2;
7564: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7565: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7566: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
7567: end if;
7568:
7569: if l_first_rec and not l_update then
7570: -- Call Create routine.
7852: end if ;
7853: -- End Prefix Sufix derivation
7854: for r_RZR_unique in c_unique_RZR('RZR') loop
7855:
7856: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
7857: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7858: r_RZR_unique.information3 >=
7859: ben_pd_copy_to_ben_one.g_copy_effective_date)
7860: ) then
7853: -- End Prefix Sufix derivation
7854: for r_RZR_unique in c_unique_RZR('RZR') loop
7855:
7856: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
7857: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7858: r_RZR_unique.information3 >=
7859: ben_pd_copy_to_ben_one.g_copy_effective_date)
7860: ) then
7861: --
7855:
7856: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
7857: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7858: r_RZR_unique.information3 >=
7859: ben_pd_copy_to_ben_one.g_copy_effective_date)
7860: ) then
7861: --
7862: hr_utility.set_location(' r_RZR_unique.table_route_id '||r_RZR_unique.table_route_id,10);
7863: hr_utility.set_location(' r_RZR_unique.information1 '||r_RZR_unique.information1,10);
7873: open c_RZR_min_max_dates(r_RZR_unique.table_route_id, r_RZR_unique.information1 ) ;
7874: fetch c_RZR_min_max_dates into l_min_esd,l_max_eed ;
7875: --
7876:
7877: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7878: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7879: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
7880: end if;
7881: l_min_esd := greatest(l_min_esd,r_RZR_unique.information2);
7874: fetch c_RZR_min_max_dates into l_min_esd,l_max_eed ;
7875: --
7876:
7877: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7878: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7879: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
7880: end if;
7881: l_min_esd := greatest(l_min_esd,r_RZR_unique.information2);
7882:
7875: --
7876:
7877: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
7878: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
7879: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
7880: end if;
7881: l_min_esd := greatest(l_min_esd,r_RZR_unique.information2);
7882:
7883: open c_RZR(r_RZR_unique.table_route_id,
7996: end if ;
7997: --
7998:
7999: l_effective_date := r_RZR.information2;
8000: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8001: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8002: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
8003: end if;
8004:
7997: --
7998:
7999: l_effective_date := r_RZR.information2;
8000: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8001: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8002: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
8003: end if;
8004:
8005: if l_first_rec and not l_update then
7998:
7999: l_effective_date := r_RZR.information2;
8000: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8001: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8002: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
8003: end if;
8004:
8005: if l_first_rec and not l_update then
8006: -- Call Create routine.
8388: else
8389: l_business_group_id := p_target_business_group_id;
8390: end if;
8391: --
8392: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_RPTG_GRP',l_prefix || r_BNR.INFORMATION170 || l_suffix);
8393: --
8394: if l_first_rec and not l_update then
8395: -- Call Create routine.
8396: hr_utility.set_location(' BEN_RPTG_GRP CREATE_REPORTING_GROUP ',20);
8396: hr_utility.set_location(' BEN_RPTG_GRP CREATE_REPORTING_GROUP ',20);
8397: BEN_REPORTING_GROUP_API.CREATE_REPORTING_GROUP(
8398: --
8399: P_VALIDATE => false
8400: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
8401: ,P_BUSINESS_GROUP_ID => l_business_group_id
8402: --
8403: ,P_BNR_ATTRIBUTE1 => r_BNR.INFORMATION111
8404: ,P_BNR_ATTRIBUTE10 => r_BNR.INFORMATION120
8461: hr_utility.set_location(' BEN_RPTG_GRP UPDATE_REPORTING_GROUP ',20);
8462: BEN_REPORTING_GROUP_API.UPDATE_REPORTING_GROUP(
8463: --
8464: P_VALIDATE => false
8465: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
8466: ,P_BUSINESS_GROUP_ID => l_business_group_id
8467: --
8468: ,P_BNR_ATTRIBUTE1 => r_BNR.INFORMATION111
8469: ,P_BNR_ATTRIBUTE10 => r_BNR.INFORMATION120
8649: end if ;
8650: -- End Prefix Sufix derivation
8651: for r_RCL_unique in c_unique_RCL('RCL') loop
8652:
8653: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
8654: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8655: r_RCL_unique.information3 >=
8656: ben_pd_copy_to_ben_one.g_copy_effective_date)
8657: ) then
8650: -- End Prefix Sufix derivation
8651: for r_RCL_unique in c_unique_RCL('RCL') loop
8652:
8653: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
8654: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8655: r_RCL_unique.information3 >=
8656: ben_pd_copy_to_ben_one.g_copy_effective_date)
8657: ) then
8658: --
8652:
8653: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
8654: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8655: r_RCL_unique.information3 >=
8656: ben_pd_copy_to_ben_one.g_copy_effective_date)
8657: ) then
8658: --
8659: hr_utility.set_location(' r_RCL_unique.table_route_id '||r_RCL_unique.table_route_id,10);
8660: hr_utility.set_location(' r_RCL_unique.information1 '||r_RCL_unique.information1,10);
8705: l_max_eed := null ;
8706: open c_RCL_min_max_dates(r_RCL_unique.table_route_id, r_RCL_unique.information1 ) ;
8707: fetch c_RCL_min_max_dates into l_min_esd,l_max_eed ;
8708:
8709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8710: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8711: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
8712: end if;
8713: l_min_esd := greatest(l_min_esd,r_RCL_unique.information2);
8706: open c_RCL_min_max_dates(r_RCL_unique.table_route_id, r_RCL_unique.information1 ) ;
8707: fetch c_RCL_min_max_dates into l_min_esd,l_max_eed ;
8708:
8709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8710: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8711: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
8712: end if;
8713: l_min_esd := greatest(l_min_esd,r_RCL_unique.information2);
8714:
8707: fetch c_RCL_min_max_dates into l_min_esd,l_max_eed ;
8708:
8709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8710: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8711: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
8712: end if;
8713: l_min_esd := greatest(l_min_esd,r_RCL_unique.information2);
8714:
8715: if p_reuse_object_flag = 'Y' then
8781: end if ;
8782: --
8783: l_RLTD_PER_CHG_CS_LER_RL := get_fk('FORMULA_ID', r_RCL.INFORMATION260, l_dml_operation);
8784: --
8785: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_RLTD_PER_CHG_CS_LER_F',l_prefix || r_RCL.INFORMATION218 || l_suffix);
8786: --
8787:
8788: l_effective_date := r_RCL.information2;
8789: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8785: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_RLTD_PER_CHG_CS_LER_F',l_prefix || r_RCL.INFORMATION218 || l_suffix);
8786: --
8787:
8788: l_effective_date := r_RCL.information2;
8789: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8790: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8791: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
8792: end if;
8793:
8786: --
8787:
8788: l_effective_date := r_RCL.information2;
8789: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8790: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8791: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
8792: end if;
8793:
8794: if l_first_rec and not l_update then
8787:
8788: l_effective_date := r_RCL.information2;
8789: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
8790: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
8791: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
8792: end if;
8793:
8794: if l_first_rec and not l_update then
8795: -- Call Create routine.
9131: end if ;
9132: -- End Prefix Sufix derivation
9133: for r_OPT_unique in c_unique_OPT('OPT') loop
9134:
9135: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
9136: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9137: r_OPT_unique.information3 >=
9138: ben_pd_copy_to_ben_one.g_copy_effective_date)
9139: ) then
9132: -- End Prefix Sufix derivation
9133: for r_OPT_unique in c_unique_OPT('OPT') loop
9134:
9135: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
9136: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9137: r_OPT_unique.information3 >=
9138: ben_pd_copy_to_ben_one.g_copy_effective_date)
9139: ) then
9140: --
9134:
9135: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
9136: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9137: r_OPT_unique.information3 >=
9138: ben_pd_copy_to_ben_one.g_copy_effective_date)
9139: ) then
9140: --
9141: hr_utility.set_location(' r_OPT_unique.table_route_id '||r_OPT_unique.table_route_id,10);
9142: hr_utility.set_location(' r_OPT_unique.information1 '||r_OPT_unique.information1,10);
9187: l_max_eed := null ;
9188: open c_OPT_min_max_dates(r_OPT_unique.table_route_id, r_OPT_unique.information1 ) ;
9189: fetch c_OPT_min_max_dates into l_min_esd,l_max_eed ;
9190:
9191: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9192: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9193: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
9194: end if;
9195: l_min_esd := greatest(l_min_esd,r_OPT_unique.information2);
9188: open c_OPT_min_max_dates(r_OPT_unique.table_route_id, r_OPT_unique.information1 ) ;
9189: fetch c_OPT_min_max_dates into l_min_esd,l_max_eed ;
9190:
9191: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9192: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9193: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
9194: end if;
9195: l_min_esd := greatest(l_min_esd,r_OPT_unique.information2);
9196:
9189: fetch c_OPT_min_max_dates into l_min_esd,l_max_eed ;
9190:
9191: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9192: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9193: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
9194: end if;
9195: l_min_esd := greatest(l_min_esd,r_OPT_unique.information2);
9196:
9197: if p_reuse_object_flag = 'Y' then
9270: r_OPT.INFORMATION264 <> r_OPT.INFORMATION1) then
9271: --
9272: l_group_opt_id := NULL;
9273: --
9274: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
9275: l_group_opt_id := r_OPT.information176 ;
9276: end if;
9277: --
9278: if (l_group_opt_id IS NULL) then
9280: end if ;
9281: end if;
9282: --
9283: /*
9284: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
9285: l_group_opt_id := r_OPT.information176 ;
9286: --
9287: else
9288: l_group_opt_id := r_OPT.information174 ;
9299: l_CMBN_PTIP_OPT_ID := get_fk('CMBN_PTIP_OPT_ID', r_OPT.INFORMATION249,l_dml_operation);
9300: l_MAPPING_TABLE_PK_ID := get_fk('MAPPING_TABLE_PK_ID', r_OPT.INFORMATION257,l_dml_operation);
9301: l_RQD_PERD_ENRT_NENRT_RL := get_fk('FORMULA_ID', r_OPT.INFORMATION258,l_dml_operation);
9302: --
9303: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_OPT_F',l_prefix || r_OPT.INFORMATION170 || l_suffix);
9304: --
9305:
9306: l_effective_date := r_OPT.information2;
9307: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9303: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_OPT_F',l_prefix || r_OPT.INFORMATION170 || l_suffix);
9304: --
9305:
9306: l_effective_date := r_OPT.information2;
9307: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9308: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9309: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
9310: end if;
9311: --
9304: --
9305:
9306: l_effective_date := r_OPT.information2;
9307: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9308: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9309: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
9310: end if;
9311: --
9312: if l_first_rec and not l_update then
9305:
9306: l_effective_date := r_OPT.information2;
9307: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9308: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9309: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
9310: end if;
9311: --
9312: if l_first_rec and not l_update then
9313: -- Call Create routine.
9720: hr_utility.set_location('suffix '||l_suffix,101);
9721: -- End Prefix Sufix derivation
9722: for r_LER_unique in c_unique_LER('LER') loop
9723:
9724: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
9725: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9726: r_LER_unique.information3 >=
9727: ben_pd_copy_to_ben_one.g_copy_effective_date)
9728: ) then
9721: -- End Prefix Sufix derivation
9722: for r_LER_unique in c_unique_LER('LER') loop
9723:
9724: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
9725: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9726: r_LER_unique.information3 >=
9727: ben_pd_copy_to_ben_one.g_copy_effective_date)
9728: ) then
9729:
9723:
9724: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
9725: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9726: r_LER_unique.information3 >=
9727: ben_pd_copy_to_ben_one.g_copy_effective_date)
9728: ) then
9729:
9730: l_source_ler_name := l_prefix || r_LER_unique.name || l_suffix; -- For display in error messages
9731: --
9778: l_max_eed := null ;
9779: open c_LER_min_max_dates(r_LER_unique.table_route_id, r_LER_unique.information1 ) ;
9780: fetch c_LER_min_max_dates into l_min_esd,l_max_eed ;
9781:
9782: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9783: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9784: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
9785: end if;
9786: l_min_esd := greatest(l_min_esd,r_LER_unique.information2);
9779: open c_LER_min_max_dates(r_LER_unique.table_route_id, r_LER_unique.information1 ) ;
9780: fetch c_LER_min_max_dates into l_min_esd,l_max_eed ;
9781:
9782: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9783: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9784: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
9785: end if;
9786: l_min_esd := greatest(l_min_esd,r_LER_unique.information2);
9787:
9780: fetch c_LER_min_max_dates into l_min_esd,l_max_eed ;
9781:
9782: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9783: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9784: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
9785: end if;
9786: l_min_esd := greatest(l_min_esd,r_LER_unique.information2);
9787:
9788: --
9938:
9939: l_LER_EVAL_RL := get_fk('FORMULA_ID', r_LER.INFORMATION261,l_dml_operation );
9940: l_TMLNS_PERD_RL := get_fk('FORMULA_ID', r_LER.INFORMATION262,l_dml_operation );
9941: --
9942: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_LER_F',l_prefix || r_LER.information170 || l_suffix);
9943: --
9944:
9945: l_effective_date := r_LER.information2;
9946: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9942: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_LER_F',l_prefix || r_LER.information170 || l_suffix);
9943: --
9944:
9945: l_effective_date := r_LER.information2;
9946: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9947: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9948: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
9949: end if;
9950:
9943: --
9944:
9945: l_effective_date := r_LER.information2;
9946: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9947: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9948: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
9949: end if;
9950:
9951: if l_first_rec and not l_update then
9944:
9945: l_effective_date := r_LER.information2;
9946: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
9947: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
9948: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
9949: end if;
9950:
9951: if l_first_rec and not l_update then
9952: -- Call Create routine.
10299: end if ;
10300: -- End Prefix Sufix derivation
10301: for r_LPL_unique in c_unique_LPL('LPL') loop
10302: --
10303: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
10304: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10305: r_LPL_unique.information3 >=
10306: ben_pd_copy_to_ben_one.g_copy_effective_date)
10307: ) then
10300: -- End Prefix Sufix derivation
10301: for r_LPL_unique in c_unique_LPL('LPL') loop
10302: --
10303: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
10304: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10305: r_LPL_unique.information3 >=
10306: ben_pd_copy_to_ben_one.g_copy_effective_date)
10307: ) then
10308: --
10302: --
10303: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
10304: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10305: r_LPL_unique.information3 >=
10306: ben_pd_copy_to_ben_one.g_copy_effective_date)
10307: ) then
10308: --
10309: hr_utility.set_location(' r_LPL_unique.table_route_id '||r_LPL_unique.table_route_id,10);
10310: hr_utility.set_location(' r_LPL_unique.information1 '||r_LPL_unique.information1,10);
10367: l_max_eed := null ;
10368: open c_LPL_min_max_dates(r_LPL_unique.table_route_id, r_LPL_unique.information1 ) ;
10369: fetch c_LPL_min_max_dates into l_min_esd,l_max_eed ;
10370: --
10371: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10372: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10373: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
10374: end if;
10375: l_min_esd := greatest(l_min_esd,r_LPL_unique.information2);
10368: open c_LPL_min_max_dates(r_LPL_unique.table_route_id, r_LPL_unique.information1 ) ;
10369: fetch c_LPL_min_max_dates into l_min_esd,l_max_eed ;
10370: --
10371: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10372: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10373: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
10374: end if;
10375: l_min_esd := greatest(l_min_esd,r_LPL_unique.information2);
10376: --
10369: fetch c_LPL_min_max_dates into l_min_esd,l_max_eed ;
10370: --
10371: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10372: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10373: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
10374: end if;
10375: l_min_esd := greatest(l_min_esd,r_LPL_unique.information2);
10376: --
10377: /*
10404: p_from_date => l_min_esd,
10405: p_to_date => l_max_eed );
10406: if l_dt_rec_found THEN
10407: --END TEMPIK
10408: if r_LPL_unique.information1 <> nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).old_value, -999) or
10409: nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).pk_id_column, '999') <> 'LER_PER_INFO_CS_LER_ID' then
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10405: p_to_date => l_max_eed );
10406: if l_dt_rec_found THEN
10407: --END TEMPIK
10408: if r_LPL_unique.information1 <> nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).old_value, -999) or
10409: nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).pk_id_column, '999') <> 'LER_PER_INFO_CS_LER_ID' then
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10406: if l_dt_rec_found THEN
10407: --END TEMPIK
10408: if r_LPL_unique.information1 <> nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).old_value, -999) or
10409: nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).pk_id_column, '999') <> 'LER_PER_INFO_CS_LER_ID' then
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10407: --END TEMPIK
10408: if r_LPL_unique.information1 <> nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).old_value, -999) or
10409: nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).pk_id_column, '999') <> 'LER_PER_INFO_CS_LER_ID' then
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10415: --
10408: if r_LPL_unique.information1 <> nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).old_value, -999) or
10409: nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).pk_id_column, '999') <> 'LER_PER_INFO_CS_LER_ID' then
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10415: --
10416: update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count) , p_copy_entity_txn_id) ;
10409: nvl(BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count-1).pk_id_column, '999') <> 'LER_PER_INFO_CS_LER_ID' then
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10415: --
10416: update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count) , p_copy_entity_txn_id) ;
10417: --
10410: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10411: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL_unique.information1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10415: --
10416: update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count) , p_copy_entity_txn_id) ;
10417: --
10418: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10412: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_new_value ;
10413: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10415: --
10416: update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count) , p_copy_entity_txn_id) ;
10417: --
10418: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10419: end if ;
10420: --
10414: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10415: --
10416: update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count) , p_copy_entity_txn_id) ;
10417: --
10418: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10419: end if ;
10420: --
10421: l_object_found_in_target := true ;
10422: --TEMPIK
10447: --
10448: end if ;
10449: --
10450: l_effective_date := r_LPL.information2;
10451: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10452: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date )
10453: then
10454: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
10455: end if;
10448: end if ;
10449: --
10450: l_effective_date := r_LPL.information2;
10451: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10452: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date )
10453: then
10454: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
10455: end if;
10456: --
10450: l_effective_date := r_LPL.information2;
10451: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10452: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date )
10453: then
10454: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
10455: end if;
10456: --
10457: if l_first_rec and not l_update then
10458: -- Call Create routine.
10506: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10507: -- Update all relevent cer records with new pk_id
10508: hr_utility.set_location('Before plsql table ',222);
10509: hr_utility.set_location('new_value id '||l_ler_per_info_cs_ler_id,222);
10510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL.information1 ;
10512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_PER_INFO_CS_LER_ID ;
10513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10514: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10507: -- Update all relevent cer records with new pk_id
10508: hr_utility.set_location('Before plsql table ',222);
10509: hr_utility.set_location('new_value id '||l_ler_per_info_cs_ler_id,222);
10510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL.information1 ;
10512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_PER_INFO_CS_LER_ID ;
10513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10514: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10515: hr_utility.set_location('After plsql table ',222);
10508: hr_utility.set_location('Before plsql table ',222);
10509: hr_utility.set_location('new_value id '||l_ler_per_info_cs_ler_id,222);
10510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL.information1 ;
10512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_PER_INFO_CS_LER_ID ;
10513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10514: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10515: hr_utility.set_location('After plsql table ',222);
10516: --
10509: hr_utility.set_location('new_value id '||l_ler_per_info_cs_ler_id,222);
10510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL.information1 ;
10512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_PER_INFO_CS_LER_ID ;
10513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10514: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10515: hr_utility.set_location('After plsql table ',222);
10516: --
10517: -- 9999 why commented update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count),p_copy_entity_txn_id ) ;
10510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_PER_INFO_CS_LER_ID' ;
10511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPL.information1 ;
10512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_PER_INFO_CS_LER_ID ;
10513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10514: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10515: hr_utility.set_location('After plsql table ',222);
10516: --
10517: -- 9999 why commented update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count),p_copy_entity_txn_id ) ;
10518: --
10513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10514: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPL_unique.table_route_id;
10515: hr_utility.set_location('After plsql table ',222);
10516: --
10517: -- 9999 why commented update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count),p_copy_entity_txn_id ) ;
10518: --
10519: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10520: --
10521: else
10515: hr_utility.set_location('After plsql table ',222);
10516: --
10517: -- 9999 why commented update_cer_with_target( BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count),p_copy_entity_txn_id ) ;
10518: --
10519: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10520: --
10521: else
10522: --
10523: --UPD START
10628: end loop;
10629: --
10630: exception when others then
10631: --
10632: BEN_PD_COPY_TO_BEN_ONE.raise_error_message( 'LPL',r_LPL.information5 );
10633: --
10634: end create_LPL_rows;
10635:
10636: ---------------------------------------------------------------
10761: end if ;
10762: -- End Prefix Sufix derivation
10763: for r_ELP_unique in c_unique_ELP('ELP') loop
10764:
10765: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
10766: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10767: r_ELP_unique.information3 >=
10768: ben_pd_copy_to_ben_one.g_copy_effective_date)
10769: ) then
10762: -- End Prefix Sufix derivation
10763: for r_ELP_unique in c_unique_ELP('ELP') loop
10764:
10765: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
10766: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10767: r_ELP_unique.information3 >=
10768: ben_pd_copy_to_ben_one.g_copy_effective_date)
10769: ) then
10770: --
10764:
10765: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
10766: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10767: r_ELP_unique.information3 >=
10768: ben_pd_copy_to_ben_one.g_copy_effective_date)
10769: ) then
10770: --
10771: hr_utility.set_location(' r_ELP_unique.table_route_id '||r_ELP_unique.table_route_id,10);
10772: hr_utility.set_location(' r_ELP_unique.information1 '||r_ELP_unique.information1,10);
10817: l_max_eed := null ;
10818: open c_ELP_min_max_dates(r_ELP_unique.table_route_id, r_ELP_unique.information1 ) ;
10819: fetch c_ELP_min_max_dates into l_min_esd,l_max_eed ;
10820:
10821: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10822: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10823: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
10824: end if;
10825: l_min_esd := greatest(l_min_esd,r_ELP_unique.information2);
10818: open c_ELP_min_max_dates(r_ELP_unique.table_route_id, r_ELP_unique.information1 ) ;
10819: fetch c_ELP_min_max_dates into l_min_esd,l_max_eed ;
10820:
10821: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10822: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10823: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
10824: end if;
10825: l_min_esd := greatest(l_min_esd,r_ELP_unique.information2);
10826:
10819: fetch c_ELP_min_max_dates into l_min_esd,l_max_eed ;
10820:
10821: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10822: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10823: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
10824: end if;
10825: l_min_esd := greatest(l_min_esd,r_ELP_unique.information2);
10826:
10827: if p_reuse_object_flag = 'Y' then
10894: l_first_rec := true ;
10895: --
10896: end if ;
10897: --
10898: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_ELIGY_PRFL_F',l_prefix || r_elp.INFORMATION170 || l_suffix);
10899: --
10900:
10901: l_effective_date := r_ELP.information2;
10902: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10898: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_ELIGY_PRFL_F',l_prefix || r_elp.INFORMATION170 || l_suffix);
10899: --
10900:
10901: l_effective_date := r_ELP.information2;
10902: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10903: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10904: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
10905: end if;
10906:
10899: --
10900:
10901: l_effective_date := r_ELP.information2;
10902: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10903: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10904: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
10905: end if;
10906:
10907: if l_first_rec and not l_update then
10900:
10901: l_effective_date := r_ELP.information2;
10902: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
10903: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
10904: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
10905: end if;
10906:
10907: if l_first_rec and not l_update then
10908: -- Call Create routine.
11349: end if ;
11350: -- End Prefix Sufix derivation
11351: for r_DCE_unique in c_unique_DCE('DCE') loop
11352:
11353: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
11354: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11355: r_DCE_unique.information3 >=
11356: ben_pd_copy_to_ben_one.g_copy_effective_date)
11357: ) then
11350: -- End Prefix Sufix derivation
11351: for r_DCE_unique in c_unique_DCE('DCE') loop
11352:
11353: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
11354: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11355: r_DCE_unique.information3 >=
11356: ben_pd_copy_to_ben_one.g_copy_effective_date)
11357: ) then
11358: --
11352:
11353: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
11354: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11355: r_DCE_unique.information3 >=
11356: ben_pd_copy_to_ben_one.g_copy_effective_date)
11357: ) then
11358: --
11359: hr_utility.set_location(' r_DCE_unique.table_route_id '||r_DCE_unique.table_route_id,10);
11360: hr_utility.set_location(' r_DCE_unique.information1 '||r_DCE_unique.information1,10);
11405: l_max_eed := null ;
11406: open c_DCE_min_max_dates(r_DCE_unique.table_route_id, r_DCE_unique.information1 ) ;
11407: fetch c_DCE_min_max_dates into l_min_esd,l_max_eed ;
11408:
11409: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11410: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
11411: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
11412: end if;
11413: l_min_esd := greatest(l_min_esd,r_DCE_unique.information2);
11406: open c_DCE_min_max_dates(r_DCE_unique.table_route_id, r_DCE_unique.information1 ) ;
11407: fetch c_DCE_min_max_dates into l_min_esd,l_max_eed ;
11408:
11409: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11410: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
11411: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
11412: end if;
11413: l_min_esd := greatest(l_min_esd,r_DCE_unique.information2);
11414:
11407: fetch c_DCE_min_max_dates into l_min_esd,l_max_eed ;
11408:
11409: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11410: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
11411: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
11412: end if;
11413: l_min_esd := greatest(l_min_esd,r_DCE_unique.information2);
11414:
11415: if p_reuse_object_flag = 'Y' then
11485: --
11486: l_DPNT_CVG_ELIG_DET_RL := get_fk('FORMULA_ID', r_DCE.INFORMATION257,l_dml_operation);
11487: l_REGN_ID := get_fk('REGN_ID', r_DCE.INFORMATION231,l_dml_operation);
11488: --
11489: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_DPNT_CVG_ELIGY_PRFL_F',l_prefix || r_DCE.INFORMATION170 || l_suffix);
11490: --
11491:
11492: l_effective_date := r_DCE.information2;
11493: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11489: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_DPNT_CVG_ELIGY_PRFL_F',l_prefix || r_DCE.INFORMATION170 || l_suffix);
11490: --
11491:
11492: l_effective_date := r_DCE.information2;
11493: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11494: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
11495: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
11496: end if;
11497:
11490: --
11491:
11492: l_effective_date := r_DCE.information2;
11493: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11494: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
11495: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
11496: end if;
11497:
11498: if l_first_rec and not l_update then
11491:
11492: l_effective_date := r_DCE.information2;
11493: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
11494: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
11495: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
11496: end if;
11497:
11498: if l_first_rec and not l_update then
11499: -- Call Create routine.
11900: l_first_rec := true ;
11901: --
11902: end if ;
11903: --
11904: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_GD_OR_SVC_TYP',l_prefix || r_GOS.INFORMATION170 || l_suffix);
11905: --
11906: if l_first_rec and not l_update then
11907: -- Call Create routine.
11908: hr_utility.set_location(' BEN_GD_OR_SVC_TYP CREATE_GOOD_SVC_TYPE ',20);
11908: hr_utility.set_location(' BEN_GD_OR_SVC_TYP CREATE_GOOD_SVC_TYPE ',20);
11909: BEN_GOOD_SVC_TYPE_API.CREATE_GOOD_SVC_TYPE(
11910: --
11911: P_VALIDATE => false
11912: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
11913: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
11914: --
11915: ,P_DESCRIPTION => r_GOS.INFORMATION185
11916: ,P_GD_OR_SVC_TYP_ID => l_gd_or_svc_typ_id
11972: hr_utility.set_location(' BEN_GD_OR_SVC_TYP UPDATE_GOOD_SVC_TYPE ',20);
11973: BEN_GOOD_SVC_TYPE_API.UPDATE_GOOD_SVC_TYPE(
11974: --
11975: P_VALIDATE => false
11976: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
11977: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
11978: --
11979: ,P_DESCRIPTION => r_GOS.INFORMATION185
11980: ,P_GD_OR_SVC_TYP_ID => l_gd_or_svc_typ_id
12225: l_first_rec := true ;
12226: --
12227: end if ;
12228: --
12229: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_BENFTS_GRP',l_prefix || r_BNG.INFORMATION170 || l_suffix);
12230: --
12231: if l_first_rec and not l_update then
12232: -- Call Create routine.
12233: hr_utility.set_location(' BEN_BENFTS_GRP CREATE_BENEFITS_GROUP ',20);
12521: end if ;
12522: -- End Prefix Sufix derivation
12523: for r_PSL_unique in c_unique_PSL('PSL') loop
12524:
12525: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
12526: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12527: r_PSL_unique.information3 >=
12528: ben_pd_copy_to_ben_one.g_copy_effective_date)
12529: ) then
12522: -- End Prefix Sufix derivation
12523: for r_PSL_unique in c_unique_PSL('PSL') loop
12524:
12525: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
12526: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12527: r_PSL_unique.information3 >=
12528: ben_pd_copy_to_ben_one.g_copy_effective_date)
12529: ) then
12530:
12524:
12525: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
12526: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12527: r_PSL_unique.information3 >=
12528: ben_pd_copy_to_ben_one.g_copy_effective_date)
12529: ) then
12530:
12531: --
12532: hr_utility.set_location(' r_PSL_unique.table_route_id '||r_PSL_unique.table_route_id,10);
12543: open c_PSL_min_max_dates(r_PSL_unique.table_route_id, r_PSL_unique.information1 ) ;
12544: fetch c_PSL_min_max_dates into l_min_esd,l_max_eed ;
12545: --
12546:
12547: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12548: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
12549: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
12550: end if;
12551: l_min_esd := greatest(l_min_esd,r_PSL_unique.information2);
12544: fetch c_PSL_min_max_dates into l_min_esd,l_max_eed ;
12545: --
12546:
12547: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12548: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
12549: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
12550: end if;
12551: l_min_esd := greatest(l_min_esd,r_PSL_unique.information2);
12552:
12545: --
12546:
12547: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12548: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
12549: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
12550: end if;
12551: l_min_esd := greatest(l_min_esd,r_PSL_unique.information2);
12552:
12553: open c_PSL(r_PSL_unique.table_route_id,
12701: end if ;
12702: --
12703: l_PER_INFO_CHG_CS_LER_RL := get_fk('FORMULA_ID', r_PSL.INFORMATION260,l_dml_operation);
12704: --
12705: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PER_INFO_CHG_CS_LER_F',l_prefix || r_PSL.INFORMATION218 || l_suffix);
12706: --
12707:
12708: l_effective_date := r_PSL.information2;
12709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12705: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PER_INFO_CHG_CS_LER_F',l_prefix || r_PSL.INFORMATION218 || l_suffix);
12706: --
12707:
12708: l_effective_date := r_PSL.information2;
12709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12710: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
12711: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
12712: end if;
12713:
12706: --
12707:
12708: l_effective_date := r_PSL.information2;
12709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12710: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
12711: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
12712: end if;
12713:
12714: if l_first_rec and not l_update then
12707:
12708: l_effective_date := r_PSL.information2;
12709: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
12710: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
12711: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
12712: end if;
12713:
12714: if l_first_rec and not l_update then
12715: -- Call Create routine.
13041: end if ;
13042: -- End Prefix Sufix derivation
13043: for r_CCT_unique in c_unique_CCT('CCT') loop
13044:
13045: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
13046: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13047: r_CCT_unique.information3 >=
13048: ben_pd_copy_to_ben_one.g_copy_effective_date)
13049: ) then
13042: -- End Prefix Sufix derivation
13043: for r_CCT_unique in c_unique_CCT('CCT') loop
13044:
13045: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
13046: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13047: r_CCT_unique.information3 >=
13048: ben_pd_copy_to_ben_one.g_copy_effective_date)
13049: ) then
13050: --
13044:
13045: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
13046: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13047: r_CCT_unique.information3 >=
13048: ben_pd_copy_to_ben_one.g_copy_effective_date)
13049: ) then
13050: --
13051: hr_utility.set_location(' r_CCT_unique.table_route_id '||r_CCT_unique.table_route_id,10);
13052: hr_utility.set_location(' r_CCT_unique.information1 '||r_CCT_unique.information1,10);
13096: l_max_eed := null ;
13097: open c_CCT_min_max_dates(r_CCT_unique.table_route_id, r_CCT_unique.information1 ) ;
13098: fetch c_CCT_min_max_dates into l_min_esd,l_max_eed ;
13099:
13100: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13101: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13102: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
13103: end if;
13104: l_min_esd := greatest(l_min_esd,r_CCT_unique.information2);
13097: open c_CCT_min_max_dates(r_CCT_unique.table_route_id, r_CCT_unique.information1 ) ;
13098: fetch c_CCT_min_max_dates into l_min_esd,l_max_eed ;
13099:
13100: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13101: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13102: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
13103: end if;
13104: l_min_esd := greatest(l_min_esd,r_CCT_unique.information2);
13105:
13098: fetch c_CCT_min_max_dates into l_min_esd,l_max_eed ;
13099:
13100: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13101: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13102: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
13103: end if;
13104: l_min_esd := greatest(l_min_esd,r_CCT_unique.information2);
13105:
13106: if p_reuse_object_flag = 'Y' then
13175: l_INSPN_RQD_RL := get_fk('FORMULA_ID', r_CCT.INFORMATION263,l_dml_operation);
13176: l_PARNT_CM_TYP_ID := get_fk('PARNT_CM_TYP_ID', r_CCT.INFORMATION260,l_dml_operation);
13177: l_TO_BE_SENT_DT_RL := get_fk('FORMULA_ID', r_CCT.INFORMATION264,l_dml_operation);
13178: --
13179: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CM_TYP_F',l_prefix || r_CCT.INFORMATION170 || l_suffix);
13180: --
13181:
13182: l_effective_date := r_CCT.information2;
13183: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13179: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_CM_TYP_F',l_prefix || r_CCT.INFORMATION170 || l_suffix);
13180: --
13181:
13182: l_effective_date := r_CCT.information2;
13183: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13184: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13185: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
13186: end if;
13187:
13180: --
13181:
13182: l_effective_date := r_CCT.information2;
13183: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13184: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13185: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
13186: end if;
13187:
13188: if l_first_rec and not l_update then
13181:
13182: l_effective_date := r_CCT.information2;
13183: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13184: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13185: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
13186: end if;
13187:
13188: if l_first_rec and not l_update then
13189: -- Call Create routine.
13519: end if ;
13520: -- End Prefix Sufix derivation
13521: for r_PDL_unique in c_unique_PDL('PDL') loop
13522:
13523: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
13524: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13525: r_PDL_unique.information3 >=
13526: ben_pd_copy_to_ben_one.g_copy_effective_date)
13527: ) then
13520: -- End Prefix Sufix derivation
13521: for r_PDL_unique in c_unique_PDL('PDL') loop
13522:
13523: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
13524: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13525: r_PDL_unique.information3 >=
13526: ben_pd_copy_to_ben_one.g_copy_effective_date)
13527: ) then
13528: --
13522:
13523: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
13524: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13525: r_PDL_unique.information3 >=
13526: ben_pd_copy_to_ben_one.g_copy_effective_date)
13527: ) then
13528: --
13529: hr_utility.set_location(' r_PDL_unique.table_route_id '||r_PDL_unique.table_route_id,10);
13530: hr_utility.set_location(' r_PDL_unique.information1 '||r_PDL_unique.information1,10);
13575: l_max_eed := null ;
13576: open c_PDL_min_max_dates(r_PDL_unique.table_route_id, r_PDL_unique.information1 ) ;
13577: fetch c_PDL_min_max_dates into l_min_esd,l_max_eed ;
13578:
13579: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13580: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13581: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
13582: end if;
13583: l_min_esd := greatest(l_min_esd,r_PDL_unique.information2);
13576: open c_PDL_min_max_dates(r_PDL_unique.table_route_id, r_PDL_unique.information1 ) ;
13577: fetch c_PDL_min_max_dates into l_min_esd,l_max_eed ;
13578:
13579: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13580: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13581: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
13582: end if;
13583: l_min_esd := greatest(l_min_esd,r_PDL_unique.information2);
13584:
13577: fetch c_PDL_min_max_dates into l_min_esd,l_max_eed ;
13578:
13579: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13580: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13581: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
13582: end if;
13583: l_min_esd := greatest(l_min_esd,r_PDL_unique.information2);
13584:
13585: if p_reuse_object_flag = 'Y' then
13656: l_BALANCE_TYPE_ID := get_fk('BALANCE_TYPE_ID', r_PDL.INFORMATION260,l_dml_operation);
13657: l_COMP_LVL_FCTR_ID := get_fk('COMP_LVL_FCTR_ID', r_PDL.INFORMATION254,l_dml_operation);
13658: l_PTD_LMT_CALC_RL := get_fk('FORMULA_ID', r_PDL.INFORMATION261,l_dml_operation);
13659: --
13660: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PTD_LMT_F',l_prefix || r_PDL.INFORMATION170 || l_suffix);
13661: --
13662:
13663: l_effective_date := r_PDL.information2;
13664: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13660: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PTD_LMT_F',l_prefix || r_PDL.INFORMATION170 || l_suffix);
13661: --
13662:
13663: l_effective_date := r_PDL.information2;
13664: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13665: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13666: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
13667: end if;
13668:
13661: --
13662:
13663: l_effective_date := r_PDL.information2;
13664: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13665: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13666: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
13667: end if;
13668:
13669: if l_first_rec and not l_update then
13662:
13663: l_effective_date := r_PDL.information2;
13664: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
13665: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
13666: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
13667: end if;
13668:
13669: if l_first_rec and not l_update then
13670: -- Call Create routine.
14072: hr_utility.set_location(' BEN_YR_PERD CREATE_PGM_OR_PL_YR_PERD ',20);
14073: BEN_PGM_OR_PL_YR_PERD_API.CREATE_PGM_OR_PL_YR_PERD(
14074: --
14075: P_VALIDATE => false
14076: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
14077: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
14078: --
14079: ,P_END_DATE => r_YRP.INFORMATION308
14080: ,P_LMTN_YR_END_DT => r_YRP.INFORMATION311
14138: hr_utility.set_location(' BEN_YR_PERD UPDATE_PGM_OR_PL_YR_PERD ',20);
14139: BEN_PGM_OR_PL_YR_PERD_API.UPDATE_PGM_OR_PL_YR_PERD(
14140: --
14141: P_VALIDATE => false
14142: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
14143: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
14144: --
14145: ,P_END_DATE => r_YRP.INFORMATION308
14146: ,P_LMTN_YR_END_DT => r_YRP.INFORMATION311
14406: hr_utility.set_location(' BEN_WTHN_YR_PERD CREATE_WITHIN_YEAR_PERD ',20);
14407: BEN_WITHIN_YEAR_PERD_API.CREATE_WITHIN_YEAR_PERD(
14408: --
14409: P_VALIDATE => false
14410: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
14411: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
14412: --
14413: ,P_END_DAY => r_WYP.INFORMATION294
14414: ,P_END_MO => r_WYP.INFORMATION296
14471: hr_utility.set_location(' BEN_WTHN_YR_PERD UPDATE_WITHIN_YEAR_PERD ',20);
14472: BEN_WITHIN_YEAR_PERD_API.UPDATE_WITHIN_YEAR_PERD(
14473: --
14474: P_VALIDATE => false
14475: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
14476: ,P_BUSINESS_GROUP_ID => p_target_business_group_id
14477: --
14478: ,P_END_DAY => r_WYP.INFORMATION294
14479: ,P_END_MO => r_WYP.INFORMATION296
14710: --
14711:
14712: for r_PLN_unique in c_unique_PLN('PLN') loop
14713:
14714: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
14715: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14716: r_PLN_unique.information3 >=
14717: ben_pd_copy_to_ben_one.g_copy_effective_date)
14718: ) then
14711:
14712: for r_PLN_unique in c_unique_PLN('PLN') loop
14713:
14714: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
14715: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14716: r_PLN_unique.information3 >=
14717: ben_pd_copy_to_ben_one.g_copy_effective_date)
14718: ) then
14719: --
14713:
14714: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
14715: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14716: r_PLN_unique.information3 >=
14717: ben_pd_copy_to_ben_one.g_copy_effective_date)
14718: ) then
14719: --
14720: -- Derive the prefix - sufix
14721: -- REUSE ENHANCEMENT
14783: l_max_eed := null ;
14784: open c_PLN_min_max_dates(r_PLN_unique.table_route_id, r_PLN_unique.information1 ) ;
14785: fetch c_PLN_min_max_dates into l_min_esd,l_max_eed ;
14786:
14787: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14788: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
14789: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
14790: end if;
14791: l_min_esd := greatest(l_min_esd,r_PLN_unique.information2);
14784: open c_PLN_min_max_dates(r_PLN_unique.table_route_id, r_PLN_unique.information1 ) ;
14785: fetch c_PLN_min_max_dates into l_min_esd,l_max_eed ;
14786:
14787: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14788: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
14789: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
14790: end if;
14791: l_min_esd := greatest(l_min_esd,r_PLN_unique.information2);
14792:
14785: fetch c_PLN_min_max_dates into l_min_esd,l_max_eed ;
14786:
14787: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14788: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
14789: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
14790: end if;
14791: l_min_esd := greatest(l_min_esd,r_PLN_unique.information2);
14792:
14793: hr_utility.set_location( 'l_min_esd,l_max_eed '||l_min_esd|| ' : ' || l_max_eed,10);
14883: r_PLN.INFORMATION160 <> r_PLN.INFORMATION1) then
14884: --
14885: l_group_pl_id := NULL;
14886: --
14887: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
14888: l_group_pl_id := r_PLN.information176 ;
14889: end if;
14890: --
14891: if (l_group_pl_id IS NULL) then
14936:
14937: --
14938: -- PDW modification
14939: --
14940: if(BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ') then
14941: --
14942: if(r_PLN.INFORMATION299 = 0) then
14943: r_PLN.INFORMATION299 := null;
14944: end if;
14950: --
14951: end if;
14952: --
14953:
14954: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PL_F',l_prefix || r_PLN.INFORMATION170 || l_suffix);
14955: --
14956:
14957: l_effective_date := r_PLN.information2;
14958: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14954: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_PL_F',l_prefix || r_PLN.INFORMATION170 || l_suffix);
14955: --
14956:
14957: l_effective_date := r_PLN.information2;
14958: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14959: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
14960: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
14961: end if;
14962:
14955: --
14956:
14957: l_effective_date := r_PLN.information2;
14958: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14959: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
14960: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
14961: end if;
14962:
14963: --
14956:
14957: l_effective_date := r_PLN.information2;
14958: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
14959: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
14960: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
14961: end if;
14962:
14963: --
14964: --ML
15615: end if ;
15616: -- End Prefix Sufix derivation
15617: for r_SVA_unique in c_unique_SVA('SVA') loop
15618:
15619: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
15620: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15621: r_SVA_unique.information3 >=
15622: ben_pd_copy_to_ben_one.g_copy_effective_date)
15623: ) then
15616: -- End Prefix Sufix derivation
15617: for r_SVA_unique in c_unique_SVA('SVA') loop
15618:
15619: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
15620: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15621: r_SVA_unique.information3 >=
15622: ben_pd_copy_to_ben_one.g_copy_effective_date)
15623: ) then
15624: --
15618:
15619: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
15620: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15621: r_SVA_unique.information3 >=
15622: ben_pd_copy_to_ben_one.g_copy_effective_date)
15623: ) then
15624: --
15625: hr_utility.set_location(' r_SVA_unique.table_route_id '||r_SVA_unique.table_route_id,10);
15626: hr_utility.set_location(' r_SVA_unique.information1 '||r_SVA_unique.information1,10);
15671: l_max_eed := null ;
15672: open c_SVA_min_max_dates(r_SVA_unique.table_route_id, r_SVA_unique.information1 ) ;
15673: fetch c_SVA_min_max_dates into l_min_esd,l_max_eed ;
15674:
15675: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15676: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
15677: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
15678: end if;
15679: l_min_esd := greatest(l_min_esd,r_SVA_unique.information2);
15672: open c_SVA_min_max_dates(r_SVA_unique.table_route_id, r_SVA_unique.information1 ) ;
15673: fetch c_SVA_min_max_dates into l_min_esd,l_max_eed ;
15674:
15675: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15676: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
15677: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
15678: end if;
15679: l_min_esd := greatest(l_min_esd,r_SVA_unique.information2);
15680:
15673: fetch c_SVA_min_max_dates into l_min_esd,l_max_eed ;
15674:
15675: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15676: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
15677: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
15678: end if;
15679: l_min_esd := greatest(l_min_esd,r_SVA_unique.information2);
15680:
15681: if p_reuse_object_flag = 'Y' then
15749: l_first_rec := true ;
15750: --
15751: end if ;
15752: --
15753: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_SVC_AREA_F',l_prefix || r_SVA.information170 || l_suffix);
15754: --
15755:
15756: l_effective_date := r_SVA.information2;
15757: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15753: ben_pd_copy_to_ben_one.ben_chk_col_len('NAME' ,'BEN_SVC_AREA_F',l_prefix || r_SVA.information170 || l_suffix);
15754: --
15755:
15756: l_effective_date := r_SVA.information2;
15757: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15758: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
15759: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
15760: end if;
15761:
15754: --
15755:
15756: l_effective_date := r_SVA.information2;
15757: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15758: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
15759: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
15760: end if;
15761:
15762: if l_first_rec and not l_update then
15755:
15756: l_effective_date := r_SVA.information2;
15757: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
15758: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
15759: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
15760: end if;
15761:
15762: if l_first_rec and not l_update then
15763: -- Call Create routine.
16073: end if ;
16074: -- End Prefix Sufix derivation
16075: for r_PON_unique in c_unique_PON('PON') loop
16076:
16077: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
16078: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16079: r_PON_unique.information3 >=
16080: ben_pd_copy_to_ben_one.g_copy_effective_date)
16081: ) then
16074: -- End Prefix Sufix derivation
16075: for r_PON_unique in c_unique_PON('PON') loop
16076:
16077: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
16078: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16079: r_PON_unique.information3 >=
16080: ben_pd_copy_to_ben_one.g_copy_effective_date)
16081: ) then
16082: --
16076:
16077: if (ben_pd_copy_to_ben_one.g_copy_effective_date is null or
16078: (ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16079: r_PON_unique.information3 >=
16080: ben_pd_copy_to_ben_one.g_copy_effective_date)
16081: ) then
16082: --
16083: hr_utility.set_location(' r_PON_unique.table_route_id '||r_PON_unique.table_route_id,10);
16084: hr_utility.set_location(' r_PON_unique.information1 '||r_PON_unique.information1,10);
16143: open c_PON_min_max_dates(r_PON_unique.table_route_id, r_PON_unique.information1 ) ;
16144: fetch c_PON_min_max_dates into l_min_esd,l_max_eed ;
16145: --
16146:
16147: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16148: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
16149: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
16150: end if;
16151: l_min_esd := greatest(l_min_esd,r_PON_unique.information2);
16144: fetch c_PON_min_max_dates into l_min_esd,l_max_eed ;
16145: --
16146:
16147: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16148: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
16149: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
16150: end if;
16151: l_min_esd := greatest(l_min_esd,r_PON_unique.information2);
16152: /*
16145: --
16146:
16147: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16148: l_min_esd < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
16149: l_min_esd := ben_pd_copy_to_ben_one.g_copy_effective_date;
16150: end if;
16151: l_min_esd := greatest(l_min_esd,r_PON_unique.information2);
16152: /*
16153: open c_PON(r_PON_unique.table_route_id,
16225: end if ;
16226: --
16227:
16228: l_effective_date := r_PON.information2;
16229: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16230: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
16231: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
16232: end if;
16233:
16226: --
16227:
16228: l_effective_date := r_PON.information2;
16229: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16230: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
16231: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
16232: end if;
16233:
16234: if l_first_rec and not l_update then
16227:
16228: l_effective_date := r_PON.information2;
16229: if ( ben_pd_copy_to_ben_one.g_copy_effective_date is not null and
16230: l_effective_date < ben_pd_copy_to_ben_one.g_copy_effective_date ) then
16231: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
16232: end if;
16233:
16234: if l_first_rec and not l_update then
16235: -- Call Create routine.
16811: l_first_rec := TRUE;
16812: --
16813: END IF;
16814: --
16815: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
16816: --
16817: ben_pd_copy_to_ben_one.ben_chk_col_len ('NAME', 'BEN_ELIGY_CRITERIA', l_prefix || r_egl.information170 || l_suffix );
16818: --
16819: IF l_map_succeed = true
16813: END IF;
16814: --
16815: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
16816: --
16817: ben_pd_copy_to_ben_one.ben_chk_col_len ('NAME', 'BEN_ELIGY_CRITERIA', l_prefix || r_egl.information170 || l_suffix );
16818: --
16819: IF l_map_succeed = true
16820: THEN
16821: --
17054: fetch c_source_business_group into l_source_business_group, l_source_business_group_id;
17055: close c_source_business_group;
17056: --
17057:
17058: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('FFF') then
17059: BEN_PD_COPY_TO_BEN_ONE.create_fff_rows(
17060: p_validate => p_validate
17061: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17062: ,p_effective_date => p_effective_date
17055: close c_source_business_group;
17056: --
17057:
17058: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('FFF') then
17059: BEN_PD_COPY_TO_BEN_ONE.create_fff_rows(
17060: p_validate => p_validate
17061: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17062: ,p_effective_date => p_effective_date
17063: ,p_prefix_suffix_text => p_prefix_suffix_text
17067: );
17068: end if;
17069: --
17070: -- Action Types always to be Reused
17071: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('EAT'))then
17072: BEN_PD_COPY_TO_BEN_ONE.create_EAT_rows(
17073: p_validate => p_validate
17074: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17075: ,p_effective_date => p_effective_date
17068: end if;
17069: --
17070: -- Action Types always to be Reused
17071: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('EAT'))then
17072: BEN_PD_COPY_TO_BEN_ONE.create_EAT_rows(
17073: p_validate => p_validate
17074: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17075: ,p_effective_date => p_effective_date
17076: ,p_prefix_suffix_text => p_prefix_suffix_text
17079: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17080: );
17081: end if;
17082: --
17083: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('SVA') then
17084: BEN_PD_COPY_TO_BEN_ONE.create_SVA_rows(
17085: p_validate => p_validate
17086: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17087: ,p_effective_date => p_effective_date
17080: );
17081: end if;
17082: --
17083: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('SVA') then
17084: BEN_PD_COPY_TO_BEN_ONE.create_SVA_rows(
17085: p_validate => p_validate
17086: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17087: ,p_effective_date => p_effective_date
17088: ,p_prefix_suffix_text => p_prefix_suffix_text
17092: );
17093: end if;
17094: --
17095: --TCS PDW Enhancement , creation of Benefits Balances is supported
17096: if (BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('BNB'))then
17097: BEN_PD_COPY_TO_BEN_ONE.create_bnb_rows(
17098: p_validate => p_validate
17099: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17100: ,p_effective_date => p_effective_date
17093: end if;
17094: --
17095: --TCS PDW Enhancement , creation of Benefits Balances is supported
17096: if (BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('BNB'))then
17097: BEN_PD_COPY_TO_BEN_ONE.create_bnb_rows(
17098: p_validate => p_validate
17099: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17100: ,p_effective_date => p_effective_date
17101: ,p_prefix_suffix_text => p_prefix_suffix_text
17104: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17105: );
17106: end if;
17107: --
17108: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CLF') then
17109: BEN_PD_COPY_TO_BEN_ONE.create_CLF_rows(
17110: p_validate => p_validate
17111: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17112: ,p_effective_date => p_effective_date
17105: );
17106: end if;
17107: --
17108: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CLF') then
17109: BEN_PD_COPY_TO_BEN_ONE.create_CLF_rows(
17110: p_validate => p_validate
17111: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17112: ,p_effective_date => p_effective_date
17113: ,p_prefix_suffix_text => p_prefix_suffix_text
17116: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17117: );
17118: end if;
17119: --
17120: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('HWF') then
17121: BEN_PD_COPY_TO_BEN_ONE.create_HWF_rows(
17122: p_validate => p_validate
17123: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17124: ,p_effective_date => p_effective_date
17117: );
17118: end if;
17119: --
17120: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('HWF') then
17121: BEN_PD_COPY_TO_BEN_ONE.create_HWF_rows(
17122: p_validate => p_validate
17123: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17124: ,p_effective_date => p_effective_date
17125: ,p_prefix_suffix_text => p_prefix_suffix_text
17128: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17129: );
17130: end if;
17131: --
17132: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('AGF') then
17133: BEN_PD_COPY_TO_BEN_ONE.create_AGF_rows(
17134: p_validate => p_validate
17135: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17136: ,p_effective_date => p_effective_date
17129: );
17130: end if;
17131: --
17132: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('AGF') then
17133: BEN_PD_COPY_TO_BEN_ONE.create_AGF_rows(
17134: p_validate => p_validate
17135: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17136: ,p_effective_date => p_effective_date
17137: ,p_prefix_suffix_text => p_prefix_suffix_text
17140: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17141: );
17142: end if;
17143: --
17144: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LSF') then
17145: BEN_PD_COPY_TO_BEN_ONE.create_LSF_rows(
17146: p_validate => p_validate
17147: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17148: ,p_effective_date => p_effective_date
17141: );
17142: end if;
17143: --
17144: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LSF') then
17145: BEN_PD_COPY_TO_BEN_ONE.create_LSF_rows(
17146: p_validate => p_validate
17147: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17148: ,p_effective_date => p_effective_date
17149: ,p_prefix_suffix_text => p_prefix_suffix_text
17153: );
17154: end if;
17155: --
17156: --
17157: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PFF') then
17158: BEN_PD_COPY_TO_BEN_ONE.create_PFF_rows(
17159: p_validate => p_validate
17160: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17161: ,p_effective_date => p_effective_date
17154: end if;
17155: --
17156: --
17157: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PFF') then
17158: BEN_PD_COPY_TO_BEN_ONE.create_PFF_rows(
17159: p_validate => p_validate
17160: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17161: ,p_effective_date => p_effective_date
17162: ,p_prefix_suffix_text => p_prefix_suffix_text
17166: );
17167: end if;
17168: --
17169: --
17170: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CLA') then
17171: BEN_PD_COPY_TO_BEN_ONE.create_CLA_rows(
17172: p_validate => p_validate
17173: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17174: ,p_effective_date => p_effective_date
17167: end if;
17168: --
17169: --
17170: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CLA') then
17171: BEN_PD_COPY_TO_BEN_ONE.create_CLA_rows(
17172: p_validate => p_validate
17173: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17174: ,p_effective_date => p_effective_date
17175: ,p_prefix_suffix_text => p_prefix_suffix_text
17179: );
17180: end if;
17181: --
17182: --
17183: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PTP') )then
17184: BEN_PD_COPY_TO_BEN_ONE.create_PTP_rows(
17185: p_validate => p_validate
17186: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17187: ,p_effective_date => p_effective_date
17180: end if;
17181: --
17182: --
17183: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PTP') )then
17184: BEN_PD_COPY_TO_BEN_ONE.create_PTP_rows(
17185: p_validate => p_validate
17186: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17187: ,p_effective_date => p_effective_date
17188: ,p_prefix_suffix_text => p_prefix_suffix_text
17192: );
17193: end if;
17194: --
17195: --
17196: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PLN'))then
17197: BEN_PD_COPY_TO_BEN_ONE.create_PLN_rows(
17198: p_validate => p_validate
17199: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17200: ,p_effective_date => p_effective_date
17193: end if;
17194: --
17195: --
17196: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PLN'))then
17197: BEN_PD_COPY_TO_BEN_ONE.create_PLN_rows(
17198: p_validate => p_validate
17199: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17200: ,p_effective_date => p_effective_date
17201: ,p_prefix_suffix_text => p_prefix_suffix_text
17205: );
17206: end if;
17207: --
17208: --
17209: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('BNR'))then
17210: BEN_PD_COPY_TO_BEN_ONE.create_BNR_rows(
17211: p_validate => p_validate
17212: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17213: ,p_effective_date => p_effective_date
17206: end if;
17207: --
17208: --
17209: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('BNR'))then
17210: BEN_PD_COPY_TO_BEN_ONE.create_BNR_rows(
17211: p_validate => p_validate
17212: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17213: ,p_effective_date => p_effective_date
17214: ,p_prefix_suffix_text => p_prefix_suffix_text
17219: end if;
17220: --
17221:
17222: -- Regulations always to be Reused
17223: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('REG'))then
17224: BEN_PD_COPY_TO_BEN_ONE.create_REG_rows(
17225: p_validate => p_validate
17226: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17227: ,p_effective_date => p_effective_date
17220: --
17221:
17222: -- Regulations always to be Reused
17223: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('REG'))then
17224: BEN_PD_COPY_TO_BEN_ONE.create_REG_rows(
17225: p_validate => p_validate
17226: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17227: ,p_effective_date => p_effective_date
17228: ,p_prefix_suffix_text => p_prefix_suffix_text
17232: );
17233: end if;
17234: --
17235: --
17236: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('OPT'))then
17237: BEN_PD_COPY_TO_BEN_ONE.create_OPT_rows(
17238: p_validate => p_validate
17239: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17240: ,p_effective_date => p_effective_date
17233: end if;
17234: --
17235: --
17236: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('OPT'))then
17237: BEN_PD_COPY_TO_BEN_ONE.create_OPT_rows(
17238: p_validate => p_validate
17239: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17240: ,p_effective_date => p_effective_date
17241: ,p_prefix_suffix_text => p_prefix_suffix_text
17244: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17245: );
17246: end if;
17247: --
17248: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PON'))then
17249: BEN_PD_COPY_TO_BEN_ONE.create_PON_rows(
17250: p_validate => p_validate
17251: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17252: ,p_effective_date => p_effective_date
17245: );
17246: end if;
17247: --
17248: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PON'))then
17249: BEN_PD_COPY_TO_BEN_ONE.create_PON_rows(
17250: p_validate => p_validate
17251: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17252: ,p_effective_date => p_effective_date
17253: ,p_prefix_suffix_text => p_prefix_suffix_text
17256: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17257: );
17258: end if;
17259: --
17260: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('RZR') then
17261: BEN_PD_COPY_TO_BEN_ONE.create_RZR_rows(
17262: p_validate => p_validate
17263: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17264: ,p_effective_date => p_effective_date
17257: );
17258: end if;
17259: --
17260: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('RZR') then
17261: BEN_PD_COPY_TO_BEN_ONE.create_RZR_rows(
17262: p_validate => p_validate
17263: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17264: ,p_effective_date => p_effective_date
17265: ,p_prefix_suffix_text => p_prefix_suffix_text
17269: );
17270: end if;
17271: --
17272: /* NOTIMPLEMENTED
17273: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('RCL') then
17274: BEN_PD_COPY_TO_BEN_ONE.create_RCL_rows(
17275: p_validate => p_validate
17276: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17277: ,p_effective_date => p_effective_date
17270: end if;
17271: --
17272: /* NOTIMPLEMENTED
17273: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('RCL') then
17274: BEN_PD_COPY_TO_BEN_ONE.create_RCL_rows(
17275: p_validate => p_validate
17276: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17277: ,p_effective_date => p_effective_date
17278: ,p_prefix_suffix_text => p_prefix_suffix_text
17292: l_prefix_suffix_text := ben_PLAN_DESIGN_TXNS_api.g_pgm_pl_prefix_suffix_text;
17293: --
17294: end if;
17295: --
17296: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PGM'))then
17297: BEN_PD_COPY_TO_BEN_ONE.create_PGM_rows(
17298: p_validate => p_validate
17299: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17300: ,p_effective_date => p_effective_date
17293: --
17294: end if;
17295: --
17296: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PGM'))then
17297: BEN_PD_COPY_TO_BEN_ONE.create_PGM_rows(
17298: p_validate => p_validate
17299: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17300: ,p_effective_date => p_effective_date
17301: ,p_prefix_suffix_text => l_prefix_suffix_text
17306: end if;
17307: --
17308: -- Moved these three calls from benpdccp5.pkb
17309: --
17310: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CPL'))then
17311: BEN_PD_COPY_TO_BEN_ONE.create_CPL_rows
17312: (p_validate => p_validate
17313: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17314: ,p_effective_date => p_effective_date
17307: --
17308: -- Moved these three calls from benpdccp5.pkb
17309: --
17310: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CPL'))then
17311: BEN_PD_COPY_TO_BEN_ONE.create_CPL_rows
17312: (p_validate => p_validate
17313: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17314: ,p_effective_date => p_effective_date
17315: ,p_prefix_suffix_text => p_prefix_suffix_text
17318: ,p_prefix_suffix_cd => p_prefix_suffix_cd);
17319: end if;
17320: --
17321: --
17322: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CBP'))then
17323: BEN_PD_COPY_TO_BEN_ONE.create_CBP_rows
17324: (p_validate => p_validate
17325: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17326: ,p_effective_date => p_effective_date
17319: end if;
17320: --
17321: --
17322: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CBP'))then
17323: BEN_PD_COPY_TO_BEN_ONE.create_CBP_rows
17324: (p_validate => p_validate
17325: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17326: ,p_effective_date => p_effective_date
17327: ,p_prefix_suffix_text => p_prefix_suffix_text
17330: ,p_prefix_suffix_cd => p_prefix_suffix_cd);
17331: end if;
17332: --
17333: --
17334: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CPT'))then
17335: BEN_PD_COPY_TO_BEN_ONE.create_CPT_rows
17336: (p_validate => p_validate
17337: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17338: ,p_effective_date => p_effective_date
17331: end if;
17332: --
17333: --
17334: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CPT'))then
17335: BEN_PD_COPY_TO_BEN_ONE.create_CPT_rows
17336: (p_validate => p_validate
17337: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17338: ,p_effective_date => p_effective_date
17339: ,p_prefix_suffix_text => p_prefix_suffix_text
17342: ,p_prefix_suffix_cd => p_prefix_suffix_cd);
17343: end if;
17344: --
17345: --
17346: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LER'))then
17347: BEN_PD_COPY_TO_BEN_ONE.create_LER_rows(
17348: p_validate => p_validate
17349: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17350: ,p_effective_date => p_effective_date
17343: end if;
17344: --
17345: --
17346: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LER'))then
17347: BEN_PD_COPY_TO_BEN_ONE.create_LER_rows(
17348: p_validate => p_validate
17349: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17350: ,p_effective_date => p_effective_date
17351: ,p_prefix_suffix_text => p_prefix_suffix_text
17355: );
17356: end if;
17357: --
17358: -- TCS PDW Enhancement Opened the call to create_ELP_rows
17359: if (BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('ELP'))then
17360: BEN_PD_COPY_TO_BEN_ONE.create_ELP_rows(
17361: p_validate => p_validate
17362: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17363: ,p_effective_date => p_effective_date
17356: end if;
17357: --
17358: -- TCS PDW Enhancement Opened the call to create_ELP_rows
17359: if (BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('ELP'))then
17360: BEN_PD_COPY_TO_BEN_ONE.create_ELP_rows(
17361: p_validate => p_validate
17362: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17363: ,p_effective_date => p_effective_date
17364: ,p_prefix_suffix_text => p_prefix_suffix_text
17368: );
17369: end if;
17370: -- TCS PDW Enhancement Opened the call to create_ELP_rows
17371: --
17372: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('DCE'))then
17373: BEN_PD_COPY_TO_BEN_ONE.create_DCE_rows(
17374: p_validate => p_validate
17375: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17376: ,p_effective_date => p_effective_date
17369: end if;
17370: -- TCS PDW Enhancement Opened the call to create_ELP_rows
17371: --
17372: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('DCE'))then
17373: BEN_PD_COPY_TO_BEN_ONE.create_DCE_rows(
17374: p_validate => p_validate
17375: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17376: ,p_effective_date => p_effective_date
17377: ,p_prefix_suffix_text => p_prefix_suffix_text
17380: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17381: );
17382: end if;
17383: --
17384: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('GOS'))then
17385: BEN_PD_COPY_TO_BEN_ONE.create_GOS_rows(
17386: p_validate => p_validate
17387: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17388: ,p_effective_date => p_effective_date
17381: );
17382: end if;
17383: --
17384: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('GOS'))then
17385: BEN_PD_COPY_TO_BEN_ONE.create_GOS_rows(
17386: p_validate => p_validate
17387: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17388: ,p_effective_date => p_effective_date
17389: ,p_prefix_suffix_text => p_prefix_suffix_text
17393: );
17394: end if;
17395: --
17396: --Bug 5127683 Call the below procedure irrespective of the l_txn_row_type_cd
17397: if (BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('BNG'))then
17398: BEN_PD_COPY_TO_BEN_ONE.create_BNG_rows(
17399: p_validate => p_validate
17400: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17401: ,p_effective_date => p_effective_date
17394: end if;
17395: --
17396: --Bug 5127683 Call the below procedure irrespective of the l_txn_row_type_cd
17397: if (BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('BNG'))then
17398: BEN_PD_COPY_TO_BEN_ONE.create_BNG_rows(
17399: p_validate => p_validate
17400: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17401: ,p_effective_date => p_effective_date
17402: ,p_prefix_suffix_text => p_prefix_suffix_text
17407: end if;
17408: --
17409:
17410: --Uncommented to copy the seeded plan design for Absences, plan design wizard
17411: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PSL')
17412: and (l_source_business_group is null or
17413: BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ')
17414: ) then
17415: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows !!!!!!!!! ',10);
17409:
17410: --Uncommented to copy the seeded plan design for Absences, plan design wizard
17411: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PSL')
17412: and (l_source_business_group is null or
17413: BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ')
17414: ) then
17415: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows !!!!!!!!! ',10);
17416:
17417: BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows(
17411: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PSL')
17412: and (l_source_business_group is null or
17413: BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ')
17414: ) then
17415: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows !!!!!!!!! ',10);
17416:
17417: BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows(
17418: p_validate => p_validate
17419: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17413: BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ')
17414: ) then
17415: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows !!!!!!!!! ',10);
17416:
17417: BEN_PD_COPY_TO_BEN_ONE.create_PSL_rows(
17418: p_validate => p_validate
17419: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17420: ,p_effective_date => p_effective_date
17421: ,p_prefix_suffix_text => p_prefix_suffix_text
17425: );
17426: end if;
17427:
17428: --Uncommented to copy the seeded plan design for Absences, plan design wizard
17429: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LPL')
17430: and (BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ'))
17431: then
17432: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows!!!!!!!!!!!! ',10);
17433:
17426: end if;
17427:
17428: --Uncommented to copy the seeded plan design for Absences, plan design wizard
17429: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LPL')
17430: and (BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ'))
17431: then
17432: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows!!!!!!!!!!!! ',10);
17433:
17434: BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows(
17428: --Uncommented to copy the seeded plan design for Absences, plan design wizard
17429: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('LPL')
17430: and (BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ'))
17431: then
17432: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows!!!!!!!!!!!! ',10);
17433:
17434: BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows(
17435: p_validate => p_validate
17436: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17430: and (BEN_PD_COPY_TO_BEN_ONE.g_transaction_category = 'BEN_PDCRWZ'))
17431: then
17432: --hr_utility.set_location(' BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows!!!!!!!!!!!! ',10);
17433:
17434: BEN_PD_COPY_TO_BEN_ONE.create_LPL_rows(
17435: p_validate => p_validate
17436: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17437: ,p_effective_date => p_effective_date
17438: ,p_prefix_suffix_text => p_prefix_suffix_text
17442: );
17443: end if;
17444:
17445: --
17446: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CCT'))then
17447: BEN_PD_COPY_TO_BEN_ONE.create_CCT_rows(
17448: p_validate => p_validate
17449: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17450: ,p_effective_date => p_effective_date
17443: end if;
17444:
17445: --
17446: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('CCT'))then
17447: BEN_PD_COPY_TO_BEN_ONE.create_CCT_rows(
17448: p_validate => p_validate
17449: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17450: ,p_effective_date => p_effective_date
17451: ,p_prefix_suffix_text => p_prefix_suffix_text
17454: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17455: );
17456: end if;
17457: --
17458: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PDL'))then
17459: BEN_PD_COPY_TO_BEN_ONE.create_PDL_rows(
17460: p_validate => p_validate
17461: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17462: ,p_effective_date => p_effective_date
17455: );
17456: end if;
17457: --
17458: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('PDL'))then
17459: BEN_PD_COPY_TO_BEN_ONE.create_PDL_rows(
17460: p_validate => p_validate
17461: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17462: ,p_effective_date => p_effective_date
17463: ,p_prefix_suffix_text => p_prefix_suffix_text
17466: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17467: );
17468: end if;
17469: --
17470: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('YRP'))then
17471: BEN_PD_COPY_TO_BEN_ONE.create_YRP_rows(
17472: p_validate => p_validate
17473: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17474: ,p_effective_date => p_effective_date
17467: );
17468: end if;
17469: --
17470: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('YRP'))then
17471: BEN_PD_COPY_TO_BEN_ONE.create_YRP_rows(
17472: p_validate => p_validate
17473: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17474: ,p_effective_date => p_effective_date
17475: ,p_prefix_suffix_text => p_prefix_suffix_text
17478: ,p_prefix_suffix_cd => p_prefix_suffix_cd
17479: );
17480: end if;
17481: --
17482: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('WYP'))then
17483: BEN_PD_COPY_TO_BEN_ONE.create_WYP_rows(
17484: p_validate => p_validate
17485: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17486: ,p_effective_date => p_effective_date
17479: );
17480: end if;
17481: --
17482: if ((l_txn_row_type_cd <> 'ELP') and BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('WYP'))then
17483: BEN_PD_COPY_TO_BEN_ONE.create_WYP_rows(
17484: p_validate => p_validate
17485: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17486: ,p_effective_date => p_effective_date
17487: ,p_prefix_suffix_text => p_prefix_suffix_text
17493: --
17494: --
17495: -- Bug 4169120 : Rate By Criteria
17496: --
17497: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('EGL')
17498: then
17499: --
17500: BEN_PD_COPY_TO_BEN_ONE.create_EGL_rows
17501: (
17496: --
17497: if BEN_PD_COPY_TO_BEN_ONE.data_exists_for_table('EGL')
17498: then
17499: --
17500: BEN_PD_COPY_TO_BEN_ONE.create_EGL_rows
17501: (
17502: p_validate => p_validate
17503: ,p_copy_entity_txn_id => p_copy_entity_txn_id
17504: ,p_effective_date => p_effective_date
17511: end if;
17512: --
17513: end create_all_leaf_ben_rows;
17514: --
17515: end BEN_PD_COPY_TO_BEN_ONE;
17516: