DBA Data[Home] [Help]

APPS.BEN_PRC_BUS dependencies on BEN_PRC_SHD

Line 49: l_api_updating := ben_prc_shd.api_updating

45: Begin
46: --
47: hr_utility.set_location('Entering:'||l_proc, 5);
48: --
49: l_api_updating := ben_prc_shd.api_updating
50: (p_effective_date => p_effective_date,
51: p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
52: p_object_version_number => p_object_version_number);
53: --

Line 56: <> ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id) then

52: p_object_version_number => p_object_version_number);
53: --
54: if (l_api_updating
55: and nvl(p_prtt_reimbmt_rqst_id,hr_api.g_number)
56: <> ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id) then
57: --
58: -- raise error as PK has changed
59: --
60: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_PK');

Line 60: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_PK');

56: <> ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id) then
57: --
58: -- raise error as PK has changed
59: --
60: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_PK');
61: --
62: elsif not l_api_updating then
63: --
64: -- check if PK is null

Line 70: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_PK');

66: if p_prtt_reimbmt_rqst_id is not null then
67: --
68: -- raise error as PK is not null
69: --
70: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_PK');
71: --
72: end if;
73: --
74: end if;

Line 469: l_api_updating := ben_prc_shd.api_updating

465: Begin
466: --
467: hr_utility.set_location('Entering:'||l_proc,5);
468: --
469: l_api_updating := ben_prc_shd.api_updating
470: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
471: p_effective_date => p_effective_date,
472: p_object_version_number => p_object_version_number);
473: --

Line 476: <> nvl(ben_prc_shd.g_old_rec.gd_or_svc_typ_id,hr_api.g_number)

472: p_object_version_number => p_object_version_number);
473: --
474: if (l_api_updating
475: and nvl(p_gd_or_svc_typ_id,hr_api.g_number)
476: <> nvl(ben_prc_shd.g_old_rec.gd_or_svc_typ_id,hr_api.g_number)
477: or not l_api_updating) and
478: p_gd_or_svc_typ_id is not null then
479: --
480: -- check if gd_or_svc_typ_id value exists in ben_gd_or_svc_typ table

Line 492: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_FK1');

488: --
489: -- raise error as FK does not relate to PK in ben_gd_or_svc_typ
490: -- table.
491: --
492: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_FK1');
493: --
494: end if;
495: --
496: close c1;

Line 557: l_api_updating := ben_prc_shd.api_updating

553: Begin
554: --
555: hr_utility.set_location('Entering:'||l_proc,5);
556: --
557: l_api_updating := ben_prc_shd.api_updating
558: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
559: p_effective_date => p_effective_date,
560: p_object_version_number => p_object_version_number);
561: --

Line 564: <> nvl(ben_prc_shd.g_old_rec.provider_person_id,hr_api.g_number)

560: p_object_version_number => p_object_version_number);
561: --
562: if (l_api_updating
563: and nvl(p_provider_person_id,hr_api.g_number)
564: <> nvl(ben_prc_shd.g_old_rec.provider_person_id,hr_api.g_number)
565: or not l_api_updating) and
566: p_provider_person_id is not null then
567: --
568: -- check if provider_person_id value exists in hr_all_organization_units table

Line 586: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_DT6');

582: --
583: -- raise error as FK does not relate to PK in hr_all_organization_units
584: -- table or PER_ALL_PEOPLE_F table.
585: --
586: ben_prc_shd.constraint_error('BEN_PRTT_REIMBMT_RQST_F_DT6');
587: --
588: end if;
589: --
590: close c2;

Line 640: l_api_updating := ben_prc_shd.api_updating

636: Begin
637: --
638: hr_utility.set_location('Entering:'||l_proc, 5);
639: --
640: l_api_updating := ben_prc_shd.api_updating
641: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
642: p_effective_date => p_effective_date,
643: p_object_version_number => p_object_version_number);
644: --

Line 647: <> nvl(ben_prc_shd.g_old_rec.rcrrg_cd,hr_api.g_varchar2)

