16: ,x_msg_data OUT NOCOPY VARCHAR2
17: ,x_task_id OUT NOCOPY NUMBER) IS
18: l_api_name CONSTANT VARCHAR2(30) := 'create_task';
19: l_api_version CONSTANT NUMBER := 1.0;
20: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
21: BEGIN
22: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
23: g_pkg_name,
24: p_init_msg_list,
18: l_api_name CONSTANT VARCHAR2(30) := 'create_task';
19: l_api_version CONSTANT NUMBER := 1.0;
20: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
21: BEGIN
22: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
23: g_pkg_name,
24: p_init_msg_list,
25: l_api_version,
26: p_api_version,
26: p_api_version,
27: '_PUB',
28: x_return_status);
29:
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
27: '_PUB',
28: x_return_status);
29:
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
35:
28: x_return_status);
29:
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
35:
36: --call to private API to create a task for resolved timevalue
29:
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
35:
36: --call to private API to create a task for resolved timevalue
37: okc_task_pvt.create_task(p_api_version => p_api_version
44: ,x_return_status => x_return_status
45: ,x_msg_count => x_msg_count
46: ,x_msg_data => x_msg_data
47: ,x_task_id => x_task_id);
48: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
49: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
50: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
51: raise OKC_API.G_EXCEPTION_ERROR;
52: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
45: ,x_msg_count => x_msg_count
46: ,x_msg_data => x_msg_data
47: ,x_task_id => x_task_id);
48: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
49: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
50: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
51: raise OKC_API.G_EXCEPTION_ERROR;
52: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
53: IF p_commit = 'T' THEN
46: ,x_msg_data => x_msg_data
47: ,x_task_id => x_task_id);
48: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
49: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
50: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
51: raise OKC_API.G_EXCEPTION_ERROR;
52: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
53: IF p_commit = 'T' THEN
54: commit;
47: ,x_task_id => x_task_id);
48: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
49: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
50: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
51: raise OKC_API.G_EXCEPTION_ERROR;
52: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
53: IF p_commit = 'T' THEN
54: commit;
55: END IF;
48: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
49: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
50: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
51: raise OKC_API.G_EXCEPTION_ERROR;
52: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
53: IF p_commit = 'T' THEN
54: commit;
55: END IF;
56: END IF;
54: commit;
55: END IF;
56: END IF;
57:
58: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
59:
60: EXCEPTION
61: WHEN OKC_API.G_EXCEPTION_ERROR THEN
62: x_return_status := OKC_API.HANDLE_EXCEPTIONS
57:
58: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
59:
60: EXCEPTION
61: WHEN OKC_API.G_EXCEPTION_ERROR THEN
62: x_return_status := OKC_API.HANDLE_EXCEPTIONS
63: (
64: l_api_name,
65: G_PKG_NAME,
58: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
59:
60: EXCEPTION
61: WHEN OKC_API.G_EXCEPTION_ERROR THEN
62: x_return_status := OKC_API.HANDLE_EXCEPTIONS
63: (
64: l_api_name,
65: G_PKG_NAME,
66: 'OKC_API.G_RET_STS_ERROR',
62: x_return_status := OKC_API.HANDLE_EXCEPTIONS
63: (
64: l_api_name,
65: G_PKG_NAME,
66: 'OKC_API.G_RET_STS_ERROR',
67: x_msg_count,
68: x_msg_data,
69: '_PUB'
70: );
68: x_msg_data,
69: '_PUB'
70: );
71:
72: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
73: x_return_status := OKC_API.HANDLE_EXCEPTIONS
74: (
75: l_api_name,
76: G_PKG_NAME,
69: '_PUB'
70: );
71:
72: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
73: x_return_status := OKC_API.HANDLE_EXCEPTIONS
74: (
75: l_api_name,
76: G_PKG_NAME,
77: 'OKC_API.G_RET_STS_UNEXP_ERROR',
73: x_return_status := OKC_API.HANDLE_EXCEPTIONS
74: (
75: l_api_name,
76: G_PKG_NAME,
77: 'OKC_API.G_RET_STS_UNEXP_ERROR',
78: x_msg_count,
79: x_msg_data,
80: '_PUB'
81: );
80: '_PUB'
81: );
82:
83: WHEN OTHERS THEN
84: x_return_status := OKC_API.HANDLE_EXCEPTIONS
85: (
86: l_api_name,
87: G_PKG_NAME,
88: 'OTHERS',
105: ,x_msg_data OUT NOCOPY VARCHAR2
106: ,x_task_id OUT NOCOPY NUMBER) IS
107: l_api_name CONSTANT VARCHAR2(30) := 'create_condition_task';
108: l_api_version CONSTANT NUMBER := 1.0;
109: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
110: BEGIN
111: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
112: g_pkg_name,
113: p_init_msg_list,
107: l_api_name CONSTANT VARCHAR2(30) := 'create_condition_task';
108: l_api_version CONSTANT NUMBER := 1.0;
109: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
110: BEGIN
111: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
112: g_pkg_name,
113: p_init_msg_list,
114: l_api_version,
115: p_api_version,
115: p_api_version,
116: '_PUB',
117: x_return_status);
118:
119: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
120: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
121: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
122: RAISE OKC_API.G_EXCEPTION_ERROR;
123: END IF;
116: '_PUB',
117: x_return_status);
118:
119: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
120: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
121: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
122: RAISE OKC_API.G_EXCEPTION_ERROR;
123: END IF;
124:
117: x_return_status);
118:
119: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
120: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
121: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
122: RAISE OKC_API.G_EXCEPTION_ERROR;
123: END IF;
124:
125: --call to private API to create a task for condition occurence
118:
119: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
120: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
121: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
122: RAISE OKC_API.G_EXCEPTION_ERROR;
123: END IF;
124:
125: --call to private API to create a task for condition occurence
126: okc_task_pvt.create_condition_task(p_api_version => p_api_version
132: ,x_return_status => x_return_status
133: ,x_msg_count => x_msg_count
134: ,x_msg_data => x_msg_data
135: ,x_task_id => x_task_id);
136: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
137: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
139: raise OKC_API.G_EXCEPTION_ERROR;
140: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
133: ,x_msg_count => x_msg_count
134: ,x_msg_data => x_msg_data
135: ,x_task_id => x_task_id);
136: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
137: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
139: raise OKC_API.G_EXCEPTION_ERROR;
140: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
141: IF p_commit = 'T' THEN
134: ,x_msg_data => x_msg_data
135: ,x_task_id => x_task_id);
136: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
137: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
139: raise OKC_API.G_EXCEPTION_ERROR;
140: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
141: IF p_commit = 'T' THEN
142: commit;
135: ,x_task_id => x_task_id);
136: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
137: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
139: raise OKC_API.G_EXCEPTION_ERROR;
140: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
141: IF p_commit = 'T' THEN
142: commit;
143: END IF;
136: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
137: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
139: raise OKC_API.G_EXCEPTION_ERROR;
140: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
141: IF p_commit = 'T' THEN
142: commit;
143: END IF;
144: END IF;
142: commit;
143: END IF;
144: END IF;
145:
146: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
147:
148: EXCEPTION
149: WHEN OKC_API.G_EXCEPTION_ERROR THEN
150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
145:
146: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
147:
148: EXCEPTION
149: WHEN OKC_API.G_EXCEPTION_ERROR THEN
150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
151: (
152: l_api_name,
153: G_PKG_NAME,
146: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
147:
148: EXCEPTION
149: WHEN OKC_API.G_EXCEPTION_ERROR THEN
150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
151: (
152: l_api_name,
153: G_PKG_NAME,
154: 'OKC_API.G_RET_STS_ERROR',
150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
151: (
152: l_api_name,
153: G_PKG_NAME,
154: 'OKC_API.G_RET_STS_ERROR',
155: x_msg_count,
156: x_msg_data,
157: '_PUB'
158: );
156: x_msg_data,
157: '_PUB'
158: );
159:
160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
161: x_return_status := OKC_API.HANDLE_EXCEPTIONS
162: (
163: l_api_name,
164: G_PKG_NAME,
157: '_PUB'
158: );
159:
160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
161: x_return_status := OKC_API.HANDLE_EXCEPTIONS
162: (
163: l_api_name,
164: G_PKG_NAME,
165: 'OKC_API.G_RET_STS_UNEXP_ERROR',
161: x_return_status := OKC_API.HANDLE_EXCEPTIONS
162: (
163: l_api_name,
164: G_PKG_NAME,
165: 'OKC_API.G_RET_STS_UNEXP_ERROR',
166: x_msg_count,
167: x_msg_data,
168: '_PUB'
169: );
168: '_PUB'
169: );
170:
171: WHEN OTHERS THEN
172: x_return_status := OKC_API.HANDLE_EXCEPTIONS
173: (
174: l_api_name,
175: G_PKG_NAME,
176: 'OTHERS',
194: ,x_msg_data OUT NOCOPY VARCHAR2
195: ,x_task_id OUT NOCOPY NUMBER) IS
196: l_api_name CONSTANT VARCHAR2(30) := 'create_contingent_task';
197: l_api_version CONSTANT NUMBER := 1.0;
198: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
199: BEGIN
200: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
201: g_pkg_name,
202: p_init_msg_list,
196: l_api_name CONSTANT VARCHAR2(30) := 'create_contingent_task';
197: l_api_version CONSTANT NUMBER := 1.0;
198: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
199: BEGIN
200: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
201: g_pkg_name,
202: p_init_msg_list,
203: l_api_version,
204: p_api_version,
204: p_api_version,
205: '_PUB',
206: x_return_status);
207:
208: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
209: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
211: RAISE OKC_API.G_EXCEPTION_ERROR;
212: END IF;
205: '_PUB',
206: x_return_status);
207:
208: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
209: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
211: RAISE OKC_API.G_EXCEPTION_ERROR;
212: END IF;
213:
206: x_return_status);
207:
208: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
209: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
211: RAISE OKC_API.G_EXCEPTION_ERROR;
212: END IF;
213:
214: --call to private API to create a task for contingent event
207:
208: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
209: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
211: RAISE OKC_API.G_EXCEPTION_ERROR;
212: END IF;
213:
214: --call to private API to create a task for contingent event
215: okc_task_pvt.create_contingent_task(p_api_version => p_api_version
222: ,x_return_status => x_return_status
223: ,x_msg_count => x_msg_count
224: ,x_msg_data => x_msg_data
225: ,x_task_id => x_task_id);
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: raise OKC_API.G_EXCEPTION_ERROR;
230:
223: ,x_msg_count => x_msg_count
224: ,x_msg_data => x_msg_data
225: ,x_task_id => x_task_id);
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: raise OKC_API.G_EXCEPTION_ERROR;
230:
231: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
224: ,x_msg_data => x_msg_data
225: ,x_task_id => x_task_id);
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: raise OKC_API.G_EXCEPTION_ERROR;
230:
231: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
232: IF p_commit = 'T' THEN
225: ,x_task_id => x_task_id);
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: raise OKC_API.G_EXCEPTION_ERROR;
230:
231: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
232: IF p_commit = 'T' THEN
233: commit;
227: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: raise OKC_API.G_EXCEPTION_ERROR;
230:
231: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
232: IF p_commit = 'T' THEN
233: commit;
234: END IF;
235: END IF;
233: commit;
234: END IF;
235: END IF;
236:
237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
238:
239: EXCEPTION
240: WHEN OKC_API.G_EXCEPTION_ERROR THEN
241: x_return_status := OKC_API.HANDLE_EXCEPTIONS
236:
237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
238:
239: EXCEPTION
240: WHEN OKC_API.G_EXCEPTION_ERROR THEN
241: x_return_status := OKC_API.HANDLE_EXCEPTIONS
242: (
243: l_api_name,
244: G_PKG_NAME,
237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
238:
239: EXCEPTION
240: WHEN OKC_API.G_EXCEPTION_ERROR THEN
241: x_return_status := OKC_API.HANDLE_EXCEPTIONS
242: (
243: l_api_name,
244: G_PKG_NAME,
245: 'OKC_API.G_RET_STS_ERROR',
241: x_return_status := OKC_API.HANDLE_EXCEPTIONS
242: (
243: l_api_name,
244: G_PKG_NAME,
245: 'OKC_API.G_RET_STS_ERROR',
246: x_msg_count,
247: x_msg_data,
248: '_PUB'
249: );
247: x_msg_data,
248: '_PUB'
249: );
250:
251: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
252: x_return_status := OKC_API.HANDLE_EXCEPTIONS
253: (
254: l_api_name,
255: G_PKG_NAME,
248: '_PUB'
249: );
250:
251: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
252: x_return_status := OKC_API.HANDLE_EXCEPTIONS
253: (
254: l_api_name,
255: G_PKG_NAME,
256: 'OKC_API.G_RET_STS_UNEXP_ERROR',
252: x_return_status := OKC_API.HANDLE_EXCEPTIONS
253: (
254: l_api_name,
255: G_PKG_NAME,
256: 'OKC_API.G_RET_STS_UNEXP_ERROR',
257: x_msg_count,
258: x_msg_data,
259: '_PUB'
260: );
259: '_PUB'
260: );
261:
262: WHEN OTHERS THEN
263: x_return_status := OKC_API.HANDLE_EXCEPTIONS
264: (
265: l_api_name,
266: G_PKG_NAME,
267: 'OTHERS',
285: ,x_msg_count OUT NOCOPY NUMBER
286: ,x_msg_data OUT NOCOPY VARCHAR2) IS
287: l_api_name CONSTANT VARCHAR2(30) := 'update_task';
288: l_api_version CONSTANT NUMBER := 1.0;
289: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
290: BEGIN
291: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
292: g_pkg_name,
293: p_init_msg_list,
287: l_api_name CONSTANT VARCHAR2(30) := 'update_task';
288: l_api_version CONSTANT NUMBER := 1.0;
289: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
290: BEGIN
291: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
292: g_pkg_name,
293: p_init_msg_list,
294: l_api_version,
295: p_api_version,
295: p_api_version,
296: '_PUB',
297: x_return_status);
298:
299: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
300: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
302: RAISE OKC_API.G_EXCEPTION_ERROR;
303: END IF;
296: '_PUB',
297: x_return_status);
298:
299: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
300: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
302: RAISE OKC_API.G_EXCEPTION_ERROR;
303: END IF;
304:
297: x_return_status);
298:
299: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
300: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
302: RAISE OKC_API.G_EXCEPTION_ERROR;
303: END IF;
304:
305: --Call to private api to update a task
298:
299: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
300: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
302: RAISE OKC_API.G_EXCEPTION_ERROR;
303: END IF;
304:
305: --Call to private api to update a task
306: okc_task_pvt.update_task(p_api_version => p_api_version
313: ,p_alarm_fired_count => p_alarm_fired_count
314: ,x_return_status => x_return_status
315: ,x_msg_count => x_msg_count
316: ,x_msg_data => x_msg_data);
317: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
318: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
319: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
320: raise OKC_API.G_EXCEPTION_ERROR;
321: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
314: ,x_return_status => x_return_status
315: ,x_msg_count => x_msg_count
316: ,x_msg_data => x_msg_data);
317: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
318: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
319: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
320: raise OKC_API.G_EXCEPTION_ERROR;
321: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
322: IF p_commit = 'T' THEN
315: ,x_msg_count => x_msg_count
316: ,x_msg_data => x_msg_data);
317: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
318: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
319: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
320: raise OKC_API.G_EXCEPTION_ERROR;
321: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
322: IF p_commit = 'T' THEN
323: commit;
316: ,x_msg_data => x_msg_data);
317: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
318: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
319: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
320: raise OKC_API.G_EXCEPTION_ERROR;
321: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
322: IF p_commit = 'T' THEN
323: commit;
324: END IF;
317: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
318: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
319: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
320: raise OKC_API.G_EXCEPTION_ERROR;
321: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
322: IF p_commit = 'T' THEN
323: commit;
324: END IF;
325: END IF;
323: commit;
324: END IF;
325: END IF;
326:
327: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
328:
329: EXCEPTION
330: WHEN OKC_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKC_API.HANDLE_EXCEPTIONS
326:
327: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
328:
329: EXCEPTION
330: WHEN OKC_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKC_API.HANDLE_EXCEPTIONS
332: (
333: l_api_name,
334: G_PKG_NAME,
327: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
328:
329: EXCEPTION
330: WHEN OKC_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKC_API.HANDLE_EXCEPTIONS
332: (
333: l_api_name,
334: G_PKG_NAME,
335: 'OKC_API.G_RET_STS_ERROR',
331: x_return_status := OKC_API.HANDLE_EXCEPTIONS
332: (
333: l_api_name,
334: G_PKG_NAME,
335: 'OKC_API.G_RET_STS_ERROR',
336: x_msg_count,
337: x_msg_data,
338: '_PUB'
339: );
337: x_msg_data,
338: '_PUB'
339: );
340:
341: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
342: x_return_status := OKC_API.HANDLE_EXCEPTIONS
343: (
344: l_api_name,
345: G_PKG_NAME,
338: '_PUB'
339: );
340:
341: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
342: x_return_status := OKC_API.HANDLE_EXCEPTIONS
343: (
344: l_api_name,
345: G_PKG_NAME,
346: 'OKC_API.G_RET_STS_UNEXP_ERROR',
342: x_return_status := OKC_API.HANDLE_EXCEPTIONS
343: (
344: l_api_name,
345: G_PKG_NAME,
346: 'OKC_API.G_RET_STS_UNEXP_ERROR',
347: x_msg_count,
348: x_msg_data,
349: '_PUB'
350: );
349: '_PUB'
350: );
351:
352: WHEN OTHERS THEN
353: x_return_status := OKC_API.HANDLE_EXCEPTIONS
354: (
355: l_api_name,
356: G_PKG_NAME,
357: 'OTHERS',
371: ,x_msg_count OUT NOCOPY NUMBER
372: ,x_msg_data OUT NOCOPY VARCHAR2) IS
373: l_api_name CONSTANT VARCHAR2(30) := 'delete_rule_task';
374: l_api_version CONSTANT NUMBER := 1.0;
375: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
376: BEGIN
377: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
378: g_pkg_name,
379: p_init_msg_list,
373: l_api_name CONSTANT VARCHAR2(30) := 'delete_rule_task';
374: l_api_version CONSTANT NUMBER := 1.0;
375: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
376: BEGIN
377: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
378: g_pkg_name,
379: p_init_msg_list,
380: l_api_version,
381: p_api_version,
381: p_api_version,
382: '_PUB',
383: x_return_status);
384:
385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
388: RAISE OKC_API.G_EXCEPTION_ERROR;
389: END IF;
382: '_PUB',
383: x_return_status);
384:
385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
388: RAISE OKC_API.G_EXCEPTION_ERROR;
389: END IF;
390:
383: x_return_status);
384:
385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
388: RAISE OKC_API.G_EXCEPTION_ERROR;
389: END IF;
390:
391: --Call to private api to delete task/s
384:
385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
388: RAISE OKC_API.G_EXCEPTION_ERROR;
389: END IF;
390:
391: --Call to private api to delete task/s
392: okc_task_pvt.delete_task(p_api_version => p_api_version
395: ,p_rtv_id => p_rtv_id
396: ,x_return_status => x_return_status
397: ,x_msg_count => x_msg_count
398: ,x_msg_data => x_msg_data);
399: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
400: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
401: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
402: raise OKC_API.G_EXCEPTION_ERROR;
403: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
396: ,x_return_status => x_return_status
397: ,x_msg_count => x_msg_count
398: ,x_msg_data => x_msg_data);
399: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
400: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
401: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
402: raise OKC_API.G_EXCEPTION_ERROR;
403: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
404: IF p_commit = 'T' THEN
397: ,x_msg_count => x_msg_count
398: ,x_msg_data => x_msg_data);
399: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
400: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
401: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
402: raise OKC_API.G_EXCEPTION_ERROR;
403: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
404: IF p_commit = 'T' THEN
405: commit;
398: ,x_msg_data => x_msg_data);
399: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
400: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
401: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
402: raise OKC_API.G_EXCEPTION_ERROR;
403: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
404: IF p_commit = 'T' THEN
405: commit;
406: END IF;
399: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
400: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
401: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
402: raise OKC_API.G_EXCEPTION_ERROR;
403: ELSIF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
404: IF p_commit = 'T' THEN
405: commit;
406: END IF;
407: END IF;
404: IF p_commit = 'T' THEN
405: commit;
406: END IF;
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409:
410: EXCEPTION
411: WHEN OKC_API.G_EXCEPTION_ERROR THEN
412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409:
410: EXCEPTION
411: WHEN OKC_API.G_EXCEPTION_ERROR THEN
412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
413: (
414: l_api_name,
415: G_PKG_NAME,
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409:
410: EXCEPTION
411: WHEN OKC_API.G_EXCEPTION_ERROR THEN
412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
413: (
414: l_api_name,
415: G_PKG_NAME,
416: 'OKC_API.G_RET_STS_ERROR',
412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
413: (
414: l_api_name,
415: G_PKG_NAME,
416: 'OKC_API.G_RET_STS_ERROR',
417: x_msg_count,
418: x_msg_data,
419: '_PUB'
420: );
418: x_msg_data,
419: '_PUB'
420: );
421:
422: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
423: x_return_status := OKC_API.HANDLE_EXCEPTIONS
424: (
425: l_api_name,
426: G_PKG_NAME,
419: '_PUB'
420: );
421:
422: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
423: x_return_status := OKC_API.HANDLE_EXCEPTIONS
424: (
425: l_api_name,
426: G_PKG_NAME,
427: 'OKC_API.G_RET_STS_UNEXP_ERROR',
423: x_return_status := OKC_API.HANDLE_EXCEPTIONS
424: (
425: l_api_name,
426: G_PKG_NAME,
427: 'OKC_API.G_RET_STS_UNEXP_ERROR',
428: x_msg_count,
429: x_msg_data,
430: '_PUB'
431: );
430: '_PUB'
431: );
432:
433: WHEN OTHERS THEN
434: x_return_status := OKC_API.HANDLE_EXCEPTIONS
435: (
436: l_api_name,
437: G_PKG_NAME,
438: 'OTHERS',