DBA Data[Home] [Help]

APPS.BEN_ASSIGNMENT_INTERNAL dependencies on HR_UTILITY

Line 81: hr_utility.set_location('in address', 210);

77: ,c_conper_id => p_ctrper_id
78: );
79: fetch c_getctrdets into l_ctr_shdresflg, l_ctr_id, l_ctr_ovn;
80: close c_getctrdets;
81: hr_utility.set_location('in address', 210);
82: hr_utility.set_location('in p_benasg_effdate'||p_benasg_effdate, 210);
83: hr_utility.set_location('in p_empper_id'||p_empper_id, 210);
84: hr_utility.set_location('in p_ctrper_id'||p_ctrper_id, 210);
85: --

Line 82: hr_utility.set_location('in p_benasg_effdate'||p_benasg_effdate, 210);

78: );
79: fetch c_getctrdets into l_ctr_shdresflg, l_ctr_id, l_ctr_ovn;
80: close c_getctrdets;
81: hr_utility.set_location('in address', 210);
82: hr_utility.set_location('in p_benasg_effdate'||p_benasg_effdate, 210);
83: hr_utility.set_location('in p_empper_id'||p_empper_id, 210);
84: hr_utility.set_location('in p_ctrper_id'||p_ctrper_id, 210);
85: --
86: -- Check if a primary address already exists for the contact

Line 83: hr_utility.set_location('in p_empper_id'||p_empper_id, 210);

79: fetch c_getctrdets into l_ctr_shdresflg, l_ctr_id, l_ctr_ovn;
80: close c_getctrdets;
81: hr_utility.set_location('in address', 210);
82: hr_utility.set_location('in p_benasg_effdate'||p_benasg_effdate, 210);
83: hr_utility.set_location('in p_empper_id'||p_empper_id, 210);
84: hr_utility.set_location('in p_ctrper_id'||p_ctrper_id, 210);
85: --
86: -- Check if a primary address already exists for the contact
87: --

Line 84: hr_utility.set_location('in p_ctrper_id'||p_ctrper_id, 210);

80: close c_getctrdets;
81: hr_utility.set_location('in address', 210);
82: hr_utility.set_location('in p_benasg_effdate'||p_benasg_effdate, 210);
83: hr_utility.set_location('in p_empper_id'||p_empper_id, 210);
84: hr_utility.set_location('in p_ctrper_id'||p_ctrper_id, 210);
85: --
86: -- Check if a primary address already exists for the contact
87: --
88: open c_getpradddets

Line 95: hr_utility.set_location('Primary add not found', 210);

91: --
92: fetch c_getpradddets into l_add_dets;
93: if c_getpradddets%notfound then
94: close c_getpradddets;
95: hr_utility.set_location('Primary add not found', 210);
96: --
97: -- Get the primary address details for the employee
98: --
99: open c_getpradddets

Line 110: --hr_utility.set_location(l_proc, 220);

106: --
107: if c_getpradddets%found then
108: --
109: close c_getpradddets;
110: --hr_utility.set_location(l_proc, 220);
111: --
112: -- Create the primary address for the contact
113: --
114: if (l_ctr_shdresflg = 'Y' and not p_death and not p_divorce) then -- 5750408

Line 256: hr_utility.set_location('Entering: '||l_proc,10);

252: l_eed date;
253: --
254: begin
255: --
256: hr_utility.set_location('Entering: '||l_proc,10);
257: --
258: -- Test if a death occurred then we have to create frmr types, etc
259: --
260: if not p_death then

Line 316: hr_utility.set_location('Leaving: '||l_proc,10);

312: end if;
313: --
314: close c1;
315: --
316: hr_utility.set_location('Leaving: '||l_proc,10);
317: --
318: end check_second_event;
319:
320: -- ----------------------------------------------------------------------------

Line 366: hr_utility.set_location('Entering: '||l_proc,10);

362:
363:
364:
365: begin
366: hr_utility.set_location('Entering: '||l_proc,10);
367: p_type_exist := 'N' ;
368: open csr_valid_person_type(p_person_type_id);
369: fetch csr_valid_person_type into l_person_type , l_business_group_id;
370: if csr_valid_person_type%notfound then

Line 383: hr_utility.set_location('Leaving: '||l_proc,10);

379: if csr_check_uniqueness%found then
380: p_type_exist := 'Y' ;
381: end if;
382: close csr_check_uniqueness;
383: hr_utility.set_location('Leaving: '||l_proc,10);
384: end check_person_type ;
385: -- ----------------------------------------------------------------------------
386: -- |-------------------------< copy_empasg_to_benasg >------------------------|
387: -- ----------------------------------------------------------------------------

Line 772: hr_utility.set_location('Entering:'|| l_proc, 10);

768: l_chk_flag varchar2(1) default 'N';
769: --
770: --
771: begin
772: hr_utility.set_location('Entering:'|| l_proc, 10);
773: --
774: -- Check mandatory arguments
775: --
776: hr_api.mandatory_arg_error

