DBA Data[Home] [Help]

APPS.OKC_ASSENT_PUB dependencies on OKC_API

Line 81: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

77: p_astv_rec IN astv_rec_type,
78: x_astv_rec OUT NOCOPY astv_rec_type) IS
79: l_api_name CONSTANT VARCHAR2(30) := 'create_assent';
80: l_astv_rec astv_rec_type := p_astv_rec;
81: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
82:
83: BEGIN
84: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
85: p_init_msg_list,

Line 84: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

80: l_astv_rec astv_rec_type := p_astv_rec;
81: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
82:
83: BEGIN
84: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
85: p_init_msg_list,
86: '_PUB',
87: x_return_status);
88: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

84: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
85: p_init_msg_list,
86: '_PUB',
87: x_return_status);
88: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
89: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
91: raise OKC_API.G_EXCEPTION_ERROR;
92: END IF;

Line 89: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

85: p_init_msg_list,
86: '_PUB',
87: x_return_status);
88: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
89: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
91: raise OKC_API.G_EXCEPTION_ERROR;
92: END IF;
93:

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

86: '_PUB',
87: x_return_status);
88: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
89: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
91: raise OKC_API.G_EXCEPTION_ERROR;
92: END IF;
93:
94: -- Call user hook for BEFORE

Line 91: raise OKC_API.G_EXCEPTION_ERROR;

87: x_return_status);
88: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
89: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
90: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
91: raise OKC_API.G_EXCEPTION_ERROR;
92: END IF;
93:
94: -- Call user hook for BEFORE
95: g_astv_rec := l_astv_rec;

Line 97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

93:
94: -- Call user hook for BEFORE
95: g_astv_rec := l_astv_rec;
96: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: raise OKC_API.G_EXCEPTION_ERROR;
101: END IF;

Line 98: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

94: -- Call user hook for BEFORE
95: g_astv_rec := l_astv_rec;
96: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: raise OKC_API.G_EXCEPTION_ERROR;
101: END IF;
102: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);

Line 99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

95: g_astv_rec := l_astv_rec;
96: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: raise OKC_API.G_EXCEPTION_ERROR;
101: END IF;
102: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);
103:

Line 100: raise OKC_API.G_EXCEPTION_ERROR;

96: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: raise OKC_API.G_EXCEPTION_ERROR;
101: END IF;
102: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);
103:
104:

Line 113: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

109: x_msg_count,
110: x_msg_data,
111: l_astv_rec,
112: x_astv_rec);
113: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
114: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
115: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
116: raise OKC_API.G_EXCEPTION_ERROR;
117: END IF;

Line 114: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

110: x_msg_data,
111: l_astv_rec,
112: x_astv_rec);
113: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
114: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
115: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
116: raise OKC_API.G_EXCEPTION_ERROR;
117: END IF;
118:

Line 115: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

111: l_astv_rec,
112: x_astv_rec);
113: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
114: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
115: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
116: raise OKC_API.G_EXCEPTION_ERROR;
117: END IF;
118:
119: -- Call user hook for AFTER

Line 116: raise OKC_API.G_EXCEPTION_ERROR;

112: x_astv_rec);
113: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
114: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
115: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
116: raise OKC_API.G_EXCEPTION_ERROR;
117: END IF;
118:
119: -- Call user hook for AFTER
120: g_astv_rec := x_astv_rec;

Line 122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

118:
119: -- Call user hook for AFTER
120: g_astv_rec := x_astv_rec;
121: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: raise OKC_API.G_EXCEPTION_ERROR;
126: END IF;

Line 123: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

119: -- Call user hook for AFTER
120: g_astv_rec := x_astv_rec;
121: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: raise OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

120: g_astv_rec := x_astv_rec;
121: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: raise OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
128: EXCEPTION

Line 125: raise OKC_API.G_EXCEPTION_ERROR;

121: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: raise OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
128: EXCEPTION
129: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

123: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: raise OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
128: EXCEPTION
129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
130: x_return_status := OKC_API.HANDLE_EXCEPTIONS
131: (l_api_name,

Line 129: WHEN OKC_API.G_EXCEPTION_ERROR THEN

125: raise OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
128: EXCEPTION
129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
130: x_return_status := OKC_API.HANDLE_EXCEPTIONS
131: (l_api_name,
132: G_PKG_NAME,
133: 'OKC_API.G_RET_STS_ERROR',

Line 130: x_return_status := OKC_API.HANDLE_EXCEPTIONS

126: END IF;
127: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
128: EXCEPTION
129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
130: x_return_status := OKC_API.HANDLE_EXCEPTIONS
131: (l_api_name,
132: G_PKG_NAME,
133: 'OKC_API.G_RET_STS_ERROR',
134: x_msg_count,

Line 133: 'OKC_API.G_RET_STS_ERROR',

129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
130: x_return_status := OKC_API.HANDLE_EXCEPTIONS
131: (l_api_name,
132: G_PKG_NAME,
133: 'OKC_API.G_RET_STS_ERROR',
134: x_msg_count,
135: x_msg_data,
136: '_PUB');
137: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 137: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

133: 'OKC_API.G_RET_STS_ERROR',
134: x_msg_count,
135: x_msg_data,
136: '_PUB');
137: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
138: x_return_status := OKC_API.HANDLE_EXCEPTIONS
139: (l_api_name,
140: G_PKG_NAME,
141: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 138: x_return_status := OKC_API.HANDLE_EXCEPTIONS

134: x_msg_count,
135: x_msg_data,
136: '_PUB');
137: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
138: x_return_status := OKC_API.HANDLE_EXCEPTIONS
139: (l_api_name,
140: G_PKG_NAME,
141: 'OKC_API.G_RET_STS_UNEXP_ERROR',
142: x_msg_count,

Line 141: 'OKC_API.G_RET_STS_UNEXP_ERROR',

137: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
138: x_return_status := OKC_API.HANDLE_EXCEPTIONS
139: (l_api_name,
140: G_PKG_NAME,
141: 'OKC_API.G_RET_STS_UNEXP_ERROR',
142: x_msg_count,
143: x_msg_data,
144: '_PUB');
145: WHEN OTHERS THEN

Line 146: x_return_status := OKC_API.HANDLE_EXCEPTIONS

142: x_msg_count,
143: x_msg_data,
144: '_PUB');
145: WHEN OTHERS THEN
146: x_return_status := OKC_API.HANDLE_EXCEPTIONS
147: (l_api_name,
148: G_PKG_NAME,
149: 'OTHERS',
150: x_msg_count,

Line 169: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

165: p_astv_tbl IN astv_tbl_type,
166: x_astv_tbl OUT NOCOPY astv_tbl_type) IS
167: l_api_name CONSTANT VARCHAR2(30) := 'create_assent';
168: i NUMBER := 0;
169: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
170:
171: BEGIN
172: x_return_status := OKC_API.G_RET_STS_SUCCESS;
173: IF p_astv_tbl.COUNT > 0 THEN

Line 172: x_return_status := OKC_API.G_RET_STS_SUCCESS;

168: i NUMBER := 0;
169: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
170:
171: BEGIN
172: x_return_status := OKC_API.G_RET_STS_SUCCESS;
173: IF p_astv_tbl.COUNT > 0 THEN
174: i := p_astv_tbl.FIRST;
175: LOOP
176: create_assent(

Line 184: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

180: x_msg_count => x_msg_count,
181: x_msg_data => x_msg_data,
182: p_astv_rec => p_astv_tbl(i),
183: x_astv_rec => x_astv_tbl(i));
184: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
185: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
186: x_return_status := l_return_status;
187: raise G_EXCEPTION_HALT_VALIDATION;
188: ELSE

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

181: x_msg_data => x_msg_data,
182: p_astv_rec => p_astv_tbl(i),
183: x_astv_rec => x_astv_tbl(i));
184: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
185: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
186: x_return_status := l_return_status;
187: raise G_EXCEPTION_HALT_VALIDATION;
188: ELSE
189: x_return_status := l_return_status;

Line 200: OKC_API.set_message(p_app_name => g_app_name,

196: EXCEPTION
197: WHEN G_EXCEPTION_HALT_VALIDATION THEN
198: NULL;
199: WHEN OTHERS THEN
200: OKC_API.set_message(p_app_name => g_app_name,
201: p_msg_name => g_unexpected_error,
202: p_token1 => g_sqlcode_token,
203: p_token1_value => sqlcode,
204: p_token2 => g_sqlerrm_token,

Line 206: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

202: p_token1 => g_sqlcode_token,
203: p_token1_value => sqlcode,
204: p_token2 => g_sqlerrm_token,
205: p_token2_value => sqlerrm);
206: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
207:
208: END create_assent;
209:
210: --------------------------------------

Line 223: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

219: p_astv_rec IN astv_rec_type,
220: x_astv_rec OUT NOCOPY astv_rec_type) IS
221: l_api_name CONSTANT VARCHAR2(30) := 'update_assent';
222: l_astv_rec astv_rec_type := p_astv_rec;
223: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
224:
225: BEGIN
226: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
227: p_init_msg_list,

Line 226: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

222: l_astv_rec astv_rec_type := p_astv_rec;
223: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
224:
225: BEGIN
226: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
227: p_init_msg_list,
228: '_PUB',
229: x_return_status);
230: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

