eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_PQY_PVT dependencies on OKC_API

Line 152: IF (l_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

148: p_pqyv_rec IN pqyv_rec_type
149: ) RETURN pqyv_rec_type IS
150: l_pqyv_rec pqyv_rec_type := p_pqyv_rec;
151: BEGIN
152: IF (l_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
153: l_pqyv_rec.object_version_number := NULL;
154: END IF;
155: IF (l_pqyv_rec.name = OKC_API.G_MISS_CHAR) THEN
156: l_pqyv_rec.name := NULL;

Line 155: IF (l_pqyv_rec.name = OKC_API.G_MISS_CHAR) THEN

151: BEGIN
152: IF (l_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
153: l_pqyv_rec.object_version_number := NULL;
154: END IF;
155: IF (l_pqyv_rec.name = OKC_API.G_MISS_CHAR) THEN
156: l_pqyv_rec.name := NULL;
157: END IF;
158: IF (l_pqyv_rec.description = OKC_API.G_MISS_CHAR) THEN
159: l_pqyv_rec.description := NULL;

Line 158: IF (l_pqyv_rec.description = OKC_API.G_MISS_CHAR) THEN

154: END IF;
155: IF (l_pqyv_rec.name = OKC_API.G_MISS_CHAR) THEN
156: l_pqyv_rec.name := NULL;
157: END IF;
158: IF (l_pqyv_rec.description = OKC_API.G_MISS_CHAR) THEN
159: l_pqyv_rec.description := NULL;
160: END IF;
161: IF (l_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR) THEN
162: l_pqyv_rec.location_yn := NULL;

Line 161: IF (l_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR) THEN

157: END IF;
158: IF (l_pqyv_rec.description = OKC_API.G_MISS_CHAR) THEN
159: l_pqyv_rec.description := NULL;
160: END IF;
161: IF (l_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR) THEN
162: l_pqyv_rec.location_yn := NULL;
163: END IF;
164: IF (l_pqyv_rec.from_date = OKC_API.G_MISS_DATE) THEN
165: l_pqyv_rec.from_date := NULL;

Line 164: IF (l_pqyv_rec.from_date = OKC_API.G_MISS_DATE) THEN

160: END IF;
161: IF (l_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR) THEN
162: l_pqyv_rec.location_yn := NULL;
163: END IF;
164: IF (l_pqyv_rec.from_date = OKC_API.G_MISS_DATE) THEN
165: l_pqyv_rec.from_date := NULL;
166: END IF;
167: IF (l_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN
168: l_pqyv_rec.TO_DATE := NULL;

Line 167: IF (l_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN

163: END IF;
164: IF (l_pqyv_rec.from_date = OKC_API.G_MISS_DATE) THEN
165: l_pqyv_rec.from_date := NULL;
166: END IF;
167: IF (l_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN
168: l_pqyv_rec.TO_DATE := NULL;
169: END IF;
170: IF (l_pqyv_rec.created_by = OKC_API.G_MISS_NUM) THEN
171: l_pqyv_rec.created_by := NULL;

Line 170: IF (l_pqyv_rec.created_by = OKC_API.G_MISS_NUM) THEN

166: END IF;
167: IF (l_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE) THEN
168: l_pqyv_rec.TO_DATE := NULL;
169: END IF;
170: IF (l_pqyv_rec.created_by = OKC_API.G_MISS_NUM) THEN
171: l_pqyv_rec.created_by := NULL;
172: END IF;
173: IF (l_pqyv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
174: l_pqyv_rec.creation_date := NULL;

Line 173: IF (l_pqyv_rec.creation_date = OKC_API.G_MISS_DATE) THEN

169: END IF;
170: IF (l_pqyv_rec.created_by = OKC_API.G_MISS_NUM) THEN
171: l_pqyv_rec.created_by := NULL;
172: END IF;
173: IF (l_pqyv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
174: l_pqyv_rec.creation_date := NULL;
175: END IF;
176: IF (l_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
177: l_pqyv_rec.last_updated_by := NULL;

Line 176: IF (l_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

172: END IF;
173: IF (l_pqyv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
174: l_pqyv_rec.creation_date := NULL;
175: END IF;
176: IF (l_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
177: l_pqyv_rec.last_updated_by := NULL;
178: END IF;
179: IF (l_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
180: l_pqyv_rec.last_update_date := NULL;

Line 179: IF (l_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

175: END IF;
176: IF (l_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
177: l_pqyv_rec.last_updated_by := NULL;
178: END IF;
179: IF (l_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
180: l_pqyv_rec.last_update_date := NULL;
181: END IF;
182: IF (l_pqyv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
183: l_pqyv_rec.last_update_login := NULL;

Line 182: IF (l_pqyv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN

178: END IF;
179: IF (l_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
180: l_pqyv_rec.last_update_date := NULL;
181: END IF;
182: IF (l_pqyv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
183: l_pqyv_rec.last_update_login := NULL;
184: END IF;
185: RETURN(l_pqyv_rec);
186: END null_out_defaults;

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

209: PROCEDURE Validate_Id (
210: p_pqyv_rec IN pqyv_rec_type,
211: x_return_status OUT NOCOPY VARCHAR2
212: ) IS
213: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
214: BEGIN
215: IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR p_pqyv_rec.id IS NULL
216: THEN
217: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

Line 215: IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR p_pqyv_rec.id IS NULL

211: x_return_status OUT NOCOPY VARCHAR2
212: ) IS
213: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
214: BEGIN
215: IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR p_pqyv_rec.id IS NULL
216: THEN
217: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
218: x_return_status := OKC_API.G_RET_STS_ERROR;
219: END IF;

Line 217: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

213: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
214: BEGIN
215: IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR p_pqyv_rec.id IS NULL
216: THEN
217: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
218: x_return_status := OKC_API.G_RET_STS_ERROR;
219: END IF;
220: EXCEPTION
221: WHEN OTHERS THEN

Line 218: x_return_status := OKC_API.G_RET_STS_ERROR;

214: BEGIN
215: IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR p_pqyv_rec.id IS NULL
216: THEN
217: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
218: x_return_status := OKC_API.G_RET_STS_ERROR;
219: END IF;
220: EXCEPTION
221: WHEN OTHERS THEN
222: OKC_API.set_message(p_app_name =>G_APP_NAME,

Line 222: OKC_API.set_message(p_app_name =>G_APP_NAME,

218: x_return_status := OKC_API.G_RET_STS_ERROR;
219: END IF;
220: EXCEPTION
221: WHEN OTHERS THEN
222: OKC_API.set_message(p_app_name =>G_APP_NAME,
223: p_msg_name =>G_UNEXPECTED_ERROR,
224: p_token1 =>G_SQL_SQLCODE_TOKEN,
225: p_token1_value =>SQLCODE,
226: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 228: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

224: p_token1 =>G_SQL_SQLCODE_TOKEN,
225: p_token1_value =>SQLCODE,
226: p_token2 =>G_SQL_SQLERRM_TOKEN,
227: p_token2_value =>SQLERRM);
228: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
229:
230: END Validate_Id;
231: -----end of Validate_Id------------------------
232:

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

246: PROCEDURE Validate_Object_Version_Number (
247: p_pqyv_rec IN pqyv_rec_type,
248: x_return_status OUT NOCOPY VARCHAR2
249: ) IS
250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
251: BEGIN
252: IF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR p_pqyv_rec.object_version_number IS NULL
253: THEN
254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

Line 252: IF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR p_pqyv_rec.object_version_number IS NULL

248: x_return_status OUT NOCOPY VARCHAR2
249: ) IS
250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
251: BEGIN
252: IF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR p_pqyv_rec.object_version_number IS NULL
253: THEN
254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
255: x_return_status := OKC_API.G_RET_STS_ERROR;
256: END IF;

Line 254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
251: BEGIN
252: IF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR p_pqyv_rec.object_version_number IS NULL
253: THEN
254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
255: x_return_status := OKC_API.G_RET_STS_ERROR;
256: END IF;
257: EXCEPTION
258: WHEN OTHERS THEN

Line 255: x_return_status := OKC_API.G_RET_STS_ERROR;

251: BEGIN
252: IF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR p_pqyv_rec.object_version_number IS NULL
253: THEN
254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
255: x_return_status := OKC_API.G_RET_STS_ERROR;
256: END IF;
257: EXCEPTION
258: WHEN OTHERS THEN
259: OKC_API.set_message(p_app_name =>G_APP_NAME,

Line 259: OKC_API.set_message(p_app_name =>G_APP_NAME,

255: x_return_status := OKC_API.G_RET_STS_ERROR;
256: END IF;
257: EXCEPTION
258: WHEN OTHERS THEN
259: OKC_API.set_message(p_app_name =>G_APP_NAME,
260: p_msg_name =>G_UNEXPECTED_ERROR,
261: p_token1 =>G_SQL_SQLCODE_TOKEN,
262: p_token1_value =>SQLCODE,
263: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 265: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

261: p_token1 =>G_SQL_SQLCODE_TOKEN,
262: p_token1_value =>SQLCODE,
263: p_token2 =>G_SQL_SQLERRM_TOKEN,
264: p_token2_value =>SQLERRM);
265: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
266:
267: END Validate_Object_Version_Number;
268: ------end of Validate_Object_Version_Number-----------------------------------
269:

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

283: PROCEDURE Validate_Name(
284: p_pqyv_rec IN OUT NOCOPY pqyv_rec_type,
285: x_return_status OUT NOCOPY VARCHAR2
286: ) IS
287: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
288: BEGIN
289: IF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
290: THEN
291: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');

Line 289: IF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR p_pqyv_rec.name IS NULL

285: x_return_status OUT NOCOPY VARCHAR2
286: ) IS
287: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
288: BEGIN
289: IF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
290: THEN
291: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
292: x_return_status := OKC_API.G_RET_STS_ERROR;
293: END IF;

Line 291: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');

287: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
288: BEGIN
289: IF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
290: THEN
291: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
292: x_return_status := OKC_API.G_RET_STS_ERROR;
293: END IF;
294: p_pqyv_rec.name := Okl_Accounting_Util.okl_upper(p_pqyv_rec.name);
295: EXCEPTION

Line 292: x_return_status := OKC_API.G_RET_STS_ERROR;

288: BEGIN
289: IF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
290: THEN
291: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
292: x_return_status := OKC_API.G_RET_STS_ERROR;
293: END IF;
294: p_pqyv_rec.name := Okl_Accounting_Util.okl_upper(p_pqyv_rec.name);
295: EXCEPTION
296: WHEN OTHERS THEN

Line 297: OKC_API.set_message(p_app_name =>G_APP_NAME,

293: END IF;
294: p_pqyv_rec.name := Okl_Accounting_Util.okl_upper(p_pqyv_rec.name);
295: EXCEPTION
296: WHEN OTHERS THEN
297: OKC_API.set_message(p_app_name =>G_APP_NAME,
298: p_msg_name =>G_UNEXPECTED_ERROR,
299: p_token1 =>G_SQL_SQLCODE_TOKEN,
300: p_token1_value =>SQLCODE,
301: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 303: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

299: p_token1 =>G_SQL_SQLCODE_TOKEN,
300: p_token1_value =>SQLCODE,
301: p_token2 =>G_SQL_SQLERRM_TOKEN,
302: p_token2_value =>SQLERRM);
303: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
304:
305: END Validate_Name;
306: ------end of Validate_Name-----------------------------------
307:

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

322: p_pqyv_rec IN pqyv_rec_type,
323: x_return_status OUT NOCOPY VARCHAR2
324:
325: ) IS
326: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
327: BEGIN
328: x_return_status := OKC_API.G_RET_STS_SUCCESS;
329:
330: -- check from domain values using the generic

Line 328: x_return_status := OKC_API.G_RET_STS_SUCCESS;

324:
325: ) IS
326: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
327: BEGIN
328: x_return_status := OKC_API.G_RET_STS_SUCCESS;
329:
330: -- check from domain values using the generic
331: l_return_status := OKL_ACCOUNTING_UTIL.validate_lookup_code('YES_NO',p_pqyv_rec.Location_Yn,0,0);
332:

Line 333: IF l_return_status = OKC_API.G_FALSE THEN

329:
330: -- check from domain values using the generic
331: l_return_status := OKL_ACCOUNTING_UTIL.validate_lookup_code('YES_NO',p_pqyv_rec.Location_Yn,0,0);
332:
333: IF l_return_status = OKC_API.G_FALSE THEN
334: l_return_status := OKC_API.G_RET_STS_ERROR;
335: END IF;
336:
337: IF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

Line 334: l_return_status := OKC_API.G_RET_STS_ERROR;

330: -- check from domain values using the generic
331: l_return_status := OKL_ACCOUNTING_UTIL.validate_lookup_code('YES_NO',p_pqyv_rec.Location_Yn,0,0);
332:
333: IF l_return_status = OKC_API.G_FALSE THEN
334: l_return_status := OKC_API.G_RET_STS_ERROR;
335: END IF;
336:
337: IF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
338: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 337: IF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

333: IF l_return_status = OKC_API.G_FALSE THEN
334: l_return_status := OKC_API.G_RET_STS_ERROR;
335: END IF;
336:
337: IF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
338: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
339: p_msg_name => g_invalid_value,
340: p_token1 => g_col_name_token,
341: p_token1_value => 'location_yn');

Line 338: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

334: l_return_status := OKC_API.G_RET_STS_ERROR;
335: END IF;
336:
337: IF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
338: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
339: p_msg_name => g_invalid_value,
340: p_token1 => g_col_name_token,
341: p_token1_value => 'location_yn');
342:

Line 344: x_return_status := OKC_API.G_RET_STS_ERROR;

340: p_token1 => g_col_name_token,
341: p_token1_value => 'location_yn');
342:
343: -- notify caller of an error
344: x_return_status := OKC_API.G_RET_STS_ERROR;
345:
346: END IF;
347:
348: EXCEPTION

Line 351: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

347:
348: EXCEPTION
349: WHEN OTHERS THEN
350: -- store SQL error message on message stack for caller
351: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
352: p_msg_name => g_unexpected_error,
353: p_token1 => g_sql_sqlcode_token,
354: p_token1_value => SQLCODE,
355: p_token2 => g_sql_sqlerrm_token,

Line 359: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

355: p_token2 => g_sql_sqlerrm_token,
356: p_token2_value => SQLERRM);
357:
358: -- notify caller of an UNEXPECTED error
359: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
360: END Validate_Location_Yn;
361: ------end of Validate_Location_Yn-----------------------------------
362:
363: ---------------------------------------------------------------------------

Line 382: x_return_status := OKC_API.G_RET_STS_SUCCESS;

378: x_return_status OUT NOCOPY VARCHAR2
379: ) IS
380: BEGIN
381: -- initialize return status
382: x_return_status := OKC_API.G_RET_STS_SUCCESS;
383:
384: IF p_pqyv_rec.from_date = OKC_API.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
385: THEN
386: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');

Line 384: IF p_pqyv_rec.from_date = OKC_API.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL

380: BEGIN
381: -- initialize return status
382: x_return_status := OKC_API.G_RET_STS_SUCCESS;
383:
384: IF p_pqyv_rec.from_date = OKC_API.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
385: THEN
386: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
387: x_return_status := OKC_API.G_RET_STS_ERROR;
388: END IF;

Line 386: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');

382: x_return_status := OKC_API.G_RET_STS_SUCCESS;
383:
384: IF p_pqyv_rec.from_date = OKC_API.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
385: THEN
386: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
387: x_return_status := OKC_API.G_RET_STS_ERROR;
388: END IF;
389: EXCEPTION
390: WHEN OTHERS THEN

Line 387: x_return_status := OKC_API.G_RET_STS_ERROR;

383:
384: IF p_pqyv_rec.from_date = OKC_API.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
385: THEN
386: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'from_date');
387: x_return_status := OKC_API.G_RET_STS_ERROR;
388: END IF;
389: EXCEPTION
390: WHEN OTHERS THEN
391: OKC_API.set_message(p_app_name =>G_APP_NAME,

Line 391: OKC_API.set_message(p_app_name =>G_APP_NAME,

387: x_return_status := OKC_API.G_RET_STS_ERROR;
388: END IF;
389: EXCEPTION
390: WHEN OTHERS THEN
391: OKC_API.set_message(p_app_name =>G_APP_NAME,
392: p_msg_name =>G_UNEXPECTED_ERROR,
393: p_token1 =>G_SQL_SQLCODE_TOKEN,
394: p_token1_value =>SQLCODE,
395: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 397: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

393: p_token1 =>G_SQL_SQLCODE_TOKEN,
394: p_token1_value =>SQLCODE,
395: p_token2 =>G_SQL_SQLERRM_TOKEN,
396: p_token2_value =>SQLERRM);
397: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
398:
399: END Validate_From_Date;
400: ------end of Validate_From_Date-----------------------------------
401:

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

414:
415: PROCEDURE Validate_To_Date(p_pqyv_rec IN pqyv_rec_type,
416: x_return_status OUT NOCOPY VARCHAR2)IS
417:
418: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
419:
420: BEGIN
421: -- initialize return status
422: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 422: x_return_status := OKC_API.G_RET_STS_SUCCESS;

418: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
419:
420: BEGIN
421: -- initialize return status
422: x_return_status := OKC_API.G_RET_STS_SUCCESS;
423:
424: -- check for data before processing
425: IF (p_pqyv_rec.TO_DATE IS NOT NULL) AND (p_pqyv_rec.TO_DATE < p_pqyv_rec.from_date) THEN
426: OKC_API.SET_MESSAGE(p_app_name => 'OKL'

Line 426: OKC_API.SET_MESSAGE(p_app_name => 'OKL'

422: x_return_status := OKC_API.G_RET_STS_SUCCESS;
423:
424: -- check for data before processing
425: IF (p_pqyv_rec.TO_DATE IS NOT NULL) AND (p_pqyv_rec.TO_DATE < p_pqyv_rec.from_date) THEN
426: OKC_API.SET_MESSAGE(p_app_name => 'OKL'
427: ,p_msg_name => g_to_date_error
428: ,p_token1 => g_col_name_token
429: ,p_token1_value => 'to_date');
430: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 430: x_return_status := OKC_API.G_RET_STS_ERROR;

426: OKC_API.SET_MESSAGE(p_app_name => 'OKL'
427: ,p_msg_name => g_to_date_error
428: ,p_token1 => g_col_name_token
429: ,p_token1_value => 'to_date');
430: x_return_status := OKC_API.G_RET_STS_ERROR;
431: END IF;
432:
433: EXCEPTION
434: WHEN OTHERS THEN

Line 436: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

432:
433: EXCEPTION
434: WHEN OTHERS THEN
435: -- store SQL error message on message stack for caller
436: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
437: p_msg_name => g_unexpected_error,
438: p_token1 => g_sql_sqlcode_token,
439: p_token1_value => SQLCODE,
440: p_token2 => g_sql_sqlerrm_token,

Line 444: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

440: p_token2 => g_sql_sqlerrm_token,
441: p_token2_value => SQLERRM);
442:
443: -- notify caller of an UNEXPECTED error
444: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
445:
446: END Validate_To_Date;
447: ------end of Validate_To_Date-----------------------------------
448:

Line 479: OKC_API.set_message('OKL','OKL_NOT_UNIQUE', 'OKL_TABLE_NAME', 'Okl_Pdt_Qualitys_V');

475: BEGIN
476: OPEN okl_pdt_quality_unique (p_pqyv_rec.name);
477: FETCH okl_pdt_quality_unique INTO l_unique_key;
478: IF okl_pdt_quality_unique%FOUND THEN
479: OKC_API.set_message('OKL','OKL_NOT_UNIQUE', 'OKL_TABLE_NAME', 'Okl_Pdt_Qualitys_V');
480: x_return_status := OKC_API.G_RET_STS_ERROR;
481: ELSE
482: x_return_status := OKC_API.G_RET_STS_SUCCESS;
483: END IF;

Line 480: x_return_status := OKC_API.G_RET_STS_ERROR;

476: OPEN okl_pdt_quality_unique (p_pqyv_rec.name);
477: FETCH okl_pdt_quality_unique INTO l_unique_key;
478: IF okl_pdt_quality_unique%FOUND THEN
479: OKC_API.set_message('OKL','OKL_NOT_UNIQUE', 'OKL_TABLE_NAME', 'Okl_Pdt_Qualitys_V');
480: x_return_status := OKC_API.G_RET_STS_ERROR;
481: ELSE
482: x_return_status := OKC_API.G_RET_STS_SUCCESS;
483: END IF;
484: CLOSE okl_pdt_quality_unique;

Line 482: x_return_status := OKC_API.G_RET_STS_SUCCESS;

478: IF okl_pdt_quality_unique%FOUND THEN
479: OKC_API.set_message('OKL','OKL_NOT_UNIQUE', 'OKL_TABLE_NAME', 'Okl_Pdt_Qualitys_V');
480: x_return_status := OKC_API.G_RET_STS_ERROR;
481: ELSE
482: x_return_status := OKC_API.G_RET_STS_SUCCESS;
483: END IF;
484: CLOSE okl_pdt_quality_unique;
485:
486: EXCEPTION

Line 488: OKC_API.set_message(p_app_name =>G_APP_NAME,

484: CLOSE okl_pdt_quality_unique;
485:
486: EXCEPTION
487: WHEN OTHERS THEN
488: OKC_API.set_message(p_app_name =>G_APP_NAME,
489: p_msg_name =>G_UNEXPECTED_ERROR,
490: p_token1 =>G_SQL_SQLCODE_TOKEN,
491: p_token1_value =>SQLCODE,
492: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 494: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

490: p_token1 =>G_SQL_SQLCODE_TOKEN,
491: p_token1_value =>SQLCODE,
492: p_token2 =>G_SQL_SQLERRM_TOKEN,
493: p_token2_value =>SQLERRM);
494: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
495:
496: END Validate_Unique_Key;
497:
498: -----END OF VALIDATE UNIQUE KEY-------------------------

Line 516: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

512:
513: FUNCTION Validate_Attributes(
514: p_pqyv_rec IN OUT NOCOPY pqyv_rec_type
515: ) RETURN VARCHAR IS
516: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
517: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
518:
519:
520: BEGIN

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

513: FUNCTION Validate_Attributes(
514: p_pqyv_rec IN OUT NOCOPY pqyv_rec_type
515: ) RETURN VARCHAR IS
516: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
517: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
518:
519:
520: BEGIN
521: ---- CHECK FOR ID-------------------------

Line 523: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

519:
520: BEGIN
521: ---- CHECK FOR ID-------------------------
522: Validate_Id (p_pqyv_rec, x_return_status);
523: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
524: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
525: -- need to leave
526: l_return_status := x_return_status;
527: RAISE G_EXCEPTION_HALT_VALIDATION;

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

520: BEGIN
521: ---- CHECK FOR ID-------------------------
522: Validate_Id (p_pqyv_rec, x_return_status);
523: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
524: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
525: -- need to leave
526: l_return_status := x_return_status;
527: RAISE G_EXCEPTION_HALT_VALIDATION;
528: ELSE

Line 535: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

531: END IF;
532:
533: --------CHECK FOR VERSION NUMBER------------------
534: Validate_Object_Version_Number (p_pqyv_rec,x_return_status);
535: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
536: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
537: -- need to leave
538: l_return_status := x_return_status;
539: RAISE G_EXCEPTION_HALT_VALIDATION;

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

532:
533: --------CHECK FOR VERSION NUMBER------------------
534: Validate_Object_Version_Number (p_pqyv_rec,x_return_status);
535: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
536: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
537: -- need to leave
538: l_return_status := x_return_status;
539: RAISE G_EXCEPTION_HALT_VALIDATION;
540: ELSE

Line 547: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

543: END IF;
544:
545: --------CHECK FOR NAME------------------
546: Validate_Name (p_pqyv_rec,x_return_status);
547: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
548: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
549: -- need to leave
550: l_return_status := x_return_status;
551: RAISE G_EXCEPTION_HALT_VALIDATION;

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

544:
545: --------CHECK FOR NAME------------------
546: Validate_Name (p_pqyv_rec,x_return_status);
547: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
548: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
549: -- need to leave
550: l_return_status := x_return_status;
551: RAISE G_EXCEPTION_HALT_VALIDATION;
552: ELSE

Line 559: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

555: END IF;
556:
557: --------CHECK FOR LOCATION_YN------------------
558: Validate_Location_Yn (p_pqyv_rec,x_return_status);
559: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: -- need to leave
562: l_return_status := x_return_status;
563: RAISE G_EXCEPTION_HALT_VALIDATION;

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

556:
557: --------CHECK FOR LOCATION_YN------------------
558: Validate_Location_Yn (p_pqyv_rec,x_return_status);
559: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: -- need to leave
562: l_return_status := x_return_status;
563: RAISE G_EXCEPTION_HALT_VALIDATION;
564: ELSE

Line 572: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

568:
569:
570: -----CHECK FOR FROM_DATE----------------------------
571: Validate_From_Date (p_pqyv_rec,x_return_status);
572: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
573: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
574: -- need to leave
575: l_return_status := x_return_status;
576: RAISE G_EXCEPTION_HALT_VALIDATION;

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

569:
570: -----CHECK FOR FROM_DATE----------------------------
571: Validate_From_Date (p_pqyv_rec,x_return_status);
572: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
573: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
574: -- need to leave
575: l_return_status := x_return_status;
576: RAISE G_EXCEPTION_HALT_VALIDATION;
577: ELSE

Line 591: OKC_API.set_message(p_app_name =>G_APP_NAME,

587: NULL;
588: RETURN (l_return_status);
589:
590: WHEN OTHERS THEN
591: OKC_API.set_message(p_app_name =>G_APP_NAME,
592: p_msg_name =>G_UNEXPECTED_ERROR,
593: p_token1 =>G_SQL_SQLCODE_TOKEN,
594: p_token1_value =>SQLCODE,
595: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 597: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

593: p_token1 =>G_SQL_SQLCODE_TOKEN,
594: p_token1_value =>SQLCODE,
595: p_token2 =>G_SQL_SQLERRM_TOKEN,
596: p_token2_value =>SQLERRM);
597: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
598: RETURN(l_return_status);
599:
600: END Validate_Attributes;
601:

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

616:
617: FUNCTION Validate_Record(
618: p_pqyv_rec IN pqyv_rec_type
619: ) RETURN VARCHAR IS
620: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
621: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
622:
623:
624: BEGIN

Line 621: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

617: FUNCTION Validate_Record(
618: p_pqyv_rec IN pqyv_rec_type
619: ) RETURN VARCHAR IS
620: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
621: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
622:
623:
624: BEGIN
625:

Line 628: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

624: BEGIN
625:
626: --------CHECK FOR UNIQUE KEY------------------
627: Validate_Unique_Key (p_pqyv_rec, x_return_status);
628: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
629: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
630: -- need to leave
631: l_return_status := x_return_status;
632: RAISE G_EXCEPTION_HALT_VALIDATION;

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

625:
626: --------CHECK FOR UNIQUE KEY------------------
627: Validate_Unique_Key (p_pqyv_rec, x_return_status);
628: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
629: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
630: -- need to leave
631: l_return_status := x_return_status;
632: RAISE G_EXCEPTION_HALT_VALIDATION;
633: ELSE

Line 639: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

635: END IF;
636: END IF;
637: -----CHECK FOR TO_DATE----------------------------
638: Validate_From_Date (p_pqyv_rec, x_return_status);
639: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
640: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
641: -- need to leave
642: l_return_status := x_return_status;
643: RAISE G_EXCEPTION_HALT_VALIDATION;

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

636: END IF;
637: -----CHECK FOR TO_DATE----------------------------
638: Validate_From_Date (p_pqyv_rec, x_return_status);
639: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
640: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
641: -- need to leave
642: l_return_status := x_return_status;
643: RAISE G_EXCEPTION_HALT_VALIDATION;
644: ELSE

Line 659: OKC_API.set_message(p_app_name =>G_APP_NAME,

655: NULL;
656: RETURN (l_return_status);
657:
658: WHEN OTHERS THEN
659: OKC_API.set_message(p_app_name =>G_APP_NAME,
660: p_msg_name =>G_UNEXPECTED_ERROR,
661: p_token1 =>G_SQL_SQLCODE_TOKEN,
662: p_token1_value =>SQLCODE,
663: p_token2 =>G_SQL_SQLERRM_TOKEN,

Line 665: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

661: p_token1 =>G_SQL_SQLCODE_TOKEN,
662: p_token1_value =>SQLCODE,
663: p_token2 =>G_SQL_SQLERRM_TOKEN,
664: p_token2_value =>SQLERRM);
665: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
666: RETURN(l_return_status);
667:
668: END Validate_Record;
669:

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

671: -----TCHGS OLD CODE COMMENTES BEGIN--------------------
672: -- FUNCTION Validate_Attributes (
673: -- p_pqyv_rec IN pqyv_rec_type
674: -- ) RETURN VARCHAR2 IS
675: -- l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
676: -- BEGIN
677:
678: -- IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR
679: -- p_pqyv_rec.id IS NULL

Line 678: -- IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR

674: -- ) RETURN VARCHAR2 IS
675: -- l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
676: -- BEGIN
677:
678: -- IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR
679: -- p_pqyv_rec.id IS NULL
680: -- THEN
681: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
682: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 681: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

677:
678: -- IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR
679: -- p_pqyv_rec.id IS NULL
680: -- THEN
681: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
682: -- l_return_status := OKC_API.G_RET_STS_ERROR;
683: -- ELSIF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR
684: -- p_pqyv_rec.object_version_number IS NULL
685: -- THEN

Line 682: -- l_return_status := OKC_API.G_RET_STS_ERROR;

678: -- IF p_pqyv_rec.id = OKC_API.G_MISS_NUM OR
679: -- p_pqyv_rec.id IS NULL
680: -- THEN
681: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
682: -- l_return_status := OKC_API.G_RET_STS_ERROR;
683: -- ELSIF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR
684: -- p_pqyv_rec.object_version_number IS NULL
685: -- THEN
686: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

Line 683: -- ELSIF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR

679: -- p_pqyv_rec.id IS NULL
680: -- THEN
681: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
682: -- l_return_status := OKC_API.G_RET_STS_ERROR;
683: -- ELSIF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR
684: -- p_pqyv_rec.object_version_number IS NULL
685: -- THEN
686: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
687: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 686: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

682: -- l_return_status := OKC_API.G_RET_STS_ERROR;
683: -- ELSIF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR
684: -- p_pqyv_rec.object_version_number IS NULL
685: -- THEN
686: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
687: -- l_return_status := OKC_API.G_RET_STS_ERROR;
688: -- ELSIF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR
689: -- p_pqyv_rec.name IS NULL
690: -- THEN

Line 687: -- l_return_status := OKC_API.G_RET_STS_ERROR;

683: -- ELSIF p_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM OR
684: -- p_pqyv_rec.object_version_number IS NULL
685: -- THEN
686: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
687: -- l_return_status := OKC_API.G_RET_STS_ERROR;
688: -- ELSIF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR
689: -- p_pqyv_rec.name IS NULL
690: -- THEN
691: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');

Line 688: -- ELSIF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR

684: -- p_pqyv_rec.object_version_number IS NULL
685: -- THEN
686: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
687: -- l_return_status := OKC_API.G_RET_STS_ERROR;
688: -- ELSIF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR
689: -- p_pqyv_rec.name IS NULL
690: -- THEN
691: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
692: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 691: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');

687: -- l_return_status := OKC_API.G_RET_STS_ERROR;
688: -- ELSIF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR
689: -- p_pqyv_rec.name IS NULL
690: -- THEN
691: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
692: -- l_return_status := OKC_API.G_RET_STS_ERROR;
693: -- ELSIF p_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR OR
694: -- p_pqyv_rec.location_yn IS NULL
695: -- THEN

Line 692: -- l_return_status := OKC_API.G_RET_STS_ERROR;

688: -- ELSIF p_pqyv_rec.name = OKC_API.G_MISS_CHAR OR
689: -- p_pqyv_rec.name IS NULL
690: -- THEN
691: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
692: -- l_return_status := OKC_API.G_RET_STS_ERROR;
693: -- ELSIF p_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR OR
694: -- p_pqyv_rec.location_yn IS NULL
695: -- THEN
696: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'location_yn');

Line 693: -- ELSIF p_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR OR

689: -- p_pqyv_rec.name IS NULL
690: -- THEN
691: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'name');
692: -- l_return_status := OKC_API.G_RET_STS_ERROR;
693: -- ELSIF p_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR OR
694: -- p_pqyv_rec.location_yn IS NULL
695: -- THEN
696: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'location_yn');
697: -- l_return_status := OKC_API.G_RET_STS_ERROR;

Line 696: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'location_yn');

692: -- l_return_status := OKC_API.G_RET_STS_ERROR;
693: -- ELSIF p_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR OR
694: -- p_pqyv_rec.location_yn IS NULL
695: -- THEN
696: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'location_yn');
697: -- l_return_status := OKC_API.G_RET_STS_ERROR;
698: -- END IF;
699: -- RETURN(l_return_status);
700: -- END Validate_Attributes;

Line 697: -- l_return_status := OKC_API.G_RET_STS_ERROR;

693: -- ELSIF p_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR OR
694: -- p_pqyv_rec.location_yn IS NULL
695: -- THEN
696: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'location_yn');
697: -- l_return_status := OKC_API.G_RET_STS_ERROR;
698: -- END IF;
699: -- RETURN(l_return_status);
700: -- END Validate_Attributes;
701:

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

707: --------------------------------------------
708: -- FUNCTION Validate_Record (
709: -- p_pqyv_rec IN pqyv_rec_type
710: -- ) RETURN VARCHAR2 IS
711: -- l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
712:
713: -- BEGIN
714: -- RETURN (l_return_status);
715: -- END Validate_Record;

Line 766: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

762: -- validate_row for:OKL_PDT_QUALITYS_V --
763: -----------------------------------------
764: PROCEDURE validate_row(
765: p_api_version IN NUMBER,
766: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
767: x_return_status OUT NOCOPY VARCHAR2,
768: x_msg_count OUT NOCOPY NUMBER,
769: x_msg_data OUT NOCOPY VARCHAR2,
770: p_pqyv_rec IN pqyv_rec_type) IS

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

770: p_pqyv_rec IN pqyv_rec_type) IS
771:
772: l_api_version CONSTANT NUMBER := 1;
773: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
774: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
775: l_pqyv_rec pqyv_rec_type := p_pqyv_rec;
776: l_pqy_rec pqy_rec_type;
777: BEGIN
778: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

774: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
775: l_pqyv_rec pqyv_rec_type := p_pqyv_rec;
776: l_pqy_rec pqy_rec_type;
777: BEGIN
778: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
779: G_PKG_NAME,
780: p_init_msg_list,
781: l_api_version,
782: p_api_version,

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

781: l_api_version,
782: p_api_version,
783: '_PVT',
784: x_return_status);
785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
788: RAISE OKC_API.G_EXCEPTION_ERROR;
789: END IF;

Line 786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

782: p_api_version,
783: '_PVT',
784: x_return_status);
785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
788: RAISE OKC_API.G_EXCEPTION_ERROR;
789: END IF;
790: --- Validate all non-missing attributes (Item Level Validation)

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

783: '_PVT',
784: x_return_status);
785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
788: RAISE OKC_API.G_EXCEPTION_ERROR;
789: END IF;
790: --- Validate all non-missing attributes (Item Level Validation)
791:

Line 788: RAISE OKC_API.G_EXCEPTION_ERROR;

784: x_return_status);
785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
788: RAISE OKC_API.G_EXCEPTION_ERROR;
789: END IF;
790: --- Validate all non-missing attributes (Item Level Validation)
791:
792: l_return_status := Validate_Attributes(l_pqyv_rec);

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

790: --- Validate all non-missing attributes (Item Level Validation)
791:
792: l_return_status := Validate_Attributes(l_pqyv_rec);
793: --If any errors happen abort API
794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
797: RAISE OKC_API.G_EXCEPTION_ERROR;
798: END IF;

Line 795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

791:
792: l_return_status := Validate_Attributes(l_pqyv_rec);
793: --If any errors happen abort API
794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
797: RAISE OKC_API.G_EXCEPTION_ERROR;
798: END IF;
799:

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

792: l_return_status := Validate_Attributes(l_pqyv_rec);
793: --If any errors happen abort API
794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
797: RAISE OKC_API.G_EXCEPTION_ERROR;
798: END IF;
799:
800: l_return_status := Validate_Record(l_pqyv_rec);

Line 797: RAISE OKC_API.G_EXCEPTION_ERROR;

793: --If any errors happen abort API
794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
797: RAISE OKC_API.G_EXCEPTION_ERROR;
798: END IF;
799:
800: l_return_status := Validate_Record(l_pqyv_rec);
801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

797: RAISE OKC_API.G_EXCEPTION_ERROR;
798: END IF;
799:
800: l_return_status := Validate_Record(l_pqyv_rec);
801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;

Line 802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

798: END IF;
799:
800: l_return_status := Validate_Record(l_pqyv_rec);
801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

799:
800: l_return_status := Validate_Record(l_pqyv_rec);
801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
807: EXCEPTION

Line 804: RAISE OKC_API.G_EXCEPTION_ERROR;

800: l_return_status := Validate_Record(l_pqyv_rec);
801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
807: EXCEPTION
808: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
807: EXCEPTION
808: WHEN OKC_API.G_EXCEPTION_ERROR THEN
809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
810: (

Line 808: WHEN OKC_API.G_EXCEPTION_ERROR THEN

804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
807: EXCEPTION
808: WHEN OKC_API.G_EXCEPTION_ERROR THEN
809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
810: (
811: l_api_name,
812: G_PKG_NAME,

Line 809: x_return_status := OKC_API.HANDLE_EXCEPTIONS

805: END IF;
806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
807: EXCEPTION
808: WHEN OKC_API.G_EXCEPTION_ERROR THEN
809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
810: (
811: l_api_name,
812: G_PKG_NAME,
813: 'OKC_API.G_RET_STS_ERROR',

Line 813: 'OKC_API.G_RET_STS_ERROR',

809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
810: (
811: l_api_name,
812: G_PKG_NAME,
813: 'OKC_API.G_RET_STS_ERROR',
814: x_msg_count,
815: x_msg_data,
816: '_PVT'
817: );

Line 818: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

814: x_msg_count,
815: x_msg_data,
816: '_PVT'
817: );
818: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
820: (
821: l_api_name,
822: G_PKG_NAME,

Line 819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

815: x_msg_data,
816: '_PVT'
817: );
818: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
820: (
821: l_api_name,
822: G_PKG_NAME,
823: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 823: 'OKC_API.G_RET_STS_UNEXP_ERROR',

819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
820: (
821: l_api_name,
822: G_PKG_NAME,
823: 'OKC_API.G_RET_STS_UNEXP_ERROR',
824: x_msg_count,
825: x_msg_data,
826: '_PVT'
827: );

Line 829: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

825: x_msg_data,
826: '_PVT'
827: );
828: WHEN OTHERS THEN
829: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
830: (
831: l_api_name,
832: G_PKG_NAME,
833: 'OTHERS',

Line 844: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

840: -- PL/SQL TBL validate_row for:PQYV_TBL --
841: ------------------------------------------
842: PROCEDURE validate_row(
843: p_api_version IN NUMBER,
844: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
845: x_return_status OUT NOCOPY VARCHAR2,
846: x_msg_count OUT NOCOPY NUMBER,
847: x_msg_data OUT NOCOPY VARCHAR2,
848: p_pqyv_tbl IN pqyv_tbl_type) IS

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

848: p_pqyv_tbl IN pqyv_tbl_type) IS
849:
850: l_api_version CONSTANT NUMBER := 1;
851: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
853: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
854: i NUMBER := 0;
855: BEGIN
856: OKC_API.init_msg_list(p_init_msg_list);

Line 853: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

849:
850: l_api_version CONSTANT NUMBER := 1;
851: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
853: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
854: i NUMBER := 0;
855: BEGIN
856: OKC_API.init_msg_list(p_init_msg_list);
857: -- Make sure PL/SQL table has records in it before passing

Line 856: OKC_API.init_msg_list(p_init_msg_list);

852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
853: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
854: i NUMBER := 0;
855: BEGIN
856: OKC_API.init_msg_list(p_init_msg_list);
857: -- Make sure PL/SQL table has records in it before passing
858: IF (p_pqyv_tbl.COUNT > 0) THEN
859: i := p_pqyv_tbl.FIRST;
860: LOOP

Line 863: p_init_msg_list => OKC_API.G_FALSE,

859: i := p_pqyv_tbl.FIRST;
860: LOOP
861: validate_row (
862: p_api_version => p_api_version,
863: p_init_msg_list => OKC_API.G_FALSE,
864: x_return_status => x_return_status,
865: x_msg_count => x_msg_count,
866: x_msg_data => x_msg_data,
867: p_pqyv_rec => p_pqyv_tbl(i));

Line 869: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

865: x_msg_count => x_msg_count,
866: x_msg_data => x_msg_data,
867: p_pqyv_rec => p_pqyv_tbl(i));
868: -- TCHGS: Store the highest degree of error
869: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
870: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
871: l_overall_status := x_return_status;
872: END IF;
873: END IF;

Line 870: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

866: x_msg_data => x_msg_data,
867: p_pqyv_rec => p_pqyv_tbl(i));
868: -- TCHGS: Store the highest degree of error
869: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
870: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
871: l_overall_status := x_return_status;
872: END IF;
873: END IF;
874: EXIT WHEN (i = p_pqyv_tbl.LAST);

Line 881: WHEN OKC_API.G_EXCEPTION_ERROR THEN

877: --TCHGS: return overall status
878: x_return_status := l_overall_status;
879: END IF;
880: EXCEPTION
881: WHEN OKC_API.G_EXCEPTION_ERROR THEN
882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (
884: l_api_name,
885: G_PKG_NAME,

Line 882: x_return_status := OKC_API.HANDLE_EXCEPTIONS

878: x_return_status := l_overall_status;
879: END IF;
880: EXCEPTION
881: WHEN OKC_API.G_EXCEPTION_ERROR THEN
882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (
884: l_api_name,
885: G_PKG_NAME,
886: 'OKC_API.G_RET_STS_ERROR',

Line 886: 'OKC_API.G_RET_STS_ERROR',

882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (
884: l_api_name,
885: G_PKG_NAME,
886: 'OKC_API.G_RET_STS_ERROR',
887: x_msg_count,
888: x_msg_data,
889: '_PVT'
890: );

Line 891: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

887: x_msg_count,
888: x_msg_data,
889: '_PVT'
890: );
891: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
893: (
894: l_api_name,
895: G_PKG_NAME,

Line 892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

888: x_msg_data,
889: '_PVT'
890: );
891: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
893: (
894: l_api_name,
895: G_PKG_NAME,
896: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 896: 'OKC_API.G_RET_STS_UNEXP_ERROR',

892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
893: (
894: l_api_name,
895: G_PKG_NAME,
896: 'OKC_API.G_RET_STS_UNEXP_ERROR',
897: x_msg_count,
898: x_msg_data,
899: '_PVT'
900: );

Line 902: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

898: x_msg_data,
899: '_PVT'
900: );
901: WHEN OTHERS THEN
902: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
903: (
904: l_api_name,
905: G_PKG_NAME,
906: 'OTHERS',

Line 920: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

916: -------------------------------------
917: -- insert_row for:OKL_PDT_QUALITYS --
918: -------------------------------------
919: PROCEDURE insert_row(
920: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
921: x_return_status OUT NOCOPY VARCHAR2,
922: x_msg_count OUT NOCOPY NUMBER,
923: x_msg_data OUT NOCOPY VARCHAR2,
924: p_pqy_rec IN pqy_rec_type,

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

925: x_pqy_rec OUT NOCOPY pqy_rec_type) IS
926:
927: l_api_version CONSTANT NUMBER := 1;
928: l_api_name CONSTANT VARCHAR2(30) := 'QUALITYS_insert_row';
929: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
930: l_pqy_rec pqy_rec_type := p_pqy_rec;
931: l_def_pqy_rec pqy_rec_type;
932: -----------------------------------------
933: -- Set_Attributes for:OKL_PDT_QUALITYS --

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

935: FUNCTION Set_Attributes (
936: p_pqy_rec IN pqy_rec_type,
937: x_pqy_rec OUT NOCOPY pqy_rec_type
938: ) RETURN VARCHAR2 IS
939: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
940: BEGIN
941: x_pqy_rec := p_pqy_rec;
942: RETURN(l_return_status);
943: END Set_Attributes;

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

941: x_pqy_rec := p_pqy_rec;
942: RETURN(l_return_status);
943: END Set_Attributes;
944: BEGIN
945: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
946: p_init_msg_list,
947: '_PVT',
948: x_return_status);
949: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

945: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
946: p_init_msg_list,
947: '_PVT',
948: x_return_status);
949: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
950: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
951: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
952: RAISE OKC_API.G_EXCEPTION_ERROR;
953: END IF;

Line 950: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

946: p_init_msg_list,
947: '_PVT',
948: x_return_status);
949: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
950: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
951: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
952: RAISE OKC_API.G_EXCEPTION_ERROR;
953: END IF;
954: --- Setting item attributes

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

947: '_PVT',
948: x_return_status);
949: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
950: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
951: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
952: RAISE OKC_API.G_EXCEPTION_ERROR;
953: END IF;
954: --- Setting item attributes
955: l_return_status := Set_Attributes(

Line 952: RAISE OKC_API.G_EXCEPTION_ERROR;

948: x_return_status);
949: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
950: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
951: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
952: RAISE OKC_API.G_EXCEPTION_ERROR;
953: END IF;
954: --- Setting item attributes
955: l_return_status := Set_Attributes(
956: p_pqy_rec, -- IN

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

955: l_return_status := Set_Attributes(
956: p_pqy_rec, -- IN
957: l_pqy_rec); -- OUT
958: --- If any errors happen abort API
959: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;

Line 960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

956: p_pqy_rec, -- IN
957: l_pqy_rec); -- OUT
958: --- If any errors happen abort API
959: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
964: INSERT INTO OKL_PDT_QUALITYS(

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

957: l_pqy_rec); -- OUT
958: --- If any errors happen abort API
959: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
964: INSERT INTO OKL_PDT_QUALITYS(
965: id,

Line 962: RAISE OKC_API.G_EXCEPTION_ERROR;

958: --- If any errors happen abort API
959: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
964: INSERT INTO OKL_PDT_QUALITYS(
965: id,
966: name,

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

988: l_pqy_rec.last_update_date,
989: l_pqy_rec.last_update_login);
990: -- Set OUT values
991: x_pqy_rec := l_pqy_rec;
992: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
993: EXCEPTION
994: WHEN OKC_API.G_EXCEPTION_ERROR THEN
995: x_return_status := OKC_API.HANDLE_EXCEPTIONS
996: (

Line 994: WHEN OKC_API.G_EXCEPTION_ERROR THEN

990: -- Set OUT values
991: x_pqy_rec := l_pqy_rec;
992: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
993: EXCEPTION
994: WHEN OKC_API.G_EXCEPTION_ERROR THEN
995: x_return_status := OKC_API.HANDLE_EXCEPTIONS
996: (
997: l_api_name,
998: G_PKG_NAME,

Line 995: x_return_status := OKC_API.HANDLE_EXCEPTIONS

991: x_pqy_rec := l_pqy_rec;
992: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
993: EXCEPTION
994: WHEN OKC_API.G_EXCEPTION_ERROR THEN
995: x_return_status := OKC_API.HANDLE_EXCEPTIONS
996: (
997: l_api_name,
998: G_PKG_NAME,
999: 'OKC_API.G_RET_STS_ERROR',

Line 999: 'OKC_API.G_RET_STS_ERROR',

995: x_return_status := OKC_API.HANDLE_EXCEPTIONS
996: (
997: l_api_name,
998: G_PKG_NAME,
999: 'OKC_API.G_RET_STS_ERROR',
1000: x_msg_count,
1001: x_msg_data,
1002: '_PVT'
1003: );

Line 1004: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1000: x_msg_count,
1001: x_msg_data,
1002: '_PVT'
1003: );
1004: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1005: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,
1008: G_PKG_NAME,

Line 1005: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1001: x_msg_data,
1002: '_PVT'
1003: );
1004: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1005: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,
1008: G_PKG_NAME,
1009: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1009: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1005: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,
1008: G_PKG_NAME,
1009: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1010: x_msg_count,
1011: x_msg_data,
1012: '_PVT'
1013: );

Line 1015: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1030: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1026: -- insert_row for:OKL_PDT_QUALITYS_V --
1027: ---------------------------------------
1028: PROCEDURE insert_row(
1029: p_api_version IN NUMBER,
1030: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1031: x_return_status OUT NOCOPY VARCHAR2,
1032: x_msg_count OUT NOCOPY NUMBER,
1033: x_msg_data OUT NOCOPY VARCHAR2,
1034: p_pqyv_rec IN pqyv_rec_type,

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

1035: x_pqyv_rec OUT NOCOPY pqyv_rec_type) IS
1036:
1037: l_api_version CONSTANT NUMBER := 1;
1038: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1039: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1040: l_pqyv_rec pqyv_rec_type;
1041: l_def_pqyv_rec pqyv_rec_type;
1042: l_pqy_rec pqy_rec_type;
1043: lx_pqy_rec pqy_rec_type;

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

1062: FUNCTION Set_Attributes (
1063: p_pqyv_rec IN pqyv_rec_type,
1064: x_pqyv_rec OUT NOCOPY pqyv_rec_type
1065: ) RETURN VARCHAR2 IS
1066: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1067: BEGIN
1068: x_pqyv_rec := p_pqyv_rec;
1069: x_pqyv_rec.OBJECT_VERSION_NUMBER := 1;
1070: RETURN(l_return_status);

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

1069: x_pqyv_rec.OBJECT_VERSION_NUMBER := 1;
1070: RETURN(l_return_status);
1071: END Set_Attributes;
1072: BEGIN
1073: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1074: G_PKG_NAME,
1075: p_init_msg_list,
1076: l_api_version,
1077: p_api_version,

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

1076: l_api_version,
1077: p_api_version,
1078: '_PVT',
1079: x_return_status);
1080: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1081:
1082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083:
1084: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

Line 1082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1078: '_PVT',
1079: x_return_status);
1080: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1081:
1082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083:
1084: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1085: RAISE OKC_API.G_EXCEPTION_ERROR;
1086: END IF;

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

1080: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1081:
1082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083:
1084: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1085: RAISE OKC_API.G_EXCEPTION_ERROR;
1086: END IF;
1087: l_pqyv_rec := null_out_defaults(p_pqyv_rec);
1088: -- Set primary key value

Line 1085: RAISE OKC_API.G_EXCEPTION_ERROR;

1081:
1082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083:
1084: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1085: RAISE OKC_API.G_EXCEPTION_ERROR;
1086: END IF;
1087: l_pqyv_rec := null_out_defaults(p_pqyv_rec);
1088: -- Set primary key value
1089: l_pqyv_rec.ID := get_seq_id;

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

1091: l_return_status := Set_Attributes(
1092: l_pqyv_rec, -- IN
1093: l_def_pqyv_rec); -- OUT
1094: --- If any errors happen abort API
1095: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1096: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1097: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1098: RAISE OKC_API.G_EXCEPTION_ERROR;
1099: END IF;

Line 1096: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1092: l_pqyv_rec, -- IN
1093: l_def_pqyv_rec); -- OUT
1094: --- If any errors happen abort API
1095: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1096: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1097: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1098: RAISE OKC_API.G_EXCEPTION_ERROR;
1099: END IF;
1100: l_def_pqyv_rec := fill_who_columns(l_def_pqyv_rec);

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

1093: l_def_pqyv_rec); -- OUT
1094: --- If any errors happen abort API
1095: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1096: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1097: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1098: RAISE OKC_API.G_EXCEPTION_ERROR;
1099: END IF;
1100: l_def_pqyv_rec := fill_who_columns(l_def_pqyv_rec);
1101: --- Validate all non-missing attributes (Item Level Validation)

Line 1098: RAISE OKC_API.G_EXCEPTION_ERROR;

1094: --- If any errors happen abort API
1095: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1096: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1097: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1098: RAISE OKC_API.G_EXCEPTION_ERROR;
1099: END IF;
1100: l_def_pqyv_rec := fill_who_columns(l_def_pqyv_rec);
1101: --- Validate all non-missing attributes (Item Level Validation)
1102:

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

1101: --- Validate all non-missing attributes (Item Level Validation)
1102:
1103: l_return_status := Validate_Attributes(l_def_pqyv_rec);
1104: -- If any errors happen abort API
1105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1108: RAISE OKC_API.G_EXCEPTION_ERROR;
1109: END IF;

Line 1106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1102:
1103: l_return_status := Validate_Attributes(l_def_pqyv_rec);
1104: -- If any errors happen abort API
1105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1108: RAISE OKC_API.G_EXCEPTION_ERROR;
1109: END IF;
1110:

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

1103: l_return_status := Validate_Attributes(l_def_pqyv_rec);
1104: -- If any errors happen abort API
1105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1108: RAISE OKC_API.G_EXCEPTION_ERROR;
1109: END IF;
1110:
1111: l_return_status := Validate_Record(l_def_pqyv_rec);

Line 1108: RAISE OKC_API.G_EXCEPTION_ERROR;

1104: -- If any errors happen abort API
1105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1108: RAISE OKC_API.G_EXCEPTION_ERROR;
1109: END IF;
1110:
1111: l_return_status := Validate_Record(l_def_pqyv_rec);
1112: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1108: RAISE OKC_API.G_EXCEPTION_ERROR;
1109: END IF;
1110:
1111: l_return_status := Validate_Record(l_def_pqyv_rec);
1112: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1113: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1114: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1115: RAISE OKC_API.G_EXCEPTION_ERROR;
1116: END IF;

Line 1113: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1109: END IF;
1110:
1111: l_return_status := Validate_Record(l_def_pqyv_rec);
1112: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1113: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1114: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1115: RAISE OKC_API.G_EXCEPTION_ERROR;
1116: END IF;
1117: --------------------------------------

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

1110:
1111: l_return_status := Validate_Record(l_def_pqyv_rec);
1112: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1113: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1114: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1115: RAISE OKC_API.G_EXCEPTION_ERROR;
1116: END IF;
1117: --------------------------------------
1118: -- Move VIEW record to "Child" records

Line 1115: RAISE OKC_API.G_EXCEPTION_ERROR;

1111: l_return_status := Validate_Record(l_def_pqyv_rec);
1112: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1113: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1114: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1115: RAISE OKC_API.G_EXCEPTION_ERROR;
1116: END IF;
1117: --------------------------------------
1118: -- Move VIEW record to "Child" records
1119: --------------------------------------

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

1128: x_msg_data,
1129: l_pqy_rec,
1130: lx_pqy_rec
1131: );
1132: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1133: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1134: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1135: RAISE OKC_API.G_EXCEPTION_ERROR;
1136: END IF;

Line 1133: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1129: l_pqy_rec,
1130: lx_pqy_rec
1131: );
1132: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1133: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1134: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1135: RAISE OKC_API.G_EXCEPTION_ERROR;
1136: END IF;
1137: migrate(lx_pqy_rec, l_def_pqyv_rec);

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