Line 802: hr_utility.set_location ( ' ben_asg_status_flag ' || l_ben_asg_status_flag , 99 ) ;

798: fetch c_get_ben_asgdets into l_ben_asg_status_flag;
799: close c_get_ben_asgdets;
800:
801:
802: hr_utility.set_location ( ' ben_asg_status_flag ' || l_ben_asg_status_flag , 99 ) ;
803:
804: if NVL(l_ben_asg_status_flag,'N') not in ('Y','N')
805: then
806: return;

Line 823: hr_utility.set_location('Entering:'|| l_proc, 20);

819: or p_per_marital_status in ('D','L') and p_per_esd is not null
820: or p_dpnt_person_id is not null
821: or p_redu_hrs_flag = 'Y'
822: then
823: hr_utility.set_location('Entering:'|| l_proc, 20);
824: --
825: -- Get the business group details
826: --
827: /*

Line 840: hr_utility.set_message(801,'BEN_92112_NOBENASGEMP');

836: --
837: -- A benefits assignment cannot be created for the employee.
838: -- The employee does not exist.
839: --
840: hr_utility.set_message(801,'BEN_92112_NOBENASGEMP');
841: hr_utility.raise_error;
842: --
843: End If;
844: close c_getbgpdets;

Line 841: hr_utility.raise_error;

837: -- A benefits assignment cannot be created for the employee.
838: -- The employee does not exist.
839: --
840: hr_utility.set_message(801,'BEN_92112_NOBENASGEMP');
841: hr_utility.raise_error;
842: --
843: End If;
844: close c_getbgpdets;
845: */

Line 877: hr_utility.set_message(801,'BEN_92112_NOBENASGEMP');

873: close c_getbgpdets;
874: -- A benefits assignment cannot be created for the employee.
875: -- The employee does not exist.
876: --
877: hr_utility.set_message(801,'BEN_92112_NOBENASGEMP');
878: hr_utility.raise_error;
879: --
880: end if;
881: End If;

Line 878: hr_utility.raise_error;

874: -- A benefits assignment cannot be created for the employee.
875: -- The employee does not exist.
876: --
877: hr_utility.set_message(801,'BEN_92112_NOBENASGEMP');
878: hr_utility.raise_error;
879: --
880: end if;
881: End If;
882: close c_getbgpdets;

Line 883: hr_utility.set_location('Entering:'|| l_proc, 30);

879: --
880: end if;
881: End If;
882: close c_getbgpdets;
883: hr_utility.set_location('Entering:'|| l_proc, 30);
884: --
885: -- Check that the system person type is an employee related
886: -- person type
887: --

Line 900: hr_utility.set_location (' OTHER lc_effective_date ' || lc_effective_date , 991 );

896: --
897: --- If the contact is particpant then allow to create the ben asg for the dpnt # 2852514
898: --- the date -1 used that he might have losed the participation today the asg may be creadted
899: --- because of that
900: hr_utility.set_location (' OTHER lc_effective_date ' || lc_effective_date , 991 );
901: open c_getperptupetdets
902: (p_person_id
903: ,lc_effective_date -- Bug No 4451864 Removed -1 from lc_effective_date
904: ,'PRTN'

Line 908: hr_utility.set_location (' l_copybenasg TRUE ' , 991 );

904: ,'PRTN'
905: ) ;
906: fetch c_getperptupetdets into l_dummy ;
907: if c_getperptupetdets%found then
908: hr_utility.set_location (' l_copybenasg TRUE ' , 991 );
909: l_copybenasg := TRUE;
910: end if ;
911: close c_getperptupetdets ;
912:

Line 924: hr_utility.set_location('Entering:'|| l_proc, 40);

920: --
921: -- Check that OAB is installed in a US legislation
922: --
923: if l_copybenasg then
924: hr_utility.set_location('Entering:'|| l_proc, 40);
925: --
926: -- Deduce effective dates and determine if to create a benefits assignment for
927: -- the employee or the surviving spouse based on the event
928: --

Line 939: hr_utility.set_location(l_proc, 50);

935: -- - Date of death set on the person
936: --
937: if p_per_date_of_death is not null
938: then
939: hr_utility.set_location(l_proc, 50);
940: --
941: -- Death of an employee - date of death set
942: --
943: l_empasg_effdate := p_per_date_of_death;

Line 955: hr_utility.set_location('divorce '|| l_proc, 60);

951: --
952: elsif p_per_marital_status in ('D','L')
953: and p_per_esd is not null
954: then
955: hr_utility.set_location('divorce '|| l_proc, 60);
956: hr_utility.set_location('p_per_esd '|| p_per_esd, 60);
957: --
958: -- If the marital status has not changed, do not update or
959: -- create a benefits assignment.

Line 956: hr_utility.set_location('p_per_esd '|| p_per_esd, 60);

952: elsif p_per_marital_status in ('D','L')
953: and p_per_esd is not null
954: then
955: hr_utility.set_location('divorce '|| l_proc, 60);
956: hr_utility.set_location('p_per_esd '|| p_per_esd, 60);
957: --
958: -- If the marital status has not changed, do not update or
959: -- create a benefits assignment.
960: --

