[Home] [Help]
18: l_update boolean := true ;
19: l_datetrack_mode varchar2(80) := p_datetrack_mode ;
20: begin
21: --
22: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
23: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
24: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
25: hr_utility.set_location('p_effective_date '||p_effective_date,10);
26: --
19: l_datetrack_mode varchar2(80) := p_datetrack_mode ;
20: begin
21: --
22: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
23: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
24: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
25: hr_utility.set_location('p_effective_date '||p_effective_date,10);
26: --
27: if p_effective_end_date <> hr_api.g_eot then
20: begin
21: --
22: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
23: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
24: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
25: hr_utility.set_location('p_effective_date '||p_effective_date,10);
26: --
27: if p_effective_end_date <> hr_api.g_eot then
28: --
21: --
22: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
23: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
24: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
25: hr_utility.set_location('p_effective_date '||p_effective_date,10);
26: --
27: if p_effective_end_date <> hr_api.g_eot then
28: --
29: if p_dml_operation = 'INSERT' then
116: --
117: p_datetrack_mode := l_datetrack_mode ;
118: -- p_update := l_update ;
119: --
120: hr_utility.set_location('Leaving get_dt_modes p_dt_mode '||p_datetrack_mode,10);
121: --
122: end get_dt_modes ;
123: --
124: -- Start of Performance additions
217: -- Private procedure to update the cer with target details
218: --
219: procedure update_cer_with_target(c_pk_rec g_pk_rec_type, p_copy_entity_txn_id in number) is
220: begin
221: hr_utility.set_location('Inside update_cer_with_target ',233);
222: update ben_copy_entity_results
223: set information9 = c_pk_rec.copy_reuse_type||'-'||c_pk_rec.new_value
224: where copy_entity_txn_id = p_copy_entity_txn_id
225: and table_route_id = c_pk_rec.table_route_id
244: l_length number := length(column_value) ;
245: l_var varchar2(4000):= '*' ;
246:
247: BEGIN
248: hr_utility.set_location('Inside ben_chk_col_len ',234);
249: --- pls dont change -- tilak
250: l_var := rpad(l_var,l_length,'*');
251: EXECUTE IMMEDIATE
252: 'declare
300: ,p_pk_id in number
301: ,p_new_name in varchar2
302: ,p_copied_reused_cd in varchar2) is
303: begin
304: hr_utility.set_location('Entering log_data ',5);
305:
306: if p_table_alias = 'PGM' then
307: if p_copied_reused_cd = 'COPIED' then
308: g_pgm_tbl_copied(g_pgm_tbl_copied_count).pk_id := p_pk_id;
668: g_egl_tbl_reused_count := g_egl_tbl_reused_count + 1;
669: end if;
670: end if;
671:
672: hr_utility.set_location('Leaving log_data ',100);
673: end log_data;
674: --
675: --
676: -- Procedure to store Log details
676: -- Procedure to store Log details
677: --
678: procedure init_log_tbl is
679: begin
680: hr_utility.set_location('Entering init_log_tbl ',5);
681:
682: g_pgm_tbl_copied.delete;
683: g_pgm_tbl_copied(0) := null ;
684: g_pgm_tbl_copied_count := 0 ;
919: BEN_PD_COPY_TO_BEN_three.g_not_copied_tbl.delete;
920: BEN_PD_COPY_TO_BEN_three.g_not_copied_tbl(0) := null ;
921: BEN_PD_COPY_TO_BEN_three.g_not_copied_tbl_count := 0 ;
922:
923: hr_utility.set_location('Leaving init_log_tbl ',100);
924: end init_log_tbl;
925: --
926: -- End Log additions
927: --
971: p_datetrack_mode IN VARCHAR
972: )
973: IS
974: BEGIN
975: hr_utility.set_location ('Entering procedure create_or_update_ff creation ',10);
976:
977: IF p_dml_operation = hr_api.g_insert
978: THEN
979: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
975: hr_utility.set_location ('Entering procedure create_or_update_ff creation ',10);
976:
977: IF p_dml_operation = hr_api.g_insert
978: THEN
979: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
980: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
981: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
982: hr_utility.set_location (' p_process_date' || p_process_date, 10);
983: hr_utility.set_location (' p_effective_start_date'|| p_effective_start_date,10);
976:
977: IF p_dml_operation = hr_api.g_insert
978: THEN
979: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
980: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
981: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
982: hr_utility.set_location (' p_process_date' || p_process_date, 10);
983: hr_utility.set_location (' p_effective_start_date'|| p_effective_start_date,10);
984: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
977: IF p_dml_operation = hr_api.g_insert
978: THEN
979: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
980: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
981: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
982: hr_utility.set_location (' p_process_date' || p_process_date, 10);
983: hr_utility.set_location (' p_effective_start_date'|| p_effective_start_date,10);
984: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
985:
978: THEN
979: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
980: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
981: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
982: hr_utility.set_location (' p_process_date' || p_process_date, 10);
983: hr_utility.set_location (' p_effective_start_date'|| p_effective_start_date,10);
984: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
985:
986: --Perform an insert if the dml operation is insert
979: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
980: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
981: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
982: hr_utility.set_location (' p_process_date' || p_process_date, 10);
983: hr_utility.set_location (' p_effective_start_date'|| p_effective_start_date,10);
984: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
985:
986: --Perform an insert if the dml operation is insert
987:
980: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
981: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
982: hr_utility.set_location (' p_process_date' || p_process_date, 10);
983: hr_utility.set_location (' p_effective_start_date'|| p_effective_start_date,10);
984: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
985:
986: --Perform an insert if the dml operation is insert
987:
988: INSERT INTO ff_formulas_f
1004: END IF;
1005:
1006: IF p_dml_operation = hr_api.g_update
1007: THEN
1008: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
1009: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
1010: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
1011: hr_utility.set_location (' p_process_date' || p_process_date, 10);
1012: hr_utility.set_location (' p_effective_start_date' || p_effective_start_date,10);
1005:
1006: IF p_dml_operation = hr_api.g_update
1007: THEN
1008: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
1009: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
1010: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
1011: hr_utility.set_location (' p_process_date' || p_process_date, 10);
1012: hr_utility.set_location (' p_effective_start_date' || p_effective_start_date,10);
1013: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
1006: IF p_dml_operation = hr_api.g_update
1007: THEN
1008: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
1009: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
1010: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
1011: hr_utility.set_location (' p_process_date' || p_process_date, 10);
1012: hr_utility.set_location (' p_effective_start_date' || p_effective_start_date,10);
1013: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
1014:
1007: THEN
1008: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
1009: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
1010: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
1011: hr_utility.set_location (' p_process_date' || p_process_date, 10);
1012: hr_utility.set_location (' p_effective_start_date' || p_effective_start_date,10);
1013: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
1014:
1015: IF p_datetrack_mode = hr_api.g_update
1008: hr_utility.set_location (' p_dml_operation' || p_dml_operation, 10);
1009: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
1010: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
1011: hr_utility.set_location (' p_process_date' || p_process_date, 10);
1012: hr_utility.set_location (' p_effective_start_date' || p_effective_start_date,10);
1013: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
1014:
1015: IF p_datetrack_mode = hr_api.g_update
1016: THEN
1009: hr_utility.set_location (' p_datetrack_mode' || p_datetrack_mode, 10);
1010: hr_utility.set_location (' p_formula_id' || p_formula_id, 10);
1011: hr_utility.set_location (' p_process_date' || p_process_date, 10);
1012: hr_utility.set_location (' p_effective_start_date' || p_effective_start_date,10);
1013: hr_utility.set_location (' p_effective_end_date' || p_effective_end_date,10);
1014:
1015: IF p_datetrack_mode = hr_api.g_update
1016: THEN
1017: UPDATE ff_formulas_f
1133: );
1134: END IF;
1135: END IF;
1136:
1137: hr_utility.set_location ('Leaving procedure create_or_update_ff creation ',10);
1138: --
1139: END create_or_update_ff;
1140: --
1141:
1257: l_effective_date DATE;
1258: l_formula_name ff_formulas_f.formula_name%TYPE; -- 5253679 (FF Case Sensitive)
1259: BEGIN
1260: --
1261: hr_utility.set_location ('Entering Formula creation ', 10);
1262:
1263: -- Initialization
1264: l_object_found_in_target := FALSE;
1265:
1285: )
1286: )
1287: THEN
1288: --
1289: hr_utility.set_location ('Formula r_FFF_unique '|| r_fff_unique.information1,10);
1290: hr_utility.set_location ('l_dml_operation ' || l_dml_operation, 10);
1291: -- If reuse objects flag is 'Y' then check for the object in the target business group
1292: -- if found insert the record into PLSql table and exit the loop else try create the
1293: -- object in the target business group
1286: )
1287: THEN
1288: --
1289: hr_utility.set_location ('Formula r_FFF_unique '|| r_fff_unique.information1,10);
1290: hr_utility.set_location ('l_dml_operation ' || l_dml_operation, 10);
1291: -- If reuse objects flag is 'Y' then check for the object in the target business group
1292: -- if found insert the record into PLSql table and exit the loop else try create the
1293: -- object in the target business group
1294: --
1327: log_data ('FFF',l_new_value,l_prefix || r_fff_unique.NAME || l_suffix,'REUSED');
1328: --
1329: END IF;
1330:
1331: hr_utility.set_location ('found record for update', 10);
1332: --
1333: ELSE
1334: --
1335: l_update := FALSE;
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);
1355:
1356: -- Whether reuse or not always check whether object exists or not.
1357: IF p_reuse_object_flag = 'Y'
1358: THEN
1381:
1382: IF l_dt_rec_found
1383: THEN
1384: --END TEMPIK
1385: hr_utility.set_location ('Formula c_find_FFF_in_target found ',40);
1386: --
1387:
1388: IF r_fff_unique.information1 <> NVL (g_pk_tbl (g_count - 1).old_value,-999)
1389: OR NVL (g_pk_tbl (g_count - 1).pk_id_column, '999') <>'FORMULA_ID'
1414: END IF;
1415: END IF;
1416:
1417: --
1418: hr_utility.set_location (' Before l_object_found_in_target ', 50);
1419: hr_utility.set_location (' Before r_FFF_unique.information1 = '|| r_fff_unique.information1,50);
1420: hr_utility.set_location (' Before r_FFF_unique.information2 = '|| r_fff_unique.information2,50);
1421: hr_utility.set_location (' Before r_FFF_unique.information3 = '|| r_fff_unique.information3,50);
1422: CLOSE c_fff_min_max_dates;
1415: END IF;
1416:
1417: --
1418: hr_utility.set_location (' Before l_object_found_in_target ', 50);
1419: hr_utility.set_location (' Before r_FFF_unique.information1 = '|| r_fff_unique.information1,50);
1420: hr_utility.set_location (' Before r_FFF_unique.information2 = '|| r_fff_unique.information2,50);
1421: hr_utility.set_location (' Before r_FFF_unique.information3 = '|| r_fff_unique.information3,50);
1422: CLOSE c_fff_min_max_dates;
1423: END IF;
1416:
1417: --
1418: hr_utility.set_location (' Before l_object_found_in_target ', 50);
1419: hr_utility.set_location (' Before r_FFF_unique.information1 = '|| r_fff_unique.information1,50);
1420: hr_utility.set_location (' Before r_FFF_unique.information2 = '|| r_fff_unique.information2,50);
1421: hr_utility.set_location (' Before r_FFF_unique.information3 = '|| r_fff_unique.information3,50);
1422: CLOSE c_fff_min_max_dates;
1423: END IF;
1424:
1417: --
1418: hr_utility.set_location (' Before l_object_found_in_target ', 50);
1419: hr_utility.set_location (' Before r_FFF_unique.information1 = '|| r_fff_unique.information1,50);
1420: hr_utility.set_location (' Before r_FFF_unique.information2 = '|| r_fff_unique.information2,50);
1421: hr_utility.set_location (' Before r_FFF_unique.information3 = '|| r_fff_unique.information3,50);
1422: CLOSE c_fff_min_max_dates;
1423: END IF;
1424:
1425: IF NOT l_object_found_in_target OR l_update
1424:
1425: IF NOT l_object_found_in_target OR l_update
1426: THEN
1427: --
1428: hr_utility.set_location (' l_object_found_in_target ', 60);
1429: OPEN c_fff (r_fff_unique.table_route_id,
1430: r_fff_unique.information1,
1431: r_fff_unique.information2,
1432: r_fff_unique.information3
1437: CLOSE c_fff;
1438: --
1439: l_current_pk_id := r_fff.information1;
1440: --
1441: hr_utility.set_location (' l_current_pk_id ' || l_current_pk_id,20);
1442: hr_utility.set_location (' l_prev_pk_id ' || l_prev_pk_id, 20);
1443:
1444: --
1445: IF l_current_pk_id = l_prev_pk_id
1438: --
1439: l_current_pk_id := r_fff.information1;
1440: --
1441: hr_utility.set_location (' l_current_pk_id ' || l_current_pk_id,20);
1442: hr_utility.set_location (' l_prev_pk_id ' || l_prev_pk_id, 20);
1443:
1444: --
1445: IF l_current_pk_id = l_prev_pk_id
1446: THEN
1467: IF l_first_rec AND NOT l_update
1468: THEN
1469: -- Call Create routine.
1470: --
1471: hr_utility.set_location (' In the Insert FF_FORMULAS_F ', 70);
1472:
1473: --
1474: --
1475: --
1476: SELECT ff_formulas_s.NEXTVAL
1477: INTO l_formula_id
1478: FROM SYS.DUAL;
1479: --
1480: hr_utility.set_location (' l_formula_id ' || l_formula_id, 80);
1481: hr_utility.set_location (' l_formula_type_id ' || l_formula_type_id,80);
1482: hr_utility.set_location (' name ' || l_prefix || r_fff.information112 || l_suffix,80);
1483: hr_utility.set_location (' esd ' || r_fff.information2, 80);
1484: hr_utility.set_location (' eed ' || r_fff.information3, 80);
1477: INTO l_formula_id
1478: FROM SYS.DUAL;
1479: --
1480: hr_utility.set_location (' l_formula_id ' || l_formula_id, 80);
1481: hr_utility.set_location (' l_formula_type_id ' || l_formula_type_id,80);
1482: hr_utility.set_location (' name ' || l_prefix || r_fff.information112 || l_suffix,80);
1483: hr_utility.set_location (' esd ' || r_fff.information2, 80);
1484: hr_utility.set_location (' eed ' || r_fff.information3, 80);
1485:
1478: FROM SYS.DUAL;
1479: --
1480: hr_utility.set_location (' l_formula_id ' || l_formula_id, 80);
1481: hr_utility.set_location (' l_formula_type_id ' || l_formula_type_id,80);
1482: hr_utility.set_location (' name ' || l_prefix || r_fff.information112 || l_suffix,80);
1483: hr_utility.set_location (' esd ' || r_fff.information2, 80);
1484: hr_utility.set_location (' eed ' || r_fff.information3, 80);
1485:
1486: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; --5253679 (FF Case Sensitive)
1479: --
1480: hr_utility.set_location (' l_formula_id ' || l_formula_id, 80);
1481: hr_utility.set_location (' l_formula_type_id ' || l_formula_type_id,80);
1482: hr_utility.set_location (' name ' || l_prefix || r_fff.information112 || l_suffix,80);
1483: hr_utility.set_location (' esd ' || r_fff.information2, 80);
1484: hr_utility.set_location (' eed ' || r_fff.information3, 80);
1485:
1486: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; --5253679 (FF Case Sensitive)
1487: --
1480: hr_utility.set_location (' l_formula_id ' || l_formula_id, 80);
1481: hr_utility.set_location (' l_formula_type_id ' || l_formula_type_id,80);
1482: hr_utility.set_location (' name ' || l_prefix || r_fff.information112 || l_suffix,80);
1483: hr_utility.set_location (' esd ' || r_fff.information2, 80);
1484: hr_utility.set_location (' eed ' || r_fff.information3, 80);
1485:
1486: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; --5253679 (FF Case Sensitive)
1487: --
1488: create_or_update_ff (p_formula_id => l_formula_id,
1509:
1510:
1511: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1512: -- Update all relevent cer records with new pk_id
1513: hr_utility.set_location ('Before plsql table ', 222);
1514: hr_utility.set_location ('new_value id ' || l_formula_id, 222);
1515: --
1516: g_pk_tbl (g_count).pk_id_column := 'FORMULA_ID';
1517: g_pk_tbl (g_count).old_value := r_fff.information1;
1510:
1511: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1512: -- Update all relevent cer records with new pk_id
1513: hr_utility.set_location ('Before plsql table ', 222);
1514: hr_utility.set_location ('new_value id ' || l_formula_id, 222);
1515: --
1516: g_pk_tbl (g_count).pk_id_column := 'FORMULA_ID';
1517: g_pk_tbl (g_count).old_value := r_fff.information1;
1518: g_pk_tbl (g_count).new_value := l_formula_id;
1518: g_pk_tbl (g_count).new_value := l_formula_id;
1519: g_pk_tbl (g_count).copy_reuse_type := 'COPIED';
1520: g_pk_tbl (g_count).table_route_id := r_fff_unique.table_route_id;
1521: --
1522: hr_utility.set_location ('After plsql table ', 222);
1523: --
1524: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
1525: --
1526: g_count := g_count + 1;
1541: --
1542: ELSE
1543: --
1544: --UPD START
1545: hr_utility.set_location ('Before call to get_dt_modes l_dt_mode'|| l_datetrack_mode,5);
1546:
1547: --
1548: IF l_update
1549: THEN
1563: l_object_version_number := r_fff.information265;
1564: --
1565:
1566: --
1567: hr_utility.set_location ('After call to get_dt_modes l_dt_mode' || l_datetrack_mode,5);
1568: --
1569:
1570: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; -- 5253679 (FF Case Sensitive)
1571: --UPD END
1594: ELSE
1595: IF l_dml_operation <> 'UPDATE'
1596: THEN
1597: --
1598: hr_utility.set_location (' l_formula_id ' || l_formula_id,90);
1599: hr_utility.set_location (' l_formula_type_id '|| l_formula_type_id,90);
1600: hr_utility.set_location (' name '|| l_prefix|| r_fff.information112|| l_suffix,90);
1601: hr_utility.set_location (' esd ' || r_fff.information2,90);
1602: hr_utility.set_location (' eed ' || r_fff.information3,90);
1595: IF l_dml_operation <> 'UPDATE'
1596: THEN
1597: --
1598: hr_utility.set_location (' l_formula_id ' || l_formula_id,90);
1599: hr_utility.set_location (' l_formula_type_id '|| l_formula_type_id,90);
1600: hr_utility.set_location (' name '|| l_prefix|| r_fff.information112|| l_suffix,90);
1601: hr_utility.set_location (' esd ' || r_fff.information2,90);
1602: hr_utility.set_location (' eed ' || r_fff.information3,90);
1603:
1596: THEN
1597: --
1598: hr_utility.set_location (' l_formula_id ' || l_formula_id,90);
1599: hr_utility.set_location (' l_formula_type_id '|| l_formula_type_id,90);
1600: hr_utility.set_location (' name '|| l_prefix|| r_fff.information112|| l_suffix,90);
1601: hr_utility.set_location (' esd ' || r_fff.information2,90);
1602: hr_utility.set_location (' eed ' || r_fff.information3,90);
1603:
1604: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; -- 5253679 (FF Case Sensitive)
1597: --
1598: hr_utility.set_location (' l_formula_id ' || l_formula_id,90);
1599: hr_utility.set_location (' l_formula_type_id '|| l_formula_type_id,90);
1600: hr_utility.set_location (' name '|| l_prefix|| r_fff.information112|| l_suffix,90);
1601: hr_utility.set_location (' esd ' || r_fff.information2,90);
1602: hr_utility.set_location (' eed ' || r_fff.information3,90);
1603:
1604: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; -- 5253679 (FF Case Sensitive)
1605: --
1598: hr_utility.set_location (' l_formula_id ' || l_formula_id,90);
1599: hr_utility.set_location (' l_formula_type_id '|| l_formula_type_id,90);
1600: hr_utility.set_location (' name '|| l_prefix|| r_fff.information112|| l_suffix,90);
1601: hr_utility.set_location (' esd ' || r_fff.information2,90);
1602: hr_utility.set_location (' eed ' || r_fff.information3,90);
1603:
1604: l_formula_name := l_prefix || r_fff.information112 || l_suffix ; -- 5253679 (FF Case Sensitive)
1605: --
1606: create_or_update_ff (p_formula_id => l_formula_id,
1650: END IF;
1651: --
1652: END LOOP;
1653:
1654: hr_utility.set_location ('Leaving Formula creation ', 10);
1655:
1656: EXCEPTION
1657: WHEN OTHERS
1658: THEN
1768: end if ;
1769: -- End Prefix Sufix derivation
1770: for r_EAT_unique in c_unique_EAT('EAT') loop
1771: --
1772: hr_utility.set_location(' r_EAT_unique.table_route_id '||r_EAT_unique.table_route_id,10);
1773: hr_utility.set_location(' r_EAT_unique.information1 '||r_EAT_unique.information1,10);
1774: hr_utility.set_location( 'r_EAT_unique.information2 '||r_EAT_unique.information2,10);
1775: hr_utility.set_location( 'r_EAT_unique.information3 '||r_EAT_unique.information3,10);
1776: -- If reuse objects flag is 'Y' then check for the object in the target business group
1769: -- End Prefix Sufix derivation
1770: for r_EAT_unique in c_unique_EAT('EAT') loop
1771: --
1772: hr_utility.set_location(' r_EAT_unique.table_route_id '||r_EAT_unique.table_route_id,10);
1773: hr_utility.set_location(' r_EAT_unique.information1 '||r_EAT_unique.information1,10);
1774: hr_utility.set_location( 'r_EAT_unique.information2 '||r_EAT_unique.information2,10);
1775: hr_utility.set_location( 'r_EAT_unique.information3 '||r_EAT_unique.information3,10);
1776: -- If reuse objects flag is 'Y' then check for the object in the target business group
1777: -- if found insert the record into PLSql table and exit the loop else try create the
1770: for r_EAT_unique in c_unique_EAT('EAT') loop
1771: --
1772: hr_utility.set_location(' r_EAT_unique.table_route_id '||r_EAT_unique.table_route_id,10);
1773: hr_utility.set_location(' r_EAT_unique.information1 '||r_EAT_unique.information1,10);
1774: hr_utility.set_location( 'r_EAT_unique.information2 '||r_EAT_unique.information2,10);
1775: hr_utility.set_location( 'r_EAT_unique.information3 '||r_EAT_unique.information3,10);
1776: -- If reuse objects flag is 'Y' then check for the object in the target business group
1777: -- if found insert the record into PLSql table and exit the loop else try create the
1778: -- object in the target business group
1771: --
1772: hr_utility.set_location(' r_EAT_unique.table_route_id '||r_EAT_unique.table_route_id,10);
1773: hr_utility.set_location(' r_EAT_unique.information1 '||r_EAT_unique.information1,10);
1774: hr_utility.set_location( 'r_EAT_unique.information2 '||r_EAT_unique.information2,10);
1775: hr_utility.set_location( 'r_EAT_unique.information3 '||r_EAT_unique.information3,10);
1776: -- If reuse objects flag is 'Y' then check for the object in the target business group
1777: -- if found insert the record into PLSql table and exit the loop else try create the
1778: -- object in the target business group
1779: --
1821: if not l_object_found_in_target then
1822: --
1823: l_current_pk_id := r_EAT.information1;
1824: --
1825: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
1826: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
1827: --
1828: if l_current_pk_id = l_prev_pk_id then
1829: --
1822: --
1823: l_current_pk_id := r_EAT.information1;
1824: --
1825: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
1826: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
1827: --
1828: if l_current_pk_id = l_prev_pk_id then
1829: --
1830: l_first_rec := false ;
1836: end if ;
1837: --
1838: if l_first_rec then
1839: -- Call Create routine.
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)
1884: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
1885: );
1886: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1887: -- Update all relevent cer records with new pk_id
1888: hr_utility.set_location('Before plsql table ',222);
1889: hr_utility.set_location('new_value id '||l_actn_typ_id,222);
1890: g_pk_tbl(g_count).pk_id_column := 'ACTN_TYP_ID' ;
1891: g_pk_tbl(g_count).old_value := r_EAT.information1 ;
1892: g_pk_tbl(g_count).new_value := l_ACTN_TYP_ID ;
1885: );
1886: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1887: -- Update all relevent cer records with new pk_id
1888: hr_utility.set_location('Before plsql table ',222);
1889: hr_utility.set_location('new_value id '||l_actn_typ_id,222);
1890: g_pk_tbl(g_count).pk_id_column := 'ACTN_TYP_ID' ;
1891: g_pk_tbl(g_count).old_value := r_EAT.information1 ;
1892: g_pk_tbl(g_count).new_value := l_ACTN_TYP_ID ;
1893: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
1891: g_pk_tbl(g_count).old_value := r_EAT.information1 ;
1892: g_pk_tbl(g_count).new_value := l_ACTN_TYP_ID ;
1893: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
1894: g_pk_tbl(g_count).table_route_id := r_EAT_unique.table_route_id;
1895: hr_utility.set_location('After plsql table ',222);
1896: --
1897: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
1898: --
1899: g_count := g_count + 1 ;
2078: l_prefix := null ;
2079: l_suffix := null ;
2080: end if ;
2081: --
2082: hr_utility.set_location(' r_CPL_unique.table_route_id '||r_CPL_unique.table_route_id,10);
2083: hr_utility.set_location(' r_CPL_unique.information1 '||r_CPL_unique.information1,10);
2084: hr_utility.set_location( 'r_CPL_unique.information2 '||r_CPL_unique.information2,10);
2085: hr_utility.set_location( 'r_CPL_unique.information3 '||r_CPL_unique.information3,10);
2086: -- If reuse objects flag is 'Y' then check for the object in the target business group
2079: l_suffix := null ;
2080: end if ;
2081: --
2082: hr_utility.set_location(' r_CPL_unique.table_route_id '||r_CPL_unique.table_route_id,10);
2083: hr_utility.set_location(' r_CPL_unique.information1 '||r_CPL_unique.information1,10);
2084: hr_utility.set_location( 'r_CPL_unique.information2 '||r_CPL_unique.information2,10);
2085: hr_utility.set_location( 'r_CPL_unique.information3 '||r_CPL_unique.information3,10);
2086: -- If reuse objects flag is 'Y' then check for the object in the target business group
2087: -- if found insert the record into PLSql table and exit the loop else try create the
2080: end if ;
2081: --
2082: hr_utility.set_location(' r_CPL_unique.table_route_id '||r_CPL_unique.table_route_id,10);
2083: hr_utility.set_location(' r_CPL_unique.information1 '||r_CPL_unique.information1,10);
2084: hr_utility.set_location( 'r_CPL_unique.information2 '||r_CPL_unique.information2,10);
2085: hr_utility.set_location( 'r_CPL_unique.information3 '||r_CPL_unique.information3,10);
2086: -- If reuse objects flag is 'Y' then check for the object in the target business group
2087: -- if found insert the record into PLSql table and exit the loop else try create the
2088: -- object in the target business group
2081: --
2082: hr_utility.set_location(' r_CPL_unique.table_route_id '||r_CPL_unique.table_route_id,10);
2083: hr_utility.set_location(' r_CPL_unique.information1 '||r_CPL_unique.information1,10);
2084: hr_utility.set_location( 'r_CPL_unique.information2 '||r_CPL_unique.information2,10);
2085: hr_utility.set_location( 'r_CPL_unique.information3 '||r_CPL_unique.information3,10);
2086: -- If reuse objects flag is 'Y' then check for the object in the target business group
2087: -- if found insert the record into PLSql table and exit the loop else try create the
2088: -- object in the target business group
2089: --
2123: --
2124: log_data('CPL',l_new_value,l_prefix || r_CPL_unique.name|| l_suffix,'REUSED');
2125: --
2126: end if ;
2127: hr_utility.set_location( 'found record for update',10);
2128: --
2129: else
2130: --
2131: l_update := false;
2234: --UPD END
2235: --
2236: l_current_pk_id := r_CPL.information1;
2237: --
2238: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2239: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2240: --
2241: if l_current_pk_id = l_prev_pk_id then
2242: --
2235: --
2236: l_current_pk_id := r_CPL.information1;
2237: --
2238: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2239: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2240: --
2241: if l_current_pk_id = l_prev_pk_id then
2242: --
2243: l_first_rec := false ;
2258: end if;
2259:
2260: if l_first_rec and not l_update then
2261: -- Call Create routine.
2262: hr_utility.set_location(' BEN_CMBN_PLIP_F CREATE_CMBN_PLIP ',20);
2263: BEN_CMBN_PLIP_API.CREATE_CMBN_PLIP(
2264: --
2265: P_VALIDATE => false
2266: ,P_EFFECTIVE_DATE => l_effective_date
2306: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
2307: );
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 ;
2307: );
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';
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: --
2321: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2325: else
2326: --
2327: -- Call Update routine for the pk_id created in prev run .
2328: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2329: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2330: --
2331: if l_update then
2332: --
2333: l_datetrack_mode := r_CPL.datetrack_mode ;
2345: l_object_version_number := r_CPL.information265;
2346: --
2347: end if;
2348: --
2349: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2350: --
2351: IF l_update OR l_dml_operation <> 'UPDATE' THEN
2352: --UPD END
2353: hr_utility.set_location(' BEN_CMBN_PLIP_F UPDATE_CMBN_PLIP ',30);
2349: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2350: --
2351: IF l_update OR l_dml_operation <> 'UPDATE' THEN
2352: --UPD END
2353: hr_utility.set_location(' BEN_CMBN_PLIP_F UPDATE_CMBN_PLIP ',30);
2354: BEN_CMBN_PLIP_API.UPDATE_CMBN_PLIP(
2355: --
2356: P_VALIDATE => false
2357: ,P_EFFECTIVE_DATE => l_effective_date
2595: l_prefix := null ;
2596: l_suffix := null ;
2597: end if ;
2598: --
2599: hr_utility.set_location(' r_CBP_unique.table_route_id '||r_CBP_unique.table_route_id,10);
2600: hr_utility.set_location(' r_CBP_unique.information1 '||r_CBP_unique.information1,10);
2601: hr_utility.set_location( 'r_CBP_unique.information2 '||r_CBP_unique.information2,10);
2602: hr_utility.set_location( 'r_CBP_unique.information3 '||r_CBP_unique.information3,10);
2603: -- If reuse objects flag is 'Y' then check for the object in the target business group
2596: l_suffix := null ;
2597: end if ;
2598: --
2599: hr_utility.set_location(' r_CBP_unique.table_route_id '||r_CBP_unique.table_route_id,10);
2600: hr_utility.set_location(' r_CBP_unique.information1 '||r_CBP_unique.information1,10);
2601: hr_utility.set_location( 'r_CBP_unique.information2 '||r_CBP_unique.information2,10);
2602: hr_utility.set_location( 'r_CBP_unique.information3 '||r_CBP_unique.information3,10);
2603: -- If reuse objects flag is 'Y' then check for the object in the target business group
2604: -- if found insert the record into PLSql table and exit the loop else try create the
2597: end if ;
2598: --
2599: hr_utility.set_location(' r_CBP_unique.table_route_id '||r_CBP_unique.table_route_id,10);
2600: hr_utility.set_location(' r_CBP_unique.information1 '||r_CBP_unique.information1,10);
2601: hr_utility.set_location( 'r_CBP_unique.information2 '||r_CBP_unique.information2,10);
2602: hr_utility.set_location( 'r_CBP_unique.information3 '||r_CBP_unique.information3,10);
2603: -- If reuse objects flag is 'Y' then check for the object in the target business group
2604: -- if found insert the record into PLSql table and exit the loop else try create the
2605: -- object in the target business group
2598: --
2599: hr_utility.set_location(' r_CBP_unique.table_route_id '||r_CBP_unique.table_route_id,10);
2600: hr_utility.set_location(' r_CBP_unique.information1 '||r_CBP_unique.information1,10);
2601: hr_utility.set_location( 'r_CBP_unique.information2 '||r_CBP_unique.information2,10);
2602: hr_utility.set_location( 'r_CBP_unique.information3 '||r_CBP_unique.information3,10);
2603: -- If reuse objects flag is 'Y' then check for the object in the target business group
2604: -- if found insert the record into PLSql table and exit the loop else try create the
2605: -- object in the target business group
2606: --
2650: --
2651: log_data('CBP',l_new_value,l_prefix || r_CBP_unique.name|| l_suffix,'REUSED');
2652: --
2653: end if ;
2654: hr_utility.set_location( 'found record for update',10);
2655: --
2656: else
2657: --
2658: l_update := false;
2734: if not l_object_found_in_target then
2735: --
2736: l_current_pk_id := r_CBP.information1;
2737: --
2738: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2739: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2740: --
2741: if l_current_pk_id = l_prev_pk_id then
2742: --
2735: --
2736: l_current_pk_id := r_CBP.information1;
2737: --
2738: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2739: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2740: --
2741: if l_current_pk_id = l_prev_pk_id then
2742: --
2743: l_first_rec := false ;
2758: end if;
2759:
2760: if l_first_rec and not l_update then
2761: -- Call Create routine.
2762: hr_utility.set_location(' BEN_CMBN_PTIP_F CREATE_CMBN_PTIP ',20);
2763: BEN_CMBN_PTIP_API.CREATE_CMBN_PTIP(
2764: --
2765: P_VALIDATE => false
2766: ,P_EFFECTIVE_DATE => l_effective_date
2806: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
2807: );
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 ;
2807: );
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';
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: --
2821: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
2825: else
2826: --
2827: -- Call Update routine for the pk_id created in prev run .
2828: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2829: hr_utility.set_location(' BEN_CMBN_PTIP_F UPDATE_CMBN_PTIP ',30);
2830: BEN_CMBN_PTIP_API.UPDATE_CMBN_PTIP(
2831: --
2832: P_VALIDATE => false
2833: ,P_EFFECTIVE_DATE => l_effective_date
3076: l_prefix := null ;
3077: l_suffix := null ;
3078: end if ;
3079: --
3080: hr_utility.set_location(' r_CPT_unique.table_route_id '||r_CPT_unique.table_route_id,10);
3081: hr_utility.set_location(' r_CPT_unique.information1 '||r_CPT_unique.information1,10);
3082: hr_utility.set_location( 'r_CPT_unique.information2 '||r_CPT_unique.information2,10);
3083: hr_utility.set_location( 'r_CPT_unique.information3 '||r_CPT_unique.information3,10);
3084: -- If reuse objects flag is 'Y' then check for the object in the target business group
3077: l_suffix := null ;
3078: end if ;
3079: --
3080: hr_utility.set_location(' r_CPT_unique.table_route_id '||r_CPT_unique.table_route_id,10);
3081: hr_utility.set_location(' r_CPT_unique.information1 '||r_CPT_unique.information1,10);
3082: hr_utility.set_location( 'r_CPT_unique.information2 '||r_CPT_unique.information2,10);
3083: hr_utility.set_location( 'r_CPT_unique.information3 '||r_CPT_unique.information3,10);
3084: -- If reuse objects flag is 'Y' then check for the object in the target business group
3085: -- if found insert the record into PLSql table and exit the loop else try create the
3078: end if ;
3079: --
3080: hr_utility.set_location(' r_CPT_unique.table_route_id '||r_CPT_unique.table_route_id,10);
3081: hr_utility.set_location(' r_CPT_unique.information1 '||r_CPT_unique.information1,10);
3082: hr_utility.set_location( 'r_CPT_unique.information2 '||r_CPT_unique.information2,10);
3083: hr_utility.set_location( 'r_CPT_unique.information3 '||r_CPT_unique.information3,10);
3084: -- If reuse objects flag is 'Y' then check for the object in the target business group
3085: -- if found insert the record into PLSql table and exit the loop else try create the
3086: -- object in the target business group
3079: --
3080: hr_utility.set_location(' r_CPT_unique.table_route_id '||r_CPT_unique.table_route_id,10);
3081: hr_utility.set_location(' r_CPT_unique.information1 '||r_CPT_unique.information1,10);
3082: hr_utility.set_location( 'r_CPT_unique.information2 '||r_CPT_unique.information2,10);
3083: hr_utility.set_location( 'r_CPT_unique.information3 '||r_CPT_unique.information3,10);
3084: -- If reuse objects flag is 'Y' then check for the object in the target business group
3085: -- if found insert the record into PLSql table and exit the loop else try create the
3086: -- object in the target business group
3087: --
3134: --
3135: log_data('CPT',l_new_value,l_prefix || r_CPT_unique.name|| l_suffix,'REUSED');
3136: --
3137: end if ;
3138: hr_utility.set_location( 'found record for update',10);
3139: --
3140: else
3141: --
3142: l_update := false;
3218: if not l_object_found_in_target OR l_update then
3219: --
3220: l_current_pk_id := r_CPT.information1;
3221: --
3222: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3223: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3224: --
3225: if l_current_pk_id = l_prev_pk_id then
3226: --
3219: --
3220: l_current_pk_id := r_CPT.information1;
3221: --
3222: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3223: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3224: --
3225: if l_current_pk_id = l_prev_pk_id then
3226: --
3227: l_first_rec := false ;
3242: end if;
3243:
3244: if l_first_rec and not l_update then
3245: -- Call Create routine.
3246: hr_utility.set_location(' BEN_CMBN_PTIP_OPT_F CREATE_CMBN_PTIP_OPT ',20);
3247: BEN_CMBN_PTIP_OPT_API.CREATE_CMBN_PTIP_OPT(
3248: --
3249: P_VALIDATE => false
3250: ,P_EFFECTIVE_DATE => l_effective_date
3292: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
3293: );
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 ;
3293: );
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';
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: --
3307: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
3327: l_object_version_number := r_CPT.information265;
3328: --
3329: end if;
3330: --
3331: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3332: --
3333: IF l_update OR l_dml_operation <> 'UPDATE' THEN
3334: -- Call Update routine for the pk_id created in prev run .
3335: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3332: --
3333: IF l_update OR l_dml_operation <> 'UPDATE' THEN
3334: -- Call Update routine for the pk_id created in prev run .
3335: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3336: hr_utility.set_location(' BEN_CMBN_PTIP_OPT_F UPDATE_CMBN_PTIP_OPT ',30);
3337: BEN_CMBN_PTIP_OPT_API.UPDATE_CMBN_PTIP_OPT(
3338: --
3339: P_VALIDATE => false
3340: ,P_EFFECTIVE_DATE => l_effective_date
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);
3583: hr_utility.set_location( 'r_BNB_unique.information2 '||r_BNB_unique.information2,10);
3584: hr_utility.set_location( 'r_BNB_unique.information3 '||r_BNB_unique.information3,10);
3585: hr_utility.set_location( 'p_effective_date'||p_effective_date,10);
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);
3583: hr_utility.set_location( 'r_BNB_unique.information2 '||r_BNB_unique.information2,10);
3584: hr_utility.set_location( 'r_BNB_unique.information3 '||r_BNB_unique.information3,10);
3585: hr_utility.set_location( 'p_effective_date'||p_effective_date,10);
3586: --
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);
3583: hr_utility.set_location( 'r_BNB_unique.information2 '||r_BNB_unique.information2,10);
3584: hr_utility.set_location( 'r_BNB_unique.information3 '||r_BNB_unique.information3,10);
3585: hr_utility.set_location( 'p_effective_date'||p_effective_date,10);
3586: --
3587: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
3583: hr_utility.set_location( 'r_BNB_unique.information2 '||r_BNB_unique.information2,10);
3584: hr_utility.set_location( 'r_BNB_unique.information3 '||r_BNB_unique.information3,10);
3585: hr_utility.set_location( 'p_effective_date'||p_effective_date,10);
3586: --
3587: -- If reuse objects flag is 'Y' then check for the object in the target business group
3588: -- if found insert the record into PLSql table and exit the loop else try create the
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);
3583: hr_utility.set_location( 'r_BNB_unique.information2 '||r_BNB_unique.information2,10);
3584: hr_utility.set_location( 'r_BNB_unique.information3 '||r_BNB_unique.information3,10);
3585: hr_utility.set_location( 'p_effective_date'||p_effective_date,10);
3586: --
3587: -- If reuse objects flag is 'Y' then check for the object in the target business group
3588: -- if found insert the record into PLSql table and exit the loop else try create the
3589: -- object in the target business group
3614: --
3615: log_data('BNB',l_new_value,l_prefix || r_BNB_unique.name|| l_suffix,'REUSED');
3616: --
3617: end if ;
3618: hr_utility.set_location( 'found record for update',10);
3619: --
3620: else
3621: --
3622: l_update := false;
3698: close c_BNB ;
3699: --
3700: l_current_pk_id := r_BNB.information1;
3701: --
3702: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3703: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3704: --
3705: if l_current_pk_id = l_prev_pk_id then
3706: --
3699: --
3700: l_current_pk_id := r_BNB.information1;
3701: --
3702: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3703: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3704: --
3705: if l_current_pk_id = l_prev_pk_id then
3706: --
3707: l_first_rec := false ;
3724: --if l_first_rec and not l_update then
3725: if l_first_rec and not l_update then
3726: --UPD END
3727: -- Call Create routine.
3728: hr_utility.set_location(' BEN_BNFTS_BAL_F CREATE_BENEFITS_BALANCE ',20);
3729: BEN_BENEFITS_BALANCE_API.CREATE_BENEFITS_BALANCE(
3730: --
3731: P_VALIDATE => false
3732: ,P_EFFECTIVE_DATE => l_effective_date
3775: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
3776: );
3777: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3778: -- Update all relevent cer records with new pk_id
3779: hr_utility.set_location('Before plsql table ',222);
3780: hr_utility.set_location('new_value id '||l_bnfts_bal_id,222);
3781: g_pk_tbl(g_count).pk_id_column := 'BNFTS_BAL_ID' ;
3782: g_pk_tbl(g_count).old_value := r_BNB.information1 ;
3783: g_pk_tbl(g_count).new_value := l_BNFTS_BAL_ID ;
3776: );
3777: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3778: -- Update all relevent cer records with new pk_id
3779: hr_utility.set_location('Before plsql table ',222);
3780: hr_utility.set_location('new_value id '||l_bnfts_bal_id,222);
3781: g_pk_tbl(g_count).pk_id_column := 'BNFTS_BAL_ID' ;
3782: g_pk_tbl(g_count).old_value := r_BNB.information1 ;
3783: g_pk_tbl(g_count).new_value := l_BNFTS_BAL_ID ;
3784: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
3782: g_pk_tbl(g_count).old_value := r_BNB.information1 ;
3783: g_pk_tbl(g_count).new_value := l_BNFTS_BAL_ID ;
3784: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
3785: g_pk_tbl(g_count).table_route_id := r_BNB_unique.table_route_id;
3786: hr_utility.set_location('After plsql table ',222);
3787: --
3788: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
3789: --
3790: g_count := g_count + 1 ;
3796: -- Call Update routine for the pk_id created in prev run .
3797: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3798: --
3799: --UPD START
3800: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3801: --
3802: if l_update then
3803: --
3804: l_datetrack_mode := r_BNB.datetrack_mode ;
3816: l_object_version_number := r_BNB.information265;
3817: --
3818: end if;
3819: --
3820: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3821: --
3822: IF l_update OR l_dml_operation <> 'UPDATE' THEN
3823: --UPD END
3824: --
3821: --
3822: IF l_update OR l_dml_operation <> 'UPDATE' THEN
3823: --UPD END
3824: --
3825: hr_utility.set_location(' BEN_BNFTS_BAL_F UPDATE_BENEFITS_BALANCE ',30);
3826: BEN_BENEFITS_BALANCE_API.UPDATE_BENEFITS_BALANCE(
3827: --
3828: P_VALIDATE => false
3829: ,P_EFFECTIVE_DATE => l_effective_date
4029: end if ;
4030: -- End Prefix Sufix derivation
4031: for r_CLF_unique in c_unique_CLF('CLF') loop
4032: --
4033: hr_utility.set_location(' r_CLF_unique.table_route_id '||r_CLF_unique.table_route_id,10);
4034: hr_utility.set_location(' r_CLF_unique.information1 '||r_CLF_unique.information1,10);
4035: hr_utility.set_location( 'r_CLF_unique.information2 '||r_CLF_unique.information2,10);
4036: hr_utility.set_location( 'r_CLF_unique.information3 '||r_CLF_unique.information3,10);
4037: -- If reuse objects flag is 'Y' then check for the object in the target business group
4030: -- End Prefix Sufix derivation
4031: for r_CLF_unique in c_unique_CLF('CLF') loop
4032: --
4033: hr_utility.set_location(' r_CLF_unique.table_route_id '||r_CLF_unique.table_route_id,10);
4034: hr_utility.set_location(' r_CLF_unique.information1 '||r_CLF_unique.information1,10);
4035: hr_utility.set_location( 'r_CLF_unique.information2 '||r_CLF_unique.information2,10);
4036: hr_utility.set_location( 'r_CLF_unique.information3 '||r_CLF_unique.information3,10);
4037: -- If reuse objects flag is 'Y' then check for the object in the target business group
4038: -- if found insert the record into PLSql table and exit the loop else try create the
4031: for r_CLF_unique in c_unique_CLF('CLF') loop
4032: --
4033: hr_utility.set_location(' r_CLF_unique.table_route_id '||r_CLF_unique.table_route_id,10);
4034: hr_utility.set_location(' r_CLF_unique.information1 '||r_CLF_unique.information1,10);
4035: hr_utility.set_location( 'r_CLF_unique.information2 '||r_CLF_unique.information2,10);
4036: hr_utility.set_location( 'r_CLF_unique.information3 '||r_CLF_unique.information3,10);
4037: -- If reuse objects flag is 'Y' then check for the object in the target business group
4038: -- if found insert the record into PLSql table and exit the loop else try create the
4039: -- object in the target business group
4032: --
4033: hr_utility.set_location(' r_CLF_unique.table_route_id '||r_CLF_unique.table_route_id,10);
4034: hr_utility.set_location(' r_CLF_unique.information1 '||r_CLF_unique.information1,10);
4035: hr_utility.set_location( 'r_CLF_unique.information2 '||r_CLF_unique.information2,10);
4036: hr_utility.set_location( 'r_CLF_unique.information3 '||r_CLF_unique.information3,10);
4037: -- If reuse objects flag is 'Y' then check for the object in the target business group
4038: -- if found insert the record into PLSql table and exit the loop else try create the
4039: -- object in the target business group
4040: --
4061: l_RNDG_RL := get_fk('FORMULA_ID', r_CLF.INFORMATION258,l_dml_operation);
4062: --
4063: -- Do not copy CLF if Comp_Src_Cd = 'Benefit Balance Type' and Benefit Balance is not copied over
4064: --
4065: hr_utility.set_location( 'r_CLF.information16'||r_CLF.information16,1);
4066: hr_utility.set_location( 'l_bnfts_bal_id '||l_bnfts_bal_id,1);
4067: hr_utility.set_location( 'l_dml_operation'||l_dml_operation,1);
4068: --
4069: if r_CLF.information16 = 'BNFTBALTYP' and l_bnfts_bal_id is null then
4062: --
4063: -- Do not copy CLF if Comp_Src_Cd = 'Benefit Balance Type' and Benefit Balance is not copied over
4064: --
4065: hr_utility.set_location( 'r_CLF.information16'||r_CLF.information16,1);
4066: hr_utility.set_location( 'l_bnfts_bal_id '||l_bnfts_bal_id,1);
4067: hr_utility.set_location( 'l_dml_operation'||l_dml_operation,1);
4068: --
4069: if r_CLF.information16 = 'BNFTBALTYP' and l_bnfts_bal_id is null then
4070: -- Need to populate the FK's for RHI to go thru fine.
4063: -- Do not copy CLF if Comp_Src_Cd = 'Benefit Balance Type' and Benefit Balance is not copied over
4064: --
4065: hr_utility.set_location( 'r_CLF.information16'||r_CLF.information16,1);
4066: hr_utility.set_location( 'l_bnfts_bal_id '||l_bnfts_bal_id,1);
4067: hr_utility.set_location( 'l_dml_operation'||l_dml_operation,1);
4068: --
4069: if r_CLF.information16 = 'BNFTBALTYP' and l_bnfts_bal_id is null then
4070: -- Need to populate the FK's for RHI to go thru fine.
4071: g_pk_tbl(g_count).pk_id_column := 'COMP_LVL_FCTR_ID' ;
4099: --
4100: end if ;
4101: l_comp_lvl_fctr_id := r_CLF_unique.information1 ;
4102: l_object_version_number := r_CLF.information265 ;
4103: hr_utility.set_location( 'found record for update',10);
4104: --
4105: else
4106: --UPD END
4107: --
4141: --UPD END
4142: --
4143: l_current_pk_id := r_CLF.information1;
4144: --
4145: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4146: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4147: --
4148: if l_current_pk_id = l_prev_pk_id then
4149: --
4142: --
4143: l_current_pk_id := r_CLF.information1;
4144: --
4145: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4146: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4147: --
4148: if l_current_pk_id = l_prev_pk_id then
4149: --
4150: l_first_rec := false ;
4183: --
4184: if l_first_rec and not l_update then
4185: --UPD END
4186: -- Call Create routine.
4187: hr_utility.set_location(' BEN_COMP_LVL_FCTR CREATE_COMP_LEVEL_FACTORS ',20);
4188:
4189: BEN_COMP_LEVEL_FACTORS_API.CREATE_COMP_LEVEL_FACTORS(
4190: --
4191: P_VALIDATE => false
4249: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
4250: );
4251: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4252: -- Update all relevent cer records with new pk_id
4253: hr_utility.set_location('Before plsql table ',222);
4254: hr_utility.set_location('new_value id '||l_comp_lvl_fctr_id,222);
4255: g_pk_tbl(g_count).pk_id_column := 'COMP_LVL_FCTR_ID' ;
4256: g_pk_tbl(g_count).old_value := r_CLF.information1 ;
4257: g_pk_tbl(g_count).new_value := l_COMP_LVL_FCTR_ID ;
4250: );
4251: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4252: -- Update all relevent cer records with new pk_id
4253: hr_utility.set_location('Before plsql table ',222);
4254: hr_utility.set_location('new_value id '||l_comp_lvl_fctr_id,222);
4255: g_pk_tbl(g_count).pk_id_column := 'COMP_LVL_FCTR_ID' ;
4256: g_pk_tbl(g_count).old_value := r_CLF.information1 ;
4257: g_pk_tbl(g_count).new_value := l_COMP_LVL_FCTR_ID ;
4258: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
4256: g_pk_tbl(g_count).old_value := r_CLF.information1 ;
4257: g_pk_tbl(g_count).new_value := l_COMP_LVL_FCTR_ID ;
4258: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
4259: g_pk_tbl(g_count).table_route_id := r_CLF_unique.table_route_id;
4260: hr_utility.set_location('After plsql table ',222);
4261: --
4262: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ; -- NEW
4263: --
4264: g_count := g_count + 1 ;
4267: --
4268: --UPD START
4269: elsif l_update THEN
4270: --
4271: hr_utility.set_location(' BEN_COMP_LVL_FCTR UPDATE_COMP_LEVEL_FACTORS ',20);
4272: --
4273: BEN_COMP_LEVEL_FACTORS_API.UPDATE_COMP_LEVEL_FACTORS(
4274: --
4275: P_VALIDATE => false
4463: end if ;
4464: -- End Prefix Sufix derivation
4465: for r_HWF_unique in c_unique_HWF('HWF') loop
4466: --
4467: hr_utility.set_location(' r_HWF_unique.table_route_id '||r_HWF_unique.table_route_id,10);
4468: hr_utility.set_location(' r_HWF_unique.information1 '||r_HWF_unique.information1,10);
4469: hr_utility.set_location( 'r_HWF_unique.information2 '||r_HWF_unique.information2,10);
4470: hr_utility.set_location( 'r_HWF_unique.information3 '||r_HWF_unique.information3,10);
4471: -- If reuse objects flag is 'Y' then check for the object in the target business group
4464: -- End Prefix Sufix derivation
4465: for r_HWF_unique in c_unique_HWF('HWF') loop
4466: --
4467: hr_utility.set_location(' r_HWF_unique.table_route_id '||r_HWF_unique.table_route_id,10);
4468: hr_utility.set_location(' r_HWF_unique.information1 '||r_HWF_unique.information1,10);
4469: hr_utility.set_location( 'r_HWF_unique.information2 '||r_HWF_unique.information2,10);
4470: hr_utility.set_location( 'r_HWF_unique.information3 '||r_HWF_unique.information3,10);
4471: -- If reuse objects flag is 'Y' then check for the object in the target business group
4472: -- if found insert the record into PLSql table and exit the loop else try create the
4465: for r_HWF_unique in c_unique_HWF('HWF') loop
4466: --
4467: hr_utility.set_location(' r_HWF_unique.table_route_id '||r_HWF_unique.table_route_id,10);
4468: hr_utility.set_location(' r_HWF_unique.information1 '||r_HWF_unique.information1,10);
4469: hr_utility.set_location( 'r_HWF_unique.information2 '||r_HWF_unique.information2,10);
4470: hr_utility.set_location( 'r_HWF_unique.information3 '||r_HWF_unique.information3,10);
4471: -- If reuse objects flag is 'Y' then check for the object in the target business group
4472: -- if found insert the record into PLSql table and exit the loop else try create the
4473: -- object in the target business group
4466: --
4467: hr_utility.set_location(' r_HWF_unique.table_route_id '||r_HWF_unique.table_route_id,10);
4468: hr_utility.set_location(' r_HWF_unique.information1 '||r_HWF_unique.information1,10);
4469: hr_utility.set_location( 'r_HWF_unique.information2 '||r_HWF_unique.information2,10);
4470: hr_utility.set_location( 'r_HWF_unique.information3 '||r_HWF_unique.information3,10);
4471: -- If reuse objects flag is 'Y' then check for the object in the target business group
4472: -- if found insert the record into PLSql table and exit the loop else try create the
4473: -- object in the target business group
4474: --
4529: --
4530: end if ;
4531: l_HRS_WKD_IN_PERD_FCTR_ID := r_HWF_unique.information1 ;
4532: l_object_version_number := r_HWF.information265 ;
4533: hr_utility.set_location( 'found record for update',10);
4534: --
4535: -- else
4536: --
4537: -- l_update := false;
4542: if p_reuse_object_flag = 'Y' then
4543: -- cursor to find the object
4544: open c_find_HWF_in_target( l_prefix || r_HWF_unique.name || l_suffix ,r_HWF_unique.information2,l_max_eed,
4545: p_target_business_group_id, nvl(l_hrs_wkd_in_perd_fctr_id, -999) ) ;
4546: hr_utility.set_location('name = ' || l_prefix || r_HWF_unique.name || l_suffix, 999);
4547: hr_utility.set_location('tr bg = ' || p_target_business_group_id, 999);
4548: hr_utility.set_location('tr id = ' || l_hrs_wkd_in_perd_fctr_id, 999);
4549: fetch c_find_HWF_in_target into l_new_value ;
4550: if c_find_HWF_in_target%found then
4543: -- cursor to find the object
4544: open c_find_HWF_in_target( l_prefix || r_HWF_unique.name || l_suffix ,r_HWF_unique.information2,l_max_eed,
4545: p_target_business_group_id, nvl(l_hrs_wkd_in_perd_fctr_id, -999) ) ;
4546: hr_utility.set_location('name = ' || l_prefix || r_HWF_unique.name || l_suffix, 999);
4547: hr_utility.set_location('tr bg = ' || p_target_business_group_id, 999);
4548: hr_utility.set_location('tr id = ' || l_hrs_wkd_in_perd_fctr_id, 999);
4549: fetch c_find_HWF_in_target into l_new_value ;
4550: if c_find_HWF_in_target%found then
4551: --
4544: open c_find_HWF_in_target( l_prefix || r_HWF_unique.name || l_suffix ,r_HWF_unique.information2,l_max_eed,
4545: p_target_business_group_id, nvl(l_hrs_wkd_in_perd_fctr_id, -999) ) ;
4546: hr_utility.set_location('name = ' || l_prefix || r_HWF_unique.name || l_suffix, 999);
4547: hr_utility.set_location('tr bg = ' || p_target_business_group_id, 999);
4548: hr_utility.set_location('tr id = ' || l_hrs_wkd_in_perd_fctr_id, 999);
4549: fetch c_find_HWF_in_target into l_new_value ;
4550: if c_find_HWF_in_target%found then
4551: --
4552: if r_HWF_unique.information1 <> nvl(g_pk_tbl(g_count-1).old_value, -999) or
4576: if not l_object_found_in_target or l_update then
4577: --
4578: l_current_pk_id := r_HWF.information1;
4579: --
4580: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4581: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4582: --
4583: if l_current_pk_id = l_prev_pk_id then
4584: --
4577: --
4578: l_current_pk_id := r_HWF.information1;
4579: --
4580: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4581: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4582: --
4583: if l_current_pk_id = l_prev_pk_id then
4584: --
4585: l_first_rec := false ;
4583: if l_current_pk_id = l_prev_pk_id then
4584: --
4585: l_first_rec := false ;
4586: --
4587: hr_utility.set_location(' false',20);
4588: else
4589: --
4590: l_first_rec := true ;
4591: hr_utility.set_location(' true',20);
4587: hr_utility.set_location(' false',20);
4588: else
4589: --
4590: l_first_rec := true ;
4591: hr_utility.set_location(' true',20);
4592: --
4593: end if ;
4594: --
4595: if BEN_PD_COPY_TO_BEN_ONE.g_mapping_done then
4617: end if;
4618: --
4619: if l_first_rec and not l_update then
4620: -- Call Create routine.
4621: hr_utility.set_location(' BEN_HRS_WKD_IN_PERD_FCTR CREATE_HRS_WKD_IN_PERD_FCTR ',20);
4622: BEN_HRS_WKD_IN_PERD_FCTR_API.CREATE_HRS_WKD_IN_PERD_FCTR(
4623: --
4624: P_VALIDATE => false
4625: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
4677: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
4678: );
4679: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4680: -- Update all relevent cer records with new pk_id
4681: hr_utility.set_location('Before plsql table ',222);
4682: hr_utility.set_location('new_value id '||l_hrs_wkd_in_perd_fctr_id,222);
4683: g_pk_tbl(g_count).pk_id_column := 'HRS_WKD_IN_PERD_FCTR_ID' ;
4684: g_pk_tbl(g_count).old_value := r_HWF.information1 ;
4685: g_pk_tbl(g_count).new_value := l_HRS_WKD_IN_PERD_FCTR_ID ;
4678: );
4679: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4680: -- Update all relevent cer records with new pk_id
4681: hr_utility.set_location('Before plsql table ',222);
4682: hr_utility.set_location('new_value id '||l_hrs_wkd_in_perd_fctr_id,222);
4683: g_pk_tbl(g_count).pk_id_column := 'HRS_WKD_IN_PERD_FCTR_ID' ;
4684: g_pk_tbl(g_count).old_value := r_HWF.information1 ;
4685: g_pk_tbl(g_count).new_value := l_HRS_WKD_IN_PERD_FCTR_ID ;
4686: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
4684: g_pk_tbl(g_count).old_value := r_HWF.information1 ;
4685: g_pk_tbl(g_count).new_value := l_HRS_WKD_IN_PERD_FCTR_ID ;
4686: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
4687: g_pk_tbl(g_count).table_route_id := r_HWF_unique.table_route_id;
4688: hr_utility.set_location('After plsql table ',222);
4689: --
4690: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
4691: --
4692: g_count := g_count + 1 ;
4877: end if ;
4878: -- End Prefix Sufix derivation
4879: for r_AGF_unique in c_unique_AGF('AGF') loop
4880: --
4881: hr_utility.set_location(' r_AGF_unique.table_route_id '||r_AGF_unique.table_route_id,10);
4882: hr_utility.set_location(' r_AGF_unique.information1 '||r_AGF_unique.information1,10);
4883: hr_utility.set_location( 'r_AGF_unique.information2 '||r_AGF_unique.information2,10);
4884: hr_utility.set_location( 'r_AGF_unique.information3 '||r_AGF_unique.information3,10);
4885: -- If reuse objects flag is 'Y' then check for the object in the target business group
4878: -- End Prefix Sufix derivation
4879: for r_AGF_unique in c_unique_AGF('AGF') loop
4880: --
4881: hr_utility.set_location(' r_AGF_unique.table_route_id '||r_AGF_unique.table_route_id,10);
4882: hr_utility.set_location(' r_AGF_unique.information1 '||r_AGF_unique.information1,10);
4883: hr_utility.set_location( 'r_AGF_unique.information2 '||r_AGF_unique.information2,10);
4884: hr_utility.set_location( 'r_AGF_unique.information3 '||r_AGF_unique.information3,10);
4885: -- If reuse objects flag is 'Y' then check for the object in the target business group
4886: -- if found insert the record into PLSql table and exit the loop else try create the
4879: for r_AGF_unique in c_unique_AGF('AGF') loop
4880: --
4881: hr_utility.set_location(' r_AGF_unique.table_route_id '||r_AGF_unique.table_route_id,10);
4882: hr_utility.set_location(' r_AGF_unique.information1 '||r_AGF_unique.information1,10);
4883: hr_utility.set_location( 'r_AGF_unique.information2 '||r_AGF_unique.information2,10);
4884: hr_utility.set_location( 'r_AGF_unique.information3 '||r_AGF_unique.information3,10);
4885: -- If reuse objects flag is 'Y' then check for the object in the target business group
4886: -- if found insert the record into PLSql table and exit the loop else try create the
4887: -- object in the target business group
4880: --
4881: hr_utility.set_location(' r_AGF_unique.table_route_id '||r_AGF_unique.table_route_id,10);
4882: hr_utility.set_location(' r_AGF_unique.information1 '||r_AGF_unique.information1,10);
4883: hr_utility.set_location( 'r_AGF_unique.information2 '||r_AGF_unique.information2,10);
4884: hr_utility.set_location( 'r_AGF_unique.information3 '||r_AGF_unique.information3,10);
4885: -- If reuse objects flag is 'Y' then check for the object in the target business group
4886: -- if found insert the record into PLSql table and exit the loop else try create the
4887: -- object in the target business group
4888: --
4916: --
4917: end if ;
4918: l_age_fctr_id := r_AGF_unique.information1 ;
4919: l_object_version_number := r_AGF.information265 ;
4920: hr_utility.set_location( 'found record for update',10);
4921: --
4922: -- else
4923: --
4924: -- l_update := false;
4971: close c_AGF ;
4972: --
4973: l_current_pk_id := r_AGF.information1;
4974: --
4975: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4976: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4977: --
4978: if l_current_pk_id = l_prev_pk_id then
4979: --
4972: --
4973: l_current_pk_id := r_AGF.information1;
4974: --
4975: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4976: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4977: --
4978: if l_current_pk_id = l_prev_pk_id then
4979: --
4980: l_first_rec := false ;
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);
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)
5048: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
5049: );
5050: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5051: -- Update all relevent cer records with new pk_id
5052: hr_utility.set_location('Before plsql table ',222);
5053: hr_utility.set_location('new_value id '||l_age_fctr_id,222);
5054: g_pk_tbl(g_count).pk_id_column := 'AGE_FCTR_ID' ;
5055: g_pk_tbl(g_count).old_value := r_AGF.information1 ;
5056: g_pk_tbl(g_count).new_value := l_AGE_FCTR_ID ;
5049: );
5050: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5051: -- Update all relevent cer records with new pk_id
5052: hr_utility.set_location('Before plsql table ',222);
5053: hr_utility.set_location('new_value id '||l_age_fctr_id,222);
5054: g_pk_tbl(g_count).pk_id_column := 'AGE_FCTR_ID' ;
5055: g_pk_tbl(g_count).old_value := r_AGF.information1 ;
5056: g_pk_tbl(g_count).new_value := l_AGE_FCTR_ID ;
5057: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
5055: g_pk_tbl(g_count).old_value := r_AGF.information1 ;
5056: g_pk_tbl(g_count).new_value := l_AGE_FCTR_ID ;
5057: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
5058: g_pk_tbl(g_count).table_route_id := r_AGF_unique.table_route_id;
5059: hr_utility.set_location('After plsql table ',222);
5060: --
5061: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
5062: --
5063: g_count := g_count + 1 ;
5065: log_data('AGF',l_new_value,l_prefix || r_AGF.INFORMATION170 || l_suffix,'COPIED');
5066: --
5067: elsif l_update then
5068:
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)
5244: end if ;
5245: -- End Prefix Sufix derivation
5246: for r_LSF_unique in c_unique_LSF('LSF') loop
5247: --
5248: hr_utility.set_location(' r_LSF_unique.table_route_id '||r_LSF_unique.table_route_id,10);
5249: hr_utility.set_location(' r_LSF_unique.information1 '||r_LSF_unique.information1,10);
5250: hr_utility.set_location( 'r_LSF_unique.information2 '||r_LSF_unique.information2,10);
5251: hr_utility.set_location( 'r_LSF_unique.information3 '||r_LSF_unique.information3,10);
5252: -- If reuse objects flag is 'Y' then check for the object in the target business group
5245: -- End Prefix Sufix derivation
5246: for r_LSF_unique in c_unique_LSF('LSF') loop
5247: --
5248: hr_utility.set_location(' r_LSF_unique.table_route_id '||r_LSF_unique.table_route_id,10);
5249: hr_utility.set_location(' r_LSF_unique.information1 '||r_LSF_unique.information1,10);
5250: hr_utility.set_location( 'r_LSF_unique.information2 '||r_LSF_unique.information2,10);
5251: hr_utility.set_location( 'r_LSF_unique.information3 '||r_LSF_unique.information3,10);
5252: -- If reuse objects flag is 'Y' then check for the object in the target business group
5253: -- if found insert the record into PLSql table and exit the loop else try create the
5246: for r_LSF_unique in c_unique_LSF('LSF') loop
5247: --
5248: hr_utility.set_location(' r_LSF_unique.table_route_id '||r_LSF_unique.table_route_id,10);
5249: hr_utility.set_location(' r_LSF_unique.information1 '||r_LSF_unique.information1,10);
5250: hr_utility.set_location( 'r_LSF_unique.information2 '||r_LSF_unique.information2,10);
5251: hr_utility.set_location( 'r_LSF_unique.information3 '||r_LSF_unique.information3,10);
5252: -- If reuse objects flag is 'Y' then check for the object in the target business group
5253: -- if found insert the record into PLSql table and exit the loop else try create the
5254: -- object in the target business group
5247: --
5248: hr_utility.set_location(' r_LSF_unique.table_route_id '||r_LSF_unique.table_route_id,10);
5249: hr_utility.set_location(' r_LSF_unique.information1 '||r_LSF_unique.information1,10);
5250: hr_utility.set_location( 'r_LSF_unique.information2 '||r_LSF_unique.information2,10);
5251: hr_utility.set_location( 'r_LSF_unique.information3 '||r_LSF_unique.information3,10);
5252: -- If reuse objects flag is 'Y' then check for the object in the target business group
5253: -- if found insert the record into PLSql table and exit the loop else try create the
5254: -- object in the target business group
5255: --
5280: --
5281: end if ;
5282: l_LOS_FCTR_ID := r_LSF_unique.information1 ;
5283: l_object_version_number := r_LSF.information265 ;
5284: hr_utility.set_location( 'found record for update',10);
5285: --
5286: else
5287: --
5288: if p_reuse_object_flag = 'Y' then
5327: close c_LSF ;
5328: --
5329: l_current_pk_id := r_LSF.information1;
5330: --
5331: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5332: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5333: --
5334: if l_current_pk_id = l_prev_pk_id then
5335: --
5328: --
5329: l_current_pk_id := r_LSF.information1;
5330: --
5331: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5332: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5333: --
5334: if l_current_pk_id = l_prev_pk_id then
5335: --
5336: l_first_rec := false ;
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);
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)
5409: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
5410: );
5411: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5412: -- Update all relevent cer records with new pk_id
5413: hr_utility.set_location('Before plsql table ',222);
5414: hr_utility.set_location('new_value id '||l_los_fctr_id,222);
5415: g_pk_tbl(g_count).pk_id_column := 'LOS_FCTR_ID' ;
5416: g_pk_tbl(g_count).old_value := r_LSF.information1 ;
5417: g_pk_tbl(g_count).new_value := l_LOS_FCTR_ID ;
5410: );
5411: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5412: -- Update all relevent cer records with new pk_id
5413: hr_utility.set_location('Before plsql table ',222);
5414: hr_utility.set_location('new_value id '||l_los_fctr_id,222);
5415: g_pk_tbl(g_count).pk_id_column := 'LOS_FCTR_ID' ;
5416: g_pk_tbl(g_count).old_value := r_LSF.information1 ;
5417: g_pk_tbl(g_count).new_value := l_LOS_FCTR_ID ;
5418: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
5416: g_pk_tbl(g_count).old_value := r_LSF.information1 ;
5417: g_pk_tbl(g_count).new_value := l_LOS_FCTR_ID ;
5418: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
5419: g_pk_tbl(g_count).table_route_id := r_LSF_unique.table_route_id;
5420: hr_utility.set_location('After plsql table ',222);
5421: --
5422: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
5423: --
5424: g_count := g_count + 1 ;
5605: end if ;
5606: -- End Prefix Sufix derivation
5607: for r_PFF_unique in c_unique_PFF('PFF') loop
5608: --
5609: hr_utility.set_location(' r_PFF_unique.table_route_id '||r_PFF_unique.table_route_id,10);
5610: hr_utility.set_location(' r_PFF_unique.information1 '||r_PFF_unique.information1,10);
5611: hr_utility.set_location( 'r_PFF_unique.information2 '||r_PFF_unique.information2,10);
5612: hr_utility.set_location( 'r_PFF_unique.information3 '||r_PFF_unique.information3,10);
5613: -- If reuse objects flag is 'Y' then check for the object in the target business group
5606: -- End Prefix Sufix derivation
5607: for r_PFF_unique in c_unique_PFF('PFF') loop
5608: --
5609: hr_utility.set_location(' r_PFF_unique.table_route_id '||r_PFF_unique.table_route_id,10);
5610: hr_utility.set_location(' r_PFF_unique.information1 '||r_PFF_unique.information1,10);
5611: hr_utility.set_location( 'r_PFF_unique.information2 '||r_PFF_unique.information2,10);
5612: hr_utility.set_location( 'r_PFF_unique.information3 '||r_PFF_unique.information3,10);
5613: -- If reuse objects flag is 'Y' then check for the object in the target business group
5614: -- if found insert the record into PLSql table and exit the loop else try create the
5607: for r_PFF_unique in c_unique_PFF('PFF') loop
5608: --
5609: hr_utility.set_location(' r_PFF_unique.table_route_id '||r_PFF_unique.table_route_id,10);
5610: hr_utility.set_location(' r_PFF_unique.information1 '||r_PFF_unique.information1,10);
5611: hr_utility.set_location( 'r_PFF_unique.information2 '||r_PFF_unique.information2,10);
5612: hr_utility.set_location( 'r_PFF_unique.information3 '||r_PFF_unique.information3,10);
5613: -- If reuse objects flag is 'Y' then check for the object in the target business group
5614: -- if found insert the record into PLSql table and exit the loop else try create the
5615: -- object in the target business group
5608: --
5609: hr_utility.set_location(' r_PFF_unique.table_route_id '||r_PFF_unique.table_route_id,10);
5610: hr_utility.set_location(' r_PFF_unique.information1 '||r_PFF_unique.information1,10);
5611: hr_utility.set_location( 'r_PFF_unique.information2 '||r_PFF_unique.information2,10);
5612: hr_utility.set_location( 'r_PFF_unique.information3 '||r_PFF_unique.information3,10);
5613: -- If reuse objects flag is 'Y' then check for the object in the target business group
5614: -- if found insert the record into PLSql table and exit the loop else try create the
5615: -- object in the target business group
5616: --
5640: --
5641: end if ;
5642: l_pct_fl_tm_fctr_id := r_PFF_unique.information1 ;
5643: l_object_version_number := r_PFF.information265 ;
5644: hr_utility.set_location( 'found record for update',10);
5645: --
5646: else
5647: --UPD END
5648: if p_reuse_object_flag = 'Y' then
5687: close c_PFF ;
5688: --
5689: l_current_pk_id := r_PFF.information1;
5690: --
5691: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5692: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5693: --
5694: if l_current_pk_id = l_prev_pk_id then
5695: --
5688: --
5689: l_current_pk_id := r_PFF.information1;
5690: --
5691: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5692: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5693: --
5694: if l_current_pk_id = l_prev_pk_id then
5695: --
5696: l_first_rec := false ;
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);
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)
5759: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
5760: );
5761: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5762: -- Update all relevent cer records with new pk_id
5763: hr_utility.set_location('Before plsql table ',222);
5764: hr_utility.set_location('new_value id '||l_pct_fl_tm_fctr_id,222);
5765: g_pk_tbl(g_count).pk_id_column := 'PCT_FL_TM_FCTR_ID' ;
5766: g_pk_tbl(g_count).old_value := r_PFF.information1 ;
5767: g_pk_tbl(g_count).new_value := l_PCT_FL_TM_FCTR_ID ;
5760: );
5761: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5762: -- Update all relevent cer records with new pk_id
5763: hr_utility.set_location('Before plsql table ',222);
5764: hr_utility.set_location('new_value id '||l_pct_fl_tm_fctr_id,222);
5765: g_pk_tbl(g_count).pk_id_column := 'PCT_FL_TM_FCTR_ID' ;
5766: g_pk_tbl(g_count).old_value := r_PFF.information1 ;
5767: g_pk_tbl(g_count).new_value := l_PCT_FL_TM_FCTR_ID ;
5768: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
5766: g_pk_tbl(g_count).old_value := r_PFF.information1 ;
5767: g_pk_tbl(g_count).new_value := l_PCT_FL_TM_FCTR_ID ;
5768: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
5769: g_pk_tbl(g_count).table_route_id := r_PFF_unique.table_route_id;
5770: hr_utility.set_location('After plsql table ',222);
5771: --
5772: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
5773: --
5774: g_count := g_count + 1 ;
5776: log_data('PFF',l_new_value,l_prefix || r_PFF.INFORMATION218 || l_suffix,'COPIED');
5777: --
5778: elsif l_update then
5779: --
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)
5950: end if ;
5951: -- End Prefix Sufix derivation
5952: for r_CLA_unique in c_unique_CLA('CLA') loop
5953: --
5954: hr_utility.set_location(' r_CLA_unique.table_route_id '||r_CLA_unique.table_route_id,10);
5955: hr_utility.set_location(' r_CLA_unique.information1 '||r_CLA_unique.information1,10);
5956: hr_utility.set_location( 'r_CLA_unique.information2 '||r_CLA_unique.information2,10);
5957: hr_utility.set_location( 'r_CLA_unique.information3 '||r_CLA_unique.information3,10);
5958: -- If reuse objects flag is 'Y' then check for the object in the target business group
5951: -- End Prefix Sufix derivation
5952: for r_CLA_unique in c_unique_CLA('CLA') loop
5953: --
5954: hr_utility.set_location(' r_CLA_unique.table_route_id '||r_CLA_unique.table_route_id,10);
5955: hr_utility.set_location(' r_CLA_unique.information1 '||r_CLA_unique.information1,10);
5956: hr_utility.set_location( 'r_CLA_unique.information2 '||r_CLA_unique.information2,10);
5957: hr_utility.set_location( 'r_CLA_unique.information3 '||r_CLA_unique.information3,10);
5958: -- If reuse objects flag is 'Y' then check for the object in the target business group
5959: -- if found insert the record into PLSql table and exit the loop else try create the
5952: for r_CLA_unique in c_unique_CLA('CLA') loop
5953: --
5954: hr_utility.set_location(' r_CLA_unique.table_route_id '||r_CLA_unique.table_route_id,10);
5955: hr_utility.set_location(' r_CLA_unique.information1 '||r_CLA_unique.information1,10);
5956: hr_utility.set_location( 'r_CLA_unique.information2 '||r_CLA_unique.information2,10);
5957: hr_utility.set_location( 'r_CLA_unique.information3 '||r_CLA_unique.information3,10);
5958: -- If reuse objects flag is 'Y' then check for the object in the target business group
5959: -- if found insert the record into PLSql table and exit the loop else try create the
5960: -- object in the target business group
5953: --
5954: hr_utility.set_location(' r_CLA_unique.table_route_id '||r_CLA_unique.table_route_id,10);
5955: hr_utility.set_location(' r_CLA_unique.information1 '||r_CLA_unique.information1,10);
5956: hr_utility.set_location( 'r_CLA_unique.information2 '||r_CLA_unique.information2,10);
5957: hr_utility.set_location( 'r_CLA_unique.information3 '||r_CLA_unique.information3,10);
5958: -- If reuse objects flag is 'Y' then check for the object in the target business group
5959: -- if found insert the record into PLSql table and exit the loop else try create the
5960: -- object in the target business group
5961: --
5985: --
5986: end if ;
5987: l_cmbn_age_los_fctr_id := r_CLA_unique.information1 ;
5988: l_object_version_number := r_CLA.information265 ;
5989: hr_utility.set_location( 'found record for update',10);
5990: --
5991: else
5992: --UPD END
5993: if p_reuse_object_flag = 'Y' then
6032: close c_CLA ;
6033: --
6034: l_current_pk_id := r_CLA.information1;
6035: --
6036: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6037: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6038: --
6039: if l_current_pk_id = l_prev_pk_id then
6040: --
6033: --
6034: l_current_pk_id := r_CLA.information1;
6035: --
6036: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6037: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6038: --
6039: if l_current_pk_id = l_prev_pk_id then
6040: --
6041: l_first_rec := false ;
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);
6063: BEN_CMBN_AGE_LOS_FCTR_API.CREATE_CMBN_AGE_LOS_FCTR(
6064: --
6065: P_VALIDATE => false
6066: -- ,P_EFFECTIVE_DATE => p_effective_date
6108: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
6109: );
6110: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6111: -- Update all relevent cer records with new pk_id
6112: hr_utility.set_location('Before plsql table ',222);
6113: hr_utility.set_location('new_value id '||l_cmbn_age_los_fctr_id,222);
6114: g_pk_tbl(g_count).pk_id_column := 'CMBN_AGE_LOS_FCTR_ID' ;
6115: g_pk_tbl(g_count).old_value := r_CLA.information1 ;
6116: g_pk_tbl(g_count).new_value := l_CMBN_AGE_LOS_FCTR_ID ;
6109: );
6110: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6111: -- Update all relevent cer records with new pk_id
6112: hr_utility.set_location('Before plsql table ',222);
6113: hr_utility.set_location('new_value id '||l_cmbn_age_los_fctr_id,222);
6114: g_pk_tbl(g_count).pk_id_column := 'CMBN_AGE_LOS_FCTR_ID' ;
6115: g_pk_tbl(g_count).old_value := r_CLA.information1 ;
6116: g_pk_tbl(g_count).new_value := l_CMBN_AGE_LOS_FCTR_ID ;
6117: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
6115: g_pk_tbl(g_count).old_value := r_CLA.information1 ;
6116: g_pk_tbl(g_count).new_value := l_CMBN_AGE_LOS_FCTR_ID ;
6117: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
6118: g_pk_tbl(g_count).table_route_id := r_CLA_unique.table_route_id;
6119: hr_utility.set_location('After plsql table ',222);
6120: --
6121: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
6122: --
6123: g_count := g_count + 1 ;
6125: log_data('CLA',l_new_value,l_prefix || r_CLA.INFORMATION170 || l_suffix,'COPIED');
6126: --
6127: elsif l_update then
6128:
6129: hr_utility.set_location(' BEN_CMBN_AGE_LOS_FCTR UPDATE_CMBN_AGE_LOS_FCTR ',20);
6130: BEN_CMBN_AGE_LOS_FCTR_API.UPDATE_CMBN_AGE_LOS_FCTR(
6131: --
6132: P_VALIDATE => false
6133: -- ,P_EFFECTIVE_DATE => p_effective_date
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);
6328: hr_utility.set_location( 'r_PTP_unique.information2 '||r_PTP_unique.information2,10);
6329: hr_utility.set_location( 'r_PTP_unique.information3 '||r_PTP_unique.information3,10);
6330: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
6328: hr_utility.set_location( 'r_PTP_unique.information2 '||r_PTP_unique.information2,10);
6329: hr_utility.set_location( 'r_PTP_unique.information3 '||r_PTP_unique.information3,10);
6330: -- If reuse objects flag is 'Y' then check for the object in the target business group
6331: -- if found insert the record into PLSql table and exit the loop else try create the
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);
6328: hr_utility.set_location( 'r_PTP_unique.information2 '||r_PTP_unique.information2,10);
6329: hr_utility.set_location( 'r_PTP_unique.information3 '||r_PTP_unique.information3,10);
6330: -- If reuse objects flag is 'Y' then check for the object in the target business group
6331: -- if found insert the record into PLSql table and exit the loop else try create the
6332: -- object in the target business group
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);
6328: hr_utility.set_location( 'r_PTP_unique.information2 '||r_PTP_unique.information2,10);
6329: hr_utility.set_location( 'r_PTP_unique.information3 '||r_PTP_unique.information3,10);
6330: -- If reuse objects flag is 'Y' then check for the object in the target business group
6331: -- if found insert the record into PLSql table and exit the loop else try create the
6332: -- object in the target business group
6333: --
6357: --
6358: log_data('PTP',l_new_value,l_prefix || r_PTP_unique.name|| l_suffix,'REUSED');
6359: --
6360: end if ;
6361: hr_utility.set_location( 'found record for update',10);
6362: --
6363: else
6364: --
6365: l_update := false;
6382: --
6383: l_min_esd := greatest(l_min_esd,r_PTP_unique.information2);
6384:
6385:
6386: hr_utility.set_location( 'p_reuse_object_flag = ' || p_reuse_object_flag, 10);
6387: if p_reuse_object_flag = 'Y' then
6388: if c_PTP_min_max_dates%found then
6389: -- cursor to find the object
6390: hr_utility.set_location( 'l_prefix || r_PTP_unique.name|| l_suffix = ' || l_prefix || r_PTP_unique.name|| l_suffix,10);
6386: hr_utility.set_location( 'p_reuse_object_flag = ' || p_reuse_object_flag, 10);
6387: if p_reuse_object_flag = 'Y' then
6388: if c_PTP_min_max_dates%found then
6389: -- cursor to find the object
6390: hr_utility.set_location( 'l_prefix || r_PTP_unique.name|| l_suffix = ' || l_prefix || r_PTP_unique.name|| l_suffix,10);
6391: hr_utility.set_location( 'l_min_esd = ' || l_min_esd ,10);
6392: hr_utility.set_location( 'l_max_eed = ' || l_max_eed ,10);
6393: open c_find_PTP_in_target( l_prefix || r_PTP_unique.name|| l_suffix ,l_min_esd,l_max_eed,
6394: p_target_business_group_id, nvl(l_pl_typ_id, -999) ) ;
6387: if p_reuse_object_flag = 'Y' then
6388: if c_PTP_min_max_dates%found then
6389: -- cursor to find the object
6390: hr_utility.set_location( 'l_prefix || r_PTP_unique.name|| l_suffix = ' || l_prefix || r_PTP_unique.name|| l_suffix,10);
6391: hr_utility.set_location( 'l_min_esd = ' || l_min_esd ,10);
6392: hr_utility.set_location( 'l_max_eed = ' || l_max_eed ,10);
6393: open c_find_PTP_in_target( l_prefix || r_PTP_unique.name|| l_suffix ,l_min_esd,l_max_eed,
6394: p_target_business_group_id, nvl(l_pl_typ_id, -999) ) ;
6395: fetch c_find_PTP_in_target into l_new_value ;
6388: if c_PTP_min_max_dates%found then
6389: -- cursor to find the object
6390: hr_utility.set_location( 'l_prefix || r_PTP_unique.name|| l_suffix = ' || l_prefix || r_PTP_unique.name|| l_suffix,10);
6391: hr_utility.set_location( 'l_min_esd = ' || l_min_esd ,10);
6392: hr_utility.set_location( 'l_max_eed = ' || l_max_eed ,10);
6393: open c_find_PTP_in_target( l_prefix || r_PTP_unique.name|| l_suffix ,l_min_esd,l_max_eed,
6394: p_target_business_group_id, nvl(l_pl_typ_id, -999) ) ;
6395: fetch c_find_PTP_in_target into l_new_value ;
6396: if c_find_PTP_in_target%found then
6403: p_from_date => l_min_esd,
6404: p_to_date => l_max_eed );
6405: if l_dt_rec_found THEN
6406: --END TEMPIK
6407: hr_utility.set_location( 'r_PTP_unique.information3 found ',10);
6408: if r_PTP_unique.information1 <> nvl(g_pk_tbl(g_count-1).old_value, -999) or
6409: nvl(g_pk_tbl(g_count-1).pk_id_column, '999') <> 'PL_TYP_ID' then
6410: g_pk_tbl(g_count).pk_id_column := 'PL_TYP_ID' ;
6411: g_pk_tbl(g_count).old_value := r_PTP_unique.information1 ;
6445: close c_PTP ;
6446: --
6447: l_current_pk_id := r_PTP.information1;
6448: --
6449: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6450: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6451: --
6452: if l_current_pk_id = l_prev_pk_id then
6453: --
6446: --
6447: l_current_pk_id := r_PTP.information1;
6448: --
6449: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6450: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6451: --
6452: if l_current_pk_id = l_prev_pk_id then
6453: --
6454: l_first_rec := false ;
6469: end if;
6470:
6471: if l_first_rec and not l_update then
6472: -- Call Create routine.
6473: hr_utility.set_location(' BEN_PL_TYP_F CREATE_PLAN_TYPE ',20);
6474: BEN_PLAN_TYPE_API.CREATE_PLAN_TYPE(
6475: --
6476: P_VALIDATE => false
6477: ,P_EFFECTIVE_DATE => l_effective_date
6527: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
6528: );
6529: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6530: -- Update all relevent cer records with new pk_id
6531: hr_utility.set_location('Before plsql table ',222);
6532: hr_utility.set_location('new_value id '||l_pl_typ_id,222);
6533: g_pk_tbl(g_count).pk_id_column := 'PL_TYP_ID' ;
6534: g_pk_tbl(g_count).old_value := r_PTP.information1 ;
6535: g_pk_tbl(g_count).new_value := l_PL_TYP_ID ;
6528: );
6529: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6530: -- Update all relevent cer records with new pk_id
6531: hr_utility.set_location('Before plsql table ',222);
6532: hr_utility.set_location('new_value id '||l_pl_typ_id,222);
6533: g_pk_tbl(g_count).pk_id_column := 'PL_TYP_ID' ;
6534: g_pk_tbl(g_count).old_value := r_PTP.information1 ;
6535: g_pk_tbl(g_count).new_value := l_PL_TYP_ID ;
6536: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
6534: g_pk_tbl(g_count).old_value := r_PTP.information1 ;
6535: g_pk_tbl(g_count).new_value := l_PL_TYP_ID ;
6536: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
6537: g_pk_tbl(g_count).table_route_id := r_PTP_unique.table_route_id;
6538: hr_utility.set_location('After plsql table ',222);
6539: --
6540: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
6541: --
6542: g_count := g_count + 1 ;
6544: log_data('PTP',l_new_value,l_prefix || r_PTP.INFORMATION170 || l_suffix,'COPIED');
6545: --
6546: else
6547: --
6548: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6549: --
6550: if l_update then
6551: --
6552: l_datetrack_mode := r_PTP.datetrack_mode ;
6564: l_object_version_number := r_PTP.information265;
6565: --
6566: end if;
6567: --
6568: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6569: -- Call Update routine for the pk_id created in prev run .
6570: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6571: IF l_update OR l_dml_operation <> 'UPDATE' THEN
6572: hr_utility.set_location(' BEN_PL_TYP_F UPDATE_PLAN_TYPE ',30);
6568: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6569: -- Call Update routine for the pk_id created in prev run .
6570: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6571: IF l_update OR l_dml_operation <> 'UPDATE' THEN
6572: hr_utility.set_location(' BEN_PL_TYP_F UPDATE_PLAN_TYPE ',30);
6573: BEN_PLAN_TYPE_API.UPDATE_PLAN_TYPE(
6574: --
6575: P_VALIDATE => false
6576: ,P_EFFECTIVE_DATE => l_effective_date
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);
6826: hr_utility.set_location( 'r_PGM_unique.information2 '||r_PGM_unique.information2,10);
6827: hr_utility.set_location( 'r_PGM_unique.information3 '||r_PGM_unique.information3,10);
6828: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
6826: hr_utility.set_location( 'r_PGM_unique.information2 '||r_PGM_unique.information2,10);
6827: hr_utility.set_location( 'r_PGM_unique.information3 '||r_PGM_unique.information3,10);
6828: -- If reuse objects flag is 'Y' then check for the object in the target business group
6829: -- if found insert the record into PLSql table and exit the loop else try create the
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);
6826: hr_utility.set_location( 'r_PGM_unique.information2 '||r_PGM_unique.information2,10);
6827: hr_utility.set_location( 'r_PGM_unique.information3 '||r_PGM_unique.information3,10);
6828: -- If reuse objects flag is 'Y' then check for the object in the target business group
6829: -- if found insert the record into PLSql table and exit the loop else try create the
6830: -- object in the target business group
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);
6826: hr_utility.set_location( 'r_PGM_unique.information2 '||r_PGM_unique.information2,10);
6827: hr_utility.set_location( 'r_PGM_unique.information3 '||r_PGM_unique.information3,10);
6828: -- If reuse objects flag is 'Y' then check for the object in the target business group
6829: -- if found insert the record into PLSql table and exit the loop else try create the
6830: -- object in the target business group
6831: --
6857: --
6858: log_data('PGM',l_new_value,l_prefix || r_PGM_unique.name|| l_suffix,'REUSED');
6859: --
6860: end if ;
6861: hr_utility.set_location( 'found record for update',10);
6862: --
6863: else
6864: --
6865: l_update := false;
6938: close c_PGM ;
6939: --
6940: l_current_pk_id := r_PGM.information1;
6941: --
6942: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6943: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6944: --
6945: if l_current_pk_id = l_prev_pk_id then
6946: --
6939: --
6940: l_current_pk_id := r_PGM.information1;
6941: --
6942: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6943: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6944: --
6945: if l_current_pk_id = l_prev_pk_id then
6946: --
6947: l_first_rec := false ;
7008: --
7009:
7010: if l_first_rec and not l_update then
7011: -- Call Create routine.
7012: hr_utility.set_location(' BEN_PGM_F CREATE_PROGRAM ',20);
7013: BEN_PROGRAM_API.CREATE_PROGRAM(
7014: --
7015: P_VALIDATE => false
7016: ,P_EFFECTIVE_DATE => l_effective_date
7128: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
7129: );
7130: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7131: -- Update all relevent cer records with new pk_id
7132: hr_utility.set_location('Before plsql table ',222);
7133: hr_utility.set_location('new_value id '||l_pgm_id,222);
7134: g_pk_tbl(g_count).pk_id_column := 'PGM_ID' ;
7135: g_pk_tbl(g_count).old_value := r_PGM.information1 ;
7136: g_pk_tbl(g_count).new_value := l_PGM_ID ;
7129: );
7130: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7131: -- Update all relevent cer records with new pk_id
7132: hr_utility.set_location('Before plsql table ',222);
7133: hr_utility.set_location('new_value id '||l_pgm_id,222);
7134: g_pk_tbl(g_count).pk_id_column := 'PGM_ID' ;
7135: g_pk_tbl(g_count).old_value := r_PGM.information1 ;
7136: g_pk_tbl(g_count).new_value := l_PGM_ID ;
7137: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
7135: g_pk_tbl(g_count).old_value := r_PGM.information1 ;
7136: g_pk_tbl(g_count).new_value := l_PGM_ID ;
7137: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
7138: g_pk_tbl(g_count).table_route_id := r_PGM_unique.table_route_id;
7139: hr_utility.set_location('After plsql table ',222);
7140: --
7141: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
7142: --
7143: g_count := g_count + 1 ;
7147: else
7148: --
7149: -- Call Update routine for the pk_id created in prev run .
7150: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7151: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7152: --
7153: if l_update then
7154: --
7155: l_datetrack_mode := r_PGM.datetrack_mode ;
7167: l_object_version_number := r_PGM.information265;
7168: --
7169: end if;
7170: --
7171: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7172: --
7173: IF l_update OR l_dml_operation <> 'UPDATE' THEN
7174: hr_utility.set_location(' BEN_PGM_F UPDATE_PROGRAM ',30);
7175:
7170: --
7171: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7172: --
7173: IF l_update OR l_dml_operation <> 'UPDATE' THEN
7174: hr_utility.set_location(' BEN_PGM_F UPDATE_PROGRAM ',30);
7175:
7176: BEN_PROGRAM_API.UPDATE_PROGRAM(
7177: --
7178: P_VALIDATE => false
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);
7468: hr_utility.set_location( 'r_REG_unique.information2 '||r_REG_unique.information2,10);
7469: hr_utility.set_location( 'r_REG_unique.information3 '||r_REG_unique.information3,10);
7470: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
7468: hr_utility.set_location( 'r_REG_unique.information2 '||r_REG_unique.information2,10);
7469: hr_utility.set_location( 'r_REG_unique.information3 '||r_REG_unique.information3,10);
7470: -- If reuse objects flag is 'Y' then check for the object in the target business group
7471: -- if found insert the record into PLSql table and exit the loop else try create the
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);
7468: hr_utility.set_location( 'r_REG_unique.information2 '||r_REG_unique.information2,10);
7469: hr_utility.set_location( 'r_REG_unique.information3 '||r_REG_unique.information3,10);
7470: -- If reuse objects flag is 'Y' then check for the object in the target business group
7471: -- if found insert the record into PLSql table and exit the loop else try create the
7472: -- object in the target business group
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);
7468: hr_utility.set_location( 'r_REG_unique.information2 '||r_REG_unique.information2,10);
7469: hr_utility.set_location( 'r_REG_unique.information3 '||r_REG_unique.information3,10);
7470: -- If reuse objects flag is 'Y' then check for the object in the target business group
7471: -- if found insert the record into PLSql table and exit the loop else try create the
7472: -- object in the target business group
7473: --
7541: close c_REG ;
7542: --
7543: l_current_pk_id := r_REG.information1;
7544: --
7545: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7546: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7547: --
7548: if l_current_pk_id = l_prev_pk_id then
7549: --
7542: --
7543: l_current_pk_id := r_REG.information1;
7544: --
7545: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7546: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7547: --
7548: if l_current_pk_id = l_prev_pk_id then
7549: --
7550: l_first_rec := false ;
7567: end if;
7568:
7569: if l_first_rec and not l_update then
7570: -- Call Create routine.
7571: hr_utility.set_location(' BEN_REGN_F CREATE_REGULATIONS ',20);
7572: BEN_REGULATIONS_API.CREATE_REGULATIONS(
7573: --
7574: P_VALIDATE => false
7575: ,P_EFFECTIVE_DATE => l_effective_date
7616: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
7617: );
7618: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7619: -- Update all relevent cer records with new pk_id
7620: hr_utility.set_location('Before plsql table ',222);
7621: hr_utility.set_location('new_value id '||l_regn_id,222);
7622: g_pk_tbl(g_count).pk_id_column := 'REGN_ID' ;
7623: g_pk_tbl(g_count).old_value := r_REG.information1 ;
7624: g_pk_tbl(g_count).new_value := l_REGN_ID ;
7617: );
7618: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7619: -- Update all relevent cer records with new pk_id
7620: hr_utility.set_location('Before plsql table ',222);
7621: hr_utility.set_location('new_value id '||l_regn_id,222);
7622: g_pk_tbl(g_count).pk_id_column := 'REGN_ID' ;
7623: g_pk_tbl(g_count).old_value := r_REG.information1 ;
7624: g_pk_tbl(g_count).new_value := l_REGN_ID ;
7625: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
7623: g_pk_tbl(g_count).old_value := r_REG.information1 ;
7624: g_pk_tbl(g_count).new_value := l_REGN_ID ;
7625: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
7626: g_pk_tbl(g_count).table_route_id := r_REG_unique.table_route_id;
7627: hr_utility.set_location('After plsql table ',222);
7628: --
7629: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
7630: --
7631: g_count := g_count + 1 ;
7636: else
7637: --
7638: -- Call Update routine for the pk_id created in prev run .
7639: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7640: hr_utility.set_location(' BEN_REGN_F UPDATE_REGULATIONS ',30);
7641: BEN_REGULATIONS_API.UPDATE_REGULATIONS(
7642: --
7643: P_VALIDATE => false
7644: ,P_EFFECTIVE_DATE => l_effective_date
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);
7864: hr_utility.set_location( 'r_RZR_unique.information2 '||r_RZR_unique.information2,10);
7865: hr_utility.set_location( 'r_RZR_unique.information3 '||r_RZR_unique.information3,10);
7866: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
7864: hr_utility.set_location( 'r_RZR_unique.information2 '||r_RZR_unique.information2,10);
7865: hr_utility.set_location( 'r_RZR_unique.information3 '||r_RZR_unique.information3,10);
7866: -- If reuse objects flag is 'Y' then check for the object in the target business group
7867: -- if found insert the record into PLSql table and exit the loop else try create the
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);
7864: hr_utility.set_location( 'r_RZR_unique.information2 '||r_RZR_unique.information2,10);
7865: hr_utility.set_location( 'r_RZR_unique.information3 '||r_RZR_unique.information3,10);
7866: -- If reuse objects flag is 'Y' then check for the object in the target business group
7867: -- if found insert the record into PLSql table and exit the loop else try create the
7868: -- object in the target business group
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);
7864: hr_utility.set_location( 'r_RZR_unique.information2 '||r_RZR_unique.information2,10);
7865: hr_utility.set_location( 'r_RZR_unique.information3 '||r_RZR_unique.information3,10);
7866: -- If reuse objects flag is 'Y' then check for the object in the target business group
7867: -- if found insert the record into PLSql table and exit the loop else try create the
7868: -- object in the target business group
7869: --
7913: --
7914: log_data('RZR',l_new_value,l_prefix || r_RZR_unique.information1|| l_suffix,'REUSED');
7915: --
7916: end if ;
7917: hr_utility.set_location( 'found record for update',10);
7918: --
7919: else
7920: --
7921: l_update := false;
7981: --
7982: */
7983: l_current_pk_id := r_RZR.information1;
7984: --
7985: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7986: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7987: --
7988: if l_current_pk_id = l_prev_pk_id then
7989: --
7982: */
7983: l_current_pk_id := r_RZR.information1;
7984: --
7985: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7986: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7987: --
7988: if l_current_pk_id = l_prev_pk_id then
7989: --
7990: l_first_rec := false ;
8003: end if;
8004:
8005: if l_first_rec and not l_update then
8006: -- Call Create routine.
8007: hr_utility.set_location(' BEN_PSTL_ZIP_RNG_F CREATE_POSTAL_ZIP_RANGE ',20);
8008: BEN_POSTAL_ZIP_RANGE_API.CREATE_POSTAL_ZIP_RANGE(
8009: --
8010: P_VALIDATE => false
8011: ,P_EFFECTIVE_DATE => l_effective_date
8051: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
8052: );
8053: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8054: -- Update all relevent cer records with new pk_id
8055: hr_utility.set_location('Before plsql table ',222);
8056: hr_utility.set_location('new_value id '||l_pstl_zip_rng_id,222);
8057: g_pk_tbl(g_count).pk_id_column := 'PSTL_ZIP_RNG_ID' ;
8058: g_pk_tbl(g_count).old_value := r_RZR.information1 ;
8059: g_pk_tbl(g_count).new_value := l_PSTL_ZIP_RNG_ID ;
8052: );
8053: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8054: -- Update all relevent cer records with new pk_id
8055: hr_utility.set_location('Before plsql table ',222);
8056: hr_utility.set_location('new_value id '||l_pstl_zip_rng_id,222);
8057: g_pk_tbl(g_count).pk_id_column := 'PSTL_ZIP_RNG_ID' ;
8058: g_pk_tbl(g_count).old_value := r_RZR.information1 ;
8059: g_pk_tbl(g_count).new_value := l_PSTL_ZIP_RNG_ID ;
8060: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
8058: g_pk_tbl(g_count).old_value := r_RZR.information1 ;
8059: g_pk_tbl(g_count).new_value := l_PSTL_ZIP_RNG_ID ;
8060: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
8061: g_pk_tbl(g_count).table_route_id := r_RZR_unique.table_route_id;
8062: hr_utility.set_location('After plsql table ',222);
8063: --
8064: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
8065: --
8066: g_count := g_count + 1 ;
8067: --
8068: else
8069: --
8070: --UPD START
8071: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8072: --
8073: if l_update then
8074: --
8075: l_datetrack_mode := r_RZR.datetrack_mode ;
8087: l_object_version_number := r_RZR.information265;
8088: --
8089: end if;
8090: --
8091: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8092: --
8093: IF l_update OR l_dml_operation <> 'UPDATE' THEN
8094: --UPD END
8095: -- Call Update routine for the pk_id created in prev run .
8093: IF l_update OR l_dml_operation <> 'UPDATE' THEN
8094: --UPD END
8095: -- Call Update routine for the pk_id created in prev run .
8096: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8097: hr_utility.set_location(' BEN_PSTL_ZIP_RNG_F UPDATE_POSTAL_ZIP_RANGE ',30);
8098: BEN_POSTAL_ZIP_RANGE_API.UPDATE_POSTAL_ZIP_RANGE(
8099: --
8100: P_VALIDATE => false
8101: ,P_EFFECTIVE_DATE => l_effective_date
8287: end if ;
8288: -- End Prefix Sufix derivation
8289: for r_BNR_unique in c_unique_BNR('BNR') loop
8290: --
8291: hr_utility.set_location(' r_BNR_unique.table_route_id '||r_BNR_unique.table_route_id,10);
8292: hr_utility.set_location(' r_BNR_unique.information1 '||r_BNR_unique.information1,10);
8293: hr_utility.set_location( 'r_BNR_unique.information2 '||r_BNR_unique.information2,10);
8294: hr_utility.set_location( 'r_BNR_unique.information3 '||r_BNR_unique.information3,10);
8295: -- If reuse objects flag is 'Y' then check for the object in the target business group
8288: -- End Prefix Sufix derivation
8289: for r_BNR_unique in c_unique_BNR('BNR') loop
8290: --
8291: hr_utility.set_location(' r_BNR_unique.table_route_id '||r_BNR_unique.table_route_id,10);
8292: hr_utility.set_location(' r_BNR_unique.information1 '||r_BNR_unique.information1,10);
8293: hr_utility.set_location( 'r_BNR_unique.information2 '||r_BNR_unique.information2,10);
8294: hr_utility.set_location( 'r_BNR_unique.information3 '||r_BNR_unique.information3,10);
8295: -- If reuse objects flag is 'Y' then check for the object in the target business group
8296: -- if found insert the record into PLSql table and exit the loop else try create the
8289: for r_BNR_unique in c_unique_BNR('BNR') loop
8290: --
8291: hr_utility.set_location(' r_BNR_unique.table_route_id '||r_BNR_unique.table_route_id,10);
8292: hr_utility.set_location(' r_BNR_unique.information1 '||r_BNR_unique.information1,10);
8293: hr_utility.set_location( 'r_BNR_unique.information2 '||r_BNR_unique.information2,10);
8294: hr_utility.set_location( 'r_BNR_unique.information3 '||r_BNR_unique.information3,10);
8295: -- If reuse objects flag is 'Y' then check for the object in the target business group
8296: -- if found insert the record into PLSql table and exit the loop else try create the
8297: -- object in the target business group
8290: --
8291: hr_utility.set_location(' r_BNR_unique.table_route_id '||r_BNR_unique.table_route_id,10);
8292: hr_utility.set_location(' r_BNR_unique.information1 '||r_BNR_unique.information1,10);
8293: hr_utility.set_location( 'r_BNR_unique.information2 '||r_BNR_unique.information2,10);
8294: hr_utility.set_location( 'r_BNR_unique.information3 '||r_BNR_unique.information3,10);
8295: -- If reuse objects flag is 'Y' then check for the object in the target business group
8296: -- if found insert the record into PLSql table and exit the loop else try create the
8297: -- object in the target business group
8298: --
8323: --
8324: end if ;
8325: l_RPTG_GRP_ID := r_BNR_unique.information1 ;
8326: l_object_version_number := r_BNR.information265 ;
8327: hr_utility.set_location( 'found record for update',10);
8328: --
8329: else
8330: if p_reuse_object_flag = 'Y' then
8331: -- cursor to find the object
8369: close c_BNR ;
8370: --
8371: l_current_pk_id := r_BNR.information1;
8372: --
8373: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8374: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8375: --
8376: if l_current_pk_id = l_prev_pk_id then
8377: --
8370: --
8371: l_current_pk_id := r_BNR.information1;
8372: --
8373: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8374: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8375: --
8376: if l_current_pk_id = l_prev_pk_id then
8377: --
8378: l_first_rec := false ;
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);
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)
8441: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
8442: );
8443: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8444: -- Update all relevent cer records with new pk_id
8445: hr_utility.set_location('Before plsql table ',222);
8446: hr_utility.set_location('new_value id '||l_rptg_grp_id,222);
8447: g_pk_tbl(g_count).pk_id_column := 'RPTG_GRP_ID' ;
8448: g_pk_tbl(g_count).old_value := r_BNR.information1 ;
8449: g_pk_tbl(g_count).new_value := l_RPTG_GRP_ID ;
8442: );
8443: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8444: -- Update all relevent cer records with new pk_id
8445: hr_utility.set_location('Before plsql table ',222);
8446: hr_utility.set_location('new_value id '||l_rptg_grp_id,222);
8447: g_pk_tbl(g_count).pk_id_column := 'RPTG_GRP_ID' ;
8448: g_pk_tbl(g_count).old_value := r_BNR.information1 ;
8449: g_pk_tbl(g_count).new_value := l_RPTG_GRP_ID ;
8450: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
8448: g_pk_tbl(g_count).old_value := r_BNR.information1 ;
8449: g_pk_tbl(g_count).new_value := l_RPTG_GRP_ID ;
8450: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
8451: g_pk_tbl(g_count).table_route_id := r_BNR_unique.table_route_id;
8452: hr_utility.set_location('After plsql table ',222);
8453: --
8454: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
8455: --
8456: g_count := g_count + 1 ;
8457: --
8458: log_data('BNR',l_new_value,l_prefix || r_BNR.INFORMATION170 || l_suffix ,'COPIED');
8459: --
8460: elsif l_update then
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)
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);
8661: hr_utility.set_location( 'r_RCL_unique.information2 '||r_RCL_unique.information2,10);
8662: hr_utility.set_location( 'r_RCL_unique.information3 '||r_RCL_unique.information3,10);
8663: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
8661: hr_utility.set_location( 'r_RCL_unique.information2 '||r_RCL_unique.information2,10);
8662: hr_utility.set_location( 'r_RCL_unique.information3 '||r_RCL_unique.information3,10);
8663: -- If reuse objects flag is 'Y' then check for the object in the target business group
8664: -- if found insert the record into PLSql table and exit the loop else try create the
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);
8661: hr_utility.set_location( 'r_RCL_unique.information2 '||r_RCL_unique.information2,10);
8662: hr_utility.set_location( 'r_RCL_unique.information3 '||r_RCL_unique.information3,10);
8663: -- If reuse objects flag is 'Y' then check for the object in the target business group
8664: -- if found insert the record into PLSql table and exit the loop else try create the
8665: -- object in the target business group
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);
8661: hr_utility.set_location( 'r_RCL_unique.information2 '||r_RCL_unique.information2,10);
8662: hr_utility.set_location( 'r_RCL_unique.information3 '||r_RCL_unique.information3,10);
8663: -- If reuse objects flag is 'Y' then check for the object in the target business group
8664: -- if found insert the record into PLSql table and exit the loop else try create the
8665: -- object in the target business group
8666: --
8690: --
8691: log_data('RCL',l_new_value,l_prefix || r_RCL_unique.name|| l_suffix,'REUSED');
8692: --
8693: end if ;
8694: hr_utility.set_location( 'found record for update',10);
8695: --
8696: else
8697: --
8698: l_update := false;
8766: close c_RCL ;
8767: --
8768: l_current_pk_id := r_RCL.information1;
8769: --
8770: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8771: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8772: --
8773: if l_current_pk_id = l_prev_pk_id then
8774: --
8767: --
8768: l_current_pk_id := r_RCL.information1;
8769: --
8770: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8771: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8772: --
8773: if l_current_pk_id = l_prev_pk_id then
8774: --
8775: l_first_rec := false ;
8792: end if;
8793:
8794: if l_first_rec and not l_update then
8795: -- Call Create routine.
8796: hr_utility.set_location(' BEN_RLTD_PER_CHG_CS_LER_F CREATE_RLTD_PER_CHG_CS_LER ',20);
8797: BEN_RLTD_PER_CHG_CS_LER_API.CREATE_RLTD_PER_CHG_CS_LER(
8798: --
8799: P_VALIDATE => false
8800: ,P_EFFECTIVE_DATE => l_effective_date
8845: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
8846: );
8847: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8848: -- Update all relevent cer records with new pk_id
8849: hr_utility.set_location('Before plsql table ',222);
8850: hr_utility.set_location('new_value id '||l_rltd_per_chg_cs_ler_id,222);
8851: g_pk_tbl(g_count).pk_id_column := 'RLTD_PER_CHG_CS_LER_ID' ;
8852: g_pk_tbl(g_count).old_value := r_RCL.information1 ;
8853: g_pk_tbl(g_count).new_value := l_RLTD_PER_CHG_CS_LER_ID ;
8846: );
8847: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8848: -- Update all relevent cer records with new pk_id
8849: hr_utility.set_location('Before plsql table ',222);
8850: hr_utility.set_location('new_value id '||l_rltd_per_chg_cs_ler_id,222);
8851: g_pk_tbl(g_count).pk_id_column := 'RLTD_PER_CHG_CS_LER_ID' ;
8852: g_pk_tbl(g_count).old_value := r_RCL.information1 ;
8853: g_pk_tbl(g_count).new_value := l_RLTD_PER_CHG_CS_LER_ID ;
8854: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
8852: g_pk_tbl(g_count).old_value := r_RCL.information1 ;
8853: g_pk_tbl(g_count).new_value := l_RLTD_PER_CHG_CS_LER_ID ;
8854: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
8855: g_pk_tbl(g_count).table_route_id := r_RCL_unique.table_route_id;
8856: hr_utility.set_location('After plsql table ',222);
8857: --
8858: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
8859: --
8860: g_count := g_count + 1 ;
8861: --
8862: else
8863: --
8864: --UPD START
8865: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8866: --
8867: if l_update then
8868: --
8869: l_datetrack_mode := r_RCL.datetrack_mode ;
8881: l_object_version_number := r_RCL.information265;
8882: --
8883: end if;
8884: --
8885: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8886: --
8887: IF l_update OR l_dml_operation <> 'UPDATE' THEN
8888: --UPD END
8889: -- Call Update routine for the pk_id created in prev run .
8887: IF l_update OR l_dml_operation <> 'UPDATE' THEN
8888: --UPD END
8889: -- Call Update routine for the pk_id created in prev run .
8890: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8891: hr_utility.set_location(' BEN_RLTD_PER_CHG_CS_LER_F UPDATE_RLTD_PER_CHG_CS_LER ',30);
8892: BEN_RLTD_PER_CHG_CS_LER_API.UPDATE_RLTD_PER_CHG_CS_LER(
8893: --
8894: P_VALIDATE => false
8895: ,P_EFFECTIVE_DATE => l_effective_date
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);
9143: hr_utility.set_location( 'r_OPT_unique.information2 '||r_OPT_unique.information2,10);
9144: hr_utility.set_location( 'r_OPT_unique.information3 '||r_OPT_unique.information3,10);
9145: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
9143: hr_utility.set_location( 'r_OPT_unique.information2 '||r_OPT_unique.information2,10);
9144: hr_utility.set_location( 'r_OPT_unique.information3 '||r_OPT_unique.information3,10);
9145: -- If reuse objects flag is 'Y' then check for the object in the target business group
9146: -- if found insert the record into PLSql table and exit the loop else try create the
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);
9143: hr_utility.set_location( 'r_OPT_unique.information2 '||r_OPT_unique.information2,10);
9144: hr_utility.set_location( 'r_OPT_unique.information3 '||r_OPT_unique.information3,10);
9145: -- If reuse objects flag is 'Y' then check for the object in the target business group
9146: -- if found insert the record into PLSql table and exit the loop else try create the
9147: -- object in the target business group
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);
9143: hr_utility.set_location( 'r_OPT_unique.information2 '||r_OPT_unique.information2,10);
9144: hr_utility.set_location( 'r_OPT_unique.information3 '||r_OPT_unique.information3,10);
9145: -- If reuse objects flag is 'Y' then check for the object in the target business group
9146: -- if found insert the record into PLSql table and exit the loop else try create the
9147: -- object in the target business group
9148: --
9172: --
9173: log_data('OPT',l_new_value,l_prefix || r_OPT_unique.name|| l_suffix,'REUSED');
9174: --
9175: end if ;
9176: hr_utility.set_location( 'found record for update',10);
9177: --
9178: else
9179: --
9180: l_update := false;
9251: close c_OPT ;
9252: --
9253: l_current_pk_id := r_OPT.information1;
9254: --
9255: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9256: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9257: --
9258: if l_current_pk_id = l_prev_pk_id then
9259: --
9252: --
9253: l_current_pk_id := r_OPT.information1;
9254: --
9255: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9256: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9257: --
9258: if l_current_pk_id = l_prev_pk_id then
9259: --
9260: l_first_rec := false ;
9310: end if;
9311: --
9312: if l_first_rec and not l_update then
9313: -- Call Create routine.
9314: hr_utility.set_location(' BEN_OPT_F CREATE_OPTION_DEFINITION ',20);
9315: BEN_OPTION_DEFINITION_API.CREATE_OPTION_DEFINITION(
9316: --
9317: P_VALIDATE => false
9318: ,P_EFFECTIVE_DATE => l_effective_date
9374: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
9375: );
9376: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9377: -- Update all relevent cer records with new pk_id
9378: hr_utility.set_location('Before plsql table ',222);
9379: hr_utility.set_location('new_value id '||l_opt_id,222);
9380: g_pk_tbl(g_count).pk_id_column := 'OPT_ID' ;
9381: g_pk_tbl(g_count).old_value := r_OPT.information1 ;
9382: g_pk_tbl(g_count).new_value := l_OPT_ID ;
9375: );
9376: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9377: -- Update all relevent cer records with new pk_id
9378: hr_utility.set_location('Before plsql table ',222);
9379: hr_utility.set_location('new_value id '||l_opt_id,222);
9380: g_pk_tbl(g_count).pk_id_column := 'OPT_ID' ;
9381: g_pk_tbl(g_count).old_value := r_OPT.information1 ;
9382: g_pk_tbl(g_count).new_value := l_OPT_ID ;
9383: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
9381: g_pk_tbl(g_count).old_value := r_OPT.information1 ;
9382: g_pk_tbl(g_count).new_value := l_OPT_ID ;
9383: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
9384: g_pk_tbl(g_count).table_route_id := r_OPT_unique.table_route_id;
9385: hr_utility.set_location('After plsql table ',222);
9386: --
9387: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
9388: --
9389: g_count := g_count + 1 ;
9392: --
9393: else
9394: --
9395: --UPD START
9396: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9397: --
9398: if l_update then
9399: --
9400: l_datetrack_mode := r_OPT.datetrack_mode ;
9412: l_object_version_number := r_OPT.information265;
9413: --
9414: end if;
9415: --
9416: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9417: --
9418: IF l_update OR l_dml_operation <> 'UPDATE' THEN
9419: --UPD END
9420: -- Call Update routine for the pk_id created in prev run .
9418: IF l_update OR l_dml_operation <> 'UPDATE' THEN
9419: --UPD END
9420: -- Call Update routine for the pk_id created in prev run .
9421: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9422: hr_utility.set_location(' BEN_OPT_F UPDATE_OPTION_DEFINITION ',30);
9423: BEN_OPTION_DEFINITION_API.UPDATE_OPTION_DEFINITION(
9424: --
9425: P_VALIDATE => false
9426: ,P_EFFECTIVE_DATE => l_effective_date
9715: else
9716: l_prefix := null ;
9717: l_suffix := null ;
9718: end if ;
9719: hr_utility.set_location('prefix '||l_prefix,100);
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:
9716: l_prefix := null ;
9717: l_suffix := null ;
9718: end if ;
9719: hr_utility.set_location('prefix '||l_prefix,100);
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
9728: ) then
9729:
9730: l_source_ler_name := l_prefix || r_LER_unique.name || l_suffix; -- For display in error messages
9731: --
9732: hr_utility.set_location(' r_LER_unique.table_route_id '||r_LER_unique.table_route_id,10);
9733: hr_utility.set_location(' r_LER_unique.information1 '||r_LER_unique.information1,10);
9734: hr_utility.set_location( 'r_LER_unique.information2 '||r_LER_unique.information2,10);
9735: hr_utility.set_location( 'r_LER_unique.information3 '||r_LER_unique.information3,10);
9736: -- If reuse objects flag is 'Y' then check for the object in the target business group
9729:
9730: l_source_ler_name := l_prefix || r_LER_unique.name || l_suffix; -- For display in error messages
9731: --
9732: hr_utility.set_location(' r_LER_unique.table_route_id '||r_LER_unique.table_route_id,10);
9733: hr_utility.set_location(' r_LER_unique.information1 '||r_LER_unique.information1,10);
9734: hr_utility.set_location( 'r_LER_unique.information2 '||r_LER_unique.information2,10);
9735: hr_utility.set_location( 'r_LER_unique.information3 '||r_LER_unique.information3,10);
9736: -- If reuse objects flag is 'Y' then check for the object in the target business group
9737: -- if found insert the record into PLSql table and exit the loop else try create the
9730: l_source_ler_name := l_prefix || r_LER_unique.name || l_suffix; -- For display in error messages
9731: --
9732: hr_utility.set_location(' r_LER_unique.table_route_id '||r_LER_unique.table_route_id,10);
9733: hr_utility.set_location(' r_LER_unique.information1 '||r_LER_unique.information1,10);
9734: hr_utility.set_location( 'r_LER_unique.information2 '||r_LER_unique.information2,10);
9735: hr_utility.set_location( 'r_LER_unique.information3 '||r_LER_unique.information3,10);
9736: -- If reuse objects flag is 'Y' then check for the object in the target business group
9737: -- if found insert the record into PLSql table and exit the loop else try create the
9738: -- object in the target business group
9731: --
9732: hr_utility.set_location(' r_LER_unique.table_route_id '||r_LER_unique.table_route_id,10);
9733: hr_utility.set_location(' r_LER_unique.information1 '||r_LER_unique.information1,10);
9734: hr_utility.set_location( 'r_LER_unique.information2 '||r_LER_unique.information2,10);
9735: hr_utility.set_location( 'r_LER_unique.information3 '||r_LER_unique.information3,10);
9736: -- If reuse objects flag is 'Y' then check for the object in the target business group
9737: -- if found insert the record into PLSql table and exit the loop else try create the
9738: -- object in the target business group
9739: --
9763: --
9764: log_data('LER',l_new_value,l_prefix || r_LER_unique.name|| l_suffix,'REUSED');
9765: --
9766: end if ;
9767: hr_utility.set_location( 'found record for update',10);
9768: --
9769: else
9770: --
9771: l_update := false;
9797: open c_find_LER_in_target( l_prefix || r_LER_unique.name || l_suffix ,l_min_esd,l_max_eed,
9798: p_target_business_group_id, nvl(l_ler_id, -999) ) ;
9799: fetch c_find_LER_in_target into l_new_value ;
9800: --TEMPIK
9801: hr_utility.set_location('New value '||l_new_value,102);
9802: if l_new_value is not null then
9803: l_dt_rec_found := dt_api.check_min_max_dates
9804: (p_base_table_name => 'BEN_LER_F',
9805: p_base_key_column => 'LER_ID',
9884: g_pk_tbl(g_count).new_value := l_new_value ;
9885: g_pk_tbl(g_count).copy_reuse_type := 'REUSED';
9886: g_pk_tbl(g_count).table_route_id := r_LER_unique.table_route_id;
9887: --
9888: hr_utility.set_location(' g_count '||g_count,12);
9889: hr_utility.set_location(' pk_id_column '||g_pk_tbl(g_count).pk_id_column,12);
9890: hr_utility.set_location(' old_value '||g_pk_tbl(g_count).old_value,12);
9891: hr_utility.set_location(' new_value '||g_pk_tbl(g_count).new_value,12);
9892: hr_utility.set_location(' copy_reuse_type '||g_pk_tbl(g_count).copy_reuse_type,12);
9885: g_pk_tbl(g_count).copy_reuse_type := 'REUSED';
9886: g_pk_tbl(g_count).table_route_id := r_LER_unique.table_route_id;
9887: --
9888: hr_utility.set_location(' g_count '||g_count,12);
9889: hr_utility.set_location(' pk_id_column '||g_pk_tbl(g_count).pk_id_column,12);
9890: hr_utility.set_location(' old_value '||g_pk_tbl(g_count).old_value,12);
9891: hr_utility.set_location(' new_value '||g_pk_tbl(g_count).new_value,12);
9892: hr_utility.set_location(' copy_reuse_type '||g_pk_tbl(g_count).copy_reuse_type,12);
9893: hr_utility.set_location(' table_route_id '||g_pk_tbl(g_count).table_route_id,12);
9886: g_pk_tbl(g_count).table_route_id := r_LER_unique.table_route_id;
9887: --
9888: hr_utility.set_location(' g_count '||g_count,12);
9889: hr_utility.set_location(' pk_id_column '||g_pk_tbl(g_count).pk_id_column,12);
9890: hr_utility.set_location(' old_value '||g_pk_tbl(g_count).old_value,12);
9891: hr_utility.set_location(' new_value '||g_pk_tbl(g_count).new_value,12);
9892: hr_utility.set_location(' copy_reuse_type '||g_pk_tbl(g_count).copy_reuse_type,12);
9893: hr_utility.set_location(' table_route_id '||g_pk_tbl(g_count).table_route_id,12);
9894: -- update_cer_with_target( g_pk_tbl(g_count) , p_copy_entity_txn_id) ;
9887: --
9888: hr_utility.set_location(' g_count '||g_count,12);
9889: hr_utility.set_location(' pk_id_column '||g_pk_tbl(g_count).pk_id_column,12);
9890: hr_utility.set_location(' old_value '||g_pk_tbl(g_count).old_value,12);
9891: hr_utility.set_location(' new_value '||g_pk_tbl(g_count).new_value,12);
9892: hr_utility.set_location(' copy_reuse_type '||g_pk_tbl(g_count).copy_reuse_type,12);
9893: hr_utility.set_location(' table_route_id '||g_pk_tbl(g_count).table_route_id,12);
9894: -- update_cer_with_target( g_pk_tbl(g_count) , p_copy_entity_txn_id) ;
9895: --
9888: hr_utility.set_location(' g_count '||g_count,12);
9889: hr_utility.set_location(' pk_id_column '||g_pk_tbl(g_count).pk_id_column,12);
9890: hr_utility.set_location(' old_value '||g_pk_tbl(g_count).old_value,12);
9891: hr_utility.set_location(' new_value '||g_pk_tbl(g_count).new_value,12);
9892: hr_utility.set_location(' copy_reuse_type '||g_pk_tbl(g_count).copy_reuse_type,12);
9893: hr_utility.set_location(' table_route_id '||g_pk_tbl(g_count).table_route_id,12);
9894: -- update_cer_with_target( g_pk_tbl(g_count) , p_copy_entity_txn_id) ;
9895: --
9896: g_count := g_count + 1 ;
9889: hr_utility.set_location(' pk_id_column '||g_pk_tbl(g_count).pk_id_column,12);
9890: hr_utility.set_location(' old_value '||g_pk_tbl(g_count).old_value,12);
9891: hr_utility.set_location(' new_value '||g_pk_tbl(g_count).new_value,12);
9892: hr_utility.set_location(' copy_reuse_type '||g_pk_tbl(g_count).copy_reuse_type,12);
9893: hr_utility.set_location(' table_route_id '||g_pk_tbl(g_count).table_route_id,12);
9894: -- update_cer_with_target( g_pk_tbl(g_count) , p_copy_entity_txn_id) ;
9895: --
9896: g_count := g_count + 1 ;
9897: --
9921: close c_LER ;
9922: --
9923: l_current_pk_id := r_LER.information1;
9924: --
9925: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9926: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9927: --
9928: if l_current_pk_id = l_prev_pk_id then
9929: --
9922: --
9923: l_current_pk_id := r_LER.information1;
9924: --
9925: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9926: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9927: --
9928: if l_current_pk_id = l_prev_pk_id then
9929: --
9930: l_first_rec := false ;
9949: end if;
9950:
9951: if l_first_rec and not l_update then
9952: -- Call Create routine.
9953: hr_utility.set_location(' BEN_LER_F CREATE_LIFE_EVENT_REASON ',20);
9954: BEN_LIFE_EVENT_REASON_API.CREATE_LIFE_EVENT_REASON(
9955: --
9956: P_VALIDATE => false
9957: ,P_EFFECTIVE_DATE => l_effective_date
10016: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
10017: );
10018: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10019: -- Update all relevent cer records with new pk_id
10020: hr_utility.set_location('Before plsql table ',222);
10021: hr_utility.set_location('new_value id '||l_ler_id,222);
10022: g_pk_tbl(g_count).pk_id_column := 'LER_ID' ;
10023: g_pk_tbl(g_count).old_value := r_LER.information1 ;
10024: g_pk_tbl(g_count).new_value := l_LER_ID ;
10017: );
10018: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10019: -- Update all relevent cer records with new pk_id
10020: hr_utility.set_location('Before plsql table ',222);
10021: hr_utility.set_location('new_value id '||l_ler_id,222);
10022: g_pk_tbl(g_count).pk_id_column := 'LER_ID' ;
10023: g_pk_tbl(g_count).old_value := r_LER.information1 ;
10024: g_pk_tbl(g_count).new_value := l_LER_ID ;
10025: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
10023: g_pk_tbl(g_count).old_value := r_LER.information1 ;
10024: g_pk_tbl(g_count).new_value := l_LER_ID ;
10025: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
10026: g_pk_tbl(g_count).table_route_id := r_LER_unique.table_route_id;
10027: hr_utility.set_location('After plsql table ',222);
10028: --
10029: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
10030: --
10031: g_count := g_count + 1 ;
10034: --
10035: else
10036: --
10037: --UPD START
10038: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10039: --
10040: if l_update then
10041: --
10042: l_datetrack_mode := r_LER.datetrack_mode ;
10054: l_object_version_number := r_LER.information265;
10055: --
10056: end if;
10057: --
10058: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10059: --
10060: IF l_update OR l_dml_operation <> 'UPDATE' THEN
10061: -- Call Update routine for the pk_id created in prev run .
10062: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10059: --
10060: IF l_update OR l_dml_operation <> 'UPDATE' THEN
10061: -- Call Update routine for the pk_id created in prev run .
10062: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10063: hr_utility.set_location(' BEN_LER_F UPDATE_LIFE_EVENT_REASON ',30);
10064: BEN_LIFE_EVENT_REASON_API.UPDATE_LIFE_EVENT_REASON(
10065: --
10066: P_VALIDATE => false
10067: ,P_EFFECTIVE_DATE => l_effective_date
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);
10311: hr_utility.set_location( 'r_LPL_unique.information2 '||r_LPL_unique.information2,10);
10312: hr_utility.set_location( 'r_LPL_unique.information3 '||r_LPL_unique.information3,10);
10313: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
10311: hr_utility.set_location( 'r_LPL_unique.information2 '||r_LPL_unique.information2,10);
10312: hr_utility.set_location( 'r_LPL_unique.information3 '||r_LPL_unique.information3,10);
10313: -- If reuse objects flag is 'Y' then check for the object in the target business group
10314: -- if found insert the record into PLSql table and exit the loop else try create the
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);
10311: hr_utility.set_location( 'r_LPL_unique.information2 '||r_LPL_unique.information2,10);
10312: hr_utility.set_location( 'r_LPL_unique.information3 '||r_LPL_unique.information3,10);
10313: -- If reuse objects flag is 'Y' then check for the object in the target business group
10314: -- if found insert the record into PLSql table and exit the loop else try create the
10315: -- object in the target business group
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);
10311: hr_utility.set_location( 'r_LPL_unique.information2 '||r_LPL_unique.information2,10);
10312: hr_utility.set_location( 'r_LPL_unique.information3 '||r_LPL_unique.information3,10);
10313: -- If reuse objects flag is 'Y' then check for the object in the target business group
10314: -- if found insert the record into PLSql table and exit the loop else try create the
10315: -- object in the target business group
10316: --
10352: --
10353: log_data('LPL',l_new_value,l_prefix || r_LPL_unique.information1|| l_suffix,'REUSED');
10354: --
10355: end if ;
10356: hr_utility.set_location( 'found record for update',10);
10357: --
10358: else
10359: --
10360: l_update := false;
10433: if not l_object_found_in_target or l_update then
10434: --
10435: l_current_pk_id := r_LPL.information1;
10436: --
10437: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10438: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10439: --
10440: if l_current_pk_id = l_prev_pk_id then
10441: --
10434: --
10435: l_current_pk_id := r_LPL.information1;
10436: --
10437: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10438: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10439: --
10440: if l_current_pk_id = l_prev_pk_id then
10441: --
10442: l_first_rec := false ;
10455: end if;
10456: --
10457: if l_first_rec and not l_update then
10458: -- Call Create routine.
10459: hr_utility.set_location(' BEN_LER_PER_INFO_CS_LER_F CREATE_LER_PER_INFO_CS_LER ',20);
10460: BEN_LER_PER_INFO_CS_LER_API.CREATE_LER_PER_INFO_CS_LER(
10461: --
10462: P_VALIDATE => false
10463: ,P_EFFECTIVE_DATE => l_effective_date
10504: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
10505: );
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 ;
10505: );
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';
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: --
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
10524: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10525: --
10526: if l_update then
10527: --
10528: l_datetrack_mode := r_LPL.datetrack_mode ;
10540: l_object_version_number := r_LPL.information265;
10541: --
10542: end if;
10543: --
10544: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10545: --
10546: IF l_update OR l_dml_operation <> 'UPDATE' THEN
10547: --UPD END
10548: -- Call Update routine for the pk_id created in prev run .
10546: IF l_update OR l_dml_operation <> 'UPDATE' THEN
10547: --UPD END
10548: -- Call Update routine for the pk_id created in prev run .
10549: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10550: hr_utility.set_location(' BEN_LER_PER_INFO_CS_LER_F UPDATE_LER_PER_INFO_CS_LER ',30);
10551: BEN_LER_PER_INFO_CS_LER_API.UPDATE_LER_PER_INFO_CS_LER(
10552: --
10553: P_VALIDATE => false
10554: ,P_EFFECTIVE_DATE => l_effective_date
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);
10773: hr_utility.set_location( 'r_ELP_unique.information2 '||r_ELP_unique.information2,10);
10774: hr_utility.set_location( 'r_ELP_unique.information3 '||r_ELP_unique.information3,10);
10775: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
10773: hr_utility.set_location( 'r_ELP_unique.information2 '||r_ELP_unique.information2,10);
10774: hr_utility.set_location( 'r_ELP_unique.information3 '||r_ELP_unique.information3,10);
10775: -- If reuse objects flag is 'Y' then check for the object in the target business group
10776: -- if found insert the record into PLSql table and exit the loop else try create the
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);
10773: hr_utility.set_location( 'r_ELP_unique.information2 '||r_ELP_unique.information2,10);
10774: hr_utility.set_location( 'r_ELP_unique.information3 '||r_ELP_unique.information3,10);
10775: -- If reuse objects flag is 'Y' then check for the object in the target business group
10776: -- if found insert the record into PLSql table and exit the loop else try create the
10777: -- object in the target business group
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);
10773: hr_utility.set_location( 'r_ELP_unique.information2 '||r_ELP_unique.information2,10);
10774: hr_utility.set_location( 'r_ELP_unique.information3 '||r_ELP_unique.information3,10);
10775: -- If reuse objects flag is 'Y' then check for the object in the target business group
10776: -- if found insert the record into PLSql table and exit the loop else try create the
10777: -- object in the target business group
10778: --
10802: --
10803: log_data('ELP',l_new_value,l_prefix || r_ELP_unique.name|| l_suffix,'REUSED');
10804: --
10805: end if ;
10806: hr_utility.set_location( 'found record for update',10);
10807: --
10808: else
10809: --
10810: l_update := false;
10881: close c_ELP ;
10882: --
10883: l_current_pk_id := r_ELP.information1;
10884: --
10885: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10886: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10887: --
10888: if l_current_pk_id = l_prev_pk_id then
10889: --
10882: --
10883: l_current_pk_id := r_ELP.information1;
10884: --
10885: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10886: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10887: --
10888: if l_current_pk_id = l_prev_pk_id then
10889: --
10890: l_first_rec := false ;
10905: end if;
10906:
10907: if l_first_rec and not l_update then
10908: -- Call Create routine.
10909: hr_utility.set_location(' BEN_ELIGY_PRFL_F CREATE_ELIGY_PROFILE ',20);
10910: BEN_ELIGY_PROFILE_API.CREATE_ELIGY_PROFILE(
10911: --
10912: P_VALIDATE => false
10913: ,P_EFFECTIVE_DATE => l_effective_date
11021: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
11022: );
11023: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11024: -- Update all relevent cer records with new pk_id
11025: hr_utility.set_location('Before plsql table ',222);
11026: hr_utility.set_location('new_value id '||l_eligy_prfl_id,222);
11027: g_pk_tbl(g_count).pk_id_column := 'ELIGY_PRFL_ID' ;
11028: g_pk_tbl(g_count).old_value := r_ELP.information1 ;
11029: g_pk_tbl(g_count).new_value := l_ELIGY_PRFL_ID ;
11022: );
11023: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11024: -- Update all relevent cer records with new pk_id
11025: hr_utility.set_location('Before plsql table ',222);
11026: hr_utility.set_location('new_value id '||l_eligy_prfl_id,222);
11027: g_pk_tbl(g_count).pk_id_column := 'ELIGY_PRFL_ID' ;
11028: g_pk_tbl(g_count).old_value := r_ELP.information1 ;
11029: g_pk_tbl(g_count).new_value := l_ELIGY_PRFL_ID ;
11030: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
11028: g_pk_tbl(g_count).old_value := r_ELP.information1 ;
11029: g_pk_tbl(g_count).new_value := l_ELIGY_PRFL_ID ;
11030: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
11031: g_pk_tbl(g_count).table_route_id := r_ELP_unique.table_route_id;
11032: hr_utility.set_location('After plsql table ',222);
11033: --
11034: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
11035: --
11036: g_count := g_count + 1 ;
11040: --
11041: else
11042: --
11043: --UPD START
11044: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11045: --
11046: if l_update then
11047: --
11048: l_datetrack_mode := r_ELP.datetrack_mode ;
11060: l_object_version_number := r_ELP.information265;
11061: --
11062: end if;
11063: --
11064: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11065: --
11066: IF l_update OR l_dml_operation <> 'UPDATE' THEN
11067: --UPD END
11068: -- Call Update routine for the pk_id created in prev run .
11066: IF l_update OR l_dml_operation <> 'UPDATE' THEN
11067: --UPD END
11068: -- Call Update routine for the pk_id created in prev run .
11069: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11070: hr_utility.set_location(' BEN_ELIGY_PRFL_F UPDATE_ELIGY_PROFILE ',30);
11071: BEN_ELIGY_PROFILE_API.UPDATE_ELIGY_PROFILE(
11072: --
11073: P_VALIDATE => false
11074: ,P_EFFECTIVE_DATE => l_effective_date
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);
11361: hr_utility.set_location( 'r_DCE_unique.information2 '||r_DCE_unique.information2,10);
11362: hr_utility.set_location( 'r_DCE_unique.information3 '||r_DCE_unique.information3,10);
11363: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
11361: hr_utility.set_location( 'r_DCE_unique.information2 '||r_DCE_unique.information2,10);
11362: hr_utility.set_location( 'r_DCE_unique.information3 '||r_DCE_unique.information3,10);
11363: -- If reuse objects flag is 'Y' then check for the object in the target business group
11364: -- if found insert the record into PLSql table and exit the loop else try create the
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);
11361: hr_utility.set_location( 'r_DCE_unique.information2 '||r_DCE_unique.information2,10);
11362: hr_utility.set_location( 'r_DCE_unique.information3 '||r_DCE_unique.information3,10);
11363: -- If reuse objects flag is 'Y' then check for the object in the target business group
11364: -- if found insert the record into PLSql table and exit the loop else try create the
11365: -- object in the target business group
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);
11361: hr_utility.set_location( 'r_DCE_unique.information2 '||r_DCE_unique.information2,10);
11362: hr_utility.set_location( 'r_DCE_unique.information3 '||r_DCE_unique.information3,10);
11363: -- If reuse objects flag is 'Y' then check for the object in the target business group
11364: -- if found insert the record into PLSql table and exit the loop else try create the
11365: -- object in the target business group
11366: --
11390: --
11391: log_data('DCE',l_new_value,l_prefix || r_DCE_unique.name|| l_suffix,'REUSED');
11392: --
11393: end if ;
11394: hr_utility.set_location( 'found record for update',10);
11395: --
11396: else
11397: --
11398: l_update := false;
11469: close c_DCE ;
11470: --
11471: l_current_pk_id := r_DCE.information1;
11472: --
11473: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11474: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11475: --
11476: if l_current_pk_id = l_prev_pk_id then
11477: --
11470: --
11471: l_current_pk_id := r_DCE.information1;
11472: --
11473: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11474: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11475: --
11476: if l_current_pk_id = l_prev_pk_id then
11477: --
11478: l_first_rec := false ;
11496: end if;
11497:
11498: if l_first_rec and not l_update then
11499: -- Call Create routine.
11500: hr_utility.set_location(' BEN_DPNT_CVG_ELIGY_PRFL_F CREATE_DPNT_CVG_ELIG_PRFL ',20);
11501: BEN_DPNT_CVG_ELIG_PRFL_API.CREATE_DPNT_CVG_ELIG_PRFL(
11502: --
11503: P_VALIDATE => false
11504: ,P_EFFECTIVE_DATE => l_effective_date
11556: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
11557: );
11558: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11559: -- Update all relevent cer records with new pk_id
11560: hr_utility.set_location('Before plsql table ',222);
11561: hr_utility.set_location('new_value id '||l_dpnt_cvg_eligy_prfl_id,222);
11562: g_pk_tbl(g_count).pk_id_column := 'DPNT_CVG_ELIGY_PRFL_ID' ;
11563: g_pk_tbl(g_count).old_value := r_DCE.information1 ;
11564: g_pk_tbl(g_count).new_value := l_DPNT_CVG_ELIGY_PRFL_ID ;
11557: );
11558: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11559: -- Update all relevent cer records with new pk_id
11560: hr_utility.set_location('Before plsql table ',222);
11561: hr_utility.set_location('new_value id '||l_dpnt_cvg_eligy_prfl_id,222);
11562: g_pk_tbl(g_count).pk_id_column := 'DPNT_CVG_ELIGY_PRFL_ID' ;
11563: g_pk_tbl(g_count).old_value := r_DCE.information1 ;
11564: g_pk_tbl(g_count).new_value := l_DPNT_CVG_ELIGY_PRFL_ID ;
11565: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
11563: g_pk_tbl(g_count).old_value := r_DCE.information1 ;
11564: g_pk_tbl(g_count).new_value := l_DPNT_CVG_ELIGY_PRFL_ID ;
11565: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
11566: g_pk_tbl(g_count).table_route_id := r_DCE_unique.table_route_id;
11567: hr_utility.set_location('After plsql table ',222);
11568: --
11569: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
11570: --
11571: g_count := g_count + 1 ;
11575: --
11576: else
11577: --
11578: --UPD START
11579: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11580: --
11581: if l_update then
11582: --
11583: l_datetrack_mode := r_DCE.datetrack_mode ;
11595: l_object_version_number := r_DCE.information265;
11596: --
11597: end if;
11598: --
11599: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11600: --
11601: IF l_update OR l_dml_operation <> 'UPDATE' THEN
11602: --UPD END
11603: -- Call Update routine for the pk_id created in prev run .
11601: IF l_update OR l_dml_operation <> 'UPDATE' THEN
11602: --UPD END
11603: -- Call Update routine for the pk_id created in prev run .
11604: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11605: hr_utility.set_location(' BEN_DPNT_CVG_ELIGY_PRFL_F UPDATE_DPNT_CVG_ELIG_PRFL ',30);
11606: BEN_DPNT_CVG_ELIG_PRFL_API.UPDATE_DPNT_CVG_ELIG_PRFL(
11607: --
11608: P_VALIDATE => false
11609: ,P_EFFECTIVE_DATE => l_effective_date
11805: end if ;
11806: -- End Prefix Sufix derivation
11807: for r_GOS_unique in c_unique_GOS('GOS') loop
11808: --
11809: hr_utility.set_location(' r_GOS_unique.table_route_id '||r_GOS_unique.table_route_id,10);
11810: hr_utility.set_location(' r_GOS_unique.information1 '||r_GOS_unique.information1,10);
11811: hr_utility.set_location( 'r_GOS_unique.information2 '||r_GOS_unique.information2,10);
11812: hr_utility.set_location( 'r_GOS_unique.information3 '||r_GOS_unique.information3,10);
11813: -- If reuse objects flag is 'Y' then check for the object in the target business group
11806: -- End Prefix Sufix derivation
11807: for r_GOS_unique in c_unique_GOS('GOS') loop
11808: --
11809: hr_utility.set_location(' r_GOS_unique.table_route_id '||r_GOS_unique.table_route_id,10);
11810: hr_utility.set_location(' r_GOS_unique.information1 '||r_GOS_unique.information1,10);
11811: hr_utility.set_location( 'r_GOS_unique.information2 '||r_GOS_unique.information2,10);
11812: hr_utility.set_location( 'r_GOS_unique.information3 '||r_GOS_unique.information3,10);
11813: -- If reuse objects flag is 'Y' then check for the object in the target business group
11814: -- if found insert the record into PLSql table and exit the loop else try create the
11807: for r_GOS_unique in c_unique_GOS('GOS') loop
11808: --
11809: hr_utility.set_location(' r_GOS_unique.table_route_id '||r_GOS_unique.table_route_id,10);
11810: hr_utility.set_location(' r_GOS_unique.information1 '||r_GOS_unique.information1,10);
11811: hr_utility.set_location( 'r_GOS_unique.information2 '||r_GOS_unique.information2,10);
11812: hr_utility.set_location( 'r_GOS_unique.information3 '||r_GOS_unique.information3,10);
11813: -- If reuse objects flag is 'Y' then check for the object in the target business group
11814: -- if found insert the record into PLSql table and exit the loop else try create the
11815: -- object in the target business group
11808: --
11809: hr_utility.set_location(' r_GOS_unique.table_route_id '||r_GOS_unique.table_route_id,10);
11810: hr_utility.set_location(' r_GOS_unique.information1 '||r_GOS_unique.information1,10);
11811: hr_utility.set_location( 'r_GOS_unique.information2 '||r_GOS_unique.information2,10);
11812: hr_utility.set_location( 'r_GOS_unique.information3 '||r_GOS_unique.information3,10);
11813: -- If reuse objects flag is 'Y' then check for the object in the target business group
11814: -- if found insert the record into PLSql table and exit the loop else try create the
11815: -- object in the target business group
11816: --
11839: --
11840: end if ;
11841: l_GD_OR_SVC_TYP_ID := r_GOS_unique.information1 ;
11842: l_object_version_number := r_GOS.information265 ;
11843: hr_utility.set_location( 'found record for update',10);
11844: --
11845: else
11846: l_min_esd := null ;
11847: l_max_eed := null ;
11887: close c_GOS ;
11888: --
11889: l_current_pk_id := r_GOS.information1;
11890: --
11891: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11892: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11893: --
11894: if l_current_pk_id = l_prev_pk_id then
11895: --
11888: --
11889: l_current_pk_id := r_GOS.information1;
11890: --
11891: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11892: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11893: --
11894: if l_current_pk_id = l_prev_pk_id then
11895: --
11896: l_first_rec := false ;
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);
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)
11951: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
11952: );
11953: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11954: -- Update all relevent cer records with new pk_id
11955: hr_utility.set_location('Before plsql table ',222);
11956: hr_utility.set_location('new_value id '||l_gd_or_svc_typ_id,222);
11957: g_pk_tbl(g_count).pk_id_column := 'GD_OR_SVC_TYP_ID' ;
11958: g_pk_tbl(g_count).old_value := r_GOS.information1 ;
11959: g_pk_tbl(g_count).new_value := l_GD_OR_SVC_TYP_ID ;
11952: );
11953: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11954: -- Update all relevent cer records with new pk_id
11955: hr_utility.set_location('Before plsql table ',222);
11956: hr_utility.set_location('new_value id '||l_gd_or_svc_typ_id,222);
11957: g_pk_tbl(g_count).pk_id_column := 'GD_OR_SVC_TYP_ID' ;
11958: g_pk_tbl(g_count).old_value := r_GOS.information1 ;
11959: g_pk_tbl(g_count).new_value := l_GD_OR_SVC_TYP_ID ;
11960: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
11958: g_pk_tbl(g_count).old_value := r_GOS.information1 ;
11959: g_pk_tbl(g_count).new_value := l_GD_OR_SVC_TYP_ID ;
11960: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
11961: g_pk_tbl(g_count).table_route_id := r_GOS_unique.table_route_id;
11962: hr_utility.set_location('After plsql table ',222);
11963: --
11964: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
11965: --
11966: g_count := g_count + 1 ;
11968: log_data('GOS',l_new_value,l_prefix || r_GOS.INFORMATION170 || l_suffix,'COPIED');
11969: --
11970: elsif l_update then
11971: --
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)
12134: end if ;
12135: -- End Prefix Sufix derivation
12136: for r_BNG_unique in c_unique_BNG('BNG') loop
12137: --
12138: hr_utility.set_location(' r_BNG_unique.table_route_id '||r_BNG_unique.table_route_id,10);
12139: hr_utility.set_location(' r_BNG_unique.information1 '||r_BNG_unique.information1,10);
12140: hr_utility.set_location( 'r_BNG_unique.information2 '||r_BNG_unique.information2,10);
12141: hr_utility.set_location( 'r_BNG_unique.information3 '||r_BNG_unique.information3,10);
12142: -- If reuse objects flag is 'Y' then check for the object in the target business group
12135: -- End Prefix Sufix derivation
12136: for r_BNG_unique in c_unique_BNG('BNG') loop
12137: --
12138: hr_utility.set_location(' r_BNG_unique.table_route_id '||r_BNG_unique.table_route_id,10);
12139: hr_utility.set_location(' r_BNG_unique.information1 '||r_BNG_unique.information1,10);
12140: hr_utility.set_location( 'r_BNG_unique.information2 '||r_BNG_unique.information2,10);
12141: hr_utility.set_location( 'r_BNG_unique.information3 '||r_BNG_unique.information3,10);
12142: -- If reuse objects flag is 'Y' then check for the object in the target business group
12143: -- if found insert the record into PLSql table and exit the loop else try create the
12136: for r_BNG_unique in c_unique_BNG('BNG') loop
12137: --
12138: hr_utility.set_location(' r_BNG_unique.table_route_id '||r_BNG_unique.table_route_id,10);
12139: hr_utility.set_location(' r_BNG_unique.information1 '||r_BNG_unique.information1,10);
12140: hr_utility.set_location( 'r_BNG_unique.information2 '||r_BNG_unique.information2,10);
12141: hr_utility.set_location( 'r_BNG_unique.information3 '||r_BNG_unique.information3,10);
12142: -- If reuse objects flag is 'Y' then check for the object in the target business group
12143: -- if found insert the record into PLSql table and exit the loop else try create the
12144: -- object in the target business group
12137: --
12138: hr_utility.set_location(' r_BNG_unique.table_route_id '||r_BNG_unique.table_route_id,10);
12139: hr_utility.set_location(' r_BNG_unique.information1 '||r_BNG_unique.information1,10);
12140: hr_utility.set_location( 'r_BNG_unique.information2 '||r_BNG_unique.information2,10);
12141: hr_utility.set_location( 'r_BNG_unique.information3 '||r_BNG_unique.information3,10);
12142: -- If reuse objects flag is 'Y' then check for the object in the target business group
12143: -- if found insert the record into PLSql table and exit the loop else try create the
12144: -- object in the target business group
12145: --
12167: --
12168: end if ;
12169: l_BENFTS_GRP_ID := r_BNG_unique.information1 ;
12170: l_object_version_number := r_BNG.information265 ;
12171: hr_utility.set_location( 'found record for update',10);
12172: --
12173: else
12174: l_min_esd := null ;
12175: l_max_eed := null ;
12212: close c_BNG ;
12213: --
12214: l_current_pk_id := r_BNG.information1;
12215: --
12216: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12217: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12218: --
12219: if l_current_pk_id = l_prev_pk_id then
12220: --
12213: --
12214: l_current_pk_id := r_BNG.information1;
12215: --
12216: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12217: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12218: --
12219: if l_current_pk_id = l_prev_pk_id then
12220: --
12221: l_first_rec := false ;
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);
12234: BEN_BENEFITS_GROUP_API.CREATE_BENEFITS_GROUP(
12235: --
12236: P_VALIDATE => false
12237: -- ,P_EFFECTIVE_DATE => p_effective_date
12275: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
12276: );
12277: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12278: -- Update all relevent cer records with new pk_id
12279: hr_utility.set_location('Before plsql table ',222);
12280: hr_utility.set_location('new_value id '||l_benfts_grp_id,222);
12281: g_pk_tbl(g_count).pk_id_column := 'BENFTS_GRP_ID' ;
12282: g_pk_tbl(g_count).old_value := r_BNG.information1 ;
12283: g_pk_tbl(g_count).new_value := l_BENFTS_GRP_ID ;
12276: );
12277: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12278: -- Update all relevent cer records with new pk_id
12279: hr_utility.set_location('Before plsql table ',222);
12280: hr_utility.set_location('new_value id '||l_benfts_grp_id,222);
12281: g_pk_tbl(g_count).pk_id_column := 'BENFTS_GRP_ID' ;
12282: g_pk_tbl(g_count).old_value := r_BNG.information1 ;
12283: g_pk_tbl(g_count).new_value := l_BENFTS_GRP_ID ;
12284: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
12282: g_pk_tbl(g_count).old_value := r_BNG.information1 ;
12283: g_pk_tbl(g_count).new_value := l_BENFTS_GRP_ID ;
12284: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
12285: g_pk_tbl(g_count).table_route_id := r_BNG_unique.table_route_id;
12286: hr_utility.set_location('After plsql table ',222);
12287: --
12288: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
12289: --
12290: g_count := g_count + 1 ;
12292: log_data('BNG',l_new_value,l_prefix || r_BNG.INFORMATION170 || l_suffix,'COPIED');
12293: --
12294: elsif l_update then
12295:
12296: hr_utility.set_location(' BEN_BENFTS_GRP UPDATE_BENEFITS_GROUP ',20);
12297: BEN_BENEFITS_GROUP_API.UPDATE_BENEFITS_GROUP(
12298: --
12299: P_VALIDATE => false
12300: -- ,P_EFFECTIVE_DATE => p_effective_date
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);
12533: hr_utility.set_location(' r_PSL_unique.information1 '||r_PSL_unique.information1,10);
12534: hr_utility.set_location( 'r_PSL_unique.information2 '||r_PSL_unique.information2,10);
12535: hr_utility.set_location( 'r_PSL_unique.information3 '||r_PSL_unique.information3,10);
12536: -- If reuse objects flag is 'Y' then check for the object in the target business group
12529: ) then
12530:
12531: --
12532: hr_utility.set_location(' r_PSL_unique.table_route_id '||r_PSL_unique.table_route_id,10);
12533: hr_utility.set_location(' r_PSL_unique.information1 '||r_PSL_unique.information1,10);
12534: hr_utility.set_location( 'r_PSL_unique.information2 '||r_PSL_unique.information2,10);
12535: hr_utility.set_location( 'r_PSL_unique.information3 '||r_PSL_unique.information3,10);
12536: -- If reuse objects flag is 'Y' then check for the object in the target business group
12537: -- if found insert the record into PLSql table and exit the loop else try create the
12530:
12531: --
12532: hr_utility.set_location(' r_PSL_unique.table_route_id '||r_PSL_unique.table_route_id,10);
12533: hr_utility.set_location(' r_PSL_unique.information1 '||r_PSL_unique.information1,10);
12534: hr_utility.set_location( 'r_PSL_unique.information2 '||r_PSL_unique.information2,10);
12535: hr_utility.set_location( 'r_PSL_unique.information3 '||r_PSL_unique.information3,10);
12536: -- If reuse objects flag is 'Y' then check for the object in the target business group
12537: -- if found insert the record into PLSql table and exit the loop else try create the
12538: -- object in the target business group
12531: --
12532: hr_utility.set_location(' r_PSL_unique.table_route_id '||r_PSL_unique.table_route_id,10);
12533: hr_utility.set_location(' r_PSL_unique.information1 '||r_PSL_unique.information1,10);
12534: hr_utility.set_location( 'r_PSL_unique.information2 '||r_PSL_unique.information2,10);
12535: hr_utility.set_location( 'r_PSL_unique.information3 '||r_PSL_unique.information3,10);
12536: -- If reuse objects flag is 'Y' then check for the object in the target business group
12537: -- if found insert the record into PLSql table and exit the loop else try create the
12538: -- object in the target business group
12539: --
12625: --
12626: log_data('PSL',l_new_value,l_prefix || r_PSL_unique.name|| l_suffix,'REUSED');
12627: --
12628: end if ;
12629: hr_utility.set_location( 'found record for update',10);
12630: --
12631: else
12632: --
12633: l_update := false;
12686: if not l_object_found_in_target or l_update then
12687: --
12688: l_current_pk_id := r_PSL.information1;
12689: --
12690: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12691: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12692: --
12693: if l_current_pk_id = l_prev_pk_id then
12694: --
12687: --
12688: l_current_pk_id := r_PSL.information1;
12689: --
12690: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12691: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12692: --
12693: if l_current_pk_id = l_prev_pk_id then
12694: --
12695: l_first_rec := false ;
12712: end if;
12713:
12714: if l_first_rec and not l_update then
12715: -- Call Create routine.
12716: hr_utility.set_location(' BEN_PER_INFO_CHG_CS_LER_F CREATE_PERSON_CHANGE_CS_LER ',20);
12717: BEN_PERSON_CHANGE_CS_LER_API.CREATE_PERSON_CHANGE_CS_LER(
12718: --
12719: P_VALIDATE => false
12720: ,P_EFFECTIVE_DATE => l_effective_date
12770: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
12771: );
12772: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12773: -- Update all relevent cer records with new pk_id
12774: hr_utility.set_location('Before plsql table ',222);
12775: hr_utility.set_location('new_value id '||l_per_info_chg_cs_ler_id,222);
12776: g_pk_tbl(g_count).pk_id_column := 'PER_INFO_CHG_CS_LER_ID' ;
12777: g_pk_tbl(g_count).old_value := r_PSL.information1 ;
12778: g_pk_tbl(g_count).new_value := l_PER_INFO_CHG_CS_LER_ID ;
12771: );
12772: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12773: -- Update all relevent cer records with new pk_id
12774: hr_utility.set_location('Before plsql table ',222);
12775: hr_utility.set_location('new_value id '||l_per_info_chg_cs_ler_id,222);
12776: g_pk_tbl(g_count).pk_id_column := 'PER_INFO_CHG_CS_LER_ID' ;
12777: g_pk_tbl(g_count).old_value := r_PSL.information1 ;
12778: g_pk_tbl(g_count).new_value := l_PER_INFO_CHG_CS_LER_ID ;
12779: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
12777: g_pk_tbl(g_count).old_value := r_PSL.information1 ;
12778: g_pk_tbl(g_count).new_value := l_PER_INFO_CHG_CS_LER_ID ;
12779: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
12780: g_pk_tbl(g_count).table_route_id := r_PSL_unique.table_route_id;
12781: hr_utility.set_location('After plsql table ',222);
12782: --
12783: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
12784: --
12785: g_count := g_count + 1 ;
12787: log_data('PSL',l_new_value,l_prefix || r_PSL.INFORMATION218 || l_suffix,'COPIED');
12788: else
12789: --
12790: --UPD START
12791: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12792: --
12793: if l_update then
12794: --
12795: l_datetrack_mode := r_PSL.datetrack_mode ;
12807: l_object_version_number := r_PSL.information265;
12808: --
12809: end if;
12810: --
12811: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12812: --
12813: IF l_update OR l_dml_operation <> 'UPDATE' THEN
12814: --UPD END
12815: -- Call Update routine for the pk_id created in prev run .
12813: IF l_update OR l_dml_operation <> 'UPDATE' THEN
12814: --UPD END
12815: -- Call Update routine for the pk_id created in prev run .
12816: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12817: hr_utility.set_location(' BEN_PER_INFO_CHG_CS_LER_F UPDATE_PERSON_CHANGE_CS_LER ',30);
12818: BEN_PERSON_CHANGE_CS_LER_API.UPDATE_PERSON_CHANGE_CS_LER(
12819: --
12820: P_VALIDATE => false
12821: ,P_EFFECTIVE_DATE => l_effective_date
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);
13053: hr_utility.set_location( 'r_CCT_unique.information2 '||r_CCT_unique.information2,10);
13054: hr_utility.set_location( 'r_CCT_unique.information3 '||r_CCT_unique.information3,10);
13055: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
13053: hr_utility.set_location( 'r_CCT_unique.information2 '||r_CCT_unique.information2,10);
13054: hr_utility.set_location( 'r_CCT_unique.information3 '||r_CCT_unique.information3,10);
13055: -- If reuse objects flag is 'Y' then check for the object in the target business group
13056: -- if found insert the record into PLSql table and exit the loop else try create the
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);
13053: hr_utility.set_location( 'r_CCT_unique.information2 '||r_CCT_unique.information2,10);
13054: hr_utility.set_location( 'r_CCT_unique.information3 '||r_CCT_unique.information3,10);
13055: -- If reuse objects flag is 'Y' then check for the object in the target business group
13056: -- if found insert the record into PLSql table and exit the loop else try create the
13057: -- object in the target business group
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);
13053: hr_utility.set_location( 'r_CCT_unique.information2 '||r_CCT_unique.information2,10);
13054: hr_utility.set_location( 'r_CCT_unique.information3 '||r_CCT_unique.information3,10);
13055: -- If reuse objects flag is 'Y' then check for the object in the target business group
13056: -- if found insert the record into PLSql table and exit the loop else try create the
13057: -- object in the target business group
13058: --
13082: --
13083: log_data('CCT',l_new_value,l_prefix || r_CCT_unique.name|| l_suffix,'REUSED');
13084: --
13085: end if ;
13086: hr_utility.set_location( 'found record for update',10);
13087: --
13088: else
13089: --
13090: l_update := false;
13157: close c_CCT ;
13158: --
13159: l_current_pk_id := r_CCT.information1;
13160: --
13161: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13162: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13163: --
13164: if l_current_pk_id = l_prev_pk_id then
13165: --
13158: --
13159: l_current_pk_id := r_CCT.information1;
13160: --
13161: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13162: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13163: --
13164: if l_current_pk_id = l_prev_pk_id then
13165: --
13166: l_first_rec := false ;
13186: end if;
13187:
13188: if l_first_rec and not l_update then
13189: -- Call Create routine.
13190: hr_utility.set_location(' BEN_CM_TYP_F CREATE_COMP_COMM_TYPES ',20);
13191: BEN_COMP_COMM_TYPES_API.CREATE_COMP_COMM_TYPES(
13192: --
13193: P_VALIDATE => false
13194: ,P_EFFECTIVE_DATE => l_effective_date
13247: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
13248: );
13249: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13250: -- Update all relevent cer records with new pk_id
13251: hr_utility.set_location('Before plsql table ',222);
13252: hr_utility.set_location('new_value id '||l_cm_typ_id,222);
13253: g_pk_tbl(g_count).pk_id_column := 'CM_TYP_ID' ;
13254: g_pk_tbl(g_count).old_value := r_CCT.information1 ;
13255: g_pk_tbl(g_count).new_value := l_CM_TYP_ID ;
13248: );
13249: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13250: -- Update all relevent cer records with new pk_id
13251: hr_utility.set_location('Before plsql table ',222);
13252: hr_utility.set_location('new_value id '||l_cm_typ_id,222);
13253: g_pk_tbl(g_count).pk_id_column := 'CM_TYP_ID' ;
13254: g_pk_tbl(g_count).old_value := r_CCT.information1 ;
13255: g_pk_tbl(g_count).new_value := l_CM_TYP_ID ;
13256: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
13254: g_pk_tbl(g_count).old_value := r_CCT.information1 ;
13255: g_pk_tbl(g_count).new_value := l_CM_TYP_ID ;
13256: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
13257: g_pk_tbl(g_count).table_route_id := r_CCT_unique.table_route_id;
13258: hr_utility.set_location('After plsql table ',222);
13259: --
13260: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
13261: --
13262: g_count := g_count + 1 ;
13263: --
13264: else
13265: --
13266: --UPD START
13267: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13268: --
13269: if l_update then
13270: --
13271: l_datetrack_mode := r_CCT.datetrack_mode ;
13283: l_object_version_number := r_CCT.information265;
13284: --
13285: end if;
13286: --
13287: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13288: --
13289: IF l_update OR l_dml_operation <> 'UPDATE' THEN
13290: --UPD END
13291: -- Call Update routine for the pk_id created in prev run .
13289: IF l_update OR l_dml_operation <> 'UPDATE' THEN
13290: --UPD END
13291: -- Call Update routine for the pk_id created in prev run .
13292: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13293: hr_utility.set_location(' BEN_CM_TYP_F UPDATE_COMP_COMM_TYPES ',30);
13294: BEN_COMP_COMM_TYPES_API.UPDATE_COMP_COMM_TYPES(
13295: --
13296: P_VALIDATE => false
13297: ,P_EFFECTIVE_DATE => l_effective_date
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);
13531: hr_utility.set_location( 'r_PDL_unique.information2 '||r_PDL_unique.information2,10);
13532: hr_utility.set_location( 'r_PDL_unique.information3 '||r_PDL_unique.information3,10);
13533: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
13531: hr_utility.set_location( 'r_PDL_unique.information2 '||r_PDL_unique.information2,10);
13532: hr_utility.set_location( 'r_PDL_unique.information3 '||r_PDL_unique.information3,10);
13533: -- If reuse objects flag is 'Y' then check for the object in the target business group
13534: -- if found insert the record into PLSql table and exit the loop else try create the
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);
13531: hr_utility.set_location( 'r_PDL_unique.information2 '||r_PDL_unique.information2,10);
13532: hr_utility.set_location( 'r_PDL_unique.information3 '||r_PDL_unique.information3,10);
13533: -- If reuse objects flag is 'Y' then check for the object in the target business group
13534: -- if found insert the record into PLSql table and exit the loop else try create the
13535: -- object in the target business group
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);
13531: hr_utility.set_location( 'r_PDL_unique.information2 '||r_PDL_unique.information2,10);
13532: hr_utility.set_location( 'r_PDL_unique.information3 '||r_PDL_unique.information3,10);
13533: -- If reuse objects flag is 'Y' then check for the object in the target business group
13534: -- if found insert the record into PLSql table and exit the loop else try create the
13535: -- object in the target business group
13536: --
13560: --
13561: log_data('PDL',l_new_value,l_prefix || r_PDL_unique.name|| l_suffix,'REUSED');
13562: --
13563: end if ;
13564: hr_utility.set_location( 'found record for update',10);
13565: --
13566: else
13567: --
13568: l_update := false;
13639: close c_PDL ;
13640: --
13641: l_current_pk_id := r_PDL.information1;
13642: --
13643: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13644: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13645: --
13646: if l_current_pk_id = l_prev_pk_id then
13647: --
13640: --
13641: l_current_pk_id := r_PDL.information1;
13642: --
13643: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13644: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13645: --
13646: if l_current_pk_id = l_prev_pk_id then
13647: --
13648: l_first_rec := false ;
13667: end if;
13668:
13669: if l_first_rec and not l_update then
13670: -- Call Create routine.
13671: hr_utility.set_location(' BEN_PTD_LMT_F CREATE_PERIOD_LIMIT ',20);
13672: BEN_PERIOD_LIMIT_API.CREATE_PERIOD_LIMIT(
13673: --
13674: P_VALIDATE => false
13675: ,P_EFFECTIVE_DATE => l_effective_date
13721: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
13722: );
13723: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13724: -- Update all relevent cer records with new pk_id
13725: hr_utility.set_location('Before plsql table ',222);
13726: hr_utility.set_location('new_value id '||l_ptd_lmt_id,222);
13727: g_pk_tbl(g_count).pk_id_column := 'PTD_LMT_ID' ;
13728: g_pk_tbl(g_count).old_value := r_PDL.information1 ;
13729: g_pk_tbl(g_count).new_value := l_PTD_LMT_ID ;
13722: );
13723: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13724: -- Update all relevent cer records with new pk_id
13725: hr_utility.set_location('Before plsql table ',222);
13726: hr_utility.set_location('new_value id '||l_ptd_lmt_id,222);
13727: g_pk_tbl(g_count).pk_id_column := 'PTD_LMT_ID' ;
13728: g_pk_tbl(g_count).old_value := r_PDL.information1 ;
13729: g_pk_tbl(g_count).new_value := l_PTD_LMT_ID ;
13730: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
13728: g_pk_tbl(g_count).old_value := r_PDL.information1 ;
13729: g_pk_tbl(g_count).new_value := l_PTD_LMT_ID ;
13730: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
13731: g_pk_tbl(g_count).table_route_id := r_PDL_unique.table_route_id;
13732: hr_utility.set_location('After plsql table ',222);
13733: --
13734: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
13735: --
13736: g_count := g_count + 1 ;
13739: --
13740: else
13741: --
13742: --UPD START
13743: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13744: --
13745: if l_update then
13746: --
13747: l_datetrack_mode := r_PDL.datetrack_mode ;
13759: l_object_version_number := r_PDL.information265;
13760: --
13761: end if;
13762: --
13763: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13764: --
13765: IF l_update OR l_dml_operation <> 'UPDATE' THEN
13766: --UPD END
13767: -- Call Update routine for the pk_id created in prev run .
13765: IF l_update OR l_dml_operation <> 'UPDATE' THEN
13766: --UPD END
13767: -- Call Update routine for the pk_id created in prev run .
13768: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13769: hr_utility.set_location(' BEN_PTD_LMT_F UPDATE_PERIOD_LIMIT ',30);
13770: BEN_PERIOD_LIMIT_API.UPDATE_PERIOD_LIMIT(
13771: --
13772: P_VALIDATE => false
13773: ,P_EFFECTIVE_DATE => l_effective_date
13963: end if ;
13964: -- End Prefix Sufix derivation
13965: for r_YRP_unique in c_unique_YRP('YRP') loop
13966: --
13967: hr_utility.set_location(' r_YRP_unique.table_route_id '||r_YRP_unique.table_route_id,10);
13968: hr_utility.set_location(' r_YRP_unique.information1 '||r_YRP_unique.information1,10);
13969: hr_utility.set_location( 'r_YRP_unique.information2 '||r_YRP_unique.information2,10);
13970: hr_utility.set_location( 'r_YRP_unique.information3 '||r_YRP_unique.information3,10);
13971: -- If reuse objects flag is 'Y' then check for the object in the target business group
13964: -- End Prefix Sufix derivation
13965: for r_YRP_unique in c_unique_YRP('YRP') loop
13966: --
13967: hr_utility.set_location(' r_YRP_unique.table_route_id '||r_YRP_unique.table_route_id,10);
13968: hr_utility.set_location(' r_YRP_unique.information1 '||r_YRP_unique.information1,10);
13969: hr_utility.set_location( 'r_YRP_unique.information2 '||r_YRP_unique.information2,10);
13970: hr_utility.set_location( 'r_YRP_unique.information3 '||r_YRP_unique.information3,10);
13971: -- If reuse objects flag is 'Y' then check for the object in the target business group
13972: -- if found insert the record into PLSql table and exit the loop else try create the
13965: for r_YRP_unique in c_unique_YRP('YRP') loop
13966: --
13967: hr_utility.set_location(' r_YRP_unique.table_route_id '||r_YRP_unique.table_route_id,10);
13968: hr_utility.set_location(' r_YRP_unique.information1 '||r_YRP_unique.information1,10);
13969: hr_utility.set_location( 'r_YRP_unique.information2 '||r_YRP_unique.information2,10);
13970: hr_utility.set_location( 'r_YRP_unique.information3 '||r_YRP_unique.information3,10);
13971: -- If reuse objects flag is 'Y' then check for the object in the target business group
13972: -- if found insert the record into PLSql table and exit the loop else try create the
13973: -- object in the target business group
13966: --
13967: hr_utility.set_location(' r_YRP_unique.table_route_id '||r_YRP_unique.table_route_id,10);
13968: hr_utility.set_location(' r_YRP_unique.information1 '||r_YRP_unique.information1,10);
13969: hr_utility.set_location( 'r_YRP_unique.information2 '||r_YRP_unique.information2,10);
13970: hr_utility.set_location( 'r_YRP_unique.information3 '||r_YRP_unique.information3,10);
13971: -- If reuse objects flag is 'Y' then check for the object in the target business group
13972: -- if found insert the record into PLSql table and exit the loop else try create the
13973: -- object in the target business group
13974: --
14005: --
14006: end if ;
14007: l_YR_PERD_ID := r_YRP_unique.information1 ;
14008: l_object_version_number := r_YRP.information265 ;
14009: hr_utility.set_location( 'found record for update',10);
14010: --
14011: else
14012: l_min_esd := null ;
14013: l_max_eed := null ;
14053: if not l_object_found_in_target or l_update then
14054: --
14055: l_current_pk_id := r_YRP.information1;
14056: --
14057: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14058: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14059: --
14060: if l_current_pk_id = l_prev_pk_id then
14061: --
14054: --
14055: l_current_pk_id := r_YRP.information1;
14056: --
14057: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14058: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14059: --
14060: if l_current_pk_id = l_prev_pk_id then
14061: --
14062: l_first_rec := false ;
14068: end if ;
14069: --
14070: if l_first_rec and not l_update then
14071: -- 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)
14119: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
14120: );
14121: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14122: -- Update all relevent cer records with new pk_id
14123: hr_utility.set_location('Before plsql table ',222);
14124: hr_utility.set_location('new_value id '||l_yr_perd_id,222);
14125: g_pk_tbl(g_count).pk_id_column := 'YR_PERD_ID' ;
14126: g_pk_tbl(g_count).old_value := r_YRP.information1 ;
14127: g_pk_tbl(g_count).new_value := l_YR_PERD_ID ;
14120: );
14121: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14122: -- Update all relevent cer records with new pk_id
14123: hr_utility.set_location('Before plsql table ',222);
14124: hr_utility.set_location('new_value id '||l_yr_perd_id,222);
14125: g_pk_tbl(g_count).pk_id_column := 'YR_PERD_ID' ;
14126: g_pk_tbl(g_count).old_value := r_YRP.information1 ;
14127: g_pk_tbl(g_count).new_value := l_YR_PERD_ID ;
14128: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
14126: g_pk_tbl(g_count).old_value := r_YRP.information1 ;
14127: g_pk_tbl(g_count).new_value := l_YR_PERD_ID ;
14128: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
14129: g_pk_tbl(g_count).table_route_id := r_YRP_unique.table_route_id;
14130: hr_utility.set_location('After plsql table ',222);
14131: --
14132: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
14133: --
14134: g_count := g_count + 1 ;
14134: g_count := g_count + 1 ;
14135: --
14136: elsif l_update then
14137:
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)
14307: end if ;
14308: -- End Prefix Sufix derivation
14309: for r_WYP_unique in c_unique_WYP('WYP') loop
14310: --
14311: hr_utility.set_location(' r_WYP_unique.table_route_id '||r_WYP_unique.table_route_id,10);
14312: hr_utility.set_location(' r_WYP_unique.information1 '||r_WYP_unique.information1,10);
14313: hr_utility.set_location( 'r_WYP_unique.information2 '||r_WYP_unique.information2,10);
14314: hr_utility.set_location( 'r_WYP_unique.information3 '||r_WYP_unique.information3,10);
14315: -- If reuse objects flag is 'Y' then check for the object in the target business group
14308: -- End Prefix Sufix derivation
14309: for r_WYP_unique in c_unique_WYP('WYP') loop
14310: --
14311: hr_utility.set_location(' r_WYP_unique.table_route_id '||r_WYP_unique.table_route_id,10);
14312: hr_utility.set_location(' r_WYP_unique.information1 '||r_WYP_unique.information1,10);
14313: hr_utility.set_location( 'r_WYP_unique.information2 '||r_WYP_unique.information2,10);
14314: hr_utility.set_location( 'r_WYP_unique.information3 '||r_WYP_unique.information3,10);
14315: -- If reuse objects flag is 'Y' then check for the object in the target business group
14316: -- if found insert the record into PLSql table and exit the loop else try create the
14309: for r_WYP_unique in c_unique_WYP('WYP') loop
14310: --
14311: hr_utility.set_location(' r_WYP_unique.table_route_id '||r_WYP_unique.table_route_id,10);
14312: hr_utility.set_location(' r_WYP_unique.information1 '||r_WYP_unique.information1,10);
14313: hr_utility.set_location( 'r_WYP_unique.information2 '||r_WYP_unique.information2,10);
14314: hr_utility.set_location( 'r_WYP_unique.information3 '||r_WYP_unique.information3,10);
14315: -- If reuse objects flag is 'Y' then check for the object in the target business group
14316: -- if found insert the record into PLSql table and exit the loop else try create the
14317: -- object in the target business group
14310: --
14311: hr_utility.set_location(' r_WYP_unique.table_route_id '||r_WYP_unique.table_route_id,10);
14312: hr_utility.set_location(' r_WYP_unique.information1 '||r_WYP_unique.information1,10);
14313: hr_utility.set_location( 'r_WYP_unique.information2 '||r_WYP_unique.information2,10);
14314: hr_utility.set_location( 'r_WYP_unique.information3 '||r_WYP_unique.information3,10);
14315: -- If reuse objects flag is 'Y' then check for the object in the target business group
14316: -- if found insert the record into PLSql table and exit the loop else try create the
14317: -- object in the target business group
14318: --
14352: --
14353: end if ;
14354: l_WTHN_YR_PERD_ID := r_WYP_unique.information1 ;
14355: l_object_version_number := r_WYP.information265 ;
14356: hr_utility.set_location( 'found record for update',10);
14357: --
14358: else
14359:
14360: -- IK This needs to be uncommented if the YRP is changed.
14387: end if;
14388: if not l_object_found_in_target or l_update then
14389: l_current_pk_id := r_WYP.information1;
14390: --
14391: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14392: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14393: --
14394: if l_current_pk_id = l_prev_pk_id then
14395: --
14388: if not l_object_found_in_target or l_update then
14389: l_current_pk_id := r_WYP.information1;
14390: --
14391: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14392: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14393: --
14394: if l_current_pk_id = l_prev_pk_id then
14395: --
14396: l_first_rec := false ;
14402: end if ;
14403: --
14404: if l_first_rec and not l_update then
14405: -- Call Create routine.
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)
14452: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
14453: );
14454: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14455: -- Update all relevent cer records with new pk_id
14456: hr_utility.set_location('Before plsql table ',222);
14457: hr_utility.set_location('new_value id '||l_wthn_yr_perd_id,222);
14458: g_pk_tbl(g_count).pk_id_column := 'WTHN_YR_PERD_ID' ;
14459: g_pk_tbl(g_count).old_value := r_WYP.information1 ;
14460: g_pk_tbl(g_count).new_value := l_WTHN_YR_PERD_ID ;
14453: );
14454: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14455: -- Update all relevent cer records with new pk_id
14456: hr_utility.set_location('Before plsql table ',222);
14457: hr_utility.set_location('new_value id '||l_wthn_yr_perd_id,222);
14458: g_pk_tbl(g_count).pk_id_column := 'WTHN_YR_PERD_ID' ;
14459: g_pk_tbl(g_count).old_value := r_WYP.information1 ;
14460: g_pk_tbl(g_count).new_value := l_WTHN_YR_PERD_ID ;
14461: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
14459: g_pk_tbl(g_count).old_value := r_WYP.information1 ;
14460: g_pk_tbl(g_count).new_value := l_WTHN_YR_PERD_ID ;
14461: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
14462: g_pk_tbl(g_count).table_route_id := r_WYP_unique.table_route_id;
14463: hr_utility.set_location('After plsql table ',222);
14464: --
14465: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
14466: --
14467: g_count := g_count + 1 ;
14467: g_count := g_count + 1 ;
14468: --
14469: elsif l_update then
14470:
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)
14735: l_prefix := null ;
14736: l_suffix := null ;
14737: end if ;
14738: --
14739: hr_utility.set_location(' r_PLN_unique.table_route_id '||r_PLN_unique.table_route_id,10);
14740: hr_utility.set_location(' r_PLN_unique.information1 '||r_PLN_unique.information1,10);
14741: hr_utility.set_location( 'r_PLN_unique.information2 '||r_PLN_unique.information2,10);
14742: hr_utility.set_location( 'r_PLN_unique.information3 '||r_PLN_unique.information3,10);
14743: -- If reuse objects flag is 'Y' then check for the object in the target business group
14736: l_suffix := null ;
14737: end if ;
14738: --
14739: hr_utility.set_location(' r_PLN_unique.table_route_id '||r_PLN_unique.table_route_id,10);
14740: hr_utility.set_location(' r_PLN_unique.information1 '||r_PLN_unique.information1,10);
14741: hr_utility.set_location( 'r_PLN_unique.information2 '||r_PLN_unique.information2,10);
14742: hr_utility.set_location( 'r_PLN_unique.information3 '||r_PLN_unique.information3,10);
14743: -- If reuse objects flag is 'Y' then check for the object in the target business group
14744: -- if found insert the record into PLSql table and exit the loop else try create the
14737: end if ;
14738: --
14739: hr_utility.set_location(' r_PLN_unique.table_route_id '||r_PLN_unique.table_route_id,10);
14740: hr_utility.set_location(' r_PLN_unique.information1 '||r_PLN_unique.information1,10);
14741: hr_utility.set_location( 'r_PLN_unique.information2 '||r_PLN_unique.information2,10);
14742: hr_utility.set_location( 'r_PLN_unique.information3 '||r_PLN_unique.information3,10);
14743: -- If reuse objects flag is 'Y' then check for the object in the target business group
14744: -- if found insert the record into PLSql table and exit the loop else try create the
14745: -- object in the target business group
14738: --
14739: hr_utility.set_location(' r_PLN_unique.table_route_id '||r_PLN_unique.table_route_id,10);
14740: hr_utility.set_location(' r_PLN_unique.information1 '||r_PLN_unique.information1,10);
14741: hr_utility.set_location( 'r_PLN_unique.information2 '||r_PLN_unique.information2,10);
14742: hr_utility.set_location( 'r_PLN_unique.information3 '||r_PLN_unique.information3,10);
14743: -- If reuse objects flag is 'Y' then check for the object in the target business group
14744: -- if found insert the record into PLSql table and exit the loop else try create the
14745: -- object in the target business group
14746: --
14769: --
14770: log_data('PLN',l_new_value,l_prefix || r_PLN_unique.name|| l_suffix,'REUSED');
14771: --
14772: end if ;
14773: hr_utility.set_location( 'found record for update',10);
14774: --
14775: else
14776: --
14777: l_update := false;
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);
14794: hr_utility.set_location( 'r_PLN_unique.information8 = ' || r_PLN_unique.information8, 10);
14795: ---
14796: --Bug 4367899 fix -- reverting fix 4367899 not to get into fp.
14797: -- fix for 4367899 will be delivered later
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);
14794: hr_utility.set_location( 'r_PLN_unique.information8 = ' || r_PLN_unique.information8, 10);
14795: ---
14796: --Bug 4367899 fix -- reverting fix 4367899 not to get into fp.
14797: -- fix for 4367899 will be delivered later
14798: -- if p_reuse_object_flag = 'Y' and nvl(r_PLN_unique.information8, 'XYZ') <> 'PLNIP' then
14797: -- fix for 4367899 will be delivered later
14798: -- if p_reuse_object_flag = 'Y' and nvl(r_PLN_unique.information8, 'XYZ') <> 'PLNIP' then
14799: if p_reuse_object_flag = 'Y' then
14800: if c_PLN_min_max_dates%found then
14801: hr_utility.set_location( '-- cursor to find the object', 10);
14802: hr_utility.set_location( l_prefix || r_PLN_unique.name || l_suffix, 10);
14803: open c_find_PLN_in_target( l_prefix || r_PLN_unique.name || l_suffix ,l_min_esd,l_max_eed,
14804: p_target_business_group_id, nvl(l_pl_id, -999) ) ;
14805: fetch c_find_PLN_in_target into l_new_value ;
14798: -- if p_reuse_object_flag = 'Y' and nvl(r_PLN_unique.information8, 'XYZ') <> 'PLNIP' then
14799: if p_reuse_object_flag = 'Y' then
14800: if c_PLN_min_max_dates%found then
14801: hr_utility.set_location( '-- cursor to find the object', 10);
14802: hr_utility.set_location( l_prefix || r_PLN_unique.name || l_suffix, 10);
14803: open c_find_PLN_in_target( l_prefix || r_PLN_unique.name || l_suffix ,l_min_esd,l_max_eed,
14804: p_target_business_group_id, nvl(l_pl_id, -999) ) ;
14805: fetch c_find_PLN_in_target into l_new_value ;
14806: if c_find_PLN_in_target%found then
14813: p_from_date => l_min_esd,
14814: p_to_date => l_max_eed );
14815: if l_dt_rec_found THEN
14816: --END TEMPIK
14817: hr_utility.set_location( '-- found the object', 10);
14818: if r_PLN_unique.information1 <> nvl(g_pk_tbl(g_count-1).old_value, -999) or
14819: nvl(g_pk_tbl(g_count-1).pk_id_column, '999') <> 'PL_ID' then
14820: g_pk_tbl(g_count).pk_id_column := 'PL_ID' ;
14821: g_pk_tbl(g_count).old_value := r_PLN_unique.information1 ;
14861: end if;
14862: --
14863: l_current_pk_id := r_PLN.information1;
14864: --
14865: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14866: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14867: --
14868: if l_current_pk_id = l_prev_pk_id then
14869: --
14862: --
14863: l_current_pk_id := r_PLN.information1;
14864: --
14865: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14866: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14867: --
14868: if l_current_pk_id = l_prev_pk_id then
14869: --
14870: l_first_rec := false ;
14893: end if ;
14894: end if;
14895: --
14896: /*
14897: hr_utility.set_location(' l_group_pl_id '||l_group_pl_id,20);
14898: --
14899: -- If group plan and actual plans are created in one flow then resolve the
14900: -- group plan.
14901: --
14902: if l_group_pl_id is null then
14903: l_group_pl_id := get_fk('PL_ID', r_PLN.INFORMATION160,l_dml_operation);
14904: end if;
14905: */
14906: hr_utility.set_location(' l_group_pl_id '||l_group_pl_id,30);
14907: --
14908: --
14909: -- End Mapping for CWB group Plan
14910: --
14999: l_SUSP_IF_BNF_ADR_NT_PRV_CD := r_PLN.INFORMATION106;
15000: end if;
15001: if l_first_rec and not l_update then
15002: -- Call Create routine.
15003: hr_utility.set_location(' BEN_PL_F CREATE_PLAN ',20);
15004: BEN_PLAN_API.CREATE_PLAN(
15005: --
15006: P_VALIDATE => false
15007: ,P_EFFECTIVE_DATE => l_effective_date
15202: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
15203: );
15204: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15205: -- Update all relevent cer records with new pk_id
15206: hr_utility.set_location('Before plsql table ',222);
15207: hr_utility.set_location('new_value id '||l_pl_id,222);
15208: g_pk_tbl(g_count).pk_id_column := 'PL_ID' ;
15209: g_pk_tbl(g_count).old_value := r_PLN.information1 ;
15210: g_pk_tbl(g_count).new_value := l_PL_ID ;
15203: );
15204: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15205: -- Update all relevent cer records with new pk_id
15206: hr_utility.set_location('Before plsql table ',222);
15207: hr_utility.set_location('new_value id '||l_pl_id,222);
15208: g_pk_tbl(g_count).pk_id_column := 'PL_ID' ;
15209: g_pk_tbl(g_count).old_value := r_PLN.information1 ;
15210: g_pk_tbl(g_count).new_value := l_PL_ID ;
15211: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
15209: g_pk_tbl(g_count).old_value := r_PLN.information1 ;
15210: g_pk_tbl(g_count).new_value := l_PL_ID ;
15211: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
15212: g_pk_tbl(g_count).table_route_id := r_PLN_unique.table_route_id;
15213: hr_utility.set_location('After plsql table ',222);
15214: --
15215: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
15216: --
15217: g_count := g_count + 1 ;
15222: --
15223: -- Call Update routine for the pk_id created in prev run .
15224: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15225: --UPD START
15226: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15227: --
15228: if l_update then
15229: --
15230: l_datetrack_mode := r_PLN.datetrack_mode ;
15242: l_object_version_number := r_PLN.information265;
15243: --
15244: end if;
15245: --
15246: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15247: --
15248: IF l_update OR l_dml_operation <> 'UPDATE' THEN
15249: --UPD END
15250: hr_utility.set_location(' BEN_PL_F UPDATE_PLAN ',30);
15246: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15247: --
15248: IF l_update OR l_dml_operation <> 'UPDATE' THEN
15249: --UPD END
15250: hr_utility.set_location(' BEN_PL_F UPDATE_PLAN ',30);
15251: BEN_PLAN_API.UPDATE_PLAN(
15252: --
15253: P_VALIDATE => false
15254: ,P_EFFECTIVE_DATE => l_effective_date
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);
15627: hr_utility.set_location( 'r_SVA_unique.information2 '||r_SVA_unique.information2,10);
15628: hr_utility.set_location( 'r_SVA_unique.information3 '||r_SVA_unique.information3,10);
15629: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
15627: hr_utility.set_location( 'r_SVA_unique.information2 '||r_SVA_unique.information2,10);
15628: hr_utility.set_location( 'r_SVA_unique.information3 '||r_SVA_unique.information3,10);
15629: -- If reuse objects flag is 'Y' then check for the object in the target business group
15630: -- if found insert the record into PLSql table and exit the loop else try create the
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);
15627: hr_utility.set_location( 'r_SVA_unique.information2 '||r_SVA_unique.information2,10);
15628: hr_utility.set_location( 'r_SVA_unique.information3 '||r_SVA_unique.information3,10);
15629: -- If reuse objects flag is 'Y' then check for the object in the target business group
15630: -- if found insert the record into PLSql table and exit the loop else try create the
15631: -- object in the target business group
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);
15627: hr_utility.set_location( 'r_SVA_unique.information2 '||r_SVA_unique.information2,10);
15628: hr_utility.set_location( 'r_SVA_unique.information3 '||r_SVA_unique.information3,10);
15629: -- If reuse objects flag is 'Y' then check for the object in the target business group
15630: -- if found insert the record into PLSql table and exit the loop else try create the
15631: -- object in the target business group
15632: --
15656: --
15657: log_data('SVA',l_new_value,l_prefix || r_SVA_unique.name|| l_suffix,'REUSED');
15658: --
15659: end if ;
15660: hr_utility.set_location( 'found record for update',10);
15661: --
15662: else
15663: --
15664: l_update := false;
15736: close c_SVA ;
15737: --
15738: l_current_pk_id := r_SVA.information1;
15739: --
15740: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
15741: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
15742: --
15743: if l_current_pk_id = l_prev_pk_id then
15744: --
15737: --
15738: l_current_pk_id := r_SVA.information1;
15739: --
15740: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
15741: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
15742: --
15743: if l_current_pk_id = l_prev_pk_id then
15744: --
15745: l_first_rec := false ;
15760: end if;
15761:
15762: if l_first_rec and not l_update then
15763: -- Call Create routine.
15764: hr_utility.set_location(' BEN_SVC_AREA_F CREATE_SERVICE_AREA ',20);
15765: BEN_SERVICE_AREA_API.CREATE_SERVICE_AREA(
15766: --
15767: P_VALIDATE => false
15768: ,P_EFFECTIVE_DATE => l_effective_date
15808: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
15809: );
15810: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15811: -- Update all relevent cer records with new pk_id
15812: hr_utility.set_location('Before plsql table ',222);
15813: hr_utility.set_location('new_value id '||l_svc_area_id,222);
15814: g_pk_tbl(g_count).pk_id_column := 'SVC_AREA_ID' ;
15815: g_pk_tbl(g_count).old_value := r_SVA.information1 ;
15816: g_pk_tbl(g_count).new_value := l_SVC_AREA_ID ;
15809: );
15810: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15811: -- Update all relevent cer records with new pk_id
15812: hr_utility.set_location('Before plsql table ',222);
15813: hr_utility.set_location('new_value id '||l_svc_area_id,222);
15814: g_pk_tbl(g_count).pk_id_column := 'SVC_AREA_ID' ;
15815: g_pk_tbl(g_count).old_value := r_SVA.information1 ;
15816: g_pk_tbl(g_count).new_value := l_SVC_AREA_ID ;
15817: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
15815: g_pk_tbl(g_count).old_value := r_SVA.information1 ;
15816: g_pk_tbl(g_count).new_value := l_SVC_AREA_ID ;
15817: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
15818: g_pk_tbl(g_count).table_route_id := r_SVA_unique.table_route_id;
15819: hr_utility.set_location('After plsql table ',222);
15820: --
15821: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
15822: --
15823: g_count := g_count + 1 ;
15828: --
15829: -- Call Update routine for the pk_id created in prev run .
15830: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15831: --UPD START
15832: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15833: --
15834: if l_update then
15835: --
15836: l_datetrack_mode := r_SVA.datetrack_mode ;
15848: l_object_version_number := r_SVA.information265;
15849: --
15850: end if;
15851: --
15852: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15853: --
15854: IF l_update OR l_dml_operation <> 'UPDATE' THEN
15855: --UPD END
15856: hr_utility.set_location(' BEN_SVC_AREA_F UPDATE_SERVICE_AREA ',30);
15852: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15853: --
15854: IF l_update OR l_dml_operation <> 'UPDATE' THEN
15855: --UPD END
15856: hr_utility.set_location(' BEN_SVC_AREA_F UPDATE_SERVICE_AREA ',30);
15857: BEN_SERVICE_AREA_API.UPDATE_SERVICE_AREA(
15858: --
15859: P_VALIDATE => false
15860: ,P_EFFECTIVE_DATE => l_effective_date
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);
16085: hr_utility.set_location( 'r_PON_unique.information2 '||r_PON_unique.information2,10);
16086: hr_utility.set_location( 'r_PON_unique.information3 '||r_PON_unique.information3,10);
16087: -- If reuse objects flag is 'Y' then check for the object in the target business group
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);
16085: hr_utility.set_location( 'r_PON_unique.information2 '||r_PON_unique.information2,10);
16086: hr_utility.set_location( 'r_PON_unique.information3 '||r_PON_unique.information3,10);
16087: -- If reuse objects flag is 'Y' then check for the object in the target business group
16088: -- if found insert the record into PLSql table and exit the loop else try create the
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);
16085: hr_utility.set_location( 'r_PON_unique.information2 '||r_PON_unique.information2,10);
16086: hr_utility.set_location( 'r_PON_unique.information3 '||r_PON_unique.information3,10);
16087: -- If reuse objects flag is 'Y' then check for the object in the target business group
16088: -- if found insert the record into PLSql table and exit the loop else try create the
16089: -- object in the target business group
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);
16085: hr_utility.set_location( 'r_PON_unique.information2 '||r_PON_unique.information2,10);
16086: hr_utility.set_location( 'r_PON_unique.information3 '||r_PON_unique.information3,10);
16087: -- If reuse objects flag is 'Y' then check for the object in the target business group
16088: -- if found insert the record into PLSql table and exit the loop else try create the
16089: -- object in the target business group
16090: --
16129: --
16130: -- log_data('PON',l_new_value,l_prefix || r_PON_unique.information1|| l_suffix,'REUSED');
16131: --
16132: end if ;
16133: hr_utility.set_location( 'found record for update',10);
16134: --
16135: else
16136: --
16137: l_update := false;
16210: if not l_object_found_in_target OR l_update then
16211: --
16212: l_current_pk_id := r_PON.information1;
16213: --
16214: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16215: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16216: --
16217: if l_current_pk_id = l_prev_pk_id then
16218: --
16211: --
16212: l_current_pk_id := r_PON.information1;
16213: --
16214: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16215: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16216: --
16217: if l_current_pk_id = l_prev_pk_id then
16218: --
16219: l_first_rec := false ;
16232: end if;
16233:
16234: if l_first_rec and not l_update then
16235: -- Call Create routine.
16236: hr_utility.set_location(' BEN_PL_TYP_OPT_TYP_F CREATE_PLAN_TYPE_OPTION_TYPE ',20);
16237: BEN_PLAN_TYPE_OPTION_TYPE_API.CREATE_PLAN_TYPE_OPTION_TYPE(
16238: --
16239: P_VALIDATE => false
16240: ,P_EFFECTIVE_DATE => l_effective_date
16281: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
16282: );
16283: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16284: -- Update all relevent cer records with new pk_id
16285: hr_utility.set_location('Before plsql table ',222);
16286: hr_utility.set_location('new_value id '||l_pl_typ_opt_typ_id,222);
16287: g_pk_tbl(g_count).pk_id_column := 'PL_TYP_OPT_TYP_ID' ;
16288: g_pk_tbl(g_count).old_value := r_PON.information1 ;
16289: g_pk_tbl(g_count).new_value := l_PL_TYP_OPT_TYP_ID ;
16282: );
16283: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16284: -- Update all relevent cer records with new pk_id
16285: hr_utility.set_location('Before plsql table ',222);
16286: hr_utility.set_location('new_value id '||l_pl_typ_opt_typ_id,222);
16287: g_pk_tbl(g_count).pk_id_column := 'PL_TYP_OPT_TYP_ID' ;
16288: g_pk_tbl(g_count).old_value := r_PON.information1 ;
16289: g_pk_tbl(g_count).new_value := l_PL_TYP_OPT_TYP_ID ;
16290: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
16288: g_pk_tbl(g_count).old_value := r_PON.information1 ;
16289: g_pk_tbl(g_count).new_value := l_PL_TYP_OPT_TYP_ID ;
16290: g_pk_tbl(g_count).copy_reuse_type := 'COPIED';
16291: g_pk_tbl(g_count).table_route_id := r_PON_unique.table_route_id;
16292: hr_utility.set_location('After plsql table ',222);
16293: --
16294: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
16295: --
16296: g_count := g_count + 1 ;
16299: --
16300: -- Call Update routine for the pk_id created in prev run .
16301: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16302: --UPD START
16303: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16304: --
16305: if l_update then
16306: --
16307: l_datetrack_mode := r_PON.datetrack_mode ;
16319: l_object_version_number := r_PON.information265;
16320: --
16321: end if;
16322: --
16323: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16324: --
16325: IF l_update OR l_dml_operation <> 'UPDATE' THEN
16326: --UPD END
16327: hr_utility.set_location(' BEN_PL_TYP_OPT_TYP_F UPDATE_PLAN_TYPE_OPTION_TYPE ',30);
16323: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16324: --
16325: IF l_update OR l_dml_operation <> 'UPDATE' THEN
16326: --UPD END
16327: hr_utility.set_location(' BEN_PL_TYP_OPT_TYP_F UPDATE_PLAN_TYPE_OPTION_TYPE ',30);
16328: BEN_PLAN_TYPE_OPTION_TYPE_API.UPDATE_PLAN_TYPE_OPTION_TYPE(
16329: --
16330: P_VALIDATE => false
16331: ,P_EFFECTIVE_DATE => l_effective_date
16443: ;
16444: --
16445: BEGIN
16446: --
16447: hr_utility.set_location('Entering map_valueset_in_target', 5);
16448: --
16449: open c_value_set ;
16450: --
16451: fetch c_value_set into p_value_set_id;
16462: end if;
16463: --
16464: close c_value_set;
16465: --
16466: hr_utility.set_location('Leaving map_valueset_in_target', 10);
16467: --
16468: return l_map_succeed;
16469: --
16470: END map_valueset_in_target;
16503: );
16504: --
16505: BEGIN
16506: --
16507: hr_utility.set_location('Entering map_lookup_in_target', 5);
16508: --
16509: open c_hr_lookup_type ( cv_lookup_type => p_lookup_name,
16510: cv_target_business_group_id => p_target_business_group_id );
16511: --
16523: end if;
16524: --
16525: close c_hr_lookup_type;
16526: --
16527: hr_utility.set_location('Leaving map_lookup_in_target', 10);
16528: --
16529: return l_map_succeed;
16530: --
16531: END map_lookup_in_target;
16671: --
16672: -- IF l_target_type = 'BEN_PDSMBG'
16673: -- THEN
16674: --
16675: hr_utility.set_location(' r_egl_unique.table_route_id ' || r_egl_unique.table_route_id,10);
16676: hr_utility.set_location(' r_egl_unique.information1 ' || r_egl_unique.information1,10);
16677: hr_utility.set_location( 'r_egl_unique.information2 ' || r_egl_unique.information2,10);
16678: hr_utility.set_location( 'r_egl_unique.information3 ' || r_egl_unique.information3,10);
16679: --
16672: -- IF l_target_type = 'BEN_PDSMBG'
16673: -- THEN
16674: --
16675: hr_utility.set_location(' r_egl_unique.table_route_id ' || r_egl_unique.table_route_id,10);
16676: hr_utility.set_location(' r_egl_unique.information1 ' || r_egl_unique.information1,10);
16677: hr_utility.set_location( 'r_egl_unique.information2 ' || r_egl_unique.information2,10);
16678: hr_utility.set_location( 'r_egl_unique.information3 ' || r_egl_unique.information3,10);
16679: --
16680: -- If reuse objects flag is 'Y' then check for the object in the target business group
16673: -- THEN
16674: --
16675: hr_utility.set_location(' r_egl_unique.table_route_id ' || r_egl_unique.table_route_id,10);
16676: hr_utility.set_location(' r_egl_unique.information1 ' || r_egl_unique.information1,10);
16677: hr_utility.set_location( 'r_egl_unique.information2 ' || r_egl_unique.information2,10);
16678: hr_utility.set_location( 'r_egl_unique.information3 ' || r_egl_unique.information3,10);
16679: --
16680: -- If reuse objects flag is 'Y' then check for the object in the target business group
16681: -- if found insert the record into PLSql table and exit the loop else try create the
16674: --
16675: hr_utility.set_location(' r_egl_unique.table_route_id ' || r_egl_unique.table_route_id,10);
16676: hr_utility.set_location(' r_egl_unique.information1 ' || r_egl_unique.information1,10);
16677: hr_utility.set_location( 'r_egl_unique.information2 ' || r_egl_unique.information2,10);
16678: hr_utility.set_location( 'r_egl_unique.information3 ' || r_egl_unique.information3,10);
16679: --
16680: -- If reuse objects flag is 'Y' then check for the object in the target business group
16681: -- if found insert the record into PLSql table and exit the loop else try create the
16682: -- object in the target business group
16710: END IF;
16711: --
16712: l_eligy_criteria_id := r_egl_unique.information1;
16713: l_object_version_number := r_egl.information265;
16714: hr_utility.set_location ('found record for update', 10);
16715: --
16716: ELSE
16717: --
16718: l_min_esd := NULL;
16797: p_value_set_id => l_col1_value_set_id);
16798: --
16799: end if;
16800: --
16801: hr_utility.set_location (' l_current_pk_id ' || l_current_pk_id, 20);
16802: hr_utility.set_location (' l_prev_pk_id ' || l_prev_pk_id, 20);
16803: --
16804: IF l_current_pk_id = l_prev_pk_id
16805: THEN
16798: --
16799: end if;
16800: --
16801: hr_utility.set_location (' l_current_pk_id ' || l_current_pk_id, 20);
16802: hr_utility.set_location (' l_prev_pk_id ' || l_prev_pk_id, 20);
16803: --
16804: IF l_current_pk_id = l_prev_pk_id
16805: THEN
16806: --
16821: --
16822: IF l_first_rec AND NOT l_update
16823: THEN
16824: -- Call Create routine.
16825: hr_utility.set_location ('BEN_ELIGY_CRITERIA_API.CREATE_ELIGY_CRITERIA ', 20 );
16826: --
16827: ben_eligy_criteria_api.create_eligy_criteria
16828: (
16829: p_validate => FALSE,
16895: );
16896: --
16897: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16898: -- Update all relevent cer records with new pk_id
16899: hr_utility.set_location ('Before plsql table ', 222);
16900: hr_utility.set_location ('new_value id ' || l_eligy_criteria_id, 222);
16901: --
16902: g_pk_tbl (g_count).pk_id_column := 'ELIGY_CRITERIA_ID';
16903: g_pk_tbl (g_count).old_value := r_egl.information1;
16896: --
16897: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16898: -- Update all relevent cer records with new pk_id
16899: hr_utility.set_location ('Before plsql table ', 222);
16900: hr_utility.set_location ('new_value id ' || l_eligy_criteria_id, 222);
16901: --
16902: g_pk_tbl (g_count).pk_id_column := 'ELIGY_CRITERIA_ID';
16903: g_pk_tbl (g_count).old_value := r_egl.information1;
16904: g_pk_tbl (g_count).new_value := l_eligy_criteria_id;
16904: g_pk_tbl (g_count).new_value := l_eligy_criteria_id;
16905: g_pk_tbl (g_count).copy_reuse_type := 'COPIED';
16906: g_pk_tbl (g_count).table_route_id := r_egl_unique.table_route_id;
16907: --
16908: hr_utility.set_location ('After plsql table ', 222);
16909: --
16910: -- update_cer_with_target( g_pk_tbl(g_count),p_copy_entity_txn_id ) ;
16911: --
16912: g_count := g_count + 1;
16919: -- Bug: 4372345 Fetch OVN. EGL being non-date-tracked,
16920: -- create-api will not be called before update in PDW/PDC flow.
16921: l_object_version_number := r_egl.information265;
16922: --
16923: hr_utility.set_location ('BEN_ELIGY_CRITERIA_API.UPDATE_ELIGY_CRITERIA ', 20 );
16924: --
16925: ben_eligy_criteria_api.update_eligy_criteria
16926: (
16927: p_validate => FALSE,
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
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