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:
16098: end if ;
16099: -- End Prefix Sufix derivation
16100: for r_CPY_unique in c_unique_CPY('CPY') loop
16101: --
16102: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16103: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16104: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16105: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16106: -- If reuse objects flag is 'Y' then check for the object in the target business group
16099: -- End Prefix Sufix derivation
16100: for r_CPY_unique in c_unique_CPY('CPY') loop
16101: --
16102: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16103: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16104: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16105: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16106: -- If reuse objects flag is 'Y' then check for the object in the target business group
16107: -- if found insert the record into PLSql table and exit the loop else try create the
16100: for r_CPY_unique in c_unique_CPY('CPY') loop
16101: --
16102: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16103: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16104: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16105: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16106: -- If reuse objects flag is 'Y' then check for the object in the target business group
16107: -- if found insert the record into PLSql table and exit the loop else try create the
16108: -- object in the target business group
16101: --
16102: hr_utility.set_location(' r_CPY_unique.table_route_id '||r_CPY_unique.table_route_id,10);
16103: hr_utility.set_location(' r_CPY_unique.information1 '||r_CPY_unique.information1,10);
16104: hr_utility.set_location( 'r_CPY_unique.information2 '||r_CPY_unique.information2,10);
16105: hr_utility.set_location( 'r_CPY_unique.information3 '||r_CPY_unique.information3,10);
16106: -- If reuse objects flag is 'Y' then check for the object in the target business group
16107: -- if found insert the record into PLSql table and exit the loop else try create the
16108: -- object in the target business group
16109: --
16147: --
16148: end if ;
16149: l_POPL_YR_PERD_ID := r_CPY_unique.information1 ;
16150: l_object_version_number := r_CPY.information265 ;
16151: hr_utility.set_location( 'found record for update',10);
16152: --
16153: else
16154: --
16155: --UPD END
16184: if not l_object_found_in_target OR l_update then
16185: --
16186: l_current_pk_id := r_CPY.information1;
16187: --
16188: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16189: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16190: --
16191: if l_current_pk_id = l_prev_pk_id then
16192: --
16185: --
16186: l_current_pk_id := r_CPY.information1;
16187: --
16188: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16189: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16190: --
16191: if l_current_pk_id = l_prev_pk_id then
16192: --
16193: l_first_rec := false ;
16206: end if;
16207: --
16208: if l_first_rec and not l_update then
16209: -- Call Create routine.
16210: hr_utility.set_location(' BEN_POPL_YR_PERD CREATE_POPL_YR_PERD ',20);
16211: BEN_POPL_YR_PERD_API.CREATE_POPL_YR_PERD(
16212: --
16213: P_VALIDATE => false
16214: --,P_EFFECTIVE_DATE => p_effective_date
16256: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
16257: );
16258: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16259: -- Update all relevent cer records with new pk_id
16260: hr_utility.set_location('Before plsql table ',222);
16261: hr_utility.set_location('new_value id '||l_popl_yr_perd_id,222);
16262: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_YR_PERD_ID' ;
16263: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPY.information1 ;
16264: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_YR_PERD_ID ;
16257: );
16258: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16259: -- Update all relevent cer records with new pk_id
16260: hr_utility.set_location('Before plsql table ',222);
16261: hr_utility.set_location('new_value id '||l_popl_yr_perd_id,222);
16262: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_YR_PERD_ID' ;
16263: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPY.information1 ;
16264: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_YR_PERD_ID ;
16265: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16263: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CPY.information1 ;
16264: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_YR_PERD_ID ;
16265: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16266: 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;
16267: hr_utility.set_location('After plsql table ',222);
16268: --
16269: -- 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 ) ;
16270: --
16271: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
16478: r_PET_unique.information3 >=
16479: ben_pd_copy_to_ben_one.g_copy_effective_date)
16480: ) then
16481: --
16482: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16483: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16484: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16485: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16486: -- If reuse objects flag is 'Y' then check for the object in the target business group
16479: ben_pd_copy_to_ben_one.g_copy_effective_date)
16480: ) then
16481: --
16482: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16483: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16484: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16485: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16486: -- If reuse objects flag is 'Y' then check for the object in the target business group
16487: -- if found insert the record into PLSql table and exit the loop else try create the
16480: ) then
16481: --
16482: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16483: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16484: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16485: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16486: -- If reuse objects flag is 'Y' then check for the object in the target business group
16487: -- if found insert the record into PLSql table and exit the loop else try create the
16488: -- object in the target business group
16481: --
16482: hr_utility.set_location(' r_PET_unique.table_route_id '||r_PET_unique.table_route_id,10);
16483: hr_utility.set_location(' r_PET_unique.information1 '||r_PET_unique.information1,10);
16484: hr_utility.set_location( 'r_PET_unique.information2 '||r_PET_unique.information2,10);
16485: hr_utility.set_location( 'r_PET_unique.information3 '||r_PET_unique.information3,10);
16486: -- If reuse objects flag is 'Y' then check for the object in the target business group
16487: -- if found insert the record into PLSql table and exit the loop else try create the
16488: -- object in the target business group
16489: --
16525: --
16526: --DOUBT log_data('PET',l_new_value,l_prefix || r_PET_unique.name|| l_suffix,'REUSED');
16527: --
16528: end if ;
16529: hr_utility.set_location( 'found record for update',10);
16530: --
16531: else
16532: --
16533: l_update := false;
16602: if not l_object_found_in_target OR l_update then
16603: --
16604: l_current_pk_id := r_PET.information1;
16605: --
16606: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16607: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16608: --
16609: if l_current_pk_id = l_prev_pk_id then
16610: --
16603: --
16604: l_current_pk_id := r_PET.information1;
16605: --
16606: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
16607: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
16608: --
16609: if l_current_pk_id = l_prev_pk_id then
16610: --
16611: l_first_rec := false ;
16624: end if;
16625:
16626: if l_first_rec and not l_update then
16627: -- Call Create routine.
16628: hr_utility.set_location(' BEN_POPL_ENRT_TYP_CYCL_F CREATE_POPL_ENRT_TYP_CYCL ',20);
16629: BEN_POPL_ENRT_TYP_CYCL_API.CREATE_POPL_ENRT_TYP_CYCL(
16630: --
16631: P_VALIDATE => false
16632: ,P_EFFECTIVE_DATE => l_effective_date
16673: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
16674: );
16675: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16676: -- Update all relevent cer records with new pk_id
16677: hr_utility.set_location('Before plsql table ',222);
16678: hr_utility.set_location('new_value id '||l_popl_enrt_typ_cycl_id,222);
16679: 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' ;
16680: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PET.information1 ;
16681: 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 ;
16674: );
16675: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16676: -- Update all relevent cer records with new pk_id
16677: hr_utility.set_location('Before plsql table ',222);
16678: hr_utility.set_location('new_value id '||l_popl_enrt_typ_cycl_id,222);
16679: 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' ;
16680: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PET.information1 ;
16681: 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 ;
16682: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16680: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PET.information1 ;
16681: 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 ;
16682: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
16683: 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;
16684: hr_utility.set_location('After plsql table ',222);
16685: --
16686: -- 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 ) ;
16687: --
16688: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
16690: else
16691: --
16692: -- Call Update routine for the pk_id created in prev run .
16693: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16694: hr_utility.set_location(' BEN_POPL_ENRT_TYP_CYCL_F UPDATE_POPL_ENRT_TYP_CYCL ',30);
16695: --UPD START
16696: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16697: --
16698: if l_update then
16692: -- Call Update routine for the pk_id created in prev run .
16693: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
16694: hr_utility.set_location(' BEN_POPL_ENRT_TYP_CYCL_F UPDATE_POPL_ENRT_TYP_CYCL ',30);
16695: --UPD START
16696: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16697: --
16698: if l_update then
16699: --
16700: l_datetrack_mode := r_PET.datetrack_mode ;
16712: l_object_version_number := r_PET.information265;
16713: --
16714: end if;
16715: --
16716: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
16717: --
16718: IF l_update OR l_dml_operation <> 'UPDATE' THEN
16719: --UPD END
16720: BEN_POPL_ENRT_TYP_CYCL_API.UPDATE_POPL_ENRT_TYP_CYCL(
16922: end if ;
16923: -- End Prefix Sufix derivation
16924: for r_ENP_unique in c_unique_ENP('ENP') loop
16925: --
16926: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
16927: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
16928: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
16929: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
16930: -- If reuse objects flag is 'Y' then check for the object in the target business group
16923: -- End Prefix Sufix derivation
16924: for r_ENP_unique in c_unique_ENP('ENP') loop
16925: --
16926: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
16927: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
16928: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
16929: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
16930: -- If reuse objects flag is 'Y' then check for the object in the target business group
16931: -- if found insert the record into PLSql table and exit the loop else try create the
16924: for r_ENP_unique in c_unique_ENP('ENP') loop
16925: --
16926: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
16927: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
16928: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
16929: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
16930: -- If reuse objects flag is 'Y' then check for the object in the target business group
16931: -- if found insert the record into PLSql table and exit the loop else try create the
16932: -- object in the target business group
16925: --
16926: hr_utility.set_location(' r_ENP_unique.table_route_id '||r_ENP_unique.table_route_id,10);
16927: hr_utility.set_location(' r_ENP_unique.information1 '||r_ENP_unique.information1,10);
16928: hr_utility.set_location( 'r_ENP_unique.information2 '||r_ENP_unique.information2,10);
16929: hr_utility.set_location( 'r_ENP_unique.information3 '||r_ENP_unique.information3,10);
16930: -- If reuse objects flag is 'Y' then check for the object in the target business group
16931: -- if found insert the record into PLSql table and exit the loop else try create the
16932: -- object in the target business group
16933: --
16989: --
16990: end if ;
16991: l_ENRT_PERD_ID := r_ENP_unique.information1 ;
16992: l_object_version_number := r_ENP.information265 ;
16993: hr_utility.set_location( 'found record for update',10);
16994: --
16995: else
16996: --
16997: --UPD END
17026: if not l_object_found_in_target OR l_update then
17027: --
17028: l_current_pk_id := r_ENP.information1;
17029: --
17030: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17031: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17032: --
17033: if l_current_pk_id = l_prev_pk_id then
17034: --
17027: --
17028: l_current_pk_id := r_ENP.information1;
17029: --
17030: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17031: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17032: --
17033: if l_current_pk_id = l_prev_pk_id then
17034: --
17035: l_first_rec := false ;
17058: end if;
17059: --
17060: if l_first_rec and not l_update then
17061: -- Call Create routine.
17062: hr_utility.set_location(' BEN_ENRT_PERD CREATE_ENROLLMENT_PERIOD ',20);
17063: BEN_ENROLLMENT_PERIOD_API.CREATE_ENROLLMENT_PERIOD(
17064: --
17065: P_VALIDATE => false
17066: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
17147: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
17148: );
17149: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17150: -- Update all relevent cer records with new pk_id
17151: hr_utility.set_location('Before plsql table ',222);
17152: hr_utility.set_location('new_value id '||l_enrt_perd_id,222);
17153: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_PERD_ID' ;
17154: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ENP.information1 ;
17155: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_ID ;
17148: );
17149: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17150: -- Update all relevent cer records with new pk_id
17151: hr_utility.set_location('Before plsql table ',222);
17152: hr_utility.set_location('new_value id '||l_enrt_perd_id,222);
17153: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'ENRT_PERD_ID' ;
17154: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ENP.information1 ;
17155: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_ID ;
17156: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17154: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ENP.information1 ;
17155: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_ENRT_PERD_ID ;
17156: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17157: 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;
17158: hr_utility.set_location('After plsql table ',222);
17159: --
17160: -- 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 ) ;
17161: --
17162: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
17414: r_LEN_unique.information3 >=
17415: ben_pd_copy_to_ben_one.g_copy_effective_date)
17416: ) then
17417: --
17418: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17419: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17420: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17421: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17422: -- If reuse objects flag is 'Y' then check for the object in the target business group
17415: ben_pd_copy_to_ben_one.g_copy_effective_date)
17416: ) then
17417: --
17418: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17419: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17420: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17421: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17422: -- If reuse objects flag is 'Y' then check for the object in the target business group
17423: -- if found insert the record into PLSql table and exit the loop else try create the
17416: ) then
17417: --
17418: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17419: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17420: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17421: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17422: -- If reuse objects flag is 'Y' then check for the object in the target business group
17423: -- if found insert the record into PLSql table and exit the loop else try create the
17424: -- object in the target business group
17417: --
17418: hr_utility.set_location(' r_LEN_unique.table_route_id '||r_LEN_unique.table_route_id,10);
17419: hr_utility.set_location(' r_LEN_unique.information1 '||r_LEN_unique.information1,10);
17420: hr_utility.set_location( 'r_LEN_unique.information2 '||r_LEN_unique.information2,10);
17421: hr_utility.set_location( 'r_LEN_unique.information3 '||r_LEN_unique.information3,10);
17422: -- If reuse objects flag is 'Y' then check for the object in the target business group
17423: -- if found insert the record into PLSql table and exit the loop else try create the
17424: -- object in the target business group
17425: --
17466: --
17467: --DOUBT log_data('LEN',l_new_value,l_prefix || r_LEN_unique.name|| l_suffix,'REUSED');
17468: --
17469: end if ;
17470: hr_utility.set_location( 'found record for update',10);
17471: --
17472: else
17473: --
17474: l_update := false;
17544: if not l_object_found_in_target OR l_update then
17545: --
17546: l_current_pk_id := r_LEN.information1;
17547: --
17548: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17549: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17550: --
17551: if l_current_pk_id = l_prev_pk_id then
17552: --
17545: --
17546: l_current_pk_id := r_LEN.information1;
17547: --
17548: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
17549: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
17550: --
17551: if l_current_pk_id = l_prev_pk_id then
17552: --
17553: l_first_rec := false ;
17566: end if;
17567:
17568: if l_first_rec and not l_update then
17569: -- Call Create routine.
17570: hr_utility.set_location(' BEN_LEE_RSN_F CREATE_LIFE_EVENT_ENROLL_RSN ',20);
17571: BEN_LIFE_EVENT_ENROLL_RSN_API.CREATE_LIFE_EVENT_ENROLL_RSN(
17572: --
17573: P_VALIDATE => false
17574: ,P_EFFECTIVE_DATE => l_effective_date
17638: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
17639: );
17640: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17641: -- Update all relevent cer records with new pk_id
17642: hr_utility.set_location('Before plsql table ',222);
17643: hr_utility.set_location('new_value id '||l_lee_rsn_id,222);
17644: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_ID' ;
17645: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LEN.information1 ;
17646: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_ID ;
17639: );
17640: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17641: -- Update all relevent cer records with new pk_id
17642: hr_utility.set_location('Before plsql table ',222);
17643: hr_utility.set_location('new_value id '||l_lee_rsn_id,222);
17644: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_ID' ;
17645: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LEN.information1 ;
17646: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_ID ;
17647: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17645: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LEN.information1 ;
17646: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_ID ;
17647: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
17648: 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;
17649: hr_utility.set_location('After plsql table ',222);
17650: --
17651: -- 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 ) ;
17652: --
17653: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
17655: else
17656: --
17657: -- Call Update routine for the pk_id created in prev run .
17658: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17659: hr_utility.set_location(' BEN_LEE_RSN_F UPDATE_LIFE_EVENT_ENROLL_RSN ',30);
17660: --UPD START
17661: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
17662: --
17663: if l_update then
17657: -- Call Update routine for the pk_id created in prev run .
17658: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
17659: hr_utility.set_location(' BEN_LEE_RSN_F UPDATE_LIFE_EVENT_ENROLL_RSN ',30);
17660: --UPD START
17661: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
17662: --
17663: if l_update then
17664: --
17665: l_datetrack_mode := r_LEN.datetrack_mode ;
17677: l_object_version_number := r_LEN.information265;
17678: --
17679: end if;
17680: --
17681: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
17682: --
17683: IF l_update OR l_dml_operation <> 'UPDATE' THEN
17684: --UPD END
17685: BEN_LIFE_EVENT_ENROLL_RSN_API.UPDATE_LIFE_EVENT_ENROLL_RSN(
17939: r_ERP_unique.information3 >=
17940: ben_pd_copy_to_ben_one.g_copy_effective_date)
17941: ) then
17942: --
17943: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
17944: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
17945: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
17946: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
17947: -- If reuse objects flag is 'Y' then check for the object in the target business group
17940: ben_pd_copy_to_ben_one.g_copy_effective_date)
17941: ) then
17942: --
17943: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
17944: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
17945: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
17946: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
17947: -- If reuse objects flag is 'Y' then check for the object in the target business group
17948: -- if found insert the record into PLSql table and exit the loop else try create the
17941: ) then
17942: --
17943: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
17944: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
17945: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
17946: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
17947: -- If reuse objects flag is 'Y' then check for the object in the target business group
17948: -- if found insert the record into PLSql table and exit the loop else try create the
17949: -- object in the target business group
17942: --
17943: hr_utility.set_location(' r_ERP_unique.table_route_id '||r_ERP_unique.table_route_id,10);
17944: hr_utility.set_location(' r_ERP_unique.information1 '||r_ERP_unique.information1,10);
17945: hr_utility.set_location( 'r_ERP_unique.information2 '||r_ERP_unique.information2,10);
17946: hr_utility.set_location( 'r_ERP_unique.information3 '||r_ERP_unique.information3,10);
17947: -- If reuse objects flag is 'Y' then check for the object in the target business group
17948: -- if found insert the record into PLSql table and exit the loop else try create the
17949: -- object in the target business group
17950: --
17992: --
17993: --DOUBT log_data('ERP',l_new_value,l_prefix || r_ERP_unique.name|| l_suffix,'REUSED');
17994: --
17995: end if ;
17996: hr_utility.set_location( 'found record for update',10);
17997: --
17998: else
17999: --
18000: l_update := false;
18070: if not l_object_found_in_target OR l_update then
18071: --
18072: l_current_pk_id := r_ERP.information1;
18073: --
18074: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18075: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18076: --
18077: if l_current_pk_id = l_prev_pk_id then
18078: --
18071: --
18072: l_current_pk_id := r_ERP.information1;
18073: --
18074: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18075: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18076: --
18077: if l_current_pk_id = l_prev_pk_id then
18078: --
18079: l_first_rec := false ;
18092: end if;
18093:
18094: if l_first_rec and not l_update then
18095: -- Call Create routine.
18096: hr_utility.set_location(' BEN_ENRT_PERD_FOR_PL_F CREATE_ENRT_PERD_FOR_PL ',20);
18097: BEN_ENRT_PERD_FOR_PL_API.CREATE_ENRT_PERD_FOR_PL(
18098: --
18099: P_VALIDATE => false
18100: ,P_EFFECTIVE_DATE => l_effective_date
18149: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
18150: );
18151: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18152: -- Update all relevent cer records with new pk_id
18153: hr_utility.set_location('Before plsql table ',222);
18154: hr_utility.set_location('new_value id '||l_enrt_perd_for_pl_id,222);
18155: 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' ;
18156: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ERP.information1 ;
18157: 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 ;
18150: );
18151: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18152: -- Update all relevent cer records with new pk_id
18153: hr_utility.set_location('Before plsql table ',222);
18154: hr_utility.set_location('new_value id '||l_enrt_perd_for_pl_id,222);
18155: 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' ;
18156: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ERP.information1 ;
18157: 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 ;
18158: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18156: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ERP.information1 ;
18157: 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 ;
18158: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18159: 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;
18160: hr_utility.set_location('After plsql table ',222);
18161: --
18162: -- 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 ) ;
18163: --
18164: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
18166: else
18167: --
18168: -- Call Update routine for the pk_id created in prev run .
18169: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18170: hr_utility.set_location(' BEN_ENRT_PERD_FOR_PL_F UPDATE_ENRT_PERD_FOR_PL ',30);
18171: --UPD START
18172: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18173: --
18174: if l_update then
18168: -- Call Update routine for the pk_id created in prev run .
18169: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18170: hr_utility.set_location(' BEN_ENRT_PERD_FOR_PL_F UPDATE_ENRT_PERD_FOR_PL ',30);
18171: --UPD START
18172: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18173: --
18174: if l_update then
18175: --
18176: l_datetrack_mode := r_ERP.datetrack_mode ;
18188: l_object_version_number := r_ERP.information265;
18189: --
18190: end if;
18191: --
18192: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18193: --
18194: IF l_update OR l_dml_operation <> 'UPDATE' THEN
18195: --UPD END
18196: BEN_ENRT_PERD_FOR_PL_API.UPDATE_ENRT_PERD_FOR_PL(
18427: r_SER_unique.information3 >=
18428: ben_pd_copy_to_ben_one.g_copy_effective_date)
18429: ) then
18430: --
18431: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18432: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18433: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18434: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18435: -- If reuse objects flag is 'Y' then check for the object in the target business group
18428: ben_pd_copy_to_ben_one.g_copy_effective_date)
18429: ) then
18430: --
18431: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18432: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18433: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18434: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18435: -- If reuse objects flag is 'Y' then check for the object in the target business group
18436: -- if found insert the record into PLSql table and exit the loop else try create the
18429: ) then
18430: --
18431: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18432: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18433: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18434: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18435: -- If reuse objects flag is 'Y' then check for the object in the target business group
18436: -- if found insert the record into PLSql table and exit the loop else try create the
18437: -- object in the target business group
18430: --
18431: hr_utility.set_location(' r_SER_unique.table_route_id '||r_SER_unique.table_route_id,10);
18432: hr_utility.set_location(' r_SER_unique.information1 '||r_SER_unique.information1,10);
18433: hr_utility.set_location( 'r_SER_unique.information2 '||r_SER_unique.information2,10);
18434: hr_utility.set_location( 'r_SER_unique.information3 '||r_SER_unique.information3,10);
18435: -- If reuse objects flag is 'Y' then check for the object in the target business group
18436: -- if found insert the record into PLSql table and exit the loop else try create the
18437: -- object in the target business group
18438: --
18473: --
18474: --DOUBT log_data('SER',l_new_value,l_prefix || r_SER_unique.name|| l_suffix,'REUSED');
18475: --
18476: end if ;
18477: hr_utility.set_location( 'found record for update',10);
18478: --
18479: else
18480: --
18481: l_update := false;
18550: if not l_object_found_in_target OR l_update then
18551: --
18552: l_current_pk_id := r_SER.information1;
18553: --
18554: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18555: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18556: --
18557: if l_current_pk_id = l_prev_pk_id then
18558: --
18551: --
18552: l_current_pk_id := r_SER.information1;
18553: --
18554: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
18555: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
18556: --
18557: if l_current_pk_id = l_prev_pk_id then
18558: --
18559: l_first_rec := false ;
18572: end if;
18573:
18574: if l_first_rec and not l_update then
18575: -- Call Create routine.
18576: hr_utility.set_location(' BEN_SCHEDD_ENRT_RL_F CREATE_SCHEDD_ENROLLMENT_RL ',20);
18577: BEN_SCHEDD_ENROLLMENT_RL_API.CREATE_SCHEDD_ENROLLMENT_RL(
18578: --
18579: P_VALIDATE => false
18580: ,P_EFFECTIVE_DATE => l_effective_date
18621: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
18622: );
18623: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18624: -- Update all relevent cer records with new pk_id
18625: hr_utility.set_location('Before plsql table ',222);
18626: hr_utility.set_location('new_value id '||l_schedd_enrt_rl_id,222);
18627: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'SCHEDD_ENRT_RL_ID' ;
18628: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SER.information1 ;
18629: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SCHEDD_ENRT_RL_ID ;
18622: );
18623: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18624: -- Update all relevent cer records with new pk_id
18625: hr_utility.set_location('Before plsql table ',222);
18626: hr_utility.set_location('new_value id '||l_schedd_enrt_rl_id,222);
18627: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'SCHEDD_ENRT_RL_ID' ;
18628: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SER.information1 ;
18629: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SCHEDD_ENRT_RL_ID ;
18630: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18628: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_SER.information1 ;
18629: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_SCHEDD_ENRT_RL_ID ;
18630: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
18631: 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;
18632: hr_utility.set_location('After plsql table ',222);
18633: --
18634: -- 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 ) ;
18635: --
18636: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
18638: else
18639: --
18640: -- Call Update routine for the pk_id created in prev run .
18641: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18642: hr_utility.set_location(' BEN_SCHEDD_ENRT_RL_F UPDATE_SCHEDD_ENROLLMENT_RL ',30);
18643: --UPD START
18644: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18645: --
18646: if l_update then
18640: -- Call Update routine for the pk_id created in prev run .
18641: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
18642: hr_utility.set_location(' BEN_SCHEDD_ENRT_RL_F UPDATE_SCHEDD_ENROLLMENT_RL ',30);
18643: --UPD START
18644: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18645: --
18646: if l_update then
18647: --
18648: l_datetrack_mode := r_SER.datetrack_mode ;
18660: l_object_version_number := r_SER.information265;
18661: --
18662: end if;
18663: --
18664: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
18665: --
18666: IF l_update OR l_dml_operation <> 'UPDATE' THEN
18667: --UPD END
18668: BEN_SCHEDD_ENROLLMENT_RL_API.UPDATE_SCHEDD_ENROLLMENT_RL(
18890: r_LRR_unique.information3 >=
18891: ben_pd_copy_to_ben_one.g_copy_effective_date)
18892: ) then
18893: --
18894: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18895: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18896: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18897: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18898: -- If reuse objects flag is 'Y' then check for the object in the target business group
18891: ben_pd_copy_to_ben_one.g_copy_effective_date)
18892: ) then
18893: --
18894: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18895: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18896: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18897: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18898: -- If reuse objects flag is 'Y' then check for the object in the target business group
18899: -- if found insert the record into PLSql table and exit the loop else try create the
18892: ) then
18893: --
18894: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18895: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18896: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18897: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18898: -- If reuse objects flag is 'Y' then check for the object in the target business group
18899: -- if found insert the record into PLSql table and exit the loop else try create the
18900: -- object in the target business group
18893: --
18894: hr_utility.set_location(' r_LRR_unique.table_route_id '||r_LRR_unique.table_route_id,10);
18895: hr_utility.set_location(' r_LRR_unique.information1 '||r_LRR_unique.information1,10);
18896: hr_utility.set_location( 'r_LRR_unique.information2 '||r_LRR_unique.information2,10);
18897: hr_utility.set_location( 'r_LRR_unique.information3 '||r_LRR_unique.information3,10);
18898: -- If reuse objects flag is 'Y' then check for the object in the target business group
18899: -- if found insert the record into PLSql table and exit the loop else try create the
18900: -- object in the target business group
18901: --
18936: --
18937: --DOUBT log_data('LRR',l_new_value,l_prefix || r_LRR_unique.name|| l_suffix,'REUSED');
18938: --
18939: end if ;
18940: hr_utility.set_location( 'found record for update',10);
18941: --
18942: else
18943: --
18944: l_update := false;
19013: if not l_object_found_in_target OR l_update then
19014: --
19015: l_current_pk_id := r_LRR.information1;
19016: --
19017: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19018: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19019: --
19020: if l_current_pk_id = l_prev_pk_id then
19021: --
19014: --
19015: l_current_pk_id := r_LRR.information1;
19016: --
19017: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19018: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19019: --
19020: if l_current_pk_id = l_prev_pk_id then
19021: --
19022: l_first_rec := false ;
19035: end if;
19036:
19037: if l_first_rec and not l_update then
19038: -- Call Create routine.
19039: hr_utility.set_location(' BEN_LEE_RSN_RL_F CREATE_LEE_RSN_RL ',20);
19040: BEN_LEE_RSN_RL_API.CREATE_LEE_RSN_RL(
19041: --
19042: P_VALIDATE => false
19043: ,P_EFFECTIVE_DATE => l_effective_date
19084: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
19085: );
19086: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19087: -- Update all relevent cer records with new pk_id
19088: hr_utility.set_location('Before plsql table ',222);
19089: hr_utility.set_location('new_value id '||l_lee_rsn_rl_id,222);
19090: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_RL_ID' ;
19091: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRR.information1 ;
19092: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_RL_ID ;
19085: );
19086: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19087: -- Update all relevent cer records with new pk_id
19088: hr_utility.set_location('Before plsql table ',222);
19089: hr_utility.set_location('new_value id '||l_lee_rsn_rl_id,222);
19090: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'LEE_RSN_RL_ID' ;
19091: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRR.information1 ;
19092: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_RL_ID ;
19093: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19091: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LRR.information1 ;
19092: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_LEE_RSN_RL_ID ;
19093: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19094: 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;
19095: hr_utility.set_location('After plsql table ',222);
19096: --
19097: -- 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 ) ;
19098: --
19099: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
19101: else
19102: --
19103: -- Call Update routine for the pk_id created in prev run .
19104: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19105: hr_utility.set_location(' BEN_LEE_RSN_RL_F UPDATE_LEE_RSN_RL ',30);
19106: --UPD START
19107: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19108: --
19109: if l_update then
19103: -- Call Update routine for the pk_id created in prev run .
19104: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19105: hr_utility.set_location(' BEN_LEE_RSN_RL_F UPDATE_LEE_RSN_RL ',30);
19106: --UPD START
19107: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19108: --
19109: if l_update then
19110: --
19111: l_datetrack_mode := r_LRR.datetrack_mode ;
19123: l_object_version_number := r_LRR.information265;
19124: --
19125: end if;
19126: --
19127: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19128: --
19129: IF l_update OR l_dml_operation <> 'UPDATE' THEN
19130: --UPD END
19131: BEN_LEE_RSN_RL_API.UPDATE_LEE_RSN_RL(
19361: r_ADE_unique.information3 >=
19362: ben_pd_copy_to_ben_one.g_copy_effective_date)
19363: ) then
19364: --
19365: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19366: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19367: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19368: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19369: -- If reuse objects flag is 'Y' then check for the object in the target business group
19362: ben_pd_copy_to_ben_one.g_copy_effective_date)
19363: ) then
19364: --
19365: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19366: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19367: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19368: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19369: -- If reuse objects flag is 'Y' then check for the object in the target business group
19370: -- if found insert the record into PLSql table and exit the loop else try create the
19363: ) then
19364: --
19365: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19366: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19367: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19368: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19369: -- If reuse objects flag is 'Y' then check for the object in the target business group
19370: -- if found insert the record into PLSql table and exit the loop else try create the
19371: -- object in the target business group
19364: --
19365: hr_utility.set_location(' r_ADE_unique.table_route_id '||r_ADE_unique.table_route_id,10);
19366: hr_utility.set_location(' r_ADE_unique.information1 '||r_ADE_unique.information1,10);
19367: hr_utility.set_location( 'r_ADE_unique.information2 '||r_ADE_unique.information2,10);
19368: hr_utility.set_location( 'r_ADE_unique.information3 '||r_ADE_unique.information3,10);
19369: -- If reuse objects flag is 'Y' then check for the object in the target business group
19370: -- if found insert the record into PLSql table and exit the loop else try create the
19371: -- object in the target business group
19372: --
19410: --
19411: --DOUBT log_data('ADE',l_new_value,l_prefix || r_ADE_unique.name|| l_suffix,'REUSED');
19412: --
19413: end if ;
19414: hr_utility.set_location( 'found record for update',10);
19415: --
19416: else
19417: --
19418: l_update := false;
19487: if not l_object_found_in_target OR l_update then
19488: --
19489: l_current_pk_id := r_ADE.information1;
19490: --
19491: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19492: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19493: --
19494: if l_current_pk_id = l_prev_pk_id then
19495: --
19488: --
19489: l_current_pk_id := r_ADE.information1;
19490: --
19491: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19492: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19493: --
19494: if l_current_pk_id = l_prev_pk_id then
19495: --
19496: l_first_rec := false ;
19509: end if;
19510:
19511: if l_first_rec and not l_update then
19512: -- Call Create routine.
19513: hr_utility.set_location(' BEN_APLD_DPNT_CVG_ELIG_PRFL_F CREATE_APLD_DPNT_CVG_PRFL ',20);
19514: BEN_APLD_DPNT_CVG_PRFL_API.CREATE_APLD_DPNT_CVG_PRFL(
19515: --
19516: P_VALIDATE => false
19517: ,P_EFFECTIVE_DATE => l_effective_date
19561: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
19562: );
19563: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19564: -- Update all relevent cer records with new pk_id
19565: hr_utility.set_location('Before plsql table ',222);
19566: hr_utility.set_location('new_value id '||l_apld_dpnt_cvg_elig_prfl_id,222);
19567: 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' ;
19568: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ADE.information1 ;
19569: 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 ;
19562: );
19563: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19564: -- Update all relevent cer records with new pk_id
19565: hr_utility.set_location('Before plsql table ',222);
19566: hr_utility.set_location('new_value id '||l_apld_dpnt_cvg_elig_prfl_id,222);
19567: 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' ;
19568: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ADE.information1 ;
19569: 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 ;
19570: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19568: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_ADE.information1 ;
19569: 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 ;
19570: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
19571: 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;
19572: hr_utility.set_location('After plsql table ',222);
19573: --
19574: -- 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 ) ;
19575: --
19576: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
19578: else
19579: --
19580: -- Call Update routine for the pk_id created in prev run .
19581: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19582: hr_utility.set_location(' BEN_APLD_DPNT_CVG_ELIG_PRFL_F UPDATE_APLD_DPNT_CVG_PRFL ',30);
19583: --UPD START
19584: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19585: --
19586: if l_update then
19580: -- Call Update routine for the pk_id created in prev run .
19581: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
19582: hr_utility.set_location(' BEN_APLD_DPNT_CVG_ELIG_PRFL_F UPDATE_APLD_DPNT_CVG_PRFL ',30);
19583: --UPD START
19584: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19585: --
19586: if l_update then
19587: --
19588: l_datetrack_mode := r_ADE.datetrack_mode ;
19600: l_object_version_number := r_ADE.information265;
19601: --
19602: end if;
19603: --
19604: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
19605: --
19606: IF l_update OR l_dml_operation <> 'UPDATE' THEN
19607: --UPD END
19608: BEN_APLD_DPNT_CVG_PRFL_API.UPDATE_APLD_DPNT_CVG_PRFL(
19835: r_PGC_unique.information3 >=
19836: ben_pd_copy_to_ben_one.g_copy_effective_date)
19837: ) then
19838: --
19839: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19840: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19841: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19842: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19843: -- If reuse objects flag is 'Y' then check for the object in the target business group
19836: ben_pd_copy_to_ben_one.g_copy_effective_date)
19837: ) then
19838: --
19839: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19840: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19841: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19842: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19843: -- If reuse objects flag is 'Y' then check for the object in the target business group
19844: -- if found insert the record into PLSql table and exit the loop else try create the
19837: ) then
19838: --
19839: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19840: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19841: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19842: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19843: -- If reuse objects flag is 'Y' then check for the object in the target business group
19844: -- if found insert the record into PLSql table and exit the loop else try create the
19845: -- object in the target business group
19838: --
19839: hr_utility.set_location(' r_PGC_unique.table_route_id '||r_PGC_unique.table_route_id,10);
19840: hr_utility.set_location(' r_PGC_unique.information1 '||r_PGC_unique.information1,10);
19841: hr_utility.set_location( 'r_PGC_unique.information2 '||r_PGC_unique.information2,10);
19842: hr_utility.set_location( 'r_PGC_unique.information3 '||r_PGC_unique.information3,10);
19843: -- If reuse objects flag is 'Y' then check for the object in the target business group
19844: -- if found insert the record into PLSql table and exit the loop else try create the
19845: -- object in the target business group
19846: --
19881: --
19882: --DOUBT log_data('PGC',l_new_value,l_prefix || r_PGC_unique.name|| l_suffix,'REUSED');
19883: --
19884: end if ;
19885: hr_utility.set_location( 'found record for update',10);
19886: --
19887: else
19888: --
19889: l_update := false;
19959: if not l_object_found_in_target OR l_update then
19960: --
19961: l_current_pk_id := r_PGC.information1;
19962: --
19963: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19964: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19965: --
19966: if l_current_pk_id = l_prev_pk_id then
19967: --
19960: --
19961: l_current_pk_id := r_PGC.information1;
19962: --
19963: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
19964: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
19965: --
19966: if l_current_pk_id = l_prev_pk_id then
19967: --
19968: l_first_rec := false ;
19981: end if;
19982:
19983: if l_first_rec and not l_update then
19984: -- Call Create routine.
19985: hr_utility.set_location(' BEN_PGM_DPNT_CVG_CTFN_F CREATE_PROGRAM_DPNT_CVG_CTFN ',20);
19986: BEN_PROGRAM_DPNT_CVG_CTFN_API.CREATE_PROGRAM_DPNT_CVG_CTFN(
19987: --
19988: P_VALIDATE => false
19989: ,P_EFFECTIVE_DATE => l_effective_date
20034: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
20035: );
20036: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20037: -- Update all relevent cer records with new pk_id
20038: hr_utility.set_location('Before plsql table ',222);
20039: hr_utility.set_location('new_value id '||l_pgm_dpnt_cvg_ctfn_id,222);
20040: 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' ;
20041: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PGC.information1 ;
20042: 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 ;
20035: );
20036: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20037: -- Update all relevent cer records with new pk_id
20038: hr_utility.set_location('Before plsql table ',222);
20039: hr_utility.set_location('new_value id '||l_pgm_dpnt_cvg_ctfn_id,222);
20040: 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' ;
20041: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PGC.information1 ;
20042: 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 ;
20043: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20041: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PGC.information1 ;
20042: 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 ;
20043: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20044: 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;
20045: hr_utility.set_location('After plsql table ',222);
20046: --
20047: -- 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 ) ;
20048: --
20049: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
20051: else
20052: --
20053: -- Call Update routine for the pk_id created in prev run .
20054: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20055: hr_utility.set_location(' BEN_PGM_DPNT_CVG_CTFN_F UPDATE_PROGRAM_DPNT_CVG_CTFN ',30);
20056: --UPD START
20057: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20058: --
20059: if l_update then
20053: -- Call Update routine for the pk_id created in prev run .
20054: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20055: hr_utility.set_location(' BEN_PGM_DPNT_CVG_CTFN_F UPDATE_PROGRAM_DPNT_CVG_CTFN ',30);
20056: --UPD START
20057: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20058: --
20059: if l_update then
20060: --
20061: l_datetrack_mode := r_PGC.datetrack_mode ;
20073: l_object_version_number := r_PGC.information265;
20074: --
20075: end if;
20076: --
20077: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20078: --
20079: IF l_update OR l_dml_operation <> 'UPDATE' THEN
20080: --UPD END
20081: BEN_PROGRAM_DPNT_CVG_CTFN_API.UPDATE_PROGRAM_DPNT_CVG_CTFN(
20310: r_LGE_unique.information3 >=
20311: ben_pd_copy_to_ben_one.g_copy_effective_date)
20312: ) then
20313: --
20314: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20315: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20316: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20317: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20318: -- If reuse objects flag is 'Y' then check for the object in the target business group
20311: ben_pd_copy_to_ben_one.g_copy_effective_date)
20312: ) then
20313: --
20314: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20315: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20316: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20317: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20318: -- If reuse objects flag is 'Y' then check for the object in the target business group
20319: -- if found insert the record into PLSql table and exit the loop else try create the
20312: ) then
20313: --
20314: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20315: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20316: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20317: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20318: -- If reuse objects flag is 'Y' then check for the object in the target business group
20319: -- if found insert the record into PLSql table and exit the loop else try create the
20320: -- object in the target business group
20313: --
20314: hr_utility.set_location(' r_LGE_unique.table_route_id '||r_LGE_unique.table_route_id,10);
20315: hr_utility.set_location(' r_LGE_unique.information1 '||r_LGE_unique.information1,10);
20316: hr_utility.set_location( 'r_LGE_unique.information2 '||r_LGE_unique.information2,10);
20317: hr_utility.set_location( 'r_LGE_unique.information3 '||r_LGE_unique.information3,10);
20318: -- If reuse objects flag is 'Y' then check for the object in the target business group
20319: -- if found insert the record into PLSql table and exit the loop else try create the
20320: -- object in the target business group
20321: --
20361: --
20362: --DOUBT log_data('LGE',l_new_value,l_prefix || r_LGE_unique.name|| l_suffix,'REUSED');
20363: --
20364: end if ;
20365: hr_utility.set_location( 'found record for update',10);
20366: --
20367: else
20368: --
20369: l_update := false;
20438: if not l_object_found_in_target OR l_update then
20439: --
20440: l_current_pk_id := r_LGE.information1;
20441: --
20442: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20443: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20444: --
20445: if l_current_pk_id = l_prev_pk_id then
20446: --
20439: --
20440: l_current_pk_id := r_LGE.information1;
20441: --
20442: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20443: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20444: --
20445: if l_current_pk_id = l_prev_pk_id then
20446: --
20447: l_first_rec := false ;
20460: end if;
20461:
20462: if l_first_rec and not l_update then
20463: -- Call Create routine.
20464: hr_utility.set_location(' BEN_LER_CHG_PGM_ENRT_F CREATE_LER_CHG_PGM_ENRT ',20);
20465: BEN_LER_CHG_PGM_ENRT_API.CREATE_LER_CHG_PGM_ENRT(
20466: --
20467: P_VALIDATE => false
20468: ,P_EFFECTIVE_DATE => l_effective_date
20516: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
20517: );
20518: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20519: -- Update all relevent cer records with new pk_id
20520: hr_utility.set_location('Before plsql table ',222);
20521: hr_utility.set_location('new_value id '||l_ler_chg_pgm_enrt_id,222);
20522: 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' ;
20523: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LGE.information1 ;
20524: 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 ;
20517: );
20518: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20519: -- Update all relevent cer records with new pk_id
20520: hr_utility.set_location('Before plsql table ',222);
20521: hr_utility.set_location('new_value id '||l_ler_chg_pgm_enrt_id,222);
20522: 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' ;
20523: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LGE.information1 ;
20524: 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 ;
20525: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20523: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LGE.information1 ;
20524: 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 ;
20525: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
20526: 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;
20527: hr_utility.set_location('After plsql table ',222);
20528: --
20529: -- 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 ) ;
20530: --
20531: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
20533: else
20534: --
20535: -- Call Update routine for the pk_id created in prev run .
20536: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20537: hr_utility.set_location(' BEN_LER_CHG_PGM_ENRT_F UPDATE_LER_CHG_PGM_ENRT ',30);
20538: --UPD START
20539: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20540: --
20541: if l_update then
20535: -- Call Update routine for the pk_id created in prev run .
20536: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
20537: hr_utility.set_location(' BEN_LER_CHG_PGM_ENRT_F UPDATE_LER_CHG_PGM_ENRT ',30);
20538: --UPD START
20539: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20540: --
20541: if l_update then
20542: --
20543: l_datetrack_mode := r_LGE.datetrack_mode ;
20555: l_object_version_number := r_LGE.information265;
20556: --
20557: end if;
20558: --
20559: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
20560: --
20561: IF l_update OR l_dml_operation <> 'UPDATE' THEN
20562: --UPD END
20563: BEN_LER_CHG_PGM_ENRT_API.UPDATE_LER_CHG_PGM_ENRT(
20805: r_LDC_unique.information3 >=
20806: ben_pd_copy_to_ben_one.g_copy_effective_date)
20807: ) then
20808: --
20809: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20810: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20811: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20812: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20813: -- If reuse objects flag is 'Y' then check for the object in the target business group
20806: ben_pd_copy_to_ben_one.g_copy_effective_date)
20807: ) then
20808: --
20809: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20810: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20811: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20812: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20813: -- If reuse objects flag is 'Y' then check for the object in the target business group
20814: -- if found insert the record into PLSql table and exit the loop else try create the
20807: ) then
20808: --
20809: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20810: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20811: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20812: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20813: -- If reuse objects flag is 'Y' then check for the object in the target business group
20814: -- if found insert the record into PLSql table and exit the loop else try create the
20815: -- object in the target business group
20808: --
20809: hr_utility.set_location(' r_LDC_unique.table_route_id '||r_LDC_unique.table_route_id,10);
20810: hr_utility.set_location(' r_LDC_unique.information1 '||r_LDC_unique.information1,10);
20811: hr_utility.set_location( 'r_LDC_unique.information2 '||r_LDC_unique.information2,10);
20812: hr_utility.set_location( 'r_LDC_unique.information3 '||r_LDC_unique.information3,10);
20813: -- If reuse objects flag is 'Y' then check for the object in the target business group
20814: -- if found insert the record into PLSql table and exit the loop else try create the
20815: -- object in the target business group
20816: --
20858: --
20859: --DOUBT log_data('LDC',l_new_value,l_prefix || r_LDC_unique.name|| l_suffix,'REUSED');
20860: --
20861: end if ;
20862: hr_utility.set_location( 'found record for update',10);
20863: --
20864: else
20865: --
20866: l_update := false;
20935: if not l_object_found_in_target OR l_update then
20936: --
20937: l_current_pk_id := r_LDC.information1;
20938: --
20939: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20940: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20941: --
20942: if l_current_pk_id = l_prev_pk_id then
20943: --
20936: --
20937: l_current_pk_id := r_LDC.information1;
20938: --
20939: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
20940: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
20941: --
20942: if l_current_pk_id = l_prev_pk_id then
20943: --
20944: l_first_rec := false ;
20957: end if;
20958:
20959: if l_first_rec and not l_update then
20960: -- Call Create routine.
20961: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_F CREATE_LER_CHG_DEPENDENT_CVG ',20);
20962: BEN_LER_CHG_DEPENDENT_CVG_API.CREATE_LER_CHG_DEPENDENT_CVG(
20963: --
20964: P_VALIDATE => false
20965: ,P_EFFECTIVE_DATE => l_effective_date
21016: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
21017: );
21018: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21019: -- Update all relevent cer records with new pk_id
21020: hr_utility.set_location('Before plsql table ',222);
21021: hr_utility.set_location('new_value id '||l_ler_chg_dpnt_cvg_id,222);
21022: 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' ;
21023: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LDC.information1 ;
21024: 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 ;
21017: );
21018: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21019: -- Update all relevent cer records with new pk_id
21020: hr_utility.set_location('Before plsql table ',222);
21021: hr_utility.set_location('new_value id '||l_ler_chg_dpnt_cvg_id,222);
21022: 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' ;
21023: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LDC.information1 ;
21024: 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 ;
21025: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21023: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_LDC.information1 ;
21024: 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 ;
21025: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21026: 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;
21027: hr_utility.set_location('After plsql table ',222);
21028: --
21029: -- 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 ) ;
21030: --
21031: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
21033: else
21034: --
21035: -- Call Update routine for the pk_id created in prev run .
21036: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21037: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_F UPDATE_LER_CHG_DEPENDENT_CVG ',30);
21038: --UPD START
21039: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21040: --
21041: if l_update then
21035: -- Call Update routine for the pk_id created in prev run .
21036: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21037: hr_utility.set_location(' BEN_LER_CHG_DPNT_CVG_F UPDATE_LER_CHG_DEPENDENT_CVG ',30);
21038: --UPD START
21039: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21040: --
21041: if l_update then
21042: --
21043: l_datetrack_mode := r_LDC.datetrack_mode ;
21055: l_object_version_number := r_LDC.information265;
21056: --
21057: end if;
21058: --
21059: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21060: --
21061: IF l_update OR l_dml_operation <> 'UPDATE' THEN
21062: --UPD END
21063: BEN_LER_CHG_DEPENDENT_CVG_API.UPDATE_LER_CHG_DEPENDENT_CVG(
21297: ben_pd_copy_to_ben_one.g_copy_effective_date)
21298: ) then
21299:
21300: --
21301: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21302: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21303: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21304: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21305: -- If reuse objects flag is 'Y' then check for the object in the target business group
21298: ) then
21299:
21300: --
21301: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21302: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21303: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21304: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21305: -- If reuse objects flag is 'Y' then check for the object in the target business group
21306: -- if found insert the record into PLSql table and exit the loop else try create the
21299:
21300: --
21301: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21302: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21303: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21304: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21305: -- If reuse objects flag is 'Y' then check for the object in the target business group
21306: -- if found insert the record into PLSql table and exit the loop else try create the
21307: -- object in the target business group
21300: --
21301: hr_utility.set_location(' r_PAT_unique.table_route_id '||r_PAT_unique.table_route_id,10);
21302: hr_utility.set_location(' r_PAT_unique.information1 '||r_PAT_unique.information1,10);
21303: hr_utility.set_location( 'r_PAT_unique.information2 '||r_PAT_unique.information2,10);
21304: hr_utility.set_location( 'r_PAT_unique.information3 '||r_PAT_unique.information3,10);
21305: -- If reuse objects flag is 'Y' then check for the object in the target business group
21306: -- if found insert the record into PLSql table and exit the loop else try create the
21307: -- object in the target business group
21308: --
21348: --
21349: --DOUBT log_data('PAT',l_new_value,l_prefix || r_PAT_unique.name|| l_suffix,'REUSED');
21350: --
21351: end if ;
21352: hr_utility.set_location( 'found record for update',10);
21353: --
21354: else
21355: --
21356: l_update := false;
21430: if (not l_object_found_in_target OR l_update ) and l_ACTN_TYP_ID is not null then
21431: --
21432: l_current_pk_id := r_PAT.information1;
21433: --
21434: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21435: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21436: --
21437: if l_current_pk_id = l_prev_pk_id then
21438: --
21431: --
21432: l_current_pk_id := r_PAT.information1;
21433: --
21434: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21435: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21436: --
21437: if l_current_pk_id = l_prev_pk_id then
21438: --
21439: l_first_rec := false ;
21452: end if;
21453:
21454: if l_first_rec and not l_update then
21455: -- Call Create routine.
21456: hr_utility.set_location(' BEN_POPL_ACTN_TYP_F CREATE_POPL_ACTION_TYPE ',20);
21457: BEN_POPL_ACTION_TYPE_API.CREATE_POPL_ACTION_TYPE(
21458: --
21459: P_VALIDATE => false
21460: ,P_EFFECTIVE_DATE => l_effective_date
21503: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
21504: );
21505: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21506: -- Update all relevent cer records with new pk_id
21507: hr_utility.set_location('Before plsql table ',222);
21508: hr_utility.set_location('new_value id '||l_popl_actn_typ_id,222);
21509: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ACTN_TYP_ID' ;
21510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PAT.information1 ;
21511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ACTN_TYP_ID ;
21504: );
21505: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21506: -- Update all relevent cer records with new pk_id
21507: hr_utility.set_location('Before plsql table ',222);
21508: hr_utility.set_location('new_value id '||l_popl_actn_typ_id,222);
21509: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'POPL_ACTN_TYP_ID' ;
21510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PAT.information1 ;
21511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ACTN_TYP_ID ;
21512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PAT.information1 ;
21511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_POPL_ACTN_TYP_ID ;
21512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
21513: 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;
21514: hr_utility.set_location('After plsql table ',222);
21515: --
21516: -- 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 ) ;
21517: --
21518: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
21520: else
21521: --
21522: -- Call Update routine for the pk_id created in prev run .
21523: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21524: hr_utility.set_location(' BEN_POPL_ACTN_TYP_F UPDATE_POPL_ACTION_TYPE ',30);
21525: --UPD START
21526: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21527: --
21528: if l_update then
21522: -- Call Update routine for the pk_id created in prev run .
21523: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
21524: hr_utility.set_location(' BEN_POPL_ACTN_TYP_F UPDATE_POPL_ACTION_TYPE ',30);
21525: --UPD START
21526: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21527: --
21528: if l_update then
21529: --
21530: l_datetrack_mode := r_PAT.datetrack_mode ;
21542: l_object_version_number := r_PAT.information265;
21543: --
21544: end if;
21545: --
21546: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
21547: --
21548: IF l_update OR l_dml_operation <> 'UPDATE' THEN
21549: --UPD END
21550: BEN_POPL_ACTION_TYPE_API.UPDATE_POPL_ACTION_TYPE(
21800: ben_pd_copy_to_ben_one.g_copy_effective_date)
21801: ) then
21802:
21803: --
21804: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21805: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21806: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21807: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21808: -- If reuse objects flag is 'Y' then check for the object in the target business group
21801: ) then
21802:
21803: --
21804: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21805: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21806: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21807: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21808: -- If reuse objects flag is 'Y' then check for the object in the target business group
21809: -- if found insert the record into PLSql table and exit the loop else try create the
21802:
21803: --
21804: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21805: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21806: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21807: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21808: -- If reuse objects flag is 'Y' then check for the object in the target business group
21809: -- if found insert the record into PLSql table and exit the loop else try create the
21810: -- object in the target business group
21803: --
21804: hr_utility.set_location(' r_PEO_unique.table_route_id '||r_PEO_unique.table_route_id,10);
21805: hr_utility.set_location(' r_PEO_unique.information1 '||r_PEO_unique.information1,10);
21806: hr_utility.set_location( 'r_PEO_unique.information2 '||r_PEO_unique.information2,10);
21807: hr_utility.set_location( 'r_PEO_unique.information3 '||r_PEO_unique.information3,10);
21808: -- If reuse objects flag is 'Y' then check for the object in the target business group
21809: -- if found insert the record into PLSql table and exit the loop else try create the
21810: -- object in the target business group
21811: --
21821: close c_PEO ;
21822: --
21823: l_dml_operation:= r_PEO_unique.dml_operation ;
21824: l_LER_ID := get_fk('LER_ID', r_PEO.information257,l_dml_operation );
21825: hr_utility.set_location(' l_LER_ID '||l_LER_ID ,123);
21826: l_MX_POE_DET_DT_RL := get_fk('FORMULA_ID', r_PEO.INFORMATION272,l_dml_operation );
21827: l_MX_POE_RL := get_fk('FORMULA_ID', r_PEO.INFORMATION270,l_dml_operation );
21828: l_OIPL_ID := get_fk('OIPL_ID', r_PEO.INFORMATION258,l_dml_operation );
21829: l_PGM_ID := get_fk('PGM_ID', r_PEO.INFORMATION260,l_dml_operation );
21860: --
21861: --DOUBT log_data('PEO',l_new_value,l_prefix || r_PEO_unique.name|| l_suffix,'REUSED');
21862: --
21863: end if ;
21864: hr_utility.set_location( 'found record for update',10);
21865: --
21866: else
21867: --
21868: l_update := false;
21890: fetch c_PEO into r_PEO ;
21891: --
21892: close c_PEO ; */
21893: --
21894: hr_utility.set_location('g_count '||BEN_PD_COPY_TO_BEN_ONE.g_count,123);
21895: hr_utility.set_location('r_PEO.information14 '||r_PEO.information14 ,123);
21896: --
21897:
21898: if p_reuse_object_flag = 'Y' then
21891: --
21892: close c_PEO ; */
21893: --
21894: hr_utility.set_location('g_count '||BEN_PD_COPY_TO_BEN_ONE.g_count,123);
21895: hr_utility.set_location('r_PEO.information14 '||r_PEO.information14 ,123);
21896: --
21897:
21898: if p_reuse_object_flag = 'Y' then
21899: if c_PEO_min_max_dates%found then
21941: if not l_object_found_in_target OR l_update then
21942: --
21943: l_current_pk_id := r_PEO.information1;
21944: --
21945: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21946: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21947: --
21948: if l_current_pk_id = l_prev_pk_id then
21949: --
21942: --
21943: l_current_pk_id := r_PEO.information1;
21944: --
21945: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
21946: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
21947: --
21948: if l_current_pk_id = l_prev_pk_id then
21949: --
21950: l_first_rec := false ;
21963: end if;
21964:
21965: if l_first_rec and not l_update then
21966: -- Call Create routine.
21967: hr_utility.set_location(' BEN_ELIG_TO_PRTE_RSN_F CREATE_ELIG_TO_PRTE_REASON ',20);
21968: BEN_ELIG_TO_PRTE_REASON_API.CREATE_ELIG_TO_PRTE_REASON(
21969: --
21970: P_VALIDATE => false
21971: ,P_EFFECTIVE_DATE => l_effective_date
22035: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
22036: );
22037: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22038: -- Update all relevent cer records with new pk_id
22039: hr_utility.set_location('Before plsql table ',222);
22040: hr_utility.set_location('new_value id '||l_elig_to_prte_rsn_id,222);
22041: 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' ;
22042: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PEO.information1 ;
22043: 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 ;
22036: );
22037: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22038: -- Update all relevent cer records with new pk_id
22039: hr_utility.set_location('Before plsql table ',222);
22040: hr_utility.set_location('new_value id '||l_elig_to_prte_rsn_id,222);
22041: 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' ;
22042: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PEO.information1 ;
22043: 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 ;
22044: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22042: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PEO.information1 ;
22043: 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 ;
22044: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22045: 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;
22046: hr_utility.set_location('After plsql table ',222);
22047: --
22048: -- 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 ) ;
22049: --
22050: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22052: else
22053: --
22054: -- Call Update routine for the pk_id created in prev run .
22055: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22056: hr_utility.set_location(' BEN_ELIG_TO_PRTE_RSN_F UPDATE_ELIG_TO_PRTE_REASON ',30);
22057: --UPD START
22058: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
22059: --
22060: if l_update then
22054: -- Call Update routine for the pk_id created in prev run .
22055: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22056: hr_utility.set_location(' BEN_ELIG_TO_PRTE_RSN_F UPDATE_ELIG_TO_PRTE_REASON ',30);
22057: --UPD START
22058: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
22059: --
22060: if l_update then
22061: --
22062: l_datetrack_mode := r_PEO.datetrack_mode ;
22074: l_object_version_number := r_PEO.information265;
22075: --
22076: end if;
22077: --
22078: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
22079: --
22080: IF l_update OR l_dml_operation <> 'UPDATE' THEN
22081: --UPD END
22082: BEN_ELIG_TO_PRTE_REASON_API.UPDATE_ELIG_TO_PRTE_REASON(
22296: end if ;
22297: -- End Prefix Sufix derivation
22298: for r_CWG_unique in c_unique_CWG('CWG') loop
22299: --
22300: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22301: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22302: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22303: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22304: -- If reuse objects flag is 'Y' then check for the object in the target business group
22297: -- End Prefix Sufix derivation
22298: for r_CWG_unique in c_unique_CWG('CWG') loop
22299: --
22300: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22301: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22302: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22303: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22304: -- If reuse objects flag is 'Y' then check for the object in the target business group
22305: -- if found insert the record into PLSql table and exit the loop else try create the
22298: for r_CWG_unique in c_unique_CWG('CWG') loop
22299: --
22300: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22301: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22302: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22303: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22304: -- If reuse objects flag is 'Y' then check for the object in the target business group
22305: -- if found insert the record into PLSql table and exit the loop else try create the
22306: -- object in the target business group
22299: --
22300: hr_utility.set_location(' r_CWG_unique.table_route_id '||r_CWG_unique.table_route_id,10);
22301: hr_utility.set_location(' r_CWG_unique.information1 '||r_CWG_unique.information1,10);
22302: hr_utility.set_location( 'r_CWG_unique.information2 '||r_CWG_unique.information2,10);
22303: hr_utility.set_location( 'r_CWG_unique.information3 '||r_CWG_unique.information3,10);
22304: -- If reuse objects flag is 'Y' then check for the object in the target business group
22305: -- if found insert the record into PLSql table and exit the loop else try create the
22306: -- object in the target business group
22307: --
22348: --
22349: end if ;
22350: l_CWB_WKSHT_GRP_ID := r_CWG_unique.information1 ;
22351: l_object_version_number := r_CWG.information265 ;
22352: hr_utility.set_location( 'found record for update',10);
22353: --
22354: else
22355: --
22356: --UPD END
22387: if not l_object_found_in_target OR l_update then
22388: --
22389: l_current_pk_id := r_CWG.information1;
22390: --
22391: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22392: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22393: --
22394: if l_current_pk_id = l_prev_pk_id then
22395: --
22388: --
22389: l_current_pk_id := r_CWG.information1;
22390: --
22391: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22392: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22393: --
22394: if l_current_pk_id = l_prev_pk_id then
22395: --
22396: l_first_rec := false ;
22409: end if;
22410: --
22411: if l_first_rec and not l_update then
22412: -- Call Create routine.
22413: hr_utility.set_location(' BEN_CWB_WKSHT_GRP CREATE_CWB_WKSHT_GRP ',20);
22414: BEN_CWB_WKSHT_GRP_API.CREATE_CWB_WKSHT_GRP(
22415: --
22416: P_VALIDATE => false
22417: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
22459: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
22460: );
22461: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22462: -- Update all relevent cer records with new pk_id
22463: hr_utility.set_location('Before plsql table ',222);
22464: hr_utility.set_location('new_value id '||l_cwb_wksht_grp_id,222);
22465: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'CWB_WKSHT_GRP_ID' ;
22466: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CWG.information1 ;
22467: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_CWB_WKSHT_GRP_ID ;
22460: );
22461: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
22462: -- Update all relevent cer records with new pk_id
22463: hr_utility.set_location('Before plsql table ',222);
22464: hr_utility.set_location('new_value id '||l_cwb_wksht_grp_id,222);
22465: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'CWB_WKSHT_GRP_ID' ;
22466: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CWG.information1 ;
22467: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_CWB_WKSHT_GRP_ID ;
22468: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22466: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_CWG.information1 ;
22467: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_CWB_WKSHT_GRP_ID ;
22468: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
22469: 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;
22470: hr_utility.set_location('After plsql table ',222);
22471: --
22472: -- 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 ) ;
22473: --
22474: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
22617: begin
22618:
22619: for r_CRI_unique in c_unique_CRI('CRI') loop
22620: --
22621: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22622: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22623: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22624: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22625: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22618:
22619: for r_CRI_unique in c_unique_CRI('CRI') loop
22620: --
22621: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22622: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22623: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22624: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22625: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22626:
22619: for r_CRI_unique in c_unique_CRI('CRI') loop
22620: --
22621: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22622: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22623: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22624: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22625: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22626:
22627: -- AS the Only operations that are performed on the table
22620: --
22621: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22622: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22623: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22624: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22625: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22626:
22627: -- AS the Only operations that are performed on the table
22628: -- BEN_CUSTOM_REGION_ITEMS are REUSE/INSERT we need not worry about t
22621: hr_utility.set_location(' r_CRI_unique.table_route_id '||r_CRI_unique.table_route_id,10);
22622: hr_utility.set_location(' r_CRI_unique.information11 '||r_CRI_unique.information11,10);
22623: hr_utility.set_location( 'r_CRI_unique.information12 '||r_CRI_unique.information12,10);
22624: hr_utility.set_location( 'r_CRI_unique.information13 '||r_CRI_unique.information13,10);
22625: hr_utility.set_location( 'r_CRI_unique.information14 '||r_CRI_unique.information14,10);
22626:
22627: -- AS the Only operations that are performed on the table
22628: -- BEN_CUSTOM_REGION_ITEMS are REUSE/INSERT we need not worry about t
22629: -- the l_dml_operation.
22639: l_fk_cwb_wksht_grp_id := get_fk('CWB_WKSHT_GRP_ID', r_CRI_unique.INFORMATION12,l_dml_operation);
22640:
22641: -- Fetch the new fk cwb_wksht_grp_id for the target business group.
22642:
22643: 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);
22644: hr_utility.set_location('l_dml_operation '|| l_dml_operation || ' p_reuse_object_flag ' || p_reuse_object_flag, 20);
22645:
22646:
22647:
22640:
22641: -- Fetch the new fk cwb_wksht_grp_id for the target business group.
22642:
22643: 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);
22644: hr_utility.set_location('l_dml_operation '|| l_dml_operation || ' p_reuse_object_flag ' || p_reuse_object_flag, 20);
22645:
22646:
22647:
22648: open c_find_CRI_in_target(r_CRI_unique.information11,
22653: fetch c_find_CRI_in_target into r_find_CRI_in_target ;
22654:
22655: if c_find_CRI_in_target%found then
22656:
22657: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22658: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22654:
22655: if c_find_CRI_in_target%found then
22656:
22657: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22658: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22662: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22655: if c_find_CRI_in_target%found then
22656:
22657: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22658: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22662: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22663: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22656:
22657: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22658: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22662: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22663: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22664:
22657: hr_utility.set_location(' r_find_CRI_in_target.REGION_CODE ' || r_find_CRI_in_target.REGION_CODE,20 );
22658: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22662: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22663: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22664:
22665: -- As the record in found in the target , reuse the record
22658: hr_utility.set_location(' r_find_CRI_in_target.CUSTOM_KEY ' || r_find_CRI_in_target.CUSTOM_KEY ,20 );
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22662: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22663: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22664:
22665: -- As the record in found in the target , reuse the record
22666: else
22659: hr_utility.set_location( 'r_find_CRI_in_target.CUSTOM_TYPE ' || r_find_CRI_in_target.CUSTOM_TYPE,20 );
22660: hr_utility.set_location( 'r_find_CRI_in_target.ITEM_NAME ' || r_find_CRI_in_target.ITEM_NAME ,20 );
22661: hr_utility.set_location( 'r_find_CRI_in_target.LABEL ' || r_find_CRI_in_target.LABEL ,20 );
22662: hr_utility.set_location( 'RKG A record of ben_custom_region_items',202);
22663: hr_utility.set_location( 'with the same cwb_wksht_grp_id as custom_key already exists and hence reused. ',202);
22664:
22665: -- As the record in found in the target , reuse the record
22666: else
22667: -- or create the new record by querying the full record from CPE
22834: end if ;
22835: -- End Prefix Sufix derivation
22836: for r_PCP_unique in c_unique_PCP('PCP') loop
22837: --
22838: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22839: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22840: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22841: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22842: -- If reuse objects flag is 'Y' then check for the object in the target business group
22835: -- End Prefix Sufix derivation
22836: for r_PCP_unique in c_unique_PCP('PCP') loop
22837: --
22838: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22839: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22840: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22841: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22842: -- If reuse objects flag is 'Y' then check for the object in the target business group
22843: -- if found insert the record into PLSql table and exit the loop else try create the
22836: for r_PCP_unique in c_unique_PCP('PCP') loop
22837: --
22838: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22839: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22840: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22841: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22842: -- If reuse objects flag is 'Y' then check for the object in the target business group
22843: -- if found insert the record into PLSql table and exit the loop else try create the
22844: -- object in the target business group
22837: --
22838: hr_utility.set_location(' r_PCP_unique.table_route_id '||r_PCP_unique.table_route_id,10);
22839: hr_utility.set_location(' r_PCP_unique.information1 '||r_PCP_unique.information1,10);
22840: hr_utility.set_location( 'r_PCP_unique.information2 '||r_PCP_unique.information2,10);
22841: hr_utility.set_location( 'r_PCP_unique.information3 '||r_PCP_unique.information3,10);
22842: -- If reuse objects flag is 'Y' then check for the object in the target business group
22843: -- if found insert the record into PLSql table and exit the loop else try create the
22844: -- object in the target business group
22845: --
22907: --
22908: end if ;
22909: l_PL_PCP_ID := r_PCP_unique.information1 ;
22910: l_object_version_number := r_PCP.information265 ;
22911: hr_utility.set_location( 'found record for update',10);
22912: --
22913: else
22914: --
22915: --UPD END
22944: if not l_object_found_in_target OR l_update then
22945: --
22946: l_current_pk_id := r_PCP.information1;
22947: --
22948: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22949: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22950: --
22951: if l_current_pk_id = l_prev_pk_id then
22952: --
22945: --
22946: l_current_pk_id := r_PCP.information1;
22947: --
22948: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
22949: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
22950: --
22951: if l_current_pk_id = l_prev_pk_id then
22952: --
22953: l_first_rec := false ;
22975: end if;
22976: --
22977: if l_first_rec and not l_update then
22978: -- Call Create routine.
22979: hr_utility.set_location(' BEN_PL_PCP CREATE_PL_PRMRY_CARE_PRVDR ',20);
22980: BEN_PL_PRMRY_CARE_PRVDR_API.CREATE_PL_PRMRY_CARE_PRVDR(
22981: --
22982: P_VALIDATE => false
22983: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
23030: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
23031: );
23032: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23033: -- Update all relevent cer records with new pk_id
23034: hr_utility.set_location('Before plsql table ',222);
23035: hr_utility.set_location('new_value id '||l_pl_pcp_id,222);
23036: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_ID' ;
23037: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCP.information1 ;
23038: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_ID ;
23031: );
23032: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23033: -- Update all relevent cer records with new pk_id
23034: hr_utility.set_location('Before plsql table ',222);
23035: hr_utility.set_location('new_value id '||l_pl_pcp_id,222);
23036: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_ID' ;
23037: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCP.information1 ;
23038: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_ID ;
23039: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23037: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PCP.information1 ;
23038: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_ID ;
23039: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23040: 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;
23041: hr_utility.set_location('After plsql table ',222);
23042: --
23043: -- 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 ) ;
23044: --
23045: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
23265: r_COP_unique.information3 >=
23266: ben_pd_copy_to_ben_one.g_copy_effective_date)
23267: ) then
23268: --
23269: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23270: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23271: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23272: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23273: -- If reuse objects flag is 'Y' then check for the object in the target business group
23266: ben_pd_copy_to_ben_one.g_copy_effective_date)
23267: ) then
23268: --
23269: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23270: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23271: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23272: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23273: -- If reuse objects flag is 'Y' then check for the object in the target business group
23274: -- if found insert the record into PLSql table and exit the loop else try create the
23267: ) then
23268: --
23269: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23270: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23271: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23272: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23273: -- If reuse objects flag is 'Y' then check for the object in the target business group
23274: -- if found insert the record into PLSql table and exit the loop else try create the
23275: -- object in the target business group
23268: --
23269: hr_utility.set_location(' r_COP_unique.table_route_id '||r_COP_unique.table_route_id,10);
23270: hr_utility.set_location(' r_COP_unique.information1 '||r_COP_unique.information1,10);
23271: hr_utility.set_location( 'r_COP_unique.information2 '||r_COP_unique.information2,10);
23272: hr_utility.set_location( 'r_COP_unique.information3 '||r_COP_unique.information3,10);
23273: -- If reuse objects flag is 'Y' then check for the object in the target business group
23274: -- if found insert the record into PLSql table and exit the loop else try create the
23275: -- object in the target business group
23276: --
23321: --
23322: --DOUBT log_data('COP',l_new_value,l_prefix || r_COP_unique.name|| l_suffix,'REUSED');
23323: --
23324: end if ;
23325: hr_utility.set_location( 'found record for update',10);
23326: --
23327: else
23328: --
23329: l_update := false;
23400: if not l_object_found_in_target OR l_update then
23401: --
23402: l_current_pk_id := r_COP.information1;
23403: --
23404: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23405: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23406: --
23407: if l_current_pk_id = l_prev_pk_id then
23408: --
23401: --
23402: l_current_pk_id := r_COP.information1;
23403: --
23404: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23405: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23406: --
23407: if l_current_pk_id = l_prev_pk_id then
23408: --
23409: l_first_rec := false ;
23422: end if;
23423:
23424: if l_first_rec and not l_update then
23425: -- Call Create routine.
23426: hr_utility.set_location(' BEN_OIPL_F CREATE_OPTION_IN_PLAN ',20);
23427: BEN_OPTION_IN_PLAN_API.CREATE_OPTION_IN_PLAN(
23428: --
23429: P_VALIDATE => false
23430: ,P_EFFECTIVE_DATE => l_effective_date
23504: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
23505: );
23506: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23507: -- Update all relevent cer records with new pk_id
23508: hr_utility.set_location('Before plsql table ',222);
23509: hr_utility.set_location('new_value id '||l_oipl_id,222);
23510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPL_ID' ;
23511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_COP.information1 ;
23512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPL_ID ;
23505: );
23506: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23507: -- Update all relevent cer records with new pk_id
23508: hr_utility.set_location('Before plsql table ',222);
23509: hr_utility.set_location('new_value id '||l_oipl_id,222);
23510: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPL_ID' ;
23511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_COP.information1 ;
23512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPL_ID ;
23513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23511: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_COP.information1 ;
23512: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPL_ID ;
23513: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
23514: 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;
23515: hr_utility.set_location('After plsql table ',222);
23516: --
23517: -- 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 ) ;
23518: --
23519: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
23521: else
23522: --
23523: -- Call Update routine for the pk_id created in prev run .
23524: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23525: hr_utility.set_location(' BEN_OIPL_F UPDATE_OPTION_IN_PLAN ',30);
23526: --UPD START
23527: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
23528: --
23529: if l_update then
23523: -- Call Update routine for the pk_id created in prev run .
23524: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
23525: hr_utility.set_location(' BEN_OIPL_F UPDATE_OPTION_IN_PLAN ',30);
23526: --UPD START
23527: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
23528: --
23529: if l_update then
23530: --
23531: l_datetrack_mode := r_COP.datetrack_mode ;
23543: l_object_version_number := r_COP.information265;
23544: --
23545: end if;
23546: --
23547: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
23548: --
23549: IF l_update OR l_dml_operation <> 'UPDATE' THEN
23550: --UPD END
23551: BEN_OPTION_IN_PLAN_API.UPDATE_OPTION_IN_PLAN(
23819: r_DDR_unique.information3 >=
23820: ben_pd_copy_to_ben_one.g_copy_effective_date)
23821: ) then
23822: --
23823: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23824: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23825: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23826: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23827: -- If reuse objects flag is 'Y' then check for the object in the target business group
23820: ben_pd_copy_to_ben_one.g_copy_effective_date)
23821: ) then
23822: --
23823: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23824: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23825: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23826: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23827: -- If reuse objects flag is 'Y' then check for the object in the target business group
23828: -- if found insert the record into PLSql table and exit the loop else try create the
23821: ) then
23822: --
23823: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23824: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23825: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23826: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23827: -- If reuse objects flag is 'Y' then check for the object in the target business group
23828: -- if found insert the record into PLSql table and exit the loop else try create the
23829: -- object in the target business group
23822: --
23823: hr_utility.set_location(' r_DDR_unique.table_route_id '||r_DDR_unique.table_route_id,10);
23824: hr_utility.set_location(' r_DDR_unique.information1 '||r_DDR_unique.information1,10);
23825: hr_utility.set_location( 'r_DDR_unique.information2 '||r_DDR_unique.information2,10);
23826: hr_utility.set_location( 'r_DDR_unique.information3 '||r_DDR_unique.information3,10);
23827: -- If reuse objects flag is 'Y' then check for the object in the target business group
23828: -- if found insert the record into PLSql table and exit the loop else try create the
23829: -- object in the target business group
23830: --
23870: --
23871: --DOUBT log_data('DDR',l_new_value,l_prefix || r_DDR_unique.name|| l_suffix,'REUSED');
23872: --
23873: end if ;
23874: hr_utility.set_location( 'found record for update',10);
23875: --
23876: else
23877: --
23878: l_update := false;
23947: if not l_object_found_in_target OR l_update then
23948: --
23949: l_current_pk_id := r_DDR.information1;
23950: --
23951: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23952: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23953: --
23954: if l_current_pk_id = l_prev_pk_id then
23955: --
23948: --
23949: l_current_pk_id := r_DDR.information1;
23950: --
23951: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
23952: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
23953: --
23954: if l_current_pk_id = l_prev_pk_id then
23955: --
23956: l_first_rec := false ;
23969: end if;
23970:
23971: if l_first_rec and not l_update then
23972: -- Call Create routine.
23973: hr_utility.set_location(' BEN_DSGN_RQMT_F CREATE_DESIGN_RQMT ',20);
23974: BEN_DESIGN_RQMT_API.CREATE_DESIGN_RQMT(
23975: --
23976: P_VALIDATE => false
23977: ,P_EFFECTIVE_DATE => l_effective_date
24025: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
24026: );
24027: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24028: -- Update all relevent cer records with new pk_id
24029: hr_utility.set_location('Before plsql table ',222);
24030: hr_utility.set_location('new_value id '||l_dsgn_rqmt_id,222);
24031: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'DSGN_RQMT_ID' ;
24032: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DDR.information1 ;
24033: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_ID ;
24026: );
24027: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24028: -- Update all relevent cer records with new pk_id
24029: hr_utility.set_location('Before plsql table ',222);
24030: hr_utility.set_location('new_value id '||l_dsgn_rqmt_id,222);
24031: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'DSGN_RQMT_ID' ;
24032: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DDR.information1 ;
24033: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_ID ;
24034: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24032: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DDR.information1 ;
24033: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_DSGN_RQMT_ID ;
24034: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24035: 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;
24036: hr_utility.set_location('After plsql table ',222);
24037: --
24038: -- 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 ) ;
24039: --
24040: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
24042: else
24043: --
24044: -- Call Update routine for the pk_id created in prev run .
24045: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24046: hr_utility.set_location(' BEN_DSGN_RQMT_F UPDATE_DESIGN_RQMT ',30);
24047: --UPD START
24048: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
24049: --
24050: if l_update then
24044: -- Call Update routine for the pk_id created in prev run .
24045: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24046: hr_utility.set_location(' BEN_DSGN_RQMT_F UPDATE_DESIGN_RQMT ',30);
24047: --UPD START
24048: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
24049: --
24050: if l_update then
24051: --
24052: l_datetrack_mode := r_DDR.datetrack_mode ;
24064: l_object_version_number := r_DDR.information265;
24065: --
24066: end if;
24067: --
24068: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
24069: --
24070: IF l_update OR l_dml_operation <> 'UPDATE' THEN
24071: --UPD END
24072: BEN_DESIGN_RQMT_API.UPDATE_DESIGN_RQMT(
24271: end if ;
24272: -- End Prefix Sufix derivation
24273: for r_DRR_unique in c_unique_DRR('DRR') loop
24274: --
24275: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24276: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24277: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24278: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24279: -- If reuse objects flag is 'Y' then check for the object in the target business group
24272: -- End Prefix Sufix derivation
24273: for r_DRR_unique in c_unique_DRR('DRR') loop
24274: --
24275: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24276: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24277: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24278: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24279: -- If reuse objects flag is 'Y' then check for the object in the target business group
24280: -- if found insert the record into PLSql table and exit the loop else try create the
24273: for r_DRR_unique in c_unique_DRR('DRR') loop
24274: --
24275: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24276: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24277: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24278: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24279: -- If reuse objects flag is 'Y' then check for the object in the target business group
24280: -- if found insert the record into PLSql table and exit the loop else try create the
24281: -- object in the target business group
24274: --
24275: hr_utility.set_location(' r_DRR_unique.table_route_id '||r_DRR_unique.table_route_id,10);
24276: hr_utility.set_location(' r_DRR_unique.information1 '||r_DRR_unique.information1,10);
24277: hr_utility.set_location( 'r_DRR_unique.information2 '||r_DRR_unique.information2,10);
24278: hr_utility.set_location( 'r_DRR_unique.information3 '||r_DRR_unique.information3,10);
24279: -- If reuse objects flag is 'Y' then check for the object in the target business group
24280: -- if found insert the record into PLSql table and exit the loop else try create the
24281: -- object in the target business group
24282: --
24323: --
24324: end if ;
24325: l_DSGN_RQMT_RLSHP_TYP_ID := r_DRR_unique.information1 ;
24326: l_object_version_number := r_DRR.information265 ;
24327: hr_utility.set_location( 'found record for update',10);
24328: --
24329: else
24330: --
24331: --UPD END
24360: if not l_object_found_in_target OR l_update then
24361: --
24362: l_current_pk_id := r_DRR.information1;
24363: --
24364: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24365: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24366: --
24367: if l_current_pk_id = l_prev_pk_id then
24368: --
24361: --
24362: l_current_pk_id := r_DRR.information1;
24363: --
24364: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24365: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24366: --
24367: if l_current_pk_id = l_prev_pk_id then
24368: --
24369: l_first_rec := false ;
24392: end if;
24393: --
24394: if l_first_rec and not l_update then
24395: -- Call Create routine.
24396: hr_utility.set_location(' BEN_DSGN_RQMT_RLSHP_TYP CREATE_DSGN_RQMT_RLSHP_TYP ',20);
24397: BEN_DSGN_RQMT_RLSHP_TYP_API.CREATE_DSGN_RQMT_RLSHP_TYP(
24398: --
24399: P_VALIDATE => false
24400: ,P_EFFECTIVE_DATE => NVL(l_parent_effective_start_date,p_effective_date)
24438: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
24439: );
24440: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24441: -- Update all relevent cer records with new pk_id
24442: hr_utility.set_location('Before plsql table ',222);
24443: hr_utility.set_location('new_value id '||l_dsgn_rqmt_rlshp_typ_id,222);
24444: 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' ;
24445: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DRR.information1 ;
24446: 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 ;
24439: );
24440: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24441: -- Update all relevent cer records with new pk_id
24442: hr_utility.set_location('Before plsql table ',222);
24443: hr_utility.set_location('new_value id '||l_dsgn_rqmt_rlshp_typ_id,222);
24444: 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' ;
24445: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DRR.information1 ;
24446: 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 ;
24447: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24445: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_DRR.information1 ;
24446: 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 ;
24447: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24448: 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;
24449: hr_utility.set_location('After plsql table ',222);
24450: --
24451: -- 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 ) ;
24452: --
24453: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
24643: r_OPP_unique.information3 >=
24644: ben_pd_copy_to_ben_one.g_copy_effective_date)
24645: ) then
24646: --
24647: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24648: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24649: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24650: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24651: -- If reuse objects flag is 'Y' then check for the object in the target business group
24644: ben_pd_copy_to_ben_one.g_copy_effective_date)
24645: ) then
24646: --
24647: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24648: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24649: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24650: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24651: -- If reuse objects flag is 'Y' then check for the object in the target business group
24652: -- if found insert the record into PLSql table and exit the loop else try create the
24645: ) then
24646: --
24647: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24648: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24649: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24650: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24651: -- If reuse objects flag is 'Y' then check for the object in the target business group
24652: -- if found insert the record into PLSql table and exit the loop else try create the
24653: -- object in the target business group
24646: --
24647: hr_utility.set_location(' r_OPP_unique.table_route_id '||r_OPP_unique.table_route_id,10);
24648: hr_utility.set_location(' r_OPP_unique.information1 '||r_OPP_unique.information1,10);
24649: hr_utility.set_location( 'r_OPP_unique.information2 '||r_OPP_unique.information2,10);
24650: hr_utility.set_location( 'r_OPP_unique.information3 '||r_OPP_unique.information3,10);
24651: -- If reuse objects flag is 'Y' then check for the object in the target business group
24652: -- if found insert the record into PLSql table and exit the loop else try create the
24653: -- object in the target business group
24654: --
24727: if not l_object_found_in_target then
24728: --
24729: l_current_pk_id := r_OPP.information1;
24730: --
24731: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24732: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24733: --
24734: if l_current_pk_id = l_prev_pk_id then
24735: --
24728: --
24729: l_current_pk_id := r_OPP.information1;
24730: --
24731: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
24732: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
24733: --
24734: if l_current_pk_id = l_prev_pk_id then
24735: --
24736: l_first_rec := false ;
24749: end if;
24750:
24751: if l_first_rec then
24752: -- Call Create routine.
24753: hr_utility.set_location(' BEN_OIPLIP_F CREATE_OPTION_IN_PLAN_IN_PGM ',20);
24754: BEN_OPTION_IN_PLAN_IN_PGM_API.CREATE_OPTION_IN_PLAN_IN_PGM(
24755: --
24756: P_VALIDATE => false
24757: ,P_EFFECTIVE_DATE => l_effective_date
24797: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
24798: );
24799: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24800: -- Update all relevent cer records with new pk_id
24801: hr_utility.set_location('Before plsql table ',222);
24802: hr_utility.set_location('new_value id '||l_oiplip_id,222);
24803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPLIP_ID' ;
24804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OPP.information1 ;
24805: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPLIP_ID ;
24798: );
24799: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24800: -- Update all relevent cer records with new pk_id
24801: hr_utility.set_location('Before plsql table ',222);
24802: hr_utility.set_location('new_value id '||l_oiplip_id,222);
24803: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OIPLIP_ID' ;
24804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OPP.information1 ;
24805: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPLIP_ID ;
24806: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24804: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OPP.information1 ;
24805: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OIPLIP_ID ;
24806: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
24807: 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;
24808: hr_utility.set_location('After plsql table ',222);
24809: --
24810: -- 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 ) ;
24811: --
24812: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
24814: else
24815: --
24816: -- Call Update routine for the pk_id created in prev run .
24817: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
24818: hr_utility.set_location(' BEN_OIPLIP_F UPDATE_OPTION_IN_PLAN_IN_PGM ',30);
24819: BEN_OPTION_IN_PLAN_IN_PGM_API.UPDATE_OPTION_IN_PLAN_IN_PGM(
24820: --
24821: P_VALIDATE => false
24822: ,P_EFFECTIVE_DATE => l_effective_date
25042: r_OTP_unique.information3 >=
25043: ben_pd_copy_to_ben_one.g_copy_effective_date)
25044: ) then
25045: --
25046: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25047: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25048: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25049: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25050: -- If reuse objects flag is 'Y' then check for the object in the target business group
25043: ben_pd_copy_to_ben_one.g_copy_effective_date)
25044: ) then
25045: --
25046: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25047: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25048: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25049: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25050: -- If reuse objects flag is 'Y' then check for the object in the target business group
25051: -- if found insert the record into PLSql table and exit the loop else try create the
25044: ) then
25045: --
25046: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25047: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25048: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25049: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25050: -- If reuse objects flag is 'Y' then check for the object in the target business group
25051: -- if found insert the record into PLSql table and exit the loop else try create the
25052: -- object in the target business group
25045: --
25046: hr_utility.set_location(' r_OTP_unique.table_route_id '||r_OTP_unique.table_route_id,10);
25047: hr_utility.set_location(' r_OTP_unique.information1 '||r_OTP_unique.information1,10);
25048: hr_utility.set_location( 'r_OTP_unique.information2 '||r_OTP_unique.information2,10);
25049: hr_utility.set_location( 'r_OTP_unique.information3 '||r_OTP_unique.information3,10);
25050: -- If reuse objects flag is 'Y' then check for the object in the target business group
25051: -- if found insert the record into PLSql table and exit the loop else try create the
25052: -- object in the target business group
25053: --
25123: if not l_object_found_in_target then
25124: --
25125: l_current_pk_id := r_OTP.information1;
25126: --
25127: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25128: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25129: --
25130: if l_current_pk_id = l_prev_pk_id then
25131: --
25124: --
25125: l_current_pk_id := r_OTP.information1;
25126: --
25127: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25128: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25129: --
25130: if l_current_pk_id = l_prev_pk_id then
25131: --
25132: l_first_rec := false ;
25145: end if;
25146:
25147: if l_first_rec then
25148: -- Call Create routine.
25149: hr_utility.set_location(' BEN_OPTIP_F CREATE_OPT_PLTYP_IN_PGM ',20);
25150: BEN_OPT_PLTYP_IN_PGM_API.CREATE_OPT_PLTYP_IN_PGM(
25151: --
25152: P_VALIDATE => false
25153: ,P_EFFECTIVE_DATE => l_effective_date
25196: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
25197: );
25198: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25199: -- Update all relevent cer records with new pk_id
25200: hr_utility.set_location('Before plsql table ',222);
25201: hr_utility.set_location('new_value id '||l_optip_id,222);
25202: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OPTIP_ID' ;
25203: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OTP.information1 ;
25204: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OPTIP_ID ;
25197: );
25198: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25199: -- Update all relevent cer records with new pk_id
25200: hr_utility.set_location('Before plsql table ',222);
25201: hr_utility.set_location('new_value id '||l_optip_id,222);
25202: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'OPTIP_ID' ;
25203: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OTP.information1 ;
25204: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OPTIP_ID ;
25205: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25203: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_OTP.information1 ;
25204: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_OPTIP_ID ;
25205: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25206: 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;
25207: hr_utility.set_location('After plsql table ',222);
25208: --
25209: -- 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 ) ;
25210: --
25211: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
25213: else
25214: --
25215: -- Call Update routine for the pk_id created in prev run .
25216: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25217: hr_utility.set_location(' BEN_OPTIP_F UPDATE_OPT_PLTYP_IN_PGM ',30);
25218: BEN_OPT_PLTYP_IN_PGM_API.UPDATE_OPT_PLTYP_IN_PGM(
25219: --
25220: P_VALIDATE => false
25221: ,P_EFFECTIVE_DATE => l_effective_date
25424: end if ;
25425: -- End Prefix Sufix derivation
25426: for r_PTY_unique in c_unique_PTY('PTY') loop
25427: --
25428: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25429: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25430: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25431: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25432: -- If reuse objects flag is 'Y' then check for the object in the target business group
25425: -- End Prefix Sufix derivation
25426: for r_PTY_unique in c_unique_PTY('PTY') loop
25427: --
25428: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25429: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25430: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25431: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25432: -- If reuse objects flag is 'Y' then check for the object in the target business group
25433: -- if found insert the record into PLSql table and exit the loop else try create the
25426: for r_PTY_unique in c_unique_PTY('PTY') loop
25427: --
25428: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25429: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25430: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25431: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25432: -- If reuse objects flag is 'Y' then check for the object in the target business group
25433: -- if found insert the record into PLSql table and exit the loop else try create the
25434: -- object in the target business group
25427: --
25428: hr_utility.set_location(' r_PTY_unique.table_route_id '||r_PTY_unique.table_route_id,10);
25429: hr_utility.set_location(' r_PTY_unique.information1 '||r_PTY_unique.information1,10);
25430: hr_utility.set_location( 'r_PTY_unique.information2 '||r_PTY_unique.information2,10);
25431: hr_utility.set_location( 'r_PTY_unique.information3 '||r_PTY_unique.information3,10);
25432: -- If reuse objects flag is 'Y' then check for the object in the target business group
25433: -- if found insert the record into PLSql table and exit the loop else try create the
25434: -- object in the target business group
25435: --
25486: --
25487: end if ;
25488: l_PL_PCP_TYP_ID := r_PTY_unique.information1 ;
25489: l_object_version_number := r_PTY.information265 ;
25490: hr_utility.set_location( 'found record for update',10);
25491: --
25492: else
25493: --
25494: --UPD END
25525:
25526: --
25527: l_current_pk_id := r_PTY.information1;
25528: --
25529: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25530: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25531: --
25532: if l_current_pk_id = l_prev_pk_id then
25533: --
25526: --
25527: l_current_pk_id := r_PTY.information1;
25528: --
25529: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25530: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25531: --
25532: if l_current_pk_id = l_prev_pk_id then
25533: --
25534: l_first_rec := false ;
25540: end if ;
25541: --
25542: if l_first_rec and not l_update then
25543: -- Call Create routine.
25544: hr_utility.set_location(' BEN_PL_PCP_TYP CREATE_PL_CARE_PRVDR_TYP ',20);
25545: BEN_PL_CARE_PRVDR_TYP_API.CREATE_PL_CARE_PRVDR_TYP(
25546: --
25547: P_VALIDATE => false
25548: ,P_EFFECTIVE_DATE => NVL(ben_pd_copy_to_ben_one.g_copy_effective_date ,p_effective_date)
25589: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
25590: );
25591: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25592: -- Update all relevent cer records with new pk_id
25593: hr_utility.set_location('Before plsql table ',222);
25594: hr_utility.set_location('new_value id '||l_pl_pcp_typ_id,222);
25595: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_TYP_ID' ;
25596: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PTY.information1 ;
25597: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_TYP_ID ;
25590: );
25591: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
25592: -- Update all relevent cer records with new pk_id
25593: hr_utility.set_location('Before plsql table ',222);
25594: hr_utility.set_location('new_value id '||l_pl_pcp_typ_id,222);
25595: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_PCP_TYP_ID' ;
25596: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PTY.information1 ;
25597: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_TYP_ID ;
25598: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25596: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PTY.information1 ;
25597: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_PCP_TYP_ID ;
25598: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
25599: 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;
25600: hr_utility.set_location('After plsql table ',222);
25601: --
25602: -- 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 ) ;
25603: --
25604: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
25808: r_PRP_unique.information3 >=
25809: ben_pd_copy_to_ben_one.g_copy_effective_date)
25810: ) then
25811: --
25812: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25813: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25814: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25815: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25816: -- If reuse objects flag is 'Y' then check for the object in the target business group
25809: ben_pd_copy_to_ben_one.g_copy_effective_date)
25810: ) then
25811: --
25812: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25813: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25814: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25815: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25816: -- If reuse objects flag is 'Y' then check for the object in the target business group
25817: -- if found insert the record into PLSql table and exit the loop else try create the
25810: ) then
25811: --
25812: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25813: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25814: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25815: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25816: -- If reuse objects flag is 'Y' then check for the object in the target business group
25817: -- if found insert the record into PLSql table and exit the loop else try create the
25818: -- object in the target business group
25811: --
25812: hr_utility.set_location(' r_PRP_unique.table_route_id '||r_PRP_unique.table_route_id,10);
25813: hr_utility.set_location(' r_PRP_unique.information1 '||r_PRP_unique.information1,10);
25814: hr_utility.set_location( 'r_PRP_unique.information2 '||r_PRP_unique.information2,10);
25815: hr_utility.set_location( 'r_PRP_unique.information3 '||r_PRP_unique.information3,10);
25816: -- If reuse objects flag is 'Y' then check for the object in the target business group
25817: -- if found insert the record into PLSql table and exit the loop else try create the
25818: -- object in the target business group
25819: --
25856: --
25857: --DOUBT log_data('PRP',l_new_value,l_prefix || r_PRP_unique.name|| l_suffix,'REUSED');
25858: --
25859: end if ;
25860: hr_utility.set_location( 'found record for update',10);
25861: --
25862: else
25863: --
25864: l_update := false;
25937: if not l_object_found_in_target OR l_update then
25938: --
25939: l_current_pk_id := r_PRP.information1;
25940: --
25941: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25942: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25943: --
25944: if l_current_pk_id = l_prev_pk_id then
25945: --
25938: --
25939: l_current_pk_id := r_PRP.information1;
25940: --
25941: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
25942: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
25943: --
25944: if l_current_pk_id = l_prev_pk_id then
25945: --
25946: l_first_rec := false ;
25959: end if;
25960:
25961: if l_first_rec and not l_update then
25962: -- Call Create routine.
25963: hr_utility.set_location(' BEN_PL_REGY_PRP_F CREATE_REGULATORY_PURPOSE ',20);
25964: BEN_REGULATORY_PURPOSE_API.CREATE_REGULATORY_PURPOSE(
25965: --
25966: P_VALIDATE => false
25967: ,P_EFFECTIVE_DATE => l_effective_date
26007: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
26008: );
26009: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26010: -- Update all relevent cer records with new pk_id
26011: hr_utility.set_location('Before plsql table ',222);
26012: hr_utility.set_location('new_value id '||l_pl_regy_prps_id,222);
26013: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGY_PRP_ID' ;
26014: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRP.information1 ;
26015: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_PRPS_ID ;
26008: );
26009: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26010: -- Update all relevent cer records with new pk_id
26011: hr_utility.set_location('Before plsql table ',222);
26012: hr_utility.set_location('new_value id '||l_pl_regy_prps_id,222);
26013: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'PL_REGY_PRP_ID' ;
26014: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRP.information1 ;
26015: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_PRPS_ID ;
26016: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26014: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_PRP.information1 ;
26015: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_PL_REGY_PRPS_ID ;
26016: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26017: 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;
26018: hr_utility.set_location('After plsql table ',222);
26019: --
26020: -- 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 ) ;
26021: --
26022: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
26024: else
26025: --
26026: -- Call Update routine for the pk_id created in prev run .
26027: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26028: hr_utility.set_location(' BEN_PL_REGY_PRP_F UPDATE_REGULATORY_PURPOSE ',30);
26029: --UPD START
26030: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26031: --
26032: if l_update then
26026: -- Call Update routine for the pk_id created in prev run .
26027: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26028: hr_utility.set_location(' BEN_PL_REGY_PRP_F UPDATE_REGULATORY_PURPOSE ',30);
26029: --UPD START
26030: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26031: --
26032: if l_update then
26033: --
26034: l_datetrack_mode := r_PRP.datetrack_mode ;
26046: l_object_version_number := r_PRP.information265;
26047: --
26048: end if;
26049: --
26050: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26051: --
26052: IF l_update OR l_dml_operation <> 'UPDATE' THEN
26053: --UPD END
26054: BEN_REGULATORY_PURPOSE_API.UPDATE_REGULATORY_PURPOSE(
26334: else
26335: l_prefix := null ;
26336: l_suffix := null ;
26337: end if ;
26338: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26339: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26340: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26341: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26342: -- If reuse objects flag is 'Y' then check for the object in the target business group
26335: l_prefix := null ;
26336: l_suffix := null ;
26337: end if ;
26338: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26339: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26340: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26341: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26342: -- If reuse objects flag is 'Y' then check for the object in the target business group
26343: -- if found insert the record into PLSql table and exit the loop else try create the
26336: l_suffix := null ;
26337: end if ;
26338: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26339: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26340: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26341: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26342: -- If reuse objects flag is 'Y' then check for the object in the target business group
26343: -- if found insert the record into PLSql table and exit the loop else try create the
26344: -- object in the target business group
26337: end if ;
26338: hr_utility.set_location(' r_BPP_unique.table_route_id '||r_BPP_unique.table_route_id,10);
26339: hr_utility.set_location(' r_BPP_unique.information1 '||r_BPP_unique.information1,10);
26340: hr_utility.set_location( 'r_BPP_unique.information2 '||r_BPP_unique.information2,10);
26341: hr_utility.set_location( 'r_BPP_unique.information3 '||r_BPP_unique.information3,10);
26342: -- If reuse objects flag is 'Y' then check for the object in the target business group
26343: -- if found insert the record into PLSql table and exit the loop else try create the
26344: -- object in the target business group
26345: --
26391: --
26392: --DOUBT log_data('BPP',l_new_value,l_prefix || r_BPP_unique.name|| l_suffix,'REUSED');
26393: --
26394: end if ;
26395: hr_utility.set_location( 'found record for update',10);
26396: --
26397: else
26398: --
26399: l_update := false;
26507: if not l_object_found_in_target OR l_update then
26508: --
26509: l_current_pk_id := r_BPP.information1;
26510: --
26511: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
26512: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
26513: --
26514: if l_current_pk_id = l_prev_pk_id then
26515: --
26508: --
26509: l_current_pk_id := r_BPP.information1;
26510: --
26511: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
26512: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
26513: --
26514: if l_current_pk_id = l_prev_pk_id then
26515: --
26516: l_first_rec := false ;
26532: end if;
26533:
26534: if l_first_rec and not l_update then
26535: -- Call Create routine.
26536: hr_utility.set_location(' BEN_BNFT_PRVDR_POOL_F CREATE_BENEFIT_PRVDR_POOL ',20);
26537: BEN_BENEFIT_PRVDR_POOL_API.CREATE_BENEFIT_PRVDR_POOL(
26538: --
26539: P_VALIDATE => false
26540: ,P_EFFECTIVE_DATE => l_effective_date
26611: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
26612: );
26613: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26614: -- Update all relevent cer records with new pk_id
26615: hr_utility.set_location('Before plsql table ',222);
26616: hr_utility.set_location('new_value id '||l_bnft_prvdr_pool_id,222);
26617: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'BNFT_PRVDR_POOL_ID' ;
26618: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BPP.information1 ;
26619: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_PRVDR_POOL_ID ;
26612: );
26613: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26614: -- Update all relevent cer records with new pk_id
26615: hr_utility.set_location('Before plsql table ',222);
26616: hr_utility.set_location('new_value id '||l_bnft_prvdr_pool_id,222);
26617: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).pk_id_column := 'BNFT_PRVDR_POOL_ID' ;
26618: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BPP.information1 ;
26619: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_PRVDR_POOL_ID ;
26620: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26618: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).old_value := r_BPP.information1 ;
26619: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).new_value := l_BNFT_PRVDR_POOL_ID ;
26620: BEN_PD_COPY_TO_BEN_ONE.g_pk_tbl(BEN_PD_COPY_TO_BEN_ONE.g_count).copy_reuse_type := 'COPIED';
26621: 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;
26622: hr_utility.set_location('After plsql table ',222);
26623: --
26624: -- 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 ) ;
26625: --
26626: BEN_PD_COPY_TO_BEN_ONE.g_count := BEN_PD_COPY_TO_BEN_ONE.g_count + 1 ;
26630: else
26631: --
26632: -- Call Update routine for the pk_id created in prev run .
26633: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26634: hr_utility.set_location(' BEN_BNFT_PRVDR_POOL_F UPDATE_BENEFIT_PRVDR_POOL ',30);
26635: --UPD START
26636: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26637: --
26638: if l_update then
26632: -- Call Update routine for the pk_id created in prev run .
26633: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
26634: hr_utility.set_location(' BEN_BNFT_PRVDR_POOL_F UPDATE_BENEFIT_PRVDR_POOL ',30);
26635: --UPD START
26636: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26637: --
26638: if l_update then
26639: --
26640: l_datetrack_mode := r_BPP.datetrack_mode ;
26652: l_object_version_number := r_BPP.information265;
26653: --
26654: end if;
26655: --
26656: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
26657: --
26658: IF l_update OR l_dml_operation <> 'UPDATE' THEN
26659: --UPD END
26660:
26910: r_ACP_unique.information3 >=
26911: ben_pd_copy_to_ben_one.g_copy_effective_date)
26912: ) then
26913: --
26914: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
26915: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
26916: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
26917: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
26918: -- If reuse objects flag is 'Y' then check for the object in the target business group
26911: ben_pd_copy_to_ben_one.g_copy_effective_date)
26912: ) then
26913: --
26914: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
26915: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
26916: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
26917: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
26918: -- If reuse objects flag is 'Y' then check for the object in the target business group
26919: -- if found insert the record into PLSql table and exit the loop else try create the
26912: ) then
26913: --
26914: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
26915: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
26916: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
26917: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
26918: -- If reuse objects flag is 'Y' then check for the object in the target business group
26919: -- if found insert the record into PLSql table and exit the loop else try create the
26920: -- object in the target business group
26913: --
26914: hr_utility.set_location(' r_ACP_unique.table_route_id '||r_ACP_unique.table_route_id,10);
26915: hr_utility.set_location(' r_ACP_unique.information1 '||r_ACP_unique.information1,10);
26916: hr_utility.set_location( 'r_ACP_unique.information2 '||r_ACP_unique.information2,10);
26917: hr_utility.set_location( 'r_ACP_unique.information3 '||r_ACP_unique.information3,10);
26918: -- If reuse objects flag is 'Y' then check for the object in the target business group
26919: -- if found insert the record into PLSql table and exit the loop else try create the
26920: -- object in the target business group
26921: --
26959: --
26960: --DOUBT log_data('ACP',l_new_value,l_prefix || r_ACP_unique.name|| l_suffix,'REUSED');
26961: --
26962: end if ;
26963: hr_utility.set_location( 'found record for update',10);
26964: --
26965: else
26966: --
26967: l_update := false;
27037: if not l_object_found_in_target OR l_update then
27038: --
27039: l_current_pk_id := r_ACP.information1;
27040: --
27041: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
27042: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
27043: --
27044: if l_current_pk_id = l_prev_pk_id then
27045: --
27038: --
27039: l_current_pk_id := r_ACP.information1;
27040: --
27041: hr_utility.set_location(' l_current_pk_id '||l_current_pk_id,20);
27042: hr_utility.set_location(' l_prev_pk_id '||l_prev_pk_id,20);
27043: --
27044: if l_current_pk_id = l_prev_pk_id then
27045: --
27046: l_first_rec := false ;
27061: end if;
27062:
27063: if l_first_rec and not l_update then
27064: -- Call Create routine.
27065: hr_utility.set_location(' BEN_ACRS_PTIP_CVG_F CREATE_ACRS_PTIP_CVG ',20);
27066: BEN_ACRS_PTIP_CVG_API.CREATE_ACRS_PTIP_CVG(
27067: --
27068: P_VALIDATE => false
27069: ,P_EFFECTIVE_DATE => l_effective_date
27111: ,P_OBJECT_VERSION_NUMBER => l_object_version_number
27112: );
27113: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27114: -- Update all relevent cer records with new pk_id
27115: hr_utility.set_location('Before plsql table ',222);
27116: hr_utility.set_location('new_value id '||l_acrs_ptip_cvg_id,222);
27117: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'ACRS_PTIP_CVG_ID' ;
27118: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_ACP.information1 ;
27119: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_ACRS_PTIP_CVG_ID ;
27112: );
27113: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27114: -- Update all relevent cer records with new pk_id
27115: hr_utility.set_location('Before plsql table ',222);
27116: hr_utility.set_location('new_value id '||l_acrs_ptip_cvg_id,222);
27117: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).pk_id_column := 'ACRS_PTIP_CVG_ID' ;
27118: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_ACP.information1 ;
27119: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_ACRS_PTIP_CVG_ID ;
27120: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
27118: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).old_value := r_ACP.information1 ;
27119: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).new_value := l_ACRS_PTIP_CVG_ID ;
27120: ben_pd_copy_to_ben_one.g_pk_tbl(ben_pd_copy_to_ben_one.g_count).copy_reuse_type := 'COPIED';
27121: 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;
27122: hr_utility.set_location('After plsql table ',222);
27123: --
27124: -- 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 ) ;
27125: --
27126: ben_pd_copy_to_ben_one.g_count := ben_pd_copy_to_ben_one.g_count + 1 ;
27129: else
27130: --
27131: -- Call Update routine for the pk_id created in prev run .
27132: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27133: hr_utility.set_location(' BEN_ACRS_PTIP_CVG_F UPDATE_ACRS_PTIP_CVG ',30);
27134: --UPD START
27135: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
27136: --
27137: if l_update then
27131: -- Call Update routine for the pk_id created in prev run .
27132: -- insert the table_name,old_pk_id,new_pk_id into a plsql record
27133: hr_utility.set_location(' BEN_ACRS_PTIP_CVG_F UPDATE_ACRS_PTIP_CVG ',30);
27134: --UPD START
27135: hr_utility.set_location('Before call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
27136: --
27137: if l_update then
27138: --
27139: l_datetrack_mode := r_ACP.datetrack_mode ;
27151: l_object_version_number := r_ACP.information265;
27152: --
27153: end if;
27154: --
27155: hr_utility.set_location('After call to get_dt_modes l_dt_mode'||l_datetrack_mode,5);
27156: --
27157: IF l_update OR l_dml_operation <> 'UPDATE' THEN
27158: --UPD END
27159: BEN_ACRS_PTIP_CVG_API.UPDATE_ACRS_PTIP_CVG(