[Home] [Help]
1636: FETCH c_project INTO l_exists;
1637: CLOSE c_project;
1638:
1639:
1640: DELETE FROM amw_risk_associations ara
1641: WHERE object_type='PROJECT'
1642: AND pk1 = p_audit_project_id
1643: AND pk3 IS NOT NULL
1644: AND not exists
1653: WHERE object_type='PROJECT'
1654: AND pk1 = p_audit_project_id
1655: AND pk3 IS NOT NULL
1656: AND not exists
1657: (select 'Y' from amw_risk_associations ara
1658: where object_type = 'PROJECT'
1659: and ara.pk1 = p_audit_project_id
1660: and ara.pk2 = aca.pk2
1661: and ara.pk3 = aca.pk3
1685: and pk2 <> -1 ;
1686:
1687: /* Entity risk/control/ap changes begin*/
1688:
1689: DELETE FROM amw_risk_associations ara
1690: WHERE object_type='PROJECT'
1691: AND pk1 = p_audit_project_id
1692: AND pk3 IS NULL
1693: AND not exists
1702: WHERE object_type='PROJECT'
1703: AND pk1 = p_audit_project_id
1704: AND pk3 IS NULL
1705: AND not exists
1706: (select 'Y' from amw_risk_associations ara
1707: where object_type = 'PROJECT'
1708: and ara.pk1 = p_audit_project_id
1709: and ara.pk2 = aca.pk2
1710: and ara.pk3 IS NULL
1735: /* Entity risk/control/ap changes end*/
1736:
1737: FOR scope_rec IN c_project_scope LOOP
1738:
1739: UPDATE AMW_RISK_ASSOCIATIONS ara
1740: SET ara.risk_rev_id = (SELECT risk.risk_rev_id
1741: FROM AMW_RISKS_B risk
1742: WHERE risk.risk_id = ara.risk_id
1743: AND risk.curr_approved_flag = 'Y')
1745: AND ara.pk1 = p_audit_project_id
1746: AND ara.pk2 = scope_rec.organization_id
1747: AND ara.pk3 = scope_rec.process_id;
1748:
1749: INSERT INTO AMW_RISK_ASSOCIATIONS
1750: (
1751: risk_association_id,
1752: last_update_date,
1753: last_updated_by,
1761: pk3,
1762: object_type,
1763: object_version_number
1764: )
1765: SELECT AMW_RISK_ASSOCIATIONS_S.nextval,
1766: sysdate,
1767: fnd_global.user_id,
1768: sysdate,
1769: fnd_global.user_id,
1774: scope_rec.organization_id,
1775: scope_rec.process_id,
1776: 'PROJECT',
1777: 1
1778: FROM amw_risk_associations ara, amw_risks_b risk
1779: WHERE ara.object_type = 'PROCESS_ORG'
1780: AND ara.pk1 = scope_rec.organization_id
1781: AND ara.pk2 = scope_rec.process_id
1782: AND ara.risk_id = risk.risk_id
1783: AND risk.curr_approved_flag = 'Y'
1784: AND ara.approval_date IS NOT NULL
1785: AND ara.deletion_approval_date IS NULL
1786: AND not exists
1787: (select 'Y' from amw_risk_associations ara2
1788: where ara2.object_type = 'PROJECT'
1789: and ara2.pk1 = p_audit_project_id
1790: and ara2.pk2 = scope_rec.organization_id
1791: and ara2.pk3 = scope_rec.process_id
1833: scope_rec.process_id,
1834: ara.risk_id,
1835: 'PROJECT',
1836: 1
1837: FROM amw_control_associations aca,amw_risk_associations ara,amw_controls_b control
1838: WHERE aca.object_type = 'RISK_ORG'
1839: AND aca.pk1 = scope_rec.organization_id
1840: AND aca.pk2 = scope_rec.process_id
1841: AND aca.pk3 = ara.risk_id
2076:
2077: /* Changes for org risk/control/ap */
2078: FOR scope_org_rec IN c_project_scope_org LOOP
2079:
2080: UPDATE AMW_RISK_ASSOCIATIONS ara
2081: SET ara.risk_rev_id = (SELECT risk.risk_rev_id
2082: FROM AMW_RISKS_B risk
2083: WHERE risk.risk_id = ara.risk_id
2084: AND risk.curr_approved_flag = 'Y')
2086: AND ara.pk1 = p_audit_project_id
2087: AND ara.pk2 = scope_org_rec.organization_id
2088: AND ara.pk3 IS NULL;
2089:
2090: INSERT INTO AMW_RISK_ASSOCIATIONS
2091: (
2092: risk_association_id,
2093: last_update_date,
2094: last_updated_by,
2102: pk3,
2103: object_type,
2104: object_version_number
2105: )
2106: SELECT AMW_RISK_ASSOCIATIONS_S.nextval,
2107: sysdate,
2108: fnd_global.user_id,
2109: sysdate,
2110: fnd_global.user_id,
2115: scope_org_rec.organization_id,
2116: null,
2117: 'PROJECT',
2118: 1
2119: FROM amw_risk_associations ara, amw_risks_b risk
2120: WHERE ara.object_type = 'ENTITY_RISK'
2121: AND ara.pk1 = scope_org_rec.organization_id
2122: AND ara.pk2 IS NULL
2123: AND ara.risk_id = risk.risk_id
2122: AND ara.pk2 IS NULL
2123: AND ara.risk_id = risk.risk_id
2124: AND risk.curr_approved_flag = 'Y'
2125: AND not exists
2126: (select 'Y' from amw_risk_associations ara2
2127: where ara2.object_type = 'PROJECT'
2128: and ara2.pk1 = p_audit_project_id
2129: and ara2.pk2 = scope_org_rec.organization_id
2130: and ara2.pk3 IS NULL
2173: null,
2174: ara.risk_id,
2175: 'PROJECT',
2176: 1
2177: FROM amw_control_associations aca,amw_risk_associations ara,amw_controls_b control
2178: WHERE aca.object_type = 'ENTITY_CONTROL'
2179: AND aca.pk1 = scope_org_rec.organization_id
2180: AND aca.pk2 = ara.risk_id
2181: AND aca.pk3 IS NULL
2226: null,
2227: ara.risk_id,
2228: 'PROJECT',
2229: 1
2230: FROM amw_control_associations aca,amw_risk_associations ara,amw_controls_b control
2231: WHERE aca.object_type = 'ENTITY_CONTROL'
2232: AND aca.pk1 = scope_org_rec.organization_id
2233: AND aca.pk2 = ara.risk_id
2234: AND aca.pk3 IS NULL
2659:
2660: -- Initialize API return status to SUCCESS
2661: x_return_status := FND_API.G_RET_STS_SUCCESS;
2662:
2663: DELETE FROM AMW_RISK_ASSOCIATIONS ara
2664: WHERE object_type = p_entity_type
2665: AND pk1 = p_entity_id
2666: AND pk3 IS NOT NULL
2667: AND NOT EXISTS
2677: AND pk1 = p_entity_id
2678: AND pk3 IS NOT NULL
2679: AND NOT EXISTS
2680: (SELECT 'Y'
2681: FROM AMW_RISK_ASSOCIATIONS ara
2682: WHERE object_type = p_entity_type
2683: AND ara.pk1 = p_entity_id
2684: AND ara.pk2 = aca.pk2
2685: AND ara.pk3 = aca.pk3
2688:
2689:
2690: /* Entity risk/control/ap changes begin*/
2691:
2692: DELETE FROM amw_risk_associations ara
2693: WHERE object_type=p_entity_type
2694: AND pk1 = p_entity_id
2695: AND pk3 IS NULL
2696: AND not exists
2705: WHERE object_type=p_entity_type
2706: AND pk1 = p_entity_id
2707: AND pk3 IS NULL
2708: AND not exists
2709: (select 'Y' from amw_risk_associations ara
2710: where object_type = p_entity_type
2711: and ara.pk1 = p_entity_id
2712: and ara.pk2 = aca.pk2
2713: and ara.pk3 IS NULL
2738: and pk2 <> -1 ;
2739:
2740: FOR each_rec IN get_records_in_scope
2741: LOOP
2742: UPDATE amw_risk_associations ara
2743: SET ara.risk_rev_id = (SELECT risk.risk_rev_id
2744: FROM amw_risks_b risk
2745: WHERE risk.risk_id = ara.risk_id
2746: AND risk.curr_approved_flag = 'Y')
2748: AND ara.pk1 = p_entity_id
2749: AND ara.pk2 = each_rec.organization_id
2750: AND ara.pk3 = each_rec.process_id;
2751:
2752: INSERT INTO amw_risk_associations (
2753: risk_association_id,
2754: last_update_date,
2755: last_updated_by,
2756: creation_date,
2762: pk2,
2763: pk3,
2764: object_type,
2765: object_version_number)
2766: SELECT AMW_RISK_ASSOCIATIONS_S.nextval,
2767: sysdate,
2768: fnd_global.user_id,
2769: sysdate,
2770: fnd_global.user_id,
2775: ara.pk1,
2776: ara.pk2,
2777: p_entity_type,
2778: 1
2779: FROM amw_risk_associations ara, amw_risks_b risk
2780: WHERE ara.object_type = 'PROCESS_ORG'
2781: AND ara.pk1 = each_rec.organization_id
2782: AND ara.pk2 = each_rec.process_id
2783: AND ara.risk_id = risk.risk_id
2784: AND ara.approval_date IS NOT NULL
2785: AND ara.deletion_approval_date IS NULL
2786: AND risk.curr_approved_flag = 'Y'
2787: AND NOT EXISTS
2788: (SELECT 'Y' FROM amw_risk_associations ara2
2789: WHERE ara2.object_type=p_entity_type
2790: AND ara2.pk1 = p_entity_id
2791: AND ara2.pk2 = each_rec.organization_id
2792: AND ara2.pk3 = each_rec.process_id
2833: each_rec.process_id,
2834: ara.risk_id,
2835: p_entity_type,
2836: 1
2837: FROM amw_control_associations aca,amw_risk_associations ara,amw_controls_b control
2838: WHERE aca.object_type = 'RISK_ORG'
2839: AND aca.pk1 = each_rec.organization_id
2840: AND aca.pk2 = each_rec.process_id
2841: AND aca.pk3 = ara.risk_id
2924:
2925: /* Changes for org risk/control/ap */
2926: FOR scope_org_rec IN c_scope_org LOOP
2927:
2928: UPDATE AMW_RISK_ASSOCIATIONS ara
2929: SET ara.risk_rev_id = (SELECT risk.risk_rev_id
2930: FROM AMW_RISKS_B risk
2931: WHERE risk.risk_id = ara.risk_id
2932: AND risk.curr_approved_flag = 'Y')
2934: AND ara.pk1 = p_entity_id
2935: AND ara.pk2 = scope_org_rec.organization_id
2936: AND ara.pk3 IS NULL;
2937:
2938: INSERT INTO AMW_RISK_ASSOCIATIONS
2939: (
2940: risk_association_id,
2941: last_update_date,
2942: last_updated_by,
2950: pk3,
2951: object_type,
2952: object_version_number
2953: )
2954: SELECT AMW_RISK_ASSOCIATIONS_S.nextval,
2955: sysdate,
2956: fnd_global.user_id,
2957: sysdate,
2958: fnd_global.user_id,
2963: scope_org_rec.organization_id,
2964: null,
2965: p_entity_type,
2966: 1
2967: FROM amw_risk_associations ara, amw_risks_b risk
2968: WHERE ara.object_type = 'ENTITY_RISK'
2969: AND ara.pk1 = scope_org_rec.organization_id
2970: AND ara.pk2 IS NULL
2971: AND ara.risk_id = risk.risk_id
2970: AND ara.pk2 IS NULL
2971: AND ara.risk_id = risk.risk_id
2972: AND risk.curr_approved_flag = 'Y'
2973: AND not exists
2974: (select 'Y' from amw_risk_associations ara2
2975: where ara2.object_type = p_entity_type
2976: and ara2.pk1 = p_entity_id
2977: and ara2.pk2 = scope_org_rec.organization_id
2978: and ara2.pk3 IS NULL
3021: null,
3022: ara.risk_id,
3023: p_entity_type,
3024: 1
3025: FROM amw_control_associations aca,amw_risk_associations ara,amw_controls_b control
3026: WHERE aca.object_type = 'ENTITY_CONTROL'
3027: AND aca.pk1 = scope_org_rec.organization_id
3028: AND aca.pk2 = ara.risk_id
3029: AND aca.pk3 IS NULL