226: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
227: p_init_msg_list,
228: '_PUB',
229: x_return_status);
230: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
231: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
232: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
233: raise OKC_API.G_EXCEPTION_ERROR;
234: END IF;

Line 231: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

227: p_init_msg_list,
228: '_PUB',
229: x_return_status);
230: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
231: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
232: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
233: raise OKC_API.G_EXCEPTION_ERROR;
234: END IF;
235:

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

228: '_PUB',
229: x_return_status);
230: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
231: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
232: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
233: raise OKC_API.G_EXCEPTION_ERROR;
234: END IF;
235:
236: -- Call user hook for BEFORE

Line 233: raise OKC_API.G_EXCEPTION_ERROR;

229: x_return_status);
230: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
231: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
232: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
233: raise OKC_API.G_EXCEPTION_ERROR;
234: END IF;
235:
236: -- Call user hook for BEFORE
237: g_astv_rec := l_astv_rec;

Line 239: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

235:
236: -- Call user hook for BEFORE
237: g_astv_rec := l_astv_rec;
238: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
239: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
240: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
241: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
242: raise OKC_API.G_EXCEPTION_ERROR;
243: END IF;

Line 240: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

236: -- Call user hook for BEFORE
237: g_astv_rec := l_astv_rec;
238: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
239: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
240: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
241: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
242: raise OKC_API.G_EXCEPTION_ERROR;
243: END IF;
244: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);

Line 241: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

237: g_astv_rec := l_astv_rec;
238: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
239: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
240: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
241: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
242: raise OKC_API.G_EXCEPTION_ERROR;
243: END IF;
244: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);
245:

Line 242: raise OKC_API.G_EXCEPTION_ERROR;

238: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
239: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
240: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
241: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
242: raise OKC_API.G_EXCEPTION_ERROR;
243: END IF;
244: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);
245:
246: OKC_ASSENT_PVT.update_assent(

Line 255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

251: x_msg_data,
252: l_astv_rec,
253: x_astv_rec);
254:
255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: raise OKC_API.G_EXCEPTION_ERROR;
259: END IF;

Line 256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

252: l_astv_rec,
253: x_astv_rec);
254:
255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: raise OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260:

Line 257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

253: x_astv_rec);
254:
255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: raise OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260:
261: -- Call user hook for AFTER

Line 258: raise OKC_API.G_EXCEPTION_ERROR;

254:
255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: raise OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260:
261: -- Call user hook for AFTER
262: g_astv_rec := x_astv_rec;

Line 264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

260:
261: -- Call user hook for AFTER
262: g_astv_rec := x_astv_rec;
263: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
265: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
267: raise OKC_API.G_EXCEPTION_ERROR;
268: END IF;

Line 265: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

261: -- Call user hook for AFTER
262: g_astv_rec := x_astv_rec;
263: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
265: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
267: raise OKC_API.G_EXCEPTION_ERROR;
268: END IF;
269: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

262: g_astv_rec := x_astv_rec;
263: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
265: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
267: raise OKC_API.G_EXCEPTION_ERROR;
268: END IF;
269: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
270: EXCEPTION

Line 267: raise OKC_API.G_EXCEPTION_ERROR;

263: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
265: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
267: raise OKC_API.G_EXCEPTION_ERROR;
268: END IF;
269: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
270: EXCEPTION
271: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

265: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
267: raise OKC_API.G_EXCEPTION_ERROR;
268: END IF;
269: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
270: EXCEPTION
271: WHEN OKC_API.G_EXCEPTION_ERROR THEN
272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
273: (l_api_name,

Line 271: WHEN OKC_API.G_EXCEPTION_ERROR THEN

267: raise OKC_API.G_EXCEPTION_ERROR;
268: END IF;
269: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
270: EXCEPTION
271: WHEN OKC_API.G_EXCEPTION_ERROR THEN
272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
273: (l_api_name,
274: G_PKG_NAME,
275: 'OKC_API.G_RET_STS_ERROR',

Line 272: x_return_status := OKC_API.HANDLE_EXCEPTIONS

268: END IF;
269: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
270: EXCEPTION
271: WHEN OKC_API.G_EXCEPTION_ERROR THEN
272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
273: (l_api_name,
274: G_PKG_NAME,
275: 'OKC_API.G_RET_STS_ERROR',
276: x_msg_count,

Line 275: 'OKC_API.G_RET_STS_ERROR',

271: WHEN OKC_API.G_EXCEPTION_ERROR THEN
272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
273: (l_api_name,
274: G_PKG_NAME,
275: 'OKC_API.G_RET_STS_ERROR',
276: x_msg_count,
277: x_msg_data,
278: '_PUB');
279: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 279: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

275: 'OKC_API.G_RET_STS_ERROR',
276: x_msg_count,
277: x_msg_data,
278: '_PUB');
279: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
280: x_return_status := OKC_API.HANDLE_EXCEPTIONS
281: (l_api_name,
282: G_PKG_NAME,
283: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 280: x_return_status := OKC_API.HANDLE_EXCEPTIONS

276: x_msg_count,
277: x_msg_data,
278: '_PUB');
279: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
280: x_return_status := OKC_API.HANDLE_EXCEPTIONS
281: (l_api_name,
282: G_PKG_NAME,
283: 'OKC_API.G_RET_STS_UNEXP_ERROR',
284: x_msg_count,

Line 283: 'OKC_API.G_RET_STS_UNEXP_ERROR',

279: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
280: x_return_status := OKC_API.HANDLE_EXCEPTIONS
281: (l_api_name,
282: G_PKG_NAME,
283: 'OKC_API.G_RET_STS_UNEXP_ERROR',
284: x_msg_count,
285: x_msg_data,
286: '_PUB');
287: WHEN OTHERS THEN

Line 288: x_return_status := OKC_API.HANDLE_EXCEPTIONS

284: x_msg_count,
285: x_msg_data,
286: '_PUB');
287: WHEN OTHERS THEN
288: x_return_status := OKC_API.HANDLE_EXCEPTIONS
289: (l_api_name,
290: G_PKG_NAME,
291: 'OTHERS',
292: x_msg_count,

Line 311: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

307: p_astv_tbl IN astv_tbl_type,
308: x_astv_tbl OUT NOCOPY astv_tbl_type) IS
309: l_api_name CONSTANT VARCHAR2(30) := 'update_assent';
310: i NUMBER := 0;
311: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
312:
313: BEGIN
314: x_return_status := OKC_API.G_RET_STS_SUCCESS;
315: IF p_astv_tbl.COUNT > 0 THEN

Line 314: x_return_status := OKC_API.G_RET_STS_SUCCESS;

310: i NUMBER := 0;
311: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
312:
313: BEGIN
314: x_return_status := OKC_API.G_RET_STS_SUCCESS;
315: IF p_astv_tbl.COUNT > 0 THEN
316: i := p_astv_tbl.FIRST;
317: LOOP
318: update_assent(

Line 326: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

322: x_msg_count => x_msg_count,
323: x_msg_data => x_msg_data,
324: p_astv_rec => p_astv_tbl(i),
325: x_astv_rec => x_astv_tbl(i));
326: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
327: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
328: x_return_status := l_return_status;
329: raise G_EXCEPTION_HALT_VALIDATION;
330: ELSE

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

323: x_msg_data => x_msg_data,
324: p_astv_rec => p_astv_tbl(i),
325: x_astv_rec => x_astv_tbl(i));
326: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
327: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
328: x_return_status := l_return_status;
329: raise G_EXCEPTION_HALT_VALIDATION;
330: ELSE
331: x_return_status := l_return_status;

Line 342: OKC_API.set_message(p_app_name => g_app_name,

338: EXCEPTION
339: WHEN G_EXCEPTION_HALT_VALIDATION THEN
340: NULL;
341: WHEN OTHERS THEN
342: OKC_API.set_message(p_app_name => g_app_name,
343: p_msg_name => g_unexpected_error,
344: p_token1 => g_sqlcode_token,
345: p_token1_value => sqlcode,
346: p_token2 => g_sqlerrm_token,

Line 348: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

344: p_token1 => g_sqlcode_token,
345: p_token1_value => sqlcode,
346: p_token2 => g_sqlerrm_token,
347: p_token2_value => sqlerrm);
348: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
349:
350: END update_assent;
351:
352: --------------------------------------

Line 364: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

360: x_msg_data OUT NOCOPY VARCHAR2,
361: p_astv_rec IN astv_rec_type) IS
362: l_api_name CONSTANT VARCHAR2(30) := 'delete_assent';
363: l_astv_rec astv_rec_type := p_astv_rec;
364: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
365:
366: BEGIN
367: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
368: p_init_msg_list,

Line 367: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

363: l_astv_rec astv_rec_type := p_astv_rec;
364: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
365:
366: BEGIN
367: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
368: p_init_msg_list,
369: '_PUB',
370: x_return_status);
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