643: p_object_version_number => p_object_version_number);
644: --
645: if (l_api_updating
646: and p_rcrrg_cd
647: <> nvl(ben_prc_shd.g_old_rec.rcrrg_cd,hr_api.g_varchar2)
648: or not l_api_updating)
649: and p_rcrrg_cd is not null then
650: --
651: -- check if value of lookup falls within lookup type.

Line 713: l_api_updating := ben_prc_shd.api_updating

709: Begin
710: --
711: hr_utility.set_location('Entering:'||l_proc, 5);
712: --
713: l_api_updating := ben_prc_shd.api_updating
714: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
715: p_effective_date => p_effective_date,
716: p_object_version_number => p_object_version_number);
717: --

Line 720: <> nvl(ben_prc_shd.g_old_rec.reimbmt_ctfn_typ_prvdd_cd,hr_api.g_varchar2)

716: p_object_version_number => p_object_version_number);
717: --
718: if (l_api_updating
719: and p_reimbmt_ctfn_typ_prvdd_cd
720: <> nvl(ben_prc_shd.g_old_rec.reimbmt_ctfn_typ_prvdd_cd,hr_api.g_varchar2)
721: or not l_api_updating)
722: and p_reimbmt_ctfn_typ_prvdd_cd is not null then
723: --
724: -- check if value of lookup falls within lookup type.

Line 837: l_api_updating := ben_prc_shd.api_updating

833: --
834: hr_utility.set_location('Entering:'||l_proc, 5);
835: --
836:
837: l_api_updating := ben_prc_shd.api_updating
838: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
839: p_effective_date => p_effective_date,
840: p_object_version_number => p_object_version_number);
841: --

Line 844: <> nvl(ben_prc_shd.g_old_rec.stat_rsn_cd,hr_api.g_varchar2)

840: p_object_version_number => p_object_version_number);
841: --
842: if (l_api_updating
843: and p_stat_rsn_cd
844: <> nvl(ben_prc_shd.g_old_rec.stat_rsn_cd,hr_api.g_varchar2)
845: or not l_api_updating)
846: and p_stat_rsn_cd is not null then
847: --
848: -- check if value of lookup falls within lookup type.

Line 892: l_api_updating := ben_prc_shd.api_updating

888: --
889: hr_utility.set_location('Entering:'||l_proc, 5);
890: --
891:
892: l_api_updating := ben_prc_shd.api_updating
893: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
894: p_effective_date => p_effective_date,
895: p_object_version_number => p_object_version_number);
896: --

Line 899: <> nvl(ben_prc_shd.g_old_rec.pymt_stat_rsn_cd,hr_api.g_varchar2)

895: p_object_version_number => p_object_version_number);
896: --
897: if (l_api_updating
898: and p_pymt_stat_rsn_cd
899: <> nvl(ben_prc_shd.g_old_rec.pymt_stat_rsn_cd,hr_api.g_varchar2)
900: or not l_api_updating)
901: and p_pymt_stat_rsn_cd is not null then
902: --
903: -- check if value of lookup falls within lookup type.

Line 946: l_api_updating := ben_prc_shd.api_updating

942: --
943: hr_utility.set_location('Entering:'||l_proc, 5);
944: --
945:
946: l_api_updating := ben_prc_shd.api_updating
947: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
948: p_effective_date => p_effective_date,
949: p_object_version_number => p_object_version_number);
950: --

Line 953: <> nvl(ben_prc_shd.g_old_rec.pymt_stat_cd,hr_api.g_varchar2)

949: p_object_version_number => p_object_version_number);
950: --
951: if (l_api_updating
952: and p_pymt_stat_cd
953: <> nvl(ben_prc_shd.g_old_rec.pymt_stat_cd,hr_api.g_varchar2)
954: or not l_api_updating)
955: and p_pymt_stat_cd is not null then
956: --
957: -- check if value of lookup falls within lookup type.

Line 1023: l_api_updating := ben_prc_shd.api_updating

1019: --
1020: hr_utility.set_location('Entering:'||l_proc, 5);
1021: --
1022:
1023: l_api_updating := ben_prc_shd.api_updating
1024: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
1025: p_effective_date => p_effective_date,
1026: p_object_version_number => p_object_version_number);
1027: --