1130: lx_pqy_rec
1131: );
1132: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1133: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1134: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1135: RAISE OKC_API.G_EXCEPTION_ERROR;
1136: END IF;
1137: migrate(lx_pqy_rec, l_def_pqyv_rec);
1138: -- Set OUT values

Line 1135: RAISE OKC_API.G_EXCEPTION_ERROR;

1131: );
1132: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1133: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1134: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1135: RAISE OKC_API.G_EXCEPTION_ERROR;
1136: END IF;
1137: migrate(lx_pqy_rec, l_def_pqyv_rec);
1138: -- Set OUT values
1139: x_pqyv_rec := l_def_pqyv_rec;

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

1136: END IF;
1137: migrate(lx_pqy_rec, l_def_pqyv_rec);
1138: -- Set OUT values
1139: x_pqyv_rec := l_def_pqyv_rec;
1140: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1141: EXCEPTION
1142: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1143: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1144: (

Line 1142: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1138: -- Set OUT values
1139: x_pqyv_rec := l_def_pqyv_rec;
1140: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1141: EXCEPTION
1142: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1143: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1144: (
1145: l_api_name,
1146: G_PKG_NAME,

Line 1143: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1139: x_pqyv_rec := l_def_pqyv_rec;
1140: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1141: EXCEPTION
1142: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1143: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1144: (
1145: l_api_name,
1146: G_PKG_NAME,
1147: 'OKC_API.G_RET_STS_ERROR',

Line 1147: 'OKC_API.G_RET_STS_ERROR',

1143: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1144: (
1145: l_api_name,
1146: G_PKG_NAME,
1147: 'OKC_API.G_RET_STS_ERROR',
1148: x_msg_count,
1149: x_msg_data,
1150: '_PVT'
1151: );

Line 1152: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1148: x_msg_count,
1149: x_msg_data,
1150: '_PVT'
1151: );
1152: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1153: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1154: (
1155: l_api_name,
1156: G_PKG_NAME,

Line 1153: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1149: x_msg_data,
1150: '_PVT'
1151: );
1152: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1153: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1154: (
1155: l_api_name,
1156: G_PKG_NAME,
1157: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1157: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1153: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1154: (
1155: l_api_name,
1156: G_PKG_NAME,
1157: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1158: x_msg_count,
1159: x_msg_data,
1160: '_PVT'
1161: );

Line 1163: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1159: x_msg_data,
1160: '_PVT'
1161: );
1162: WHEN OTHERS THEN
1163: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1164: (
1165: l_api_name,
1166: G_PKG_NAME,
1167: 'OTHERS',

Line 1178: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1174: -- PL/SQL TBL insert_row for:PQYV_TBL --
1175: ----------------------------------------
1176: PROCEDURE insert_row(
1177: p_api_version IN NUMBER,
1178: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1179: x_return_status OUT NOCOPY VARCHAR2,
1180: x_msg_count OUT NOCOPY NUMBER,
1181: x_msg_data OUT NOCOPY VARCHAR2,
1182: p_pqyv_tbl IN pqyv_tbl_type,

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

1183: x_pqyv_tbl OUT NOCOPY pqyv_tbl_type) IS
1184:
1185: l_api_version CONSTANT NUMBER := 1;
1186: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1187: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1188: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1189: i NUMBER := 0;
1190: BEGIN
1191: OKC_API.init_msg_list(p_init_msg_list);

Line 1188: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

1184:
1185: l_api_version CONSTANT NUMBER := 1;
1186: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1187: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1188: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1189: i NUMBER := 0;
1190: BEGIN
1191: OKC_API.init_msg_list(p_init_msg_list);
1192: -- Make sure PL/SQL table has records in it before passing

Line 1191: OKC_API.init_msg_list(p_init_msg_list);

1187: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1188: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1189: i NUMBER := 0;
1190: BEGIN
1191: OKC_API.init_msg_list(p_init_msg_list);
1192: -- Make sure PL/SQL table has records in it before passing
1193: IF (p_pqyv_tbl.COUNT > 0) THEN
1194: i := p_pqyv_tbl.FIRST;
1195: LOOP

Line 1198: p_init_msg_list => OKC_API.G_FALSE,

1194: i := p_pqyv_tbl.FIRST;
1195: LOOP
1196: insert_row (
1197: p_api_version => p_api_version,
1198: p_init_msg_list => OKC_API.G_FALSE,
1199: x_return_status => x_return_status,
1200: x_msg_count => x_msg_count,
1201: x_msg_data => x_msg_data,
1202: p_pqyv_rec => p_pqyv_tbl(i),

Line 1205: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1201: x_msg_data => x_msg_data,
1202: p_pqyv_rec => p_pqyv_tbl(i),
1203: x_pqyv_rec => x_pqyv_tbl(i));
1204: -- TCHGS: Store the highest degree of error
1205: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1206: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1207: l_overall_status := x_return_status;
1208: END IF;
1209: END IF;

Line 1206: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

1202: p_pqyv_rec => p_pqyv_tbl(i),
1203: x_pqyv_rec => x_pqyv_tbl(i));
1204: -- TCHGS: Store the highest degree of error
1205: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1206: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1207: l_overall_status := x_return_status;
1208: END IF;
1209: END IF;
1210: EXIT WHEN (i = p_pqyv_tbl.LAST);

Line 1217: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1213: --TCHGS: return overall status
1214: x_return_status := l_overall_status;
1215: END IF;
1216: EXCEPTION
1217: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1218: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1219: (
1220: l_api_name,
1221: G_PKG_NAME,

Line 1218: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1214: x_return_status := l_overall_status;
1215: END IF;
1216: EXCEPTION
1217: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1218: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1219: (
1220: l_api_name,
1221: G_PKG_NAME,
1222: 'OKC_API.G_RET_STS_ERROR',

Line 1222: 'OKC_API.G_RET_STS_ERROR',

1218: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1219: (
1220: l_api_name,
1221: G_PKG_NAME,
1222: 'OKC_API.G_RET_STS_ERROR',
1223: x_msg_count,
1224: x_msg_data,
1225: '_PVT'
1226: );

Line 1227: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1223: x_msg_count,
1224: x_msg_data,
1225: '_PVT'
1226: );
1227: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1228: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1229: (
1230: l_api_name,
1231: G_PKG_NAME,

Line 1228: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1224: x_msg_data,
1225: '_PVT'
1226: );
1227: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1228: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1229: (
1230: l_api_name,
1231: G_PKG_NAME,
1232: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1232: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1228: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1229: (
1230: l_api_name,
1231: G_PKG_NAME,
1232: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1233: x_msg_count,
1234: x_msg_data,
1235: '_PVT'
1236: );

Line 1238: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1234: x_msg_data,
1235: '_PVT'
1236: );
1237: WHEN OTHERS THEN
1238: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,
1242: 'OTHERS',

Line 1256: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1252: -----------------------------------
1253: -- lock_row for:OKL_PDT_QUALITYS --
1254: -----------------------------------
1255: PROCEDURE lock_row(
1256: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1257: x_return_status OUT NOCOPY VARCHAR2,
1258: x_msg_count OUT NOCOPY NUMBER,
1259: x_msg_data OUT NOCOPY VARCHAR2,
1260: p_pqy_rec IN pqy_rec_type) IS

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

1273: FROM OKL_PDT_QUALITYS
1274: WHERE ID = p_pqy_rec.id;
1275: l_api_version CONSTANT NUMBER := 1;
1276: l_api_name CONSTANT VARCHAR2(30) := 'QUALITYS_lock_row';
1277: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1278: l_object_version_number OKL_PDT_QUALITYS.OBJECT_VERSION_NUMBER%TYPE;
1279: lc_object_version_number OKL_PDT_QUALITYS.OBJECT_VERSION_NUMBER%TYPE;
1280: l_row_notfound BOOLEAN := FALSE;
1281: lc_row_notfound BOOLEAN := FALSE;

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

1279: lc_object_version_number OKL_PDT_QUALITYS.OBJECT_VERSION_NUMBER%TYPE;
1280: l_row_notfound BOOLEAN := FALSE;
1281: lc_row_notfound BOOLEAN := FALSE;
1282: BEGIN
1283: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1284: p_init_msg_list,
1285: '_PVT',
1286: x_return_status);
1287: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1283: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1284: p_init_msg_list,
1285: '_PVT',
1286: x_return_status);
1287: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_ERROR;
1291: END IF;

Line 1288: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1284: p_init_msg_list,
1285: '_PVT',
1286: x_return_status);
1287: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_ERROR;
1291: END IF;
1292: BEGIN

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