Line 964: hr_utility.set_location('l_prior_marital_status '|| l_prior_marital_status, 60);

960: --
961: open c_get_prior_marital_status;
962: fetch c_get_prior_marital_status into l_prior_marital_status;
963: if c_get_prior_marital_status%found then
964: hr_utility.set_location('l_prior_marital_status '|| l_prior_marital_status, 60);
965: hr_utility.set_location('p_per_marital_status '|| p_per_marital_status, 60);
966: if nvl(l_prior_marital_status,'NULL') <> p_per_marital_status then
967: hr_utility.set_location('create asg ', 60);
968: --

Line 965: hr_utility.set_location('p_per_marital_status '|| p_per_marital_status, 60);

961: open c_get_prior_marital_status;
962: fetch c_get_prior_marital_status into l_prior_marital_status;
963: if c_get_prior_marital_status%found then
964: hr_utility.set_location('l_prior_marital_status '|| l_prior_marital_status, 60);
965: hr_utility.set_location('p_per_marital_status '|| p_per_marital_status, 60);
966: if nvl(l_prior_marital_status,'NULL') <> p_per_marital_status then
967: hr_utility.set_location('create asg ', 60);
968: --
969: -- The benefit assignment and person type usage information

Line 967: hr_utility.set_location('create asg ', 60);

963: if c_get_prior_marital_status%found then
964: hr_utility.set_location('l_prior_marital_status '|| l_prior_marital_status, 60);
965: hr_utility.set_location('p_per_marital_status '|| p_per_marital_status, 60);
966: if nvl(l_prior_marital_status,'NULL') <> p_per_marital_status then
967: hr_utility.set_location('create asg ', 60);
968: --
969: -- The benefit assignment and person type usage information
970: -- are created on the day of the divorce or legal separation
971: --

Line 984: hr_utility.set_location('not found ', 60);

980: l_copybenasg := false;
981: end if;
982: --
983: else -- If prior marital status is not found
984: hr_utility.set_location('not found ', 60);
985: l_copybenasg := false;
986: end if;
987: --
988: close c_get_prior_marital_status;

Line 996: hr_utility.set_location(l_proc, 90);

992: --
993: elsif p_pds_atd is not null
994: and nvl(p_pds_leaving_reason,hr_api.g_varchar2) not in('D')
995: then
996: hr_utility.set_location(l_proc, 90);
997: --
998: -- Terminating an employee with leaving reason not deceased
999: --
1000: l_empasg_effdate := p_pds_atd;

Line 1011: hr_utility.set_location(l_proc, 100);

1007: --
1008: elsif p_pds_atd is not null
1009: and p_pds_leaving_reason = 'D'
1010: then
1011: hr_utility.set_location(l_proc, 100);
1012: --
1013: -- Terminating an employee with leaving reason deceased
1014: --
1015: l_empasg_effdate := p_pds_atd;

Line 1035: hr_utility.set_location(l_proc, 120);

1031: --
1032: -- Check if to copy the emp assignment to the benefits assignment
1033: --
1034: if l_copybenasg then
1035: hr_utility.set_location(l_proc, 120);
1036: --
1037: -- Get primary employee assignment details
1038: --
1039: open c_getempprasgdets(p_person_id,l_empasg_effdate);

Line 1051: hr_utility.set_location('Geting asg detail from prim asg', 120);

1047: if c_petprimasgdets%notfound then
1048: l_copybenasg := false ;
1049: end if;
1050: close c_petprimasgdets ;
1051: hr_utility.set_location('Geting asg detail from prim asg', 120);
1052: end if ;
1053:
1054: close c_getempprasgdets;
1055: hr_utility.set_location(l_proc, 130);

Line 1055: hr_utility.set_location(l_proc, 130);

1051: hr_utility.set_location('Geting asg detail from prim asg', 120);
1052: end if ;
1053:
1054: close c_getempprasgdets;
1055: hr_utility.set_location(l_proc, 130);
1056: --
1057: -- IS position still active?
1058: --
1059: --

Line 1096: hr_utility.set_location(l_proc, 140);

1092: then
1093: --
1094: -- Get spouse details without benefit assignments
1095: --
1096: hr_utility.set_location(l_proc, 140);
1097: hr_utility.set_location(l_proc||' l_ba_edate: '||l_benasg_effdate, 140);
1098: --
1099: l_per_id := null;
1100: l_ctr_contype := null;

Line 1097: hr_utility.set_location(l_proc||' l_ba_edate: '||l_benasg_effdate, 140);

1093: --
1094: -- Get spouse details without benefit assignments
1095: --
1096: hr_utility.set_location(l_proc, 140);
1097: hr_utility.set_location(l_proc||' l_ba_edate: '||l_benasg_effdate, 140);
1098: --
1099: l_per_id := null;
1100: l_ctr_contype := null;
1101: --