367: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
368: p_init_msg_list,
369: '_PUB',
370: x_return_status);
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
374: raise OKC_API.G_EXCEPTION_ERROR;
375: END IF;

Line 372: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

368: p_init_msg_list,
369: '_PUB',
370: x_return_status);
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
374: raise OKC_API.G_EXCEPTION_ERROR;
375: END IF;
376:

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

369: '_PUB',
370: x_return_status);
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
374: raise OKC_API.G_EXCEPTION_ERROR;
375: END IF;
376:
377: -- Call user hook for BEFORE

Line 374: raise OKC_API.G_EXCEPTION_ERROR;

370: x_return_status);
371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
372: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
374: raise OKC_API.G_EXCEPTION_ERROR;
375: END IF;
376:
377: -- Call user hook for BEFORE
378: g_astv_rec := l_astv_rec;

Line 380: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

376:
377: -- Call user hook for BEFORE
378: g_astv_rec := l_astv_rec;
379: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
380: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
381: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
383: raise OKC_API.G_EXCEPTION_ERROR;
384: END IF;

Line 381: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

377: -- Call user hook for BEFORE
378: g_astv_rec := l_astv_rec;
379: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
380: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
381: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
383: raise OKC_API.G_EXCEPTION_ERROR;
384: END IF;
385: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);

Line 382: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

378: g_astv_rec := l_astv_rec;
379: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
380: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
381: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
383: raise OKC_API.G_EXCEPTION_ERROR;
384: END IF;
385: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);
386:

Line 383: raise OKC_API.G_EXCEPTION_ERROR;

379: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
380: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
381: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
383: raise OKC_API.G_EXCEPTION_ERROR;
384: END IF;
385: l_astv_rec := migrate_astv(l_astv_rec, g_astv_rec);
386:
387: OKC_ASSENT_PVT.delete_assent(

Line 395: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

391: x_msg_count,
392: x_msg_data,
393: p_astv_rec);
394:
395: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
396: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
397: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
398: raise OKC_API.G_EXCEPTION_ERROR;
399: END IF;

Line 396: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

392: x_msg_data,
393: p_astv_rec);
394:
395: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
396: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
397: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
398: raise OKC_API.G_EXCEPTION_ERROR;
399: END IF;
400:

Line 397: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

393: p_astv_rec);
394:
395: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
396: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
397: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
398: raise OKC_API.G_EXCEPTION_ERROR;
399: END IF;
400:
401: -- Call user hook for AFTER

Line 398: raise OKC_API.G_EXCEPTION_ERROR;

394:
395: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
396: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
397: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
398: raise OKC_API.G_EXCEPTION_ERROR;
399: END IF;
400:
401: -- Call user hook for AFTER
402: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');

Line 403: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

399: END IF;
400:
401: -- Call user hook for AFTER
402: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
403: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
404: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
405: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
406: raise OKC_API.G_EXCEPTION_ERROR;
407: END IF;

Line 404: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

400:
401: -- Call user hook for AFTER
402: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
403: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
404: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
405: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
406: raise OKC_API.G_EXCEPTION_ERROR;
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 405: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

401: -- Call user hook for AFTER
402: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
403: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
404: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
405: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
406: raise OKC_API.G_EXCEPTION_ERROR;
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409: EXCEPTION

Line 406: raise OKC_API.G_EXCEPTION_ERROR;

402: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
403: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
404: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
405: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
406: raise OKC_API.G_EXCEPTION_ERROR;
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409: EXCEPTION
410: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