1285: '_PVT',
1286: x_return_status);
1287: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_ERROR;
1291: END IF;
1292: BEGIN
1293: OPEN lock_csr(p_pqy_rec);

Line 1290: RAISE OKC_API.G_EXCEPTION_ERROR;

1286: x_return_status);
1287: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_ERROR;
1291: END IF;
1292: BEGIN
1293: OPEN lock_csr(p_pqy_rec);
1294: FETCH lock_csr INTO l_object_version_number;

Line 1302: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1298: WHEN E_Resource_Busy THEN
1299: IF (lock_csr%ISOPEN) THEN
1300: CLOSE lock_csr;
1301: END IF;
1302: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1303: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1304: END;
1305:
1306: IF ( l_row_notfound ) THEN

Line 1313: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1309: lc_row_notfound := lchk_csr%NOTFOUND;
1310: CLOSE lchk_csr;
1311: END IF;
1312: IF (lc_row_notfound) THEN
1313: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1314: RAISE OKC_API.G_EXCEPTION_ERROR;
1315: ELSIF lc_object_version_number > p_pqy_rec.object_version_number THEN
1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1317: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1314: RAISE OKC_API.G_EXCEPTION_ERROR;

1310: CLOSE lchk_csr;
1311: END IF;
1312: IF (lc_row_notfound) THEN
1313: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1314: RAISE OKC_API.G_EXCEPTION_ERROR;
1315: ELSIF lc_object_version_number > p_pqy_rec.object_version_number THEN
1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1317: RAISE OKC_API.G_EXCEPTION_ERROR;
1318: ELSIF lc_object_version_number <> p_pqy_rec.object_version_number THEN

