14: l_update boolean := true ;
15: l_datetrack_mode varchar2(80) := p_datetrack_mode ;
16: begin
17: --
18: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
19: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
20: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
21: hr_utility.set_location('p_effective_date '||p_effective_date,10);
22: --
15: l_datetrack_mode varchar2(80) := p_datetrack_mode ;
16: begin
17: --
18: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
19: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
20: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
21: hr_utility.set_location('p_effective_date '||p_effective_date,10);
22: --
23: if p_effective_end_date <> hr_api.g_eot then
16: begin
17: --
18: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
19: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
20: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
21: hr_utility.set_location('p_effective_date '||p_effective_date,10);
22: --
23: if p_effective_end_date <> hr_api.g_eot then
24: --
17: --
18: hr_utility.set_location('Intering get_dt_modes p_dt_mode '||l_datetrack_mode,10);
19: hr_utility.set_location('p_effective_start_date '||p_effective_start_date,10);
20: hr_utility.set_location('p_effective_end_date '||p_effective_end_date,10);
21: hr_utility.set_location('p_effective_date '||p_effective_date,10);
22: --
23: if p_effective_end_date <> hr_api.g_eot then
24: --
25: if p_dml_operation = 'INSERT' then
112: --
113: p_datetrack_mode := l_datetrack_mode ;
114: -- p_update := l_update ;
115: --
116: hr_utility.set_location('Leaving get_dt_modes p_dt_mode '||p_datetrack_mode,10);
117: --
118: end get_dt_modes ;
119: --
120: -- ----------------------------------------------------------------------------
161: -- Private procedure to update the cer with target details
162: --
163: procedure update_cer_with_target(c_pk_rec BEN_PD_COPY_TO_BEN_ONE.g_pk_rec_type, p_copy_entity_txn_id in number) is
164: begin
165: hr_utility.set_location('Inside update_cer_with_target ',233);
166: update ben_copy_entity_results
167: set information9 = c_pk_rec.copy_reuse_type||'-'||c_pk_rec.new_value
168: where copy_entity_txn_id = p_copy_entity_txn_id
169: and table_route_id = c_pk_rec.table_route_id
344: r_PRB_unique.information3 >=
345: ben_pd_copy_to_ben_one.g_copy_effective_date)
346: ) then
347: --
348: hr_utility.set_location(' r_PRB_unique.table_route_id '||r_PRB_unique.table_route_id,10);
349: hr_utility.set_location(' r_PRB_unique.information1 '||r_PRB_unique.information1,10);
350: hr_utility.set_location( 'r_PRB_unique.information2 '||r_PRB_unique.information2,10);
351: hr_utility.set_location( 'r_PRB_unique.information3 '||r_PRB_unique.information3,10);
352: -- If reuse objects flag is 'Y' then check for the object in the target business group
345: ben_pd_copy_to_ben_one.g_copy_effective_date)
346: ) then
347: --
348: hr_utility.set_location(' r_PRB_unique.table_route_id '||r_PRB_unique.table_route_id,10);
349: hr_utility.set_location(' r_PRB_unique.information1 '||r_PRB_unique.information1,10);
350: hr_utility.set_location( 'r_PRB_unique.information2 '||r_PRB_unique.information2,10);
351: hr_utility.set_location( 'r_PRB_unique.information3 '||r_PRB_unique.information3,10);
352: -- If reuse objects flag is 'Y' then check for the object in the target business group
353: -- if found insert the record into PLSql table and exit the loop else try create the
346: ) then
347: --
348: hr_utility.set_location(' r_PRB_unique.table_route_id '||r_PRB_unique.table_route_id,10);
349: hr_utility.set_location(' r_PRB_unique.information1 '||r_PRB_unique.information1,10);
350: hr_utility.set_location( 'r_PRB_unique.information2 '||r_PRB_unique.information2,10);
351: hr_utility.set_location( 'r_PRB_unique.information3 '||r_PRB_unique.information3,10);
352: -- If reuse objects flag is 'Y' then check for the object in the target business group
353: -- if found insert the record into PLSql table and exit the loop else try create the
354: -- object in the target business group
347: --
348: hr_utility.set_location(' r_PRB_unique.table_route_id '||r_PRB_unique.table_route_id,10);
349: hr_utility.set_location(' r_PRB_unique.information1 '||r_PRB_unique.information1,10);
350: hr_utility.set_location( 'r_PRB_unique.information2 '||r_PRB_unique.information2,10);
351: hr_utility.set_location( 'r_PRB_unique.information3 '||r_PRB_unique.information3,10);
352: -- If reuse objects flag is 'Y' then check for the object in the target business group
353: -- if found insert the record into PLSql table and exit the loop else try create the
354: -- object in the target business group
355: --
394: --
395: --DOUBT log_data('PRB',l_new_value,l_prefix || r_PRB_unique.name|| l_suffix,'REUSED');
396: --
397: end if ;
398: hr_utility.set_location( 'found record for update',10);
399: --
400: else
401: --
402: l_update := false;
469: if not l_object_found_in_target OR l_update then
470: --
471: l_current_pk_id := r_PRB.information1;
472: --
473: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
474: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
475: --
476: if l_current_pk_id = l_prev_pk_id then
477: --
470: --
471: l_current_pk_id := r_PRB.information1;
472: --
473: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
474: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
475: --
476: if l_current_pk_id = l_prev_pk_id then
477: --
478: l_first_rec := false ;
491: end if;
492:
493: if l_first_rec and not l_update then
494: -- Call Create routine.
495: hr_utility.set_location(' BEN_PL_REGY_BOD_F CREATE_PLAN_REGULATORY_BODY ',20);
496: BEN_PLAN_REGULATORY_BODY_API.CREATE_PLAN_REGULATORY_BODY(
497: --
498: P_VALIDATE => false
499: ,P_EFFECTIVE_DATE => l_effective_date
543: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
544: );
545: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
546: -- Update all relevent cer records with new pk_id
547: hr_utility.set_location('Before plsql table ',222);
548: hr_utility.set_location('new_value id '||l_pl_regy_bod_id,222);
549: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGY_BOD_ID' ;
550: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRB.information1 ;
551: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_BOD_ID ;
544: );
545: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
546: -- Update all relevent cer records with new pk_id
547: hr_utility.set_location('Before plsql table ',222);
548: hr_utility.set_location('new_value id '||l_pl_regy_bod_id,222);
549: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGY_BOD_ID' ;
550: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRB.information1 ;
551: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_BOD_ID ;
552: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
550: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRB.information1 ;
551: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_BOD_ID ;
552: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
553: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PRB_unique.table_route_id;
554: hr_utility.set_location('After plsql table ',222);
555: --
556: -- 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 ) ;
557: --
558: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
560: else
561: --
562: -- Call Update routine for the pk_id created in prev run .
563: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
564: hr_utility.set_location(' BEN_PL_REGY_BOD_F UPDATE_PLAN_REGULATORY_BODY ',30);
565: --UPD START
566: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
567: --
568: if l_update then
562: -- Call Update routine for the pk_id created in prev run .
563: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
564: hr_utility.set_location(' BEN_PL_REGY_BOD_F UPDATE_PLAN_REGULATORY_BODY ',30);
565: --UPD START
566: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
567: --
568: if l_update then
569: --
570: l_datetrack_mode := r_PRB.datetrack_mode ;
582: l_object_version_number := r_PRB.information265;
583: --
584: end if;
585: --
586: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
587: --
588: IF l_update OR l_dml_operation <> 'UPDATE' THEN
589: --UPD END
590:
823: r_SAZ_unique.information3 >=
824: ben_pd_copy_to_ben_one.g_copy_effective_date)
825: ) then
826: --
827: hr_utility.set_location(' r_SAZ_unique.table_route_id '||r_SAZ_unique.table_route_id,10);
828: hr_utility.set_location(' r_SAZ_unique.information1 '||r_SAZ_unique.information1,10);
829: hr_utility.set_location( 'r_SAZ_unique.information2 '||r_SAZ_unique.information2,10);
830: hr_utility.set_location( 'r_SAZ_unique.information3 '||r_SAZ_unique.information3,10);
831: -- If reuse objects flag is 'Y' then check for the object in the target business group
824: ben_pd_copy_to_ben_one.g_copy_effective_date)
825: ) then
826: --
827: hr_utility.set_location(' r_SAZ_unique.table_route_id '||r_SAZ_unique.table_route_id,10);
828: hr_utility.set_location(' r_SAZ_unique.information1 '||r_SAZ_unique.information1,10);
829: hr_utility.set_location( 'r_SAZ_unique.information2 '||r_SAZ_unique.information2,10);
830: hr_utility.set_location( 'r_SAZ_unique.information3 '||r_SAZ_unique.information3,10);
831: -- If reuse objects flag is 'Y' then check for the object in the target business group
832: -- if found insert the record into PLSql table and exit the loop else try create the
825: ) then
826: --
827: hr_utility.set_location(' r_SAZ_unique.table_route_id '||r_SAZ_unique.table_route_id,10);
828: hr_utility.set_location(' r_SAZ_unique.information1 '||r_SAZ_unique.information1,10);
829: hr_utility.set_location( 'r_SAZ_unique.information2 '||r_SAZ_unique.information2,10);
830: hr_utility.set_location( 'r_SAZ_unique.information3 '||r_SAZ_unique.information3,10);
831: -- If reuse objects flag is 'Y' then check for the object in the target business group
832: -- if found insert the record into PLSql table and exit the loop else try create the
833: -- object in the target business group
826: --
827: hr_utility.set_location(' r_SAZ_unique.table_route_id '||r_SAZ_unique.table_route_id,10);
828: hr_utility.set_location(' r_SAZ_unique.information1 '||r_SAZ_unique.information1,10);
829: hr_utility.set_location( 'r_SAZ_unique.information2 '||r_SAZ_unique.information2,10);
830: hr_utility.set_location( 'r_SAZ_unique.information3 '||r_SAZ_unique.information3,10);
831: -- If reuse objects flag is 'Y' then check for the object in the target business group
832: -- if found insert the record into PLSql table and exit the loop else try create the
833: -- object in the target business group
834: --
871: --
872: --DOUBT log_data('SAZ',l_new_value,l_prefix || r_SAZ_unique.name|| l_suffix,'REUSED');
873: --
874: end if ;
875: hr_utility.set_location( 'found record for update',10);
876: --
877: else
878: --
879: l_update := false;
942: if not l_object_found_in_target OR l_update then
943: --
944: l_current_pk_id := r_SAZ.information1;
945: --
946: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
947: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
948: --
949: if l_current_pk_id = l_prev_pk_id then
950: --
943: --
944: l_current_pk_id := r_SAZ.information1;
945: --
946: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
947: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
948: --
949: if l_current_pk_id = l_prev_pk_id then
950: --
951: l_first_rec := false ;
964: end if;
965:
966: if l_first_rec and not l_update then
967: -- Call Create routine.
968: hr_utility.set_location(' BEN_SVC_AREA_PSTL_ZIP_RNG_F CREATE_SVC_AREA_PSTL_ZIP_RNG ',20);
969: BEN_SVC_AREA_PSTL_ZIP_RNG_API.CREATE_SVC_AREA_PSTL_ZIP_RNG(
970: --
971: P_VALIDATE => false
972: ,P_EFFECTIVE_DATE => l_effective_date
1012: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
1013: );
1014: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1015: -- Update all relevent cer records with new pk_id
1016: hr_utility.set_location('Before plsql table ',222);
1017: hr_utility.set_location('new_value id '||l_svc_area_pstl_zip_rng_id,222);
1018: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'SVC_AREA_PSTL_ZIP_RNG_ID' ;
1019: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SAZ.information1 ;
1020: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SVC_AREA_PSTL_ZIP_RNG_ID ;
1013: );
1014: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1015: -- Update all relevent cer records with new pk_id
1016: hr_utility.set_location('Before plsql table ',222);
1017: hr_utility.set_location('new_value id '||l_svc_area_pstl_zip_rng_id,222);
1018: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'SVC_AREA_PSTL_ZIP_RNG_ID' ;
1019: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SAZ.information1 ;
1020: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SVC_AREA_PSTL_ZIP_RNG_ID ;
1021: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
1019: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SAZ.information1 ;
1020: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SVC_AREA_PSTL_ZIP_RNG_ID ;
1021: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
1022: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_SAZ_unique.table_route_id;
1023: hr_utility.set_location('After plsql table ',222);
1024: --
1025: -- 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 ) ;
1026: --
1027: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
1029: else
1030: --
1031: -- Call Update routine for the pk_id created in prev run .
1032: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1033: hr_utility.set_location(' BEN_SVC_AREA_PSTL_ZIP_RNG_F UPDATE_SVC_AREA_PSTL_ZIP_RNG ',30);
1034: --UPD START
1035: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1036: --
1037: if l_update then
1031: -- Call Update routine for the pk_id created in prev run .
1032: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1033: hr_utility.set_location(' BEN_SVC_AREA_PSTL_ZIP_RNG_F UPDATE_SVC_AREA_PSTL_ZIP_RNG ',30);
1034: --UPD START
1035: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1036: --
1037: if l_update then
1038: --
1039: l_datetrack_mode := r_SAZ.datetrack_mode ;
1051: l_object_version_number := r_SAZ.information265;
1052: --
1053: end if;
1054: --
1055: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1056: --
1057: IF l_update OR l_dml_operation <> 'UPDATE' THEN
1058: --UPD END
1059:
1291: r_PCX_unique.information3 >=
1292: ben_pd_copy_to_ben_one.g_copy_effective_date)
1293: ) then
1294: --
1295: hr_utility.set_location(' r_PCX_unique.table_route_id '||r_PCX_unique.table_route_id,10);
1296: hr_utility.set_location(' r_PCX_unique.information1 '||r_PCX_unique.information1,10);
1297: hr_utility.set_location( 'r_PCX_unique.information2 '||r_PCX_unique.information2,10);
1298: hr_utility.set_location( 'r_PCX_unique.information3 '||r_PCX_unique.information3,10);
1299: -- If reuse objects flag is 'Y' then check for the object in the target business group
1292: ben_pd_copy_to_ben_one.g_copy_effective_date)
1293: ) then
1294: --
1295: hr_utility.set_location(' r_PCX_unique.table_route_id '||r_PCX_unique.table_route_id,10);
1296: hr_utility.set_location(' r_PCX_unique.information1 '||r_PCX_unique.information1,10);
1297: hr_utility.set_location( 'r_PCX_unique.information2 '||r_PCX_unique.information2,10);
1298: hr_utility.set_location( 'r_PCX_unique.information3 '||r_PCX_unique.information3,10);
1299: -- If reuse objects flag is 'Y' then check for the object in the target business group
1300: -- if found insert the record into PLSql table and exit the loop else try create the
1293: ) then
1294: --
1295: hr_utility.set_location(' r_PCX_unique.table_route_id '||r_PCX_unique.table_route_id,10);
1296: hr_utility.set_location(' r_PCX_unique.information1 '||r_PCX_unique.information1,10);
1297: hr_utility.set_location( 'r_PCX_unique.information2 '||r_PCX_unique.information2,10);
1298: hr_utility.set_location( 'r_PCX_unique.information3 '||r_PCX_unique.information3,10);
1299: -- If reuse objects flag is 'Y' then check for the object in the target business group
1300: -- if found insert the record into PLSql table and exit the loop else try create the
1301: -- object in the target business group
1294: --
1295: hr_utility.set_location(' r_PCX_unique.table_route_id '||r_PCX_unique.table_route_id,10);
1296: hr_utility.set_location(' r_PCX_unique.information1 '||r_PCX_unique.information1,10);
1297: hr_utility.set_location( 'r_PCX_unique.information2 '||r_PCX_unique.information2,10);
1298: hr_utility.set_location( 'r_PCX_unique.information3 '||r_PCX_unique.information3,10);
1299: -- If reuse objects flag is 'Y' then check for the object in the target business group
1300: -- if found insert the record into PLSql table and exit the loop else try create the
1301: -- object in the target business group
1302: --
1340: --
1341: -- log_data('PCX',l_new_value,l_prefix || r_PCX_unique.name|| l_suffix,'REUSED');
1342: --
1343: end if ;
1344: hr_utility.set_location( 'found record for update',10);
1345: --
1346: else
1347: --
1348: l_update := false;
1416:
1417: --
1418: l_current_pk_id := r_PCX.information1;
1419: --
1420: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
1421: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
1422: --
1423: if l_current_pk_id = l_prev_pk_id then
1424: --
1417: --
1418: l_current_pk_id := r_PCX.information1;
1419: --
1420: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
1421: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
1422: --
1423: if l_current_pk_id = l_prev_pk_id then
1424: --
1425: l_first_rec := false ;
1439:
1440: if l_first_rec and not l_update then
1441:
1442: -- Call Create routine.
1443: hr_utility.set_location(' BEN_PL_BNF_CTFN_F CREATE_PLAN_BENEFICIARY_CTFN ',20);
1444: BEN_PLAN_BENEFICIARY_CTFN_API.CREATE_PLAN_BENEFICIARY_CTFN(
1445: --
1446: P_VALIDATE => false
1447: ,P_EFFECTIVE_DATE => l_effective_date
1493: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
1494: );
1495: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1496: -- Update all relevent cer records with new pk_id
1497: hr_utility.set_location('Before plsql table ',222);
1498: hr_utility.set_location('new_value id '||l_pl_bnf_ctfn_id,222);
1499: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_BNF_CTFN_ID' ;
1500: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCX.information1 ;
1501: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_BNF_CTFN_ID ;
1494: );
1495: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1496: -- Update all relevent cer records with new pk_id
1497: hr_utility.set_location('Before plsql table ',222);
1498: hr_utility.set_location('new_value id '||l_pl_bnf_ctfn_id,222);
1499: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_BNF_CTFN_ID' ;
1500: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCX.information1 ;
1501: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_BNF_CTFN_ID ;
1502: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
1500: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCX.information1 ;
1501: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_BNF_CTFN_ID ;
1502: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
1503: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PCX_unique.table_route_id;
1504: hr_utility.set_location('After plsql table ',222);
1505: --
1506: -- 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 ) ;
1507: --
1508: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
1510: else
1511: --
1512: -- Call Update routine for the pk_id created in prev run .
1513: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1514: hr_utility.set_location(' BEN_PL_BNF_CTFN_F UPDATE_PLAN_BENEFICIARY_CTFN ',30);
1515: --UPD START
1516: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1517: --
1518: if l_update then
1512: -- Call Update routine for the pk_id created in prev run .
1513: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1514: hr_utility.set_location(' BEN_PL_BNF_CTFN_F UPDATE_PLAN_BENEFICIARY_CTFN ',30);
1515: --UPD START
1516: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1517: --
1518: if l_update then
1519: --
1520: l_datetrack_mode := r_PCX.datetrack_mode ;
1532: l_object_version_number := r_PCX.information265;
1533: --
1534: end if;
1535: --
1536: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1537: --
1538: IF l_update OR l_dml_operation <> 'UPDATE' THEN
1539: --UPD END
1540:
1772: ben_pd_copy_to_ben_one.g_copy_effective_date)
1773: ) then
1774:
1775: --
1776: hr_utility.set_location(' r_PND_unique.table_route_id '||r_PND_unique.table_route_id,10);
1777: hr_utility.set_location(' r_PND_unique.information1 '||r_PND_unique.information1,10);
1778: hr_utility.set_location( 'r_PND_unique.information2 '||r_PND_unique.information2,10);
1779: hr_utility.set_location( 'r_PND_unique.information3 '||r_PND_unique.information3,10);
1780: -- If reuse objects flag is 'Y' then check for the object in the target business group
1773: ) then
1774:
1775: --
1776: hr_utility.set_location(' r_PND_unique.table_route_id '||r_PND_unique.table_route_id,10);
1777: hr_utility.set_location(' r_PND_unique.information1 '||r_PND_unique.information1,10);
1778: hr_utility.set_location( 'r_PND_unique.information2 '||r_PND_unique.information2,10);
1779: hr_utility.set_location( 'r_PND_unique.information3 '||r_PND_unique.information3,10);
1780: -- If reuse objects flag is 'Y' then check for the object in the target business group
1781: -- if found insert the record into PLSql table and exit the loop else try create the
1774:
1775: --
1776: hr_utility.set_location(' r_PND_unique.table_route_id '||r_PND_unique.table_route_id,10);
1777: hr_utility.set_location(' r_PND_unique.information1 '||r_PND_unique.information1,10);
1778: hr_utility.set_location( 'r_PND_unique.information2 '||r_PND_unique.information2,10);
1779: hr_utility.set_location( 'r_PND_unique.information3 '||r_PND_unique.information3,10);
1780: -- If reuse objects flag is 'Y' then check for the object in the target business group
1781: -- if found insert the record into PLSql table and exit the loop else try create the
1782: -- object in the target business group
1775: --
1776: hr_utility.set_location(' r_PND_unique.table_route_id '||r_PND_unique.table_route_id,10);
1777: hr_utility.set_location(' r_PND_unique.information1 '||r_PND_unique.information1,10);
1778: hr_utility.set_location( 'r_PND_unique.information2 '||r_PND_unique.information2,10);
1779: hr_utility.set_location( 'r_PND_unique.information3 '||r_PND_unique.information3,10);
1780: -- If reuse objects flag is 'Y' then check for the object in the target business group
1781: -- if found insert the record into PLSql table and exit the loop else try create the
1782: -- object in the target business group
1783: --
1820: --
1821: --DOUBT log_data('PND',l_new_value,l_prefix || r_PND_unique.name|| l_suffix,'REUSED');
1822: --
1823: end if ;
1824: hr_utility.set_location( 'found record for update',10);
1825: --
1826: else
1827: --
1828: l_update := false;
1894:
1895: --
1896: l_current_pk_id := r_PND.information1;
1897: --
1898: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
1899: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
1900: --
1901: if l_current_pk_id = l_prev_pk_id then
1902: --
1895: --
1896: l_current_pk_id := r_PND.information1;
1897: --
1898: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
1899: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
1900: --
1901: if l_current_pk_id = l_prev_pk_id then
1902: --
1903: l_first_rec := false ;
1916: end if;
1917:
1918: if l_first_rec and not l_update then
1919: -- Call Create routine.
1920: hr_utility.set_location(' BEN_PL_DPNT_CVG_CTFN_F CREATE_PLAN_DPNT_CVG_CTFN ',20);
1921: BEN_PLAN_DPNT_CVG_CTFN_API.CREATE_PLAN_DPNT_CVG_CTFN(
1922: --
1923: P_VALIDATE => false
1924: ,P_EFFECTIVE_DATE => l_effective_date
1969: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
1970: );
1971: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1972: -- Update all relevent cer records with new pk_id
1973: hr_utility.set_location('Before plsql table ',222);
1974: hr_utility.set_location('new_value id '||l_pl_dpnt_cvg_ctfn_id,222);
1975: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_DPNT_CVG_CTFN_ID' ;
1976: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PND.information1 ;
1977: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_DPNT_CVG_CTFN_ID ;
1970: );
1971: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1972: -- Update all relevent cer records with new pk_id
1973: hr_utility.set_location('Before plsql table ',222);
1974: hr_utility.set_location('new_value id '||l_pl_dpnt_cvg_ctfn_id,222);
1975: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_DPNT_CVG_CTFN_ID' ;
1976: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PND.information1 ;
1977: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_DPNT_CVG_CTFN_ID ;
1978: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
1976: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PND.information1 ;
1977: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_DPNT_CVG_CTFN_ID ;
1978: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
1979: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PND_unique.table_route_id;
1980: hr_utility.set_location('After plsql table ',222);
1981: --
1982: -- 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 ) ;
1983: --
1984: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
1986: else
1987: --
1988: -- Call Update routine for the pk_id created in prev run .
1989: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1990: hr_utility.set_location(' BEN_PL_DPNT_CVG_CTFN_F UPDATE_PLAN_DPNT_CVG_CTFN ',30);
1991: --UPD START
1992: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1993: --
1994: if l_update then
1988: -- Call Update routine for the pk_id created in prev run .
1989: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
1990: hr_utility.set_location(' BEN_PL_DPNT_CVG_CTFN_F UPDATE_PLAN_DPNT_CVG_CTFN ',30);
1991: --UPD START
1992: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
1993: --
1994: if l_update then
1995: --
1996: l_datetrack_mode := r_PND.datetrack_mode ;
2008: l_object_version_number := r_PND.information265;
2009: --
2010: end if;
2011: --
2012: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2013: --
2014: IF l_update OR l_dml_operation <> 'UPDATE' THEN
2015: --UPD END
2016:
2248: ben_pd_copy_to_ben_one.g_copy_effective_date)
2249: ) then
2250:
2251: --
2252: hr_utility.set_location(' r_LPE_unique.table_route_id '||r_LPE_unique.table_route_id,10);
2253: hr_utility.set_location(' r_LPE_unique.information1 '||r_LPE_unique.information1,10);
2254: hr_utility.set_location( 'r_LPE_unique.information2 '||r_LPE_unique.information2,10);
2255: hr_utility.set_location( 'r_LPE_unique.information3 '||r_LPE_unique.information3,10);
2256: -- If reuse objects flag is 'Y' then check for the object in the target business group
2249: ) then
2250:
2251: --
2252: hr_utility.set_location(' r_LPE_unique.table_route_id '||r_LPE_unique.table_route_id,10);
2253: hr_utility.set_location(' r_LPE_unique.information1 '||r_LPE_unique.information1,10);
2254: hr_utility.set_location( 'r_LPE_unique.information2 '||r_LPE_unique.information2,10);
2255: hr_utility.set_location( 'r_LPE_unique.information3 '||r_LPE_unique.information3,10);
2256: -- If reuse objects flag is 'Y' then check for the object in the target business group
2257: -- if found insert the record into PLSql table and exit the loop else try create the
2250:
2251: --
2252: hr_utility.set_location(' r_LPE_unique.table_route_id '||r_LPE_unique.table_route_id,10);
2253: hr_utility.set_location(' r_LPE_unique.information1 '||r_LPE_unique.information1,10);
2254: hr_utility.set_location( 'r_LPE_unique.information2 '||r_LPE_unique.information2,10);
2255: hr_utility.set_location( 'r_LPE_unique.information3 '||r_LPE_unique.information3,10);
2256: -- If reuse objects flag is 'Y' then check for the object in the target business group
2257: -- if found insert the record into PLSql table and exit the loop else try create the
2258: -- object in the target business group
2251: --
2252: hr_utility.set_location(' r_LPE_unique.table_route_id '||r_LPE_unique.table_route_id,10);
2253: hr_utility.set_location(' r_LPE_unique.information1 '||r_LPE_unique.information1,10);
2254: hr_utility.set_location( 'r_LPE_unique.information2 '||r_LPE_unique.information2,10);
2255: hr_utility.set_location( 'r_LPE_unique.information3 '||r_LPE_unique.information3,10);
2256: -- If reuse objects flag is 'Y' then check for the object in the target business group
2257: -- if found insert the record into PLSql table and exit the loop else try create the
2258: -- object in the target business group
2259: --
2301: --
2302: --DOUBT log_data('LPE',l_new_value,l_prefix || r_LPE_unique.name|| l_suffix,'REUSED');
2303: --
2304: end if ;
2305: hr_utility.set_location( 'found record for update',10);
2306: --
2307: else
2308: --
2309: l_update := false;
2371: if not l_object_found_in_target OR l_update then
2372: --
2373: l_current_pk_id := r_LPE.information1;
2374: --
2375: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2376: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2377: --
2378: if l_current_pk_id = l_prev_pk_id then
2379: --
2372: --
2373: l_current_pk_id := r_LPE.information1;
2374: --
2375: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2376: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2377: --
2378: if l_current_pk_id = l_prev_pk_id then
2379: --
2380: l_first_rec := false ;
2393: end if;
2394:
2395: if l_first_rec and not l_update then
2396: -- Call Create routine.
2397: hr_utility.set_location(' BEN_LER_CHG_PL_NIP_ENRT_F CREATE_LER_CHG_PL_NIP_ENRT ',20);
2398: BEN_LER_CHG_PL_NIP_ENRT_API.CREATE_LER_CHG_PL_NIP_ENRT(
2399: --
2400: P_VALIDATE => false
2401: ,P_EFFECTIVE_DATE => l_effective_date
2451: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
2452: );
2453: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2454: -- Update all relevent cer records with new pk_id
2455: hr_utility.set_location('Before plsql table ',222);
2456: hr_utility.set_location('new_value id '||l_ler_chg_pl_nip_enrt_id,222);
2457: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PL_NIP_ENRT_ID' ;
2458: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPE.information1 ;
2459: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PL_NIP_ENRT_ID ;
2452: );
2453: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2454: -- Update all relevent cer records with new pk_id
2455: hr_utility.set_location('Before plsql table ',222);
2456: hr_utility.set_location('new_value id '||l_ler_chg_pl_nip_enrt_id,222);
2457: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PL_NIP_ENRT_ID' ;
2458: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPE.information1 ;
2459: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PL_NIP_ENRT_ID ;
2460: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
2458: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPE.information1 ;
2459: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PL_NIP_ENRT_ID ;
2460: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
2461: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPE_unique.table_route_id;
2462: hr_utility.set_location('After plsql table ',222);
2463: --
2464: -- 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 ) ;
2465: --
2466: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
2468: else
2469: --
2470: -- Call Update routine for the pk_id created in prev run .
2471: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2472: hr_utility.set_location(' BEN_LER_CHG_PL_NIP_ENRT_F UPDATE_LER_CHG_PL_NIP_ENRT ',30);
2473: --UPD START
2474: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2475: --
2476: if l_update then
2470: -- Call Update routine for the pk_id created in prev run .
2471: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2472: hr_utility.set_location(' BEN_LER_CHG_PL_NIP_ENRT_F UPDATE_LER_CHG_PL_NIP_ENRT ',30);
2473: --UPD START
2474: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2475: --
2476: if l_update then
2477: --
2478: l_datetrack_mode := r_LPE.datetrack_mode ;
2490: l_object_version_number := r_LPE.information265;
2491: --
2492: end if;
2493: --
2494: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2495: --
2496: IF l_update OR l_dml_operation <> 'UPDATE' THEN
2497: --UPD END
2498:
2735: r_LOP_unique.information3 >=
2736: ben_pd_copy_to_ben_one.g_copy_effective_date)
2737: ) then
2738: --
2739: hr_utility.set_location(' r_LOP_unique.table_route_id '||r_LOP_unique.table_route_id,10);
2740: hr_utility.set_location(' r_LOP_unique.information1 '||r_LOP_unique.information1,10);
2741: hr_utility.set_location( 'r_LOP_unique.information2 '||r_LOP_unique.information2,10);
2742: hr_utility.set_location( 'r_LOP_unique.information3 '||r_LOP_unique.information3,10);
2743: -- If reuse objects flag is 'Y' then check for the object in the target business group
2736: ben_pd_copy_to_ben_one.g_copy_effective_date)
2737: ) then
2738: --
2739: hr_utility.set_location(' r_LOP_unique.table_route_id '||r_LOP_unique.table_route_id,10);
2740: hr_utility.set_location(' r_LOP_unique.information1 '||r_LOP_unique.information1,10);
2741: hr_utility.set_location( 'r_LOP_unique.information2 '||r_LOP_unique.information2,10);
2742: hr_utility.set_location( 'r_LOP_unique.information3 '||r_LOP_unique.information3,10);
2743: -- If reuse objects flag is 'Y' then check for the object in the target business group
2744: -- if found insert the record into PLSql table and exit the loop else try create the
2737: ) then
2738: --
2739: hr_utility.set_location(' r_LOP_unique.table_route_id '||r_LOP_unique.table_route_id,10);
2740: hr_utility.set_location(' r_LOP_unique.information1 '||r_LOP_unique.information1,10);
2741: hr_utility.set_location( 'r_LOP_unique.information2 '||r_LOP_unique.information2,10);
2742: hr_utility.set_location( 'r_LOP_unique.information3 '||r_LOP_unique.information3,10);
2743: -- If reuse objects flag is 'Y' then check for the object in the target business group
2744: -- if found insert the record into PLSql table and exit the loop else try create the
2745: -- object in the target business group
2738: --
2739: hr_utility.set_location(' r_LOP_unique.table_route_id '||r_LOP_unique.table_route_id,10);
2740: hr_utility.set_location(' r_LOP_unique.information1 '||r_LOP_unique.information1,10);
2741: hr_utility.set_location( 'r_LOP_unique.information2 '||r_LOP_unique.information2,10);
2742: hr_utility.set_location( 'r_LOP_unique.information3 '||r_LOP_unique.information3,10);
2743: -- If reuse objects flag is 'Y' then check for the object in the target business group
2744: -- if found insert the record into PLSql table and exit the loop else try create the
2745: -- object in the target business group
2746: --
2786: --
2787: --DOUBT log_data('LOP',l_new_value,l_prefix || r_LOP_unique.name|| l_suffix,'REUSED');
2788: --
2789: end if ;
2790: hr_utility.set_location( 'found record for update',10);
2791: --
2792: else
2793: --
2794: l_update := false;
2857:
2858: --
2859: l_current_pk_id := r_LOP.information1;
2860: --
2861: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2862: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2863: --
2864: if l_current_pk_id = l_prev_pk_id then
2865: --
2858: --
2859: l_current_pk_id := r_LOP.information1;
2860: --
2861: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
2862: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
2863: --
2864: if l_current_pk_id = l_prev_pk_id then
2865: --
2866: l_first_rec := false ;
2879: end if;
2880:
2881: if l_first_rec and not l_update then
2882: -- Call Create routine.
2883: hr_utility.set_location(' BEN_LER_CHG_OIPL_ENRT_F CREATE_LER_CHG_OIPL_ENRT ',20);
2884: BEN_LER_CHG_OIPL_ENRT_API.CREATE_LER_CHG_OIPL_ENRT(
2885: --
2886: P_VALIDATE => false
2887: ,P_EFFECTIVE_DATE => l_effective_date
2936: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
2937: );
2938: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2939: -- Update all relevent cer records with new pk_id
2940: hr_utility.set_location('Before plsql table ',222);
2941: hr_utility.set_location('new_value id '||l_ler_chg_oipl_enrt_id,222);
2942: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_OIPL_ENRT_ID' ;
2943: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LOP.information1 ;
2944: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_OIPL_ENRT_ID ;
2937: );
2938: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2939: -- Update all relevent cer records with new pk_id
2940: hr_utility.set_location('Before plsql table ',222);
2941: hr_utility.set_location('new_value id '||l_ler_chg_oipl_enrt_id,222);
2942: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_OIPL_ENRT_ID' ;
2943: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LOP.information1 ;
2944: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_OIPL_ENRT_ID ;
2945: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
2943: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LOP.information1 ;
2944: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_OIPL_ENRT_ID ;
2945: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
2946: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LOP_unique.table_route_id;
2947: hr_utility.set_location('After plsql table ',222);
2948: --
2949: -- 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 ) ;
2950: --
2951: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
2953: else
2954: --
2955: -- Call Update routine for the pk_id created in prev run .
2956: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2957: hr_utility.set_location(' BEN_LER_CHG_OIPL_ENRT_F UPDATE_LER_CHG_OIPL_ENRT ',30);
2958: --UPD START
2959: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2960: --
2961: if l_update then
2955: -- Call Update routine for the pk_id created in prev run .
2956: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
2957: hr_utility.set_location(' BEN_LER_CHG_OIPL_ENRT_F UPDATE_LER_CHG_OIPL_ENRT ',30);
2958: --UPD START
2959: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2960: --
2961: if l_update then
2962: --
2963: l_datetrack_mode := r_LOP.datetrack_mode ;
2975: l_object_version_number := r_LOP.information265;
2976: --
2977: end if;
2978: --
2979: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
2980: --
2981: IF l_update OR l_dml_operation <> 'UPDATE' THEN
2982: --UPD END
2983: BEN_LER_CHG_OIPL_ENRT_API.UPDATE_LER_CHG_OIPL_ENRT(
3214: r_LNC_unique.information3 >=
3215: ben_pd_copy_to_ben_one.g_copy_effective_date)
3216: ) then
3217: --
3218: hr_utility.set_location(' r_LNC_unique.table_route_id '||r_LNC_unique.table_route_id,10);
3219: hr_utility.set_location(' r_LNC_unique.information1 '||r_LNC_unique.information1,10);
3220: hr_utility.set_location( 'r_LNC_unique.information2 '||r_LNC_unique.information2,10);
3221: hr_utility.set_location( 'r_LNC_unique.information3 '||r_LNC_unique.information3,10);
3222: -- If reuse objects flag is 'Y' then check for the object in the target business group
3215: ben_pd_copy_to_ben_one.g_copy_effective_date)
3216: ) then
3217: --
3218: hr_utility.set_location(' r_LNC_unique.table_route_id '||r_LNC_unique.table_route_id,10);
3219: hr_utility.set_location(' r_LNC_unique.information1 '||r_LNC_unique.information1,10);
3220: hr_utility.set_location( 'r_LNC_unique.information2 '||r_LNC_unique.information2,10);
3221: hr_utility.set_location( 'r_LNC_unique.information3 '||r_LNC_unique.information3,10);
3222: -- If reuse objects flag is 'Y' then check for the object in the target business group
3223: -- if found insert the record into PLSql table and exit the loop else try create the
3216: ) then
3217: --
3218: hr_utility.set_location(' r_LNC_unique.table_route_id '||r_LNC_unique.table_route_id,10);
3219: hr_utility.set_location(' r_LNC_unique.information1 '||r_LNC_unique.information1,10);
3220: hr_utility.set_location( 'r_LNC_unique.information2 '||r_LNC_unique.information2,10);
3221: hr_utility.set_location( 'r_LNC_unique.information3 '||r_LNC_unique.information3,10);
3222: -- If reuse objects flag is 'Y' then check for the object in the target business group
3223: -- if found insert the record into PLSql table and exit the loop else try create the
3224: -- object in the target business group
3217: --
3218: hr_utility.set_location(' r_LNC_unique.table_route_id '||r_LNC_unique.table_route_id,10);
3219: hr_utility.set_location(' r_LNC_unique.information1 '||r_LNC_unique.information1,10);
3220: hr_utility.set_location( 'r_LNC_unique.information2 '||r_LNC_unique.information2,10);
3221: hr_utility.set_location( 'r_LNC_unique.information3 '||r_LNC_unique.information3,10);
3222: -- If reuse objects flag is 'Y' then check for the object in the target business group
3223: -- if found insert the record into PLSql table and exit the loop else try create the
3224: -- object in the target business group
3225: --
3264: --
3265: --DOUBT log_data('LNC',l_new_value,l_prefix || r_LNC_unique.name|| l_suffix,'REUSED');
3266: --
3267: end if ;
3268: hr_utility.set_location( 'found record for update',10);
3269: --
3270: else
3271: --
3272: l_update := false;
3343:
3344: --
3345: l_current_pk_id := r_LNC.information1;
3346: --
3347: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3348: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3349: --
3350: if l_current_pk_id = l_prev_pk_id then
3351: --
3344: --
3345: l_current_pk_id := r_LNC.information1;
3346: --
3347: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3348: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3349: --
3350: if l_current_pk_id = l_prev_pk_id then
3351: --
3352: l_first_rec := false ;
3365: end if;
3366:
3367: if l_first_rec and not l_update then
3368: -- Call Create routine.
3369: hr_utility.set_location(' BEN_LER_ENRT_CTFN_F CREATE_LER_ENRT_CTFN ',20);
3370: BEN_LER_ENRT_CTFN_API.CREATE_LER_ENRT_CTFN(
3371: --
3372: P_VALIDATE => false
3373: ,P_EFFECTIVE_DATE => l_effective_date
3415: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
3416: );
3417: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3418: -- Update all relevent cer records with new pk_id
3419: hr_utility.set_location('Before plsql table ',222);
3420: hr_utility.set_location('new_value id '||l_ler_enrt_ctfn_id,222);
3421: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_ENRT_CTFN_ID' ;
3422: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LNC.information1 ;
3423: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_ENRT_CTFN_ID ;
3416: );
3417: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3418: -- Update all relevent cer records with new pk_id
3419: hr_utility.set_location('Before plsql table ',222);
3420: hr_utility.set_location('new_value id '||l_ler_enrt_ctfn_id,222);
3421: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_ENRT_CTFN_ID' ;
3422: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LNC.information1 ;
3423: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_ENRT_CTFN_ID ;
3424: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
3422: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LNC.information1 ;
3423: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_ENRT_CTFN_ID ;
3424: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
3425: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LNC_unique.table_route_id;
3426: hr_utility.set_location('After plsql table ',222);
3427: --
3428: -- 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 ) ;
3429: --
3430: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
3432: else
3433: --
3434: -- Call Update routine for the pk_id created in prev run .
3435: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3436: hr_utility.set_location(' BEN_LER_ENRT_CTFN_F UPDATE_LER_ENRT_CTFN ',30);
3437: --UPD START
3438: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3439: --
3440: if l_update then
3434: -- Call Update routine for the pk_id created in prev run .
3435: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3436: hr_utility.set_location(' BEN_LER_ENRT_CTFN_F UPDATE_LER_ENRT_CTFN ',30);
3437: --UPD START
3438: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3439: --
3440: if l_update then
3441: --
3442: l_datetrack_mode := r_LNC.datetrack_mode ;
3454: l_object_version_number := r_LNC.information265;
3455: --
3456: end if;
3457: --
3458: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3459: --
3460: IF l_update OR l_dml_operation <> 'UPDATE' THEN
3461: --UPD END
3462:
3692: r_LRE_unique.information3 >=
3693: ben_pd_copy_to_ben_one.g_copy_effective_date)
3694: ) then
3695: --
3696: hr_utility.set_location(' r_LRE_unique.table_route_id '||r_LRE_unique.table_route_id,10);
3697: hr_utility.set_location(' r_LRE_unique.information1 '||r_LRE_unique.information1,10);
3698: hr_utility.set_location( 'r_LRE_unique.information2 '||r_LRE_unique.information2,10);
3699: hr_utility.set_location( 'r_LRE_unique.information3 '||r_LRE_unique.information3,10);
3700: -- If reuse objects flag is 'Y' then check for the object in the target business group
3693: ben_pd_copy_to_ben_one.g_copy_effective_date)
3694: ) then
3695: --
3696: hr_utility.set_location(' r_LRE_unique.table_route_id '||r_LRE_unique.table_route_id,10);
3697: hr_utility.set_location(' r_LRE_unique.information1 '||r_LRE_unique.information1,10);
3698: hr_utility.set_location( 'r_LRE_unique.information2 '||r_LRE_unique.information2,10);
3699: hr_utility.set_location( 'r_LRE_unique.information3 '||r_LRE_unique.information3,10);
3700: -- If reuse objects flag is 'Y' then check for the object in the target business group
3701: -- if found insert the record into PLSql table and exit the loop else try create the
3694: ) then
3695: --
3696: hr_utility.set_location(' r_LRE_unique.table_route_id '||r_LRE_unique.table_route_id,10);
3697: hr_utility.set_location(' r_LRE_unique.information1 '||r_LRE_unique.information1,10);
3698: hr_utility.set_location( 'r_LRE_unique.information2 '||r_LRE_unique.information2,10);
3699: hr_utility.set_location( 'r_LRE_unique.information3 '||r_LRE_unique.information3,10);
3700: -- If reuse objects flag is 'Y' then check for the object in the target business group
3701: -- if found insert the record into PLSql table and exit the loop else try create the
3702: -- object in the target business group
3695: --
3696: hr_utility.set_location(' r_LRE_unique.table_route_id '||r_LRE_unique.table_route_id,10);
3697: hr_utility.set_location(' r_LRE_unique.information1 '||r_LRE_unique.information1,10);
3698: hr_utility.set_location( 'r_LRE_unique.information2 '||r_LRE_unique.information2,10);
3699: hr_utility.set_location( 'r_LRE_unique.information3 '||r_LRE_unique.information3,10);
3700: -- If reuse objects flag is 'Y' then check for the object in the target business group
3701: -- if found insert the record into PLSql table and exit the loop else try create the
3702: -- object in the target business group
3703: --
3742: --
3743: -- log_data('LER',l_new_value,l_prefix || r_LRE_unique.name|| l_suffix,'REUSED');
3744: --
3745: end if ;
3746: hr_utility.set_location( 'found record for update',10);
3747: --
3748: else
3749: --
3750: l_update := false;
3820:
3821: --
3822: l_current_pk_id := r_LRE.information1;
3823: --
3824: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3825: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3826: --
3827: if l_current_pk_id = l_prev_pk_id then
3828: --
3821: --
3822: l_current_pk_id := r_LRE.information1;
3823: --
3824: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
3825: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
3826: --
3827: if l_current_pk_id = l_prev_pk_id then
3828: --
3829: l_first_rec := false ;
3843:
3844: if l_first_rec and not l_update then
3845: -- Call Create routine.
3846:
3847: hr_utility.set_location(' BEN_LER_RQRS_ENRT_CTFN_F CREATE_LER_RQRS_ENRT_CTFN ',20);
3848: BEN_LER_RQRS_ENRT_CTFN_API.CREATE_LER_RQRS_ENRT_CTFN(
3849: --
3850: P_VALIDATE => false
3851: ,P_EFFECTIVE_DATE => l_effective_date
3899: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
3900: );
3901: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3902: -- Update all relevent cer records with new pk_id
3903: hr_utility.set_location('Before plsql table ',222);
3904: hr_utility.set_location('new_value id '||l_ler_rqrs_enrt_ctfn_id,222);
3905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_RQRS_ENRT_CTFN_ID' ;
3906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRE.information1 ;
3907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_RQRS_ENRT_CTFN_ID ;
3900: );
3901: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3902: -- Update all relevent cer records with new pk_id
3903: hr_utility.set_location('Before plsql table ',222);
3904: hr_utility.set_location('new_value id '||l_ler_rqrs_enrt_ctfn_id,222);
3905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_RQRS_ENRT_CTFN_ID' ;
3906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRE.information1 ;
3907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_RQRS_ENRT_CTFN_ID ;
3908: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
3906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRE.information1 ;
3907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_RQRS_ENRT_CTFN_ID ;
3908: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
3909: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LRE_unique.table_route_id;
3910: hr_utility.set_location('After plsql table ',222);
3911: --
3912: -- 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 ) ;
3913: --
3914: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
3916: else
3917: --
3918: -- Call Update routine for the pk_id created in prev run .
3919: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3920: hr_utility.set_location(' BEN_LER_RQRS_ENRT_CTFN_F UPDATE_LER_RQRS_ENRT_CTFN ',30);
3921: --UPD START
3922: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3923: --
3924: if l_update then
3918: -- Call Update routine for the pk_id created in prev run .
3919: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
3920: hr_utility.set_location(' BEN_LER_RQRS_ENRT_CTFN_F UPDATE_LER_RQRS_ENRT_CTFN ',30);
3921: --UPD START
3922: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3923: --
3924: if l_update then
3925: --
3926: l_datetrack_mode := r_LRE.datetrack_mode ;
3938: l_object_version_number := r_LRE.information265;
3939: --
3940: end if;
3941: --
3942: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
3943: --
3944: IF l_update OR l_dml_operation <> 'UPDATE' THEN
3945: --UPD END
3946:
4179: r_LBC_unique.information3 >=
4180: ben_pd_copy_to_ben_one.g_copy_effective_date)
4181: ) then
4182: --
4183: hr_utility.set_location(' r_LBC_unique.table_route_id '||r_LBC_unique.table_route_id,10);
4184: hr_utility.set_location(' r_LBC_unique.information1 '||r_LBC_unique.information1,10);
4185: hr_utility.set_location( 'r_LBC_unique.information2 '||r_LBC_unique.information2,10);
4186: hr_utility.set_location( 'r_LBC_unique.information3 '||r_LBC_unique.information3,10);
4187: -- If reuse objects flag is 'Y' then check for the object in the target business group
4180: ben_pd_copy_to_ben_one.g_copy_effective_date)
4181: ) then
4182: --
4183: hr_utility.set_location(' r_LBC_unique.table_route_id '||r_LBC_unique.table_route_id,10);
4184: hr_utility.set_location(' r_LBC_unique.information1 '||r_LBC_unique.information1,10);
4185: hr_utility.set_location( 'r_LBC_unique.information2 '||r_LBC_unique.information2,10);
4186: hr_utility.set_location( 'r_LBC_unique.information3 '||r_LBC_unique.information3,10);
4187: -- If reuse objects flag is 'Y' then check for the object in the target business group
4188: -- if found insert the record into PLSql table and exit the loop else try create the
4181: ) then
4182: --
4183: hr_utility.set_location(' r_LBC_unique.table_route_id '||r_LBC_unique.table_route_id,10);
4184: hr_utility.set_location(' r_LBC_unique.information1 '||r_LBC_unique.information1,10);
4185: hr_utility.set_location( 'r_LBC_unique.information2 '||r_LBC_unique.information2,10);
4186: hr_utility.set_location( 'r_LBC_unique.information3 '||r_LBC_unique.information3,10);
4187: -- If reuse objects flag is 'Y' then check for the object in the target business group
4188: -- if found insert the record into PLSql table and exit the loop else try create the
4189: -- object in the target business group
4182: --
4183: hr_utility.set_location(' r_LBC_unique.table_route_id '||r_LBC_unique.table_route_id,10);
4184: hr_utility.set_location(' r_LBC_unique.information1 '||r_LBC_unique.information1,10);
4185: hr_utility.set_location( 'r_LBC_unique.information2 '||r_LBC_unique.information2,10);
4186: hr_utility.set_location( 'r_LBC_unique.information3 '||r_LBC_unique.information3,10);
4187: -- If reuse objects flag is 'Y' then check for the object in the target business group
4188: -- if found insert the record into PLSql table and exit the loop else try create the
4189: -- object in the target business group
4190: --
4228: --
4229: --DOUBT log_data('LBC',l_new_value,l_prefix || r_LBC_unique.name|| l_suffix,'REUSED');
4230: --
4231: end if ;
4232: hr_utility.set_location( 'found record for update',10);
4233: --
4234: else
4235: --
4236: l_update := false;
4306:
4307: --
4308: l_current_pk_id := r_LBC.information1;
4309: --
4310: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4311: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4312: --
4313: if l_current_pk_id = l_prev_pk_id then
4314: --
4307: --
4308: l_current_pk_id := r_LBC.information1;
4309: --
4310: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4311: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4312: --
4313: if l_current_pk_id = l_prev_pk_id then
4314: --
4315: l_first_rec := false ;
4328: end if;
4329:
4330: if l_first_rec and not l_update then
4331: -- Call Create routine.
4332: hr_utility.set_location(' BEN_LER_BNFT_RSTRN_CTFN_F CREATE_LER_BNFT_RSTRN_CTFN ',20);
4333: BEN_LER_BNFT_RSTRN_CTFN_API.CREATE_LER_BNFT_RSTRN_CTFN(
4334: --
4335: P_VALIDATE => false
4336: ,P_EFFECTIVE_DATE => l_effective_date
4378: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
4379: );
4380: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4381: -- Update all relevent cer records with new pk_id
4382: hr_utility.set_location('Before plsql table ',222);
4383: hr_utility.set_location('new_value id '||l_ler_bnft_rstrn_ctfn_id,222);
4384: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_BNFT_RSTRN_CTFN_ID' ;
4385: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LBC.information1 ;
4386: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_BNFT_RSTRN_CTFN_ID ;
4379: );
4380: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4381: -- Update all relevent cer records with new pk_id
4382: hr_utility.set_location('Before plsql table ',222);
4383: hr_utility.set_location('new_value id '||l_ler_bnft_rstrn_ctfn_id,222);
4384: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_BNFT_RSTRN_CTFN_ID' ;
4385: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LBC.information1 ;
4386: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_BNFT_RSTRN_CTFN_ID ;
4387: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
4385: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LBC.information1 ;
4386: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_BNFT_RSTRN_CTFN_ID ;
4387: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
4388: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LBC_unique.table_route_id;
4389: hr_utility.set_location('After plsql table ',222);
4390: --
4391: -- 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 ) ;
4392: --
4393: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
4395: else
4396: --
4397: -- Call Update routine for the pk_id created in prev run .
4398: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4399: hr_utility.set_location(' BEN_LER_BNFT_RSTRN_CTFN_F UPDATE_LER_BNFT_RSTRN_CTFN ',30);
4400: --UPD START
4401: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
4402: --
4403: if l_update then
4397: -- Call Update routine for the pk_id created in prev run .
4398: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4399: hr_utility.set_location(' BEN_LER_BNFT_RSTRN_CTFN_F UPDATE_LER_BNFT_RSTRN_CTFN ',30);
4400: --UPD START
4401: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
4402: --
4403: if l_update then
4404: --
4405: l_datetrack_mode := r_LBC.datetrack_mode ;
4417: l_object_version_number := r_LBC.information265;
4418: --
4419: end if;
4420: --
4421: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
4422: --
4423: IF l_update OR l_dml_operation <> 'UPDATE' THEN
4424: --UPD END
4425:
4654: ben_pd_copy_to_ben_one.g_copy_effective_date)
4655: ) then
4656:
4657: --
4658: hr_utility.set_location(' r_BRC_unique.table_route_id '||r_BRC_unique.table_route_id,10);
4659: hr_utility.set_location(' r_BRC_unique.information1 '||r_BRC_unique.information1,10);
4660: hr_utility.set_location( 'r_BRC_unique.information2 '||r_BRC_unique.information2,10);
4661: hr_utility.set_location( 'r_BRC_unique.information3 '||r_BRC_unique.information3,10);
4662: -- If reuse objects flag is 'Y' then check for the object in the target business group
4655: ) then
4656:
4657: --
4658: hr_utility.set_location(' r_BRC_unique.table_route_id '||r_BRC_unique.table_route_id,10);
4659: hr_utility.set_location(' r_BRC_unique.information1 '||r_BRC_unique.information1,10);
4660: hr_utility.set_location( 'r_BRC_unique.information2 '||r_BRC_unique.information2,10);
4661: hr_utility.set_location( 'r_BRC_unique.information3 '||r_BRC_unique.information3,10);
4662: -- If reuse objects flag is 'Y' then check for the object in the target business group
4663: -- if found insert the record into PLSql table and exit the loop else try create the
4656:
4657: --
4658: hr_utility.set_location(' r_BRC_unique.table_route_id '||r_BRC_unique.table_route_id,10);
4659: hr_utility.set_location(' r_BRC_unique.information1 '||r_BRC_unique.information1,10);
4660: hr_utility.set_location( 'r_BRC_unique.information2 '||r_BRC_unique.information2,10);
4661: hr_utility.set_location( 'r_BRC_unique.information3 '||r_BRC_unique.information3,10);
4662: -- If reuse objects flag is 'Y' then check for the object in the target business group
4663: -- if found insert the record into PLSql table and exit the loop else try create the
4664: -- object in the target business group
4657: --
4658: hr_utility.set_location(' r_BRC_unique.table_route_id '||r_BRC_unique.table_route_id,10);
4659: hr_utility.set_location(' r_BRC_unique.information1 '||r_BRC_unique.information1,10);
4660: hr_utility.set_location( 'r_BRC_unique.information2 '||r_BRC_unique.information2,10);
4661: hr_utility.set_location( 'r_BRC_unique.information3 '||r_BRC_unique.information3,10);
4662: -- If reuse objects flag is 'Y' then check for the object in the target business group
4663: -- if found insert the record into PLSql table and exit the loop else try create the
4664: -- object in the target business group
4665: --
4704: --
4705: --DOUBT log_data('BRC',l_new_value,l_prefix || r_BRC_unique.name|| l_suffix,'REUSED');
4706: --
4707: end if ;
4708: hr_utility.set_location( 'found record for update',10);
4709: --
4710: else
4711: --
4712: l_update := false;
4775:
4776: --
4777: l_current_pk_id := r_BRC.information1;
4778: --
4779: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4780: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4781: --
4782: if l_current_pk_id = l_prev_pk_id then
4783: --
4776: --
4777: l_current_pk_id := r_BRC.information1;
4778: --
4779: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
4780: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
4781: --
4782: if l_current_pk_id = l_prev_pk_id then
4783: --
4784: l_first_rec := false ;
4796: l_effective_date := ben_pd_copy_to_ben_one.g_copy_effective_date;
4797: end if;
4798: if l_first_rec and not l_update then
4799: -- Call Create routine.
4800: hr_utility.set_location(' BEN_BNFT_RSTRN_CTFN_F CREATE_BNFT_RSTRN_CTFN ',20);
4801: BEN_BNFT_RSTRN_CTFN_API.CREATE_BNFT_RSTRN_CTFN(
4802: --
4803: P_VALIDATE => false
4804: ,P_EFFECTIVE_DATE => l_effective_date
4846: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
4847: );
4848: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4849: -- Update all relevent cer records with new pk_id
4850: hr_utility.set_location('Before plsql table ',222);
4851: hr_utility.set_location('new_value id '||l_bnft_rstrn_ctfn_id,222);
4852: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'BNFT_RSTRN_CTFN_ID' ;
4853: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BRC.information1 ;
4854: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_RSTRN_CTFN_ID ;
4847: );
4848: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4849: -- Update all relevent cer records with new pk_id
4850: hr_utility.set_location('Before plsql table ',222);
4851: hr_utility.set_location('new_value id '||l_bnft_rstrn_ctfn_id,222);
4852: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'BNFT_RSTRN_CTFN_ID' ;
4853: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BRC.information1 ;
4854: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_RSTRN_CTFN_ID ;
4855: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
4853: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BRC.information1 ;
4854: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_RSTRN_CTFN_ID ;
4855: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
4856: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_BRC_unique.table_route_id;
4857: hr_utility.set_location('After plsql table ',222);
4858: --
4859: -- 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 ) ;
4860: --
4861: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
4863: else
4864: --
4865: -- Call Update routine for the pk_id created in prev run .
4866: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4867: hr_utility.set_location(' BEN_BNFT_RSTRN_CTFN_F UPDATE_BNFT_RSTRN_CTFN ',30);
4868: --UPD START
4869: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
4870: --
4871: if l_update then
4865: -- Call Update routine for the pk_id created in prev run .
4866: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
4867: hr_utility.set_location(' BEN_BNFT_RSTRN_CTFN_F UPDATE_BNFT_RSTRN_CTFN ',30);
4868: --UPD START
4869: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
4870: --
4871: if l_update then
4872: --
4873: l_datetrack_mode := r_BRC.datetrack_mode ;
4885: l_object_version_number := r_BRC.information265;
4886: --
4887: end if;
4888: --
4889: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
4890: --
4891: IF l_update OR l_dml_operation <> 'UPDATE' THEN
4892: --UPD END
4893:
5121: r_WCN_unique.information3 >=
5122: ben_pd_copy_to_ben_one.g_copy_effective_date)
5123: ) then
5124: --
5125: hr_utility.set_location(' r_WCN_unique.table_route_id '||r_WCN_unique.table_route_id,10);
5126: hr_utility.set_location(' r_WCN_unique.information1 '||r_WCN_unique.information1,10);
5127: hr_utility.set_location( 'r_WCN_unique.information2 '||r_WCN_unique.information2,10);
5128: hr_utility.set_location( 'r_WCN_unique.information3 '||r_WCN_unique.information3,10);
5129: -- If reuse objects flag is 'Y' then check for the object in the target business group
5122: ben_pd_copy_to_ben_one.g_copy_effective_date)
5123: ) then
5124: --
5125: hr_utility.set_location(' r_WCN_unique.table_route_id '||r_WCN_unique.table_route_id,10);
5126: hr_utility.set_location(' r_WCN_unique.information1 '||r_WCN_unique.information1,10);
5127: hr_utility.set_location( 'r_WCN_unique.information2 '||r_WCN_unique.information2,10);
5128: hr_utility.set_location( 'r_WCN_unique.information3 '||r_WCN_unique.information3,10);
5129: -- If reuse objects flag is 'Y' then check for the object in the target business group
5130: -- if found insert the record into PLSql table and exit the loop else try create the
5123: ) then
5124: --
5125: hr_utility.set_location(' r_WCN_unique.table_route_id '||r_WCN_unique.table_route_id,10);
5126: hr_utility.set_location(' r_WCN_unique.information1 '||r_WCN_unique.information1,10);
5127: hr_utility.set_location( 'r_WCN_unique.information2 '||r_WCN_unique.information2,10);
5128: hr_utility.set_location( 'r_WCN_unique.information3 '||r_WCN_unique.information3,10);
5129: -- If reuse objects flag is 'Y' then check for the object in the target business group
5130: -- if found insert the record into PLSql table and exit the loop else try create the
5131: -- object in the target business group
5124: --
5125: hr_utility.set_location(' r_WCN_unique.table_route_id '||r_WCN_unique.table_route_id,10);
5126: hr_utility.set_location(' r_WCN_unique.information1 '||r_WCN_unique.information1,10);
5127: hr_utility.set_location( 'r_WCN_unique.information2 '||r_WCN_unique.information2,10);
5128: hr_utility.set_location( 'r_WCN_unique.information3 '||r_WCN_unique.information3,10);
5129: -- If reuse objects flag is 'Y' then check for the object in the target business group
5130: -- if found insert the record into PLSql table and exit the loop else try create the
5131: -- object in the target business group
5132: --
5170: --
5171: --DOUBT log_data('WCN',l_new_value,l_prefix || r_WCN_unique.name|| l_suffix,'REUSED');
5172: --
5173: end if ;
5174: hr_utility.set_location( 'found record for update',10);
5175: --
5176: else
5177: --
5178: l_update := false;
5248: if not l_object_found_in_target OR l_update then
5249: --
5250: l_current_pk_id := r_WCN.information1;
5251: --
5252: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5253: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5254: --
5255: if l_current_pk_id = l_prev_pk_id then
5256: --
5249: --
5250: l_current_pk_id := r_WCN.information1;
5251: --
5252: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5253: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5254: --
5255: if l_current_pk_id = l_prev_pk_id then
5256: --
5257: l_first_rec := false ;
5270: end if;
5271:
5272: if l_first_rec and not l_update then
5273: -- Call Create routine.
5274: hr_utility.set_location(' BEN_WV_PRTN_RSN_CTFN_PL_F CREATE_WV_PRTN_RSN_CTFN_PL ',20);
5275: BEN_WV_PRTN_RSN_CTFN_PL_API.CREATE_WV_PRTN_RSN_CTFN_PL(
5276: --
5277: P_VALIDATE => false
5278: ,P_EFFECTIVE_DATE => l_effective_date
5322: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
5323: );
5324: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5325: -- Update all relevent cer records with new pk_id
5326: hr_utility.set_location('Before plsql table ',222);
5327: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_ctfn_pl_id,222);
5328: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_CTFN_PL_ID' ;
5329: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WCN.information1 ;
5330: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_CTFN_PL_ID ;
5323: );
5324: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5325: -- Update all relevent cer records with new pk_id
5326: hr_utility.set_location('Before plsql table ',222);
5327: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_ctfn_pl_id,222);
5328: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_CTFN_PL_ID' ;
5329: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WCN.information1 ;
5330: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_CTFN_PL_ID ;
5331: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
5329: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WCN.information1 ;
5330: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_CTFN_PL_ID ;
5331: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
5332: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_WCN_unique.table_route_id;
5333: hr_utility.set_location('After plsql table ',222);
5334: --
5335: -- 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 ) ;
5336: --
5337: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
5339: else
5340: --
5341: -- Call Update routine for the pk_id created in prev run .
5342: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5343: hr_utility.set_location(' BEN_WV_PRTN_RSN_CTFN_PL_F UPDATE_WV_PRTN_RSN_CTFN_PL ',30);
5344: --UPD START
5345: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
5346: --
5347: if l_update then
5341: -- Call Update routine for the pk_id created in prev run .
5342: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5343: hr_utility.set_location(' BEN_WV_PRTN_RSN_CTFN_PL_F UPDATE_WV_PRTN_RSN_CTFN_PL ',30);
5344: --UPD START
5345: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
5346: --
5347: if l_update then
5348: --
5349: l_datetrack_mode := r_WCN.datetrack_mode ;
5361: l_object_version_number := r_WCN.information265;
5362: --
5363: end if;
5364: --
5365: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
5366: --
5367: IF l_update OR l_dml_operation <> 'UPDATE' THEN
5368: --UPD END
5369:
5599: ben_pd_copy_to_ben_one.g_copy_effective_date)
5600: ) then
5601:
5602: --
5603: hr_utility.set_location(' r_WPN_unique.table_route_id '||r_WPN_unique.table_route_id,10);
5604: hr_utility.set_location(' r_WPN_unique.information1 '||r_WPN_unique.information1,10);
5605: hr_utility.set_location( 'r_WPN_unique.information2 '||r_WPN_unique.information2,10);
5606: hr_utility.set_location( 'r_WPN_unique.information3 '||r_WPN_unique.information3,10);
5607: -- If reuse objects flag is 'Y' then check for the object in the target business group
5600: ) then
5601:
5602: --
5603: hr_utility.set_location(' r_WPN_unique.table_route_id '||r_WPN_unique.table_route_id,10);
5604: hr_utility.set_location(' r_WPN_unique.information1 '||r_WPN_unique.information1,10);
5605: hr_utility.set_location( 'r_WPN_unique.information2 '||r_WPN_unique.information2,10);
5606: hr_utility.set_location( 'r_WPN_unique.information3 '||r_WPN_unique.information3,10);
5607: -- If reuse objects flag is 'Y' then check for the object in the target business group
5608: -- if found insert the record into PLSql table and exit the loop else try create the
5601:
5602: --
5603: hr_utility.set_location(' r_WPN_unique.table_route_id '||r_WPN_unique.table_route_id,10);
5604: hr_utility.set_location(' r_WPN_unique.information1 '||r_WPN_unique.information1,10);
5605: hr_utility.set_location( 'r_WPN_unique.information2 '||r_WPN_unique.information2,10);
5606: hr_utility.set_location( 'r_WPN_unique.information3 '||r_WPN_unique.information3,10);
5607: -- If reuse objects flag is 'Y' then check for the object in the target business group
5608: -- if found insert the record into PLSql table and exit the loop else try create the
5609: -- object in the target business group
5602: --
5603: hr_utility.set_location(' r_WPN_unique.table_route_id '||r_WPN_unique.table_route_id,10);
5604: hr_utility.set_location(' r_WPN_unique.information1 '||r_WPN_unique.information1,10);
5605: hr_utility.set_location( 'r_WPN_unique.information2 '||r_WPN_unique.information2,10);
5606: hr_utility.set_location( 'r_WPN_unique.information3 '||r_WPN_unique.information3,10);
5607: -- If reuse objects flag is 'Y' then check for the object in the target business group
5608: -- if found insert the record into PLSql table and exit the loop else try create the
5609: -- object in the target business group
5610: --
5647: --
5648: -- DOUBT log_data('WPN',l_new_value,l_prefix || r_WPN_unique.name|| l_suffix,'REUSED');
5649: --
5650: end if ;
5651: hr_utility.set_location( 'found record for update',10);
5652: --
5653: else
5654: --
5655: l_update := false;
5724: if not l_object_found_in_target OR l_update then
5725: --
5726: l_current_pk_id := r_WPN.information1;
5727: --
5728: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5729: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5730: --
5731: if l_current_pk_id = l_prev_pk_id then
5732: --
5725: --
5726: l_current_pk_id := r_WPN.information1;
5727: --
5728: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
5729: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
5730: --
5731: if l_current_pk_id = l_prev_pk_id then
5732: --
5733: l_first_rec := false ;
5746: end if;
5747:
5748: if l_first_rec and not l_update then
5749: -- Call Create routine.
5750: hr_utility.set_location(' BEN_WV_PRTN_RSN_PL_F CREATE_WV_PRTN_REASON_PL ',20);
5751: BEN_WV_PRTN_REASON_PL_API.CREATE_WV_PRTN_REASON_PL(
5752: --
5753: P_VALIDATE => false
5754: ,P_EFFECTIVE_DATE => l_effective_date
5795: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
5796: );
5797: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5798: -- Update all relevent cer records with new pk_id
5799: hr_utility.set_location('Before plsql table ',222);
5800: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_pl_id,222);
5801: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_PL_ID' ;
5802: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WPN.information1 ;
5803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_PL_ID ;
5796: );
5797: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5798: -- Update all relevent cer records with new pk_id
5799: hr_utility.set_location('Before plsql table ',222);
5800: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_pl_id,222);
5801: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_PL_ID' ;
5802: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WPN.information1 ;
5803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_PL_ID ;
5804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
5802: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WPN.information1 ;
5803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_PL_ID ;
5804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
5805: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_WPN_unique.table_route_id;
5806: hr_utility.set_location('After plsql table ',222);
5807: --
5808: -- 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 ) ;
5809: --
5810: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
5812: else
5813: --
5814: -- Call Update routine for the pk_id created in prev run .
5815: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5816: hr_utility.set_location(' BEN_WV_PRTN_RSN_PL_F UPDATE_WV_PRTN_REASON_PL ',30);
5817: --UPD START
5818: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
5819: --
5820: if l_update then
5814: -- Call Update routine for the pk_id created in prev run .
5815: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
5816: hr_utility.set_location(' BEN_WV_PRTN_RSN_PL_F UPDATE_WV_PRTN_REASON_PL ',30);
5817: --UPD START
5818: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
5819: --
5820: if l_update then
5821: --
5822: l_datetrack_mode := r_WPN.datetrack_mode ;
5834: l_object_version_number := r_WPN.information265;
5835: --
5836: end if;
5837: --
5838: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
5839: --
5840: IF l_update OR l_dml_operation <> 'UPDATE' THEN
5841: --UPD END
5842:
6068: ben_pd_copy_to_ben_one.g_copy_effective_date)
6069: ) then
6070:
6071: --
6072: hr_utility.set_location(' r_VRP_unique.table_route_id '||r_VRP_unique.table_route_id,10);
6073: hr_utility.set_location(' r_VRP_unique.information1 '||r_VRP_unique.information1,10);
6074: hr_utility.set_location( 'r_VRP_unique.information2 '||r_VRP_unique.information2,10);
6075: hr_utility.set_location( 'r_VRP_unique.information3 '||r_VRP_unique.information3,10);
6076: -- If reuse objects flag is 'Y' then check for the object in the target business group
6069: ) then
6070:
6071: --
6072: hr_utility.set_location(' r_VRP_unique.table_route_id '||r_VRP_unique.table_route_id,10);
6073: hr_utility.set_location(' r_VRP_unique.information1 '||r_VRP_unique.information1,10);
6074: hr_utility.set_location( 'r_VRP_unique.information2 '||r_VRP_unique.information2,10);
6075: hr_utility.set_location( 'r_VRP_unique.information3 '||r_VRP_unique.information3,10);
6076: -- If reuse objects flag is 'Y' then check for the object in the target business group
6077: -- if found insert the record into PLSql table and exit the loop else try create the
6070:
6071: --
6072: hr_utility.set_location(' r_VRP_unique.table_route_id '||r_VRP_unique.table_route_id,10);
6073: hr_utility.set_location(' r_VRP_unique.information1 '||r_VRP_unique.information1,10);
6074: hr_utility.set_location( 'r_VRP_unique.information2 '||r_VRP_unique.information2,10);
6075: hr_utility.set_location( 'r_VRP_unique.information3 '||r_VRP_unique.information3,10);
6076: -- If reuse objects flag is 'Y' then check for the object in the target business group
6077: -- if found insert the record into PLSql table and exit the loop else try create the
6078: -- object in the target business group
6071: --
6072: hr_utility.set_location(' r_VRP_unique.table_route_id '||r_VRP_unique.table_route_id,10);
6073: hr_utility.set_location(' r_VRP_unique.information1 '||r_VRP_unique.information1,10);
6074: hr_utility.set_location( 'r_VRP_unique.information2 '||r_VRP_unique.information2,10);
6075: hr_utility.set_location( 'r_VRP_unique.information3 '||r_VRP_unique.information3,10);
6076: -- If reuse objects flag is 'Y' then check for the object in the target business group
6077: -- if found insert the record into PLSql table and exit the loop else try create the
6078: -- object in the target business group
6079: --
6116: --
6117: --DOUBT log_data('VRP',l_new_value,l_prefix || r_VRP_unique.name|| l_suffix,'REUSED');
6118: --
6119: end if ;
6120: hr_utility.set_location( 'found record for update',10);
6121: --
6122: else
6123: --
6124: l_update := false;
6193: if not l_object_found_in_target OR l_update then
6194: --
6195: l_current_pk_id := r_VRP.information1;
6196: --
6197: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6198: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6199: --
6200: if l_current_pk_id = l_prev_pk_id then
6201: --
6194: --
6195: l_current_pk_id := r_VRP.information1;
6196: --
6197: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6198: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6199: --
6200: if l_current_pk_id = l_prev_pk_id then
6201: --
6202: l_first_rec := false ;
6215: end if;
6216:
6217: if l_first_rec and not l_update then
6218: -- Call Create routine.
6219: hr_utility.set_location(' BEN_VALD_RLSHP_FOR_REIMB_F CREATE_VALD_RLSHP_FOR_REIMB ',20);
6220: BEN_VALD_RLSHP_FOR_REIMB_API.CREATE_VALD_RLSHP_FOR_REIMB(
6221: --
6222: P_VALIDATE => false
6223: ,P_EFFECTIVE_DATE => l_effective_date
6263: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
6264: );
6265: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6266: -- Update all relevent cer records with new pk_id
6267: hr_utility.set_location('Before plsql table ',222);
6268: hr_utility.set_location('new_value id '||l_vald_rlshp_for_reimb_id,222);
6269: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'VALD_RLSHP_FOR_REIMB_ID' ;
6270: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_VRP.information1 ;
6271: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_VALD_RLSHP_FOR_REIMB_ID ;
6264: );
6265: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6266: -- Update all relevent cer records with new pk_id
6267: hr_utility.set_location('Before plsql table ',222);
6268: hr_utility.set_location('new_value id '||l_vald_rlshp_for_reimb_id,222);
6269: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'VALD_RLSHP_FOR_REIMB_ID' ;
6270: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_VRP.information1 ;
6271: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_VALD_RLSHP_FOR_REIMB_ID ;
6272: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
6270: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_VRP.information1 ;
6271: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_VALD_RLSHP_FOR_REIMB_ID ;
6272: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
6273: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_VRP_unique.table_route_id;
6274: hr_utility.set_location('After plsql table ',222);
6275: --
6276: -- 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 ) ;
6277: --
6278: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
6280: else
6281: --
6282: -- Call Update routine for the pk_id created in prev run .
6283: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6284: hr_utility.set_location(' BEN_VALD_RLSHP_FOR_REIMB_F UPDATE_VALD_RLSHP_FOR_REIMB ',30);
6285: --UPD START
6286: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6287: --
6288: if l_update then
6282: -- Call Update routine for the pk_id created in prev run .
6283: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6284: hr_utility.set_location(' BEN_VALD_RLSHP_FOR_REIMB_F UPDATE_VALD_RLSHP_FOR_REIMB ',30);
6285: --UPD START
6286: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6287: --
6288: if l_update then
6289: --
6290: l_datetrack_mode := r_VRP.datetrack_mode ;
6302: l_object_version_number := r_VRP.information265;
6303: --
6304: end if;
6305: --
6306: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6307: --
6308: IF l_update OR l_dml_operation <> 'UPDATE' THEN
6309: --UPD END
6310:
6536: r_PCT_unique.information3 >=
6537: ben_pd_copy_to_ben_one.g_copy_effective_date)
6538: ) then
6539: --
6540: hr_utility.set_location(' r_PCT_unique.table_route_id '||r_PCT_unique.table_route_id,10);
6541: hr_utility.set_location(' r_PCT_unique.information1 '||r_PCT_unique.information1,10);
6542: hr_utility.set_location( 'r_PCT_unique.information2 '||r_PCT_unique.information2,10);
6543: hr_utility.set_location( 'r_PCT_unique.information3 '||r_PCT_unique.information3,10);
6544: -- If reuse objects flag is 'Y' then check for the object in the target business group
6537: ben_pd_copy_to_ben_one.g_copy_effective_date)
6538: ) then
6539: --
6540: hr_utility.set_location(' r_PCT_unique.table_route_id '||r_PCT_unique.table_route_id,10);
6541: hr_utility.set_location(' r_PCT_unique.information1 '||r_PCT_unique.information1,10);
6542: hr_utility.set_location( 'r_PCT_unique.information2 '||r_PCT_unique.information2,10);
6543: hr_utility.set_location( 'r_PCT_unique.information3 '||r_PCT_unique.information3,10);
6544: -- If reuse objects flag is 'Y' then check for the object in the target business group
6545: -- if found insert the record into PLSql table and exit the loop else try create the
6538: ) then
6539: --
6540: hr_utility.set_location(' r_PCT_unique.table_route_id '||r_PCT_unique.table_route_id,10);
6541: hr_utility.set_location(' r_PCT_unique.information1 '||r_PCT_unique.information1,10);
6542: hr_utility.set_location( 'r_PCT_unique.information2 '||r_PCT_unique.information2,10);
6543: hr_utility.set_location( 'r_PCT_unique.information3 '||r_PCT_unique.information3,10);
6544: -- If reuse objects flag is 'Y' then check for the object in the target business group
6545: -- if found insert the record into PLSql table and exit the loop else try create the
6546: -- object in the target business group
6539: --
6540: hr_utility.set_location(' r_PCT_unique.table_route_id '||r_PCT_unique.table_route_id,10);
6541: hr_utility.set_location(' r_PCT_unique.information1 '||r_PCT_unique.information1,10);
6542: hr_utility.set_location( 'r_PCT_unique.information2 '||r_PCT_unique.information2,10);
6543: hr_utility.set_location( 'r_PCT_unique.information3 '||r_PCT_unique.information3,10);
6544: -- If reuse objects flag is 'Y' then check for the object in the target business group
6545: -- if found insert the record into PLSql table and exit the loop else try create the
6546: -- object in the target business group
6547: --
6586: --
6587: --DOUBT log_data('PCT',l_new_value,l_prefix || r_PCT_unique.name|| l_suffix,'REUSED');
6588: --
6589: end if ;
6590: hr_utility.set_location( 'found record for update',10);
6591: --
6592: else
6593: --
6594: l_update := false;
6664:
6665: --
6666: l_current_pk_id := r_PCT.information1;
6667: --
6668: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6669: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6670: --
6671: if l_current_pk_id = l_prev_pk_id then
6672: --
6665: --
6666: l_current_pk_id := r_PCT.information1;
6667: --
6668: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
6669: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
6670: --
6671: if l_current_pk_id = l_prev_pk_id then
6672: --
6673: l_first_rec := false ;
6686: end if;
6687:
6688: if l_first_rec and not l_update then
6689: -- Call Create routine.
6690: hr_utility.set_location(' BEN_PL_GD_R_SVC_CTFN_F CREATE_PLAN_GOODS_SERV_CERT ',20);
6691: BEN_PLAN_GOODS_SERV_CERT_API.CREATE_PLAN_GOODS_SERV_CERT(
6692: --
6693: P_VALIDATE => false
6694: ,P_EFFECTIVE_DATE => l_effective_date
6740: );
6741: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6742: -- Update all relevent cer records with new pk_id
6743:
6744: hr_utility.set_location('Before plsql table ',222);
6745: hr_utility.set_location('new_value id '||l_pl_gd_r_svc_ctfn_id,222);
6746: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_GD_R_SVC_CTFN_ID' ;
6747: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCT.information1 ;
6748: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_GD_R_SVC_CTFN_ID ;
6741: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6742: -- Update all relevent cer records with new pk_id
6743:
6744: hr_utility.set_location('Before plsql table ',222);
6745: hr_utility.set_location('new_value id '||l_pl_gd_r_svc_ctfn_id,222);
6746: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_GD_R_SVC_CTFN_ID' ;
6747: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCT.information1 ;
6748: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_GD_R_SVC_CTFN_ID ;
6749: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
6747: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCT.information1 ;
6748: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_GD_R_SVC_CTFN_ID ;
6749: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
6750: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PCT_unique.table_route_id;
6751: hr_utility.set_location('After plsql table ',222);
6752: --
6753: -- 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 ) ;
6754: --
6755: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
6757: else
6758: --
6759: -- Call Update routine for the pk_id created in prev run .
6760: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6761: hr_utility.set_location(' BEN_PL_GD_R_SVC_CTFN_F UPDATE_PLAN_GOODS_SERV_CERT ',30);
6762: --UPD START
6763: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6764: --
6765: if l_update then
6759: -- Call Update routine for the pk_id created in prev run .
6760: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
6761: hr_utility.set_location(' BEN_PL_GD_R_SVC_CTFN_F UPDATE_PLAN_GOODS_SERV_CERT ',30);
6762: --UPD START
6763: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6764: --
6765: if l_update then
6766: --
6767: l_datetrack_mode := r_PCT.datetrack_mode ;
6779: l_object_version_number := r_PCT.information265;
6780: --
6781: end if;
6782: --
6783: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
6784: --
6785: IF l_update OR l_dml_operation <> 'UPDATE' THEN
6786: --UPD END
6787: BEN_PLAN_GOODS_SERV_CERT_API.UPDATE_PLAN_GOODS_SERV_CERT(
7014: r_VGS_unique.information3 >=
7015: ben_pd_copy_to_ben_one.g_copy_effective_date)
7016: ) then
7017: --
7018: hr_utility.set_location(' r_VGS_unique.table_route_id '||r_VGS_unique.table_route_id,10);
7019: hr_utility.set_location(' r_VGS_unique.information1 '||r_VGS_unique.information1,10);
7020: hr_utility.set_location( 'r_VGS_unique.information2 '||r_VGS_unique.information2,10);
7021: hr_utility.set_location( 'r_VGS_unique.information3 '||r_VGS_unique.information3,10);
7022: -- If reuse objects flag is 'Y' then check for the object in the target business group
7015: ben_pd_copy_to_ben_one.g_copy_effective_date)
7016: ) then
7017: --
7018: hr_utility.set_location(' r_VGS_unique.table_route_id '||r_VGS_unique.table_route_id,10);
7019: hr_utility.set_location(' r_VGS_unique.information1 '||r_VGS_unique.information1,10);
7020: hr_utility.set_location( 'r_VGS_unique.information2 '||r_VGS_unique.information2,10);
7021: hr_utility.set_location( 'r_VGS_unique.information3 '||r_VGS_unique.information3,10);
7022: -- If reuse objects flag is 'Y' then check for the object in the target business group
7023: -- if found insert the record into PLSql table and exit the loop else try create the
7016: ) then
7017: --
7018: hr_utility.set_location(' r_VGS_unique.table_route_id '||r_VGS_unique.table_route_id,10);
7019: hr_utility.set_location(' r_VGS_unique.information1 '||r_VGS_unique.information1,10);
7020: hr_utility.set_location( 'r_VGS_unique.information2 '||r_VGS_unique.information2,10);
7021: hr_utility.set_location( 'r_VGS_unique.information3 '||r_VGS_unique.information3,10);
7022: -- If reuse objects flag is 'Y' then check for the object in the target business group
7023: -- if found insert the record into PLSql table and exit the loop else try create the
7024: -- object in the target business group
7017: --
7018: hr_utility.set_location(' r_VGS_unique.table_route_id '||r_VGS_unique.table_route_id,10);
7019: hr_utility.set_location(' r_VGS_unique.information1 '||r_VGS_unique.information1,10);
7020: hr_utility.set_location( 'r_VGS_unique.information2 '||r_VGS_unique.information2,10);
7021: hr_utility.set_location( 'r_VGS_unique.information3 '||r_VGS_unique.information3,10);
7022: -- If reuse objects flag is 'Y' then check for the object in the target business group
7023: -- if found insert the record into PLSql table and exit the loop else try create the
7024: -- object in the target business group
7025: --
7062: --
7063: --DOUBT log_data('VGS',l_new_value,l_prefix || r_VGS_unique.name|| l_suffix,'REUSED');
7064: --
7065: end if ;
7066: hr_utility.set_location( 'found record for update',10);
7067: --
7068: else
7069: --
7070: l_update := false;
7140: if not l_object_found_in_target OR l_update then
7141: --
7142: l_current_pk_id := r_VGS.information1;
7143: --
7144: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7145: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7146: --
7147: if l_current_pk_id = l_prev_pk_id then
7148: --
7141: --
7142: l_current_pk_id := r_VGS.information1;
7143: --
7144: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7145: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7146: --
7147: if l_current_pk_id = l_prev_pk_id then
7148: --
7149: l_first_rec := false ;
7162: end if;
7163:
7164: if l_first_rec and not l_update then
7165: -- Call Create routine.
7166: hr_utility.set_location(' BEN_PL_GD_OR_SVC_F CREATE_PLAN_GOODS_SERVICES ',20);
7167: BEN_PLAN_GOODS_SERVICES_API.CREATE_PLAN_GOODS_SERVICES(
7168: --
7169: P_VALIDATE => false
7170: ,P_EFFECTIVE_DATE => l_effective_date
7215: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
7216: );
7217: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7218: -- Update all relevent cer records with new pk_id
7219: hr_utility.set_location('Before plsql table ',222);
7220: hr_utility.set_location('new_value id '||l_pl_gd_or_svc_id,222);
7221: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_GD_OR_SVC_ID' ;
7222: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_VGS.information1 ;
7223: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_GD_OR_SVC_ID ;
7216: );
7217: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7218: -- Update all relevent cer records with new pk_id
7219: hr_utility.set_location('Before plsql table ',222);
7220: hr_utility.set_location('new_value id '||l_pl_gd_or_svc_id,222);
7221: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_GD_OR_SVC_ID' ;
7222: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_VGS.information1 ;
7223: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_GD_OR_SVC_ID ;
7224: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
7222: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_VGS.information1 ;
7223: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_GD_OR_SVC_ID ;
7224: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
7225: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_VGS_unique.table_route_id;
7226: hr_utility.set_location('After plsql table ',222);
7227: --
7228: -- 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 ) ;
7229: --
7230: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
7232: else
7233: --
7234: -- Call Update routine for the pk_id created in prev run .
7235: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7236: hr_utility.set_location(' BEN_PL_GD_OR_SVC_F UPDATE_PLAN_GOODS_SERVICES ',30);
7237: --UPD START
7238: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7239: --
7240: if l_update then
7234: -- Call Update routine for the pk_id created in prev run .
7235: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7236: hr_utility.set_location(' BEN_PL_GD_OR_SVC_F UPDATE_PLAN_GOODS_SERVICES ',30);
7237: --UPD START
7238: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7239: --
7240: if l_update then
7241: --
7242: l_datetrack_mode := r_VGS.datetrack_mode ;
7254: l_object_version_number := r_VGS.information265;
7255: --
7256: end if;
7257: --
7258: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7259: --
7260: IF l_update OR l_dml_operation <> 'UPDATE' THEN
7261: --UPD END
7262:
7498: ben_pd_copy_to_ben_one.g_copy_effective_date)
7499: ) then
7500:
7501: --
7502: hr_utility.set_location(' r_LBR_unique.table_route_id '||r_LBR_unique.table_route_id,10);
7503: hr_utility.set_location(' r_LBR_unique.information1 '||r_LBR_unique.information1,10);
7504: hr_utility.set_location( 'r_LBR_unique.information2 '||r_LBR_unique.information2,10);
7505: hr_utility.set_location( 'r_LBR_unique.information3 '||r_LBR_unique.information3,10);
7506: -- If reuse objects flag is 'Y' then check for the object in the target business group
7499: ) then
7500:
7501: --
7502: hr_utility.set_location(' r_LBR_unique.table_route_id '||r_LBR_unique.table_route_id,10);
7503: hr_utility.set_location(' r_LBR_unique.information1 '||r_LBR_unique.information1,10);
7504: hr_utility.set_location( 'r_LBR_unique.information2 '||r_LBR_unique.information2,10);
7505: hr_utility.set_location( 'r_LBR_unique.information3 '||r_LBR_unique.information3,10);
7506: -- If reuse objects flag is 'Y' then check for the object in the target business group
7507: -- if found insert the record into PLSql table and exit the loop else try create the
7500:
7501: --
7502: hr_utility.set_location(' r_LBR_unique.table_route_id '||r_LBR_unique.table_route_id,10);
7503: hr_utility.set_location(' r_LBR_unique.information1 '||r_LBR_unique.information1,10);
7504: hr_utility.set_location( 'r_LBR_unique.information2 '||r_LBR_unique.information2,10);
7505: hr_utility.set_location( 'r_LBR_unique.information3 '||r_LBR_unique.information3,10);
7506: -- If reuse objects flag is 'Y' then check for the object in the target business group
7507: -- if found insert the record into PLSql table and exit the loop else try create the
7508: -- object in the target business group
7501: --
7502: hr_utility.set_location(' r_LBR_unique.table_route_id '||r_LBR_unique.table_route_id,10);
7503: hr_utility.set_location(' r_LBR_unique.information1 '||r_LBR_unique.information1,10);
7504: hr_utility.set_location( 'r_LBR_unique.information2 '||r_LBR_unique.information2,10);
7505: hr_utility.set_location( 'r_LBR_unique.information3 '||r_LBR_unique.information3,10);
7506: -- If reuse objects flag is 'Y' then check for the object in the target business group
7507: -- if found insert the record into PLSql table and exit the loop else try create the
7508: -- object in the target business group
7509: --
7550: --
7551: --DOUBT log_data('LBR',l_new_value,l_prefix || r_LBR_unique.name|| l_suffix,'REUSED');
7552: --
7553: end if ;
7554: hr_utility.set_location( 'found record for update',10);
7555: --
7556: else
7557: --
7558: l_update := false;
7629:
7630: --
7631: l_current_pk_id := r_LBR.information1;
7632: --
7633: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7634: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7635: --
7636: if l_current_pk_id = l_prev_pk_id then
7637: --
7630: --
7631: l_current_pk_id := r_LBR.information1;
7632: --
7633: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
7634: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
7635: --
7636: if l_current_pk_id = l_prev_pk_id then
7637: --
7638: l_first_rec := false ;
7651: end if;
7652:
7653: if l_first_rec and not l_update then
7654: -- Call Create routine.
7655: hr_utility.set_location(' BEN_LER_BNFT_RSTRN_F CREATE_LER_BNFT_RSTRN ',20);
7656: BEN_LER_BNFT_RSTRN_API.CREATE_LER_BNFT_RSTRN(
7657: --
7658: P_VALIDATE => false
7659: ,P_EFFECTIVE_DATE => l_effective_date
7720: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
7721: );
7722: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7723: -- Update all relevent cer records with new pk_id
7724: hr_utility.set_location('Before plsql table ',222);
7725: hr_utility.set_location('new_value id '||l_ler_bnft_rstrn_id,222);
7726: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_BNFT_RSTRN_ID' ;
7727: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LBR.information1 ;
7728: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_BNFT_RSTRN_ID ;
7721: );
7722: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7723: -- Update all relevent cer records with new pk_id
7724: hr_utility.set_location('Before plsql table ',222);
7725: hr_utility.set_location('new_value id '||l_ler_bnft_rstrn_id,222);
7726: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_BNFT_RSTRN_ID' ;
7727: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LBR.information1 ;
7728: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_BNFT_RSTRN_ID ;
7729: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
7727: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LBR.information1 ;
7728: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_BNFT_RSTRN_ID ;
7729: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
7730: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LBR_unique.table_route_id;
7731: hr_utility.set_location('After plsql table ',222);
7732: --
7733: -- 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 ) ;
7734: --
7735: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
7737: else
7738: --
7739: -- Call Update routine for the pk_id created in prev run .
7740: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7741: hr_utility.set_location(' BEN_LER_BNFT_RSTRN_F UPDATE_LER_BNFT_RSTRN ',30);
7742: --UPD START
7743: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7744: --
7745: if l_update then
7739: -- Call Update routine for the pk_id created in prev run .
7740: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
7741: hr_utility.set_location(' BEN_LER_BNFT_RSTRN_F UPDATE_LER_BNFT_RSTRN ',30);
7742: --UPD START
7743: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7744: --
7745: if l_update then
7746: --
7747: l_datetrack_mode := r_LBR.datetrack_mode ;
7759: l_object_version_number := r_LBR.information265;
7760: --
7761: end if;
7762: --
7763: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
7764: --
7765: IF l_update OR l_dml_operation <> 'UPDATE' THEN
7766: --UPD END
7767:
8016: ben_pd_copy_to_ben_one.g_copy_effective_date)
8017: ) then
8018:
8019: --
8020: hr_utility.set_location(' r_LPR1_unique.table_route_id '||r_LPR1_unique.table_route_id,10);
8021: hr_utility.set_location(' r_LPR1_unique.information1 '||r_LPR1_unique.information1,10);
8022: hr_utility.set_location( 'r_LPR1_unique.information2 '||r_LPR1_unique.information2,10);
8023: hr_utility.set_location( 'r_LPR1_unique.information3 '||r_LPR1_unique.information3,10);
8024: -- If reuse objects flag is 'Y' then check for the object in the target business group
8017: ) then
8018:
8019: --
8020: hr_utility.set_location(' r_LPR1_unique.table_route_id '||r_LPR1_unique.table_route_id,10);
8021: hr_utility.set_location(' r_LPR1_unique.information1 '||r_LPR1_unique.information1,10);
8022: hr_utility.set_location( 'r_LPR1_unique.information2 '||r_LPR1_unique.information2,10);
8023: hr_utility.set_location( 'r_LPR1_unique.information3 '||r_LPR1_unique.information3,10);
8024: -- If reuse objects flag is 'Y' then check for the object in the target business group
8025: -- if found insert the record into PLSql table and exit the loop else try create the
8018:
8019: --
8020: hr_utility.set_location(' r_LPR1_unique.table_route_id '||r_LPR1_unique.table_route_id,10);
8021: hr_utility.set_location(' r_LPR1_unique.information1 '||r_LPR1_unique.information1,10);
8022: hr_utility.set_location( 'r_LPR1_unique.information2 '||r_LPR1_unique.information2,10);
8023: hr_utility.set_location( 'r_LPR1_unique.information3 '||r_LPR1_unique.information3,10);
8024: -- If reuse objects flag is 'Y' then check for the object in the target business group
8025: -- if found insert the record into PLSql table and exit the loop else try create the
8026: -- object in the target business group
8019: --
8020: hr_utility.set_location(' r_LPR1_unique.table_route_id '||r_LPR1_unique.table_route_id,10);
8021: hr_utility.set_location(' r_LPR1_unique.information1 '||r_LPR1_unique.information1,10);
8022: hr_utility.set_location( 'r_LPR1_unique.information2 '||r_LPR1_unique.information2,10);
8023: hr_utility.set_location( 'r_LPR1_unique.information3 '||r_LPR1_unique.information3,10);
8024: -- If reuse objects flag is 'Y' then check for the object in the target business group
8025: -- if found insert the record into PLSql table and exit the loop else try create the
8026: -- object in the target business group
8027: --
8065: --
8066: --DOUBT log_data('LPR1',l_new_value,l_prefix || r_LPR1_unique.name|| l_suffix,'REUSED');
8067: --
8068: end if ;
8069: hr_utility.set_location( 'found record for update',10);
8070: --
8071: else
8072: --
8073: l_update := false;
8144:
8145: --
8146: l_current_pk_id := r_LPR1.information1;
8147: --
8148: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8149: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8150: --
8151: if l_current_pk_id = l_prev_pk_id then
8152: --
8145: --
8146: l_current_pk_id := r_LPR1.information1;
8147: --
8148: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8149: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8150: --
8151: if l_current_pk_id = l_prev_pk_id then
8152: --
8153: l_first_rec := false ;
8166: end if;
8167:
8168: if l_first_rec and not l_update then
8169: -- Call Create routine.
8170: hr_utility.set_location(' BEN_LER_CHG_PLIP_ENRT_F CREATE_LER_CHG_PLAN_ENRT ',20);
8171: BEN_LER_CHG_PLAN_ENRT_API.CREATE_LER_CHG_PLAN_ENRT(
8172: --
8173: P_VALIDATE => false
8174: ,P_EFFECTIVE_DATE => l_effective_date
8224: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
8225: );
8226: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8227: -- Update all relevent cer records with new pk_id
8228: hr_utility.set_location('Before plsql table ',222);
8229: hr_utility.set_location('new_value id '||l_ler_chg_plip_enrt_id,222);
8230: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PLIP_ENRT_ID' ;
8231: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPR1.information1 ;
8232: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PLIP_ENRT_ID ;
8225: );
8226: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8227: -- Update all relevent cer records with new pk_id
8228: hr_utility.set_location('Before plsql table ',222);
8229: hr_utility.set_location('new_value id '||l_ler_chg_plip_enrt_id,222);
8230: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PLIP_ENRT_ID' ;
8231: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPR1.information1 ;
8232: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PLIP_ENRT_ID ;
8233: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
8231: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LPR1.information1 ;
8232: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PLIP_ENRT_ID ;
8233: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
8234: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LPR1_unique.table_route_id;
8235: hr_utility.set_location('After plsql table ',222);
8236: --
8237: -- 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 ) ;
8238: --
8239: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
8241: else
8242: --
8243: -- Call Update routine for the pk_id created in prev run .
8244: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8245: hr_utility.set_location(' BEN_LER_CHG_PLIP_ENRT_F UPDATE_LER_CHG_PLAN_ENRT ',30);
8246: --UPD START
8247: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8248: --
8249: if l_update then
8243: -- Call Update routine for the pk_id created in prev run .
8244: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8245: hr_utility.set_location(' BEN_LER_CHG_PLIP_ENRT_F UPDATE_LER_CHG_PLAN_ENRT ',30);
8246: --UPD START
8247: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8248: --
8249: if l_update then
8250: --
8251: l_datetrack_mode := r_LPR1.datetrack_mode ;
8263: l_object_version_number := r_LPR1.information265;
8264: --
8265: end if;
8266: --
8267: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8268: --
8269: IF l_update OR l_dml_operation <> 'UPDATE' THEN
8270: --UPD END
8271:
8520: r_CPP_unique.information3 >=
8521: ben_pd_copy_to_ben_one.g_copy_effective_date)
8522: ) then
8523: --
8524: hr_utility.set_location(' r_CPP_unique.table_route_id '||r_CPP_unique.table_route_id,10);
8525: hr_utility.set_location(' r_CPP_unique.information1 '||r_CPP_unique.information1,10);
8526: hr_utility.set_location( 'r_CPP_unique.information2 '||r_CPP_unique.information2,10);
8527: hr_utility.set_location( 'r_CPP_unique.information3 '||r_CPP_unique.information3,10);
8528: -- If reuse objects flag is 'Y' then check for the object in the target business group
8521: ben_pd_copy_to_ben_one.g_copy_effective_date)
8522: ) then
8523: --
8524: hr_utility.set_location(' r_CPP_unique.table_route_id '||r_CPP_unique.table_route_id,10);
8525: hr_utility.set_location(' r_CPP_unique.information1 '||r_CPP_unique.information1,10);
8526: hr_utility.set_location( 'r_CPP_unique.information2 '||r_CPP_unique.information2,10);
8527: hr_utility.set_location( 'r_CPP_unique.information3 '||r_CPP_unique.information3,10);
8528: -- If reuse objects flag is 'Y' then check for the object in the target business group
8529: -- if found insert the record into PLSql table and exit the loop else try create the
8522: ) then
8523: --
8524: hr_utility.set_location(' r_CPP_unique.table_route_id '||r_CPP_unique.table_route_id,10);
8525: hr_utility.set_location(' r_CPP_unique.information1 '||r_CPP_unique.information1,10);
8526: hr_utility.set_location( 'r_CPP_unique.information2 '||r_CPP_unique.information2,10);
8527: hr_utility.set_location( 'r_CPP_unique.information3 '||r_CPP_unique.information3,10);
8528: -- If reuse objects flag is 'Y' then check for the object in the target business group
8529: -- if found insert the record into PLSql table and exit the loop else try create the
8530: -- object in the target business group
8523: --
8524: hr_utility.set_location(' r_CPP_unique.table_route_id '||r_CPP_unique.table_route_id,10);
8525: hr_utility.set_location(' r_CPP_unique.information1 '||r_CPP_unique.information1,10);
8526: hr_utility.set_location( 'r_CPP_unique.information2 '||r_CPP_unique.information2,10);
8527: hr_utility.set_location( 'r_CPP_unique.information3 '||r_CPP_unique.information3,10);
8528: -- If reuse objects flag is 'Y' then check for the object in the target business group
8529: -- if found insert the record into PLSql table and exit the loop else try create the
8530: -- object in the target business group
8531: --
8582: --
8583: --DOUBT log_data('CPP',l_new_value,l_prefix || r_CPP_unique.name|| l_suffix,'REUSED');
8584: --
8585: end if ;
8586: hr_utility.set_location( 'found record for update',10);
8587: --
8588: else
8589: --
8590: l_update := false;
8659: if not l_object_found_in_target OR l_update then
8660: --
8661: l_current_pk_id := r_CPP.information1;
8662: --
8663: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8664: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8665: --
8666: if l_current_pk_id = l_prev_pk_id then
8667: --
8660: --
8661: l_current_pk_id := r_CPP.information1;
8662: --
8663: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
8664: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
8665: --
8666: if l_current_pk_id = l_prev_pk_id then
8667: --
8668: l_first_rec := false ;
8682:
8683: if l_first_rec and not l_update then
8684:
8685: -- Call Create routine.
8686: hr_utility.set_location(' BEN_PLIP_F CREATE_PLAN_IN_PROGRAM ',20);
8687: BEN_PLAN_IN_PROGRAM_API.CREATE_PLAN_IN_PROGRAM(
8688: --
8689: P_VALIDATE => false
8690: ,P_EFFECTIVE_DATE => l_effective_date
8783: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
8784: );
8785: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8786: -- Update all relevent cer records with new pk_id
8787: hr_utility.set_location('Before plsql table ',222);
8788: hr_utility.set_location('new_value id '||l_plip_id,222);
8789: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PLIP_ID' ;
8790: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPP.information1 ;
8791: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PLIP_ID ;
8784: );
8785: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8786: -- Update all relevent cer records with new pk_id
8787: hr_utility.set_location('Before plsql table ',222);
8788: hr_utility.set_location('new_value id '||l_plip_id,222);
8789: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PLIP_ID' ;
8790: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPP.information1 ;
8791: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PLIP_ID ;
8792: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
8790: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPP.information1 ;
8791: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PLIP_ID ;
8792: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
8793: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CPP_unique.table_route_id;
8794: hr_utility.set_location('After plsql table ',222);
8795: --
8796: -- 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 ) ;
8797: --
8798: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
8800: else
8801: --
8802: -- Call Update routine for the pk_id created in prev run .
8803: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8804: hr_utility.set_location(' BEN_PLIP_F UPDATE_PLAN_IN_PROGRAM ',30);
8805: --UPD START
8806: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8807: --
8808: if l_update then
8802: -- Call Update routine for the pk_id created in prev run .
8803: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
8804: hr_utility.set_location(' BEN_PLIP_F UPDATE_PLAN_IN_PROGRAM ',30);
8805: --UPD START
8806: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8807: --
8808: if l_update then
8809: --
8810: l_datetrack_mode := r_CPP.datetrack_mode ;
8822: l_object_version_number := r_CPP.information265;
8823: --
8824: end if;
8825: --
8826: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
8827: --
8828: IF l_update OR l_dml_operation <> 'UPDATE' THEN
8829: --UPD END
8830:
9113: r_PYD_unique.information3 >=
9114: ben_pd_copy_to_ben_one.g_copy_effective_date)
9115: ) then
9116: --
9117: hr_utility.set_location(' r_PYD_unique.table_route_id '||r_PYD_unique.table_route_id,10);
9118: hr_utility.set_location(' r_PYD_unique.information1 '||r_PYD_unique.information1,10);
9119: hr_utility.set_location( 'r_PYD_unique.information2 '||r_PYD_unique.information2,10);
9120: hr_utility.set_location( 'r_PYD_unique.information3 '||r_PYD_unique.information3,10);
9121: -- If reuse objects flag is 'Y' then check for the object in the target business group
9114: ben_pd_copy_to_ben_one.g_copy_effective_date)
9115: ) then
9116: --
9117: hr_utility.set_location(' r_PYD_unique.table_route_id '||r_PYD_unique.table_route_id,10);
9118: hr_utility.set_location(' r_PYD_unique.information1 '||r_PYD_unique.information1,10);
9119: hr_utility.set_location( 'r_PYD_unique.information2 '||r_PYD_unique.information2,10);
9120: hr_utility.set_location( 'r_PYD_unique.information3 '||r_PYD_unique.information3,10);
9121: -- If reuse objects flag is 'Y' then check for the object in the target business group
9122: -- if found insert the record into PLSql table and exit the loop else try create the
9115: ) then
9116: --
9117: hr_utility.set_location(' r_PYD_unique.table_route_id '||r_PYD_unique.table_route_id,10);
9118: hr_utility.set_location(' r_PYD_unique.information1 '||r_PYD_unique.information1,10);
9119: hr_utility.set_location( 'r_PYD_unique.information2 '||r_PYD_unique.information2,10);
9120: hr_utility.set_location( 'r_PYD_unique.information3 '||r_PYD_unique.information3,10);
9121: -- If reuse objects flag is 'Y' then check for the object in the target business group
9122: -- if found insert the record into PLSql table and exit the loop else try create the
9123: -- object in the target business group
9116: --
9117: hr_utility.set_location(' r_PYD_unique.table_route_id '||r_PYD_unique.table_route_id,10);
9118: hr_utility.set_location(' r_PYD_unique.information1 '||r_PYD_unique.information1,10);
9119: hr_utility.set_location( 'r_PYD_unique.information2 '||r_PYD_unique.information2,10);
9120: hr_utility.set_location( 'r_PYD_unique.information3 '||r_PYD_unique.information3,10);
9121: -- If reuse objects flag is 'Y' then check for the object in the target business group
9122: -- if found insert the record into PLSql table and exit the loop else try create the
9123: -- object in the target business group
9124: --
9163: --
9164: --DOUBT log_data('PYD',l_new_value,l_prefix || r_PYD_unique.name|| l_suffix,'REUSED');
9165: --
9166: end if ;
9167: hr_utility.set_location( 'found record for update',10);
9168: --
9169: else
9170: --
9171: l_update := false;
9243: if not l_object_found_in_target OR l_update then
9244: --
9245: l_current_pk_id := r_PYD.information1;
9246: --
9247: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9248: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9249: --
9250: if l_current_pk_id = l_prev_pk_id then
9251: --
9244: --
9245: l_current_pk_id := r_PYD.information1;
9246: --
9247: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9248: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9249: --
9250: if l_current_pk_id = l_prev_pk_id then
9251: --
9252: l_first_rec := false ;
9265: end if;
9266:
9267: if l_first_rec and not l_update then
9268: -- Call Create routine.
9269: hr_utility.set_location(' BEN_PTIP_DPNT_CVG_CTFN_F CREATE_PTIP_DPNT_CVG_CTFN ',20);
9270: BEN_PTIP_DPNT_CVG_CTFN_API.CREATE_PTIP_DPNT_CVG_CTFN(
9271: --
9272: P_VALIDATE => false
9273: ,P_EFFECTIVE_DATE => l_effective_date
9318: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
9319: );
9320: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9321: -- Update all relevent cer records with new pk_id
9322: hr_utility.set_location('Before plsql table ',222);
9323: hr_utility.set_location('new_value id '||l_ptip_dpnt_cvg_ctfn_id,222);
9324: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PTIP_DPNT_CVG_CTFN_ID' ;
9325: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PYD.information1 ;
9326: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PTIP_DPNT_CVG_CTFN_ID ;
9319: );
9320: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9321: -- Update all relevent cer records with new pk_id
9322: hr_utility.set_location('Before plsql table ',222);
9323: hr_utility.set_location('new_value id '||l_ptip_dpnt_cvg_ctfn_id,222);
9324: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PTIP_DPNT_CVG_CTFN_ID' ;
9325: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PYD.information1 ;
9326: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PTIP_DPNT_CVG_CTFN_ID ;
9327: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
9325: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PYD.information1 ;
9326: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PTIP_DPNT_CVG_CTFN_ID ;
9327: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
9328: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PYD_unique.table_route_id;
9329: hr_utility.set_location('After plsql table ',222);
9330: --
9331: -- 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 ) ;
9332: --
9333: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
9335: else
9336: --
9337: -- Call Update routine for the pk_id created in prev run .
9338: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9339: hr_utility.set_location(' BEN_PTIP_DPNT_CVG_CTFN_F UPDATE_PTIP_DPNT_CVG_CTFN ',30);
9340: --UPD START
9341: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9342: --
9343: if l_update then
9337: -- Call Update routine for the pk_id created in prev run .
9338: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9339: hr_utility.set_location(' BEN_PTIP_DPNT_CVG_CTFN_F UPDATE_PTIP_DPNT_CVG_CTFN ',30);
9340: --UPD START
9341: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9342: --
9343: if l_update then
9344: --
9345: l_datetrack_mode := r_PYD.datetrack_mode ;
9357: l_object_version_number := r_PYD.information265;
9358: --
9359: end if;
9360: --
9361: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9362: --
9363: IF l_update OR l_dml_operation <> 'UPDATE' THEN
9364: --UPD END
9365:
9596: ben_pd_copy_to_ben_one.g_copy_effective_date)
9597: ) then
9598:
9599: --
9600: hr_utility.set_location(' r_LCT_unique.table_route_id '||r_LCT_unique.table_route_id,10);
9601: hr_utility.set_location(' r_LCT_unique.information1 '||r_LCT_unique.information1,10);
9602: hr_utility.set_location( 'r_LCT_unique.information2 '||r_LCT_unique.information2,10);
9603: hr_utility.set_location( 'r_LCT_unique.information3 '||r_LCT_unique.information3,10);
9604: -- If reuse objects flag is 'Y' then check for the object in the target business group
9597: ) then
9598:
9599: --
9600: hr_utility.set_location(' r_LCT_unique.table_route_id '||r_LCT_unique.table_route_id,10);
9601: hr_utility.set_location(' r_LCT_unique.information1 '||r_LCT_unique.information1,10);
9602: hr_utility.set_location( 'r_LCT_unique.information2 '||r_LCT_unique.information2,10);
9603: hr_utility.set_location( 'r_LCT_unique.information3 '||r_LCT_unique.information3,10);
9604: -- If reuse objects flag is 'Y' then check for the object in the target business group
9605: -- if found insert the record into PLSql table and exit the loop else try create the
9598:
9599: --
9600: hr_utility.set_location(' r_LCT_unique.table_route_id '||r_LCT_unique.table_route_id,10);
9601: hr_utility.set_location(' r_LCT_unique.information1 '||r_LCT_unique.information1,10);
9602: hr_utility.set_location( 'r_LCT_unique.information2 '||r_LCT_unique.information2,10);
9603: hr_utility.set_location( 'r_LCT_unique.information3 '||r_LCT_unique.information3,10);
9604: -- If reuse objects flag is 'Y' then check for the object in the target business group
9605: -- if found insert the record into PLSql table and exit the loop else try create the
9606: -- object in the target business group
9599: --
9600: hr_utility.set_location(' r_LCT_unique.table_route_id '||r_LCT_unique.table_route_id,10);
9601: hr_utility.set_location(' r_LCT_unique.information1 '||r_LCT_unique.information1,10);
9602: hr_utility.set_location( 'r_LCT_unique.information2 '||r_LCT_unique.information2,10);
9603: hr_utility.set_location( 'r_LCT_unique.information3 '||r_LCT_unique.information3,10);
9604: -- If reuse objects flag is 'Y' then check for the object in the target business group
9605: -- if found insert the record into PLSql table and exit the loop else try create the
9606: -- object in the target business group
9607: --
9645: --
9646: --DOUBT log_data('LCT',l_new_value,l_prefix || r_LCT_unique.name|| l_suffix,'REUSED');
9647: --
9648: end if ;
9649: hr_utility.set_location( 'found record for update',10);
9650: --
9651: else
9652: --
9653: l_update := false;
9730:
9731: --
9732: l_current_pk_id := r_LCT.information1;
9733: --
9734: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9735: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9736: --
9737: if l_current_pk_id = l_prev_pk_id then
9738: --
9731: --
9732: l_current_pk_id := r_LCT.information1;
9733: --
9734: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
9735: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
9736: --
9737: if l_current_pk_id = l_prev_pk_id then
9738: --
9739: l_first_rec := false ;
9753:
9754: if l_first_rec and not l_update then
9755:
9756: -- Call Create routine.
9757: hr_utility.set_location(' BEN_LER_CHG_PTIP_ENRT_F CREATE_LER_CHG_PTIP_ENRT ',20);
9758: BEN_LER_CHG_PTIP_ENRT_API.CREATE_LER_CHG_PTIP_ENRT(
9759: --
9760: P_VALIDATE => false
9761: ,P_EFFECTIVE_DATE => l_effective_date
9810: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
9811: );
9812: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9813: -- Update all relevent cer records with new pk_id
9814: hr_utility.set_location('Before plsql table ',222);
9815: hr_utility.set_location('new_value id '||l_ler_chg_ptip_enrt_id,222);
9816: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PTIP_ENRT_ID' ;
9817: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LCT.information1 ;
9818: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PTIP_ENRT_ID ;
9811: );
9812: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9813: -- Update all relevent cer records with new pk_id
9814: hr_utility.set_location('Before plsql table ',222);
9815: hr_utility.set_location('new_value id '||l_ler_chg_ptip_enrt_id,222);
9816: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PTIP_ENRT_ID' ;
9817: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LCT.information1 ;
9818: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PTIP_ENRT_ID ;
9819: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
9817: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LCT.information1 ;
9818: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PTIP_ENRT_ID ;
9819: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
9820: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LCT_unique.table_route_id;
9821: hr_utility.set_location('After plsql table ',222);
9822: --
9823: -- 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 ) ;
9824: --
9825: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
9827: else
9828: --
9829: -- Call Update routine for the pk_id created in prev run .
9830: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9831: hr_utility.set_location(' BEN_LER_CHG_PTIP_ENRT_F UPDATE_LER_CHG_PTIP_ENRT ',30);
9832: --UPD START
9833: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9834: --
9835: if l_update then
9829: -- Call Update routine for the pk_id created in prev run .
9830: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
9831: hr_utility.set_location(' BEN_LER_CHG_PTIP_ENRT_F UPDATE_LER_CHG_PTIP_ENRT ',30);
9832: --UPD START
9833: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9834: --
9835: if l_update then
9836: --
9837: l_datetrack_mode := r_LCT.datetrack_mode ;
9849: l_object_version_number := r_LCT.information265;
9850: --
9851: end if;
9852: --
9853: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
9854: --
9855: IF l_update OR l_dml_operation <> 'UPDATE' THEN
9856: --UPD END
9857:
10090: r_WCT_unique.information3 >=
10091: ben_pd_copy_to_ben_one.g_copy_effective_date)
10092: ) then
10093: --
10094: hr_utility.set_location(' r_WCT_unique.table_route_id '||r_WCT_unique.table_route_id,10);
10095: hr_utility.set_location(' r_WCT_unique.information1 '||r_WCT_unique.information1,10);
10096: hr_utility.set_location( 'r_WCT_unique.information2 '||r_WCT_unique.information2,10);
10097: hr_utility.set_location( 'r_WCT_unique.information3 '||r_WCT_unique.information3,10);
10098: -- If reuse objects flag is 'Y' then check for the object in the target business group
10091: ben_pd_copy_to_ben_one.g_copy_effective_date)
10092: ) then
10093: --
10094: hr_utility.set_location(' r_WCT_unique.table_route_id '||r_WCT_unique.table_route_id,10);
10095: hr_utility.set_location(' r_WCT_unique.information1 '||r_WCT_unique.information1,10);
10096: hr_utility.set_location( 'r_WCT_unique.information2 '||r_WCT_unique.information2,10);
10097: hr_utility.set_location( 'r_WCT_unique.information3 '||r_WCT_unique.information3,10);
10098: -- If reuse objects flag is 'Y' then check for the object in the target business group
10099: -- if found insert the record into PLSql table and exit the loop else try create the
10092: ) then
10093: --
10094: hr_utility.set_location(' r_WCT_unique.table_route_id '||r_WCT_unique.table_route_id,10);
10095: hr_utility.set_location(' r_WCT_unique.information1 '||r_WCT_unique.information1,10);
10096: hr_utility.set_location( 'r_WCT_unique.information2 '||r_WCT_unique.information2,10);
10097: hr_utility.set_location( 'r_WCT_unique.information3 '||r_WCT_unique.information3,10);
10098: -- If reuse objects flag is 'Y' then check for the object in the target business group
10099: -- if found insert the record into PLSql table and exit the loop else try create the
10100: -- object in the target business group
10093: --
10094: hr_utility.set_location(' r_WCT_unique.table_route_id '||r_WCT_unique.table_route_id,10);
10095: hr_utility.set_location(' r_WCT_unique.information1 '||r_WCT_unique.information1,10);
10096: hr_utility.set_location( 'r_WCT_unique.information2 '||r_WCT_unique.information2,10);
10097: hr_utility.set_location( 'r_WCT_unique.information3 '||r_WCT_unique.information3,10);
10098: -- If reuse objects flag is 'Y' then check for the object in the target business group
10099: -- if found insert the record into PLSql table and exit the loop else try create the
10100: -- object in the target business group
10101: --
10139: --
10140: --DOUBT log_data('WCT',l_new_value,l_prefix || r_WCT_unique.name|| l_suffix,'REUSED');
10141: --
10142: end if ;
10143: hr_utility.set_location( 'found record for update',10);
10144: --
10145: else
10146: --
10147: l_update := false;
10216: if not l_object_found_in_target OR l_update then
10217: --
10218: l_current_pk_id := r_WCT.information1;
10219: --
10220: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10221: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10222: --
10223: if l_current_pk_id = l_prev_pk_id then
10224: --
10217: --
10218: l_current_pk_id := r_WCT.information1;
10219: --
10220: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10221: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10222: --
10223: if l_current_pk_id = l_prev_pk_id then
10224: --
10225: l_first_rec := false ;
10238: end if;
10239:
10240: if l_first_rec and not l_update then
10241: -- Call Create routine.
10242: hr_utility.set_location(' BEN_WV_PRTN_RSN_CTFN_PTIP_F CREATE_WV_PRTN_RSN_CTFN_PTIP ',20);
10243: BEN_WV_PRTN_RSN_CTFN_PTIP_API.CREATE_WV_PRTN_RSN_CTFN_PTIP(
10244: --
10245: P_VALIDATE => false
10246: ,P_EFFECTIVE_DATE => l_effective_date
10291: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
10292: );
10293: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10294: -- Update all relevent cer records with new pk_id
10295: hr_utility.set_location('Before plsql table ',222);
10296: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_ctfn_ptip_id,222);
10297: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_CTFN_PTIP_ID' ;
10298: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WCT.information1 ;
10299: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_CTFN_PTIP_ID ;
10292: );
10293: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10294: -- Update all relevent cer records with new pk_id
10295: hr_utility.set_location('Before plsql table ',222);
10296: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_ctfn_ptip_id,222);
10297: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_CTFN_PTIP_ID' ;
10298: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WCT.information1 ;
10299: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_CTFN_PTIP_ID ;
10300: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10298: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WCT.information1 ;
10299: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_CTFN_PTIP_ID ;
10300: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10301: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_WCT_unique.table_route_id;
10302: hr_utility.set_location('After plsql table ',222);
10303: --
10304: -- 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 ) ;
10305: --
10306: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10308: else
10309: --
10310: -- Call Update routine for the pk_id created in prev run .
10311: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10312: hr_utility.set_location(' BEN_WV_PRTN_RSN_CTFN_PTIP_F UPDATE_WV_PRTN_RSN_CTFN_PTIP ',30);
10313: --UPD START
10314: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10315: --
10316: if l_update then
10310: -- Call Update routine for the pk_id created in prev run .
10311: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10312: hr_utility.set_location(' BEN_WV_PRTN_RSN_CTFN_PTIP_F UPDATE_WV_PRTN_RSN_CTFN_PTIP ',30);
10313: --UPD START
10314: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10315: --
10316: if l_update then
10317: --
10318: l_datetrack_mode := r_WCT.datetrack_mode ;
10330: l_object_version_number := r_WCT.information265;
10331: --
10332: end if;
10333: --
10334: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10335: --
10336: IF l_update OR l_dml_operation <> 'UPDATE' THEN
10337: --UPD END
10338:
10568: r_WPT_unique.information3 >=
10569: ben_pd_copy_to_ben_one.g_copy_effective_date)
10570: ) then
10571: --
10572: hr_utility.set_location(' r_WPT_unique.table_route_id '||r_WPT_unique.table_route_id,10);
10573: hr_utility.set_location(' r_WPT_unique.information1 '||r_WPT_unique.information1,10);
10574: hr_utility.set_location( 'r_WPT_unique.information2 '||r_WPT_unique.information2,10);
10575: hr_utility.set_location( 'r_WPT_unique.information3 '||r_WPT_unique.information3,10);
10576: -- If reuse objects flag is 'Y' then check for the object in the target business group
10569: ben_pd_copy_to_ben_one.g_copy_effective_date)
10570: ) then
10571: --
10572: hr_utility.set_location(' r_WPT_unique.table_route_id '||r_WPT_unique.table_route_id,10);
10573: hr_utility.set_location(' r_WPT_unique.information1 '||r_WPT_unique.information1,10);
10574: hr_utility.set_location( 'r_WPT_unique.information2 '||r_WPT_unique.information2,10);
10575: hr_utility.set_location( 'r_WPT_unique.information3 '||r_WPT_unique.information3,10);
10576: -- If reuse objects flag is 'Y' then check for the object in the target business group
10577: -- if found insert the record into PLSql table and exit the loop else try create the
10570: ) then
10571: --
10572: hr_utility.set_location(' r_WPT_unique.table_route_id '||r_WPT_unique.table_route_id,10);
10573: hr_utility.set_location(' r_WPT_unique.information1 '||r_WPT_unique.information1,10);
10574: hr_utility.set_location( 'r_WPT_unique.information2 '||r_WPT_unique.information2,10);
10575: hr_utility.set_location( 'r_WPT_unique.information3 '||r_WPT_unique.information3,10);
10576: -- If reuse objects flag is 'Y' then check for the object in the target business group
10577: -- if found insert the record into PLSql table and exit the loop else try create the
10578: -- object in the target business group
10571: --
10572: hr_utility.set_location(' r_WPT_unique.table_route_id '||r_WPT_unique.table_route_id,10);
10573: hr_utility.set_location(' r_WPT_unique.information1 '||r_WPT_unique.information1,10);
10574: hr_utility.set_location( 'r_WPT_unique.information2 '||r_WPT_unique.information2,10);
10575: hr_utility.set_location( 'r_WPT_unique.information3 '||r_WPT_unique.information3,10);
10576: -- If reuse objects flag is 'Y' then check for the object in the target business group
10577: -- if found insert the record into PLSql table and exit the loop else try create the
10578: -- object in the target business group
10579: --
10616: --
10617: --DOUBT log_data('WPT',l_new_value,l_prefix || r_WPT_unique.name|| l_suffix,'REUSED');
10618: --
10619: end if ;
10620: hr_utility.set_location( 'found record for update',10);
10621: --
10622: else
10623: --
10624: l_update := false;
10695:
10696: --
10697: l_current_pk_id := r_WPT.information1;
10698: --
10699: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10700: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10701: --
10702: if l_current_pk_id = l_prev_pk_id then
10703: --
10696: --
10697: l_current_pk_id := r_WPT.information1;
10698: --
10699: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
10700: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
10701: --
10702: if l_current_pk_id = l_prev_pk_id then
10703: --
10704: l_first_rec := false ;
10717: end if;
10718:
10719: if l_first_rec and not l_update then
10720: -- Call Create routine.
10721: hr_utility.set_location(' BEN_WV_PRTN_RSN_PTIP_F CREATE_WV_PRTN_RSN_PTIP ',20);
10722: BEN_WV_PRTN_RSN_PTIP_API.CREATE_WV_PRTN_RSN_PTIP(
10723: --
10724: P_VALIDATE => false
10725: ,P_EFFECTIVE_DATE => l_effective_date
10766: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
10767: );
10768: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10769: -- Update all relevent cer records with new pk_id
10770: hr_utility.set_location('Before plsql table ',222);
10771: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_ptip_id,222);
10772: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_PTIP_ID' ;
10773: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WPT.information1 ;
10774: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_PTIP_ID ;
10767: );
10768: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10769: -- Update all relevent cer records with new pk_id
10770: hr_utility.set_location('Before plsql table ',222);
10771: hr_utility.set_location('new_value id '||l_wv_prtn_rsn_ptip_id,222);
10772: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'WV_PRTN_RSN_PTIP_ID' ;
10773: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WPT.information1 ;
10774: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_PTIP_ID ;
10775: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10773: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_WPT.information1 ;
10774: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_WV_PRTN_RSN_PTIP_ID ;
10775: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
10776: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_WPT_unique.table_route_id;
10777: hr_utility.set_location('After plsql table ',222);
10778: --
10779: -- 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 ) ;
10780: --
10781: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
10783: else
10784: --
10785: -- Call Update routine for the pk_id created in prev run .
10786: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10787: hr_utility.set_location(' BEN_WV_PRTN_RSN_PTIP_F UPDATE_WV_PRTN_RSN_PTIP ',30);
10788: --UPD START
10789: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10790: --
10791: if l_update then
10785: -- Call Update routine for the pk_id created in prev run .
10786: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
10787: hr_utility.set_location(' BEN_WV_PRTN_RSN_PTIP_F UPDATE_WV_PRTN_RSN_PTIP ',30);
10788: --UPD START
10789: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10790: --
10791: if l_update then
10792: --
10793: l_datetrack_mode := r_WPT.datetrack_mode ;
10805: l_object_version_number := r_WPT.information265;
10806: --
10807: end if;
10808: --
10809: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
10810: --
10811: IF l_update OR l_dml_operation <> 'UPDATE' THEN
10812: --UPD END
10813:
11065: r_CTP_unique.information3 >=
11066: ben_pd_copy_to_ben_one.g_copy_effective_date)
11067: ) then
11068: --
11069: hr_utility.set_location(' r_CTP_unique.table_route_id '||r_CTP_unique.table_route_id,10);
11070: hr_utility.set_location(' r_CTP_unique.information1 '||r_CTP_unique.information1,10);
11071: hr_utility.set_location( 'r_CTP_unique.information2 '||r_CTP_unique.information2,10);
11072: hr_utility.set_location( 'r_CTP_unique.information3 '||r_CTP_unique.information3,10);
11073: -- If reuse objects flag is 'Y' then check for the object in the target business group
11066: ben_pd_copy_to_ben_one.g_copy_effective_date)
11067: ) then
11068: --
11069: hr_utility.set_location(' r_CTP_unique.table_route_id '||r_CTP_unique.table_route_id,10);
11070: hr_utility.set_location(' r_CTP_unique.information1 '||r_CTP_unique.information1,10);
11071: hr_utility.set_location( 'r_CTP_unique.information2 '||r_CTP_unique.information2,10);
11072: hr_utility.set_location( 'r_CTP_unique.information3 '||r_CTP_unique.information3,10);
11073: -- If reuse objects flag is 'Y' then check for the object in the target business group
11074: -- if found insert the record into PLSql table and exit the loop else try create the
11067: ) then
11068: --
11069: hr_utility.set_location(' r_CTP_unique.table_route_id '||r_CTP_unique.table_route_id,10);
11070: hr_utility.set_location(' r_CTP_unique.information1 '||r_CTP_unique.information1,10);
11071: hr_utility.set_location( 'r_CTP_unique.information2 '||r_CTP_unique.information2,10);
11072: hr_utility.set_location( 'r_CTP_unique.information3 '||r_CTP_unique.information3,10);
11073: -- If reuse objects flag is 'Y' then check for the object in the target business group
11074: -- if found insert the record into PLSql table and exit the loop else try create the
11075: -- object in the target business group
11068: --
11069: hr_utility.set_location(' r_CTP_unique.table_route_id '||r_CTP_unique.table_route_id,10);
11070: hr_utility.set_location(' r_CTP_unique.information1 '||r_CTP_unique.information1,10);
11071: hr_utility.set_location( 'r_CTP_unique.information2 '||r_CTP_unique.information2,10);
11072: hr_utility.set_location( 'r_CTP_unique.information3 '||r_CTP_unique.information3,10);
11073: -- If reuse objects flag is 'Y' then check for the object in the target business group
11074: -- if found insert the record into PLSql table and exit the loop else try create the
11075: -- object in the target business group
11076: --
11128: --
11129: --DOUBT log_data('CTP',l_new_value,l_prefix || r_CTP_unique.name|| l_suffix,'REUSED');
11130: --
11131: end if ;
11132: hr_utility.set_location( 'found record for update',10);
11133: --
11134: else
11135: --
11136: l_update := false;
11208: if not l_object_found_in_target OR l_update then
11209: --
11210: l_current_pk_id := r_CTP.information1;
11211: --
11212: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11213: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11214: --
11215: if l_current_pk_id = l_prev_pk_id then
11216: --
11209: --
11210: l_current_pk_id := r_CTP.information1;
11211: --
11212: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11213: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11214: --
11215: if l_current_pk_id = l_prev_pk_id then
11216: --
11217: l_first_rec := false ;
11361: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
11362: );
11363: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11364: -- Update all relevent cer records with new pk_id
11365: hr_utility.set_location('Before plsql table ',222);
11366: hr_utility.set_location('new_value id '||l_ptip_id,222);
11367: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PTIP_ID' ;
11368: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CTP.information1 ;
11369: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PTIP_ID ;
11362: );
11363: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11364: -- Update all relevent cer records with new pk_id
11365: hr_utility.set_location('Before plsql table ',222);
11366: hr_utility.set_location('new_value id '||l_ptip_id,222);
11367: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PTIP_ID' ;
11368: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CTP.information1 ;
11369: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PTIP_ID ;
11370: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
11368: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CTP.information1 ;
11369: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PTIP_ID ;
11370: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
11371: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CTP_unique.table_route_id;
11372: hr_utility.set_location('After plsql table ',222);
11373: --
11374: -- 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 ) ;
11375: --
11376: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
11378: else
11379: --
11380: -- Call Update routine for the pk_id created in prev run .
11381: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11382: hr_utility.set_location(' BEN_PTIP_F UPDATE_PLAN_TYPE_IN_PROGRAM ',30);
11383: --UPD START
11384: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11385: --
11386: if l_update then
11380: -- Call Update routine for the pk_id created in prev run .
11381: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11382: hr_utility.set_location(' BEN_PTIP_F UPDATE_PLAN_TYPE_IN_PROGRAM ',30);
11383: --UPD START
11384: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11385: --
11386: if l_update then
11387: --
11388: l_datetrack_mode := r_CTP.datetrack_mode ;
11400: l_object_version_number := r_CTP.information265;
11401: --
11402: end if;
11403: --
11404: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11405: --
11406: IF l_update OR l_dml_operation <> 'UPDATE' THEN
11407: --UPD END
11408:
11697: r_LCC_unique.information3 >=
11698: ben_pd_copy_to_ben_one.g_copy_effective_date)
11699: ) then
11700: --
11701: hr_utility.set_location(' r_LCC_unique.table_route_id '||r_LCC_unique.table_route_id,10);
11702: hr_utility.set_location(' r_LCC_unique.information1 '||r_LCC_unique.information1,10);
11703: hr_utility.set_location( 'r_LCC_unique.information2 '||r_LCC_unique.information2,10);
11704: hr_utility.set_location( 'r_LCC_unique.information3 '||r_LCC_unique.information3,10);
11705: -- If reuse objects flag is 'Y' then check for the object in the target business group
11698: ben_pd_copy_to_ben_one.g_copy_effective_date)
11699: ) then
11700: --
11701: hr_utility.set_location(' r_LCC_unique.table_route_id '||r_LCC_unique.table_route_id,10);
11702: hr_utility.set_location(' r_LCC_unique.information1 '||r_LCC_unique.information1,10);
11703: hr_utility.set_location( 'r_LCC_unique.information2 '||r_LCC_unique.information2,10);
11704: hr_utility.set_location( 'r_LCC_unique.information3 '||r_LCC_unique.information3,10);
11705: -- If reuse objects flag is 'Y' then check for the object in the target business group
11706: -- if found insert the record into PLSql table and exit the loop else try create the
11699: ) then
11700: --
11701: hr_utility.set_location(' r_LCC_unique.table_route_id '||r_LCC_unique.table_route_id,10);
11702: hr_utility.set_location(' r_LCC_unique.information1 '||r_LCC_unique.information1,10);
11703: hr_utility.set_location( 'r_LCC_unique.information2 '||r_LCC_unique.information2,10);
11704: hr_utility.set_location( 'r_LCC_unique.information3 '||r_LCC_unique.information3,10);
11705: -- If reuse objects flag is 'Y' then check for the object in the target business group
11706: -- if found insert the record into PLSql table and exit the loop else try create the
11707: -- object in the target business group
11700: --
11701: hr_utility.set_location(' r_LCC_unique.table_route_id '||r_LCC_unique.table_route_id,10);
11702: hr_utility.set_location(' r_LCC_unique.information1 '||r_LCC_unique.information1,10);
11703: hr_utility.set_location( 'r_LCC_unique.information2 '||r_LCC_unique.information2,10);
11704: hr_utility.set_location( 'r_LCC_unique.information3 '||r_LCC_unique.information3,10);
11705: -- If reuse objects flag is 'Y' then check for the object in the target business group
11706: -- if found insert the record into PLSql table and exit the loop else try create the
11707: -- object in the target business group
11708: --
11746: --
11747: --DOUBT log_data('LCC',l_new_value,l_prefix || r_LCC_unique.name|| l_suffix,'REUSED');
11748: --
11749: end if ;
11750: hr_utility.set_location( 'found record for update',10);
11751: --
11752: else
11753: --
11754: l_update := false;
11824: if not l_object_found_in_target OR l_update then
11825: --
11826: l_current_pk_id := r_LCC.information1;
11827: --
11828: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11829: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11830: --
11831: if l_current_pk_id = l_prev_pk_id then
11832: --
11825: --
11826: l_current_pk_id := r_LCC.information1;
11827: --
11828: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
11829: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
11830: --
11831: if l_current_pk_id = l_prev_pk_id then
11832: --
11833: l_first_rec := false ;
11846: end if;
11847:
11848: if l_first_rec and not l_update then
11849: -- Call Create routine.
11850: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_CTFN_F CREATE_LER_CHG_DPNT_CVG_CTF ',20);
11851: BEN_LER_CHG_DPNT_CVG_CTF_API.CREATE_LER_CHG_DPNT_CVG_CTF(
11852: --
11853: P_VALIDATE => false
11854: ,P_EFFECTIVE_DATE => l_effective_date
11898: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
11899: );
11900: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11901: -- Update all relevent cer records with new pk_id
11902: hr_utility.set_location('Before plsql table ',222);
11903: hr_utility.set_location('new_value id '||l_ler_chg_dpnt_cvg_ctfn_id,222);
11904: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_DPNT_CVG_CTFN_ID' ;
11905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LCC.information1 ;
11906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_DPNT_CVG_CTFN_ID ;
11899: );
11900: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11901: -- Update all relevent cer records with new pk_id
11902: hr_utility.set_location('Before plsql table ',222);
11903: hr_utility.set_location('new_value id '||l_ler_chg_dpnt_cvg_ctfn_id,222);
11904: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_DPNT_CVG_CTFN_ID' ;
11905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LCC.information1 ;
11906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_DPNT_CVG_CTFN_ID ;
11907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
11905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LCC.information1 ;
11906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_DPNT_CVG_CTFN_ID ;
11907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
11908: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LCC_unique.table_route_id;
11909: hr_utility.set_location('After plsql table ',222);
11910: --
11911: -- 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 ) ;
11912: --
11913: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
11915: else
11916: --
11917: -- Call Update routine for the pk_id created in prev run .
11918: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11919: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_CTFN_F UPDATE_LER_CHG_DPNT_CVG_CTF ',30);
11920: --UPD START
11921: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11922: --
11923: if l_update then
11917: -- Call Update routine for the pk_id created in prev run .
11918: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
11919: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_CTFN_F UPDATE_LER_CHG_DPNT_CVG_CTF ',30);
11920: --UPD START
11921: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11922: --
11923: if l_update then
11924: --
11925: l_datetrack_mode := r_LCC.datetrack_mode ;
11937: l_object_version_number := r_LCC.information265;
11938: --
11939: end if;
11940: --
11941: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
11942: --
11943: IF l_update OR l_dml_operation <> 'UPDATE' THEN
11944: --UPD END
11945:
12173: r_CER_unique.information3 >=
12174: ben_pd_copy_to_ben_one.g_copy_effective_date)
12175: ) then
12176: --
12177: hr_utility.set_location(' r_CER_unique.table_route_id '||r_CER_unique.table_route_id,10);
12178: hr_utility.set_location(' r_CER_unique.information1 '||r_CER_unique.information1,10);
12179: hr_utility.set_location( 'r_CER_unique.information2 '||r_CER_unique.information2,10);
12180: hr_utility.set_location( 'r_CER_unique.information3 '||r_CER_unique.information3,10);
12181: -- If reuse objects flag is 'Y' then check for the object in the target business group
12174: ben_pd_copy_to_ben_one.g_copy_effective_date)
12175: ) then
12176: --
12177: hr_utility.set_location(' r_CER_unique.table_route_id '||r_CER_unique.table_route_id,10);
12178: hr_utility.set_location(' r_CER_unique.information1 '||r_CER_unique.information1,10);
12179: hr_utility.set_location( 'r_CER_unique.information2 '||r_CER_unique.information2,10);
12180: hr_utility.set_location( 'r_CER_unique.information3 '||r_CER_unique.information3,10);
12181: -- If reuse objects flag is 'Y' then check for the object in the target business group
12182: -- if found insert the record into PLSql table and exit the loop else try create the
12175: ) then
12176: --
12177: hr_utility.set_location(' r_CER_unique.table_route_id '||r_CER_unique.table_route_id,10);
12178: hr_utility.set_location(' r_CER_unique.information1 '||r_CER_unique.information1,10);
12179: hr_utility.set_location( 'r_CER_unique.information2 '||r_CER_unique.information2,10);
12180: hr_utility.set_location( 'r_CER_unique.information3 '||r_CER_unique.information3,10);
12181: -- If reuse objects flag is 'Y' then check for the object in the target business group
12182: -- if found insert the record into PLSql table and exit the loop else try create the
12183: -- object in the target business group
12176: --
12177: hr_utility.set_location(' r_CER_unique.table_route_id '||r_CER_unique.table_route_id,10);
12178: hr_utility.set_location(' r_CER_unique.information1 '||r_CER_unique.information1,10);
12179: hr_utility.set_location( 'r_CER_unique.information2 '||r_CER_unique.information2,10);
12180: hr_utility.set_location( 'r_CER_unique.information3 '||r_CER_unique.information3,10);
12181: -- If reuse objects flag is 'Y' then check for the object in the target business group
12182: -- if found insert the record into PLSql table and exit the loop else try create the
12183: -- object in the target business group
12184: --
12221: --
12222: --DOUBT log_data('CER',l_new_value,l_prefix || r_CER_unique.name|| l_suffix,'REUSED');
12223: --
12224: end if ;
12225: hr_utility.set_location( 'found record for update',10);
12226: --
12227: else
12228: --
12229: l_update := false;
12299: if not l_object_found_in_target OR l_update then
12300: --
12301: l_current_pk_id := r_CER.information1;
12302: --
12303: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12304: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12305: --
12306: if l_current_pk_id = l_prev_pk_id then
12307: --
12300: --
12301: l_current_pk_id := r_CER.information1;
12302: --
12303: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12304: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12305: --
12306: if l_current_pk_id = l_prev_pk_id then
12307: --
12308: l_first_rec := false ;
12321: end if;
12322:
12323: if l_first_rec and not l_update then
12324: -- Call Create routine.
12325: hr_utility.set_location(' BEN_PRTN_ELIGY_RL_F CREATE_ELIGIBILITY_RULE ',20);
12326: BEN_ELIGIBILITY_RULE_API.CREATE_ELIGIBILITY_RULE(
12327: --
12328: P_VALIDATE => false
12329: ,P_EFFECTIVE_DATE => l_effective_date
12372: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
12373: );
12374: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12375: -- Update all relevent cer records with new pk_id
12376: hr_utility.set_location('Before plsql table ',222);
12377: hr_utility.set_location('new_value id '||l_prtn_eligy_rl_id,222);
12378: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PRTN_ELIGY_RL_ID' ;
12379: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_cer.information1 ;
12380: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIGY_RL_ID ;
12373: );
12374: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12375: -- Update all relevent cer records with new pk_id
12376: hr_utility.set_location('Before plsql table ',222);
12377: hr_utility.set_location('new_value id '||l_prtn_eligy_rl_id,222);
12378: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PRTN_ELIGY_RL_ID' ;
12379: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_cer.information1 ;
12380: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIGY_RL_ID ;
12381: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
12379: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_cer.information1 ;
12380: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIGY_RL_ID ;
12381: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
12382: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CER_unique.table_route_id;
12383: hr_utility.set_location('After plsql table ',222);
12384: --
12385: -- 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 ) ;
12386: --
12387: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
12389: else
12390: --
12391: -- Call Update routine for the pk_id created in prev run .
12392: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12393: hr_utility.set_location(' BEN_PRTN_ELIGY_RL_F UPDATE_ELIGIBILITY_RULE ',30);
12394: --UPD START
12395: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12396: --
12397: if l_update then
12391: -- Call Update routine for the pk_id created in prev run .
12392: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12393: hr_utility.set_location(' BEN_PRTN_ELIGY_RL_F UPDATE_ELIGIBILITY_RULE ',30);
12394: --UPD START
12395: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12396: --
12397: if l_update then
12398: --
12399: l_datetrack_mode := r_CER.datetrack_mode ;
12411: l_object_version_number := r_CER.information265;
12412: --
12413: end if;
12414: --
12415: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12416: --
12417: IF l_update OR l_dml_operation <> 'UPDATE' THEN
12418: --UPD END
12419:
12645: r_CEP_unique.information3 >=
12646: ben_pd_copy_to_ben_one.g_copy_effective_date)
12647: ) then
12648: --
12649: hr_utility.set_location(' r_CEP_unique.table_route_id '||r_CEP_unique.table_route_id,10);
12650: hr_utility.set_location(' r_CEP_unique.information1 '||r_CEP_unique.information1,10);
12651: hr_utility.set_location( 'r_CEP_unique.information2 '||r_CEP_unique.information2,10);
12652: hr_utility.set_location( 'r_CEP_unique.information3 '||r_CEP_unique.information3,10);
12653: -- If reuse objects flag is 'Y' then check for the object in the target business group
12646: ben_pd_copy_to_ben_one.g_copy_effective_date)
12647: ) then
12648: --
12649: hr_utility.set_location(' r_CEP_unique.table_route_id '||r_CEP_unique.table_route_id,10);
12650: hr_utility.set_location(' r_CEP_unique.information1 '||r_CEP_unique.information1,10);
12651: hr_utility.set_location( 'r_CEP_unique.information2 '||r_CEP_unique.information2,10);
12652: hr_utility.set_location( 'r_CEP_unique.information3 '||r_CEP_unique.information3,10);
12653: -- If reuse objects flag is 'Y' then check for the object in the target business group
12654: -- if found insert the record into PLSql table and exit the loop else try create the
12647: ) then
12648: --
12649: hr_utility.set_location(' r_CEP_unique.table_route_id '||r_CEP_unique.table_route_id,10);
12650: hr_utility.set_location(' r_CEP_unique.information1 '||r_CEP_unique.information1,10);
12651: hr_utility.set_location( 'r_CEP_unique.information2 '||r_CEP_unique.information2,10);
12652: hr_utility.set_location( 'r_CEP_unique.information3 '||r_CEP_unique.information3,10);
12653: -- If reuse objects flag is 'Y' then check for the object in the target business group
12654: -- if found insert the record into PLSql table and exit the loop else try create the
12655: -- object in the target business group
12648: --
12649: hr_utility.set_location(' r_CEP_unique.table_route_id '||r_CEP_unique.table_route_id,10);
12650: hr_utility.set_location(' r_CEP_unique.information1 '||r_CEP_unique.information1,10);
12651: hr_utility.set_location( 'r_CEP_unique.information2 '||r_CEP_unique.information2,10);
12652: hr_utility.set_location( 'r_CEP_unique.information3 '||r_CEP_unique.information3,10);
12653: -- If reuse objects flag is 'Y' then check for the object in the target business group
12654: -- if found insert the record into PLSql table and exit the loop else try create the
12655: -- object in the target business group
12656: --
12693: --
12694: --DOUBT log_data('CEP',l_new_value,l_prefix || r_CEP_unique.name|| l_suffix,'REUSED');
12695: --
12696: end if ;
12697: hr_utility.set_location( 'found record for update',10);
12698: --
12699: else
12700: --
12701: l_update := false;
12770: if not l_object_found_in_target OR l_update then
12771: --
12772: l_current_pk_id := r_CEP.information1;
12773: --
12774: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12775: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12776: --
12777: if l_current_pk_id = l_prev_pk_id then
12778: --
12771: --
12772: l_current_pk_id := r_CEP.information1;
12773: --
12774: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
12775: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
12776: --
12777: if l_current_pk_id = l_prev_pk_id then
12778: --
12779: l_first_rec := false ;
12792: end if;
12793:
12794: if l_first_rec and not l_update then
12795: -- Call Create routine.
12796: hr_utility.set_location(' BEN_PRTN_ELIG_PRFL_F CREATE_PRTN_ELIG_PRFL ',20);
12797: BEN_PRTN_ELIG_PRFL_API.CREATE_PRTN_ELIG_PRFL(
12798: --
12799: P_VALIDATE => false
12800: ,P_EFFECTIVE_DATE => l_effective_date
12843: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
12844: );
12845: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12846: -- Update all relevent cer records with new pk_id
12847: hr_utility.set_location('Before plsql table ',222);
12848: hr_utility.set_location('new_value id '||l_prtn_elig_prfl_id,222);
12849: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PRTN_ELIG_PRFL_ID' ;
12850: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CEP.information1 ;
12851: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIG_PRFL_ID ;
12844: );
12845: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12846: -- Update all relevent cer records with new pk_id
12847: hr_utility.set_location('Before plsql table ',222);
12848: hr_utility.set_location('new_value id '||l_prtn_elig_prfl_id,222);
12849: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PRTN_ELIG_PRFL_ID' ;
12850: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CEP.information1 ;
12851: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIG_PRFL_ID ;
12852: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
12850: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CEP.information1 ;
12851: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIG_PRFL_ID ;
12852: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
12853: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CEP_unique.table_route_id;
12854: hr_utility.set_location('After plsql table ',222);
12855: --
12856: -- 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 ) ;
12857: --
12858: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
12860: else
12861: --
12862: -- Call Update routine for the pk_id created in prev run .
12863: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12864: hr_utility.set_location(' BEN_PRTN_ELIG_PRFL_F UPDATE_PRTN_ELIG_PRFL ',30);
12865: --UPD START
12866: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12867: --
12868: if l_update then
12862: -- Call Update routine for the pk_id created in prev run .
12863: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
12864: hr_utility.set_location(' BEN_PRTN_ELIG_PRFL_F UPDATE_PRTN_ELIG_PRFL ',30);
12865: --UPD START
12866: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12867: --
12868: if l_update then
12869: --
12870: l_datetrack_mode := r_CEP.datetrack_mode ;
12882: l_object_version_number := r_CEP.information265;
12883: --
12884: end if;
12885: --
12886: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
12887: --
12888: IF l_update OR l_dml_operation <> 'UPDATE' THEN
12889: --UPD END
12890: BEN_PRTN_ELIG_PRFL_API.UPDATE_PRTN_ELIG_PRFL(
13120: r_CPR_unique.information3 >=
13121: ben_pd_copy_to_ben_one.g_copy_effective_date)
13122: ) then
13123: --
13124: hr_utility.set_location(' r_CPR_unique.table_route_id '||r_CPR_unique.table_route_id,10);
13125: hr_utility.set_location(' r_CPR_unique.information1 '||r_CPR_unique.information1,10);
13126: hr_utility.set_location( 'r_CPR_unique.information2 '||r_CPR_unique.information2,10);
13127: hr_utility.set_location( 'r_CPR_unique.information3 '||r_CPR_unique.information3,10);
13128: -- If reuse objects flag is 'Y' then check for the object in the target business group
13121: ben_pd_copy_to_ben_one.g_copy_effective_date)
13122: ) then
13123: --
13124: hr_utility.set_location(' r_CPR_unique.table_route_id '||r_CPR_unique.table_route_id,10);
13125: hr_utility.set_location(' r_CPR_unique.information1 '||r_CPR_unique.information1,10);
13126: hr_utility.set_location( 'r_CPR_unique.information2 '||r_CPR_unique.information2,10);
13127: hr_utility.set_location( 'r_CPR_unique.information3 '||r_CPR_unique.information3,10);
13128: -- If reuse objects flag is 'Y' then check for the object in the target business group
13129: -- if found insert the record into PLSql table and exit the loop else try create the
13122: ) then
13123: --
13124: hr_utility.set_location(' r_CPR_unique.table_route_id '||r_CPR_unique.table_route_id,10);
13125: hr_utility.set_location(' r_CPR_unique.information1 '||r_CPR_unique.information1,10);
13126: hr_utility.set_location( 'r_CPR_unique.information2 '||r_CPR_unique.information2,10);
13127: hr_utility.set_location( 'r_CPR_unique.information3 '||r_CPR_unique.information3,10);
13128: -- If reuse objects flag is 'Y' then check for the object in the target business group
13129: -- if found insert the record into PLSql table and exit the loop else try create the
13130: -- object in the target business group
13123: --
13124: hr_utility.set_location(' r_CPR_unique.table_route_id '||r_CPR_unique.table_route_id,10);
13125: hr_utility.set_location(' r_CPR_unique.information1 '||r_CPR_unique.information1,10);
13126: hr_utility.set_location( 'r_CPR_unique.information2 '||r_CPR_unique.information2,10);
13127: hr_utility.set_location( 'r_CPR_unique.information3 '||r_CPR_unique.information3,10);
13128: -- If reuse objects flag is 'Y' then check for the object in the target business group
13129: -- if found insert the record into PLSql table and exit the loop else try create the
13130: -- object in the target business group
13131: --
13169: --
13170: --DOUBT log_data('CPR',l_new_value,l_prefix || r_CPR_unique.name|| l_suffix,'REUSED');
13171: --
13172: end if ;
13173: hr_utility.set_location( 'found record for update',10);
13174: --
13175: else
13176: --
13177: l_update := false;
13250: if ( not l_object_found_in_target OR l_update ) and l_POPL_ORG_ID is not null then
13251: --
13252: l_current_pk_id := r_CPR.information1;
13253: --
13254: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13255: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13256: --
13257: if l_current_pk_id = l_prev_pk_id then
13258: --
13251: --
13252: l_current_pk_id := r_CPR.information1;
13253: --
13254: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13255: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13256: --
13257: if l_current_pk_id = l_prev_pk_id then
13258: --
13259: l_first_rec := false ;
13274: end if;
13275:
13276: if l_first_rec and not l_update then
13277: -- Call Create routine.
13278: hr_utility.set_location(' BEN_POPL_ORG_ROLE_F CREATE_POPL_ORG_ROLE ',20);
13279: BEN_POPL_ORG_ROLE_API.CREATE_POPL_ORG_ROLE(
13280: --
13281: P_VALIDATE => false
13282: ,P_EFFECTIVE_DATE => l_effective_date
13323: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
13324: );
13325: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13326: -- Update all relevent cer records with new pk_id
13327: hr_utility.set_location('Before plsql table ',222);
13328: hr_utility.set_location('new_value id '||l_popl_org_role_id,222);
13329: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ORG_ROLE_ID' ;
13330: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPR.information1 ;
13331: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ORG_ROLE_ID ;
13324: );
13325: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13326: -- Update all relevent cer records with new pk_id
13327: hr_utility.set_location('Before plsql table ',222);
13328: hr_utility.set_location('new_value id '||l_popl_org_role_id,222);
13329: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ORG_ROLE_ID' ;
13330: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPR.information1 ;
13331: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ORG_ROLE_ID ;
13332: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
13330: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPR.information1 ;
13331: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ORG_ROLE_ID ;
13332: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
13333: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CPR_unique.table_route_id;
13334: hr_utility.set_location('After plsql table ',222);
13335: --
13336: -- 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 ) ;
13337: --
13338: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
13340: else
13341: --
13342: -- Call Update routine for the pk_id created in prev run .
13343: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13344: hr_utility.set_location(' BEN_POPL_ORG_ROLE_F UPDATE_POPL_ORG_ROLE ',30);
13345: --UPD START
13346: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13347: --
13348: if l_update then
13342: -- Call Update routine for the pk_id created in prev run .
13343: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13344: hr_utility.set_location(' BEN_POPL_ORG_ROLE_F UPDATE_POPL_ORG_ROLE ',30);
13345: --UPD START
13346: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13347: --
13348: if l_update then
13349: --
13350: l_datetrack_mode := r_CPR.datetrack_mode ;
13362: l_object_version_number := r_CPR.information265;
13363: --
13364: end if;
13365: --
13366: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13367: --
13368: IF l_update OR l_dml_operation <> 'UPDATE' THEN
13369: --UPD END
13370: BEN_POPL_ORG_ROLE_API.UPDATE_POPL_ORG_ROLE(
13600: r_CPO_unique.information3 >=
13601: ben_pd_copy_to_ben_one.g_copy_effective_date)
13602: ) then
13603: --
13604: hr_utility.set_location(' r_CPO_unique.table_route_id '||r_CPO_unique.table_route_id,10);
13605: hr_utility.set_location(' r_CPO_unique.information1 '||r_CPO_unique.information1,10);
13606: hr_utility.set_location( 'r_CPO_unique.information2 '||r_CPO_unique.information2,10);
13607: hr_utility.set_location( 'r_CPO_unique.information3 '||r_CPO_unique.information3,10);
13608: -- If reuse objects flag is 'Y' then check for the object in the target business group
13601: ben_pd_copy_to_ben_one.g_copy_effective_date)
13602: ) then
13603: --
13604: hr_utility.set_location(' r_CPO_unique.table_route_id '||r_CPO_unique.table_route_id,10);
13605: hr_utility.set_location(' r_CPO_unique.information1 '||r_CPO_unique.information1,10);
13606: hr_utility.set_location( 'r_CPO_unique.information2 '||r_CPO_unique.information2,10);
13607: hr_utility.set_location( 'r_CPO_unique.information3 '||r_CPO_unique.information3,10);
13608: -- If reuse objects flag is 'Y' then check for the object in the target business group
13609: -- if found insert the record into PLSql table and exit the loop else try create the
13602: ) then
13603: --
13604: hr_utility.set_location(' r_CPO_unique.table_route_id '||r_CPO_unique.table_route_id,10);
13605: hr_utility.set_location(' r_CPO_unique.information1 '||r_CPO_unique.information1,10);
13606: hr_utility.set_location( 'r_CPO_unique.information2 '||r_CPO_unique.information2,10);
13607: hr_utility.set_location( 'r_CPO_unique.information3 '||r_CPO_unique.information3,10);
13608: -- If reuse objects flag is 'Y' then check for the object in the target business group
13609: -- if found insert the record into PLSql table and exit the loop else try create the
13610: -- object in the target business group
13603: --
13604: hr_utility.set_location(' r_CPO_unique.table_route_id '||r_CPO_unique.table_route_id,10);
13605: hr_utility.set_location(' r_CPO_unique.information1 '||r_CPO_unique.information1,10);
13606: hr_utility.set_location( 'r_CPO_unique.information2 '||r_CPO_unique.information2,10);
13607: hr_utility.set_location( 'r_CPO_unique.information3 '||r_CPO_unique.information3,10);
13608: -- If reuse objects flag is 'Y' then check for the object in the target business group
13609: -- if found insert the record into PLSql table and exit the loop else try create the
13610: -- object in the target business group
13611: --
13654: --
13655: --DOUBT log_data('CPO',l_new_value,l_prefix || r_CPO_unique.name|| l_suffix,'REUSED');
13656: --
13657: end if ;
13658: hr_utility.set_location( 'found record for update',10);
13659: --
13660: else
13661: --
13662: l_update := false;
13761: if ( not l_object_found_in_target OR l_update ) and l_ORGANIZATION_ID is not null then
13762: --
13763: l_current_pk_id := r_CPO.information1;
13764: --
13765: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13766: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13767: --
13768: if l_current_pk_id = l_prev_pk_id then
13769: --
13762: --
13763: l_current_pk_id := r_CPO.information1;
13764: --
13765: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
13766: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
13767: --
13768: if l_current_pk_id = l_prev_pk_id then
13769: --
13770: l_first_rec := false ;
13783: end if;
13784:
13785: if l_first_rec and not l_update then
13786: -- Call Create routine.
13787: hr_utility.set_location(' BEN_POPL_ORG_F CREATE_POPL_ORG ',20);
13788: BEN_POPL_ORG_API.CREATE_POPL_ORG(
13789: --
13790: P_VALIDATE => false
13791: ,P_EFFECTIVE_DATE => l_effective_date
13835: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
13836: );
13837: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13838: -- Update all relevent cer records with new pk_id
13839: hr_utility.set_location('Before plsql table ',222);
13840: hr_utility.set_location('new_value id '||l_popl_org_id,222);
13841: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ORG_ID' ;
13842: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPO.information1 ;
13843: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ORG_ID ;
13836: );
13837: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13838: -- Update all relevent cer records with new pk_id
13839: hr_utility.set_location('Before plsql table ',222);
13840: hr_utility.set_location('new_value id '||l_popl_org_id,222);
13841: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ORG_ID' ;
13842: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPO.information1 ;
13843: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ORG_ID ;
13844: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
13842: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPO.information1 ;
13843: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ORG_ID ;
13844: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
13845: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CPO_unique.table_route_id;
13846: hr_utility.set_location('After plsql table ',222);
13847: --
13848: -- 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 ) ;
13849: --
13850: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
13852: else
13853: --
13854: -- Call Update routine for the pk_id created in prev run .
13855: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13856: hr_utility.set_location(' BEN_POPL_ORG_F UPDATE_POPL_ORG ',30);
13857: --UPD START
13858: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13859: --
13860: if l_update then
13854: -- Call Update routine for the pk_id created in prev run .
13855: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
13856: hr_utility.set_location(' BEN_POPL_ORG_F UPDATE_POPL_ORG ',30);
13857: --UPD START
13858: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13859: --
13860: if l_update then
13861: --
13862: l_datetrack_mode := r_CPO.datetrack_mode ;
13874: l_object_version_number := r_CPO.information265;
13875: --
13876: end if;
13877: --
13878: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
13879: --
13880: IF l_update OR l_dml_operation <> 'UPDATE' THEN
13881: --UPD END
13882: BEN_POPL_ORG_API.UPDATE_POPL_ORG(
14130: r_PRG_unique.information3 >=
14131: ben_pd_copy_to_ben_one.g_copy_effective_date)
14132: ) then
14133: --
14134: hr_utility.set_location(' r_PRG_unique.table_route_id '||r_PRG_unique.table_route_id,10);
14135: hr_utility.set_location(' r_PRG_unique.information1 '||r_PRG_unique.information1,10);
14136: hr_utility.set_location( 'r_PRG_unique.information2 '||r_PRG_unique.information2,10);
14137: hr_utility.set_location( 'r_PRG_unique.information3 '||r_PRG_unique.information3,10);
14138: -- If reuse objects flag is 'Y' then check for the object in the target business group
14131: ben_pd_copy_to_ben_one.g_copy_effective_date)
14132: ) then
14133: --
14134: hr_utility.set_location(' r_PRG_unique.table_route_id '||r_PRG_unique.table_route_id,10);
14135: hr_utility.set_location(' r_PRG_unique.information1 '||r_PRG_unique.information1,10);
14136: hr_utility.set_location( 'r_PRG_unique.information2 '||r_PRG_unique.information2,10);
14137: hr_utility.set_location( 'r_PRG_unique.information3 '||r_PRG_unique.information3,10);
14138: -- If reuse objects flag is 'Y' then check for the object in the target business group
14139: -- if found insert the record into PLSql table and exit the loop else try create the
14132: ) then
14133: --
14134: hr_utility.set_location(' r_PRG_unique.table_route_id '||r_PRG_unique.table_route_id,10);
14135: hr_utility.set_location(' r_PRG_unique.information1 '||r_PRG_unique.information1,10);
14136: hr_utility.set_location( 'r_PRG_unique.information2 '||r_PRG_unique.information2,10);
14137: hr_utility.set_location( 'r_PRG_unique.information3 '||r_PRG_unique.information3,10);
14138: -- If reuse objects flag is 'Y' then check for the object in the target business group
14139: -- if found insert the record into PLSql table and exit the loop else try create the
14140: -- object in the target business group
14133: --
14134: hr_utility.set_location(' r_PRG_unique.table_route_id '||r_PRG_unique.table_route_id,10);
14135: hr_utility.set_location(' r_PRG_unique.information1 '||r_PRG_unique.information1,10);
14136: hr_utility.set_location( 'r_PRG_unique.information2 '||r_PRG_unique.information2,10);
14137: hr_utility.set_location( 'r_PRG_unique.information3 '||r_PRG_unique.information3,10);
14138: -- If reuse objects flag is 'Y' then check for the object in the target business group
14139: -- if found insert the record into PLSql table and exit the loop else try create the
14140: -- object in the target business group
14141: --
14183: --
14184: --DOUBT log_data('PRG',l_new_value,l_prefix || r_PRG_unique.name|| l_suffix,'REUSED');
14185: --
14186: end if ;
14187: hr_utility.set_location( 'found record for update',10);
14188: --
14189: else
14190: --
14191: l_update := false;
14288: if not l_object_found_in_target OR l_update then
14289: --
14290: l_current_pk_id := r_PRG.information1;
14291: --
14292: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14293: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14294: --
14295: if l_current_pk_id = l_prev_pk_id then
14296: --
14289: --
14290: l_current_pk_id := r_PRG.information1;
14291: --
14292: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14293: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14294: --
14295: if l_current_pk_id = l_prev_pk_id then
14296: --
14297: l_first_rec := false ;
14310: end if;
14311:
14312: if l_first_rec and not l_update then
14313: -- Call Create routine.
14314: hr_utility.set_location(' BEN_PL_REGN_F CREATE_PLAN_REGULATION ',20);
14315: BEN_PLAN_REGULATION_API.CREATE_PLAN_REGULATION(
14316: --
14317: P_VALIDATE => false
14318: ,P_EFFECTIVE_DATE => l_effective_date
14365: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
14366: );
14367: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14368: -- Update all relevent cer records with new pk_id
14369: hr_utility.set_location('Before plsql table ',222);
14370: hr_utility.set_location('new_value id '||l_pl_regn_id,222);
14371: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGN_ID' ;
14372: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRG.information1 ;
14373: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGN_ID ;
14366: );
14367: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14368: -- Update all relevent cer records with new pk_id
14369: hr_utility.set_location('Before plsql table ',222);
14370: hr_utility.set_location('new_value id '||l_pl_regn_id,222);
14371: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGN_ID' ;
14372: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRG.information1 ;
14373: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGN_ID ;
14374: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
14372: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRG.information1 ;
14373: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGN_ID ;
14374: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
14375: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PRG_unique.table_route_id;
14376: hr_utility.set_location('After plsql table ',222);
14377: --
14378: -- 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 ) ;
14379: --
14380: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
14382: else
14383: --
14384: -- Call Update routine for the pk_id created in prev run .
14385: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14386: hr_utility.set_location(' BEN_PL_REGN_F UPDATE_PLAN_REGULATION ',30);
14387: --UPD START
14388: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
14389: --
14390: if l_update then
14384: -- Call Update routine for the pk_id created in prev run .
14385: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14386: hr_utility.set_location(' BEN_PL_REGN_F UPDATE_PLAN_REGULATION ',30);
14387: --UPD START
14388: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
14389: --
14390: if l_update then
14391: --
14392: l_datetrack_mode := r_PRG.datetrack_mode ;
14404: l_object_version_number := r_PRG.information265;
14405: --
14406: end if;
14407: --
14408: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
14409: --
14410: IF l_update OR l_dml_operation <> 'UPDATE' THEN
14411: --UPD END
14412: BEN_PLAN_REGULATION_API.UPDATE_PLAN_REGULATION(
14646: r_RGR_unique.information3 >=
14647: ben_pd_copy_to_ben_one.g_copy_effective_date)
14648: ) then
14649: --
14650: hr_utility.set_location(' r_RGR_unique.table_route_id '||r_RGR_unique.table_route_id,10);
14651: hr_utility.set_location(' r_RGR_unique.information1 '||r_RGR_unique.information1,10);
14652: hr_utility.set_location( 'r_RGR_unique.information2 '||r_RGR_unique.information2,10);
14653: hr_utility.set_location( 'r_RGR_unique.information3 '||r_RGR_unique.information3,10);
14654: -- If reuse objects flag is 'Y' then check for the object in the target business group
14647: ben_pd_copy_to_ben_one.g_copy_effective_date)
14648: ) then
14649: --
14650: hr_utility.set_location(' r_RGR_unique.table_route_id '||r_RGR_unique.table_route_id,10);
14651: hr_utility.set_location(' r_RGR_unique.information1 '||r_RGR_unique.information1,10);
14652: hr_utility.set_location( 'r_RGR_unique.information2 '||r_RGR_unique.information2,10);
14653: hr_utility.set_location( 'r_RGR_unique.information3 '||r_RGR_unique.information3,10);
14654: -- If reuse objects flag is 'Y' then check for the object in the target business group
14655: -- if found insert the record into PLSql table and exit the loop else try create the
14648: ) then
14649: --
14650: hr_utility.set_location(' r_RGR_unique.table_route_id '||r_RGR_unique.table_route_id,10);
14651: hr_utility.set_location(' r_RGR_unique.information1 '||r_RGR_unique.information1,10);
14652: hr_utility.set_location( 'r_RGR_unique.information2 '||r_RGR_unique.information2,10);
14653: hr_utility.set_location( 'r_RGR_unique.information3 '||r_RGR_unique.information3,10);
14654: -- If reuse objects flag is 'Y' then check for the object in the target business group
14655: -- if found insert the record into PLSql table and exit the loop else try create the
14656: -- object in the target business group
14649: --
14650: hr_utility.set_location(' r_RGR_unique.table_route_id '||r_RGR_unique.table_route_id,10);
14651: hr_utility.set_location(' r_RGR_unique.information1 '||r_RGR_unique.information1,10);
14652: hr_utility.set_location( 'r_RGR_unique.information2 '||r_RGR_unique.information2,10);
14653: hr_utility.set_location( 'r_RGR_unique.information3 '||r_RGR_unique.information3,10);
14654: -- If reuse objects flag is 'Y' then check for the object in the target business group
14655: -- if found insert the record into PLSql table and exit the loop else try create the
14656: -- object in the target business group
14657: --
14694: --
14695: --DOUBT log_data('RGR',l_new_value,l_prefix || r_RGR_unique.name|| l_suffix,'REUSED');
14696: --
14697: end if ;
14698: hr_utility.set_location( 'found record for update',10);
14699: --
14700: else
14701: --
14702: l_update := false;
14779: if not l_object_found_in_target OR l_update then
14780: --
14781: l_current_pk_id := r_RGR.information1;
14782: --
14783: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14784: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14785: --
14786: if l_current_pk_id = l_prev_pk_id then
14787: --
14780: --
14781: l_current_pk_id := r_RGR.information1;
14782: --
14783: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
14784: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
14785: --
14786: if l_current_pk_id = l_prev_pk_id then
14787: --
14788: l_first_rec := false ;
14801: end if;
14802:
14803: if l_first_rec and not l_update then
14804: -- Call Create routine.
14805: hr_utility.set_location(' BEN_POPL_RPTG_GRP_F CREATE_POPL_RPTG_GRP ',20);
14806: BEN_POPL_RPTG_GRP_API.CREATE_POPL_RPTG_GRP(
14807: --
14808: P_VALIDATE => false
14809: ,P_EFFECTIVE_DATE => l_effective_date
14850: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
14851: );
14852: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14853: -- Update all relevent cer records with new pk_id
14854: hr_utility.set_location('Before plsql table ',222);
14855: hr_utility.set_location('new_value id '||l_popl_rptg_grp_id,222);
14856: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_RPTG_GRP_ID' ;
14857: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_RGR.information1 ;
14858: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_RPTG_GRP_ID ;
14851: );
14852: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14853: -- Update all relevent cer records with new pk_id
14854: hr_utility.set_location('Before plsql table ',222);
14855: hr_utility.set_location('new_value id '||l_popl_rptg_grp_id,222);
14856: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_RPTG_GRP_ID' ;
14857: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_RGR.information1 ;
14858: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_RPTG_GRP_ID ;
14859: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
14857: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_RGR.information1 ;
14858: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_RPTG_GRP_ID ;
14859: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
14860: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_RGR_unique.table_route_id;
14861: hr_utility.set_location('After plsql table ',222);
14862: --
14863: -- 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 ) ;
14864: --
14865: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
14867: else
14868: --
14869: -- Call Update routine for the pk_id created in prev run .
14870: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14871: hr_utility.set_location(' BEN_POPL_RPTG_GRP_F UPDATE_POPL_RPTG_GRP ',30);
14872: --UPD START
14873: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
14874: --
14875: if l_update then
14869: -- Call Update routine for the pk_id created in prev run .
14870: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
14871: hr_utility.set_location(' BEN_POPL_RPTG_GRP_F UPDATE_POPL_RPTG_GRP ',30);
14872: --UPD START
14873: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
14874: --
14875: if l_update then
14876: --
14877: l_datetrack_mode := r_RGR.datetrack_mode ;
14889: l_object_version_number := r_RGR.information265;
14890: --
14891: end if;
14892: --
14893: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
14894: --
14895: IF l_update OR l_dml_operation <> 'UPDATE' THEN
14896: --UPD END
14897:
15129: ben_pd_copy_to_ben_one.g_copy_effective_date)
15130: ) then
15131:
15132: --
15133: hr_utility.set_location(' r_ECF_unique.table_route_id '||r_ECF_unique.table_route_id,10);
15134: hr_utility.set_location(' r_ECF_unique.information1 '||r_ECF_unique.information1,10);
15135: hr_utility.set_location( 'r_ECF_unique.information2 '||r_ECF_unique.information2,10);
15136: hr_utility.set_location( 'r_ECF_unique.information3 '||r_ECF_unique.information3,10);
15137: -- If reuse objects flag is 'Y' then check for the object in the target business group
15130: ) then
15131:
15132: --
15133: hr_utility.set_location(' r_ECF_unique.table_route_id '||r_ECF_unique.table_route_id,10);
15134: hr_utility.set_location(' r_ECF_unique.information1 '||r_ECF_unique.information1,10);
15135: hr_utility.set_location( 'r_ECF_unique.information2 '||r_ECF_unique.information2,10);
15136: hr_utility.set_location( 'r_ECF_unique.information3 '||r_ECF_unique.information3,10);
15137: -- If reuse objects flag is 'Y' then check for the object in the target business group
15138: -- if found insert the record into PLSql table and exit the loop else try create the
15131:
15132: --
15133: hr_utility.set_location(' r_ECF_unique.table_route_id '||r_ECF_unique.table_route_id,10);
15134: hr_utility.set_location(' r_ECF_unique.information1 '||r_ECF_unique.information1,10);
15135: hr_utility.set_location( 'r_ECF_unique.information2 '||r_ECF_unique.information2,10);
15136: hr_utility.set_location( 'r_ECF_unique.information3 '||r_ECF_unique.information3,10);
15137: -- If reuse objects flag is 'Y' then check for the object in the target business group
15138: -- if found insert the record into PLSql table and exit the loop else try create the
15139: -- object in the target business group
15132: --
15133: hr_utility.set_location(' r_ECF_unique.table_route_id '||r_ECF_unique.table_route_id,10);
15134: hr_utility.set_location(' r_ECF_unique.information1 '||r_ECF_unique.information1,10);
15135: hr_utility.set_location( 'r_ECF_unique.information2 '||r_ECF_unique.information2,10);
15136: hr_utility.set_location( 'r_ECF_unique.information3 '||r_ECF_unique.information3,10);
15137: -- If reuse objects flag is 'Y' then check for the object in the target business group
15138: -- if found insert the record into PLSql table and exit the loop else try create the
15139: -- object in the target business group
15140: --
15176: --
15177: --DOUBT log_data('ECF',l_new_value,l_prefix || r_ECF_unique.name|| l_suffix,'REUSED');
15178: --
15179: end if ;
15180: hr_utility.set_location( 'found record for update',10);
15181: --
15182: else
15183: --
15184: l_update := false;
15255: if not l_object_found_in_target OR l_update then
15256: --
15257: l_current_pk_id := r_ECF.information1;
15258: --
15259: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
15260: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
15261: --
15262: if l_current_pk_id = l_prev_pk_id then
15263: --
15256: --
15257: l_current_pk_id := r_ECF.information1;
15258: --
15259: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
15260: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
15261: --
15262: if l_current_pk_id = l_prev_pk_id then
15263: --
15264: l_first_rec := false ;
15277: end if;
15278:
15279: if l_first_rec and not l_update then
15280: -- Call Create routine.
15281: hr_utility.set_location(' BEN_ENRT_CTFN_F CREATE_ENRT_CTFN ',20);
15282: BEN_ENRT_CTFN_API.CREATE_ENRT_CTFN(
15283: --
15284: P_VALIDATE => false
15285: ,P_EFFECTIVE_DATE => l_effective_date
15328: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
15329: );
15330: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15331: -- Update all relevent cer records with new pk_id
15332: hr_utility.set_location('Before plsql table ',222);
15333: hr_utility.set_location('new_value id '||l_enrt_ctfn_id,222);
15334: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_CTFN_ID' ;
15335: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ECF.information1 ;
15336: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_CTFN_ID ;
15329: );
15330: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15331: -- Update all relevent cer records with new pk_id
15332: hr_utility.set_location('Before plsql table ',222);
15333: hr_utility.set_location('new_value id '||l_enrt_ctfn_id,222);
15334: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_CTFN_ID' ;
15335: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ECF.information1 ;
15336: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_CTFN_ID ;
15337: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
15335: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ECF.information1 ;
15336: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_CTFN_ID ;
15337: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
15338: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_ECF_unique.table_route_id;
15339: hr_utility.set_location('After plsql table ',222);
15340: --
15341: -- 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 ) ;
15342: --
15343: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
15345: else
15346: --
15347: -- Call Update routine for the pk_id created in prev run .
15348: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15349: hr_utility.set_location(' BEN_ENRT_CTFN_F UPDATE_ENRT_CTFN ',30);
15350: --UPD START
15351: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15352: --
15353: if l_update then
15347: -- Call Update routine for the pk_id created in prev run .
15348: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15349: hr_utility.set_location(' BEN_ENRT_CTFN_F UPDATE_ENRT_CTFN ',30);
15350: --UPD START
15351: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15352: --
15353: if l_update then
15354: --
15355: l_datetrack_mode := r_ECF.datetrack_mode ;
15367: l_object_version_number := r_ECF.information265;
15368: --
15369: end if;
15370: --
15371: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15372: --
15373: IF l_update OR l_dml_operation <> 'UPDATE' THEN
15374: --UPD END
15375:
15619: r_EPA_unique.information3 >=
15620: ben_pd_copy_to_ben_one.g_copy_effective_date)
15621: ) then
15622: --
15623: hr_utility.set_location(' r_EPA_unique.table_route_id '||r_EPA_unique.table_route_id,10);
15624: hr_utility.set_location(' r_EPA_unique.information1 '||r_EPA_unique.information1,10);
15625: hr_utility.set_location( 'r_EPA_unique.information2 '||r_EPA_unique.information2,10);
15626: hr_utility.set_location( 'r_EPA_unique.information3 '||r_EPA_unique.information3,10);
15627: -- If reuse objects flag is 'Y' then check for the object in the target business group
15620: ben_pd_copy_to_ben_one.g_copy_effective_date)
15621: ) then
15622: --
15623: hr_utility.set_location(' r_EPA_unique.table_route_id '||r_EPA_unique.table_route_id,10);
15624: hr_utility.set_location(' r_EPA_unique.information1 '||r_EPA_unique.information1,10);
15625: hr_utility.set_location( 'r_EPA_unique.information2 '||r_EPA_unique.information2,10);
15626: hr_utility.set_location( 'r_EPA_unique.information3 '||r_EPA_unique.information3,10);
15627: -- If reuse objects flag is 'Y' then check for the object in the target business group
15628: -- if found insert the record into PLSql table and exit the loop else try create the
15621: ) then
15622: --
15623: hr_utility.set_location(' r_EPA_unique.table_route_id '||r_EPA_unique.table_route_id,10);
15624: hr_utility.set_location(' r_EPA_unique.information1 '||r_EPA_unique.information1,10);
15625: hr_utility.set_location( 'r_EPA_unique.information2 '||r_EPA_unique.information2,10);
15626: hr_utility.set_location( 'r_EPA_unique.information3 '||r_EPA_unique.information3,10);
15627: -- If reuse objects flag is 'Y' then check for the object in the target business group
15628: -- if found insert the record into PLSql table and exit the loop else try create the
15629: -- object in the target business group
15622: --
15623: hr_utility.set_location(' r_EPA_unique.table_route_id '||r_EPA_unique.table_route_id,10);
15624: hr_utility.set_location(' r_EPA_unique.information1 '||r_EPA_unique.information1,10);
15625: hr_utility.set_location( 'r_EPA_unique.information2 '||r_EPA_unique.information2,10);
15626: hr_utility.set_location( 'r_EPA_unique.information3 '||r_EPA_unique.information3,10);
15627: -- If reuse objects flag is 'Y' then check for the object in the target business group
15628: -- if found insert the record into PLSql table and exit the loop else try create the
15629: -- object in the target business group
15630: --
15674: --
15675: --DOUBT log_data('EPA',l_new_value,l_prefix || r_EPA_unique.name|| l_suffix,'REUSED');
15676: --
15677: end if ;
15678: hr_utility.set_location( 'found record for update',10);
15679: --
15680: else
15681: --
15682: l_update := false;
15751: if not l_object_found_in_target OR l_update then
15752: --
15753: l_current_pk_id := r_EPA.information1;
15754: --
15755: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
15756: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
15757: --
15758: if l_current_pk_id = l_prev_pk_id then
15759: --
15752: --
15753: l_current_pk_id := r_EPA.information1;
15754: --
15755: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
15756: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
15757: --
15758: if l_current_pk_id = l_prev_pk_id then
15759: --
15760: l_first_rec := false ;
15773: end if;
15774:
15775: if l_first_rec and not l_update then
15776: -- Call Create routine.
15777: hr_utility.set_location(' BEN_PRTN_ELIG_F CREATE_PARTICIPATION_ELIG ',20);
15778: BEN_PARTICIPATION_ELIG_API.CREATE_PARTICIPATION_ELIG(
15779: --
15780: P_VALIDATE => false
15781: ,P_EFFECTIVE_DATE => l_effective_date
15840: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
15841: );
15842: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15843: -- Update all relevent cer records with new pk_id
15844: hr_utility.set_location('Before plsql table ',222);
15845: hr_utility.set_location('new_value id '||l_prtn_elig_id,222);
15846: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PRTN_ELIG_ID' ;
15847: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_EPA.information1 ;
15848: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIG_ID ;
15841: );
15842: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15843: -- Update all relevent cer records with new pk_id
15844: hr_utility.set_location('Before plsql table ',222);
15845: hr_utility.set_location('new_value id '||l_prtn_elig_id,222);
15846: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PRTN_ELIG_ID' ;
15847: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_EPA.information1 ;
15848: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIG_ID ;
15849: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
15847: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_EPA.information1 ;
15848: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PRTN_ELIG_ID ;
15849: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
15850: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_EPA_unique.table_route_id;
15851: hr_utility.set_location('After plsql table ',222);
15852: --
15853: -- 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 ) ;
15854: --
15855: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
15857: else
15858: --
15859: -- Call Update routine for the pk_id created in prev run .
15860: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15861: hr_utility.set_location(' BEN_PRTN_ELIG_F UPDATE_PARTICIPATION_ELIG ',30);
15862: --UPD START
15863: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15864: --
15865: if l_update then
15859: -- Call Update routine for the pk_id created in prev run .
15860: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
15861: hr_utility.set_location(' BEN_PRTN_ELIG_F UPDATE_PARTICIPATION_ELIG ',30);
15862: --UPD START
15863: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15864: --
15865: if l_update then
15866: --
15867: l_datetrack_mode := r_EPA.datetrack_mode ;
15879: l_object_version_number := r_EPA.information265;
15880: --
15881: end if;
15882: --
15883: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
15884: --
15885: IF l_update OR l_dml_operation <> 'UPDATE' THEN
15886: --UPD END
15887:
16150: end if ;
16151: -- End Prefix Sufix derivation
16152: for r_CPY_unique in c_unique_CPY('CPY') loop
16153: --
16154: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16155: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16156: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16157: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16158: -- If reuse objects flag is 'Y' then check for the object in the target business group
16151: -- End Prefix Sufix derivation
16152: for r_CPY_unique in c_unique_CPY('CPY') loop
16153: --
16154: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16155: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16156: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16157: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16158: -- If reuse objects flag is 'Y' then check for the object in the target business group
16159: -- if found insert the record into PLSql table and exit the loop else try create the
16152: for r_CPY_unique in c_unique_CPY('CPY') loop
16153: --
16154: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16155: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16156: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16157: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16158: -- If reuse objects flag is 'Y' then check for the object in the target business group
16159: -- if found insert the record into PLSql table and exit the loop else try create the
16160: -- object in the target business group
16153: --
16154: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16155: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16156: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16157: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16158: -- If reuse objects flag is 'Y' then check for the object in the target business group
16159: -- if found insert the record into PLSql table and exit the loop else try create the
16160: -- object in the target business group
16161: --
16199: --
16200: end if ;
16201: l_POPL_YR_PERD_ID := r_CPY_unique.information1 ;
16202: l_object_version_number := r_CPY.information265 ;
16203: hr_utility.set_location( 'found record for update',10);
16204: --
16205: else
16206: --
16207: --UPD END
16236: if not l_object_found_in_target OR l_update then
16237: --
16238: l_current_pk_id := r_CPY.information1;
16239: --
16240: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16241: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16242: --
16243: if l_current_pk_id = l_prev_pk_id then
16244: --
16237: --
16238: l_current_pk_id := r_CPY.information1;
16239: --
16240: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16241: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16242: --
16243: if l_current_pk_id = l_prev_pk_id then
16244: --
16245: l_first_rec := false ;
16292:
16293: if not l_skip_pl_yrp then
16294: --End Bug 14490456
16295: -- Call Create routine.
16296: hr_utility.set_location(' BEN_POPL_YR_PERD CREATE_POPL_YR_PERD ',20);
16297: BEN_POPL_YR_PERD_API.CREATE_POPL_YR_PERD(
16298: --
16299: P_VALIDATE => false
16300: --,P_EFFECTIVE_DATE => p_effective_date
16342: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
16343: );
16344: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16345: -- Update all relevent cer records with new pk_id
16346: hr_utility.set_location('Before plsql table ',222);
16347: hr_utility.set_location('new_value id '||l_popl_yr_perd_id,222);
16348: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_YR_PERD_ID' ;
16349: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPY.information1 ;
16350: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_YR_PERD_ID ;
16343: );
16344: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16345: -- Update all relevent cer records with new pk_id
16346: hr_utility.set_location('Before plsql table ',222);
16347: hr_utility.set_location('new_value id '||l_popl_yr_perd_id,222);
16348: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_YR_PERD_ID' ;
16349: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPY.information1 ;
16350: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_YR_PERD_ID ;
16351: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16349: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPY.information1 ;
16350: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_YR_PERD_ID ;
16351: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16352: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CPY_unique.table_route_id;
16353: hr_utility.set_location('After plsql table ',222);
16354: --
16355: -- 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 ) ;
16356: --
16357: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
16565: r_PET_unique.information3 >=
16566: ben_pd_copy_to_ben_one.g_copy_effective_date)
16567: ) then
16568: --
16569: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16570: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16571: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16572: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16573: -- If reuse objects flag is 'Y' then check for the object in the target business group
16566: ben_pd_copy_to_ben_one.g_copy_effective_date)
16567: ) then
16568: --
16569: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16570: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16571: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16572: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16573: -- If reuse objects flag is 'Y' then check for the object in the target business group
16574: -- if found insert the record into PLSql table and exit the loop else try create the
16567: ) then
16568: --
16569: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16570: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16571: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16572: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16573: -- If reuse objects flag is 'Y' then check for the object in the target business group
16574: -- if found insert the record into PLSql table and exit the loop else try create the
16575: -- object in the target business group
16568: --
16569: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16570: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16571: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16572: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16573: -- If reuse objects flag is 'Y' then check for the object in the target business group
16574: -- if found insert the record into PLSql table and exit the loop else try create the
16575: -- object in the target business group
16576: --
16612: --
16613: --DOUBT log_data('PET',l_new_value,l_prefix || r_PET_unique.name|| l_suffix,'REUSED');
16614: --
16615: end if ;
16616: hr_utility.set_location( 'found record for update',10);
16617: --
16618: else
16619: --
16620: l_update := false;
16689: if not l_object_found_in_target OR l_update then
16690: --
16691: l_current_pk_id := r_PET.information1;
16692: --
16693: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16694: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16695: --
16696: if l_current_pk_id = l_prev_pk_id then
16697: --
16690: --
16691: l_current_pk_id := r_PET.information1;
16692: --
16693: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16694: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16695: --
16696: if l_current_pk_id = l_prev_pk_id then
16697: --
16698: l_first_rec := false ;
16711: end if;
16712:
16713: if l_first_rec and not l_update then
16714: -- Call Create routine.
16715: hr_utility.set_location(' BEN_POPL_ENRT_TYP_CYCL_F CREATE_POPL_ENRT_TYP_CYCL ',20);
16716: BEN_POPL_ENRT_TYP_CYCL_API.CREATE_POPL_ENRT_TYP_CYCL(
16717: --
16718: P_VALIDATE => false
16719: ,P_EFFECTIVE_DATE => l_effective_date
16760: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
16761: );
16762: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16763: -- Update all relevent cer records with new pk_id
16764: hr_utility.set_location('Before plsql table ',222);
16765: hr_utility.set_location('new_value id '||l_popl_enrt_typ_cycl_id,222);
16766: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ENRT_TYP_CYCL_ID' ;
16767: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PET.information1 ;
16768: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ENRT_TYP_CYCL_ID ;
16761: );
16762: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16763: -- Update all relevent cer records with new pk_id
16764: hr_utility.set_location('Before plsql table ',222);
16765: hr_utility.set_location('new_value id '||l_popl_enrt_typ_cycl_id,222);
16766: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ENRT_TYP_CYCL_ID' ;
16767: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PET.information1 ;
16768: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ENRT_TYP_CYCL_ID ;
16769: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16767: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PET.information1 ;
16768: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ENRT_TYP_CYCL_ID ;
16769: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16770: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PET_unique.table_route_id;
16771: hr_utility.set_location('After plsql table ',222);
16772: --
16773: -- 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 ) ;
16774: --
16775: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
16777: else
16778: --
16779: -- Call Update routine for the pk_id created in prev run .
16780: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16781: hr_utility.set_location(' BEN_POPL_ENRT_TYP_CYCL_F UPDATE_POPL_ENRT_TYP_CYCL ',30);
16782: --UPD START
16783: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16784: --
16785: if l_update then
16779: -- Call Update routine for the pk_id created in prev run .
16780: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16781: hr_utility.set_location(' BEN_POPL_ENRT_TYP_CYCL_F UPDATE_POPL_ENRT_TYP_CYCL ',30);
16782: --UPD START
16783: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16784: --
16785: if l_update then
16786: --
16787: l_datetrack_mode := r_PET.datetrack_mode ;
16799: l_object_version_number := r_PET.information265;
16800: --
16801: end if;
16802: --
16803: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16804: --
16805: IF l_update OR l_dml_operation <> 'UPDATE' THEN
16806: --UPD END
16807: BEN_POPL_ENRT_TYP_CYCL_API.UPDATE_POPL_ENRT_TYP_CYCL(
17009: end if ;
17010: -- End Prefix Sufix derivation
17011: for r_ENP_unique in c_unique_ENP('ENP') loop
17012: --
17013: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
17014: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
17015: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
17016: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
17017: -- If reuse objects flag is 'Y' then check for the object in the target business group
17010: -- End Prefix Sufix derivation
17011: for r_ENP_unique in c_unique_ENP('ENP') loop
17012: --
17013: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
17014: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
17015: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
17016: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
17017: -- If reuse objects flag is 'Y' then check for the object in the target business group
17018: -- if found insert the record into PLSql table and exit the loop else try create the
17011: for r_ENP_unique in c_unique_ENP('ENP') loop
17012: --
17013: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
17014: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
17015: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
17016: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
17017: -- If reuse objects flag is 'Y' then check for the object in the target business group
17018: -- if found insert the record into PLSql table and exit the loop else try create the
17019: -- object in the target business group
17012: --
17013: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
17014: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
17015: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
17016: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
17017: -- If reuse objects flag is 'Y' then check for the object in the target business group
17018: -- if found insert the record into PLSql table and exit the loop else try create the
17019: -- object in the target business group
17020: --
17076: --
17077: end if ;
17078: l_ENRT_PERD_ID := r_ENP_unique.information1 ;
17079: l_object_version_number := r_ENP.information265 ;
17080: hr_utility.set_location( 'found record for update',10);
17081: --
17082: else
17083: --
17084: --UPD END
17113: if not l_object_found_in_target OR l_update then
17114: --
17115: l_current_pk_id := r_ENP.information1;
17116: --
17117: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17118: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17119: --
17120: if l_current_pk_id = l_prev_pk_id then
17121: --
17114: --
17115: l_current_pk_id := r_ENP.information1;
17116: --
17117: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17118: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17119: --
17120: if l_current_pk_id = l_prev_pk_id then
17121: --
17122: l_first_rec := false ;
17145: end if;
17146: --
17147: if l_first_rec and not l_update then
17148: -- Call Create routine.
17149: hr_utility.set_location(' BEN_ENRT_PERD CREATE_ENROLLMENT_PERIOD ',20);
17150: BEN_ENROLLMENT_PERIOD_API.CREATE_ENROLLMENT_PERIOD(
17151: --
17152: P_VALIDATE => false
17153: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
17234: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
17235: );
17236: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17237: -- Update all relevent cer records with new pk_id
17238: hr_utility.set_location('Before plsql table ',222);
17239: hr_utility.set_location('new_value id '||l_enrt_perd_id,222);
17240: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_PERD_ID' ;
17241: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ENP.information1 ;
17242: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_ID ;
17235: );
17236: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17237: -- Update all relevent cer records with new pk_id
17238: hr_utility.set_location('Before plsql table ',222);
17239: hr_utility.set_location('new_value id '||l_enrt_perd_id,222);
17240: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_PERD_ID' ;
17241: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ENP.information1 ;
17242: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_ID ;
17243: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17241: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ENP.information1 ;
17242: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_ID ;
17243: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17244: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_ENP_unique.table_route_id;
17245: hr_utility.set_location('After plsql table ',222);
17246: --
17247: -- 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 ) ;
17248: --
17249: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
17501: r_LEN_unique.information3 >=
17502: ben_pd_copy_to_ben_one.g_copy_effective_date)
17503: ) then
17504: --
17505: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17506: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17507: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17508: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17509: -- If reuse objects flag is 'Y' then check for the object in the target business group
17502: ben_pd_copy_to_ben_one.g_copy_effective_date)
17503: ) then
17504: --
17505: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17506: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17507: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17508: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17509: -- If reuse objects flag is 'Y' then check for the object in the target business group
17510: -- if found insert the record into PLSql table and exit the loop else try create the
17503: ) then
17504: --
17505: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17506: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17507: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17508: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17509: -- If reuse objects flag is 'Y' then check for the object in the target business group
17510: -- if found insert the record into PLSql table and exit the loop else try create the
17511: -- object in the target business group
17504: --
17505: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17506: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17507: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17508: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17509: -- If reuse objects flag is 'Y' then check for the object in the target business group
17510: -- if found insert the record into PLSql table and exit the loop else try create the
17511: -- object in the target business group
17512: --
17553: --
17554: --DOUBT log_data('LEN',l_new_value,l_prefix || r_LEN_unique.name|| l_suffix,'REUSED');
17555: --
17556: end if ;
17557: hr_utility.set_location( 'found record for update',10);
17558: --
17559: else
17560: --
17561: l_update := false;
17631: if not l_object_found_in_target OR l_update then
17632: --
17633: l_current_pk_id := r_LEN.information1;
17634: --
17635: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17636: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17637: --
17638: if l_current_pk_id = l_prev_pk_id then
17639: --
17632: --
17633: l_current_pk_id := r_LEN.information1;
17634: --
17635: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17636: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17637: --
17638: if l_current_pk_id = l_prev_pk_id then
17639: --
17640: l_first_rec := false ;
17653: end if;
17654:
17655: if l_first_rec and not l_update then
17656: -- Call Create routine.
17657: hr_utility.set_location(' BEN_LEE_RSN_F CREATE_LIFE_EVENT_ENROLL_RSN ',20);
17658: BEN_LIFE_EVENT_ENROLL_RSN_API.CREATE_LIFE_EVENT_ENROLL_RSN(
17659: --
17660: P_VALIDATE => false
17661: ,P_EFFECTIVE_DATE => l_effective_date
17725: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
17726: );
17727: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17728: -- Update all relevent cer records with new pk_id
17729: hr_utility.set_location('Before plsql table ',222);
17730: hr_utility.set_location('new_value id '||l_lee_rsn_id,222);
17731: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_ID' ;
17732: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LEN.information1 ;
17733: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_ID ;
17726: );
17727: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17728: -- Update all relevent cer records with new pk_id
17729: hr_utility.set_location('Before plsql table ',222);
17730: hr_utility.set_location('new_value id '||l_lee_rsn_id,222);
17731: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_ID' ;
17732: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LEN.information1 ;
17733: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_ID ;
17734: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17732: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LEN.information1 ;
17733: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_ID ;
17734: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17735: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LEN_unique.table_route_id;
17736: hr_utility.set_location('After plsql table ',222);
17737: --
17738: -- 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 ) ;
17739: --
17740: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
17742: else
17743: --
17744: -- Call Update routine for the pk_id created in prev run .
17745: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17746: hr_utility.set_location(' BEN_LEE_RSN_F UPDATE_LIFE_EVENT_ENROLL_RSN ',30);
17747: --UPD START
17748: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
17749: --
17750: if l_update then
17744: -- Call Update routine for the pk_id created in prev run .
17745: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17746: hr_utility.set_location(' BEN_LEE_RSN_F UPDATE_LIFE_EVENT_ENROLL_RSN ',30);
17747: --UPD START
17748: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
17749: --
17750: if l_update then
17751: --
17752: l_datetrack_mode := r_LEN.datetrack_mode ;
17764: l_object_version_number := r_LEN.information265;
17765: --
17766: end if;
17767: --
17768: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
17769: --
17770: IF l_update OR l_dml_operation <> 'UPDATE' THEN
17771: --UPD END
17772: BEN_LIFE_EVENT_ENROLL_RSN_API.UPDATE_LIFE_EVENT_ENROLL_RSN(
18026: r_ERP_unique.information3 >=
18027: ben_pd_copy_to_ben_one.g_copy_effective_date)
18028: ) then
18029: --
18030: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
18031: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
18032: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
18033: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
18034: -- If reuse objects flag is 'Y' then check for the object in the target business group
18027: ben_pd_copy_to_ben_one.g_copy_effective_date)
18028: ) then
18029: --
18030: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
18031: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
18032: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
18033: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
18034: -- If reuse objects flag is 'Y' then check for the object in the target business group
18035: -- if found insert the record into PLSql table and exit the loop else try create the
18028: ) then
18029: --
18030: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
18031: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
18032: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
18033: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
18034: -- If reuse objects flag is 'Y' then check for the object in the target business group
18035: -- if found insert the record into PLSql table and exit the loop else try create the
18036: -- object in the target business group
18029: --
18030: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
18031: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
18032: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
18033: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
18034: -- If reuse objects flag is 'Y' then check for the object in the target business group
18035: -- if found insert the record into PLSql table and exit the loop else try create the
18036: -- object in the target business group
18037: --
18079: --
18080: --DOUBT log_data('ERP',l_new_value,l_prefix || r_ERP_unique.name|| l_suffix,'REUSED');
18081: --
18082: end if ;
18083: hr_utility.set_location( 'found record for update',10);
18084: --
18085: else
18086: --
18087: l_update := false;
18157: if not l_object_found_in_target OR l_update then
18158: --
18159: l_current_pk_id := r_ERP.information1;
18160: --
18161: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18162: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18163: --
18164: if l_current_pk_id = l_prev_pk_id then
18165: --
18158: --
18159: l_current_pk_id := r_ERP.information1;
18160: --
18161: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18162: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18163: --
18164: if l_current_pk_id = l_prev_pk_id then
18165: --
18166: l_first_rec := false ;
18179: end if;
18180:
18181: if l_first_rec and not l_update then
18182: -- Call Create routine.
18183: hr_utility.set_location(' BEN_ENRT_PERD_FOR_PL_F CREATE_ENRT_PERD_FOR_PL ',20);
18184: BEN_ENRT_PERD_FOR_PL_API.CREATE_ENRT_PERD_FOR_PL(
18185: --
18186: P_VALIDATE => false
18187: ,P_EFFECTIVE_DATE => l_effective_date
18236: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
18237: );
18238: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18239: -- Update all relevent cer records with new pk_id
18240: hr_utility.set_location('Before plsql table ',222);
18241: hr_utility.set_location('new_value id '||l_enrt_perd_for_pl_id,222);
18242: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_PERD_FOR_PL_ID' ;
18243: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ERP.information1 ;
18244: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_FOR_PL_ID ;
18237: );
18238: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18239: -- Update all relevent cer records with new pk_id
18240: hr_utility.set_location('Before plsql table ',222);
18241: hr_utility.set_location('new_value id '||l_enrt_perd_for_pl_id,222);
18242: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_PERD_FOR_PL_ID' ;
18243: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ERP.information1 ;
18244: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_FOR_PL_ID ;
18245: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18243: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ERP.information1 ;
18244: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_FOR_PL_ID ;
18245: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18246: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_ERP_unique.table_route_id;
18247: hr_utility.set_location('After plsql table ',222);
18248: --
18249: -- 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 ) ;
18250: --
18251: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
18253: else
18254: --
18255: -- Call Update routine for the pk_id created in prev run .
18256: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18257: hr_utility.set_location(' BEN_ENRT_PERD_FOR_PL_F UPDATE_ENRT_PERD_FOR_PL ',30);
18258: --UPD START
18259: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18260: --
18261: if l_update then
18255: -- Call Update routine for the pk_id created in prev run .
18256: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18257: hr_utility.set_location(' BEN_ENRT_PERD_FOR_PL_F UPDATE_ENRT_PERD_FOR_PL ',30);
18258: --UPD START
18259: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18260: --
18261: if l_update then
18262: --
18263: l_datetrack_mode := r_ERP.datetrack_mode ;
18275: l_object_version_number := r_ERP.information265;
18276: --
18277: end if;
18278: --
18279: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18280: --
18281: IF l_update OR l_dml_operation <> 'UPDATE' THEN
18282: --UPD END
18283: BEN_ENRT_PERD_FOR_PL_API.UPDATE_ENRT_PERD_FOR_PL(
18514: r_SER_unique.information3 >=
18515: ben_pd_copy_to_ben_one.g_copy_effective_date)
18516: ) then
18517: --
18518: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18519: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18520: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18521: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18522: -- If reuse objects flag is 'Y' then check for the object in the target business group
18515: ben_pd_copy_to_ben_one.g_copy_effective_date)
18516: ) then
18517: --
18518: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18519: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18520: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18521: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18522: -- If reuse objects flag is 'Y' then check for the object in the target business group
18523: -- if found insert the record into PLSql table and exit the loop else try create the
18516: ) then
18517: --
18518: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18519: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18520: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18521: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18522: -- If reuse objects flag is 'Y' then check for the object in the target business group
18523: -- if found insert the record into PLSql table and exit the loop else try create the
18524: -- object in the target business group
18517: --
18518: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18519: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18520: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18521: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18522: -- If reuse objects flag is 'Y' then check for the object in the target business group
18523: -- if found insert the record into PLSql table and exit the loop else try create the
18524: -- object in the target business group
18525: --
18560: --
18561: --DOUBT log_data('SER',l_new_value,l_prefix || r_SER_unique.name|| l_suffix,'REUSED');
18562: --
18563: end if ;
18564: hr_utility.set_location( 'found record for update',10);
18565: --
18566: else
18567: --
18568: l_update := false;
18637: if not l_object_found_in_target OR l_update then
18638: --
18639: l_current_pk_id := r_SER.information1;
18640: --
18641: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18642: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18643: --
18644: if l_current_pk_id = l_prev_pk_id then
18645: --
18638: --
18639: l_current_pk_id := r_SER.information1;
18640: --
18641: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18642: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18643: --
18644: if l_current_pk_id = l_prev_pk_id then
18645: --
18646: l_first_rec := false ;
18659: end if;
18660:
18661: if l_first_rec and not l_update then
18662: -- Call Create routine.
18663: hr_utility.set_location(' BEN_SCHEDD_ENRT_RL_F CREATE_SCHEDD_ENROLLMENT_RL ',20);
18664: BEN_SCHEDD_ENROLLMENT_RL_API.CREATE_SCHEDD_ENROLLMENT_RL(
18665: --
18666: P_VALIDATE => false
18667: ,P_EFFECTIVE_DATE => l_effective_date
18708: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
18709: );
18710: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18711: -- Update all relevent cer records with new pk_id
18712: hr_utility.set_location('Before plsql table ',222);
18713: hr_utility.set_location('new_value id '||l_schedd_enrt_rl_id,222);
18714: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'SCHEDD_ENRT_RL_ID' ;
18715: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SER.information1 ;
18716: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SCHEDD_ENRT_RL_ID ;
18709: );
18710: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18711: -- Update all relevent cer records with new pk_id
18712: hr_utility.set_location('Before plsql table ',222);
18713: hr_utility.set_location('new_value id '||l_schedd_enrt_rl_id,222);
18714: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'SCHEDD_ENRT_RL_ID' ;
18715: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SER.information1 ;
18716: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SCHEDD_ENRT_RL_ID ;
18717: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18715: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SER.information1 ;
18716: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SCHEDD_ENRT_RL_ID ;
18717: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18718: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_SER_unique.table_route_id;
18719: hr_utility.set_location('After plsql table ',222);
18720: --
18721: -- 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 ) ;
18722: --
18723: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
18725: else
18726: --
18727: -- Call Update routine for the pk_id created in prev run .
18728: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18729: hr_utility.set_location(' BEN_SCHEDD_ENRT_RL_F UPDATE_SCHEDD_ENROLLMENT_RL ',30);
18730: --UPD START
18731: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18732: --
18733: if l_update then
18727: -- Call Update routine for the pk_id created in prev run .
18728: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18729: hr_utility.set_location(' BEN_SCHEDD_ENRT_RL_F UPDATE_SCHEDD_ENROLLMENT_RL ',30);
18730: --UPD START
18731: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18732: --
18733: if l_update then
18734: --
18735: l_datetrack_mode := r_SER.datetrack_mode ;
18747: l_object_version_number := r_SER.information265;
18748: --
18749: end if;
18750: --
18751: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18752: --
18753: IF l_update OR l_dml_operation <> 'UPDATE' THEN
18754: --UPD END
18755: BEN_SCHEDD_ENROLLMENT_RL_API.UPDATE_SCHEDD_ENROLLMENT_RL(
18977: r_LRR_unique.information3 >=
18978: ben_pd_copy_to_ben_one.g_copy_effective_date)
18979: ) then
18980: --
18981: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18982: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18983: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18984: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18985: -- If reuse objects flag is 'Y' then check for the object in the target business group
18978: ben_pd_copy_to_ben_one.g_copy_effective_date)
18979: ) then
18980: --
18981: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18982: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18983: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18984: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18985: -- If reuse objects flag is 'Y' then check for the object in the target business group
18986: -- if found insert the record into PLSql table and exit the loop else try create the
18979: ) then
18980: --
18981: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18982: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18983: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18984: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18985: -- If reuse objects flag is 'Y' then check for the object in the target business group
18986: -- if found insert the record into PLSql table and exit the loop else try create the
18987: -- object in the target business group
18980: --
18981: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18982: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18983: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18984: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18985: -- If reuse objects flag is 'Y' then check for the object in the target business group
18986: -- if found insert the record into PLSql table and exit the loop else try create the
18987: -- object in the target business group
18988: --
19023: --
19024: --DOUBT log_data('LRR',l_new_value,l_prefix || r_LRR_unique.name|| l_suffix,'REUSED');
19025: --
19026: end if ;
19027: hr_utility.set_location( 'found record for update',10);
19028: --
19029: else
19030: --
19031: l_update := false;
19100: if not l_object_found_in_target OR l_update then
19101: --
19102: l_current_pk_id := r_LRR.information1;
19103: --
19104: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19105: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19106: --
19107: if l_current_pk_id = l_prev_pk_id then
19108: --
19101: --
19102: l_current_pk_id := r_LRR.information1;
19103: --
19104: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19105: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19106: --
19107: if l_current_pk_id = l_prev_pk_id then
19108: --
19109: l_first_rec := false ;
19122: end if;
19123:
19124: if l_first_rec and not l_update then
19125: -- Call Create routine.
19126: hr_utility.set_location(' BEN_LEE_RSN_RL_F CREATE_LEE_RSN_RL ',20);
19127: BEN_LEE_RSN_RL_API.CREATE_LEE_RSN_RL(
19128: --
19129: P_VALIDATE => false
19130: ,P_EFFECTIVE_DATE => l_effective_date
19171: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
19172: );
19173: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19174: -- Update all relevent cer records with new pk_id
19175: hr_utility.set_location('Before plsql table ',222);
19176: hr_utility.set_location('new_value id '||l_lee_rsn_rl_id,222);
19177: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_RL_ID' ;
19178: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRR.information1 ;
19179: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_RL_ID ;
19172: );
19173: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19174: -- Update all relevent cer records with new pk_id
19175: hr_utility.set_location('Before plsql table ',222);
19176: hr_utility.set_location('new_value id '||l_lee_rsn_rl_id,222);
19177: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_RL_ID' ;
19178: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRR.information1 ;
19179: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_RL_ID ;
19180: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19178: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRR.information1 ;
19179: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_RL_ID ;
19180: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19181: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LRR_unique.table_route_id;
19182: hr_utility.set_location('After plsql table ',222);
19183: --
19184: -- 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 ) ;
19185: --
19186: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
19188: else
19189: --
19190: -- Call Update routine for the pk_id created in prev run .
19191: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19192: hr_utility.set_location(' BEN_LEE_RSN_RL_F UPDATE_LEE_RSN_RL ',30);
19193: --UPD START
19194: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19195: --
19196: if l_update then
19190: -- Call Update routine for the pk_id created in prev run .
19191: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19192: hr_utility.set_location(' BEN_LEE_RSN_RL_F UPDATE_LEE_RSN_RL ',30);
19193: --UPD START
19194: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19195: --
19196: if l_update then
19197: --
19198: l_datetrack_mode := r_LRR.datetrack_mode ;
19210: l_object_version_number := r_LRR.information265;
19211: --
19212: end if;
19213: --
19214: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19215: --
19216: IF l_update OR l_dml_operation <> 'UPDATE' THEN
19217: --UPD END
19218: BEN_LEE_RSN_RL_API.UPDATE_LEE_RSN_RL(
19448: r_ADE_unique.information3 >=
19449: ben_pd_copy_to_ben_one.g_copy_effective_date)
19450: ) then
19451: --
19452: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19453: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19454: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19455: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19456: -- If reuse objects flag is 'Y' then check for the object in the target business group
19449: ben_pd_copy_to_ben_one.g_copy_effective_date)
19450: ) then
19451: --
19452: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19453: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19454: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19455: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19456: -- If reuse objects flag is 'Y' then check for the object in the target business group
19457: -- if found insert the record into PLSql table and exit the loop else try create the
19450: ) then
19451: --
19452: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19453: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19454: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19455: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19456: -- If reuse objects flag is 'Y' then check for the object in the target business group
19457: -- if found insert the record into PLSql table and exit the loop else try create the
19458: -- object in the target business group
19451: --
19452: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19453: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19454: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19455: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19456: -- If reuse objects flag is 'Y' then check for the object in the target business group
19457: -- if found insert the record into PLSql table and exit the loop else try create the
19458: -- object in the target business group
19459: --
19497: --
19498: --DOUBT log_data('ADE',l_new_value,l_prefix || r_ADE_unique.name|| l_suffix,'REUSED');
19499: --
19500: end if ;
19501: hr_utility.set_location( 'found record for update',10);
19502: --
19503: else
19504: --
19505: l_update := false;
19574: if not l_object_found_in_target OR l_update then
19575: --
19576: l_current_pk_id := r_ADE.information1;
19577: --
19578: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19579: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19580: --
19581: if l_current_pk_id = l_prev_pk_id then
19582: --
19575: --
19576: l_current_pk_id := r_ADE.information1;
19577: --
19578: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19579: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19580: --
19581: if l_current_pk_id = l_prev_pk_id then
19582: --
19583: l_first_rec := false ;
19596: end if;
19597:
19598: if l_first_rec and not l_update then
19599: -- Call Create routine.
19600: hr_utility.set_location(' BEN_APLD_DPNT_CVG_ELIG_PRFL_F CREATE_APLD_DPNT_CVG_PRFL ',20);
19601: BEN_APLD_DPNT_CVG_PRFL_API.CREATE_APLD_DPNT_CVG_PRFL(
19602: --
19603: P_VALIDATE => false
19604: ,P_EFFECTIVE_DATE => l_effective_date
19648: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
19649: );
19650: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19651: -- Update all relevent cer records with new pk_id
19652: hr_utility.set_location('Before plsql table ',222);
19653: hr_utility.set_location('new_value id '||l_apld_dpnt_cvg_elig_prfl_id,222);
19654: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'APLD_DPNT_CVG_ELIG_PRFL_ID' ;
19655: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ADE.information1 ;
19656: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_APLD_DPNT_CVG_ELIG_PRFL_ID ;
19649: );
19650: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19651: -- Update all relevent cer records with new pk_id
19652: hr_utility.set_location('Before plsql table ',222);
19653: hr_utility.set_location('new_value id '||l_apld_dpnt_cvg_elig_prfl_id,222);
19654: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'APLD_DPNT_CVG_ELIG_PRFL_ID' ;
19655: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ADE.information1 ;
19656: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_APLD_DPNT_CVG_ELIG_PRFL_ID ;
19657: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19655: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ADE.information1 ;
19656: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_APLD_DPNT_CVG_ELIG_PRFL_ID ;
19657: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19658: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_ADE_unique.table_route_id;
19659: hr_utility.set_location('After plsql table ',222);
19660: --
19661: -- 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 ) ;
19662: --
19663: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
19665: else
19666: --
19667: -- Call Update routine for the pk_id created in prev run .
19668: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19669: hr_utility.set_location(' BEN_APLD_DPNT_CVG_ELIG_PRFL_F UPDATE_APLD_DPNT_CVG_PRFL ',30);
19670: --UPD START
19671: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19672: --
19673: if l_update then
19667: -- Call Update routine for the pk_id created in prev run .
19668: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19669: hr_utility.set_location(' BEN_APLD_DPNT_CVG_ELIG_PRFL_F UPDATE_APLD_DPNT_CVG_PRFL ',30);
19670: --UPD START
19671: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19672: --
19673: if l_update then
19674: --
19675: l_datetrack_mode := r_ADE.datetrack_mode ;
19687: l_object_version_number := r_ADE.information265;
19688: --
19689: end if;
19690: --
19691: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19692: --
19693: IF l_update OR l_dml_operation <> 'UPDATE' THEN
19694: --UPD END
19695: BEN_APLD_DPNT_CVG_PRFL_API.UPDATE_APLD_DPNT_CVG_PRFL(
19922: r_PGC_unique.information3 >=
19923: ben_pd_copy_to_ben_one.g_copy_effective_date)
19924: ) then
19925: --
19926: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19927: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19928: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19929: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19930: -- If reuse objects flag is 'Y' then check for the object in the target business group
19923: ben_pd_copy_to_ben_one.g_copy_effective_date)
19924: ) then
19925: --
19926: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19927: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19928: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19929: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19930: -- If reuse objects flag is 'Y' then check for the object in the target business group
19931: -- if found insert the record into PLSql table and exit the loop else try create the
19924: ) then
19925: --
19926: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19927: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19928: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19929: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19930: -- If reuse objects flag is 'Y' then check for the object in the target business group
19931: -- if found insert the record into PLSql table and exit the loop else try create the
19932: -- object in the target business group
19925: --
19926: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19927: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19928: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19929: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19930: -- If reuse objects flag is 'Y' then check for the object in the target business group
19931: -- if found insert the record into PLSql table and exit the loop else try create the
19932: -- object in the target business group
19933: --
19968: --
19969: --DOUBT log_data('PGC',l_new_value,l_prefix || r_PGC_unique.name|| l_suffix,'REUSED');
19970: --
19971: end if ;
19972: hr_utility.set_location( 'found record for update',10);
19973: --
19974: else
19975: --
19976: l_update := false;
20046: if not l_object_found_in_target OR l_update then
20047: --
20048: l_current_pk_id := r_PGC.information1;
20049: --
20050: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20051: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20052: --
20053: if l_current_pk_id = l_prev_pk_id then
20054: --
20047: --
20048: l_current_pk_id := r_PGC.information1;
20049: --
20050: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20051: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20052: --
20053: if l_current_pk_id = l_prev_pk_id then
20054: --
20055: l_first_rec := false ;
20068: end if;
20069:
20070: if l_first_rec and not l_update then
20071: -- Call Create routine.
20072: hr_utility.set_location(' BEN_PGM_DPNT_CVG_CTFN_F CREATE_PROGRAM_DPNT_CVG_CTFN ',20);
20073: BEN_PROGRAM_DPNT_CVG_CTFN_API.CREATE_PROGRAM_DPNT_CVG_CTFN(
20074: --
20075: P_VALIDATE => false
20076: ,P_EFFECTIVE_DATE => l_effective_date
20121: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
20122: );
20123: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20124: -- Update all relevent cer records with new pk_id
20125: hr_utility.set_location('Before plsql table ',222);
20126: hr_utility.set_location('new_value id '||l_pgm_dpnt_cvg_ctfn_id,222);
20127: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PGM_DPNT_CVG_CTFN_ID' ;
20128: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PGC.information1 ;
20129: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PGM_DPNT_CVG_CTFN_ID ;
20122: );
20123: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20124: -- Update all relevent cer records with new pk_id
20125: hr_utility.set_location('Before plsql table ',222);
20126: hr_utility.set_location('new_value id '||l_pgm_dpnt_cvg_ctfn_id,222);
20127: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PGM_DPNT_CVG_CTFN_ID' ;
20128: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PGC.information1 ;
20129: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PGM_DPNT_CVG_CTFN_ID ;
20130: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20128: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PGC.information1 ;
20129: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PGM_DPNT_CVG_CTFN_ID ;
20130: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20131: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PGC_unique.table_route_id;
20132: hr_utility.set_location('After plsql table ',222);
20133: --
20134: -- 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 ) ;
20135: --
20136: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
20138: else
20139: --
20140: -- Call Update routine for the pk_id created in prev run .
20141: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20142: hr_utility.set_location(' BEN_PGM_DPNT_CVG_CTFN_F UPDATE_PROGRAM_DPNT_CVG_CTFN ',30);
20143: --UPD START
20144: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20145: --
20146: if l_update then
20140: -- Call Update routine for the pk_id created in prev run .
20141: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20142: hr_utility.set_location(' BEN_PGM_DPNT_CVG_CTFN_F UPDATE_PROGRAM_DPNT_CVG_CTFN ',30);
20143: --UPD START
20144: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20145: --
20146: if l_update then
20147: --
20148: l_datetrack_mode := r_PGC.datetrack_mode ;
20160: l_object_version_number := r_PGC.information265;
20161: --
20162: end if;
20163: --
20164: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20165: --
20166: IF l_update OR l_dml_operation <> 'UPDATE' THEN
20167: --UPD END
20168: BEN_PROGRAM_DPNT_CVG_CTFN_API.UPDATE_PROGRAM_DPNT_CVG_CTFN(
20397: r_LGE_unique.information3 >=
20398: ben_pd_copy_to_ben_one.g_copy_effective_date)
20399: ) then
20400: --
20401: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20402: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20403: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20404: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20405: -- If reuse objects flag is 'Y' then check for the object in the target business group
20398: ben_pd_copy_to_ben_one.g_copy_effective_date)
20399: ) then
20400: --
20401: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20402: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20403: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20404: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20405: -- If reuse objects flag is 'Y' then check for the object in the target business group
20406: -- if found insert the record into PLSql table and exit the loop else try create the
20399: ) then
20400: --
20401: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20402: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20403: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20404: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20405: -- If reuse objects flag is 'Y' then check for the object in the target business group
20406: -- if found insert the record into PLSql table and exit the loop else try create the
20407: -- object in the target business group
20400: --
20401: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20402: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20403: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20404: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20405: -- If reuse objects flag is 'Y' then check for the object in the target business group
20406: -- if found insert the record into PLSql table and exit the loop else try create the
20407: -- object in the target business group
20408: --
20448: --
20449: --DOUBT log_data('LGE',l_new_value,l_prefix || r_LGE_unique.name|| l_suffix,'REUSED');
20450: --
20451: end if ;
20452: hr_utility.set_location( 'found record for update',10);
20453: --
20454: else
20455: --
20456: l_update := false;
20525: if not l_object_found_in_target OR l_update then
20526: --
20527: l_current_pk_id := r_LGE.information1;
20528: --
20529: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20530: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20531: --
20532: if l_current_pk_id = l_prev_pk_id then
20533: --
20526: --
20527: l_current_pk_id := r_LGE.information1;
20528: --
20529: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20530: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20531: --
20532: if l_current_pk_id = l_prev_pk_id then
20533: --
20534: l_first_rec := false ;
20547: end if;
20548:
20549: if l_first_rec and not l_update then
20550: -- Call Create routine.
20551: hr_utility.set_location(' BEN_LER_CHG_PGM_ENRT_F CREATE_LER_CHG_PGM_ENRT ',20);
20552: BEN_LER_CHG_PGM_ENRT_API.CREATE_LER_CHG_PGM_ENRT(
20553: --
20554: P_VALIDATE => false
20555: ,P_EFFECTIVE_DATE => l_effective_date
20603: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
20604: );
20605: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20606: -- Update all relevent cer records with new pk_id
20607: hr_utility.set_location('Before plsql table ',222);
20608: hr_utility.set_location('new_value id '||l_ler_chg_pgm_enrt_id,222);
20609: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PGM_ENRT_ID' ;
20610: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LGE.information1 ;
20611: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PGM_ENRT_ID ;
20604: );
20605: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20606: -- Update all relevent cer records with new pk_id
20607: hr_utility.set_location('Before plsql table ',222);
20608: hr_utility.set_location('new_value id '||l_ler_chg_pgm_enrt_id,222);
20609: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_PGM_ENRT_ID' ;
20610: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LGE.information1 ;
20611: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PGM_ENRT_ID ;
20612: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20610: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LGE.information1 ;
20611: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_PGM_ENRT_ID ;
20612: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20613: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LGE_unique.table_route_id;
20614: hr_utility.set_location('After plsql table ',222);
20615: --
20616: -- 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 ) ;
20617: --
20618: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
20620: else
20621: --
20622: -- Call Update routine for the pk_id created in prev run .
20623: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20624: hr_utility.set_location(' BEN_LER_CHG_PGM_ENRT_F UPDATE_LER_CHG_PGM_ENRT ',30);
20625: --UPD START
20626: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20627: --
20628: if l_update then
20622: -- Call Update routine for the pk_id created in prev run .
20623: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20624: hr_utility.set_location(' BEN_LER_CHG_PGM_ENRT_F UPDATE_LER_CHG_PGM_ENRT ',30);
20625: --UPD START
20626: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20627: --
20628: if l_update then
20629: --
20630: l_datetrack_mode := r_LGE.datetrack_mode ;
20642: l_object_version_number := r_LGE.information265;
20643: --
20644: end if;
20645: --
20646: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20647: --
20648: IF l_update OR l_dml_operation <> 'UPDATE' THEN
20649: --UPD END
20650: BEN_LER_CHG_PGM_ENRT_API.UPDATE_LER_CHG_PGM_ENRT(
20892: r_LDC_unique.information3 >=
20893: ben_pd_copy_to_ben_one.g_copy_effective_date)
20894: ) then
20895: --
20896: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20897: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20898: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20899: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20900: -- If reuse objects flag is 'Y' then check for the object in the target business group
20893: ben_pd_copy_to_ben_one.g_copy_effective_date)
20894: ) then
20895: --
20896: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20897: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20898: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20899: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20900: -- If reuse objects flag is 'Y' then check for the object in the target business group
20901: -- if found insert the record into PLSql table and exit the loop else try create the
20894: ) then
20895: --
20896: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20897: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20898: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20899: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20900: -- If reuse objects flag is 'Y' then check for the object in the target business group
20901: -- if found insert the record into PLSql table and exit the loop else try create the
20902: -- object in the target business group
20895: --
20896: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20897: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20898: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20899: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20900: -- If reuse objects flag is 'Y' then check for the object in the target business group
20901: -- if found insert the record into PLSql table and exit the loop else try create the
20902: -- object in the target business group
20903: --
20945: --
20946: --DOUBT log_data('LDC',l_new_value,l_prefix || r_LDC_unique.name|| l_suffix,'REUSED');
20947: --
20948: end if ;
20949: hr_utility.set_location( 'found record for update',10);
20950: --
20951: else
20952: --
20953: l_update := false;
21022: if not l_object_found_in_target OR l_update then
21023: --
21024: l_current_pk_id := r_LDC.information1;
21025: --
21026: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21027: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21028: --
21029: if l_current_pk_id = l_prev_pk_id then
21030: --
21023: --
21024: l_current_pk_id := r_LDC.information1;
21025: --
21026: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21027: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21028: --
21029: if l_current_pk_id = l_prev_pk_id then
21030: --
21031: l_first_rec := false ;
21044: end if;
21045:
21046: if l_first_rec and not l_update then
21047: -- Call Create routine.
21048: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_F CREATE_LER_CHG_DEPENDENT_CVG ',20);
21049: BEN_LER_CHG_DEPENDENT_CVG_API.CREATE_LER_CHG_DEPENDENT_CVG(
21050: --
21051: P_VALIDATE => false
21052: ,P_EFFECTIVE_DATE => l_effective_date
21103: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
21104: );
21105: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21106: -- Update all relevent cer records with new pk_id
21107: hr_utility.set_location('Before plsql table ',222);
21108: hr_utility.set_location('new_value id '||l_ler_chg_dpnt_cvg_id,222);
21109: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_DPNT_CVG_ID' ;
21110: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LDC.information1 ;
21111: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_DPNT_CVG_ID ;
21104: );
21105: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21106: -- Update all relevent cer records with new pk_id
21107: hr_utility.set_location('Before plsql table ',222);
21108: hr_utility.set_location('new_value id '||l_ler_chg_dpnt_cvg_id,222);
21109: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LER_CHG_DPNT_CVG_ID' ;
21110: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LDC.information1 ;
21111: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_DPNT_CVG_ID ;
21112: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21110: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LDC.information1 ;
21111: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LER_CHG_DPNT_CVG_ID ;
21112: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21113: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_LDC_unique.table_route_id;
21114: hr_utility.set_location('After plsql table ',222);
21115: --
21116: -- 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 ) ;
21117: --
21118: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
21120: else
21121: --
21122: -- Call Update routine for the pk_id created in prev run .
21123: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21124: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_F UPDATE_LER_CHG_DEPENDENT_CVG ',30);
21125: --UPD START
21126: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21127: --
21128: if l_update then
21122: -- Call Update routine for the pk_id created in prev run .
21123: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21124: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_F UPDATE_LER_CHG_DEPENDENT_CVG ',30);
21125: --UPD START
21126: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21127: --
21128: if l_update then
21129: --
21130: l_datetrack_mode := r_LDC.datetrack_mode ;
21142: l_object_version_number := r_LDC.information265;
21143: --
21144: end if;
21145: --
21146: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21147: --
21148: IF l_update OR l_dml_operation <> 'UPDATE' THEN
21149: --UPD END
21150: BEN_LER_CHG_DEPENDENT_CVG_API.UPDATE_LER_CHG_DEPENDENT_CVG(
21384: ben_pd_copy_to_ben_one.g_copy_effective_date)
21385: ) then
21386:
21387: --
21388: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21389: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21390: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21391: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21392: -- If reuse objects flag is 'Y' then check for the object in the target business group
21385: ) then
21386:
21387: --
21388: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21389: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21390: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21391: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21392: -- If reuse objects flag is 'Y' then check for the object in the target business group
21393: -- if found insert the record into PLSql table and exit the loop else try create the
21386:
21387: --
21388: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21389: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21390: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21391: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21392: -- If reuse objects flag is 'Y' then check for the object in the target business group
21393: -- if found insert the record into PLSql table and exit the loop else try create the
21394: -- object in the target business group
21387: --
21388: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21389: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21390: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21391: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21392: -- If reuse objects flag is 'Y' then check for the object in the target business group
21393: -- if found insert the record into PLSql table and exit the loop else try create the
21394: -- object in the target business group
21395: --
21435: --
21436: --DOUBT log_data('PAT',l_new_value,l_prefix || r_PAT_unique.name|| l_suffix,'REUSED');
21437: --
21438: end if ;
21439: hr_utility.set_location( 'found record for update',10);
21440: --
21441: else
21442: --
21443: l_update := false;
21517: if (not l_object_found_in_target OR l_update ) and l_ACTN_TYP_ID is not null then
21518: --
21519: l_current_pk_id := r_PAT.information1;
21520: --
21521: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21522: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21523: --
21524: if l_current_pk_id = l_prev_pk_id then
21525: --
21518: --
21519: l_current_pk_id := r_PAT.information1;
21520: --
21521: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21522: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21523: --
21524: if l_current_pk_id = l_prev_pk_id then
21525: --
21526: l_first_rec := false ;
21539: end if;
21540:
21541: if l_first_rec and not l_update then
21542: -- Call Create routine.
21543: hr_utility.set_location(' BEN_POPL_ACTN_TYP_F CREATE_POPL_ACTION_TYPE ',20);
21544: BEN_POPL_ACTION_TYPE_API.CREATE_POPL_ACTION_TYPE(
21545: --
21546: P_VALIDATE => false
21547: ,P_EFFECTIVE_DATE => l_effective_date
21590: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
21591: );
21592: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21593: -- Update all relevent cer records with new pk_id
21594: hr_utility.set_location('Before plsql table ',222);
21595: hr_utility.set_location('new_value id '||l_popl_actn_typ_id,222);
21596: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ACTN_TYP_ID' ;
21597: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PAT.information1 ;
21598: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ACTN_TYP_ID ;
21591: );
21592: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21593: -- Update all relevent cer records with new pk_id
21594: hr_utility.set_location('Before plsql table ',222);
21595: hr_utility.set_location('new_value id '||l_popl_actn_typ_id,222);
21596: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ACTN_TYP_ID' ;
21597: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PAT.information1 ;
21598: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ACTN_TYP_ID ;
21599: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21597: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PAT.information1 ;
21598: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ACTN_TYP_ID ;
21599: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21600: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PAT_unique.table_route_id;
21601: hr_utility.set_location('After plsql table ',222);
21602: --
21603: -- 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 ) ;
21604: --
21605: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
21607: else
21608: --
21609: -- Call Update routine for the pk_id created in prev run .
21610: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21611: hr_utility.set_location(' BEN_POPL_ACTN_TYP_F UPDATE_POPL_ACTION_TYPE ',30);
21612: --UPD START
21613: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21614: --
21615: if l_update then
21609: -- Call Update routine for the pk_id created in prev run .
21610: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21611: hr_utility.set_location(' BEN_POPL_ACTN_TYP_F UPDATE_POPL_ACTION_TYPE ',30);
21612: --UPD START
21613: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21614: --
21615: if l_update then
21616: --
21617: l_datetrack_mode := r_PAT.datetrack_mode ;
21629: l_object_version_number := r_PAT.information265;
21630: --
21631: end if;
21632: --
21633: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21634: --
21635: IF l_update OR l_dml_operation <> 'UPDATE' THEN
21636: --UPD END
21637: BEN_POPL_ACTION_TYPE_API.UPDATE_POPL_ACTION_TYPE(
21887: ben_pd_copy_to_ben_one.g_copy_effective_date)
21888: ) then
21889:
21890: --
21891: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21892: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21893: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21894: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21895: -- If reuse objects flag is 'Y' then check for the object in the target business group
21888: ) then
21889:
21890: --
21891: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21892: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21893: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21894: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21895: -- If reuse objects flag is 'Y' then check for the object in the target business group
21896: -- if found insert the record into PLSql table and exit the loop else try create the
21889:
21890: --
21891: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21892: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21893: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21894: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21895: -- If reuse objects flag is 'Y' then check for the object in the target business group
21896: -- if found insert the record into PLSql table and exit the loop else try create the
21897: -- object in the target business group
21890: --
21891: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21892: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21893: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21894: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21895: -- If reuse objects flag is 'Y' then check for the object in the target business group
21896: -- if found insert the record into PLSql table and exit the loop else try create the
21897: -- object in the target business group
21898: --
21908: close c_PEO ;
21909: --
21910: l_dml_operation:= r_PEO_unique.dml_operation ;
21911: l_LER_ID := get_fk('LER_ID', r_PEO.information257,l_dml_operation );
21912: hr_utility.set_location(' l_LER_ID '||l_LER_ID ,123);
21913: l_MX_POE_DET_DT_RL := get_fk('FORMULA_ID', r_PEO.INFORMATION272,l_dml_operation );
21914: l_MX_POE_RL := get_fk('FORMULA_ID', r_PEO.INFORMATION270,l_dml_operation );
21915: l_OIPL_ID := get_fk('OIPL_ID', r_PEO.INFORMATION258,l_dml_operation );
21916: l_PGM_ID := get_fk('PGM_ID', r_PEO.INFORMATION260,l_dml_operation );
21947: --
21948: --DOUBT log_data('PEO',l_new_value,l_prefix || r_PEO_unique.name|| l_suffix,'REUSED');
21949: --
21950: end if ;
21951: hr_utility.set_location( 'found record for update',10);
21952: --
21953: else
21954: --
21955: l_update := false;
21977: fetch c_PEO into r_PEO ;
21978: --
21979: close c_PEO ; */
21980: --
21981: hr_utility.set_location('g_count '||BEN_PD_COPY_TO_BEN_ONE.g_count,123);
21982: hr_utility.set_location('r_PEO.information14 '||r_PEO.information14 ,123);
21983: --
21984:
21985: if p_reuse_object_flag = 'Y' then
21978: --
21979: close c_PEO ; */
21980: --
21981: hr_utility.set_location('g_count '||BEN_PD_COPY_TO_BEN_ONE.g_count,123);
21982: hr_utility.set_location('r_PEO.information14 '||r_PEO.information14 ,123);
21983: --
21984:
21985: if p_reuse_object_flag = 'Y' then
21986: if c_PEO_min_max_dates%found then
22028: if not l_object_found_in_target OR l_update then
22029: --
22030: l_current_pk_id := r_PEO.information1;
22031: --
22032: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22033: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22034: --
22035: if l_current_pk_id = l_prev_pk_id then
22036: --
22029: --
22030: l_current_pk_id := r_PEO.information1;
22031: --
22032: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22033: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22034: --
22035: if l_current_pk_id = l_prev_pk_id then
22036: --
22037: l_first_rec := false ;
22050: end if;
22051:
22052: if l_first_rec and not l_update then
22053: -- Call Create routine.
22054: hr_utility.set_location(' BEN_ELIG_TO_PRTE_RSN_F CREATE_ELIG_TO_PRTE_REASON ',20);
22055: BEN_ELIG_TO_PRTE_REASON_API.CREATE_ELIG_TO_PRTE_REASON(
22056: --
22057: P_VALIDATE => false
22058: ,P_EFFECTIVE_DATE => l_effective_date
22122: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
22123: );
22124: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22125: -- Update all relevent cer records with new pk_id
22126: hr_utility.set_location('Before plsql table ',222);
22127: hr_utility.set_location('new_value id '||l_elig_to_prte_rsn_id,222);
22128: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ELIG_TO_PRTE_RSN_ID' ;
22129: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PEO.information1 ;
22130: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ELIG_TO_PRTE_RSN_ID ;
22123: );
22124: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22125: -- Update all relevent cer records with new pk_id
22126: hr_utility.set_location('Before plsql table ',222);
22127: hr_utility.set_location('new_value id '||l_elig_to_prte_rsn_id,222);
22128: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ELIG_TO_PRTE_RSN_ID' ;
22129: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PEO.information1 ;
22130: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ELIG_TO_PRTE_RSN_ID ;
22131: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22129: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PEO.information1 ;
22130: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ELIG_TO_PRTE_RSN_ID ;
22131: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22132: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PEO_unique.table_route_id;
22133: hr_utility.set_location('After plsql table ',222);
22134: --
22135: -- 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 ) ;
22136: --
22137: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22139: else
22140: --
22141: -- Call Update routine for the pk_id created in prev run .
22142: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22143: hr_utility.set_location(' BEN_ELIG_TO_PRTE_RSN_F UPDATE_ELIG_TO_PRTE_REASON ',30);
22144: --UPD START
22145: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
22146: --
22147: if l_update then
22141: -- Call Update routine for the pk_id created in prev run .
22142: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22143: hr_utility.set_location(' BEN_ELIG_TO_PRTE_RSN_F UPDATE_ELIG_TO_PRTE_REASON ',30);
22144: --UPD START
22145: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
22146: --
22147: if l_update then
22148: --
22149: l_datetrack_mode := r_PEO.datetrack_mode ;
22161: l_object_version_number := r_PEO.information265;
22162: --
22163: end if;
22164: --
22165: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
22166: --
22167: IF l_update OR l_dml_operation <> 'UPDATE' THEN
22168: --UPD END
22169: BEN_ELIG_TO_PRTE_REASON_API.UPDATE_ELIG_TO_PRTE_REASON(
22383: end if ;
22384: -- End Prefix Sufix derivation
22385: for r_CWG_unique in c_unique_CWG('CWG') loop
22386: --
22387: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22388: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22389: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22390: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22391: -- If reuse objects flag is 'Y' then check for the object in the target business group
22384: -- End Prefix Sufix derivation
22385: for r_CWG_unique in c_unique_CWG('CWG') loop
22386: --
22387: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22388: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22389: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22390: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22391: -- If reuse objects flag is 'Y' then check for the object in the target business group
22392: -- if found insert the record into PLSql table and exit the loop else try create the
22385: for r_CWG_unique in c_unique_CWG('CWG') loop
22386: --
22387: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22388: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22389: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22390: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22391: -- If reuse objects flag is 'Y' then check for the object in the target business group
22392: -- if found insert the record into PLSql table and exit the loop else try create the
22393: -- object in the target business group
22386: --
22387: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22388: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22389: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22390: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22391: -- If reuse objects flag is 'Y' then check for the object in the target business group
22392: -- if found insert the record into PLSql table and exit the loop else try create the
22393: -- object in the target business group
22394: --
22435: --
22436: end if ;
22437: l_CWB_WKSHT_GRP_ID := r_CWG_unique.information1 ;
22438: l_object_version_number := r_CWG.information265 ;
22439: hr_utility.set_location( 'found record for update',10);
22440: --
22441: else
22442: --
22443: --UPD END
22474: if not l_object_found_in_target OR l_update then
22475: --
22476: l_current_pk_id := r_CWG.information1;
22477: --
22478: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22479: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22480: --
22481: if l_current_pk_id = l_prev_pk_id then
22482: --
22475: --
22476: l_current_pk_id := r_CWG.information1;
22477: --
22478: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22479: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22480: --
22481: if l_current_pk_id = l_prev_pk_id then
22482: --
22483: l_first_rec := false ;
22496: end if;
22497: --
22498: if l_first_rec and not l_update then
22499: -- Call Create routine.
22500: hr_utility.set_location(' BEN_CWB_WKSHT_GRP CREATE_CWB_WKSHT_GRP ',20);
22501: BEN_CWB_WKSHT_GRP_API.CREATE_CWB_WKSHT_GRP(
22502: --
22503: P_VALIDATE => false
22504: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
22546: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
22547: );
22548: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22549: -- Update all relevent cer records with new pk_id
22550: hr_utility.set_location('Before plsql table ',222);
22551: hr_utility.set_location('new_value id '||l_cwb_wksht_grp_id,222);
22552: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'CWB_WKSHT_GRP_ID' ;
22553: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CWG.information1 ;
22554: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_CWB_WKSHT_GRP_ID ;
22547: );
22548: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22549: -- Update all relevent cer records with new pk_id
22550: hr_utility.set_location('Before plsql table ',222);
22551: hr_utility.set_location('new_value id '||l_cwb_wksht_grp_id,222);
22552: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'CWB_WKSHT_GRP_ID' ;
22553: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CWG.information1 ;
22554: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_CWB_WKSHT_GRP_ID ;
22555: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22553: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CWG.information1 ;
22554: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_CWB_WKSHT_GRP_ID ;
22555: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22556: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CWG_unique.table_route_id;
22557: hr_utility.set_location('After plsql table ',222);
22558: --
22559: -- 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 ) ;
22560: --
22561: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22704: begin
22705:
22706: for r_CRI_unique in c_unique_CRI('CRI') loop
22707: --
22708: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22709: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22710: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22711: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22712: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22705:
22706: for r_CRI_unique in c_unique_CRI('CRI') loop
22707: --
22708: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22709: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22710: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22711: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22712: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22713:
22706: for r_CRI_unique in c_unique_CRI('CRI') loop
22707: --
22708: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22709: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22710: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22711: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22712: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22713:
22714: -- AS the Only operations that are performed on the table
22707: --
22708: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22709: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22710: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22711: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22712: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22713:
22714: -- AS the Only operations that are performed on the table
22715: -- BEN_CUSTOM_REGION_ITEMS are REUSE/INSERT we need not worry about t
22708: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22709: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22710: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22711: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22712: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22713:
22714: -- AS the Only operations that are performed on the table
22715: -- BEN_CUSTOM_REGION_ITEMS are REUSE/INSERT we need not worry about t
22716: -- the l_dml_operation.
22726: l_fk_cwb_wksht_grp_id := get_fk('CWB_WKSHT_GRP_ID', r_CRI_unique.INFORMATION12,l_dml_operation);
22727:
22728: -- Fetch the new fk cwb_wksht_grp_id for the target business group.
22729:
22730: hr_utility.set_location('source cwb_wksht_grp_id '|| r_CRI_unique.INFORMATION12 || ' target cwb_wksht_grp_id ' || l_fk_cwb_wksht_grp_id , 20);
22731: hr_utility.set_location('l_dml_operation '|| l_dml_operation || ' p_reuse_object_flag ' || p_reuse_object_flag, 20);
22732:
22733:
22734:
22727:
22728: -- Fetch the new fk cwb_wksht_grp_id for the target business group.
22729:
22730: hr_utility.set_location('source cwb_wksht_grp_id '|| r_CRI_unique.INFORMATION12 || ' target cwb_wksht_grp_id ' || l_fk_cwb_wksht_grp_id , 20);
22731: hr_utility.set_location('l_dml_operation '|| l_dml_operation || ' p_reuse_object_flag ' || p_reuse_object_flag, 20);
22732:
22733:
22734:
22735: open c_find_CRI_in_target(r_CRI_unique.information11,
22740: fetch c_find_CRI_in_target into r_find_CRI_in_target ;
22741:
22742: if c_find_CRI_in_target%found then
22743:
22744: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22745: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22741:
22742: if c_find_CRI_in_target%found then
22743:
22744: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22745: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22742: if c_find_CRI_in_target%found then
22743:
22744: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22745: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22750: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22743:
22744: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22745: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22750: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22751:
22744: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22745: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22750: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22751:
22752: --8985766
22745: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22750: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22751:
22752: --8985766
22753: hr_utility.set_location('Before plsql table ',111);
22746: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22747: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22748: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22750: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22751:
22752: --8985766
22753: hr_utility.set_location('Before plsql table ',111);
22754: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
22749: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22750: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22751:
22752: --8985766
22753: hr_utility.set_location('Before plsql table ',111);
22754: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
22755: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CRI_unique.table_route_id;
22756: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22757: hr_utility.set_location('After plsql table ',111);
22753: hr_utility.set_location('Before plsql table ',111);
22754: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'REUSED';
22755: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CRI_unique.table_route_id;
22756: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22757: hr_utility.set_location('After plsql table ',111);
22758: --8985766
22759:
22760: -- As the record in found in the target , reuse the record
22761: else
22798: 1,
22799: r_CRI.information16,
22800: r_CRI.information17);
22801: --8985766
22802: hr_utility.set_location('Before plsql table ',222);
22803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CRI_unique.table_route_id;
22805: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22806: hr_utility.set_location('After plsql table ',222);
22802: hr_utility.set_location('Before plsql table ',222);
22803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_CRI_unique.table_route_id;
22805: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22806: hr_utility.set_location('After plsql table ',222);
22807: --8985766
22808:
22809: end if;
22810:
22936: end if ;
22937: -- End Prefix Sufix derivation
22938: for r_PCP_unique in c_unique_PCP('PCP') loop
22939: --
22940: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22941: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22942: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22943: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22944: -- If reuse objects flag is 'Y' then check for the object in the target business group
22937: -- End Prefix Sufix derivation
22938: for r_PCP_unique in c_unique_PCP('PCP') loop
22939: --
22940: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22941: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22942: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22943: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22944: -- If reuse objects flag is 'Y' then check for the object in the target business group
22945: -- if found insert the record into PLSql table and exit the loop else try create the
22938: for r_PCP_unique in c_unique_PCP('PCP') loop
22939: --
22940: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22941: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22942: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22943: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22944: -- If reuse objects flag is 'Y' then check for the object in the target business group
22945: -- if found insert the record into PLSql table and exit the loop else try create the
22946: -- object in the target business group
22939: --
22940: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22941: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22942: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22943: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22944: -- If reuse objects flag is 'Y' then check for the object in the target business group
22945: -- if found insert the record into PLSql table and exit the loop else try create the
22946: -- object in the target business group
22947: --
23009: --
23010: end if ;
23011: l_PL_PCP_ID := r_PCP_unique.information1 ;
23012: l_object_version_number := r_PCP.information265 ;
23013: hr_utility.set_location( 'found record for update',10);
23014: --
23015: else
23016: --
23017: --UPD END
23046: if not l_object_found_in_target OR l_update then
23047: --
23048: l_current_pk_id := r_PCP.information1;
23049: --
23050: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23051: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23052: --
23053: if l_current_pk_id = l_prev_pk_id then
23054: --
23047: --
23048: l_current_pk_id := r_PCP.information1;
23049: --
23050: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23051: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23052: --
23053: if l_current_pk_id = l_prev_pk_id then
23054: --
23055: l_first_rec := false ;
23077: end if;
23078: --
23079: if l_first_rec and not l_update then
23080: -- Call Create routine.
23081: hr_utility.set_location(' BEN_PL_PCP CREATE_PL_PRMRY_CARE_PRVDR ',20);
23082: BEN_PL_PRMRY_CARE_PRVDR_API.CREATE_PL_PRMRY_CARE_PRVDR(
23083: --
23084: P_VALIDATE => false
23085: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
23132: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
23133: );
23134: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23135: -- Update all relevent cer records with new pk_id
23136: hr_utility.set_location('Before plsql table ',222);
23137: hr_utility.set_location('new_value id '||l_pl_pcp_id,222);
23138: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_ID' ;
23139: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCP.information1 ;
23140: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_ID ;
23133: );
23134: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23135: -- Update all relevent cer records with new pk_id
23136: hr_utility.set_location('Before plsql table ',222);
23137: hr_utility.set_location('new_value id '||l_pl_pcp_id,222);
23138: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_ID' ;
23139: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCP.information1 ;
23140: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_ID ;
23141: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23139: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCP.information1 ;
23140: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_ID ;
23141: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23142: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PCP_unique.table_route_id;
23143: hr_utility.set_location('After plsql table ',222);
23144: --
23145: -- 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 ) ;
23146: --
23147: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
23367: r_COP_unique.information3 >=
23368: ben_pd_copy_to_ben_one.g_copy_effective_date)
23369: ) then
23370: --
23371: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23372: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23373: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23374: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23375: -- If reuse objects flag is 'Y' then check for the object in the target business group
23368: ben_pd_copy_to_ben_one.g_copy_effective_date)
23369: ) then
23370: --
23371: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23372: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23373: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23374: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23375: -- If reuse objects flag is 'Y' then check for the object in the target business group
23376: -- if found insert the record into PLSql table and exit the loop else try create the
23369: ) then
23370: --
23371: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23372: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23373: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23374: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23375: -- If reuse objects flag is 'Y' then check for the object in the target business group
23376: -- if found insert the record into PLSql table and exit the loop else try create the
23377: -- object in the target business group
23370: --
23371: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23372: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23373: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23374: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23375: -- If reuse objects flag is 'Y' then check for the object in the target business group
23376: -- if found insert the record into PLSql table and exit the loop else try create the
23377: -- object in the target business group
23378: --
23423: --
23424: --DOUBT log_data('COP',l_new_value,l_prefix || r_COP_unique.name|| l_suffix,'REUSED');
23425: --
23426: end if ;
23427: hr_utility.set_location( 'found record for update',10);
23428: --
23429: else
23430: --
23431: l_update := false;
23502: if not l_object_found_in_target OR l_update then
23503: --
23504: l_current_pk_id := r_COP.information1;
23505: --
23506: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23507: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23508: --
23509: if l_current_pk_id = l_prev_pk_id then
23510: --
23503: --
23504: l_current_pk_id := r_COP.information1;
23505: --
23506: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23507: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23508: --
23509: if l_current_pk_id = l_prev_pk_id then
23510: --
23511: l_first_rec := false ;
23524: end if;
23525:
23526: if l_first_rec and not l_update then
23527: -- Call Create routine.
23528: hr_utility.set_location(' BEN_OIPL_F CREATE_OPTION_IN_PLAN ',20);
23529: BEN_OPTION_IN_PLAN_API.CREATE_OPTION_IN_PLAN(
23530: --
23531: P_VALIDATE => false
23532: ,P_EFFECTIVE_DATE => l_effective_date
23606: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
23607: );
23608: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23609: -- Update all relevent cer records with new pk_id
23610: hr_utility.set_location('Before plsql table ',222);
23611: hr_utility.set_location('new_value id '||l_oipl_id,222);
23612: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPL_ID' ;
23613: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_COP.information1 ;
23614: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPL_ID ;
23607: );
23608: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23609: -- Update all relevent cer records with new pk_id
23610: hr_utility.set_location('Before plsql table ',222);
23611: hr_utility.set_location('new_value id '||l_oipl_id,222);
23612: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPL_ID' ;
23613: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_COP.information1 ;
23614: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPL_ID ;
23615: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23613: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_COP.information1 ;
23614: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPL_ID ;
23615: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23616: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_COP_unique.table_route_id;
23617: hr_utility.set_location('After plsql table ',222);
23618: --
23619: -- 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 ) ;
23620: --
23621: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
23623: else
23624: --
23625: -- Call Update routine for the pk_id created in prev run .
23626: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23627: hr_utility.set_location(' BEN_OIPL_F UPDATE_OPTION_IN_PLAN ',30);
23628: --UPD START
23629: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
23630: --
23631: if l_update then
23625: -- Call Update routine for the pk_id created in prev run .
23626: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23627: hr_utility.set_location(' BEN_OIPL_F UPDATE_OPTION_IN_PLAN ',30);
23628: --UPD START
23629: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
23630: --
23631: if l_update then
23632: --
23633: l_datetrack_mode := r_COP.datetrack_mode ;
23645: l_object_version_number := r_COP.information265;
23646: --
23647: end if;
23648: --
23649: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
23650: --
23651: IF l_update OR l_dml_operation <> 'UPDATE' THEN
23652: --UPD END
23653: BEN_OPTION_IN_PLAN_API.UPDATE_OPTION_IN_PLAN(
23921: r_DDR_unique.information3 >=
23922: ben_pd_copy_to_ben_one.g_copy_effective_date)
23923: ) then
23924: --
23925: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23926: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23927: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23928: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23929: -- If reuse objects flag is 'Y' then check for the object in the target business group
23922: ben_pd_copy_to_ben_one.g_copy_effective_date)
23923: ) then
23924: --
23925: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23926: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23927: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23928: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23929: -- If reuse objects flag is 'Y' then check for the object in the target business group
23930: -- if found insert the record into PLSql table and exit the loop else try create the
23923: ) then
23924: --
23925: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23926: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23927: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23928: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23929: -- If reuse objects flag is 'Y' then check for the object in the target business group
23930: -- if found insert the record into PLSql table and exit the loop else try create the
23931: -- object in the target business group
23924: --
23925: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23926: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23927: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23928: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23929: -- If reuse objects flag is 'Y' then check for the object in the target business group
23930: -- if found insert the record into PLSql table and exit the loop else try create the
23931: -- object in the target business group
23932: --
23972: --
23973: --DOUBT log_data('DDR',l_new_value,l_prefix || r_DDR_unique.name|| l_suffix,'REUSED');
23974: --
23975: end if ;
23976: hr_utility.set_location( 'found record for update',10);
23977: --
23978: else
23979: --
23980: l_update := false;
24049: if not l_object_found_in_target OR l_update then
24050: --
24051: l_current_pk_id := r_DDR.information1;
24052: --
24053: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24054: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24055: --
24056: if l_current_pk_id = l_prev_pk_id then
24057: --
24050: --
24051: l_current_pk_id := r_DDR.information1;
24052: --
24053: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24054: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24055: --
24056: if l_current_pk_id = l_prev_pk_id then
24057: --
24058: l_first_rec := false ;
24071: end if;
24072:
24073: if l_first_rec and not l_update then
24074: -- Call Create routine.
24075: hr_utility.set_location(' BEN_DSGN_RQMT_F CREATE_DESIGN_RQMT ',20);
24076: BEN_DESIGN_RQMT_API.CREATE_DESIGN_RQMT(
24077: --
24078: P_VALIDATE => false
24079: ,P_EFFECTIVE_DATE => l_effective_date
24127: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
24128: );
24129: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24130: -- Update all relevent cer records with new pk_id
24131: hr_utility.set_location('Before plsql table ',222);
24132: hr_utility.set_location('new_value id '||l_dsgn_rqmt_id,222);
24133: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'DSGN_RQMT_ID' ;
24134: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DDR.information1 ;
24135: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_ID ;
24128: );
24129: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24130: -- Update all relevent cer records with new pk_id
24131: hr_utility.set_location('Before plsql table ',222);
24132: hr_utility.set_location('new_value id '||l_dsgn_rqmt_id,222);
24133: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'DSGN_RQMT_ID' ;
24134: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DDR.information1 ;
24135: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_ID ;
24136: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24134: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DDR.information1 ;
24135: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_ID ;
24136: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24137: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_DDR_unique.table_route_id;
24138: hr_utility.set_location('After plsql table ',222);
24139: --
24140: -- 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 ) ;
24141: --
24142: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
24144: else
24145: --
24146: -- Call Update routine for the pk_id created in prev run .
24147: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24148: hr_utility.set_location(' BEN_DSGN_RQMT_F UPDATE_DESIGN_RQMT ',30);
24149: --UPD START
24150: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
24151: --
24152: if l_update then
24146: -- Call Update routine for the pk_id created in prev run .
24147: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24148: hr_utility.set_location(' BEN_DSGN_RQMT_F UPDATE_DESIGN_RQMT ',30);
24149: --UPD START
24150: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
24151: --
24152: if l_update then
24153: --
24154: l_datetrack_mode := r_DDR.datetrack_mode ;
24166: l_object_version_number := r_DDR.information265;
24167: --
24168: end if;
24169: --
24170: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
24171: --
24172: IF l_update OR l_dml_operation <> 'UPDATE' THEN
24173: --UPD END
24174: BEN_DESIGN_RQMT_API.UPDATE_DESIGN_RQMT(
24373: end if ;
24374: -- End Prefix Sufix derivation
24375: for r_DRR_unique in c_unique_DRR('DRR') loop
24376: --
24377: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24378: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24379: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24380: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24381: -- If reuse objects flag is 'Y' then check for the object in the target business group
24374: -- End Prefix Sufix derivation
24375: for r_DRR_unique in c_unique_DRR('DRR') loop
24376: --
24377: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24378: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24379: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24380: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24381: -- If reuse objects flag is 'Y' then check for the object in the target business group
24382: -- if found insert the record into PLSql table and exit the loop else try create the
24375: for r_DRR_unique in c_unique_DRR('DRR') loop
24376: --
24377: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24378: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24379: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24380: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24381: -- If reuse objects flag is 'Y' then check for the object in the target business group
24382: -- if found insert the record into PLSql table and exit the loop else try create the
24383: -- object in the target business group
24376: --
24377: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24378: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24379: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24380: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24381: -- If reuse objects flag is 'Y' then check for the object in the target business group
24382: -- if found insert the record into PLSql table and exit the loop else try create the
24383: -- object in the target business group
24384: --
24425: --
24426: end if ;
24427: l_DSGN_RQMT_RLSHP_TYP_ID := r_DRR_unique.information1 ;
24428: l_object_version_number := r_DRR.information265 ;
24429: hr_utility.set_location( 'found record for update',10);
24430: --
24431: else
24432: --
24433: --UPD END
24462: if not l_object_found_in_target OR l_update then
24463: --
24464: l_current_pk_id := r_DRR.information1;
24465: --
24466: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24467: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24468: --
24469: if l_current_pk_id = l_prev_pk_id then
24470: --
24463: --
24464: l_current_pk_id := r_DRR.information1;
24465: --
24466: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24467: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24468: --
24469: if l_current_pk_id = l_prev_pk_id then
24470: --
24471: l_first_rec := false ;
24494: end if;
24495: --
24496: if l_first_rec and not l_update then
24497: -- Call Create routine.
24498: hr_utility.set_location(' BEN_DSGN_RQMT_RLSHP_TYP CREATE_DSGN_RQMT_RLSHP_TYP ',20);
24499: BEN_DSGN_RQMT_RLSHP_TYP_API.CREATE_DSGN_RQMT_RLSHP_TYP(
24500: --
24501: P_VALIDATE => false
24502: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
24540: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
24541: );
24542: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24543: -- Update all relevent cer records with new pk_id
24544: hr_utility.set_location('Before plsql table ',222);
24545: hr_utility.set_location('new_value id '||l_dsgn_rqmt_rlshp_typ_id,222);
24546: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'DSGN_RQMT_RLSHP_TYP_ID' ;
24547: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DRR.information1 ;
24548: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_RLSHP_TYP_ID ;
24541: );
24542: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24543: -- Update all relevent cer records with new pk_id
24544: hr_utility.set_location('Before plsql table ',222);
24545: hr_utility.set_location('new_value id '||l_dsgn_rqmt_rlshp_typ_id,222);
24546: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'DSGN_RQMT_RLSHP_TYP_ID' ;
24547: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DRR.information1 ;
24548: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_RLSHP_TYP_ID ;
24549: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24547: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DRR.information1 ;
24548: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_RLSHP_TYP_ID ;
24549: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24550: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_DRR_unique.table_route_id;
24551: hr_utility.set_location('After plsql table ',222);
24552: --
24553: -- 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 ) ;
24554: --
24555: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
24745: r_OPP_unique.information3 >=
24746: ben_pd_copy_to_ben_one.g_copy_effective_date)
24747: ) then
24748: --
24749: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24750: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24751: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24752: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24753: -- If reuse objects flag is 'Y' then check for the object in the target business group
24746: ben_pd_copy_to_ben_one.g_copy_effective_date)
24747: ) then
24748: --
24749: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24750: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24751: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24752: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24753: -- If reuse objects flag is 'Y' then check for the object in the target business group
24754: -- if found insert the record into PLSql table and exit the loop else try create the
24747: ) then
24748: --
24749: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24750: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24751: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24752: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24753: -- If reuse objects flag is 'Y' then check for the object in the target business group
24754: -- if found insert the record into PLSql table and exit the loop else try create the
24755: -- object in the target business group
24748: --
24749: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24750: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24751: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24752: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24753: -- If reuse objects flag is 'Y' then check for the object in the target business group
24754: -- if found insert the record into PLSql table and exit the loop else try create the
24755: -- object in the target business group
24756: --
24829: if not l_object_found_in_target then
24830: --
24831: l_current_pk_id := r_OPP.information1;
24832: --
24833: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24834: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24835: --
24836: if l_current_pk_id = l_prev_pk_id then
24837: --
24830: --
24831: l_current_pk_id := r_OPP.information1;
24832: --
24833: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24834: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24835: --
24836: if l_current_pk_id = l_prev_pk_id then
24837: --
24838: l_first_rec := false ;
24851: end if;
24852:
24853: if l_first_rec then
24854: -- Call Create routine.
24855: hr_utility.set_location(' BEN_OIPLIP_F CREATE_OPTION_IN_PLAN_IN_PGM ',20);
24856: BEN_OPTION_IN_PLAN_IN_PGM_API.CREATE_OPTION_IN_PLAN_IN_PGM(
24857: --
24858: P_VALIDATE => false
24859: ,P_EFFECTIVE_DATE => l_effective_date
24899: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
24900: );
24901: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24902: -- Update all relevent cer records with new pk_id
24903: hr_utility.set_location('Before plsql table ',222);
24904: hr_utility.set_location('new_value id '||l_oiplip_id,222);
24905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPLIP_ID' ;
24906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OPP.information1 ;
24907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPLIP_ID ;
24900: );
24901: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24902: -- Update all relevent cer records with new pk_id
24903: hr_utility.set_location('Before plsql table ',222);
24904: hr_utility.set_location('new_value id '||l_oiplip_id,222);
24905: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPLIP_ID' ;
24906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OPP.information1 ;
24907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPLIP_ID ;
24908: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24906: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OPP.information1 ;
24907: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPLIP_ID ;
24908: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24909: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_OPP_unique.table_route_id;
24910: hr_utility.set_location('After plsql table ',222);
24911: --
24912: -- 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 ) ;
24913: --
24914: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
24916: else
24917: --
24918: -- Call Update routine for the pk_id created in prev run .
24919: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24920: hr_utility.set_location(' BEN_OIPLIP_F UPDATE_OPTION_IN_PLAN_IN_PGM ',30);
24921: BEN_OPTION_IN_PLAN_IN_PGM_API.UPDATE_OPTION_IN_PLAN_IN_PGM(
24922: --
24923: P_VALIDATE => false
24924: ,P_EFFECTIVE_DATE => l_effective_date
25144: r_OTP_unique.information3 >=
25145: ben_pd_copy_to_ben_one.g_copy_effective_date)
25146: ) then
25147: --
25148: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25149: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25150: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25151: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25152: -- If reuse objects flag is 'Y' then check for the object in the target business group
25145: ben_pd_copy_to_ben_one.g_copy_effective_date)
25146: ) then
25147: --
25148: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25149: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25150: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25151: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25152: -- If reuse objects flag is 'Y' then check for the object in the target business group
25153: -- if found insert the record into PLSql table and exit the loop else try create the
25146: ) then
25147: --
25148: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25149: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25150: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25151: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25152: -- If reuse objects flag is 'Y' then check for the object in the target business group
25153: -- if found insert the record into PLSql table and exit the loop else try create the
25154: -- object in the target business group
25147: --
25148: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25149: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25150: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25151: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25152: -- If reuse objects flag is 'Y' then check for the object in the target business group
25153: -- if found insert the record into PLSql table and exit the loop else try create the
25154: -- object in the target business group
25155: --
25225: if not l_object_found_in_target then
25226: --
25227: l_current_pk_id := r_OTP.information1;
25228: --
25229: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25230: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25231: --
25232: if l_current_pk_id = l_prev_pk_id then
25233: --
25226: --
25227: l_current_pk_id := r_OTP.information1;
25228: --
25229: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25230: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25231: --
25232: if l_current_pk_id = l_prev_pk_id then
25233: --
25234: l_first_rec := false ;
25247: end if;
25248:
25249: if l_first_rec then
25250: -- Call Create routine.
25251: hr_utility.set_location(' BEN_OPTIP_F CREATE_OPT_PLTYP_IN_PGM ',20);
25252: BEN_OPT_PLTYP_IN_PGM_API.CREATE_OPT_PLTYP_IN_PGM(
25253: --
25254: P_VALIDATE => false
25255: ,P_EFFECTIVE_DATE => l_effective_date
25298: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
25299: );
25300: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25301: -- Update all relevent cer records with new pk_id
25302: hr_utility.set_location('Before plsql table ',222);
25303: hr_utility.set_location('new_value id '||l_optip_id,222);
25304: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OPTIP_ID' ;
25305: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OTP.information1 ;
25306: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OPTIP_ID ;
25299: );
25300: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25301: -- Update all relevent cer records with new pk_id
25302: hr_utility.set_location('Before plsql table ',222);
25303: hr_utility.set_location('new_value id '||l_optip_id,222);
25304: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OPTIP_ID' ;
25305: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OTP.information1 ;
25306: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OPTIP_ID ;
25307: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25305: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OTP.information1 ;
25306: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OPTIP_ID ;
25307: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25308: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_OTP_unique.table_route_id;
25309: hr_utility.set_location('After plsql table ',222);
25310: --
25311: -- 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 ) ;
25312: --
25313: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
25315: else
25316: --
25317: -- Call Update routine for the pk_id created in prev run .
25318: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25319: hr_utility.set_location(' BEN_OPTIP_F UPDATE_OPT_PLTYP_IN_PGM ',30);
25320: BEN_OPT_PLTYP_IN_PGM_API.UPDATE_OPT_PLTYP_IN_PGM(
25321: --
25322: P_VALIDATE => false
25323: ,P_EFFECTIVE_DATE => l_effective_date
25526: end if ;
25527: -- End Prefix Sufix derivation
25528: for r_PTY_unique in c_unique_PTY('PTY') loop
25529: --
25530: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25531: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25532: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25533: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25534: -- If reuse objects flag is 'Y' then check for the object in the target business group
25527: -- End Prefix Sufix derivation
25528: for r_PTY_unique in c_unique_PTY('PTY') loop
25529: --
25530: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25531: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25532: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25533: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25534: -- If reuse objects flag is 'Y' then check for the object in the target business group
25535: -- if found insert the record into PLSql table and exit the loop else try create the
25528: for r_PTY_unique in c_unique_PTY('PTY') loop
25529: --
25530: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25531: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25532: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25533: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25534: -- If reuse objects flag is 'Y' then check for the object in the target business group
25535: -- if found insert the record into PLSql table and exit the loop else try create the
25536: -- object in the target business group
25529: --
25530: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25531: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25532: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25533: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25534: -- If reuse objects flag is 'Y' then check for the object in the target business group
25535: -- if found insert the record into PLSql table and exit the loop else try create the
25536: -- object in the target business group
25537: --
25588: --
25589: end if ;
25590: l_PL_PCP_TYP_ID := r_PTY_unique.information1 ;
25591: l_object_version_number := r_PTY.information265 ;
25592: hr_utility.set_location( 'found record for update',10);
25593: --
25594: else
25595: --
25596: --UPD END
25627:
25628: --
25629: l_current_pk_id := r_PTY.information1;
25630: --
25631: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25632: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25633: --
25634: if l_current_pk_id = l_prev_pk_id then
25635: --
25628: --
25629: l_current_pk_id := r_PTY.information1;
25630: --
25631: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25632: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25633: --
25634: if l_current_pk_id = l_prev_pk_id then
25635: --
25636: l_first_rec := false ;
25642: end if ;
25643: --
25644: if l_first_rec and not l_update then
25645: -- Call Create routine.
25646: hr_utility.set_location(' BEN_PL_PCP_TYP CREATE_PL_CARE_PRVDR_TYP ',20);
25647: BEN_PL_CARE_PRVDR_TYP_API.CREATE_PL_CARE_PRVDR_TYP(
25648: --
25649: P_VALIDATE => false
25650: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
25691: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
25692: );
25693: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25694: -- Update all relevent cer records with new pk_id
25695: hr_utility.set_location('Before plsql table ',222);
25696: hr_utility.set_location('new_value id '||l_pl_pcp_typ_id,222);
25697: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_TYP_ID' ;
25698: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PTY.information1 ;
25699: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_TYP_ID ;
25692: );
25693: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25694: -- Update all relevent cer records with new pk_id
25695: hr_utility.set_location('Before plsql table ',222);
25696: hr_utility.set_location('new_value id '||l_pl_pcp_typ_id,222);
25697: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_TYP_ID' ;
25698: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PTY.information1 ;
25699: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_TYP_ID ;
25700: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25698: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PTY.information1 ;
25699: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_TYP_ID ;
25700: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25701: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PTY_unique.table_route_id;
25702: hr_utility.set_location('After plsql table ',222);
25703: --
25704: -- 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 ) ;
25705: --
25706: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
25910: r_PRP_unique.information3 >=
25911: ben_pd_copy_to_ben_one.g_copy_effective_date)
25912: ) then
25913: --
25914: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25915: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25916: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25917: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25918: -- If reuse objects flag is 'Y' then check for the object in the target business group
25911: ben_pd_copy_to_ben_one.g_copy_effective_date)
25912: ) then
25913: --
25914: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25915: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25916: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25917: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25918: -- If reuse objects flag is 'Y' then check for the object in the target business group
25919: -- if found insert the record into PLSql table and exit the loop else try create the
25912: ) then
25913: --
25914: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25915: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25916: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25917: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25918: -- If reuse objects flag is 'Y' then check for the object in the target business group
25919: -- if found insert the record into PLSql table and exit the loop else try create the
25920: -- object in the target business group
25913: --
25914: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25915: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25916: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25917: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25918: -- If reuse objects flag is 'Y' then check for the object in the target business group
25919: -- if found insert the record into PLSql table and exit the loop else try create the
25920: -- object in the target business group
25921: --
25958: --
25959: --DOUBT log_data('PRP',l_new_value,l_prefix || r_PRP_unique.name|| l_suffix,'REUSED');
25960: --
25961: end if ;
25962: hr_utility.set_location( 'found record for update',10);
25963: --
25964: else
25965: --
25966: l_update := false;
26039: if not l_object_found_in_target OR l_update then
26040: --
26041: l_current_pk_id := r_PRP.information1;
26042: --
26043: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
26044: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
26045: --
26046: if l_current_pk_id = l_prev_pk_id then
26047: --
26040: --
26041: l_current_pk_id := r_PRP.information1;
26042: --
26043: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
26044: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
26045: --
26046: if l_current_pk_id = l_prev_pk_id then
26047: --
26048: l_first_rec := false ;
26061: end if;
26062:
26063: if l_first_rec and not l_update then
26064: -- Call Create routine.
26065: hr_utility.set_location(' BEN_PL_REGY_PRP_F CREATE_REGULATORY_PURPOSE ',20);
26066: BEN_REGULATORY_PURPOSE_API.CREATE_REGULATORY_PURPOSE(
26067: --
26068: P_VALIDATE => false
26069: ,P_EFFECTIVE_DATE => l_effective_date
26109: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
26110: );
26111: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26112: -- Update all relevent cer records with new pk_id
26113: hr_utility.set_location('Before plsql table ',222);
26114: hr_utility.set_location('new_value id '||l_pl_regy_prps_id,222);
26115: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGY_PRP_ID' ;
26116: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRP.information1 ;
26117: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_PRPS_ID ;
26110: );
26111: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26112: -- Update all relevent cer records with new pk_id
26113: hr_utility.set_location('Before plsql table ',222);
26114: hr_utility.set_location('new_value id '||l_pl_regy_prps_id,222);
26115: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGY_PRP_ID' ;
26116: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRP.information1 ;
26117: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_PRPS_ID ;
26118: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26116: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRP.information1 ;
26117: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_PRPS_ID ;
26118: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26119: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_PRP_unique.table_route_id;
26120: hr_utility.set_location('After plsql table ',222);
26121: --
26122: -- 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 ) ;
26123: --
26124: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
26126: else
26127: --
26128: -- Call Update routine for the pk_id created in prev run .
26129: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26130: hr_utility.set_location(' BEN_PL_REGY_PRP_F UPDATE_REGULATORY_PURPOSE ',30);
26131: --UPD START
26132: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26133: --
26134: if l_update then
26128: -- Call Update routine for the pk_id created in prev run .
26129: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26130: hr_utility.set_location(' BEN_PL_REGY_PRP_F UPDATE_REGULATORY_PURPOSE ',30);
26131: --UPD START
26132: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26133: --
26134: if l_update then
26135: --
26136: l_datetrack_mode := r_PRP.datetrack_mode ;
26148: l_object_version_number := r_PRP.information265;
26149: --
26150: end if;
26151: --
26152: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26153: --
26154: IF l_update OR l_dml_operation <> 'UPDATE' THEN
26155: --UPD END
26156: BEN_REGULATORY_PURPOSE_API.UPDATE_REGULATORY_PURPOSE(
26436: else
26437: l_prefix := null ;
26438: l_suffix := null ;
26439: end if ;
26440: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26441: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26442: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26443: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26444: -- If reuse objects flag is 'Y' then check for the object in the target business group
26437: l_prefix := null ;
26438: l_suffix := null ;
26439: end if ;
26440: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26441: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26442: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26443: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26444: -- If reuse objects flag is 'Y' then check for the object in the target business group
26445: -- if found insert the record into PLSql table and exit the loop else try create the
26438: l_suffix := null ;
26439: end if ;
26440: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26441: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26442: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26443: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26444: -- If reuse objects flag is 'Y' then check for the object in the target business group
26445: -- if found insert the record into PLSql table and exit the loop else try create the
26446: -- object in the target business group
26439: end if ;
26440: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26441: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26442: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26443: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26444: -- If reuse objects flag is 'Y' then check for the object in the target business group
26445: -- if found insert the record into PLSql table and exit the loop else try create the
26446: -- object in the target business group
26447: --
26493: --
26494: --DOUBT log_data('BPP',l_new_value,l_prefix || r_BPP_unique.name|| l_suffix,'REUSED');
26495: --
26496: end if ;
26497: hr_utility.set_location( 'found record for update',10);
26498: --
26499: else
26500: --
26501: l_update := false;
26609: if not l_object_found_in_target OR l_update then
26610: --
26611: l_current_pk_id := r_BPP.information1;
26612: --
26613: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
26614: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
26615: --
26616: if l_current_pk_id = l_prev_pk_id then
26617: --
26610: --
26611: l_current_pk_id := r_BPP.information1;
26612: --
26613: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
26614: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
26615: --
26616: if l_current_pk_id = l_prev_pk_id then
26617: --
26618: l_first_rec := false ;
26634: end if;
26635:
26636: if l_first_rec and not l_update then
26637: -- Call Create routine.
26638: hr_utility.set_location(' BEN_BNFT_PRVDR_POOL_F CREATE_BENEFIT_PRVDR_POOL ',20);
26639: BEN_BENEFIT_PRVDR_POOL_API.CREATE_BENEFIT_PRVDR_POOL(
26640: --
26641: P_VALIDATE => false
26642: ,P_EFFECTIVE_DATE => l_effective_date
26713: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
26714: );
26715: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26716: -- Update all relevent cer records with new pk_id
26717: hr_utility.set_location('Before plsql table ',222);
26718: hr_utility.set_location('new_value id '||l_bnft_prvdr_pool_id,222);
26719: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'BNFT_PRVDR_POOL_ID' ;
26720: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BPP.information1 ;
26721: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_PRVDR_POOL_ID ;
26714: );
26715: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26716: -- Update all relevent cer records with new pk_id
26717: hr_utility.set_location('Before plsql table ',222);
26718: hr_utility.set_location('new_value id '||l_bnft_prvdr_pool_id,222);
26719: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'BNFT_PRVDR_POOL_ID' ;
26720: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BPP.information1 ;
26721: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_PRVDR_POOL_ID ;
26722: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26720: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BPP.information1 ;
26721: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_PRVDR_POOL_ID ;
26722: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26723: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).table_route_id := r_BPP_unique.table_route_id;
26724: hr_utility.set_location('After plsql table ',222);
26725: --
26726: -- 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 ) ;
26727: --
26728: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
26732: else
26733: --
26734: -- Call Update routine for the pk_id created in prev run .
26735: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26736: hr_utility.set_location(' BEN_BNFT_PRVDR_POOL_F UPDATE_BENEFIT_PRVDR_POOL ',30);
26737: --UPD START
26738: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26739: --
26740: if l_update then
26734: -- Call Update routine for the pk_id created in prev run .
26735: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26736: hr_utility.set_location(' BEN_BNFT_PRVDR_POOL_F UPDATE_BENEFIT_PRVDR_POOL ',30);
26737: --UPD START
26738: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26739: --
26740: if l_update then
26741: --
26742: l_datetrack_mode := r_BPP.datetrack_mode ;
26754: l_object_version_number := r_BPP.information265;
26755: --
26756: end if;
26757: --
26758: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26759: --
26760: IF l_update OR l_dml_operation <> 'UPDATE' THEN
26761: --UPD END
26762:
27012: r_ACP_unique.information3 >=
27013: ben_pd_copy_to_ben_one.g_copy_effective_date)
27014: ) then
27015: --
27016: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
27017: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
27018: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
27019: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
27020: -- If reuse objects flag is 'Y' then check for the object in the target business group
27013: ben_pd_copy_to_ben_one.g_copy_effective_date)
27014: ) then
27015: --
27016: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
27017: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
27018: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
27019: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
27020: -- If reuse objects flag is 'Y' then check for the object in the target business group
27021: -- if found insert the record into PLSql table and exit the loop else try create the
27014: ) then
27015: --
27016: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
27017: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
27018: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
27019: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
27020: -- If reuse objects flag is 'Y' then check for the object in the target business group
27021: -- if found insert the record into PLSql table and exit the loop else try create the
27022: -- object in the target business group
27015: --
27016: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
27017: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
27018: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
27019: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
27020: -- If reuse objects flag is 'Y' then check for the object in the target business group
27021: -- if found insert the record into PLSql table and exit the loop else try create the
27022: -- object in the target business group
27023: --
27061: --
27062: --DOUBT log_data('ACP',l_new_value,l_prefix || r_ACP_unique.name|| l_suffix,'REUSED');
27063: --
27064: end if ;
27065: hr_utility.set_location( 'found record for update',10);
27066: --
27067: else
27068: --
27069: l_update := false;
27139: if not l_object_found_in_target OR l_update then
27140: --
27141: l_current_pk_id := r_ACP.information1;
27142: --
27143: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
27144: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
27145: --
27146: if l_current_pk_id = l_prev_pk_id then
27147: --
27140: --
27141: l_current_pk_id := r_ACP.information1;
27142: --
27143: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
27144: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
27145: --
27146: if l_current_pk_id = l_prev_pk_id then
27147: --
27148: l_first_rec := false ;
27163: end if;
27164:
27165: if l_first_rec and not l_update then
27166: -- Call Create routine.
27167: hr_utility.set_location(' BEN_ACRS_PTIP_CVG_F CREATE_ACRS_PTIP_CVG ',20);
27168: BEN_ACRS_PTIP_CVG_API.CREATE_ACRS_PTIP_CVG(
27169: --
27170: P_VALIDATE => false
27171: ,P_EFFECTIVE_DATE => l_effective_date
27213: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
27214: );
27215: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27216: -- Update all relevent cer records with new pk_id
27217: hr_utility.set_location('Before plsql table ',222);
27218: hr_utility.set_location('new_value id '||l_acrs_ptip_cvg_id,222);
27219: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'ACRS_PTIP_CVG_ID' ;
27220: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_ACP.information1 ;
27221: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_ACRS_PTIP_CVG_ID ;
27214: );
27215: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27216: -- Update all relevent cer records with new pk_id
27217: hr_utility.set_location('Before plsql table ',222);
27218: hr_utility.set_location('new_value id '||l_acrs_ptip_cvg_id,222);
27219: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'ACRS_PTIP_CVG_ID' ;
27220: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_ACP.information1 ;
27221: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_ACRS_PTIP_CVG_ID ;
27222: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
27220: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_ACP.information1 ;
27221: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_ACRS_PTIP_CVG_ID ;
27222: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
27223: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).table_route_id := r_ACP_unique.table_route_id;
27224: hr_utility.set_location('After plsql table ',222);
27225: --
27226: -- 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 ) ;
27227: --
27228: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
27231: else
27232: --
27233: -- Call Update routine for the pk_id created in prev run .
27234: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27235: hr_utility.set_location(' BEN_ACRS_PTIP_CVG_F UPDATE_ACRS_PTIP_CVG ',30);
27236: --UPD START
27237: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
27238: --
27239: if l_update then
27233: -- Call Update routine for the pk_id created in prev run .
27234: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27235: hr_utility.set_location(' BEN_ACRS_PTIP_CVG_F UPDATE_ACRS_PTIP_CVG ',30);
27236: --UPD START
27237: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
27238: --
27239: if l_update then
27240: --
27241: l_datetrack_mode := r_ACP.datetrack_mode ;
27253: l_object_version_number := r_ACP.information265;
27254: --
27255: end if;
27256: --
27257: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
27258: --
27259: IF l_update OR l_dml_operation <> 'UPDATE' THEN
27260: --UPD END
27261: BEN_ACRS_PTIP_CVG_API.UPDATE_ACRS_PTIP_CVG(