404: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
405: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
406: raise OKC_API.G_EXCEPTION_ERROR;
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409: EXCEPTION
410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (l_api_name,

Line 410: WHEN OKC_API.G_EXCEPTION_ERROR THEN

406: raise OKC_API.G_EXCEPTION_ERROR;
407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409: EXCEPTION
410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (l_api_name,
413: G_PKG_NAME,
414: 'OKC_API.G_RET_STS_ERROR',

Line 411: x_return_status := OKC_API.HANDLE_EXCEPTIONS

407: END IF;
408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
409: EXCEPTION
410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (l_api_name,
413: G_PKG_NAME,
414: 'OKC_API.G_RET_STS_ERROR',
415: x_msg_count,

Line 414: 'OKC_API.G_RET_STS_ERROR',

410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (l_api_name,
413: G_PKG_NAME,
414: 'OKC_API.G_RET_STS_ERROR',
415: x_msg_count,
416: x_msg_data,
417: '_PUB');
418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

414: 'OKC_API.G_RET_STS_ERROR',
415: x_msg_count,
416: x_msg_data,
417: '_PUB');
418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
419: x_return_status := OKC_API.HANDLE_EXCEPTIONS
420: (l_api_name,
421: G_PKG_NAME,
422: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 419: x_return_status := OKC_API.HANDLE_EXCEPTIONS

415: x_msg_count,
416: x_msg_data,
417: '_PUB');
418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
419: x_return_status := OKC_API.HANDLE_EXCEPTIONS
420: (l_api_name,
421: G_PKG_NAME,
422: 'OKC_API.G_RET_STS_UNEXP_ERROR',
423: x_msg_count,

Line 422: 'OKC_API.G_RET_STS_UNEXP_ERROR',

418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
419: x_return_status := OKC_API.HANDLE_EXCEPTIONS
420: (l_api_name,
421: G_PKG_NAME,
422: 'OKC_API.G_RET_STS_UNEXP_ERROR',
423: x_msg_count,
424: x_msg_data,
425: '_PUB');
426: WHEN OTHERS THEN

Line 427: x_return_status := OKC_API.HANDLE_EXCEPTIONS

423: x_msg_count,
424: x_msg_data,
425: '_PUB');
426: WHEN OTHERS THEN
427: x_return_status := OKC_API.HANDLE_EXCEPTIONS
428: (l_api_name,
429: G_PKG_NAME,
430: 'OTHERS',
431: x_msg_count,

Line 449: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

445: x_msg_data OUT NOCOPY VARCHAR2,
446: p_astv_tbl IN astv_tbl_type) IS
447: l_api_name CONSTANT VARCHAR2(30) := 'delete_assent';
448: i NUMBER := 0;
449: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
450:
451: BEGIN
452: x_return_status := OKC_API.G_RET_STS_SUCCESS;
453: IF p_astv_tbl.COUNT > 0 THEN

Line 452: x_return_status := OKC_API.G_RET_STS_SUCCESS;

448: i NUMBER := 0;
449: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
450:
451: BEGIN
452: x_return_status := OKC_API.G_RET_STS_SUCCESS;
453: IF p_astv_tbl.COUNT > 0 THEN
454: i := p_astv_tbl.FIRST;
455: LOOP
456: delete_assent(

Line 463: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

459: x_return_status => l_return_status,
460: x_msg_count => x_msg_count,
461: x_msg_data => x_msg_data,
462: p_astv_rec => p_astv_tbl(i));
463: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
464: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
465: x_return_status := l_return_status;
466: raise G_EXCEPTION_HALT_VALIDATION;
467: ELSE

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

460: x_msg_count => x_msg_count,
461: x_msg_data => x_msg_data,
462: p_astv_rec => p_astv_tbl(i));
463: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
464: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
465: x_return_status := l_return_status;
466: raise G_EXCEPTION_HALT_VALIDATION;
467: ELSE
468: x_return_status := l_return_status;

Line 479: OKC_API.set_message(p_app_name => g_app_name,

475: EXCEPTION
476: WHEN G_EXCEPTION_HALT_VALIDATION THEN
477: NULL;
478: WHEN OTHERS THEN
479: OKC_API.set_message(p_app_name => g_app_name,
480: p_msg_name => g_unexpected_error,
481: p_token1 => g_sqlcode_token,
482: p_token1_value => sqlcode,
483: p_token2 => g_sqlerrm_token,

Line 485: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

481: p_token1 => g_sqlcode_token,
482: p_token1_value => sqlcode,
483: p_token2 => g_sqlerrm_token,
484: p_token2_value => sqlerrm);
485: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
486:
487: END delete_assent;
488:
489: --------------------------------------

Line 521: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

517: x_msg_data OUT NOCOPY VARCHAR2,
518: p_astv_tbl IN astv_tbl_type) IS
519: l_api_name CONSTANT VARCHAR2(30) := 'validate_assent';
520: i NUMBER := 0;
521: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
522:
523: BEGIN
524: x_return_status := OKC_API.G_RET_STS_SUCCESS;
525: IF p_astv_tbl.COUNT > 0 THEN

Line 524: x_return_status := OKC_API.G_RET_STS_SUCCESS;

520: i NUMBER := 0;
521: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
522:
523: BEGIN
524: x_return_status := OKC_API.G_RET_STS_SUCCESS;
525: IF p_astv_tbl.COUNT > 0 THEN
526: i := p_astv_tbl.FIRST;
527: LOOP
528: validate_assent(

Line 535: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

531: x_return_status => l_return_status,
532: x_msg_count => x_msg_count,
533: x_msg_data => x_msg_data,
534: p_astv_rec => p_astv_tbl(i));
535: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
536: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
537: x_return_status := l_return_status;
538: raise G_EXCEPTION_HALT_VALIDATION;
539: ELSE

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

532: x_msg_count => x_msg_count,
533: x_msg_data => x_msg_data,
534: p_astv_rec => p_astv_tbl(i));
535: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
536: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
537: x_return_status := l_return_status;
538: raise G_EXCEPTION_HALT_VALIDATION;
539: ELSE
540: x_return_status := l_return_status;

Line 551: OKC_API.set_message(p_app_name => g_app_name,

547: EXCEPTION
548: WHEN G_EXCEPTION_HALT_VALIDATION THEN
549: NULL;
550: WHEN OTHERS THEN
551: OKC_API.set_message(p_app_name => g_app_name,
552: p_msg_name => g_unexpected_error,
553: p_token1 => g_sqlcode_token,
554: p_token1_value => sqlcode,
555: p_token2 => g_sqlerrm_token,

Line 557: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

553: p_token1 => g_sqlcode_token,
554: p_token1_value => sqlcode,
555: p_token2 => g_sqlerrm_token,
556: p_token2_value => sqlerrm);
557: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
558:
559: END validate_assent;
560:
561: --------------------------------------

Line 594: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

590: x_msg_data OUT NOCOPY VARCHAR2,
591: p_astv_tbl IN astv_tbl_type) IS
592: l_api_name CONSTANT VARCHAR2(30) := 'lock_assent';
593: i NUMBER := 0;
594: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
595:
596: BEGIN
597: x_return_status := OKC_API.G_RET_STS_SUCCESS;
598: IF p_astv_tbl.COUNT > 0 THEN

Line 597: x_return_status := OKC_API.G_RET_STS_SUCCESS;

593: i NUMBER := 0;
594: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
595:
596: BEGIN
597: x_return_status := OKC_API.G_RET_STS_SUCCESS;
598: IF p_astv_tbl.COUNT > 0 THEN
599: i := p_astv_tbl.FIRST;
600: LOOP
601: lock_assent(

Line 608: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

604: x_return_status => l_return_status,
605: x_msg_count => x_msg_count,
606: x_msg_data => x_msg_data,
607: p_astv_rec => p_astv_tbl(i));
608: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
610: x_return_status := l_return_status;
611: raise G_EXCEPTION_HALT_VALIDATION;
612: ELSE

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

605: x_msg_count => x_msg_count,
606: x_msg_data => x_msg_data,
607: p_astv_rec => p_astv_tbl(i));
608: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
610: x_return_status := l_return_status;
611: raise G_EXCEPTION_HALT_VALIDATION;
612: ELSE
613: x_return_status := l_return_status;

Line 624: OKC_API.set_message(p_app_name => g_app_name,

620: EXCEPTION
621: WHEN G_EXCEPTION_HALT_VALIDATION THEN
622: NULL;
623: WHEN OTHERS THEN
624: OKC_API.set_message(p_app_name => g_app_name,
625: p_msg_name => g_unexpected_error,
626: p_token1 => g_sqlcode_token,
627: p_token1_value => sqlcode,
628: p_token2 => g_sqlerrm_token,

Line 630: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

626: p_token1 => g_sqlcode_token,
627: p_token1_value => sqlcode,
628: p_token2 => g_sqlerrm_token,
629: p_token2_value => sqlerrm);
630: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
631:
632: END lock_assent;
633:
634: --------------------------------------

Line 677: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

673: p_stsv_rec IN stsv_rec_type,
674: x_stsv_rec OUT NOCOPY stsv_rec_type) IS
675: l_api_name CONSTANT VARCHAR2(30) := 'create_status';
676: l_stsv_rec stsv_rec_type := p_stsv_rec;
677: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
678:
679: BEGIN
680: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
681: p_init_msg_list,

Line 680: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

676: l_stsv_rec stsv_rec_type := p_stsv_rec;
677: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
678:
679: BEGIN
680: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
681: p_init_msg_list,
682: '_PUB',
683: x_return_status);
684: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

680: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
681: p_init_msg_list,
682: '_PUB',
683: x_return_status);
684: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
685: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
686: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
687: raise OKC_API.G_EXCEPTION_ERROR;
688: END IF;

Line 685: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

681: p_init_msg_list,
682: '_PUB',
683: x_return_status);
684: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
685: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
686: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
687: raise OKC_API.G_EXCEPTION_ERROR;
688: END IF;
689:

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

682: '_PUB',
683: x_return_status);
684: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
685: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
686: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
687: raise OKC_API.G_EXCEPTION_ERROR;
688: END IF;
689:
690: -- Call user hook for BEFORE

Line 687: raise OKC_API.G_EXCEPTION_ERROR;

683: x_return_status);
684: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
685: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
686: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
687: raise OKC_API.G_EXCEPTION_ERROR;
688: END IF;
689:
690: -- Call user hook for BEFORE
691: g_stsv_rec := l_stsv_rec;

Line 693: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

689:
690: -- Call user hook for BEFORE
691: g_stsv_rec := l_stsv_rec;
692: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
693: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: raise OKC_API.G_EXCEPTION_ERROR;
697: END IF;

Line 694: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

690: -- Call user hook for BEFORE
691: g_stsv_rec := l_stsv_rec;
692: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
693: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: raise OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);

Line 695: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