Line 1110: hr_utility.set_location(l_proc||' SPS l_per_id: '||l_per_id, 141);

1106: );
1107: fetch c_get_ss_fm_dets Into l_per_id, l_ctr_contype;
1108: close c_get_ss_fm_dets;
1109: --
1110: hr_utility.set_location(l_proc||' SPS l_per_id: '||l_per_id, 141);
1111: --
1112: l_plstab_count := 0;
1113: --
1114: If l_per_id is not null

Line 1140: hr_utility.set_location('count and type '||l_plstab_count||' '||l_ctr_contype,10);

1136: --
1137: if l_exists = false then
1138: l_perdetails_set(l_plstab_count).per_id := l_per_id;
1139: l_perdetails_set(l_plstab_count).contype := l_ctr_contype;
1140: hr_utility.set_location('count and type '||l_plstab_count||' '||l_ctr_contype,10);
1141: l_plstab_count := l_plstab_count+1;
1142:
1143:
1144: end if;

Line 1146: hr_utility.set_location('PL_STA AFTER SPS'||l_plstab_count,10);

1142:
1143:
1144: end if;
1145: --
1146: hr_utility.set_location('PL_STA AFTER SPS'||l_plstab_count,10);
1147: end if;
1148: --
1149: -- Domestic Partner.
1150: --

Line 1162: hr_utility.set_location(l_proc||' DP l_per_id: '||l_per_id, 141);

1158: );
1159: fetch c_get_ss_fm_dets Into l_per_id, l_ctr_contype;
1160: close c_get_ss_fm_dets;
1161: --
1162: hr_utility.set_location(l_proc||' DP l_per_id: '||l_per_id, 141);
1163: --
1164: -- tilak l_plstab_count := 0;
1165: --
1166: If l_per_id is not null

Line 1195: hr_utility.set_location('PL_STA AFTER SPS'||l_plstab_count,10);

1191: l_perdetails_set(l_plstab_count).contype := l_ctr_contype;
1192: l_plstab_count := l_plstab_count+1;
1193: end if;
1194: --
1195: hr_utility.set_location('PL_STA AFTER SPS'||l_plstab_count,10);
1196: end if;
1197: --
1198: -- Populate the family member person id set for Child, Foster Child
1199: -- Step Child and Adopted Child

Line 1201: hr_utility.set_location(l_proc||' Family Member: ', 140);

1197: --
1198: -- Populate the family member person id set for Child, Foster Child
1199: -- Step Child and Adopted Child
1200: --
1201: hr_utility.set_location(l_proc||' Family Member: ', 140);
1202: --
1203: -- Child
1204: --
1205: for per_id in c_get_ss_fm_dets

Line 1403: hr_utility.set_location(l_proc||' CON count: '||l_perdetails_set.count, 147);

1399: end if;
1400: --
1401: end loop;
1402: --
1403: hr_utility.set_location(l_proc||' CON count: '||l_perdetails_set.count, 147);
1404: if l_perdetails_set.count = 0 then
1405: --
1406: l_copybenasg := FALSE;
1407: --

Line 1415: hr_utility.set_location('l_contacts',147);

1411: --
1412: end if;
1413: --
1414: elsif l_contacts then
1415: hr_utility.set_location('l_contacts',147);
1416: --
1417: l_per_id := null;
1418: l_ctr_contype := null;
1419: --

Line 1426: hr_utility.set_location('p_dpnt_person_id: '||p_dpnt_person_id,147);

