149: ) is
150: --
151: -- Declare cursors and local variables
152: --
153: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
154: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
155: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
156: l_proc varchar2(72) := g_package||'create_PRMRY_CARE_PRVDR';
157: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
150: --
151: -- Declare cursors and local variables
152: --
153: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
154: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
155: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
156: l_proc varchar2(72) := g_package||'create_PRMRY_CARE_PRVDR';
157: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
158: --
151: -- Declare cursors and local variables
152: --
153: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
154: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
155: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
156: l_proc varchar2(72) := g_package||'create_PRMRY_CARE_PRVDR';
157: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
158: --
159: begin
153: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
154: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
155: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
156: l_proc varchar2(72) := g_package||'create_PRMRY_CARE_PRVDR';
157: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
158: --
159: begin
160: --
161: hr_utility.set_location('Entering:'|| l_proc, 10);
433:
434: --
435: l_proc varchar2(72) := g_package||'create_prmry_care_prvdr_w';
436:
437: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
438: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
439: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
440: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
441: --
434: --
435: l_proc varchar2(72) := g_package||'create_prmry_care_prvdr_w';
436:
437: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
438: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
439: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
440: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
441: --
442: begin
435: l_proc varchar2(72) := g_package||'create_prmry_care_prvdr_w';
436:
437: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
438: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
439: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
440: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
441: --
442: begin
443: --
436:
437: l_prmry_care_prvdr_id ben_prmry_care_prvdr_f.prmry_care_prvdr_id%TYPE;
438: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
439: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
440: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
441: --
442: begin
443: --
444: hr_utility.set_location('Entering:'|| l_proc, 10);
543: --
544: -- Declare cursors and local variables
545: --
546: l_proc varchar2(72) := g_package||'update_PRMRY_CARE_PRVDR';
547: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
548: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
549: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
550: --
551: cursor c_old_pcp_values
544: -- Declare cursors and local variables
545: --
546: l_proc varchar2(72) := g_package||'update_PRMRY_CARE_PRVDR';
547: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
548: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
549: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
550: --
551: cursor c_old_pcp_values
552: is
545: --
546: l_proc varchar2(72) := g_package||'update_PRMRY_CARE_PRVDR';
547: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
548: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
549: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
550: --
551: cursor c_old_pcp_values
552: is
553: select pcp.prmry_care_prvdr_typ_cd,
554: pcp.name,
555: pcp.ext_ident,
556: pcp.prtt_enrt_rslt_id,
557: pcp.elig_cvrd_dpnt_id
558: from ben_prmry_care_prvdr_f pcp
559: where pcp.prmry_care_prvdr_id = p_prmry_care_prvdr_id
560: and p_effective_date between pcp.effective_start_date and pcp.effective_end_date;
561:
562: l_old_pcp_values c_old_pcp_values%rowtype;
841: )
842: is
843: --
844: l_proc varchar2(72) := g_package||'update_prmry_care_prvdr_w';
845: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
846: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
847: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
848: --
849: begin
842: is
843: --
844: l_proc varchar2(72) := g_package||'update_prmry_care_prvdr_w';
845: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
846: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
847: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
848: --
849: begin
850: --
843: --
844: l_proc varchar2(72) := g_package||'update_prmry_care_prvdr_w';
845: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
846: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
847: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
848: --
849: begin
850: --
851: hr_utility.set_location('Entering:'|| l_proc, 10);
906: --
907: -- Declare cursors and local variables
908: --
909: l_proc varchar2(72) := g_package||'delete_PRMRY_CARE_PRVDR';
910: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
911: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
912: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
913: l_effective_date date;
914:
907: -- Declare cursors and local variables
908: --
909: l_proc varchar2(72) := g_package||'delete_PRMRY_CARE_PRVDR';
910: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
911: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
912: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
913: l_effective_date date;
914:
915: cursor c_old_pcp_values
908: --
909: l_proc varchar2(72) := g_package||'delete_PRMRY_CARE_PRVDR';
910: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
911: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
912: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
913: l_effective_date date;
914:
915: cursor c_old_pcp_values
916: is
920: pcp.prtt_enrt_rslt_id,
921: pcp.elig_cvrd_dpnt_id,
922: pcp.business_group_id,
923: pcp.effective_start_date
924: from ben_prmry_care_prvdr_f pcp
925: where pcp.prmry_care_prvdr_id = p_prmry_care_prvdr_id
926: and p_effective_date between pcp.effective_start_date and pcp.effective_end_date;
927:
928: l_old_pcp_values c_old_pcp_values%rowtype;
1101: )
1102: is
1103:
1104: l_proc varchar2(72) := g_package||'delete_prmry_care_prvdr_w';
1105: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
1106: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
1107: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
1108: --
1109: begin
1102: is
1103:
1104: l_proc varchar2(72) := g_package||'delete_prmry_care_prvdr_w';
1105: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
1106: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
1107: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
1108: --
1109: begin
1110: --
1103:
1104: l_proc varchar2(72) := g_package||'delete_prmry_care_prvdr_w';
1105: l_object_version_number ben_prmry_care_prvdr_f.object_version_number%TYPE;
1106: l_effective_start_date ben_prmry_care_prvdr_f.effective_start_date%TYPE;
1107: l_effective_end_date ben_prmry_care_prvdr_f.effective_end_date%TYPE;
1108: --
1109: begin
1110: --
1111: hr_utility.set_location('Entering:'|| l_proc, 10);