Line 1042: and ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd in ('APPRVD','PDINFL','PRTLYPD')

1038: -- Now we should throw error only if user tries to change from one Approved status to another
1039: -- Approved status. Hence modified the if condn below.
1040: --
1041: if l_api_updating -- added l_api_updating to perform the check only when updating
1042: and ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd in ('APPRVD','PDINFL','PRTLYPD')
1043: and p_prtt_reimbmt_rqst_stat_cd in ('APPRVD','PDINFL','PRTLYPD') then
1044: --
1045: fnd_message.set_name('BEN','BEN_92705_REIMB_RQST_APPROVD');
1046: fnd_message.raise_error;

Line 1058: if l_api_updating and ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd = 'VOIDED' then

1054: -- But, since no payment is made for a voided claim,
1055: -- presence of voided claims shud not prevent back-out of a life event.
1056: --
1057: ----Once voiced rquest is not allowd to be cahnged
1058: if l_api_updating and ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd = 'VOIDED' then
1059: fnd_message.set_name('BEN','BEN_92708_REIMB_RQST_VOIDED');
1060: fnd_message.raise_error;
1061: end if ;
1062:

Line 1065: <> nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd,hr_api.g_varchar2)

1061: end if ;
1062:
1063: if (l_api_updating
1064: and p_prtt_reimbmt_rqst_stat_cd
1065: <> nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd,hr_api.g_varchar2)
1066: or not l_api_updating)
1067: and p_prtt_reimbmt_rqst_stat_cd is not null then
1068: --
1069: -- check if value of lookup falls within lookup type.

Line 1206: l_api_updating := ben_prc_shd.api_updating

1202: Begin
1203: --
1204: hr_utility.set_location('Entering:'||l_proc, 5);
1205: --
1206: l_api_updating := ben_prc_shd.api_updating
1207: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
1208: p_effective_date => p_effective_date,
1209: p_object_version_number => p_object_version_number);
1210: --

Line 1217: <> nvl(ben_prc_shd.g_old_rec.rqst_amt_uom,hr_api.g_varchar2)

1213:
1214: -- Check the UOM value
1215: if (l_api_updating
1216: and p_rqst_amt_uom
1217: <> nvl(ben_prc_shd.g_old_rec.rqst_amt_uom,hr_api.g_varchar2)
1218: or not l_api_updating)
1219: and p_rqst_amt_uom is not null then
1220: --
1221: -- check if value of lookup falls within lookup type.

Line 1279: -- <> nvl(ben_prc_shd.g_old_rec.rqst_amt,hr_api.g_number)

1275: -- not sufficient then the status is changed but in case of balance
1276: --- payment status is changed
1277: --if (l_api_updating
1278: -- and p_rqst_amt
1279: -- <> nvl(ben_prc_shd.g_old_rec.rqst_amt,hr_api.g_number)
1280: -- or not l_api_updating)
1281: -- and p_rqst_amt is not null then
1282:
1283: -- if the plan's CMPR_CLMS_TO_CVG_OR_BAL_CD is cvg, the amt

Line 1860: l_api_updating := ben_prc_shd.api_updating

1856: Begin
1857: --
1858: hr_utility.set_location('Entering:'||l_proc,5);
1859: --
1860: l_api_updating := ben_prc_shd.api_updating
1861: (p_prtt_reimbmt_rqst_id => p_prtt_reimbmt_rqst_id,
1862: p_effective_date => p_effective_date,
1863: p_object_version_number => p_object_version_number);
1864: --

Line 1867: <> nvl(ben_prc_shd.g_old_rec.incrd_from_dt, hr_api.g_date)

