DBA Data[Home] [Help]

APPS.OKC_AQ_WRITE_ERROR_PVT dependencies on OKC_API

Line 45: l_return_status := OKC_API.G_RET_STS_SUCCESS;

41: where msgid = p_msgid;
42:
43: BEGIN
44: --Initialize return status
45: l_return_status := OKC_API.G_RET_STS_SUCCESS;
46:
47: -- Standard START OF API SAVEPOINT
48: DBMS_TRANSACTION.SAVEPOINT(l_api_name || '_PVT');
49:

Line 65: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

61: p_msg_clob => l_msg_clob,
62: x_return_status => l_return_status,
63: x_msg_count => l_msg_count,
64: x_msg_data => l_msg_data);
65: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
67: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_ERROR;
69: END IF;

Line 66: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

62: x_return_status => l_return_status,
63: x_msg_count => l_msg_count,
64: x_msg_data => l_msg_data);
65: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
67: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_ERROR;
69: END IF;
70:

Line 67: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

63: x_msg_count => l_msg_count,
64: x_msg_data => l_msg_data);
65: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
67: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_ERROR;
69: END IF;
70:
71: --Retrieve the first message from the stack

Line 68: RAISE OKC_API.G_EXCEPTION_ERROR;

64: x_msg_data => l_msg_data);
65: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
67: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_ERROR;
69: END IF;
70:
71: --Retrieve the first message from the stack
72: IF p_msg_count = 1 or p_msg_count IS NULL THEN

Line 99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

95: p_aqev_rec => l_aqev_rec,
96: p_aqmv_tbl => l_aqmv_tbl,
97: x_aqev_rec => x_aqev_rec,
98: x_aqmv_tbl => x_aqmv_tbl);
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

Line 100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

96: p_aqmv_tbl => l_aqmv_tbl,
97: x_aqev_rec => x_aqev_rec,
98: x_aqmv_tbl => x_aqmv_tbl);
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
104: l_commit := 'T';

Line 101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

97: x_aqev_rec => x_aqev_rec,
98: x_aqmv_tbl => x_aqmv_tbl);
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
104: l_commit := 'T';
105: END IF;

Line 102: RAISE OKC_API.G_EXCEPTION_ERROR;

98: x_aqmv_tbl => x_aqmv_tbl);
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
104: l_commit := 'T';
105: END IF;
106:

Line 103: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
104: l_commit := 'T';
105: END IF;
106:
107: --Retrieves more than a single message

Line 139: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

135: p_aqev_rec => l_aqev_rec,
136: p_aqmv_tbl => l_aqmv_tbl,
137: x_aqev_rec => x_aqev_rec,
138: x_aqmv_tbl => x_aqmv_tbl);
139: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
140: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
141: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
142: RAISE OKC_API.G_EXCEPTION_ERROR;
143: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

Line 140: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

136: p_aqmv_tbl => l_aqmv_tbl,
137: x_aqev_rec => x_aqev_rec,
138: x_aqmv_tbl => x_aqmv_tbl);
139: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
140: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
141: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
142: RAISE OKC_API.G_EXCEPTION_ERROR;
143: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
144: l_commit := 'T';

Line 141: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

137: x_aqev_rec => x_aqev_rec,
138: x_aqmv_tbl => x_aqmv_tbl);
139: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
140: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
141: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
142: RAISE OKC_API.G_EXCEPTION_ERROR;
143: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
144: l_commit := 'T';
145: END IF;

Line 142: RAISE OKC_API.G_EXCEPTION_ERROR;

138: x_aqmv_tbl => x_aqmv_tbl);
139: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
140: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
141: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
142: RAISE OKC_API.G_EXCEPTION_ERROR;
143: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
144: l_commit := 'T';
145: END IF;
146: END IF;

Line 143: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

139: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
140: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
141: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
142: RAISE OKC_API.G_EXCEPTION_ERROR;
143: ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
144: l_commit := 'T';
145: END IF;
146: END IF;
147: IF l_commit = 'T' THEN

Line 154: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