Line 1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1312: IF (lc_row_notfound) THEN
1313: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1314: RAISE OKC_API.G_EXCEPTION_ERROR;
1315: ELSIF lc_object_version_number > p_pqy_rec.object_version_number THEN
1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1317: RAISE OKC_API.G_EXCEPTION_ERROR;
1318: ELSIF lc_object_version_number <> p_pqy_rec.object_version_number THEN
1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1320: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1317: RAISE OKC_API.G_EXCEPTION_ERROR;

1313: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1314: RAISE OKC_API.G_EXCEPTION_ERROR;
1315: ELSIF lc_object_version_number > p_pqy_rec.object_version_number THEN
1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1317: RAISE OKC_API.G_EXCEPTION_ERROR;
1318: ELSIF lc_object_version_number <> p_pqy_rec.object_version_number THEN
1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1320: RAISE OKC_API.G_EXCEPTION_ERROR;
1321: ELSIF lc_object_version_number = -1 THEN

Line 1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1315: ELSIF lc_object_version_number > p_pqy_rec.object_version_number THEN
1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1317: RAISE OKC_API.G_EXCEPTION_ERROR;
1318: ELSIF lc_object_version_number <> p_pqy_rec.object_version_number THEN
1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1320: RAISE OKC_API.G_EXCEPTION_ERROR;
1321: ELSIF lc_object_version_number = -1 THEN
1322: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1323: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1320: RAISE OKC_API.G_EXCEPTION_ERROR;

