[Home] [Help]
35:
36:
37: CURSOR c_new_proc(c_audit_proj_id NUMBER) IS
38: SELECT organization_id, process_id
39: FROM AMW_AUDIT_SCOPE_PROCESSES
40: WHERE audit_project_id = c_audit_proj_id
41: AND unmitigated_risks IS NULL;
42:
43: CURSOR c_org_proc(c_audit_proj_id NUMBER, c_org_id NUMBER) IS
41: AND unmitigated_risks IS NULL;
42:
43: CURSOR c_org_proc(c_audit_proj_id NUMBER, c_org_id NUMBER) IS
44: SELECT process_id
45: FROM AMW_AUDIT_SCOPE_PROCESSES
46: WHERE audit_project_id = c_audit_proj_id
47: AND organization_id = c_org_id;
48:
49: l_audit_proj_id NUMBER;
65: p_org_id => org_rec.organization_id);
66: END LOOP;
67:
68: -- populate the denorm table for new processes added into scope
69: -- AMW_AUDIT_SCOPE_PROCESSES
70: -- do not need to update the prcess denorm for the existing
71: -- org.
72: FOR proc_rec IN c_new_proc(l_audit_proj_id) LOOP
73:
209: AND object_id = PRIOR parent_object_id)
210: AND audit_project_id = l_pk2;
211:
212: ELSIF l_obj_name = 'AMW_ORG_PROCESS' THEN
213: UPDATE amw_audit_scope_processes
214: SET last_update_date = sysdate,
215: last_updated_by = fnd_global.user_id,
216: last_update_login = fnd_global.conc_login_id,
217: evaluation_opinion_id = l_opin_id
239: least(greatest(0,unmitigated_risks+l_ineff_diff),risks_evaluated+l_evaluated_diff,total_risks)
240: WHERE audit_project_id = l_pk2
241: AND organization_id = l_pk3;
242:
243: UPDATE amw_audit_scope_processes
244: SET last_update_date = sysdate,
245: last_updated_by = fnd_global.user_id,
246: last_update_login = fnd_global.conc_login_id,
247: risks_evaluated =
273: least(greatest(0,ineffective_controls+l_ineff_diff),controls_evaluated+l_evaluated_diff,total_controls)
274: WHERE audit_project_id = l_pk2
275: AND organization_id = l_pk3;
276:
277: UPDATE amw_audit_scope_processes
278: SET last_update_date = sysdate,
279: last_updated_by = fnd_global.user_id,
280: last_update_login = fnd_global.conc_login_id,
281: controls_evaluated =
823: 'PROJECT', p_audit_project_id,
824: null, null,
825: null, null);
826:
827: UPDATE amw_audit_scope_processes
828: SET unmitigated_risks = l_unmitigated_risks,
829: risks_evaluated = l_evaluated_risks,
830: total_risks = l_total_risks,
831: ineffective_controls = l_ineff_controls,
839: AND organization_id = p_org_id
840: AND process_id = p_proc_id;
841:
842: IF (SQL%NOTFOUND) THEN
843: INSERT INTO amw_audit_scope_processes (
844: audit_project_id,
845: organization_id,
846: process_id,
847: risks_evaluated,
905: WHERE audit_project_id = l_audit_project_id;
906:
907: CURSOR c_org_proc(l_audit_project_id NUMBER, l_org_id NUMBER) IS
908: SELECT process_id
909: FROM AMW_AUDIT_SCOPE_PROCESSES
910: WHERE audit_project_id = l_audit_project_id
911: AND organization_id = l_org_id;
912:
913: eng_rec c_engagements%rowtype;