1422: -- Check if benefit assignment exist for dependent.
1423: -- in a loss of dependent status event.
1424: --
1425: if p_dpnt_person_id is not null then
1426: hr_utility.set_location('p_dpnt_person_id: '||p_dpnt_person_id,147);
1427: hr_utility.set_location('l_benasg_effdate: '||l_benasg_effdate,147);
1428: open c_get_contacts
1429: (c_person_id => p_person_id
1430: ,c_contact_person_id => p_dpnt_person_id

Line 1427: hr_utility.set_location('l_benasg_effdate: '||l_benasg_effdate,147);

1423: -- in a loss of dependent status event.
1424: --
1425: if p_dpnt_person_id is not null then
1426: hr_utility.set_location('p_dpnt_person_id: '||p_dpnt_person_id,147);
1427: hr_utility.set_location('l_benasg_effdate: '||l_benasg_effdate,147);
1428: open c_get_contacts
1429: (c_person_id => p_person_id
1430: ,c_contact_person_id => p_dpnt_person_id
1431: ,c_eff_date => l_benasg_effdate

Line 1570: hr_utility.set_location('benefit assignment exists', 150);

1566: ,p_exists => l_exists
1567: );
1568: --
1569: if l_exists = true then
1570: hr_utility.set_location('benefit assignment exists', 150);
1571: --
1572: l_copybenasg := FALSE;
1573: else
1574: l_perele_num := 0;

Line 1606: hr_utility.set_location(l_proc, 150);

1602: --
1603: end loop;
1604: --
1605: end if;
1606: hr_utility.set_location(l_proc, 150);
1607: --
1608: end if;
1609: --
1610: -- Create or refresh the benefits assignment

Line 1618: hr_utility.set_location(l_proc||'l_perid_set.count: '||l_perdetails_set.count, 155);

1614: then
1615: --
1616: -- Loop through the benefits assignment person id set
1617: --
1618: hr_utility.set_location(l_proc||'l_perid_set.count: '||l_perdetails_set.count, 155);
1619: if l_perdetails_set.count > 0 then
1620: --
1621: for l_plstab_count in l_perdetails_set.first .. l_perdetails_set.last
1622: loop

Line 1630: hr_utility.set_location(' person ' || p_person_id , 156 );

1626: -- this happen when the dpnd lose the coverage the dpnt's dpnt get the ben asg
1627: -- in thos situation validate the dpnt has the coverage 2852514
1628: l_dummy := null ;
1629:
1630: hr_utility.set_location(' person ' || p_person_id , 156 );
1631: hr_utility.set_location(' dpnt ' || l_perdetails_set(l_plstab_count).per_id , 156 );
1632: if l_perdetails_set(l_plstab_count).per_id <> p_person_id and l_perpet_spt = 'OTHER' then
1633: open c_dptn_cvg (l_perdetails_set(l_plstab_count).per_id , l_benasg_effdate-1 ) ;
1634: fetch c_dptn_cvg into l_dummy ;

Line 1631: hr_utility.set_location(' dpnt ' || l_perdetails_set(l_plstab_count).per_id , 156 );

1627: -- in thos situation validate the dpnt has the coverage 2852514
1628: l_dummy := null ;
1629:
1630: hr_utility.set_location(' person ' || p_person_id , 156 );
1631: hr_utility.set_location(' dpnt ' || l_perdetails_set(l_plstab_count).per_id , 156 );
1632: if l_perdetails_set(l_plstab_count).per_id <> p_person_id and l_perpet_spt = 'OTHER' then
1633: open c_dptn_cvg (l_perdetails_set(l_plstab_count).per_id , l_benasg_effdate-1 ) ;
1634: fetch c_dptn_cvg into l_dummy ;
1635: close c_dptn_cvg ;

Line 1637: hr_utility.set_location(' dpnt covered ' || l_dummy , 156 );

1633: open c_dptn_cvg (l_perdetails_set(l_plstab_count).per_id , l_benasg_effdate-1 ) ;
1634: fetch c_dptn_cvg into l_dummy ;
1635: close c_dptn_cvg ;
1636:
1637: hr_utility.set_location(' dpnt covered ' || l_dummy , 156 );
1638: hr_utility.set_location(' dpnt covered date ' || l_benasg_effdate,156 );
1639:
1640: end if ;
1641: --- allow to create be asg when the asg for the same person or

Line 1638: hr_utility.set_location(' dpnt covered date ' || l_benasg_effdate,156 );

1634: fetch c_dptn_cvg into l_dummy ;
1635: close c_dptn_cvg ;
1636:
1637: hr_utility.set_location(' dpnt covered ' || l_dummy , 156 );
1638: hr_utility.set_location(' dpnt covered date ' || l_benasg_effdate,156 );
1639:
1640: end if ;
1641: --- allow to create be asg when the asg for the same person or
1642: --- person system type is not other or dpnt has the current covrage

Line 1644: hr_utility.set_location(' person sys type ' || l_perpet_spt , 156 );

1640: end if ;
1641: --- allow to create be asg when the asg for the same person or
1642: --- person system type is not other or dpnt has the current covrage
1643: --- # 2852514
1644: hr_utility.set_location(' person sys type ' || l_perpet_spt , 156 );
1645:
1646: if l_perdetails_set(l_plstab_count).per_id = p_person_id
1647: or l_perpet_spt not in ('OTHER') or l_dummy is not null then
1648:

Line 1672: hr_utility.set_location(' type and count ' || l_plstab_count || l_perdetails_set(l_plstab_count).contype, 151 );

1668: -- By pass creating a person type usage for a loss
1669: -- of dependent status and Reduction of Hours event.
1670: --
1671: if l_contacts = FALSE then
1672: hr_utility.set_location(' type and count ' || l_plstab_count || l_perdetails_set(l_plstab_count).contype, 151 );
1673: --
1674: hr_utility.set_location(l_proc||' Spouse Fammem: ', 155);
1675: --
1676: -- Create the person type usage

Line 1674: hr_utility.set_location(l_proc||' Spouse Fammem: ', 155);

1670: --
1671: if l_contacts = FALSE then
1672: hr_utility.set_location(' type and count ' || l_plstab_count || l_perdetails_set(l_plstab_count).contype, 151 );
1673: --
1674: hr_utility.set_location(l_proc||' Spouse Fammem: ', 155);
1675: --
1676: -- Create the person type usage
1677: --
1678: if l_death

Line 1682: hr_utility.set_location(l_proc, 160);

1678: if l_death
1679: and l_perdetails_set(l_plstab_count).contype in ('S','D')
1680: then
1681: --
1682: hr_utility.set_location(l_proc, 160);
1683: if l_perdetails_set(l_plstab_count).contype = 'S' then
1684: l_pet_spt := 'SRVNG_SPS';
1685: else
1686: l_pet_spt := 'SRVNG_DP';

Line 1693: hr_utility.set_location(l_proc, 170);

1689: elsif l_divorce
1690: and l_perdetails_set(l_plstab_count).contype = 'S'
1691: then
1692: --
1693: hr_utility.set_location(l_proc, 170);
1694: l_pet_spt := 'FRMR_SPS';
1695: --
1696: hr_utility.set_location('FRMR_SPS :' || l_proc, 172);
1697: elsif l_divorce

Line 1696: hr_utility.set_location('FRMR_SPS :' || l_proc, 172);

1692: --
1693: hr_utility.set_location(l_proc, 170);
1694: l_pet_spt := 'FRMR_SPS';
1695: --
1696: hr_utility.set_location('FRMR_SPS :' || l_proc, 172);
1697: elsif l_divorce
1698: and l_perdetails_set(l_plstab_count).contype = 'D'
1699: then
1700: --

Line 1701: hr_utility.set_location('FRMR_DP :' || l_proc, 175);

1697: elsif l_divorce
1698: and l_perdetails_set(l_plstab_count).contype = 'D'
1699: then
1700: --
1701: hr_utility.set_location('FRMR_DP :' || l_proc, 175);
1702: l_pet_spt := 'FRMR_DP';
1703:
1704: elsif l_death
1705: and l_perdetails_set(l_plstab_count).contype in ('C','O','T','A','R')

Line 1708: hr_utility.set_location(l_proc, 180);

1704: elsif l_death
1705: and l_perdetails_set(l_plstab_count).contype in ('C','O','T','A','R')
1706: then
1707: --
1708: hr_utility.set_location(l_proc, 180);
1709: if l_perdetails_set(l_plstab_count).contype = 'R' then
1710: l_pet_spt := 'SRVNG_DPFM';
1711: else
1712: l_pet_spt := 'SRVNG_FMLY_MMBR';

Line 1719: hr_utility.set_location(l_proc, 180);

1715: elsif l_divorce
1716: and l_perdetails_set(l_plstab_count).contype in ('C','O','T','A','R') -- Bug 7594105: Added 'R' to the list
1717: then
1718: --
1719: hr_utility.set_location(l_proc, 180);
1720: l_pet_spt := 'FRMR_FMLY_MMBR';
1721: --
1722: end if;
1723: --

Line 1726: hr_utility.set_location('l_pet_spt: '||l_pet_spt||' '||l_proc, 185);

1722: end if;
1723: --
1724: -- Get the default person type id for the PET system person type
1725: --
1726: hr_utility.set_location('l_pet_spt: '||l_pet_spt||' '||l_proc, 185);
1727: hr_utility.set_location('l_bgp_id: '||l_bgp_id||' '||l_proc, 185);
1728: open c_getbgpdefpet
1729: (c_bgp_id => l_bgp_id
1730: ,c_pet_spt => l_pet_spt

Line 1727: hr_utility.set_location('l_bgp_id: '||l_bgp_id||' '||l_proc, 185);

1723: --
1724: -- Get the default person type id for the PET system person type
1725: --
1726: hr_utility.set_location('l_pet_spt: '||l_pet_spt||' '||l_proc, 185);
1727: hr_utility.set_location('l_bgp_id: '||l_bgp_id||' '||l_proc, 185);
1728: open c_getbgpdefpet
1729: (c_bgp_id => l_bgp_id
1730: ,c_pet_spt => l_pet_spt
1731: );

Line 1741: hr_utility.set_message(801,'BEN_92113_NOPTUBGPPET');

1737: -- A person type usage cannot be created for the person when
1738: -- creating the benefits assignment. The person type of the usage
1739: -- does not exist for the business group.
1740: --
1741: hr_utility.set_message(801,'BEN_92113_NOPTUBGPPET');
1742: hr_utility.raise_error;
1743: --
1744: end if;
1745: close c_getbgpdefpet;

Line 1742: hr_utility.raise_error;

1738: -- creating the benefits assignment. The person type of the usage
1739: -- does not exist for the business group.
1740: --
1741: hr_utility.set_message(801,'BEN_92113_NOPTUBGPPET');
1742: hr_utility.raise_error;
1743: --
1744: end if;
1745: close c_getbgpdefpet;
1746: hr_utility.set_location(l_proc, 190);

Line 1746: hr_utility.set_location(l_proc, 190);

1742: hr_utility.raise_error;
1743: --
1744: end if;
1745: close c_getbgpdefpet;
1746: hr_utility.set_location(l_proc, 190);
1747:
1748:
1749: -- added by tilak bug : 2188986
1750: -- if the person_type exist dont create that again

Line 1759: hr_utility.set_location(' type exist '|| l_type_exist , 199);

1755: ,p_person_id => l_perdetails_set(l_plstab_count).per_id
1756: ,p_effective_date => l_benasg_effdate
1757: ,p_person_type_usage_id => l_ptu_id
1758: ,p_type_exist => l_type_exist ) ;
1759: hr_utility.set_location(' type exist '|| l_type_exist , 199);
1760: --
1761: if l_type_exist = 'N' then
1762: hr_per_type_usage_internal.create_person_type_usage
1763: (p_person_id => l_perdetails_set(l_plstab_count).per_id

Line 1774: hr_utility.set_location(l_proc, 200);

1770: ,p_effective_end_date => l_eed
1771: );
1772: end if ;
1773: end if;
1774: hr_utility.set_location(l_proc, 200);
1775: --
1776: -- Copy employee primary address to the spouse/family member
1777: -- contact primary address
1778: --

Line 1806: hr_utility.set_location(l_proc, 210);

1802: ,p_absence_type => l_abs_type
1803: ,p_absence_reason => l_abs_reason
1804: ,p_date_of_hire => l_date_of_hire
1805: );
1806: hr_utility.set_location(l_proc, 210);
1807: --
1808: -- Derive the PTU SPT for the employee as of the event
1809: --
1810: l_count := 0;

