[Home] [Help]
726:
727: -- Initialize temporary tables.
728:
729: DELETE FROM AHL_TEMP_UNIT_EFFECTIVITIES;
730: DELETE FROM AHL_TEMP_UNIT_SR_DEFERRALS;
731:
732: /* this validation will be done after getting root instance.
733: -- validate item instance.
734: Validate_item_instance(p_csi_item_instance_id, l_inventory_item_id,
3164: -- fix for bug# 6875650. Deferral date includes timestamp.
3165: --decode (affect_due_calc_flag, 'N', trunc(nvl(visit_end_date, deferral_effective_on)), trunc(nvl(visit_end_date, due_date)))
3166:
3167: decode (def.affect_due_calc_flag, 'N', def.deferral_effective_on, nvl(def.visit_end_date, def.due_date))
3168: FROM ahl_temp_unit_SR_deferrals def, ahl_mr_headers_b mr1,
3169: (select title from ahl_mr_headers_b where mr_header_id = p_mr_header_id) mr2
3170: WHERE def.csi_item_instance_id = p_csi_instance_id
3171: AND def.mr_header_id = mr1.mr_header_id
3172: AND mr1.title = mr2.title
3461: SELECT due_date,
3462: csi_item_instance_id orig_csi_item_instance_id,
3463: mr_header_id orig_mr_header_id,
3464: visit_end_date
3465: FROM ahl_temp_unit_SR_deferrals
3466: WHERE csi_item_instance_id = p_item_instance_id
3467: --AND mr_header_id = p_mr_header_id
3468: AND mr_header_id IN (select mr1.mr_header_id from ahl_mr_headers_b mr1 where mr1.title = p_title)
3469: AND trunc(nvl(visit_end_date, nvl(due_date, p_last_due_date))) > trunc(p_last_due_date)
3511: SELECT due_date,
3512: csi_item_instance_id orig_csi_item_instance_id,
3513: mr_header_id orig_mr_header_id,
3514: visit_end_date
3515: FROM ahl_temp_unit_SR_deferrals
3516: WHERE csi_item_instance_id = p_item_instance_id
3517: --AND mr_header_id = p_mr_header_id
3518: AND mr_header_id IN (select mr1.mr_header_id from ahl_mr_headers_b mr1 where mr1.title = p_title)
3519: AND trunc(nvl(visit_end_date, nvl(due_date, p_last_due_date))) >= trunc(p_last_due_date)
3549: preceding_check_flag = 'N'
3550:
3551: UNION
3552: SELECT due_date
3553: FROM ahl_temp_unit_SR_deferrals
3554: WHERE csi_item_instance_id = p_preceding_instance_id AND
3555: mr_header_id IN (select mr1.mr_header_id from ahl_mr_headers_b mr1
3556: where mr1.title = (select mr2.title from ahl_mr_headers_b mr2 where mr2.mr_header_id = p_preceding_mr_header_id)
3557: )
3733: IF (l_mr_termination_date IS NOT NULL) THEN
3734: BEGIN
3735: --dbms_output.put_line ('Start Build Effectivity for mr:csi' || p_applicable_mrs_rec.mr_header_id || ':' || p_applicable_mrs_rec.csi_item_instance_id );
3736: --dbms_output.put_line ('l_mr_termination_date:' || l_mr_termination_date || ':' || p_applicable_mrs_rec.title);
3737: DELETE FROM ahl_temp_unit_SR_deferrals tdef
3738: WHERE tdef.CSI_ITEM_INSTANCE_ID = p_applicable_mrs_rec.csi_item_instance_id
3739: AND tdef.MR_HEADER_ID IN (select MR_HEADER_ID from ahl_mr_headers_b where title = p_applicable_mrs_rec.title)
3740: AND trunc(tdef.DUE_DATE) >= trunc(l_mr_termination_date)
3741: AND NOT EXISTS (select 'x' from ahl_temp_unit_SR_deferrals where orig_unit_effectivity_id = tdef.unit_effectivity_id);
3737: DELETE FROM ahl_temp_unit_SR_deferrals tdef
3738: WHERE tdef.CSI_ITEM_INSTANCE_ID = p_applicable_mrs_rec.csi_item_instance_id
3739: AND tdef.MR_HEADER_ID IN (select MR_HEADER_ID from ahl_mr_headers_b where title = p_applicable_mrs_rec.title)
3740: AND trunc(tdef.DUE_DATE) >= trunc(l_mr_termination_date)
3741: AND NOT EXISTS (select 'x' from ahl_temp_unit_SR_deferrals where orig_unit_effectivity_id = tdef.unit_effectivity_id);
3742: EXCEPTION
3743: WHEN OTHERS THEN
3744: null;
3745: END;
7821: preceding_check_flag = 'N'
7822:
7823: UNION
7824: SELECT due_date, visit_end_date
7825: FROM ahl_temp_unit_SR_deferrals
7826: WHERE csi_item_instance_id = p_item_instance_id AND
7827: mr_header_id IN (select mr1.mr_header_id from ahl_mr_headers_b mr1
7828: where mr1.title = (select mr2.title from ahl_mr_headers_b mr2
7829: where mr2.mr_header_id = p_mr_header_id )
10486: AHL_DEBUG_PUB.Debug('Group Match flag:l_visit_status:' || l_grp_match || ':' || l_visit_status);
10487: END IF;
10488:
10489: -- insert into deferral temp table.
10490: insert into ahl_temp_unit_SR_deferrals (
10491: unit_effectivity_id,
10492: object_type,
10493: csi_item_instance_id,
10494: mr_header_id,
10531: FOR ahl_applicable_grp_rec IN ahl_applicable_grp_csr(unit_effectivity_rec.csi_item_instance_id,
10532: unit_effectivity_rec.mr_header_id)
10533: LOOP
10534: -- insert into deferral temp table.
10535: insert into ahl_temp_unit_SR_deferrals (
10536: unit_effectivity_id,
10537: object_type,
10538: csi_item_instance_id,
10539: mr_header_id,
10732: END LOOP;
10733: END IF; --l_visit_status
10734:
10735: -- Write SR UE into temporary table.
10736: insert into ahl_temp_unit_SR_deferrals (
10737: unit_effectivity_id,
10738: object_type,
10739: csi_item_instance_id,
10740: mr_header_id,
10780: FOR ahl_applicable_grp_rec IN ahl_applicable_grp_csr(ahl_ue_sr_rec.csi_item_instance_id,
10781: ahl_ue_sr_rec.mr_header_id)
10782: LOOP
10783: -- insert into deferral temp table.
10784: insert into ahl_temp_unit_SR_deferrals (
10785: unit_effectivity_id,
10786: object_type,
10787: csi_item_instance_id,
10788: mr_header_id,
14794: preceding_check_flag = 'N'
14795:
14796: UNION
14797: SELECT due_date, visit_end_date
14798: FROM ahl_temp_unit_SR_deferrals
14799: WHERE csi_item_instance_id = p_instance_id AND
14800: mr_header_id IN (select mr1.mr_header_id from ahl_mr_headers_b mr1
14801: where mr1.title = (select mr2.title from ahl_mr_headers_b mr2 where mr2.mr_header_id = p_mr_header_id)
14802: )
14974: SELECT * FROM
14975: (SELECT
14976: decode (def.affect_due_calc_flag, 'N', def.deferral_effective_on, nvl(def.visit_end_date, def.due_date)) accomplishment_date,
14977: unit_effectivity_id
14978: FROM ahl_temp_unit_SR_deferrals def, ahl_mr_headers_b mr1,
14979: (select title from ahl_mr_headers_b
14980: where mr_header_id IN (select mr_header_id from ahl_applicable_MRs
14981: where csi_item_instance_id = p_csi_instance_id
14982: and start_mr_header_id = p_mr_header_id)
15256: SELECT unit_effectivity_id,
15257: due_date,
15258: mr_header_id,
15259: visit_end_date
15260: FROM ahl_temp_unit_SR_deferrals
15261: WHERE csi_item_instance_id = p_csi_item_instance_id
15262: AND mr_header_id IN (select mr1.mr_header_id from ahl_mr_headers_b mr1 where mr1.title = p_start_mr_title);
15263:
15264: -- get chain UE id
15292: CURSOR get_defer_chain_MRs(p_chain_ue_id IN NUMBER) IS
15293: SELECT * FROM
15294: ( SELECT
15295: decode (def.affect_due_calc_flag, 'N', def.deferral_effective_on, nvl(def.visit_end_date, def.due_date)) due_date
15296: FROM ahl_temp_unit_SR_deferrals def
15297: WHERE def.unit_effectivity_id = p_chain_ue_id
15298: AND def.object_type = 'MR'
15299: AND EXISTS (select 'x' from ahl_applicable_mrs
15300: where csi_item_instance_id = def.csi_item_instance_id