1316: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1317: RAISE OKC_API.G_EXCEPTION_ERROR;
1318: ELSIF lc_object_version_number <> p_pqy_rec.object_version_number THEN
1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1320: RAISE OKC_API.G_EXCEPTION_ERROR;
1321: ELSIF lc_object_version_number = -1 THEN
1322: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1323: RAISE OKC_API.G_EXCEPTION_ERROR;
1324: END IF;

Line 1322: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1318: ELSIF lc_object_version_number <> p_pqy_rec.object_version_number THEN
1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1320: RAISE OKC_API.G_EXCEPTION_ERROR;
1321: ELSIF lc_object_version_number = -1 THEN
1322: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1323: RAISE OKC_API.G_EXCEPTION_ERROR;
1324: END IF;
1325: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1326: EXCEPTION

Line 1323: RAISE OKC_API.G_EXCEPTION_ERROR;

1319: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1320: RAISE OKC_API.G_EXCEPTION_ERROR;
1321: ELSIF lc_object_version_number = -1 THEN
1322: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1323: RAISE OKC_API.G_EXCEPTION_ERROR;
1324: END IF;
1325: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1326: EXCEPTION
1327: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1321: ELSIF lc_object_version_number = -1 THEN
1322: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1323: RAISE OKC_API.G_EXCEPTION_ERROR;
1324: END IF;
1325: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1326: EXCEPTION
1327: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1329: (

Line 1327: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1323: RAISE OKC_API.G_EXCEPTION_ERROR;
1324: END IF;
1325: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1326: EXCEPTION
1327: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1329: (
1330: l_api_name,
1331: G_PKG_NAME,

Line 1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1324: END IF;
1325: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1326: EXCEPTION
1327: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1329: (
1330: l_api_name,
1331: G_PKG_NAME,
1332: 'OKC_API.G_RET_STS_ERROR',

Line 1332: 'OKC_API.G_RET_STS_ERROR',

1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1329: (
1330: l_api_name,
1331: G_PKG_NAME,
1332: 'OKC_API.G_RET_STS_ERROR',
1333: x_msg_count,
1334: x_msg_data,
1335: '_PVT'
1336: );

Line 1337: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1333: x_msg_count,
1334: x_msg_data,
1335: '_PVT'
1336: );
1337: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1338: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1339: (
1340: l_api_name,
1341: G_PKG_NAME,

Line 1338: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1334: x_msg_data,
1335: '_PVT'
1336: );
1337: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1338: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1339: (
1340: l_api_name,
1341: G_PKG_NAME,
1342: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1342: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1338: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1339: (
1340: l_api_name,
1341: G_PKG_NAME,
1342: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1343: x_msg_count,
1344: x_msg_data,
1345: '_PVT'
1346: );

Line 1348: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1344: x_msg_data,
1345: '_PVT'
1346: );
1347: WHEN OTHERS THEN
1348: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1349: (
1350: l_api_name,
1351: G_PKG_NAME,
1352: 'OTHERS',

Line 1363: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1359: -- lock_row for:OKL_PDT_QUALITYS_V --
1360: -------------------------------------
1361: PROCEDURE lock_row(
1362: p_api_version IN NUMBER,
1363: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1364: x_return_status OUT NOCOPY VARCHAR2,
1365: x_msg_count OUT NOCOPY NUMBER,
1366: x_msg_data OUT NOCOPY VARCHAR2,
1367: p_pqyv_rec IN pqyv_rec_type) IS

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

1367: p_pqyv_rec IN pqyv_rec_type) IS
1368:
1369: l_api_version CONSTANT NUMBER := 1;
1370: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1371: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1372: l_pqy_rec pqy_rec_type;
1373: BEGIN
1374: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1375: G_PKG_NAME,

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

1370: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1371: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1372: l_pqy_rec pqy_rec_type;
1373: BEGIN
1374: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1375: G_PKG_NAME,
1376: p_init_msg_list,
1377: l_api_version,
1378: p_api_version,

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

1377: l_api_version,
1378: p_api_version,
1379: '_PVT',
1380: x_return_status);
1381: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1383: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_ERROR;
1385: END IF;

Line 1382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1378: p_api_version,
1379: '_PVT',
1380: x_return_status);
1381: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1383: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_ERROR;
1385: END IF;
1386: --------------------------------------

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

1379: '_PVT',
1380: x_return_status);
1381: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1383: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_ERROR;
1385: END IF;
1386: --------------------------------------
1387: -- Move VIEW record to "Child" records

Line 1384: RAISE OKC_API.G_EXCEPTION_ERROR;

1380: x_return_status);
1381: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1383: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_ERROR;
1385: END IF;
1386: --------------------------------------
1387: -- Move VIEW record to "Child" records
1388: --------------------------------------

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

1396: x_msg_count,
1397: x_msg_data,
1398: l_pqy_rec
1399: );
1400: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1401: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1402: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;

Line 1401: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1397: x_msg_data,
1398: l_pqy_rec
1399: );
1400: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1401: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1402: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

1398: l_pqy_rec
1399: );
1400: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1401: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1402: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION

Line 1403: RAISE OKC_API.G_EXCEPTION_ERROR;

1399: );
1400: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1401: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1402: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1401: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1402: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (

Line 1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,

Line 1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1404: END IF;
1405: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1406: EXCEPTION
1407: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,
1412: 'OKC_API.G_RET_STS_ERROR',

Line 1412: 'OKC_API.G_RET_STS_ERROR',

1408: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1409: (
1410: l_api_name,
1411: G_PKG_NAME,
1412: 'OKC_API.G_RET_STS_ERROR',
1413: x_msg_count,
1414: x_msg_data,
1415: '_PVT'
1416: );

Line 1417: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1413: x_msg_count,
1414: x_msg_data,
1415: '_PVT'
1416: );
1417: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1419: (
1420: l_api_name,
1421: G_PKG_NAME,

Line 1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1414: x_msg_data,
1415: '_PVT'
1416: );
1417: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1419: (
1420: l_api_name,
1421: G_PKG_NAME,
1422: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1422: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1418: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1419: (
1420: l_api_name,
1421: G_PKG_NAME,
1422: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1423: x_msg_count,
1424: x_msg_data,
1425: '_PVT'
1426: );

Line 1428: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1424: x_msg_data,
1425: '_PVT'
1426: );
1427: WHEN OTHERS THEN
1428: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1429: (
1430: l_api_name,
1431: G_PKG_NAME,
1432: 'OTHERS',

Line 1443: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1439: -- PL/SQL TBL lock_row for:PQYV_TBL --
1440: --------------------------------------
1441: PROCEDURE lock_row(
1442: p_api_version IN NUMBER,
1443: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1444: x_return_status OUT NOCOPY VARCHAR2,
1445: x_msg_count OUT NOCOPY NUMBER,
1446: x_msg_data OUT NOCOPY VARCHAR2,
1447: p_pqyv_tbl IN pqyv_tbl_type) IS

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

1447: p_pqyv_tbl IN pqyv_tbl_type) IS
1448:
1449: l_api_version CONSTANT NUMBER := 1;
1450: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1451: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1452: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1453: i NUMBER := 0;
1454: BEGIN
1455: OKC_API.init_msg_list(p_init_msg_list);

Line 1452: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

1448:
1449: l_api_version CONSTANT NUMBER := 1;
1450: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1451: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1452: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1453: i NUMBER := 0;
1454: BEGIN
1455: OKC_API.init_msg_list(p_init_msg_list);
1456: -- Make sure PL/SQL table has records in it before passing

Line 1455: OKC_API.init_msg_list(p_init_msg_list);

1451: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1452: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1453: i NUMBER := 0;
1454: BEGIN
1455: OKC_API.init_msg_list(p_init_msg_list);
1456: -- Make sure PL/SQL table has records in it before passing
1457: IF (p_pqyv_tbl.COUNT > 0) THEN
1458: i := p_pqyv_tbl.FIRST;
1459: LOOP

Line 1462: p_init_msg_list => OKC_API.G_FALSE,

1458: i := p_pqyv_tbl.FIRST;
1459: LOOP
1460: lock_row (
1461: p_api_version => p_api_version,
1462: p_init_msg_list => OKC_API.G_FALSE,
1463: x_return_status => x_return_status,
1464: x_msg_count => x_msg_count,
1465: x_msg_data => x_msg_data,
1466: p_pqyv_rec => p_pqyv_tbl(i));

Line 1468: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1464: x_msg_count => x_msg_count,
1465: x_msg_data => x_msg_data,
1466: p_pqyv_rec => p_pqyv_tbl(i));
1467: -- TCHGS: Store the highest degree of error
1468: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1469: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1470: l_overall_status := x_return_status;
1471: END IF;
1472: END IF;

Line 1469: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

1465: x_msg_data => x_msg_data,
1466: p_pqyv_rec => p_pqyv_tbl(i));
1467: -- TCHGS: Store the highest degree of error
1468: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1469: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1470: l_overall_status := x_return_status;
1471: END IF;
1472: END IF;
1473: EXIT WHEN (i = p_pqyv_tbl.LAST);