691: g_stsv_rec := l_stsv_rec;
692: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
693: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: raise OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);
699:

Line 696: raise OKC_API.G_EXCEPTION_ERROR;

692: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
693: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: raise OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);
699:
700: OKC_ASSENT_PVT.create_status(

Line 708: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

704: x_msg_count,
705: x_msg_data,
706: l_stsv_rec,
707: x_stsv_rec);
708: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: raise OKC_API.G_EXCEPTION_ERROR;
712: END IF;

Line 709: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

705: x_msg_data,
706: l_stsv_rec,
707: x_stsv_rec);
708: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: raise OKC_API.G_EXCEPTION_ERROR;
712: END IF;
713:

Line 710: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

706: l_stsv_rec,
707: x_stsv_rec);
708: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: raise OKC_API.G_EXCEPTION_ERROR;
712: END IF;
713:
714: -- Call user hook for AFTER

Line 711: raise OKC_API.G_EXCEPTION_ERROR;

707: x_stsv_rec);
708: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: raise OKC_API.G_EXCEPTION_ERROR;
712: END IF;
713:
714: -- Call user hook for AFTER
715: g_stsv_rec := x_stsv_rec;

Line 717: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

713:
714: -- Call user hook for AFTER
715: g_stsv_rec := x_stsv_rec;
716: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
717: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;

Line 718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

714: -- Call user hook for AFTER
715: g_stsv_rec := x_stsv_rec;
716: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
717: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 719: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

715: g_stsv_rec := x_stsv_rec;
716: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
717: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
723: EXCEPTION

Line 720: raise OKC_API.G_EXCEPTION_ERROR;

716: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
717: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
723: EXCEPTION
724: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
723: EXCEPTION
724: WHEN OKC_API.G_EXCEPTION_ERROR THEN
725: x_return_status := OKC_API.HANDLE_EXCEPTIONS
726: (l_api_name,

Line 724: WHEN OKC_API.G_EXCEPTION_ERROR THEN

720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
723: EXCEPTION
724: WHEN OKC_API.G_EXCEPTION_ERROR THEN
725: x_return_status := OKC_API.HANDLE_EXCEPTIONS
726: (l_api_name,
727: G_PKG_NAME,
728: 'OKC_API.G_RET_STS_ERROR',

Line 725: x_return_status := OKC_API.HANDLE_EXCEPTIONS

721: END IF;
722: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
723: EXCEPTION
724: WHEN OKC_API.G_EXCEPTION_ERROR THEN
725: x_return_status := OKC_API.HANDLE_EXCEPTIONS
726: (l_api_name,
727: G_PKG_NAME,
728: 'OKC_API.G_RET_STS_ERROR',
729: x_msg_count,

Line 728: 'OKC_API.G_RET_STS_ERROR',

724: WHEN OKC_API.G_EXCEPTION_ERROR THEN
725: x_return_status := OKC_API.HANDLE_EXCEPTIONS
726: (l_api_name,
727: G_PKG_NAME,
728: 'OKC_API.G_RET_STS_ERROR',
729: x_msg_count,
730: x_msg_data,
731: '_PUB');
732: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 732: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

728: 'OKC_API.G_RET_STS_ERROR',
729: x_msg_count,
730: x_msg_data,
731: '_PUB');
732: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS
734: (l_api_name,
735: G_PKG_NAME,
736: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 733: x_return_status := OKC_API.HANDLE_EXCEPTIONS

729: x_msg_count,
730: x_msg_data,
731: '_PUB');
732: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS
734: (l_api_name,
735: G_PKG_NAME,
736: 'OKC_API.G_RET_STS_UNEXP_ERROR',
737: x_msg_count,

Line 736: 'OKC_API.G_RET_STS_UNEXP_ERROR',

732: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS
734: (l_api_name,
735: G_PKG_NAME,
736: 'OKC_API.G_RET_STS_UNEXP_ERROR',
737: x_msg_count,
738: x_msg_data,
739: '_PUB');
740: WHEN OTHERS THEN

Line 741: x_return_status := OKC_API.HANDLE_EXCEPTIONS

737: x_msg_count,
738: x_msg_data,
739: '_PUB');
740: WHEN OTHERS THEN
741: x_return_status := OKC_API.HANDLE_EXCEPTIONS
742: (l_api_name,
743: G_PKG_NAME,
744: 'OTHERS',
745: x_msg_count,

Line 764: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

760: p_stsv_tbl IN stsv_tbl_type,
761: x_stsv_tbl OUT NOCOPY stsv_tbl_type) IS
762: l_api_name CONSTANT VARCHAR2(30) := 'create_status';
763: i NUMBER := 0;
764: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
765:
766: BEGIN
767: x_return_status := OKC_API.G_RET_STS_SUCCESS;
768: IF p_stsv_tbl.COUNT > 0 THEN

Line 767: x_return_status := OKC_API.G_RET_STS_SUCCESS;

763: i NUMBER := 0;
764: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
765:
766: BEGIN
767: x_return_status := OKC_API.G_RET_STS_SUCCESS;
768: IF p_stsv_tbl.COUNT > 0 THEN
769: i := p_stsv_tbl.FIRST;
770: LOOP
771: create_status(

Line 779: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

775: x_msg_count => x_msg_count,
776: x_msg_data => x_msg_data,
777: p_stsv_rec => p_stsv_tbl(i),
778: x_stsv_rec => x_stsv_tbl(i));
779: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
780: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
781: x_return_status := l_return_status;
782: raise G_EXCEPTION_HALT_VALIDATION;
783: ELSE

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

776: x_msg_data => x_msg_data,
777: p_stsv_rec => p_stsv_tbl(i),
778: x_stsv_rec => x_stsv_tbl(i));
779: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
780: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
781: x_return_status := l_return_status;
782: raise G_EXCEPTION_HALT_VALIDATION;
783: ELSE
784: x_return_status := l_return_status;

Line 795: OKC_API.set_message(p_app_name => g_app_name,

791: EXCEPTION
792: WHEN G_EXCEPTION_HALT_VALIDATION THEN
793: NULL;
794: WHEN OTHERS THEN
795: OKC_API.set_message(p_app_name => g_app_name,
796: p_msg_name => g_unexpected_error,
797: p_token1 => g_sqlcode_token,
798: p_token1_value => sqlcode,
799: p_token2 => g_sqlerrm_token,

Line 801: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

797: p_token1 => g_sqlcode_token,
798: p_token1_value => sqlcode,
799: p_token2 => g_sqlerrm_token,
800: p_token2_value => sqlerrm);
801: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
802:
803: END create_status;
804:
805: --------------------------------------

Line 818: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

814: p_stsv_rec IN stsv_rec_type,
815: x_stsv_rec OUT NOCOPY stsv_rec_type) IS
816: l_api_name CONSTANT VARCHAR2(30) := 'update_status';
817: l_stsv_rec stsv_rec_type := p_stsv_rec;
818: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
819:
820: BEGIN
821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
822: p_init_msg_list,

Line 821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

817: l_stsv_rec stsv_rec_type := p_stsv_rec;
818: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
819:
820: BEGIN
821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
822: p_init_msg_list,
823: '_PUB',
824: x_return_status);
825: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
822: p_init_msg_list,
823: '_PUB',
824: x_return_status);
825: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
826: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
827: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
828: raise OKC_API.G_EXCEPTION_ERROR;
829: END IF;

Line 826: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

822: p_init_msg_list,
823: '_PUB',
824: x_return_status);
825: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
826: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
827: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
828: raise OKC_API.G_EXCEPTION_ERROR;
829: END IF;
830:

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

823: '_PUB',
824: x_return_status);
825: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
826: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
827: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
828: raise OKC_API.G_EXCEPTION_ERROR;
829: END IF;
830:
831: -- Call user hook for BEFORE

Line 828: raise OKC_API.G_EXCEPTION_ERROR;

824: x_return_status);
825: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
826: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
827: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
828: raise OKC_API.G_EXCEPTION_ERROR;
829: END IF;
830:
831: -- Call user hook for BEFORE
832: g_stsv_rec := l_stsv_rec;

Line 834: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