Line 1815: hr_utility.set_location('system_person_type ' || c_inst.system_person_type, 220);

1811: for c_inst in c_getperptupetdets(p_person_id,l_asg_dets.effective_start_date) loop
1812: --
1813: l_ptupetspt_set(l_count) := c_inst.system_person_type;
1814: l_count := l_count+1;
1815: hr_utility.set_location('system_person_type ' || c_inst.system_person_type, 220);
1816: --
1817: end loop;
1818: hr_utility.set_location(l_proc, 220);
1819: --

Line 1818: hr_utility.set_location(l_proc, 220);

1814: l_count := l_count+1;
1815: hr_utility.set_location('system_person_type ' || c_inst.system_person_type, 220);
1816: --
1817: end loop;
1818: hr_utility.set_location(l_proc, 220);
1819: --
1820: -- Get the base system person type from the PTU system person type set
1821: -- for the person
1822: --

Line 1952: hr_utility.set_location(l_proc, 220);

1948: ,p_assignment_extra_info_id => l_number_dummy1
1949: ,p_aei_object_version_number => l_number_dummy2
1950: );
1951: end if ; ----Bug 9170856
1952: hr_utility.set_location(l_proc, 220);
1953: --
1954: end if ;
1955: end loop;
1956: --

Line 1965: hr_utility.set_location(' Leaving:'||l_proc, 300);

