1: PACKAGE BODY CN_PROCESS_AUDITS_PKG AS
2: -- $Header: cnrepab.pls 120.0 2005/10/10 07:17:33 apink noship $
3:
4:
5: --
13: -- 1/11/94 Devesh Khatu Created
14: --
15: PROCEDURE insert_row (
16: X_rowid IN OUT NOCOPY ROWID,
17: X_process_audit_id IN OUT NOCOPY cn_process_audits.process_audit_id%TYPE,
18: X_parent_process_audit_id cn_process_audits.parent_process_audit_id%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
14: --
15: PROCEDURE insert_row (
16: X_rowid IN OUT NOCOPY ROWID,
17: X_process_audit_id IN OUT NOCOPY cn_process_audits.process_audit_id%TYPE,
18: X_parent_process_audit_id cn_process_audits.parent_process_audit_id%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
15: PROCEDURE insert_row (
16: X_rowid IN OUT NOCOPY ROWID,
17: X_process_audit_id IN OUT NOCOPY cn_process_audits.process_audit_id%TYPE,
18: X_parent_process_audit_id cn_process_audits.parent_process_audit_id%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
16: X_rowid IN OUT NOCOPY ROWID,
17: X_process_audit_id IN OUT NOCOPY cn_process_audits.process_audit_id%TYPE,
18: X_parent_process_audit_id cn_process_audits.parent_process_audit_id%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
17: X_process_audit_id IN OUT NOCOPY cn_process_audits.process_audit_id%TYPE,
18: X_parent_process_audit_id cn_process_audits.parent_process_audit_id%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
18: X_parent_process_audit_id cn_process_audits.parent_process_audit_id%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
19: X_process_type cn_process_audits.process_type%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
27: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
20: X_description cn_process_audits.description%TYPE,
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
27: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
28: x_org_id cn_process_audits.org_id%TYPE) IS
21: X_statement_text cn_process_audits.statement_text%TYPE,
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
27: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
28: x_org_id cn_process_audits.org_id%TYPE) IS
29:
22: X_execution_code cn_process_audits.execution_code%TYPE,
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
27: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
28: x_org_id cn_process_audits.org_id%TYPE) IS
29:
30: BEGIN
23: X_error_message cn_process_audits.error_message%TYPE,
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
27: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
28: x_org_id cn_process_audits.org_id%TYPE) IS
29:
30: BEGIN
31:
24: X_module_id cn_process_audits.module_id%TYPE,
25: X_object_id cn_process_audits.object_id%TYPE,
26: X_timestamp_start cn_process_audits.timestamp_start%TYPE,
27: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
28: x_org_id cn_process_audits.org_id%TYPE) IS
29:
30: BEGIN
31:
32: IF (X_process_audit_id IS NULL) THEN
29:
30: BEGIN
31:
32: IF (X_process_audit_id IS NULL) THEN
33: SELECT cn_process_audits_s.NEXTVAL
34: INTO X_process_audit_id
35: FROM dual;
36: END IF;
37:
34: INTO X_process_audit_id
35: FROM dual;
36: END IF;
37:
38: INSERT INTO cn_process_audits (
39: process_audit_id,
40: parent_process_audit_id,
41: process_type,
42: description,
63: x_org_id);
64:
65: SELECT ROWID
66: INTO X_rowid
67: FROM cn_process_audits
68: WHERE process_audit_id = X_process_audit_id;
69:
70: IF (SQL%NOTFOUND) THEN
71: RAISE NO_DATA_FOUND;
80: -- History
81: -- 1/11/94 Devesh Khatu Created
82: --
83: PROCEDURE select_row (
84: recinfo IN OUT NOCOPY cn_process_audits%ROWTYPE) IS
85: BEGIN
86: -- select row based on process_id (primary key)
87: IF (recinfo.process_audit_id IS NOT NULL) THEN
88:
86: -- select row based on process_id (primary key)
87: IF (recinfo.process_audit_id IS NOT NULL) THEN
88:
89: SELECT * INTO recinfo
90: FROM cn_process_audits cpa
91: WHERE cpa.process_audit_id = recinfo.process_audit_id;
92:
93: END IF;
94: END select_row;
101: -- History
102: -- 1/11/94 Devesh Khatu Created
103: --
104: PROCEDURE update_row (
105: X_process_audit_id cn_process_audits.process_audit_id%TYPE,
106: X_module_id cn_process_audits.module_id%TYPE,
107: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
108: X_execution_code cn_process_audits.execution_code%TYPE,
109: X_error_message cn_process_audits.error_message%TYPE) IS
102: -- 1/11/94 Devesh Khatu Created
103: --
104: PROCEDURE update_row (
105: X_process_audit_id cn_process_audits.process_audit_id%TYPE,
106: X_module_id cn_process_audits.module_id%TYPE,
107: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
108: X_execution_code cn_process_audits.execution_code%TYPE,
109: X_error_message cn_process_audits.error_message%TYPE) IS
110:
103: --
104: PROCEDURE update_row (
105: X_process_audit_id cn_process_audits.process_audit_id%TYPE,
106: X_module_id cn_process_audits.module_id%TYPE,
107: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
108: X_execution_code cn_process_audits.execution_code%TYPE,
109: X_error_message cn_process_audits.error_message%TYPE) IS
110:
111: BEGIN
104: PROCEDURE update_row (
105: X_process_audit_id cn_process_audits.process_audit_id%TYPE,
106: X_module_id cn_process_audits.module_id%TYPE,
107: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
108: X_execution_code cn_process_audits.execution_code%TYPE,
109: X_error_message cn_process_audits.error_message%TYPE) IS
110:
111: BEGIN
112:
105: X_process_audit_id cn_process_audits.process_audit_id%TYPE,
106: X_module_id cn_process_audits.module_id%TYPE,
107: X_timestamp_end cn_process_audits.timestamp_end%TYPE,
108: X_execution_code cn_process_audits.execution_code%TYPE,
109: X_error_message cn_process_audits.error_message%TYPE) IS
110:
111: BEGIN
112:
113: UPDATE cn_process_audits
109: X_error_message cn_process_audits.error_message%TYPE) IS
110:
111: BEGIN
112:
113: UPDATE cn_process_audits
114: SET module_id = X_module_id,
115: timestamp_end = X_timestamp_end,
116: execution_code = X_execution_code,
117: error_message = X_error_message
123:
124: END update_row;
125:
126:
127: END cn_process_audits_pkg;