830:
831: -- Call user hook for BEFORE
832: g_stsv_rec := l_stsv_rec;
833: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
834: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
835: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
836: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
837: raise OKC_API.G_EXCEPTION_ERROR;
838: END IF;

Line 835: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

831: -- Call user hook for BEFORE
832: g_stsv_rec := l_stsv_rec;
833: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
834: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
835: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
836: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
837: raise OKC_API.G_EXCEPTION_ERROR;
838: END IF;
839: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);

Line 836: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

832: g_stsv_rec := l_stsv_rec;
833: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
834: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
835: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
836: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
837: raise OKC_API.G_EXCEPTION_ERROR;
838: END IF;
839: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);
840:

Line 837: raise OKC_API.G_EXCEPTION_ERROR;

833: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
834: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
835: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
836: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
837: raise OKC_API.G_EXCEPTION_ERROR;
838: END IF;
839: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);
840:
841: OKC_ASSENT_PVT.update_status(

Line 849: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

845: x_msg_count,
846: x_msg_data,
847: l_stsv_rec,
848: x_stsv_rec);
849: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
850: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
851: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
852: raise OKC_API.G_EXCEPTION_ERROR;
853: END IF;

Line 850: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

846: x_msg_data,
847: l_stsv_rec,
848: x_stsv_rec);
849: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
850: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
851: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
852: raise OKC_API.G_EXCEPTION_ERROR;
853: END IF;
854:

Line 851: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

847: l_stsv_rec,
848: x_stsv_rec);
849: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
850: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
851: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
852: raise OKC_API.G_EXCEPTION_ERROR;
853: END IF;
854:
855: -- Call user hook for AFTER

Line 852: raise OKC_API.G_EXCEPTION_ERROR;

848: x_stsv_rec);
849: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
850: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
851: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
852: raise OKC_API.G_EXCEPTION_ERROR;
853: END IF;
854:
855: -- Call user hook for AFTER
856: g_stsv_rec := x_stsv_rec;

Line 858: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

854:
855: -- Call user hook for AFTER
856: g_stsv_rec := x_stsv_rec;
857: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
858: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
859: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
861: raise OKC_API.G_EXCEPTION_ERROR;
862: END IF;

Line 859: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

855: -- Call user hook for AFTER
856: g_stsv_rec := x_stsv_rec;
857: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
858: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
859: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
861: raise OKC_API.G_EXCEPTION_ERROR;
862: END IF;
863: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 860: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

856: g_stsv_rec := x_stsv_rec;
857: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
858: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
859: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
861: raise OKC_API.G_EXCEPTION_ERROR;
862: END IF;
863: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
864: EXCEPTION

Line 861: raise OKC_API.G_EXCEPTION_ERROR;

857: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
858: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
859: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
861: raise OKC_API.G_EXCEPTION_ERROR;
862: END IF;
863: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
864: EXCEPTION
865: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

859: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
861: raise OKC_API.G_EXCEPTION_ERROR;
862: END IF;
863: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
864: EXCEPTION
865: WHEN OKC_API.G_EXCEPTION_ERROR THEN
866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
867: (l_api_name,

Line 865: WHEN OKC_API.G_EXCEPTION_ERROR THEN

861: raise OKC_API.G_EXCEPTION_ERROR;
862: END IF;
863: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
864: EXCEPTION
865: WHEN OKC_API.G_EXCEPTION_ERROR THEN
866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
867: (l_api_name,
868: G_PKG_NAME,
869: 'OKC_API.G_RET_STS_ERROR',

Line 866: x_return_status := OKC_API.HANDLE_EXCEPTIONS

862: END IF;
863: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
864: EXCEPTION
865: WHEN OKC_API.G_EXCEPTION_ERROR THEN
866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
867: (l_api_name,
868: G_PKG_NAME,
869: 'OKC_API.G_RET_STS_ERROR',
870: x_msg_count,

Line 869: 'OKC_API.G_RET_STS_ERROR',

865: WHEN OKC_API.G_EXCEPTION_ERROR THEN
866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
867: (l_api_name,
868: G_PKG_NAME,
869: 'OKC_API.G_RET_STS_ERROR',
870: x_msg_count,
871: x_msg_data,
872: '_PUB');
873: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 873: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

869: 'OKC_API.G_RET_STS_ERROR',
870: x_msg_count,
871: x_msg_data,
872: '_PUB');
873: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
874: x_return_status := OKC_API.HANDLE_EXCEPTIONS
875: (l_api_name,
876: G_PKG_NAME,
877: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 874: x_return_status := OKC_API.HANDLE_EXCEPTIONS

870: x_msg_count,
871: x_msg_data,
872: '_PUB');
873: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
874: x_return_status := OKC_API.HANDLE_EXCEPTIONS
875: (l_api_name,
876: G_PKG_NAME,
877: 'OKC_API.G_RET_STS_UNEXP_ERROR',
878: x_msg_count,

Line 877: 'OKC_API.G_RET_STS_UNEXP_ERROR',

873: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
874: x_return_status := OKC_API.HANDLE_EXCEPTIONS
875: (l_api_name,
876: G_PKG_NAME,
877: 'OKC_API.G_RET_STS_UNEXP_ERROR',
878: x_msg_count,
879: x_msg_data,
880: '_PUB');
881: WHEN OTHERS THEN

Line 882: x_return_status := OKC_API.HANDLE_EXCEPTIONS

878: x_msg_count,
879: x_msg_data,
880: '_PUB');
881: WHEN OTHERS THEN
882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (l_api_name,
884: G_PKG_NAME,
885: 'OTHERS',
886: x_msg_count,

Line 905: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

901: p_stsv_tbl IN stsv_tbl_type,
902: x_stsv_tbl OUT NOCOPY stsv_tbl_type) IS
903: l_api_name CONSTANT VARCHAR2(30) := 'update_status';
904: i NUMBER := 0;
905: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
906:
907: BEGIN
908: x_return_status := OKC_API.G_RET_STS_SUCCESS;
909: IF p_stsv_tbl.COUNT > 0 THEN

Line 908: x_return_status := OKC_API.G_RET_STS_SUCCESS;

904: i NUMBER := 0;
905: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
906:
907: BEGIN
908: x_return_status := OKC_API.G_RET_STS_SUCCESS;
909: IF p_stsv_tbl.COUNT > 0 THEN
910: i := p_stsv_tbl.FIRST;
911: LOOP
912: update_status(

Line 920: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

916: x_msg_count => x_msg_count,
917: x_msg_data => x_msg_data,
918: p_stsv_rec => p_stsv_tbl(i),
919: x_stsv_rec => x_stsv_tbl(i));
920: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
922: x_return_status := l_return_status;
923: raise G_EXCEPTION_HALT_VALIDATION;
924: ELSE

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

917: x_msg_data => x_msg_data,
918: p_stsv_rec => p_stsv_tbl(i),
919: x_stsv_rec => x_stsv_tbl(i));
920: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
922: x_return_status := l_return_status;
923: raise G_EXCEPTION_HALT_VALIDATION;
924: ELSE
925: x_return_status := l_return_status;

Line 936: OKC_API.set_message(p_app_name => g_app_name,

932: EXCEPTION
933: WHEN G_EXCEPTION_HALT_VALIDATION THEN
934: NULL;
935: WHEN OTHERS THEN
936: OKC_API.set_message(p_app_name => g_app_name,
937: p_msg_name => g_unexpected_error,
938: p_token1 => g_sqlcode_token,
939: p_token1_value => sqlcode,
940: p_token2 => g_sqlerrm_token,

Line 942: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

938: p_token1 => g_sqlcode_token,
939: p_token1_value => sqlcode,
940: p_token2 => g_sqlerrm_token,
941: p_token2_value => sqlerrm);
942: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
943:
944: END update_status;
945:
946: --------------------------------------

Line 958: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

954: x_msg_data OUT NOCOPY VARCHAR2,
955: p_stsv_rec IN stsv_rec_type) IS
956: l_api_name CONSTANT VARCHAR2(30) := 'delete_status';
957: l_stsv_rec stsv_rec_type := p_stsv_rec;
958: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
959:
960: BEGIN
961: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
962: p_init_msg_list,

Line 961: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

957: l_stsv_rec stsv_rec_type := p_stsv_rec;
958: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
959:
960: BEGIN
961: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
962: p_init_msg_list,
963: '_PUB',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

961: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
962: p_init_msg_list,
963: '_PUB',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: raise OKC_API.G_EXCEPTION_ERROR;
969: END IF;

Line 966: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

962: p_init_msg_list,
963: '_PUB',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: raise OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970:

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

963: '_PUB',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: raise OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970:
971: -- Call user hook for BEFORE

Line 968: raise OKC_API.G_EXCEPTION_ERROR;

964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: raise OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970:
971: -- Call user hook for BEFORE
972: g_stsv_rec := l_stsv_rec;

Line 974: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

970:
971: -- Call user hook for BEFORE
972: g_stsv_rec := l_stsv_rec;
973: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
974: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
975: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
976: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
977: raise OKC_API.G_EXCEPTION_ERROR;
978: END IF;

Line 975: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

971: -- Call user hook for BEFORE
972: g_stsv_rec := l_stsv_rec;
973: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
974: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
975: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
976: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
977: raise OKC_API.G_EXCEPTION_ERROR;
978: END IF;
979: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);