1961: end if;
1962: --
1963: end if;
1964: --
1965: hr_utility.set_location(' Leaving:'||l_proc, 300);
1966: end copy_empasg_to_benasg;
1967: --
1968: -- ----------------------------------------------------------------------------
1969: -- |-------------------------< check_bnft_asgn >------------------------------|

Line 2043: hr_utility.set_location(' Entering:'||l_proc, 100);

2039:
2040: l_flag varchar2(1);
2041: --
2042: BEGIN
2043: hr_utility.set_location(' Entering:'||l_proc, 100);
2044: hr_utility.set_location(' p_person_id:'||p_person_id, 100);
2045: hr_utility.set_location(' p_emp_person_id:'||p_emp_person_id, 100);
2046: hr_utility.set_location(' p_effective_date:'||p_effective_date, 100);
2047: --

Line 2044: hr_utility.set_location(' p_person_id:'||p_person_id, 100);

2040: l_flag varchar2(1);
2041: --
2042: BEGIN
2043: hr_utility.set_location(' Entering:'||l_proc, 100);
2044: hr_utility.set_location(' p_person_id:'||p_person_id, 100);
2045: hr_utility.set_location(' p_emp_person_id:'||p_emp_person_id, 100);
2046: hr_utility.set_location(' p_effective_date:'||p_effective_date, 100);
2047: --
2048: -- Check if benefit assignment exist.

Line 2045: hr_utility.set_location(' p_emp_person_id:'||p_emp_person_id, 100);

2041: --
2042: BEGIN
2043: hr_utility.set_location(' Entering:'||l_proc, 100);
2044: hr_utility.set_location(' p_person_id:'||p_person_id, 100);
2045: hr_utility.set_location(' p_emp_person_id:'||p_emp_person_id, 100);
2046: hr_utility.set_location(' p_effective_date:'||p_effective_date, 100);
2047: --
2048: -- Check if benefit assignment exist.
2049: --

Line 2046: hr_utility.set_location(' p_effective_date:'||p_effective_date, 100);

2042: BEGIN
2043: hr_utility.set_location(' Entering:'||l_proc, 100);
2044: hr_utility.set_location(' p_person_id:'||p_person_id, 100);
2045: hr_utility.set_location(' p_emp_person_id:'||p_emp_person_id, 100);
2046: hr_utility.set_location(' p_effective_date:'||p_effective_date, 100);
2047: --
2048: -- Check if benefit assignment exist.
2049: --
2050: open c_getbenasgdets;