Line 1480: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1476: --TCHGS: return overall status
1477: x_return_status := l_overall_status;
1478: END IF;
1479: EXCEPTION
1480: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1481: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1482: (
1483: l_api_name,
1484: G_PKG_NAME,

Line 1481: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1477: x_return_status := l_overall_status;
1478: END IF;
1479: EXCEPTION
1480: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1481: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1482: (
1483: l_api_name,
1484: G_PKG_NAME,
1485: 'OKC_API.G_RET_STS_ERROR',

Line 1485: 'OKC_API.G_RET_STS_ERROR',

1481: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1482: (
1483: l_api_name,
1484: G_PKG_NAME,
1485: 'OKC_API.G_RET_STS_ERROR',
1486: x_msg_count,
1487: x_msg_data,
1488: '_PVT'
1489: );

Line 1490: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1486: x_msg_count,
1487: x_msg_data,
1488: '_PVT'
1489: );
1490: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1491: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1492: (
1493: l_api_name,
1494: G_PKG_NAME,

Line 1491: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1487: x_msg_data,
1488: '_PVT'
1489: );
1490: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1491: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1492: (
1493: l_api_name,
1494: G_PKG_NAME,
1495: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1495: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1491: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1492: (
1493: l_api_name,
1494: G_PKG_NAME,
1495: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1496: x_msg_count,
1497: x_msg_data,
1498: '_PVT'
1499: );

Line 1501: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1497: x_msg_data,
1498: '_PVT'
1499: );
1500: WHEN OTHERS THEN
1501: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1502: (
1503: l_api_name,
1504: G_PKG_NAME,
1505: 'OTHERS',

Line 1519: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1515: -------------------------------------
1516: -- update_row for:OKL_PDT_QUALITYS --
1517: -------------------------------------
1518: PROCEDURE update_row(
1519: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1520: x_return_status OUT NOCOPY VARCHAR2,
1521: x_msg_count OUT NOCOPY NUMBER,
1522: x_msg_data OUT NOCOPY VARCHAR2,
1523: p_pqy_rec IN pqy_rec_type,

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

1524: x_pqy_rec OUT NOCOPY pqy_rec_type) IS
1525:
1526: l_api_version CONSTANT NUMBER := 1;
1527: l_api_name CONSTANT VARCHAR2(30) := 'QUALITYS_update_row';
1528: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1529: l_pqy_rec pqy_rec_type := p_pqy_rec;
1530: l_def_pqy_rec pqy_rec_type;
1531: l_row_notfound BOOLEAN := TRUE;
1532: ----------------------------------

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

1537: x_pqy_rec OUT NOCOPY pqy_rec_type
1538: ) RETURN VARCHAR2 IS
1539: l_pqy_rec pqy_rec_type;
1540: l_row_notfound BOOLEAN := TRUE;
1541: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1542: BEGIN
1543: x_pqy_rec := p_pqy_rec;
1544: -- Get current database values
1545: l_pqy_rec := get_rec(p_pqy_rec, l_row_notfound);

Line 1547: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1543: x_pqy_rec := p_pqy_rec;
1544: -- Get current database values
1545: l_pqy_rec := get_rec(p_pqy_rec, l_row_notfound);
1546: IF (l_row_notfound) THEN
1547: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1548: END IF;
1549: IF (x_pqy_rec.id = OKC_API.G_MISS_NUM)
1550: THEN
1551: x_pqy_rec.id := l_pqy_rec.id;

Line 1549: IF (x_pqy_rec.id = OKC_API.G_MISS_NUM)

1545: l_pqy_rec := get_rec(p_pqy_rec, l_row_notfound);
1546: IF (l_row_notfound) THEN
1547: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1548: END IF;
1549: IF (x_pqy_rec.id = OKC_API.G_MISS_NUM)
1550: THEN
1551: x_pqy_rec.id := l_pqy_rec.id;
1552: END IF;
1553: IF (x_pqy_rec.name = OKC_API.G_MISS_CHAR)

Line 1553: IF (x_pqy_rec.name = OKC_API.G_MISS_CHAR)

1549: IF (x_pqy_rec.id = OKC_API.G_MISS_NUM)
1550: THEN
1551: x_pqy_rec.id := l_pqy_rec.id;
1552: END IF;
1553: IF (x_pqy_rec.name = OKC_API.G_MISS_CHAR)
1554: THEN
1555: x_pqy_rec.name := l_pqy_rec.name;
1556: END IF;
1557: IF (x_pqy_rec.location_yn = OKC_API.G_MISS_CHAR)

Line 1557: IF (x_pqy_rec.location_yn = OKC_API.G_MISS_CHAR)

1553: IF (x_pqy_rec.name = OKC_API.G_MISS_CHAR)
1554: THEN
1555: x_pqy_rec.name := l_pqy_rec.name;
1556: END IF;
1557: IF (x_pqy_rec.location_yn = OKC_API.G_MISS_CHAR)
1558: THEN
1559: x_pqy_rec.location_yn := l_pqy_rec.location_yn;
1560: END IF;
1561: IF (x_pqy_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1561: IF (x_pqy_rec.object_version_number = OKC_API.G_MISS_NUM)

1557: IF (x_pqy_rec.location_yn = OKC_API.G_MISS_CHAR)
1558: THEN
1559: x_pqy_rec.location_yn := l_pqy_rec.location_yn;
1560: END IF;
1561: IF (x_pqy_rec.object_version_number = OKC_API.G_MISS_NUM)
1562: THEN
1563: x_pqy_rec.object_version_number := l_pqy_rec.object_version_number;
1564: END IF;
1565: IF (x_pqy_rec.description = OKC_API.G_MISS_CHAR)

Line 1565: IF (x_pqy_rec.description = OKC_API.G_MISS_CHAR)

1561: IF (x_pqy_rec.object_version_number = OKC_API.G_MISS_NUM)
1562: THEN
1563: x_pqy_rec.object_version_number := l_pqy_rec.object_version_number;
1564: END IF;
1565: IF (x_pqy_rec.description = OKC_API.G_MISS_CHAR)
1566: THEN
1567: x_pqy_rec.description := l_pqy_rec.description;
1568: END IF;
1569: IF (x_pqy_rec.from_date = OKC_API.G_MISS_DATE)

Line 1569: IF (x_pqy_rec.from_date = OKC_API.G_MISS_DATE)

1565: IF (x_pqy_rec.description = OKC_API.G_MISS_CHAR)
1566: THEN
1567: x_pqy_rec.description := l_pqy_rec.description;
1568: END IF;
1569: IF (x_pqy_rec.from_date = OKC_API.G_MISS_DATE)
1570: THEN
1571: x_pqy_rec.from_date := l_pqy_rec.from_date;
1572: END IF;
1573: IF (x_pqy_rec.TO_DATE = OKC_API.G_MISS_DATE)

Line 1573: IF (x_pqy_rec.TO_DATE = OKC_API.G_MISS_DATE)

1569: IF (x_pqy_rec.from_date = OKC_API.G_MISS_DATE)
1570: THEN
1571: x_pqy_rec.from_date := l_pqy_rec.from_date;
1572: END IF;
1573: IF (x_pqy_rec.TO_DATE = OKC_API.G_MISS_DATE)
1574: THEN
1575: x_pqy_rec.TO_DATE := l_pqy_rec.TO_DATE;
1576: END IF;
1577: IF (x_pqy_rec.created_by = OKC_API.G_MISS_NUM)

Line 1577: IF (x_pqy_rec.created_by = OKC_API.G_MISS_NUM)

1573: IF (x_pqy_rec.TO_DATE = OKC_API.G_MISS_DATE)
1574: THEN
1575: x_pqy_rec.TO_DATE := l_pqy_rec.TO_DATE;
1576: END IF;
1577: IF (x_pqy_rec.created_by = OKC_API.G_MISS_NUM)
1578: THEN
1579: x_pqy_rec.created_by := l_pqy_rec.created_by;
1580: END IF;
1581: IF (x_pqy_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1581: IF (x_pqy_rec.creation_date = OKC_API.G_MISS_DATE)

1577: IF (x_pqy_rec.created_by = OKC_API.G_MISS_NUM)
1578: THEN
1579: x_pqy_rec.created_by := l_pqy_rec.created_by;
1580: END IF;
1581: IF (x_pqy_rec.creation_date = OKC_API.G_MISS_DATE)
1582: THEN
1583: x_pqy_rec.creation_date := l_pqy_rec.creation_date;
1584: END IF;
1585: IF (x_pqy_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1585: IF (x_pqy_rec.last_updated_by = OKC_API.G_MISS_NUM)

1581: IF (x_pqy_rec.creation_date = OKC_API.G_MISS_DATE)
1582: THEN
1583: x_pqy_rec.creation_date := l_pqy_rec.creation_date;
1584: END IF;
1585: IF (x_pqy_rec.last_updated_by = OKC_API.G_MISS_NUM)
1586: THEN
1587: x_pqy_rec.last_updated_by := l_pqy_rec.last_updated_by;
1588: END IF;
1589: IF (x_pqy_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1589: IF (x_pqy_rec.last_update_date = OKC_API.G_MISS_DATE)

1585: IF (x_pqy_rec.last_updated_by = OKC_API.G_MISS_NUM)
1586: THEN
1587: x_pqy_rec.last_updated_by := l_pqy_rec.last_updated_by;
1588: END IF;
1589: IF (x_pqy_rec.last_update_date = OKC_API.G_MISS_DATE)
1590: THEN
1591: x_pqy_rec.last_update_date := l_pqy_rec.last_update_date;
1592: END IF;
1593: IF (x_pqy_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1593: IF (x_pqy_rec.last_update_login = OKC_API.G_MISS_NUM)

1589: IF (x_pqy_rec.last_update_date = OKC_API.G_MISS_DATE)
1590: THEN
1591: x_pqy_rec.last_update_date := l_pqy_rec.last_update_date;
1592: END IF;
1593: IF (x_pqy_rec.last_update_login = OKC_API.G_MISS_NUM)
1594: THEN
1595: x_pqy_rec.last_update_login := l_pqy_rec.last_update_login;
1596: END IF;
1597: RETURN(l_return_status);

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

1602: FUNCTION Set_Attributes (
1603: p_pqy_rec IN pqy_rec_type,
1604: x_pqy_rec OUT NOCOPY pqy_rec_type
1605: ) RETURN VARCHAR2 IS
1606: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1607: BEGIN
1608: x_pqy_rec := p_pqy_rec;
1609: RETURN(l_return_status);
1610: END Set_Attributes;

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

1608: x_pqy_rec := p_pqy_rec;
1609: RETURN(l_return_status);
1610: END Set_Attributes;
1611: BEGIN
1612: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1613: p_init_msg_list,
1614: '_PVT',
1615: x_return_status);
1616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1612: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1613: p_init_msg_list,
1614: '_PVT',
1615: x_return_status);
1616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1617: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1618: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1619: RAISE OKC_API.G_EXCEPTION_ERROR;
1620: END IF;

Line 1617: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1613: p_init_msg_list,
1614: '_PVT',
1615: x_return_status);
1616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1617: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1618: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1619: RAISE OKC_API.G_EXCEPTION_ERROR;
1620: END IF;
1621: --- Setting item attributes

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

1614: '_PVT',
1615: x_return_status);
1616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1617: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1618: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1619: RAISE OKC_API.G_EXCEPTION_ERROR;
1620: END IF;
1621: --- Setting item attributes
1622: l_return_status := Set_Attributes(

Line 1619: RAISE OKC_API.G_EXCEPTION_ERROR;

1615: x_return_status);
1616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1617: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1618: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1619: RAISE OKC_API.G_EXCEPTION_ERROR;
1620: END IF;
1621: --- Setting item attributes
1622: l_return_status := Set_Attributes(
1623: p_pqy_rec, -- IN

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

1622: l_return_status := Set_Attributes(
1623: p_pqy_rec, -- IN
1624: l_pqy_rec); -- OUT
1625: --- If any errors happen abort API
1626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1627: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1628: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1629: RAISE OKC_API.G_EXCEPTION_ERROR;
1630: END IF;

Line 1627: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1623: p_pqy_rec, -- IN
1624: l_pqy_rec); -- OUT
1625: --- If any errors happen abort API
1626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1627: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1628: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1629: RAISE OKC_API.G_EXCEPTION_ERROR;
1630: END IF;
1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);

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

1624: l_pqy_rec); -- OUT
1625: --- If any errors happen abort API
1626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1627: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1628: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1629: RAISE OKC_API.G_EXCEPTION_ERROR;
1630: END IF;
1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);
1632: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1629: RAISE OKC_API.G_EXCEPTION_ERROR;

1625: --- If any errors happen abort API
1626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1627: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1628: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1629: RAISE OKC_API.G_EXCEPTION_ERROR;
1630: END IF;
1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);
1632: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1628: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1629: RAISE OKC_API.G_EXCEPTION_ERROR;
1630: END IF;
1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);
1632: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1634: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1635: RAISE OKC_API.G_EXCEPTION_ERROR;
1636: END IF;

Line 1633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1629: RAISE OKC_API.G_EXCEPTION_ERROR;
1630: END IF;
1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);
1632: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1634: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1635: RAISE OKC_API.G_EXCEPTION_ERROR;
1636: END IF;
1637: UPDATE OKL_PDT_QUALITYS

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

1630: END IF;
1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);
1632: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1634: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1635: RAISE OKC_API.G_EXCEPTION_ERROR;
1636: END IF;
1637: UPDATE OKL_PDT_QUALITYS
1638: SET NAME = l_def_pqy_rec.name,

Line 1635: RAISE OKC_API.G_EXCEPTION_ERROR;

1631: l_return_status := populate_new_record(l_pqy_rec, l_def_pqy_rec);
1632: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1634: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1635: RAISE OKC_API.G_EXCEPTION_ERROR;
1636: END IF;
1637: UPDATE OKL_PDT_QUALITYS
1638: SET NAME = l_def_pqy_rec.name,
1639: LOCATION_YN = l_def_pqy_rec.location_yn,

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