Line 976: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

972: g_stsv_rec := l_stsv_rec;
973: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
974: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
975: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
976: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
977: raise OKC_API.G_EXCEPTION_ERROR;
978: END IF;
979: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);
980:

Line 977: raise OKC_API.G_EXCEPTION_ERROR;

973: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
974: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
975: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
976: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
977: raise OKC_API.G_EXCEPTION_ERROR;
978: END IF;
979: l_stsv_rec := migrate_stsv(l_stsv_rec, g_stsv_rec);
980:
981: OKC_ASSENT_PVT.delete_status(

Line 988: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

984: x_return_status,
985: x_msg_count,
986: x_msg_data,
987: p_stsv_rec);
988: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
991: raise OKC_API.G_EXCEPTION_ERROR;
992: END IF;

Line 989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

985: x_msg_count,
986: x_msg_data,
987: p_stsv_rec);
988: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
991: raise OKC_API.G_EXCEPTION_ERROR;
992: END IF;
993:

Line 990: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

986: x_msg_data,
987: p_stsv_rec);
988: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
991: raise OKC_API.G_EXCEPTION_ERROR;
992: END IF;
993:
994: -- Call user hook for AFTER

Line 991: raise OKC_API.G_EXCEPTION_ERROR;

987: p_stsv_rec);
988: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
991: raise OKC_API.G_EXCEPTION_ERROR;
992: END IF;
993:
994: -- Call user hook for AFTER
995: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');

Line 996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

992: END IF;
993:
994: -- Call user hook for AFTER
995: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: END IF;

Line 997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

993:
994: -- Call user hook for AFTER
995: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: END IF;
1001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

994: -- Call user hook for AFTER
995: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: END IF;
1001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION

Line 999: raise OKC_API.G_EXCEPTION_ERROR;

995: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: END IF;
1001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: END IF;
1001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1004: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1005: (l_api_name,

Line 1003: WHEN OKC_API.G_EXCEPTION_ERROR THEN

999: raise OKC_API.G_EXCEPTION_ERROR;
1000: END IF;
1001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1004: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1005: (l_api_name,
1006: G_PKG_NAME,
1007: 'OKC_API.G_RET_STS_ERROR',

Line 1004: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1000: END IF;
1001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1004: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1005: (l_api_name,
1006: G_PKG_NAME,
1007: 'OKC_API.G_RET_STS_ERROR',
1008: x_msg_count,

Line 1007: 'OKC_API.G_RET_STS_ERROR',

1003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1004: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1005: (l_api_name,
1006: G_PKG_NAME,
1007: 'OKC_API.G_RET_STS_ERROR',
1008: x_msg_count,
1009: x_msg_data,
1010: '_PUB');
1011: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1011: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1007: 'OKC_API.G_RET_STS_ERROR',
1008: x_msg_count,
1009: x_msg_data,
1010: '_PUB');
1011: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1013: (l_api_name,
1014: G_PKG_NAME,
1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1012: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1008: x_msg_count,
1009: x_msg_data,
1010: '_PUB');
1011: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1013: (l_api_name,
1014: G_PKG_NAME,
1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1016: x_msg_count,

Line 1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1011: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1013: (l_api_name,
1014: G_PKG_NAME,
1015: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1016: x_msg_count,
1017: x_msg_data,
1018: '_PUB');
1019: WHEN OTHERS THEN

Line 1020: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1016: x_msg_count,
1017: x_msg_data,
1018: '_PUB');
1019: WHEN OTHERS THEN
1020: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1021: (l_api_name,
1022: G_PKG_NAME,
1023: 'OTHERS',
1024: x_msg_count,

Line 1042: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1038: x_msg_data OUT NOCOPY VARCHAR2,
1039: p_stsv_tbl IN stsv_tbl_type) IS
1040: l_api_name CONSTANT VARCHAR2(30) := 'delete_status';
1041: i NUMBER := 0;
1042: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1043:
1044: BEGIN
1045: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1046: IF p_stsv_tbl.COUNT > 0 THEN

Line 1045: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1041: i NUMBER := 0;
1042: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1043:
1044: BEGIN
1045: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1046: IF p_stsv_tbl.COUNT > 0 THEN
1047: i := p_stsv_tbl.FIRST;
1048: LOOP
1049: delete_status(

Line 1056: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1052: x_return_status => l_return_status,
1053: x_msg_count => x_msg_count,
1054: x_msg_data => x_msg_data,
1055: p_stsv_rec => p_stsv_tbl(i));
1056: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: x_return_status := l_return_status;
1059: raise G_EXCEPTION_HALT_VALIDATION;
1060: ELSE

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

1053: x_msg_count => x_msg_count,
1054: x_msg_data => x_msg_data,
1055: p_stsv_rec => p_stsv_tbl(i));
1056: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: x_return_status := l_return_status;
1059: raise G_EXCEPTION_HALT_VALIDATION;
1060: ELSE
1061: x_return_status := l_return_status;

Line 1072: OKC_API.set_message(p_app_name => g_app_name,

1068: EXCEPTION
1069: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1070: NULL;
1071: WHEN OTHERS THEN
1072: OKC_API.set_message(p_app_name => g_app_name,
1073: p_msg_name => g_unexpected_error,
1074: p_token1 => g_sqlcode_token,
1075: p_token1_value => sqlcode,
1076: p_token2 => g_sqlerrm_token,

Line 1078: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1074: p_token1 => g_sqlcode_token,
1075: p_token1_value => sqlcode,
1076: p_token2 => g_sqlerrm_token,
1077: p_token2_value => sqlerrm);
1078: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1079:
1080: END delete_status;
1081:
1082: --------------------------------------

Line 1115: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1111: x_msg_data OUT NOCOPY VARCHAR2,
1112: p_stsv_tbl IN stsv_tbl_type) IS
1113: l_api_name CONSTANT VARCHAR2(30) := 'lock_status';
1114: i NUMBER := 0;
1115: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1116:
1117: BEGIN
1118: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1119: IF p_stsv_tbl.COUNT > 0 THEN

Line 1118: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1114: i NUMBER := 0;
1115: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1116:
1117: BEGIN
1118: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1119: IF p_stsv_tbl.COUNT > 0 THEN
1120: i := p_stsv_tbl.FIRST;
1121: LOOP
1122: lock_status(

Line 1129: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1125: x_return_status => l_return_status,
1126: x_msg_count => x_msg_count,
1127: x_msg_data => x_msg_data,
1128: p_stsv_rec => p_stsv_tbl(i));
1129: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1130: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1131: x_return_status := l_return_status;
1132: raise G_EXCEPTION_HALT_VALIDATION;
1133: ELSE

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

1126: x_msg_count => x_msg_count,
1127: x_msg_data => x_msg_data,
1128: p_stsv_rec => p_stsv_tbl(i));
1129: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1130: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1131: x_return_status := l_return_status;
1132: raise G_EXCEPTION_HALT_VALIDATION;
1133: ELSE
1134: x_return_status := l_return_status;