Line 2062: hr_utility.set_location('Leaving :' || l_proc, 100);

2058: -- employee assignment is not found then simply return.
2059: --
2060: if p_asg_dets.assignment_id is null
2061: then
2062: hr_utility.set_location('Leaving :' || l_proc, 100);
2063: return;
2064: end if;
2065: hr_utility.set_location(' exist ben asg :'||l_asg_rec.effective_start_date ||'-'||p_effective_date, 100);
2066:

Line 2065: hr_utility.set_location(' exist ben asg :'||l_asg_rec.effective_start_date ||'-'||p_effective_date, 100);

2061: then
2062: hr_utility.set_location('Leaving :' || l_proc, 100);
2063: return;
2064: end if;
2065: hr_utility.set_location(' exist ben asg :'||l_asg_rec.effective_start_date ||'-'||p_effective_date, 100);
2066:
2067:
2068: /*Bug 9744453:While updating benefits assignment, check whether address record exits for the dependent as
2069: of update date. If there exists no address record, then create one.*/

Line 2150: hr_utility.set_location(' updating assignment:', 100);

2146: l_special_ceiling_step_id := p_asg_dets.special_ceiling_step_id;
2147: --
2148: -- Update the benefits assignment
2149: --
2150: hr_utility.set_location(' updating assignment:', 100);
2151: ben_assignment_api.update_ben_asg
2152: (p_validate => FALSE
2153: ,p_effective_date => p_effective_date
2154: ,p_datetrack_update_mode => l_datetrack_mode

Line 2241: hr_utility.set_location(' Leaving:'||l_proc, 100);

2237: else
2238: close c_getbenasgdets;
2239: p_exists := false;
2240: end if;
2241: hr_utility.set_location(' Leaving:'||l_proc, 100);
2242: end check_bnft_asgn;
2243: --
2244: -- ----------------------------------------------------------------------------
2245: -- |-------------------------< derive_aei_information >-----------------------|

Line 2334: hr_utility.set_location('Entering:'|| l_proc, 10);

2330: and nvl(pyp.change_date,hr_api.g_sot) <= c_eff_date
2331: order by pyp.change_date desc;
2332: --
2333: begin
2334: hr_utility.set_location('Entering:'|| l_proc, 10);
2335: hr_utility.set_location('p_person_id '||p_person_id, 300);
2336: hr_utility.set_location('p_effective_date '||p_effective_date, 300);
2337: --
2338: -- Check mandatory arguments

Line 2335: hr_utility.set_location('p_person_id '||p_person_id, 300);

2331: order by pyp.change_date desc;
2332: --
2333: begin
2334: hr_utility.set_location('Entering:'|| l_proc, 10);
2335: hr_utility.set_location('p_person_id '||p_person_id, 300);
2336: hr_utility.set_location('p_effective_date '||p_effective_date, 300);
2337: --
2338: -- Check mandatory arguments
2339: --

Line 2336: hr_utility.set_location('p_effective_date '||p_effective_date, 300);

2332: --
2333: begin
2334: hr_utility.set_location('Entering:'|| l_proc, 10);
2335: hr_utility.set_location('p_person_id '||p_person_id, 300);
2336: hr_utility.set_location('p_effective_date '||p_effective_date, 300);
2337: --
2338: -- Check mandatory arguments
2339: --
2340: hr_api.mandatory_arg_error

Line 2355: hr_utility.set_location('p_per_id: '||p_person_id||' '||l_proc, 20);

2351: --
2352: -- Get the date of birth, adjusted service date,trmination date,reason and
2353: -- original hire date of the employee
2354: --
2355: hr_utility.set_location('p_per_id: '||p_person_id||' '||l_proc, 20);
2356: hr_utility.set_location('p_eff_date: '||p_effective_date||' '||l_proc, 20);
2357: open c_getempdtperdets
2358: (c_person_id => p_person_id
2359: ,c_eff_date => p_effective_date

Line 2356: hr_utility.set_location('p_eff_date: '||p_effective_date||' '||l_proc, 20);

2352: -- Get the date of birth, adjusted service date,trmination date,reason and
2353: -- original hire date of the employee
2354: --
2355: hr_utility.set_location('p_per_id: '||p_person_id||' '||l_proc, 20);
2356: hr_utility.set_location('p_eff_date: '||p_effective_date||' '||l_proc, 20);
2357: open c_getempdtperdets
2358: (c_person_id => p_person_id
2359: ,c_eff_date => p_effective_date
2360: );

Line 2408: hr_utility.set_location(' Leaving:'||l_proc, 100);

2404: p_absence_type := l_abs_type;
2405: p_absence_reason := l_abs_reason;
2406: p_date_of_hire := l_emp_doh;
2407: --
2408: hr_utility.set_location(' Leaving:'||l_proc, 100);
2409: end derive_aei_information;
2410: --
2411: end ben_assignment_internal;