1648: LAST_UPDATE_LOGIN = l_def_pqy_rec.last_update_login
1649: WHERE ID = l_def_pqy_rec.id;
1650:
1651: x_pqy_rec := l_def_pqy_rec;
1652: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1653: EXCEPTION
1654: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (

Line 1654: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1650:
1651: x_pqy_rec := l_def_pqy_rec;
1652: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1653: EXCEPTION
1654: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (
1657: l_api_name,
1658: G_PKG_NAME,

Line 1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1651: x_pqy_rec := l_def_pqy_rec;
1652: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1653: EXCEPTION
1654: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (
1657: l_api_name,
1658: G_PKG_NAME,
1659: 'OKC_API.G_RET_STS_ERROR',

Line 1659: 'OKC_API.G_RET_STS_ERROR',

1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (
1657: l_api_name,
1658: G_PKG_NAME,
1659: 'OKC_API.G_RET_STS_ERROR',
1660: x_msg_count,
1661: x_msg_data,
1662: '_PVT'
1663: );

Line 1664: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1660: x_msg_count,
1661: x_msg_data,
1662: '_PVT'
1663: );
1664: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1665: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1666: (
1667: l_api_name,
1668: G_PKG_NAME,

Line 1665: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1661: x_msg_data,
1662: '_PVT'
1663: );
1664: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1665: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1666: (
1667: l_api_name,
1668: G_PKG_NAME,
1669: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1669: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1665: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1666: (
1667: l_api_name,
1668: G_PKG_NAME,
1669: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1670: x_msg_count,
1671: x_msg_data,
1672: '_PVT'
1673: );

Line 1675: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1671: x_msg_data,
1672: '_PVT'
1673: );
1674: WHEN OTHERS THEN
1675: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1676: (
1677: l_api_name,
1678: G_PKG_NAME,
1679: 'OTHERS',

Line 1690: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1686: -- update_row for:OKL_PDT_QUALITYS_V --
1687: ---------------------------------------
1688: PROCEDURE update_row(
1689: p_api_version IN NUMBER,
1690: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1691: x_return_status OUT NOCOPY VARCHAR2,
1692: x_msg_count OUT NOCOPY NUMBER,
1693: x_msg_data OUT NOCOPY VARCHAR2,
1694: p_pqyv_rec IN pqyv_rec_type,

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

1695: x_pqyv_rec OUT NOCOPY pqyv_rec_type) IS
1696:
1697: l_api_version CONSTANT NUMBER := 1;
1698: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1699: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1700: l_pqyv_rec pqyv_rec_type := p_pqyv_rec;
1701: l_def_pqyv_rec pqyv_rec_type;
1702: l_pqy_rec pqy_rec_type;
1703: lx_pqy_rec pqy_rec_type;

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

1722: x_pqyv_rec OUT NOCOPY pqyv_rec_type
1723: ) RETURN VARCHAR2 IS
1724: l_pqyv_rec pqyv_rec_type;
1725: l_row_notfound BOOLEAN := TRUE;
1726: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1727: BEGIN
1728: x_pqyv_rec := p_pqyv_rec;
1729: -- Get current database values
1730: l_pqyv_rec := get_rec(p_pqyv_rec, l_row_notfound);

Line 1732: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1728: x_pqyv_rec := p_pqyv_rec;
1729: -- Get current database values
1730: l_pqyv_rec := get_rec(p_pqyv_rec, l_row_notfound);
1731: IF (l_row_notfound) THEN
1732: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1733: END IF;
1734: IF (x_pqyv_rec.id = OKC_API.G_MISS_NUM)
1735: THEN
1736: x_pqyv_rec.id := l_pqyv_rec.id;

Line 1734: IF (x_pqyv_rec.id = OKC_API.G_MISS_NUM)

1730: l_pqyv_rec := get_rec(p_pqyv_rec, l_row_notfound);
1731: IF (l_row_notfound) THEN
1732: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1733: END IF;
1734: IF (x_pqyv_rec.id = OKC_API.G_MISS_NUM)
1735: THEN
1736: x_pqyv_rec.id := l_pqyv_rec.id;
1737: END IF;
1738: IF (x_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1738: IF (x_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM)

1734: IF (x_pqyv_rec.id = OKC_API.G_MISS_NUM)
1735: THEN
1736: x_pqyv_rec.id := l_pqyv_rec.id;
1737: END IF;
1738: IF (x_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM)
1739: THEN
1740: x_pqyv_rec.object_version_number := l_pqyv_rec.object_version_number;
1741: END IF;
1742: IF (x_pqyv_rec.name = OKC_API.G_MISS_CHAR)

Line 1742: IF (x_pqyv_rec.name = OKC_API.G_MISS_CHAR)

1738: IF (x_pqyv_rec.object_version_number = OKC_API.G_MISS_NUM)
1739: THEN
1740: x_pqyv_rec.object_version_number := l_pqyv_rec.object_version_number;
1741: END IF;
1742: IF (x_pqyv_rec.name = OKC_API.G_MISS_CHAR)
1743: THEN
1744: x_pqyv_rec.name := l_pqyv_rec.name;
1745: END IF;
1746: IF (x_pqyv_rec.description = OKC_API.G_MISS_CHAR)

Line 1746: IF (x_pqyv_rec.description = OKC_API.G_MISS_CHAR)

1742: IF (x_pqyv_rec.name = OKC_API.G_MISS_CHAR)
1743: THEN
1744: x_pqyv_rec.name := l_pqyv_rec.name;
1745: END IF;
1746: IF (x_pqyv_rec.description = OKC_API.G_MISS_CHAR)
1747: THEN
1748: x_pqyv_rec.description := l_pqyv_rec.description;
1749: END IF;
1750: IF (x_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR)

Line 1750: IF (x_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR)

1746: IF (x_pqyv_rec.description = OKC_API.G_MISS_CHAR)
1747: THEN
1748: x_pqyv_rec.description := l_pqyv_rec.description;
1749: END IF;
1750: IF (x_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR)
1751: THEN
1752: x_pqyv_rec.location_yn := l_pqyv_rec.location_yn;
1753: END IF;
1754: IF (x_pqyv_rec.from_date = OKC_API.G_MISS_DATE)

Line 1754: IF (x_pqyv_rec.from_date = OKC_API.G_MISS_DATE)

1750: IF (x_pqyv_rec.location_yn = OKC_API.G_MISS_CHAR)
1751: THEN
1752: x_pqyv_rec.location_yn := l_pqyv_rec.location_yn;
1753: END IF;
1754: IF (x_pqyv_rec.from_date = OKC_API.G_MISS_DATE)
1755: THEN
1756: x_pqyv_rec.from_date := l_pqyv_rec.from_date;
1757: END IF;
1758: IF (x_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE)

Line 1758: IF (x_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE)

1754: IF (x_pqyv_rec.from_date = OKC_API.G_MISS_DATE)
1755: THEN
1756: x_pqyv_rec.from_date := l_pqyv_rec.from_date;
1757: END IF;
1758: IF (x_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE)
1759: THEN
1760: x_pqyv_rec.TO_DATE := l_pqyv_rec.TO_DATE;
1761: END IF;
1762: IF (x_pqyv_rec.created_by = OKC_API.G_MISS_NUM)

Line 1762: IF (x_pqyv_rec.created_by = OKC_API.G_MISS_NUM)

1758: IF (x_pqyv_rec.TO_DATE = OKC_API.G_MISS_DATE)
1759: THEN
1760: x_pqyv_rec.TO_DATE := l_pqyv_rec.TO_DATE;
1761: END IF;
1762: IF (x_pqyv_rec.created_by = OKC_API.G_MISS_NUM)
1763: THEN
1764: x_pqyv_rec.created_by := l_pqyv_rec.created_by;
1765: END IF;
1766: IF (x_pqyv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1766: IF (x_pqyv_rec.creation_date = OKC_API.G_MISS_DATE)

1762: IF (x_pqyv_rec.created_by = OKC_API.G_MISS_NUM)
1763: THEN
1764: x_pqyv_rec.created_by := l_pqyv_rec.created_by;
1765: END IF;
1766: IF (x_pqyv_rec.creation_date = OKC_API.G_MISS_DATE)
1767: THEN
1768: x_pqyv_rec.creation_date := l_pqyv_rec.creation_date;
1769: END IF;
1770: IF (x_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1770: IF (x_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM)

1766: IF (x_pqyv_rec.creation_date = OKC_API.G_MISS_DATE)
1767: THEN
1768: x_pqyv_rec.creation_date := l_pqyv_rec.creation_date;
1769: END IF;
1770: IF (x_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1771: THEN
1772: x_pqyv_rec.last_updated_by := l_pqyv_rec.last_updated_by;
1773: END IF;
1774: IF (x_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1774: IF (x_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE)

1770: IF (x_pqyv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1771: THEN
1772: x_pqyv_rec.last_updated_by := l_pqyv_rec.last_updated_by;
1773: END IF;
1774: IF (x_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE)
1775: THEN
1776: x_pqyv_rec.last_update_date := l_pqyv_rec.last_update_date;
1777: END IF;
1778: IF (x_pqyv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1778: IF (x_pqyv_rec.last_update_login = OKC_API.G_MISS_NUM)

1774: IF (x_pqyv_rec.last_update_date = OKC_API.G_MISS_DATE)
1775: THEN
1776: x_pqyv_rec.last_update_date := l_pqyv_rec.last_update_date;
1777: END IF;
1778: IF (x_pqyv_rec.last_update_login = OKC_API.G_MISS_NUM)
1779: THEN
1780: x_pqyv_rec.last_update_login := l_pqyv_rec.last_update_login;
1781: END IF;
1782: RETURN(l_return_status);

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

1787: FUNCTION Set_Attributes (
1788: p_pqyv_rec IN pqyv_rec_type,
1789: x_pqyv_rec OUT NOCOPY pqyv_rec_type
1790: ) RETURN VARCHAR2 IS
1791: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1792: BEGIN
1793: x_pqyv_rec := p_pqyv_rec;
1794: x_pqyv_rec.OBJECT_VERSION_NUMBER := NVL(x_pqyv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1795: RETURN(l_return_status);

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

1794: x_pqyv_rec.OBJECT_VERSION_NUMBER := NVL(x_pqyv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1795: RETURN(l_return_status);
1796: END Set_Attributes;
1797: BEGIN
1798: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1799: G_PKG_NAME,
1800: p_init_msg_list,
1801: l_api_version,
1802: p_api_version,

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

1801: l_api_version,
1802: p_api_version,
1803: '_PVT',
1804: x_return_status);
1805: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1806: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1807: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_ERROR;
1809: END IF;

Line 1806: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1802: p_api_version,
1803: '_PVT',
1804: x_return_status);
1805: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1806: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1807: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_ERROR;
1809: END IF;
1810: --- Setting item attributes

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

1803: '_PVT',
1804: x_return_status);
1805: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1806: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1807: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_ERROR;
1809: END IF;
1810: --- Setting item attributes
1811: l_return_status := Set_Attributes(

Line 1808: RAISE OKC_API.G_EXCEPTION_ERROR;

1804: x_return_status);
1805: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1806: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1807: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_ERROR;
1809: END IF;
1810: --- Setting item attributes
1811: l_return_status := Set_Attributes(
1812: p_pqyv_rec, -- IN

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

1811: l_return_status := Set_Attributes(
1812: p_pqyv_rec, -- IN
1813: l_pqyv_rec); -- OUT
1814: --- If any errors happen abort API
1815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;

Line 1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1812: p_pqyv_rec, -- IN
1813: l_pqyv_rec); -- OUT
1814: --- If any errors happen abort API
1815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);

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

1813: l_pqyv_rec); -- OUT
1814: --- If any errors happen abort API
1815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);
1821: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1818: RAISE OKC_API.G_EXCEPTION_ERROR;

1814: --- If any errors happen abort API
1815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);
1821: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);
1821: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1824: RAISE OKC_API.G_EXCEPTION_ERROR;
1825: END IF;

Line 1822: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);
1821: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1824: RAISE OKC_API.G_EXCEPTION_ERROR;
1825: END IF;
1826: l_def_pqyv_rec := fill_who_columns(l_def_pqyv_rec);

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

1819: END IF;
1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);
1821: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1824: RAISE OKC_API.G_EXCEPTION_ERROR;
1825: END IF;
1826: l_def_pqyv_rec := fill_who_columns(l_def_pqyv_rec);
1827: --- Validate all non-missing attributes (Item Level Validation)

Line 1824: RAISE OKC_API.G_EXCEPTION_ERROR;

1820: l_return_status := populate_new_record(l_pqyv_rec, l_def_pqyv_rec);
1821: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1824: RAISE OKC_API.G_EXCEPTION_ERROR;
1825: END IF;
1826: l_def_pqyv_rec := fill_who_columns(l_def_pqyv_rec);
1827: --- Validate all non-missing attributes (Item Level Validation)
1828:

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

1827: --- Validate all non-missing attributes (Item Level Validation)
1828:
1829: l_return_status := Validate_Attributes(l_def_pqyv_rec);
1830: --If any errors happen abort API
1831: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1833: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1834: RAISE OKC_API.G_EXCEPTION_ERROR;
1835: END IF;

Line 1832: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1828:
1829: l_return_status := Validate_Attributes(l_def_pqyv_rec);
1830: --If any errors happen abort API
1831: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1833: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1834: RAISE OKC_API.G_EXCEPTION_ERROR;
1835: END IF;
1836:

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

1829: l_return_status := Validate_Attributes(l_def_pqyv_rec);
1830: --If any errors happen abort API
1831: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1833: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1834: RAISE OKC_API.G_EXCEPTION_ERROR;
1835: END IF;
1836:
1837: l_return_status := Validate_Record(l_def_pqyv_rec);

Line 1834: RAISE OKC_API.G_EXCEPTION_ERROR;

1830: --If any errors happen abort API
1831: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1833: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1834: RAISE OKC_API.G_EXCEPTION_ERROR;
1835: END IF;
1836:
1837: l_return_status := Validate_Record(l_def_pqyv_rec);
1838: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1834: RAISE OKC_API.G_EXCEPTION_ERROR;
1835: END IF;
1836:
1837: l_return_status := Validate_Record(l_def_pqyv_rec);
1838: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1839: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1840: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1841: RAISE OKC_API.G_EXCEPTION_ERROR;
1842: END IF;

Line 1839: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1835: END IF;
1836:
1837: l_return_status := Validate_Record(l_def_pqyv_rec);
1838: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1839: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1840: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1841: RAISE OKC_API.G_EXCEPTION_ERROR;
1842: END IF;
1843:

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

1836:
1837: l_return_status := Validate_Record(l_def_pqyv_rec);
1838: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1839: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1840: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1841: RAISE OKC_API.G_EXCEPTION_ERROR;
1842: END IF;
1843:
1844: --------------------------------------

Line 1841: RAISE OKC_API.G_EXCEPTION_ERROR;

1837: l_return_status := Validate_Record(l_def_pqyv_rec);
1838: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1839: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1840: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1841: RAISE OKC_API.G_EXCEPTION_ERROR;
1842: END IF;
1843:
1844: --------------------------------------
1845: -- Move VIEW record to "Child" records

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

1855: x_msg_data,
1856: l_pqy_rec,
1857: lx_pqy_rec
1858: );
1859: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1860: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1861: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1862: RAISE OKC_API.G_EXCEPTION_ERROR;
1863: END IF;

Line 1860: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1856: l_pqy_rec,
1857: lx_pqy_rec
1858: );
1859: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1860: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1861: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1862: RAISE OKC_API.G_EXCEPTION_ERROR;
1863: END IF;
1864: migrate(lx_pqy_rec, l_def_pqyv_rec);

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

1857: lx_pqy_rec
1858: );
1859: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1860: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1861: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1862: RAISE OKC_API.G_EXCEPTION_ERROR;
1863: END IF;
1864: migrate(lx_pqy_rec, l_def_pqyv_rec);
1865: x_pqyv_rec := l_def_pqyv_rec;

Line 1862: RAISE OKC_API.G_EXCEPTION_ERROR;

1858: );
1859: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1860: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1861: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1862: RAISE OKC_API.G_EXCEPTION_ERROR;
1863: END IF;
1864: migrate(lx_pqy_rec, l_def_pqyv_rec);
1865: x_pqyv_rec := l_def_pqyv_rec;
1866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

1862: RAISE OKC_API.G_EXCEPTION_ERROR;
1863: END IF;
1864: migrate(lx_pqy_rec, l_def_pqyv_rec);
1865: x_pqyv_rec := l_def_pqyv_rec;
1866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1867: EXCEPTION
1868: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1870: (

Line 1868: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1864: migrate(lx_pqy_rec, l_def_pqyv_rec);
1865: x_pqyv_rec := l_def_pqyv_rec;
1866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1867: EXCEPTION
1868: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,

Line 1869: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1865: x_pqyv_rec := l_def_pqyv_rec;
1866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1867: EXCEPTION
1868: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1873: 'OKC_API.G_RET_STS_ERROR',

Line 1873: 'OKC_API.G_RET_STS_ERROR',

1869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1873: 'OKC_API.G_RET_STS_ERROR',
1874: x_msg_count,
1875: x_msg_data,
1876: '_PVT'
1877: );