Line 1145: OKC_API.set_message(p_app_name => g_app_name,

1141: EXCEPTION
1142: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1143: NULL;
1144: WHEN OTHERS THEN
1145: OKC_API.set_message(p_app_name => g_app_name,
1146: p_msg_name => g_unexpected_error,
1147: p_token1 => g_sqlcode_token,
1148: p_token1_value => sqlcode,
1149: p_token2 => g_sqlerrm_token,

Line 1151: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1147: p_token1 => g_sqlcode_token,
1148: p_token1_value => sqlcode,
1149: p_token2 => g_sqlerrm_token,
1150: p_token2_value => sqlerrm);
1151: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1152:
1153: END lock_status;
1154:
1155: --------------------------------------

Line 1188: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1184: x_msg_data OUT NOCOPY VARCHAR2,
1185: p_stsv_tbl IN stsv_tbl_type) IS
1186: l_api_name CONSTANT VARCHAR2(30) := 'validate_status';
1187: i NUMBER := 0;
1188: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1189:
1190: BEGIN
1191: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1192: IF p_stsv_tbl.COUNT > 0 THEN

Line 1191: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1187: i NUMBER := 0;
1188: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1189:
1190: BEGIN
1191: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1192: IF p_stsv_tbl.COUNT > 0 THEN
1193: i := p_stsv_tbl.FIRST;
1194: LOOP
1195: validate_status(

Line 1202: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1198: x_return_status => l_return_status,
1199: x_msg_count => x_msg_count,
1200: x_msg_data => x_msg_data,
1201: p_stsv_rec => p_stsv_tbl(i));
1202: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1204: x_return_status := l_return_status;
1205: raise G_EXCEPTION_HALT_VALIDATION;
1206: ELSE

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

1199: x_msg_count => x_msg_count,
1200: x_msg_data => x_msg_data,
1201: p_stsv_rec => p_stsv_tbl(i));
1202: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1203: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1204: x_return_status := l_return_status;
1205: raise G_EXCEPTION_HALT_VALIDATION;
1206: ELSE
1207: x_return_status := l_return_status;

Line 1218: OKC_API.set_message(p_app_name => g_app_name,

1214: EXCEPTION
1215: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1216: NULL;
1217: WHEN OTHERS THEN
1218: OKC_API.set_message(p_app_name => g_app_name,
1219: p_msg_name => g_unexpected_error,
1220: p_token1 => g_sqlcode_token,
1221: p_token1_value => sqlcode,
1222: p_token2 => g_sqlerrm_token,

Line 1224: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1220: p_token1 => g_sqlcode_token,
1221: p_token1_value => sqlcode,
1222: p_token2 => g_sqlerrm_token,
1223: p_token2_value => sqlerrm);
1224: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1225:
1226: END validate_status;
1227:
1228: PROCEDURE get_default_status(

Line 1256: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1252:
1253: PROCEDURE validate_unique_code(
1254: x_return_status OUT NOCOPY VARCHAR2,
1255: p_stsv_tbl IN stsv_tbl_type) IS
1256: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1257: i NUMBER := 0;
1258: BEGIN
1259: OKC_API.init_msg_list(OKC_API.G_FALSE);
1260: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 1259: OKC_API.init_msg_list(OKC_API.G_FALSE);

1255: p_stsv_tbl IN stsv_tbl_type) IS
1256: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1257: i NUMBER := 0;
1258: BEGIN
1259: OKC_API.init_msg_list(OKC_API.G_FALSE);
1260: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1261: IF p_stsv_tbl.COUNT > 0 THEN
1262: i := p_stsv_tbl.FIRST;
1263: LOOP

Line 1260: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1256: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1257: i NUMBER := 0;
1258: BEGIN
1259: OKC_API.init_msg_list(OKC_API.G_FALSE);
1260: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1261: IF p_stsv_tbl.COUNT > 0 THEN
1262: i := p_stsv_tbl.FIRST;
1263: LOOP
1264: validate_unique_code(l_return_status, p_stsv_tbl(i));

Line 1265: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1261: IF p_stsv_tbl.COUNT > 0 THEN
1262: i := p_stsv_tbl.FIRST;
1263: LOOP
1264: validate_unique_code(l_return_status, p_stsv_tbl(i));
1265: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1266: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1267: x_return_status := l_return_status;
1268: raise G_EXCEPTION_HALT_VALIDATION;
1269: ELSE

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

1262: i := p_stsv_tbl.FIRST;
1263: LOOP
1264: validate_unique_code(l_return_status, p_stsv_tbl(i));
1265: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1266: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1267: x_return_status := l_return_status;
1268: raise G_EXCEPTION_HALT_VALIDATION;
1269: ELSE
1270: x_return_status := l_return_status;

Line 1281: OKC_API.set_message(p_app_name => g_app_name,

1277: EXCEPTION
1278: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1279: NULL;
1280: WHEN OTHERS THEN
1281: OKC_API.set_message(p_app_name => g_app_name,
1282: p_msg_name => g_unexpected_error,
1283: p_token1 => g_sqlcode_token,
1284: p_token1_value => sqlcode,
1285: p_token2 => g_sqlerrm_token,

Line 1287: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1283: p_token1 => g_sqlcode_token,
1284: p_token1_value => sqlcode,
1285: p_token2 => g_sqlerrm_token,
1286: p_token2_value => sqlerrm);
1287: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1288: END validate_unique_code;
1289:
1290: PROCEDURE validate_unique_meaning(
1291: x_return_status OUT NOCOPY VARCHAR2,

Line 1293: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1289:
1290: PROCEDURE validate_unique_meaning(
1291: x_return_status OUT NOCOPY VARCHAR2,
1292: p_stsv_tbl IN stsv_tbl_type) IS
1293: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1294: i NUMBER := 0;
1295: BEGIN
1296: OKC_API.init_msg_list(OKC_API.G_FALSE);
1297: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 1296: OKC_API.init_msg_list(OKC_API.G_FALSE);

1292: p_stsv_tbl IN stsv_tbl_type) IS
1293: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1294: i NUMBER := 0;
1295: BEGIN
1296: OKC_API.init_msg_list(OKC_API.G_FALSE);
1297: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1298: IF p_stsv_tbl.COUNT > 0 THEN
1299: i := p_stsv_tbl.FIRST;
1300: LOOP

Line 1297: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1293: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1294: i NUMBER := 0;
1295: BEGIN
1296: OKC_API.init_msg_list(OKC_API.G_FALSE);
1297: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1298: IF p_stsv_tbl.COUNT > 0 THEN
1299: i := p_stsv_tbl.FIRST;
1300: LOOP
1301: validate_unique_meaning(l_return_status, p_stsv_tbl(i));

Line 1302: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1298: IF p_stsv_tbl.COUNT > 0 THEN
1299: i := p_stsv_tbl.FIRST;
1300: LOOP
1301: validate_unique_meaning(l_return_status, p_stsv_tbl(i));
1302: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1303: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1304: x_return_status := l_return_status;
1305: raise G_EXCEPTION_HALT_VALIDATION;
1306: ELSE

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

1299: i := p_stsv_tbl.FIRST;
1300: LOOP
1301: validate_unique_meaning(l_return_status, p_stsv_tbl(i));
1302: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1303: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1304: x_return_status := l_return_status;
1305: raise G_EXCEPTION_HALT_VALIDATION;
1306: ELSE
1307: x_return_status := l_return_status;

Line 1318: OKC_API.set_message(p_app_name => g_app_name,

1314: EXCEPTION
1315: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1316: NULL;
1317: WHEN OTHERS THEN
1318: OKC_API.set_message(p_app_name => g_app_name,
1319: p_msg_name => g_unexpected_error,
1320: p_token1 => g_sqlcode_token,
1321: p_token1_value => sqlcode,
1322: p_token2 => g_sqlerrm_token,

Line 1324: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1320: p_token1 => g_sqlcode_token,
1321: p_token1_value => sqlcode,
1322: p_token2 => g_sqlerrm_token,
1323: p_token2_value => sqlerrm);
1324: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1325: END validate_unique_meaning;
1326:
1327:
1328: END okc_assent_pub;