36:
37:
38: -- To update ahl_unit_effectivities record.
39: PROCEDURE update_record (p_temp_mr_rec IN ahl_temp_unit_effectivities%ROWTYPE,
40: p_mr_rec IN ahl_unit_effectivities_app_v%ROWTYPE);
41:
42: -- To create decendent records and build relationships if the MR is a group MR.
43: PROCEDURE create_group (p_x_temp_grp_rec IN OUT NOCOPY ahl_temp_unit_effectivities%ROWTYPE);
44:
43: PROCEDURE create_group (p_x_temp_grp_rec IN OUT NOCOPY ahl_temp_unit_effectivities%ROWTYPE);
44:
45: -- To update decendent records and update relationships if the MR is a group MR.
46: PROCEDURE update_group (p_temp_mr_rec IN ahl_temp_unit_effectivities%ROWTYPE,
47: p_mr_rec IN ahl_unit_effectivities_app_v%ROWTYPE);
48:
49: -- Process deferral and SR records.
50: -- Added for 11.5.10.
51: PROCEDURE Flush_Unit_SR_Deferrals;
218: LAST_UPDATE_DATE ,
219: LAST_UPDATED_BY ,
220: LAST_UPDATE_LOGIN
221:
222: --FROM ahl_unit_effectivities_app_v
223: FROM ahl_unit_effectivities_vl
224: WHERE unit_effectivity_id = p_unit_effectivity_id;
225: --FOR UPDATE OF preceding_ue_id, status_code NOWAIT; -- not required as these rows were locked before.
226:
282: ATTRIBUTE14 ,
283: ATTRIBUTE15 ,
284: OBJECT_VERSION_NUMBER
285:
286: FROM ahl_unit_effectivities_app_v ue
287: WHERE csi_item_instance_id = p_csi_item_instance_id AND
288: ( status_code IS NULL OR
289: status_code NOT IN ('ACCOMPLISHED','TERMINATED',
290: 'MR-TERMINATE', 'INIT-ACCOMPLISHED',
327:
328: l_temp_individual_mr_rec temp_individual_mrs_csr%ROWTYPE;
329:
330: l_temp_mr_rec ahl_temp_unit_effectivities%ROWTYPE;
331: l_mr_rec ahl_unit_effectivities_app_v%ROWTYPE;
332:
333: l_temp_mr_found BOOLEAN;
334: l_mr_found BOOLEAN;
335:
337: l_ue_rec ahl_unit_effectivity_csr%ROWTYPE;
338:
339: l_last_accomplishment_date DATE;
340: l_acc_unit_effectivity_id NUMBER;
341: l_acc_status_code ahl_unit_effectivities_app_v.status_code%TYPE;
342: l_return_val BOOLEAN;
343:
344: l_exception_upd_flag BOOLEAN;
345: l_delete_flag BOOLEAN;
1431: -----------------------------------------------------------------------------
1432: -- To update ahl_unit_effectivities record.
1433:
1434: PROCEDURE update_record (p_temp_mr_rec IN ahl_temp_unit_effectivities%ROWTYPE,
1435: p_mr_rec IN ahl_unit_effectivities_app_v%ROWTYPE)
1436: IS
1437:
1438: BEGIN
1439:
1729: --------------------------------------------------------------------------------
1730: -- To update decendent records and update relationships if the MR is a group MR.
1731:
1732: PROCEDURE update_group (p_temp_mr_rec IN ahl_temp_unit_effectivities%ROWTYPE,
1733: p_mr_rec IN ahl_unit_effectivities_app_v%ROWTYPE)
1734: IS
1735:
1736: -- Read group elements.
1737: CURSOR ahl_temp_grp_csr(p_csi_item_instance_id IN NUMBER,
1777: p_parent_ue_id IN NUMBER ) IS
1778: SELECT ue1.mr_header_id, ue1.csi_item_instance_id, ue1.unit_effectivity_id,
1779: ue2.mr_header_id parent_mr_header_id,
1780: ue2.csi_item_instance_id parent_csi_item_instance_id
1781: --FROM ahl_unit_effectivities_app_v ue1, ahl_unit_effectivities_app_v ue2
1782: FROM ahl_unit_effectivities_b ue1, ahl_unit_effectivities_b ue2
1783: WHERE ue1.unit_effectivity_id = p_ue_id AND
1784: ue2.unit_effectivity_id = p_parent_ue_id;
1785:
1829: ATTRIBUTE13 ,
1830: ATTRIBUTE14 ,
1831: ATTRIBUTE15 ,
1832: OBJECT_VERSION_NUMBER
1833: --FROM ahl_unit_effectivities_app_v
1834: FROM ahl_unit_effectivities_vl
1835: WHERE unit_effectivity_id = p_unit_effectivity_id;
1836: --FOR UPDATE OF due_date NOWAIT;
1837:
1871: i NUMBER;
1872: l_grp_match_flag BOOLEAN;
1873:
1874: l_temp_mr_rec ahl_temp_unit_effectivities%ROWTYPE := p_temp_mr_rec;
1875: l_unit_effectivity_rec ahl_unit_effectivities_app_v%ROWTYPE;
1876:
1877: -- added for bug# 7586838
1878: CURSOR unit_deferral_csr(p_ue_id IN NUMBER) IS
1879: SELECT unit_deferral_id