Line 1878: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1874: x_msg_count,
1875: x_msg_data,
1876: '_PVT'
1877: );
1878: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1879: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1880: (
1881: l_api_name,
1882: G_PKG_NAME,

Line 1879: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1875: x_msg_data,
1876: '_PVT'
1877: );
1878: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1879: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1880: (
1881: l_api_name,
1882: G_PKG_NAME,
1883: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1883: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1879: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1880: (
1881: l_api_name,
1882: G_PKG_NAME,
1883: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1884: x_msg_count,
1885: x_msg_data,
1886: '_PVT'
1887: );

Line 1889: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1885: x_msg_data,
1886: '_PVT'
1887: );
1888: WHEN OTHERS THEN
1889: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1890: (
1891: l_api_name,
1892: G_PKG_NAME,
1893: 'OTHERS',

Line 1904: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1900: -- PL/SQL TBL update_row for:PQYV_TBL --
1901: ----------------------------------------
1902: PROCEDURE update_row(
1903: p_api_version IN NUMBER,
1904: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1905: x_return_status OUT NOCOPY VARCHAR2,
1906: x_msg_count OUT NOCOPY NUMBER,
1907: x_msg_data OUT NOCOPY VARCHAR2,
1908: p_pqyv_tbl IN pqyv_tbl_type,

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

1909: x_pqyv_tbl OUT NOCOPY pqyv_tbl_type) IS
1910:
1911: l_api_version CONSTANT NUMBER := 1;
1912: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1913: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1914: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1915: i NUMBER := 0;
1916: BEGIN
1917: OKC_API.init_msg_list(p_init_msg_list);

Line 1914: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

1910:
1911: l_api_version CONSTANT NUMBER := 1;
1912: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1913: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1914: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1915: i NUMBER := 0;
1916: BEGIN
1917: OKC_API.init_msg_list(p_init_msg_list);
1918: -- Make sure PL/SQL table has records in it before passing

Line 1917: OKC_API.init_msg_list(p_init_msg_list);

1913: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1914: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
1915: i NUMBER := 0;
1916: BEGIN
1917: OKC_API.init_msg_list(p_init_msg_list);
1918: -- Make sure PL/SQL table has records in it before passing
1919: IF (p_pqyv_tbl.COUNT > 0) THEN
1920: i := p_pqyv_tbl.FIRST;
1921: LOOP

Line 1924: p_init_msg_list => OKC_API.G_FALSE,

1920: i := p_pqyv_tbl.FIRST;
1921: LOOP
1922: update_row (
1923: p_api_version => p_api_version,
1924: p_init_msg_list => OKC_API.G_FALSE,
1925: x_return_status => x_return_status,
1926: x_msg_count => x_msg_count,
1927: x_msg_data => x_msg_data,
1928: p_pqyv_rec => p_pqyv_tbl(i),

Line 1931: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1927: x_msg_data => x_msg_data,
1928: p_pqyv_rec => p_pqyv_tbl(i),
1929: x_pqyv_rec => x_pqyv_tbl(i));
1930: -- TCHGS: Store the highest degree of error
1931: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1932: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1933: l_overall_status := x_return_status;
1934: END IF;
1935: END IF;

Line 1932: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

1928: p_pqyv_rec => p_pqyv_tbl(i),
1929: x_pqyv_rec => x_pqyv_tbl(i));
1930: -- TCHGS: Store the highest degree of error
1931: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1932: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
1933: l_overall_status := x_return_status;
1934: END IF;
1935: END IF;
1936: EXIT WHEN (i = p_pqyv_tbl.LAST);

Line 1943: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1939: --TCHGS: return overall status
1940: x_return_status := l_overall_status;
1941: END IF;
1942: EXCEPTION
1943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1945: (
1946: l_api_name,
1947: G_PKG_NAME,

Line 1944: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1940: x_return_status := l_overall_status;
1941: END IF;
1942: EXCEPTION
1943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1945: (
1946: l_api_name,
1947: G_PKG_NAME,
1948: 'OKC_API.G_RET_STS_ERROR',

Line 1948: 'OKC_API.G_RET_STS_ERROR',

1944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1945: (
1946: l_api_name,
1947: G_PKG_NAME,
1948: 'OKC_API.G_RET_STS_ERROR',
1949: x_msg_count,
1950: x_msg_data,
1951: '_PVT'
1952: );

Line 1953: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1949: x_msg_count,
1950: x_msg_data,
1951: '_PVT'
1952: );
1953: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1954: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1955: (
1956: l_api_name,
1957: G_PKG_NAME,

Line 1954: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1950: x_msg_data,
1951: '_PVT'
1952: );
1953: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1954: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1955: (
1956: l_api_name,
1957: G_PKG_NAME,
1958: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1958: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1954: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1955: (
1956: l_api_name,
1957: G_PKG_NAME,
1958: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1959: x_msg_count,
1960: x_msg_data,
1961: '_PVT'
1962: );

Line 1964: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1960: x_msg_data,
1961: '_PVT'
1962: );
1963: WHEN OTHERS THEN
1964: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1965: (
1966: l_api_name,
1967: G_PKG_NAME,
1968: 'OTHERS',

Line 1982: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1978: -------------------------------------
1979: -- delete_row for:OKL_PDT_QUALITYS --
1980: -------------------------------------
1981: PROCEDURE delete_row(
1982: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1983: x_return_status OUT NOCOPY VARCHAR2,
1984: x_msg_count OUT NOCOPY NUMBER,
1985: x_msg_data OUT NOCOPY VARCHAR2,
1986: p_pqy_rec IN pqy_rec_type) IS

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

1986: p_pqy_rec IN pqy_rec_type) IS
1987:
1988: l_api_version CONSTANT NUMBER := 1;
1989: l_api_name CONSTANT VARCHAR2(30) := 'QUALITYS_delete_row';
1990: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1991: l_pqy_rec pqy_rec_type:= p_pqy_rec;
1992: l_row_notfound BOOLEAN := TRUE;
1993: BEGIN
1994: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

1990: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1991: l_pqy_rec pqy_rec_type:= p_pqy_rec;
1992: l_row_notfound BOOLEAN := TRUE;
1993: BEGIN
1994: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1995: p_init_msg_list,
1996: '_PVT',
1997: x_return_status);
1998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1994: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1995: p_init_msg_list,
1996: '_PVT',
1997: x_return_status);
1998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2001: RAISE OKC_API.G_EXCEPTION_ERROR;
2002: END IF;

Line 1999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1995: p_init_msg_list,
1996: '_PVT',
1997: x_return_status);
1998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2001: RAISE OKC_API.G_EXCEPTION_ERROR;
2002: END IF;
2003: DELETE FROM OKL_PDT_QUALITYS

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

1996: '_PVT',
1997: x_return_status);
1998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2001: RAISE OKC_API.G_EXCEPTION_ERROR;
2002: END IF;
2003: DELETE FROM OKL_PDT_QUALITYS
2004: WHERE ID = l_pqy_rec.id;

Line 2001: RAISE OKC_API.G_EXCEPTION_ERROR;

1997: x_return_status);
1998: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2000: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2001: RAISE OKC_API.G_EXCEPTION_ERROR;
2002: END IF;
2003: DELETE FROM OKL_PDT_QUALITYS
2004: WHERE ID = l_pqy_rec.id;
2005:

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

2002: END IF;
2003: DELETE FROM OKL_PDT_QUALITYS
2004: WHERE ID = l_pqy_rec.id;
2005:
2006: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2007: EXCEPTION
2008: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2009: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2010: (

Line 2008: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2004: WHERE ID = l_pqy_rec.id;
2005:
2006: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2007: EXCEPTION
2008: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2009: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2010: (
2011: l_api_name,
2012: G_PKG_NAME,

Line 2009: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2005:
2006: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2007: EXCEPTION
2008: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2009: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2010: (
2011: l_api_name,
2012: G_PKG_NAME,
2013: 'OKC_API.G_RET_STS_ERROR',

Line 2013: 'OKC_API.G_RET_STS_ERROR',

2009: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2010: (
2011: l_api_name,
2012: G_PKG_NAME,
2013: 'OKC_API.G_RET_STS_ERROR',
2014: x_msg_count,
2015: x_msg_data,
2016: '_PVT'
2017: );

Line 2018: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2014: x_msg_count,
2015: x_msg_data,
2016: '_PVT'
2017: );
2018: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2019: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2020: (
2021: l_api_name,
2022: G_PKG_NAME,

Line 2019: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2015: x_msg_data,
2016: '_PVT'
2017: );
2018: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2019: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2020: (
2021: l_api_name,
2022: G_PKG_NAME,
2023: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2023: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2019: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2020: (
2021: l_api_name,
2022: G_PKG_NAME,
2023: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2024: x_msg_count,
2025: x_msg_data,
2026: '_PVT'
2027: );

Line 2029: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2025: x_msg_data,
2026: '_PVT'
2027: );
2028: WHEN OTHERS THEN
2029: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2030: (
2031: l_api_name,
2032: G_PKG_NAME,
2033: 'OTHERS',

Line 2044: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2040: -- delete_row for:OKL_PDT_QUALITYS_V --
2041: ---------------------------------------
2042: PROCEDURE delete_row(
2043: p_api_version IN NUMBER,
2044: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2045: x_return_status OUT NOCOPY VARCHAR2,
2046: x_msg_count OUT NOCOPY NUMBER,
2047: x_msg_data OUT NOCOPY VARCHAR2,
2048: p_pqyv_rec IN pqyv_rec_type) IS

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

2048: p_pqyv_rec IN pqyv_rec_type) IS
2049:
2050: l_api_version CONSTANT NUMBER := 1;
2051: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2052: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2053: l_pqyv_rec pqyv_rec_type := p_pqyv_rec;
2054: l_pqy_rec pqy_rec_type;
2055: BEGIN
2056: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2052: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2053: l_pqyv_rec pqyv_rec_type := p_pqyv_rec;
2054: l_pqy_rec pqy_rec_type;
2055: BEGIN
2056: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2057: G_PKG_NAME,
2058: p_init_msg_list,
2059: l_api_version,
2060: p_api_version,

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

2059: l_api_version,
2060: p_api_version,
2061: '_PVT',
2062: x_return_status);
2063: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2064: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2066: RAISE OKC_API.G_EXCEPTION_ERROR;
2067: END IF;

Line 2064: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2060: p_api_version,
2061: '_PVT',
2062: x_return_status);
2063: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2064: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2066: RAISE OKC_API.G_EXCEPTION_ERROR;
2067: END IF;
2068: --------------------------------------

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

2061: '_PVT',
2062: x_return_status);
2063: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2064: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2066: RAISE OKC_API.G_EXCEPTION_ERROR;
2067: END IF;
2068: --------------------------------------
2069: -- Move VIEW record to "Child" records

Line 2066: RAISE OKC_API.G_EXCEPTION_ERROR;

2062: x_return_status);
2063: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2064: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2066: RAISE OKC_API.G_EXCEPTION_ERROR;
2067: END IF;
2068: --------------------------------------
2069: -- Move VIEW record to "Child" records
2070: --------------------------------------

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

2078: x_msg_count,
2079: x_msg_data,
2080: l_pqy_rec
2081: );
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;

Line 2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2079: x_msg_data,
2080: l_pqy_rec
2081: );
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

2080: l_pqy_rec
2081: );
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2088: EXCEPTION

Line 2085: RAISE OKC_API.G_EXCEPTION_ERROR;

2081: );
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2088: EXCEPTION
2089: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2088: EXCEPTION
2089: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2090: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2091: (

Line 2089: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2088: EXCEPTION
2089: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2090: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2091: (
2092: l_api_name,
2093: G_PKG_NAME,

Line 2090: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2086: END IF;
2087: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2088: EXCEPTION
2089: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2090: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2091: (
2092: l_api_name,
2093: G_PKG_NAME,
2094: 'OKC_API.G_RET_STS_ERROR',

Line 2094: 'OKC_API.G_RET_STS_ERROR',

2090: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2091: (
2092: l_api_name,
2093: G_PKG_NAME,
2094: 'OKC_API.G_RET_STS_ERROR',
2095: x_msg_count,
2096: x_msg_data,
2097: '_PVT'
2098: );

Line 2099: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2095: x_msg_count,
2096: x_msg_data,
2097: '_PVT'
2098: );
2099: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2100: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2101: (
2102: l_api_name,
2103: G_PKG_NAME,

Line 2100: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2096: x_msg_data,
2097: '_PVT'
2098: );
2099: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2100: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2101: (
2102: l_api_name,
2103: G_PKG_NAME,
2104: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2104: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2100: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2101: (
2102: l_api_name,
2103: G_PKG_NAME,
2104: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2105: x_msg_count,
2106: x_msg_data,
2107: '_PVT'
2108: );

Line 2110: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2106: x_msg_data,
2107: '_PVT'
2108: );
2109: WHEN OTHERS THEN
2110: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2111: (
2112: l_api_name,
2113: G_PKG_NAME,
2114: 'OTHERS',

Line 2125: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2121: -- PL/SQL TBL delete_row for:PQYV_TBL --
2122: ----------------------------------------
2123: PROCEDURE delete_row(
2124: p_api_version IN NUMBER,
2125: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2126: x_return_status OUT NOCOPY VARCHAR2,
2127: x_msg_count OUT NOCOPY NUMBER,
2128: x_msg_data OUT NOCOPY VARCHAR2,
2129: p_pqyv_tbl IN pqyv_tbl_type) IS

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

2129: p_pqyv_tbl IN pqyv_tbl_type) IS
2130:
2131: l_api_version CONSTANT NUMBER := 1;
2132: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2133: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2134: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
2135: i NUMBER := 0;
2136: BEGIN
2137: OKC_API.init_msg_list(p_init_msg_list);

Line 2134: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS

2130:
2131: l_api_version CONSTANT NUMBER := 1;
2132: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2133: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2134: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
2135: i NUMBER := 0;
2136: BEGIN
2137: OKC_API.init_msg_list(p_init_msg_list);
2138: -- Make sure PL/SQL table has records in it before passing

Line 2137: OKC_API.init_msg_list(p_init_msg_list);

2133: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2134: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS; --TCHGS
2135: i NUMBER := 0;
2136: BEGIN
2137: OKC_API.init_msg_list(p_init_msg_list);
2138: -- Make sure PL/SQL table has records in it before passing
2139: IF (p_pqyv_tbl.COUNT > 0) THEN
2140: i := p_pqyv_tbl.FIRST;
2141: LOOP

Line 2144: p_init_msg_list => OKC_API.G_FALSE,

2140: i := p_pqyv_tbl.FIRST;
2141: LOOP
2142: delete_row (
2143: p_api_version => p_api_version,
2144: p_init_msg_list => OKC_API.G_FALSE,
2145: x_return_status => x_return_status,
2146: x_msg_count => x_msg_count,
2147: x_msg_data => x_msg_data,
2148: p_pqyv_rec => p_pqyv_tbl(i));

Line 2150: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

2146: x_msg_count => x_msg_count,
2147: x_msg_data => x_msg_data,
2148: p_pqyv_rec => p_pqyv_tbl(i));
2149: -- TCHGS: Store the highest degree of error
2150: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2151: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
2152: l_overall_status := x_return_status;
2153: END IF;
2154: END IF;

Line 2151: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN

2147: x_msg_data => x_msg_data,
2148: p_pqyv_rec => p_pqyv_tbl(i));
2149: -- TCHGS: Store the highest degree of error
2150: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2151: IF l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR THEN
2152: l_overall_status := x_return_status;
2153: END IF;
2154: END IF;
2155: EXIT WHEN (i = p_pqyv_tbl.LAST);

Line 2162: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2158: --TCHGS: return overall status
2159: x_return_status := l_overall_status;
2160: END IF;
2161: EXCEPTION
2162: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2163: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2164: (
2165: l_api_name,
2166: G_PKG_NAME,

Line 2163: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2159: x_return_status := l_overall_status;
2160: END IF;
2161: EXCEPTION
2162: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2163: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2164: (
2165: l_api_name,
2166: G_PKG_NAME,
2167: 'OKC_API.G_RET_STS_ERROR',

Line 2167: 'OKC_API.G_RET_STS_ERROR',

2163: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2164: (
2165: l_api_name,
2166: G_PKG_NAME,
2167: 'OKC_API.G_RET_STS_ERROR',
2168: x_msg_count,
2169: x_msg_data,
2170: '_PVT'
2171: );

Line 2172: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2168: x_msg_count,
2169: x_msg_data,
2170: '_PVT'
2171: );
2172: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2173: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2174: (
2175: l_api_name,
2176: G_PKG_NAME,

Line 2173: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2169: x_msg_data,
2170: '_PVT'
2171: );
2172: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2173: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2174: (
2175: l_api_name,
2176: G_PKG_NAME,
2177: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2177: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2173: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2174: (
2175: l_api_name,
2176: G_PKG_NAME,
2177: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2178: x_msg_count,
2179: x_msg_data,
2180: '_PVT'
2181: );

Line 2183: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2179: x_msg_data,
2180: '_PVT'
2181: );
2182: WHEN OTHERS THEN
2183: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2184: (
2185: l_api_name,
2186: G_PKG_NAME,
2187: 'OTHERS',