1863: p_object_version_number => p_object_version_number);
1864: --
1865: if ((l_api_updating
1866: and (nvl(p_incrd_from_dt, hr_api.g_date)
1867: <> nvl(ben_prc_shd.g_old_rec.incrd_from_dt, hr_api.g_date)
1868: or nvl(p_incrd_to_dt, hr_api.g_date)
1869: <> nvl(ben_prc_shd.g_old_rec.incrd_to_dt, hr_api.g_date)
1870: or nvl(p_exp_incurd_dt, hr_api.g_date)
1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)

Line 1869: <> nvl(ben_prc_shd.g_old_rec.incrd_to_dt, hr_api.g_date)

1865: if ((l_api_updating
1866: and (nvl(p_incrd_from_dt, hr_api.g_date)
1867: <> nvl(ben_prc_shd.g_old_rec.incrd_from_dt, hr_api.g_date)
1868: or nvl(p_incrd_to_dt, hr_api.g_date)
1869: <> nvl(ben_prc_shd.g_old_rec.incrd_to_dt, hr_api.g_date)
1870: or nvl(p_exp_incurd_dt, hr_api.g_date)
1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)
1872: or nvl(p_rqst_amt,0) <> nvl(ben_prc_shd.g_old_rec.rqst_amt,0)
1873: or nvl(p_prtt_reimbmt_rqst_stat_cd ,'-1')<>

Line 1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)

1867: <> nvl(ben_prc_shd.g_old_rec.incrd_from_dt, hr_api.g_date)
1868: or nvl(p_incrd_to_dt, hr_api.g_date)
1869: <> nvl(ben_prc_shd.g_old_rec.incrd_to_dt, hr_api.g_date)
1870: or nvl(p_exp_incurd_dt, hr_api.g_date)
1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)
1872: or nvl(p_rqst_amt,0) <> nvl(ben_prc_shd.g_old_rec.rqst_amt,0)
1873: or nvl(p_prtt_reimbmt_rqst_stat_cd ,'-1')<>
1874: nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd ,'-1')
1875: or nvl(p_pl_id,-1) <> nvl(ben_prc_shd.g_old_rec.pl_id,-1) ))

Line 1872: or nvl(p_rqst_amt,0) <> nvl(ben_prc_shd.g_old_rec.rqst_amt,0)

1868: or nvl(p_incrd_to_dt, hr_api.g_date)
1869: <> nvl(ben_prc_shd.g_old_rec.incrd_to_dt, hr_api.g_date)
1870: or nvl(p_exp_incurd_dt, hr_api.g_date)
1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)
1872: or nvl(p_rqst_amt,0) <> nvl(ben_prc_shd.g_old_rec.rqst_amt,0)
1873: or nvl(p_prtt_reimbmt_rqst_stat_cd ,'-1')<>
1874: nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd ,'-1')
1875: or nvl(p_pl_id,-1) <> nvl(ben_prc_shd.g_old_rec.pl_id,-1) ))
1876: or not l_api_updating) then

Line 1874: nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd ,'-1')

1870: or nvl(p_exp_incurd_dt, hr_api.g_date)
1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)
1872: or nvl(p_rqst_amt,0) <> nvl(ben_prc_shd.g_old_rec.rqst_amt,0)
1873: or nvl(p_prtt_reimbmt_rqst_stat_cd ,'-1')<>
1874: nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd ,'-1')
1875: or nvl(p_pl_id,-1) <> nvl(ben_prc_shd.g_old_rec.pl_id,-1) ))
1876: or not l_api_updating) then
1877:
1878: hr_utility.set_location('validating'||l_proc,5);

Line 1875: or nvl(p_pl_id,-1) <> nvl(ben_prc_shd.g_old_rec.pl_id,-1) ))

1871: <> nvl(ben_prc_shd.g_old_rec.exp_incurd_dt, hr_api.g_date)
1872: or nvl(p_rqst_amt,0) <> nvl(ben_prc_shd.g_old_rec.rqst_amt,0)
1873: or nvl(p_prtt_reimbmt_rqst_stat_cd ,'-1')<>
1874: nvl(ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd ,'-1')
1875: or nvl(p_pl_id,-1) <> nvl(ben_prc_shd.g_old_rec.pl_id,-1) ))
1876: or not l_api_updating) then
1877:
1878: hr_utility.set_location('validating'||l_proc,5);
1879:

Line 2270: (p_rec in out nocopy ben_prc_shd.g_rec_type,

2266: -- ----------------------------------------------------------------------------
2267: -- |---------------------------< insert_validate >----------------------------|
2268: -- ----------------------------------------------------------------------------
2269: Procedure insert_validate
2270: (p_rec in out nocopy ben_prc_shd.g_rec_type,
2271: p_effective_date in date,
2272: p_datetrack_mode in varchar2,
2273: p_validation_start_date in date,
2274: p_validation_end_date in date) is

Line 2401: (p_rec in out nocopy ben_prc_shd.g_rec_type,

2397: -- ----------------------------------------------------------------------------
2398: -- |---------------------------< update_validate >----------------------------|
2399: -- ----------------------------------------------------------------------------
2400: Procedure update_validate
2401: (p_rec in out nocopy ben_prc_shd.g_rec_type,
2402: p_effective_date in date,
2403: p_datetrack_mode in varchar2,
2404: p_validation_start_date in date,
2405: p_validation_end_date in date) is

Line 2553: (p_rec in ben_prc_shd.g_rec_type,

2549: -- ----------------------------------------------------------------------------
2550: -- |---------------------------< delete_validate >----------------------------|
2551: -- ----------------------------------------------------------------------------
2552: Procedure delete_validate
2553: (p_rec in ben_prc_shd.g_rec_type,
2554: p_effective_date in date,
2555: p_datetrack_mode in varchar2,
2556: p_validation_start_date in date,
2557: p_validation_end_date in date) is

Line 2567: p_prtt_reimbmt_rqst_stat_cd => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd );

2563: --
2564: -- Call all supporting business operations
2565: --
2566: chk_remb_status (
2567: p_prtt_reimbmt_rqst_stat_cd => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd );
2568:
2569: chk_future_dated(
2570: p_pl_id => ben_prc_shd.g_old_rec.pl_id ,
2571: p_submitter_person_id => ben_prc_shd.g_old_rec.submitter_person_id,

Line 2570: p_pl_id => ben_prc_shd.g_old_rec.pl_id ,

2566: chk_remb_status (
2567: p_prtt_reimbmt_rqst_stat_cd => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd );
2568:
2569: chk_future_dated(
2570: p_pl_id => ben_prc_shd.g_old_rec.pl_id ,
2571: p_submitter_person_id => ben_prc_shd.g_old_rec.submitter_person_id,
2572: p_prtt_reimbmt_rqst_id => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id,
2573: p_business_group_id => ben_prc_shd.g_old_rec.business_group_id,
2574: p_effective_date => p_effective_date );

Line 2571: p_submitter_person_id => ben_prc_shd.g_old_rec.submitter_person_id,

2567: p_prtt_reimbmt_rqst_stat_cd => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_stat_cd );
2568:
2569: chk_future_dated(
2570: p_pl_id => ben_prc_shd.g_old_rec.pl_id ,
2571: p_submitter_person_id => ben_prc_shd.g_old_rec.submitter_person_id,
2572: p_prtt_reimbmt_rqst_id => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id,
2573: p_business_group_id => ben_prc_shd.g_old_rec.business_group_id,
2574: p_effective_date => p_effective_date );
2575:

Line 2572: p_prtt_reimbmt_rqst_id => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id,

2568:
2569: chk_future_dated(
2570: p_pl_id => ben_prc_shd.g_old_rec.pl_id ,
2571: p_submitter_person_id => ben_prc_shd.g_old_rec.submitter_person_id,
2572: p_prtt_reimbmt_rqst_id => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id,
2573: p_business_group_id => ben_prc_shd.g_old_rec.business_group_id,
2574: p_effective_date => p_effective_date );
2575:
2576:

Line 2573: p_business_group_id => ben_prc_shd.g_old_rec.business_group_id,

2569: chk_future_dated(
2570: p_pl_id => ben_prc_shd.g_old_rec.pl_id ,
2571: p_submitter_person_id => ben_prc_shd.g_old_rec.submitter_person_id,
2572: p_prtt_reimbmt_rqst_id => ben_prc_shd.g_old_rec.prtt_reimbmt_rqst_id,
2573: p_business_group_id => ben_prc_shd.g_old_rec.business_group_id,
2574: p_effective_date => p_effective_date );
2575:
2576:
2577: dt_delete_validate