150: OKC_AQ_PVT.stop_listener;
151: END IF;
152: commit;
153: END IF;
154: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
155: EXCEPTION
156: WHEN OKC_API.G_EXCEPTION_ERROR THEN
157: l_return_status := OKC_API.HANDLE_EXCEPTIONS
158: (

Line 156: WHEN OKC_API.G_EXCEPTION_ERROR THEN

152: commit;
153: END IF;
154: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
155: EXCEPTION
156: WHEN OKC_API.G_EXCEPTION_ERROR THEN
157: l_return_status := OKC_API.HANDLE_EXCEPTIONS
158: (
159: l_api_name,
160: G_PKG_NAME,

Line 157: l_return_status := OKC_API.HANDLE_EXCEPTIONS

153: END IF;
154: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
155: EXCEPTION
156: WHEN OKC_API.G_EXCEPTION_ERROR THEN
157: l_return_status := OKC_API.HANDLE_EXCEPTIONS
158: (
159: l_api_name,
160: G_PKG_NAME,
161: 'OKC_API.G_RET_STS_ERROR',

Line 161: 'OKC_API.G_RET_STS_ERROR',

157: l_return_status := OKC_API.HANDLE_EXCEPTIONS
158: (
159: l_api_name,
160: G_PKG_NAME,
161: 'OKC_API.G_RET_STS_ERROR',
162: l_msg_count,
163: l_msg_data,
164: '_PVT'
165: );

Line 167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

163: l_msg_data,
164: '_PVT'
165: );
166:
167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
168: l_return_status := OKC_API.HANDLE_EXCEPTIONS
169: (
170: l_api_name,
171: G_PKG_NAME,

Line 168: l_return_status := OKC_API.HANDLE_EXCEPTIONS

164: '_PVT'
165: );
166:
167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
168: l_return_status := OKC_API.HANDLE_EXCEPTIONS
169: (
170: l_api_name,
171: G_PKG_NAME,
172: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 172: 'OKC_API.G_RET_STS_UNEXP_ERROR',

168: l_return_status := OKC_API.HANDLE_EXCEPTIONS
169: (
170: l_api_name,
171: G_PKG_NAME,
172: 'OKC_API.G_RET_STS_UNEXP_ERROR',
173: l_msg_count,
174: l_msg_data,
175: '_PVT'
176: );

Line 179: l_return_status := OKC_API.HANDLE_EXCEPTIONS

175: '_PVT'
176: );
177:
178: WHEN OTHERS THEN
179: l_return_status := OKC_API.HANDLE_EXCEPTIONS
180: (
181: l_api_name,
182: G_PKG_NAME,
183: 'OTHERS',

Line 254: l_return_status := OKC_API.G_RET_STS_SUCCESS;

250: -- Standard START OF API SAVEPOINT
251: DBMS_TRANSACTION.SAVEPOINT(l_api_name || '_PVT');
252:
253: --Initialize return status
254: l_return_status := OKC_API.G_RET_STS_SUCCESS;
255:
256: IF p_q_name = 'Events Queue' THEN
257: IF p_msg_tab.COUNT > 0 THEN
258: i := p_msg_tab.FIRST;

Line 298: l_return_status := OKC_API.G_RET_STS_ERROR;

294: END LOOP;
295: l_msg_string := l_msg_string ||')';
296: END IF;
297: ELSE
298: l_return_status := OKC_API.G_RET_STS_ERROR;
299: RAISE OKC_API.G_EXCEPTION_ERROR;
300: END IF;
301:
302: --Build the clob

Line 299: RAISE OKC_API.G_EXCEPTION_ERROR;

295: l_msg_string := l_msg_string ||')';
296: END IF;
297: ELSE
298: l_return_status := OKC_API.G_RET_STS_ERROR;
299: RAISE OKC_API.G_EXCEPTION_ERROR;
300: END IF;
301:
302: --Build the clob
303: DBMS_LOB.CREATETEMPORARY(l_msg_clob,TRUE, DBMS_LOB.SESSION);

Line 310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

306: DBMS_LOB.WRITE(l_msg_clob, ctr, 1, l_msg_string);
307: DBMS_LOB.CLOSE(l_msg_clob);
308: p_msg_clob := l_msg_clob;
309:
310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
311: EXCEPTION
312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
313: l_return_status := OKC_API.HANDLE_EXCEPTIONS
314: (

Line 312: WHEN OKC_API.G_EXCEPTION_ERROR THEN

308: p_msg_clob := l_msg_clob;
309:
310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
311: EXCEPTION
312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
313: l_return_status := OKC_API.HANDLE_EXCEPTIONS
314: (
315: l_api_name,
316: G_PKG_NAME,

Line 313: l_return_status := OKC_API.HANDLE_EXCEPTIONS

309:
310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
311: EXCEPTION
312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
313: l_return_status := OKC_API.HANDLE_EXCEPTIONS
314: (
315: l_api_name,
316: G_PKG_NAME,
317: 'OKC_API.G_RET_STS_ERROR',

Line 317: 'OKC_API.G_RET_STS_ERROR',

313: l_return_status := OKC_API.HANDLE_EXCEPTIONS
314: (
315: l_api_name,
316: G_PKG_NAME,
317: 'OKC_API.G_RET_STS_ERROR',
318: x_msg_count,
319: x_msg_data,
320: '_PVT'
321: );

Line 323: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

319: x_msg_data,
320: '_PVT'
321: );
322:
323: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
324: l_return_status := OKC_API.HANDLE_EXCEPTIONS
325: (
326: l_api_name,
327: G_PKG_NAME,

Line 324: l_return_status := OKC_API.HANDLE_EXCEPTIONS

320: '_PVT'
321: );
322:
323: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
324: l_return_status := OKC_API.HANDLE_EXCEPTIONS
325: (
326: l_api_name,
327: G_PKG_NAME,
328: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 328: 'OKC_API.G_RET_STS_UNEXP_ERROR',

324: l_return_status := OKC_API.HANDLE_EXCEPTIONS
325: (
326: l_api_name,
327: G_PKG_NAME,
328: 'OKC_API.G_RET_STS_UNEXP_ERROR',
329: x_msg_count,
330: x_msg_data,
331: '_PVT'
332: );

Line 335: l_return_status := OKC_API.HANDLE_EXCEPTIONS

331: '_PVT'
332: );
333:
334: WHEN OTHERS THEN
335: l_return_status := OKC_API.HANDLE_EXCEPTIONS
336: (
337: l_api_name,
338: G_PKG_NAME,
339: 'OTHERS',