DBA Data[Home] [Help]

APPS.OKL_SETUPPQUALITYS_PVT dependencies on OKL_API

Line 37: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

33: WHERE okl_pdt_qualitys_v.id = p_id;
34: l_okl_pqyv_pk okl_pqyv_pk_csr%ROWTYPE;
35: l_pqyv_rec pqyv_rec_type;
36: BEGIN
37: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
38: x_no_data_found := TRUE;
39: -- Get current database values
40: OPEN okl_pqyv_pk_csr (p_pqyv_rec.id);
41: FETCH okl_pqyv_pk_csr INTO

Line 60: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

56: x_pqyv_rec := l_pqyv_rec;
57: EXCEPTION
58: WHEN OTHERS THEN
59: -- store SQL error message on message stack
60: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
61: p_msg_name => G_UNEXPECTED_ERROR,
62: p_token1 => G_SQLCODE_TOKEN,
63: p_token1_value => SQLCODE,
64: p_token2 => G_SQLERRM_TOKEN,

Line 67: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

63: p_token1_value => SQLCODE,
64: p_token2 => G_SQLERRM_TOKEN,
65: p_token2_value => SQLERRM);
66: -- notify UNEXPECTED error for calling API.
67: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
68:
69: IF (okl_pqyv_pk_csr%ISOPEN) THEN
70: CLOSE okl_pqyv_pk_csr;
71: END IF;

Line 92: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

88: FROM Okl_Pqy_Values_V qve
89: WHERE qve.pqy_id = p_qve_id
90: AND qve.TO_DATE IS NULL;
91:
92: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
93: l_count NUMBER := 0;
94: l_qvev_tbl qvev_tbl_type;
95: i NUMBER := 0;
96:

Line 98: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

94: l_qvev_tbl qvev_tbl_type;
95: i NUMBER := 0;
96:
97: BEGIN
98: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
99:
100: -- Get current database values
101: FOR okl_qve_rec IN okl_qvev_fk_csr(p_upd_pqyv_rec.id)
102: LOOP

Line 114: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

110:
111: EXCEPTION
112: WHEN OTHERS THEN
113: -- store SQL error message on message stack
114: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
115: p_msg_name => G_UNEXPECTED_ERROR,
116: p_token1 => G_SQLCODE_TOKEN,
117: p_token1_value => SQLCODE,
118: p_token2 => G_SQLERRM_TOKEN,

Line 121: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

117: p_token1_value => SQLCODE,
118: p_token2 => G_SQLERRM_TOKEN,
119: p_token2_value => SQLERRM );
120: -- notify UNEXPECTED error for calling API.
121: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
122:
123: IF (okl_qvev_fk_csr%ISOPEN) THEN
124: CLOSE okl_qvev_fk_csr;
125: END IF;

Line 166: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

162: l_row_not_found BOOLEAN := FALSE;
163:
164: BEGIN
165: x_valid := TRUE;
166: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
167:
168: l_token_1 := Okl_Accounting_Util.Get_Message_Token(p_region_code => 'OKL_LP_PRDQLTY_CRUPD',
169: p_attribute_code => 'OKL_PRODUCT_QUALITIES');
170:

Line 193: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

189: l_row_not_found := okl_pqy_constraints_csr%NOTFOUND;
190: CLOSE okl_pqy_constraints_csr;
191:
192: IF l_row_not_found = FALSE THEN
193: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
194: p_msg_name => G_DATES_MISMATCH,
195: p_token1 => G_PARENT_TABLE_TOKEN,
196: p_token1_value => l_token_1,
197: p_token2 => G_CHILD_TABLE_TOKEN,

Line 200: x_return_status := Okl_Api.G_RET_STS_ERROR;

196: p_token1_value => l_token_1,
197: p_token2 => G_CHILD_TABLE_TOKEN,
198: p_token2_value => l_token_4);
199: x_valid := FALSE;
200: x_return_status := Okl_Api.G_RET_STS_ERROR;
201: END IF;
202:
203: EXCEPTION
204: WHEN OTHERS THEN

Line 206: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

202:
203: EXCEPTION
204: WHEN OTHERS THEN
205: -- store SQL error message on message stack
206: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
207: p_msg_name => G_UNEXPECTED_ERROR,
208: p_token1 => G_SQLCODE_TOKEN,
209: p_token1_value => SQLCODE,
210: p_token2 => G_SQLERRM_TOKEN,

Line 213: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

209: p_token1_value => SQLCODE,
210: p_token2 => G_SQLERRM_TOKEN,
211: p_token2_value => SQLERRM);
212: x_valid := FALSE;
213: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
214:
215: IF (okl_pqy_constraints_csr%ISOPEN) THEN
216: CLOSE okl_pqy_constraints_csr;
217: END IF;

Line 239: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

235: PROCEDURE Validate_Name(
236: p_pqyv_rec IN OUT NOCOPY pqyv_rec_type,
237: x_return_status OUT NOCOPY VARCHAR2
238: ) IS
239: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
240: l_token_1 VARCHAR2(999);
241: BEGIN
242:
243: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_NAME');

Line 244: IF p_pqyv_rec.name = Okl_Api.G_MISS_CHAR OR p_pqyv_rec.name IS NULL

240: l_token_1 VARCHAR2(999);
241: BEGIN
242:
243: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_NAME');
244: IF p_pqyv_rec.name = Okl_Api.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
245: THEN
246: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);
247: x_return_status := Okl_Api.G_RET_STS_ERROR;
248: END IF;

Line 246: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);

242:
243: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_NAME');
244: IF p_pqyv_rec.name = Okl_Api.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
245: THEN
246: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);
247: x_return_status := Okl_Api.G_RET_STS_ERROR;
248: END IF;
249: p_pqyv_rec.name := Okl_Accounting_Util.okl_upper(p_pqyv_rec.name);
250: EXCEPTION

Line 247: x_return_status := Okl_Api.G_RET_STS_ERROR;

243: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_NAME');
244: IF p_pqyv_rec.name = Okl_Api.G_MISS_CHAR OR p_pqyv_rec.name IS NULL
245: THEN
246: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);
247: x_return_status := Okl_Api.G_RET_STS_ERROR;
248: END IF;
249: p_pqyv_rec.name := Okl_Accounting_Util.okl_upper(p_pqyv_rec.name);
250: EXCEPTION
251: WHEN OTHERS THEN

Line 252: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,

248: END IF;
249: p_pqyv_rec.name := Okl_Accounting_Util.okl_upper(p_pqyv_rec.name);
250: EXCEPTION
251: WHEN OTHERS THEN
252: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,
253: p_msg_name =>Okl_Pqy_Pvt.G_UNEXPECTED_ERROR,
254: p_token1 =>Okl_Pqy_Pvt.G_SQL_SQLCODE_TOKEN,
255: p_token1_value =>SQLCODE,
256: p_token2 =>Okl_Pqy_Pvt.G_SQL_SQLERRM_TOKEN,

Line 258: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

254: p_token1 =>Okl_Pqy_Pvt.G_SQL_SQLCODE_TOKEN,
255: p_token1_value =>SQLCODE,
256: p_token2 =>Okl_Pqy_Pvt.G_SQL_SQLERRM_TOKEN,
257: p_token2_value =>SQLERRM);
258: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
259:
260: END Validate_Name;
261: ------end of Validate_Name-----------------------------------
262:

Line 283: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

279: ) IS
280: l_token_1 VARCHAR2(999);
281: BEGIN
282: -- initialize return status
283: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
284:
285: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_EFFECTIVE_FROM');
286: IF p_pqyv_rec.from_date = Okl_Api.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
287: THEN

Line 286: IF p_pqyv_rec.from_date = Okl_Api.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL

282: -- initialize return status
283: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
284:
285: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_EFFECTIVE_FROM');
286: IF p_pqyv_rec.from_date = Okl_Api.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
287: THEN
288: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);
289: x_return_status := Okl_Api.G_RET_STS_ERROR;
290: END IF;

Line 288: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);

284:
285: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_EFFECTIVE_FROM');
286: IF p_pqyv_rec.from_date = Okl_Api.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
287: THEN
288: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);
289: x_return_status := Okl_Api.G_RET_STS_ERROR;
290: END IF;
291: EXCEPTION
292: WHEN OTHERS THEN

Line 289: x_return_status := Okl_Api.G_RET_STS_ERROR;

285: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PRDQLTY_CRUPD','OKL_EFFECTIVE_FROM');
286: IF p_pqyv_rec.from_date = Okl_Api.G_MISS_DATE OR p_pqyv_rec.from_date IS NULL
287: THEN
288: Okl_Api.set_message(Okl_Pqy_Pvt.G_APP_NAME, Okl_Pqy_Pvt.G_REQUIRED_VALUE,Okl_Pqy_Pvt.G_COL_NAME_TOKEN,l_token_1);
289: x_return_status := Okl_Api.G_RET_STS_ERROR;
290: END IF;
291: EXCEPTION
292: WHEN OTHERS THEN
293: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,

Line 293: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,

289: x_return_status := Okl_Api.G_RET_STS_ERROR;
290: END IF;
291: EXCEPTION
292: WHEN OTHERS THEN
293: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,
294: p_msg_name =>Okl_Pqy_Pvt.G_UNEXPECTED_ERROR,
295: p_token1 =>Okl_Pqy_Pvt.G_SQL_SQLCODE_TOKEN,
296: p_token1_value =>SQLCODE,
297: p_token2 =>Okl_Pqy_Pvt.G_SQL_SQLERRM_TOKEN,

Line 299: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

295: p_token1 =>Okl_Pqy_Pvt.G_SQL_SQLCODE_TOKEN,
296: p_token1_value =>SQLCODE,
297: p_token2 =>Okl_Pqy_Pvt.G_SQL_SQLERRM_TOKEN,
298: p_token2_value =>SQLERRM);
299: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
300:
301: END Validate_From_Date;
302: ------end of Validate_From_Date-----------------------------------
303:

Line 321: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

317:
318: FUNCTION Validate_Attributes(
319: p_pqyv_rec IN OUT NOCOPY pqyv_rec_type
320: ) RETURN VARCHAR IS
321: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
322: l_return_status VARCHAR2(1):= Okl_Api.G_RET_STS_SUCCESS;
323:
324:
325: BEGIN

Line 322: l_return_status VARCHAR2(1):= Okl_Api.G_RET_STS_SUCCESS;

318: FUNCTION Validate_Attributes(
319: p_pqyv_rec IN OUT NOCOPY pqyv_rec_type
320: ) RETURN VARCHAR IS
321: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
322: l_return_status VARCHAR2(1):= Okl_Api.G_RET_STS_SUCCESS;
323:
324:
325: BEGIN
326: --------CHECK FOR NAME------------------

Line 328: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN

324:
325: BEGIN
326: --------CHECK FOR NAME------------------
327: Validate_Name (p_pqyv_rec,x_return_status);
328: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
329: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
330: -- need to leave
331: l_return_status := x_return_status;
332: RAISE G_EXCEPTION_HALT_PROCESSING;

Line 329: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

325: BEGIN
326: --------CHECK FOR NAME------------------
327: Validate_Name (p_pqyv_rec,x_return_status);
328: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
329: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
330: -- need to leave
331: l_return_status := x_return_status;
332: RAISE G_EXCEPTION_HALT_PROCESSING;
333: ELSE

Line 340: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN

336: END IF;
337:
338: -----CHECK FOR FROM_DATE----------------------------
339: Validate_From_Date (p_pqyv_rec,x_return_status);
340: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
341: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
342: -- need to leave
343: l_return_status := x_return_status;
344: RAISE G_EXCEPTION_HALT_PROCESSING;

Line 341: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

337:
338: -----CHECK FOR FROM_DATE----------------------------
339: Validate_From_Date (p_pqyv_rec,x_return_status);
340: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
341: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
342: -- need to leave
343: l_return_status := x_return_status;
344: RAISE G_EXCEPTION_HALT_PROCESSING;
345: ELSE

Line 359: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,

355: NULL;
356: RETURN (l_return_status);
357:
358: WHEN OTHERS THEN
359: Okl_Api.set_message(p_app_name =>Okl_Pqy_Pvt.G_APP_NAME,
360: p_msg_name =>Okl_Pqy_Pvt.G_UNEXPECTED_ERROR,
361: p_token1 =>Okl_Pqy_Pvt.G_SQL_SQLCODE_TOKEN,
362: p_token1_value =>SQLCODE,
363: p_token2 =>Okl_Pqy_Pvt.G_SQL_SQLERRM_TOKEN,

Line 365: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

361: p_token1 =>Okl_Pqy_Pvt.G_SQL_SQLCODE_TOKEN,
362: p_token1_value =>SQLCODE,
363: p_token2 =>Okl_Pqy_Pvt.G_SQL_SQLERRM_TOKEN,
364: p_token2_value =>SQLERRM);
365: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
366: RETURN(l_return_status);
367:
368: END Validate_Attributes;
369:

Line 388: IF p_upd_pqyv_rec.description <> Okl_Api.G_MISS_CHAR THEN

384:
385: /* create a temporary record with all relevant details from db and upd records */
386: l_pqyv_rec := p_db_pqyv_rec;
387:
388: IF p_upd_pqyv_rec.description <> Okl_Api.G_MISS_CHAR THEN
389: l_pqyv_rec.description := p_upd_pqyv_rec.description;
390: END IF;
391:
392: IF p_upd_pqyv_rec.location_yn <> Okl_Api.G_MISS_CHAR THEN

Line 392: IF p_upd_pqyv_rec.location_yn <> Okl_Api.G_MISS_CHAR THEN

388: IF p_upd_pqyv_rec.description <> Okl_Api.G_MISS_CHAR THEN
389: l_pqyv_rec.description := p_upd_pqyv_rec.description;
390: END IF;
391:
392: IF p_upd_pqyv_rec.location_yn <> Okl_Api.G_MISS_CHAR THEN
393: l_pqyv_rec.location_yn := p_upd_pqyv_rec.location_yn;
394: END IF;
395:
396: IF p_upd_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE THEN

Line 396: IF p_upd_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE THEN

392: IF p_upd_pqyv_rec.location_yn <> Okl_Api.G_MISS_CHAR THEN
393: l_pqyv_rec.location_yn := p_upd_pqyv_rec.location_yn;
394: END IF;
395:
396: IF p_upd_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE THEN
397: l_pqyv_rec.from_date := p_upd_pqyv_rec.from_date;
398: END IF;
399:
400: IF p_upd_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

Line 400: IF p_upd_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

396: IF p_upd_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE THEN
397: l_pqyv_rec.from_date := p_upd_pqyv_rec.from_date;
398: END IF;
399:
400: IF p_upd_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
401: l_pqyv_rec.TO_DATE := p_upd_pqyv_rec.TO_DATE;
402: END IF;
403:
404: RETURN l_pqyv_rec;

Line 424: l_upd_pqyv_rec.description := Okl_Api.G_MISS_CHAR;

420: l_upd_pqyv_rec := p_upd_pqyv_rec;
421: l_db_pqyv_rec := p_db_pqyv_rec;
422:
423: IF l_upd_pqyv_rec.description = l_db_pqyv_rec.description THEN
424: l_upd_pqyv_rec.description := Okl_Api.G_MISS_CHAR;
425: END IF;
426:
427: IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
428: l_upd_pqyv_rec.from_date := Okl_Api.G_MISS_DATE;

Line 428: l_upd_pqyv_rec.from_date := Okl_Api.G_MISS_DATE;

424: l_upd_pqyv_rec.description := Okl_Api.G_MISS_CHAR;
425: END IF;
426:
427: IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
428: l_upd_pqyv_rec.from_date := Okl_Api.G_MISS_DATE;
429: END IF;
430:
431: IF to_date(to_char(l_upd_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
432: l_upd_pqyv_rec.TO_DATE := Okl_Api.G_MISS_DATE;

Line 432: l_upd_pqyv_rec.TO_DATE := Okl_Api.G_MISS_DATE;

428: l_upd_pqyv_rec.from_date := Okl_Api.G_MISS_DATE;
429: END IF;
430:
431: IF to_date(to_char(l_upd_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
432: l_upd_pqyv_rec.TO_DATE := Okl_Api.G_MISS_DATE;
433: END IF;
434:
435: IF l_upd_pqyv_rec.location_yn = l_db_pqyv_rec.location_yn THEN
436: l_upd_pqyv_rec.location_yn := Okl_Api.G_MISS_CHAR;

Line 436: l_upd_pqyv_rec.location_yn := Okl_Api.G_MISS_CHAR;

432: l_upd_pqyv_rec.TO_DATE := Okl_Api.G_MISS_DATE;
433: END IF;
434:
435: IF l_upd_pqyv_rec.location_yn = l_db_pqyv_rec.location_yn THEN
436: l_upd_pqyv_rec.location_yn := Okl_Api.G_MISS_CHAR;
437: END IF;
438:
439: p_upd_pqyv_rec := l_upd_pqyv_rec;
440:

Line 456: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

452: x_return_status OUT NOCOPY VARCHAR2,
453: x_msg_data OUT NOCOPY VARCHAR2
454: ) IS
455: l_pqyv_rec pqyv_rec_type;
456: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
457: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
458: l_valid BOOLEAN;
459: BEGIN
460: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

Line 460: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

456: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
457: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
458: l_valid BOOLEAN;
459: BEGIN
460: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
461: l_pqyv_rec := p_pqyv_rec;
462:
463: /* check for start date greater than sysdate */
464: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

Line 464: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

460: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
461: l_pqyv_rec := p_pqyv_rec;
462:
463: /* check for start date greater than sysdate */
464: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
465: to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
466: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
467: p_msg_name => G_START_DATE);
468: x_return_status := Okl_Api.G_RET_STS_ERROR;

Line 466: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

462:
463: /* check for start date greater than sysdate */
464: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
465: to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
466: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
467: p_msg_name => G_START_DATE);
468: x_return_status := Okl_Api.G_RET_STS_ERROR;
469: RAISE G_EXCEPTION_HALT_PROCESSING;
470: END IF;

Line 468: x_return_status := Okl_Api.G_RET_STS_ERROR;

464: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
465: to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
466: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
467: p_msg_name => G_START_DATE);
468: x_return_status := Okl_Api.G_RET_STS_ERROR;
469: RAISE G_EXCEPTION_HALT_PROCESSING;
470: END IF;
471: */
472:

Line 475: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

471: */
472:
473: /* check for the records with from and to dates less than sysdate */
474: /*IF to_date(to_char(p_upd_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
475: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
476: p_msg_name => G_PAST_RECORDS);
477: x_return_status := Okl_Api.G_RET_STS_ERROR;
478: RAISE G_EXCEPTION_HALT_PROCESSING;
479: END IF;

Line 477: x_return_status := Okl_Api.G_RET_STS_ERROR;

473: /* check for the records with from and to dates less than sysdate */
474: /*IF to_date(to_char(p_upd_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
475: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
476: p_msg_name => G_PAST_RECORDS);
477: x_return_status := Okl_Api.G_RET_STS_ERROR;
478: RAISE G_EXCEPTION_HALT_PROCESSING;
479: END IF;
480: */
481: /* if the start date is in the past, the start date cannot be

Line 483: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

479: END IF;
480: */
481: /* if the start date is in the past, the start date cannot be
482: modified */
483: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
484: to_date(to_char(p_db_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <= l_sysdate THEN
485: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
486: p_msg_name => G_NOT_ALLOWED,
487: p_token1 => G_COL_NAME_TOKEN,

Line 485: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

481: /* if the start date is in the past, the start date cannot be
482: modified */
483: /*IF to_date(to_char(p_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
484: to_date(to_char(p_db_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <= l_sysdate THEN
485: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
486: p_msg_name => G_NOT_ALLOWED,
487: p_token1 => G_COL_NAME_TOKEN,
488: p_token1_value => 'START_DATE');
489: x_return_status := Okl_Api.G_RET_STS_ERROR;

Line 489: x_return_status := Okl_Api.G_RET_STS_ERROR;

485: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
486: p_msg_name => G_NOT_ALLOWED,
487: p_token1 => G_COL_NAME_TOKEN,
488: p_token1_value => 'START_DATE');
489: x_return_status := Okl_Api.G_RET_STS_ERROR;
490: RAISE G_EXCEPTION_HALT_PROCESSING;
491: END IF;
492: */
493:

Line 494: IF l_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE OR

490: RAISE G_EXCEPTION_HALT_PROCESSING;
491: END IF;
492: */
493:
494: IF l_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE OR
495: l_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
496:
497: /* call check_constraints */
498: Check_Constraints(p_pqyv_rec => l_pqyv_rec,

Line 495: l_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

491: END IF;
492: */
493:
494: IF l_pqyv_rec.from_date <> Okl_Api.G_MISS_DATE OR
495: l_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
496:
497: /* call check_constraints */
498: Check_Constraints(p_pqyv_rec => l_pqyv_rec,
499: x_return_status => l_return_status,

Line 502: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

498: Check_Constraints(p_pqyv_rec => l_pqyv_rec,
499: x_return_status => l_return_status,
500: x_valid => l_valid);
501:
502: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
503: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
504: RAISE G_EXCEPTION_HALT_PROCESSING;
505: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
506: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND

Line 503: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

499: x_return_status => l_return_status,
500: x_valid => l_valid);
501:
502: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
503: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
504: RAISE G_EXCEPTION_HALT_PROCESSING;
505: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
506: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
507: l_valid <> TRUE) THEN

Line 505: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR

501:
502: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
503: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
504: RAISE G_EXCEPTION_HALT_PROCESSING;
505: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
506: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
507: l_valid <> TRUE) THEN
508: x_return_status := Okl_Api.G_RET_STS_ERROR;
509: RAISE G_EXCEPTION_HALT_PROCESSING;

Line 506: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND

502: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
503: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
504: RAISE G_EXCEPTION_HALT_PROCESSING;
505: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
506: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
507: l_valid <> TRUE) THEN
508: x_return_status := Okl_Api.G_RET_STS_ERROR;
509: RAISE G_EXCEPTION_HALT_PROCESSING;
510: END IF;

Line 508: x_return_status := Okl_Api.G_RET_STS_ERROR;

504: RAISE G_EXCEPTION_HALT_PROCESSING;
505: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
506: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
507: l_valid <> TRUE) THEN
508: x_return_status := Okl_Api.G_RET_STS_ERROR;
509: RAISE G_EXCEPTION_HALT_PROCESSING;
510: END IF;
511:
512: END IF;

Line 522: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

518: NULL;
519:
520: WHEN OTHERS THEN
521: -- store SQL error message on message stack for caller
522: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
523: p_msg_name => G_UNEXPECTED_ERROR,
524: p_token1 => G_SQLCODE_TOKEN,
525: p_token1_value => SQLCODE,
526: p_token2 => G_SQLERRM_TOKEN,

Line 530: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

526: p_token2 => G_SQLERRM_TOKEN,
527: p_token2_value => SQLERRM );
528: x_msg_data := 'Unexpected DATABASE Error';
529: -- notify caller of an UNEXPECTED error
530: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
531:
532: END check_updates;
533:
534: ---------------------------------------------------------------------------

Line 548: IF p_upd_pqyv_rec.from_date = Okl_Api.G_MISS_DATE AND

544: l_action VARCHAR2(1);
545: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
546: BEGIN
547: /* Scenario 1: Only description and/or descriptive flexfield changes */
548: IF p_upd_pqyv_rec.from_date = Okl_Api.G_MISS_DATE AND
549: p_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
550: l_action := '1';
551: /* Scenario 2: Changing the dates */
552: ELSE

Line 549: p_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN

545: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
546: BEGIN
547: /* Scenario 1: Only description and/or descriptive flexfield changes */
548: IF p_upd_pqyv_rec.from_date = Okl_Api.G_MISS_DATE AND
549: p_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
550: l_action := '1';
551: /* Scenario 2: Changing the dates */
552: ELSE
553: l_action := '2';

Line 562: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,

558: ---------------------------------------------------------------------------
559: -- PROCEDURE copy_update_constraints for: OKL_PQY_QUALITYS_V
560: ---------------------------------------------------------------------------
561: PROCEDURE copy_update_constraints (p_api_version IN NUMBER,
562: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
563: p_upd_pqyv_rec IN pqyv_rec_type,
564: x_return_status OUT NOCOPY VARCHAR2,
565: x_msg_count OUT NOCOPY NUMBER,
566: x_msg_data OUT NOCOPY VARCHAR2

Line 569: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

565: x_msg_count OUT NOCOPY NUMBER,
566: x_msg_data OUT NOCOPY VARCHAR2
567: ) IS
568: l_upd_pqyv_rec pqyv_rec_type; /* input copy */
569: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
570: l_ptv_count NUMBER := 0;
571: l_qvev_tbl qvev_tbl_type;
572: l_out_qvev_tbl qvev_tbl_type;
573:

Line 575: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

571: l_qvev_tbl qvev_tbl_type;
572: l_out_qvev_tbl qvev_tbl_type;
573:
574: BEGIN
575: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
576: l_upd_pqyv_rec := p_upd_pqyv_rec;
577:
578: /* Get Product Quality Values */
579: get_pqy_values(p_upd_pqyv_rec => l_upd_pqyv_rec,

Line 584: IF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

580: x_return_status => l_return_status,
581: x_count => l_ptv_count,
582: x_qvev_tbl => l_qvev_tbl);
583:
584: IF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
585: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
586: RAISE G_EXCEPTION_HALT_PROCESSING;
587: END IF;
588:

Line 585: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

581: x_count => l_ptv_count,
582: x_qvev_tbl => l_qvev_tbl);
583:
584: IF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
585: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
586: RAISE G_EXCEPTION_HALT_PROCESSING;
587: END IF;
588:
589: IF l_ptv_count > 0 THEN

Line 599: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

595: p_qvev_tbl => l_qvev_tbl,
596: x_qvev_tbl => l_out_qvev_tbl);
597: END IF;
598:
599: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
600: x_return_status := Okl_Api.G_RET_STS_ERROR;
601: RAISE G_EXCEPTION_HALT_PROCESSING;
602: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
603: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

Line 600: x_return_status := Okl_Api.G_RET_STS_ERROR;

596: x_qvev_tbl => l_out_qvev_tbl);
597: END IF;
598:
599: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
600: x_return_status := Okl_Api.G_RET_STS_ERROR;
601: RAISE G_EXCEPTION_HALT_PROCESSING;
602: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
603: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
604: RAISE G_EXCEPTION_HALT_PROCESSING;

Line 602: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

598:
599: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
600: x_return_status := Okl_Api.G_RET_STS_ERROR;
601: RAISE G_EXCEPTION_HALT_PROCESSING;
602: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
603: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
604: RAISE G_EXCEPTION_HALT_PROCESSING;
605: END IF;
606:

Line 603: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

599: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
600: x_return_status := Okl_Api.G_RET_STS_ERROR;
601: RAISE G_EXCEPTION_HALT_PROCESSING;
602: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
603: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
604: RAISE G_EXCEPTION_HALT_PROCESSING;
605: END IF;
606:
607: EXCEPTION

Line 615: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

611: NULL;
612:
613: WHEN OTHERS THEN
614: -- store SQL error message on message stack
615: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
616: p_msg_name => G_UNEXPECTED_ERROR,
617: p_token1 => G_SQLCODE_TOKEN,
618: p_token1_value => SQLCODE,
619: p_token2 => G_SQLERRM_TOKEN,

Line 622: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

618: p_token1_value => SQLCODE,
619: p_token2 => G_SQLERRM_TOKEN,
620: p_token2_value => SQLERRM );
621: -- notify UNEXPECTED error for calling API.
622: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
623:
624: END copy_update_constraints;
625:
626: -----------------------------------------------------------------------------

Line 631: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,

627: -- PROCEDURE insert_pqualities for: Okl_pdt_Qualitys_v
628: -----------------------------------------------------------------------------
629:
630: PROCEDURE insert_pqualitys(p_api_version IN NUMBER,
631: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
632: x_return_status OUT NOCOPY VARCHAR2,
633: x_msg_count OUT NOCOPY NUMBER,
634: x_msg_data OUT NOCOPY VARCHAR2,
635: p_pqyv_rec IN pqyv_rec_type,

Line 648: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

644: l_row_found BOOLEAN := FALSE;
645: l_token_1 VARCHAR2(1999);
646: l_api_version CONSTANT NUMBER := 1;
647: l_api_name CONSTANT VARCHAR2(30) := 'insert_tqualities';
648: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
649: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
650: l_valid BOOLEAN;
651: l_pqyv_rec pqyv_rec_type;
652: BEGIN

Line 653: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

649: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
650: l_valid BOOLEAN;
651: l_pqyv_rec pqyv_rec_type;
652: BEGIN
653: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
654:
655: l_pqyv_rec := p_pqyv_rec;
656: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,
657: p_pkg_name => G_PKG_NAME,

Line 656: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,

652: BEGIN
653: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
654:
655: l_pqyv_rec := p_pqyv_rec;
656: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,
657: p_pkg_name => G_PKG_NAME,
658: p_init_msg_list => p_init_msg_list,
659: l_api_version => l_api_version,
660: p_api_version => p_api_version,

Line 663: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

659: l_api_version => l_api_version,
660: p_api_version => p_api_version,
661: p_api_type => '_PVT',
662: x_return_status => l_return_status);
663: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
664: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
665: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
666: RAISE Okl_Api.G_EXCEPTION_ERROR;
667: END IF;

Line 664: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

660: p_api_version => p_api_version,
661: p_api_type => '_PVT',
662: x_return_status => l_return_status);
663: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
664: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
665: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
666: RAISE Okl_Api.G_EXCEPTION_ERROR;
667: END IF;
668:

Line 665: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

661: p_api_type => '_PVT',
662: x_return_status => l_return_status);
663: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
664: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
665: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
666: RAISE Okl_Api.G_EXCEPTION_ERROR;
667: END IF;
668:
669: l_return_status := Validate_Attributes(l_pqyv_rec);

Line 666: RAISE Okl_Api.G_EXCEPTION_ERROR;

662: x_return_status => l_return_status);
663: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
664: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
665: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
666: RAISE Okl_Api.G_EXCEPTION_ERROR;
667: END IF;
668:
669: l_return_status := Validate_Attributes(l_pqyv_rec);
670: --- If any errors happen abort API

Line 671: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

667: END IF;
668:
669: l_return_status := Validate_Attributes(l_pqyv_rec);
670: --- If any errors happen abort API
671: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: END IF;

Line 672: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

668:
669: l_return_status := Validate_Attributes(l_pqyv_rec);
670: --- If any errors happen abort API
671: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: END IF;
676:

Line 673: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

669: l_return_status := Validate_Attributes(l_pqyv_rec);
670: --- If any errors happen abort API
671: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: END IF;
676:
677: l_token_1 := Okl_Accounting_Util.Get_Message_Token(p_region_code => 'OKL_LP_PRDQLTY_CRUPD',

Line 674: RAISE Okl_Api.G_EXCEPTION_ERROR;

670: --- If any errors happen abort API
671: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
672: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: END IF;
676:
677: l_token_1 := Okl_Accounting_Util.Get_Message_Token(p_region_code => 'OKL_LP_PRDQLTY_CRUPD',
678: p_attribute_code => 'OKL_PRODUCT_QUALITIES');

Line 686: Okl_Api.set_message('OKL',G_UNQS,G_TABLE_TOKEN, l_token_1); ---CHG001

682: l_row_found := okl_pdt_quality_unique%FOUND;
683: CLOSE okl_pdt_quality_unique;
684:
685: IF l_row_found THEN
686: Okl_Api.set_message('OKL',G_UNQS,G_TABLE_TOKEN, l_token_1); ---CHG001
687: RAISE Okl_Api.G_EXCEPTION_ERROR;
688: END IF;
689:
690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

Line 687: RAISE Okl_Api.G_EXCEPTION_ERROR;

683: CLOSE okl_pdt_quality_unique;
684:
685: IF l_row_found THEN
686: Okl_Api.set_message('OKL',G_UNQS,G_TABLE_TOKEN, l_token_1); ---CHG001
687: RAISE Okl_Api.G_EXCEPTION_ERROR;
688: END IF;
689:
690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
691: RAISE Okl_Api.G_EXCEPTION_ERROR;

Line 690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

686: Okl_Api.set_message('OKL',G_UNQS,G_TABLE_TOKEN, l_token_1); ---CHG001
687: RAISE Okl_Api.G_EXCEPTION_ERROR;
688: END IF;
689:
690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
691: RAISE Okl_Api.G_EXCEPTION_ERROR;
692: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
693: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
694: END IF;

Line 691: RAISE Okl_Api.G_EXCEPTION_ERROR;

687: RAISE Okl_Api.G_EXCEPTION_ERROR;
688: END IF;
689:
690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
691: RAISE Okl_Api.G_EXCEPTION_ERROR;
692: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
693: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
694: END IF;
695:

Line 692: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

688: END IF;
689:
690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
691: RAISE Okl_Api.G_EXCEPTION_ERROR;
692: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
693: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
694: END IF;
695:
696: IF (l_pqyv_rec.TO_DATE IS NOT NULL) AND (l_pqyv_rec.TO_DATE < l_pqyv_rec.from_date) THEN

Line 693: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

689:
690: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
691: RAISE Okl_Api.G_EXCEPTION_ERROR;
692: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
693: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
694: END IF;
695:
696: IF (l_pqyv_rec.TO_DATE IS NOT NULL) AND (l_pqyv_rec.TO_DATE < l_pqyv_rec.from_date) THEN
697: Okl_Api.SET_MESSAGE(p_app_name => g_app_name

Line 697: Okl_Api.SET_MESSAGE(p_app_name => g_app_name

693: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
694: END IF;
695:
696: IF (l_pqyv_rec.TO_DATE IS NOT NULL) AND (l_pqyv_rec.TO_DATE < l_pqyv_rec.from_date) THEN
697: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
698: ,p_msg_name => Okl_Pqy_Pvt.g_to_date_error
699: ,p_token1 => Okl_Pqy_Pvt.g_col_name_token
700: ,p_token1_value => 'to_date');
701: x_return_status := Okl_Api.G_RET_STS_ERROR;

Line 701: x_return_status := Okl_Api.G_RET_STS_ERROR;

697: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
698: ,p_msg_name => Okl_Pqy_Pvt.g_to_date_error
699: ,p_token1 => Okl_Pqy_Pvt.g_col_name_token
700: ,p_token1_value => 'to_date');
701: x_return_status := Okl_Api.G_RET_STS_ERROR;
702: RAISE Okl_Api.G_EXCEPTION_ERROR;
703: END IF;
704:
705: /* check for the records with start and end dates less than sysdate */

Line 702: RAISE Okl_Api.G_EXCEPTION_ERROR;

698: ,p_msg_name => Okl_Pqy_Pvt.g_to_date_error
699: ,p_token1 => Okl_Pqy_Pvt.g_col_name_token
700: ,p_token1_value => 'to_date');
701: x_return_status := Okl_Api.G_RET_STS_ERROR;
702: RAISE Okl_Api.G_EXCEPTION_ERROR;
703: END IF;
704:
705: /* check for the records with start and end dates less than sysdate */
706: /*IF to_date(to_char(l_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate OR

Line 708: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

704:
705: /* check for the records with start and end dates less than sysdate */
706: /*IF to_date(to_char(l_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate OR
707: to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
708: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
709: p_msg_name => G_PAST_RECORDS);
710: RAISE Okl_Api.G_EXCEPTION_ERROR;
711: END IF;
712: */

Line 710: RAISE Okl_Api.G_EXCEPTION_ERROR;

706: /*IF to_date(to_char(l_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate OR
707: to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
708: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
709: p_msg_name => G_PAST_RECORDS);
710: RAISE Okl_Api.G_EXCEPTION_ERROR;
711: END IF;
712: */
713: /* public api to insert tqualities */
714:

Line 723: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

719: x_msg_data => x_msg_data,
720: p_pqyv_rec => l_pqyv_rec,
721: x_pqyv_rec => x_pqyv_rec);
722:
723: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
724: RAISE Okl_Api.G_EXCEPTION_ERROR;
725: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
726: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
727: END IF;

Line 724: RAISE Okl_Api.G_EXCEPTION_ERROR;

720: p_pqyv_rec => l_pqyv_rec,
721: x_pqyv_rec => x_pqyv_rec);
722:
723: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
724: RAISE Okl_Api.G_EXCEPTION_ERROR;
725: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
726: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
727: END IF;
728:

Line 725: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

721: x_pqyv_rec => x_pqyv_rec);
722:
723: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
724: RAISE Okl_Api.G_EXCEPTION_ERROR;
725: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
726: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
727: END IF;
728:
729: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,

Line 726: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

722:
723: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
724: RAISE Okl_Api.G_EXCEPTION_ERROR;
725: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
726: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
727: END IF;
728:
729: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);

Line 729: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,

725: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
726: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
727: END IF;
728:
729: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);
731: EXCEPTION
732: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
733: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

Line 732: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

728:
729: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);
731: EXCEPTION
732: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
733: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
734: p_pkg_name => G_PKG_NAME,
735: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
736: x_msg_count => x_msg_count,

Line 733: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

729: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);
731: EXCEPTION
732: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
733: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
734: p_pkg_name => G_PKG_NAME,
735: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
736: x_msg_count => x_msg_count,
737: x_msg_data => x_msg_data,

Line 735: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

731: EXCEPTION
732: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
733: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
734: p_pkg_name => G_PKG_NAME,
735: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
736: x_msg_count => x_msg_count,
737: x_msg_data => x_msg_data,
738: p_api_type => '_PVT');
739: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 739: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

735: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
736: x_msg_count => x_msg_count,
737: x_msg_data => x_msg_data,
738: p_api_type => '_PVT');
739: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
740: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
741: p_pkg_name => G_PKG_NAME,
742: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
743: x_msg_count => x_msg_count,

Line 740: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

736: x_msg_count => x_msg_count,
737: x_msg_data => x_msg_data,
738: p_api_type => '_PVT');
739: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
740: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
741: p_pkg_name => G_PKG_NAME,
742: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
743: x_msg_count => x_msg_count,
744: x_msg_data => x_msg_data,

Line 742: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

738: p_api_type => '_PVT');
739: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
740: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
741: p_pkg_name => G_PKG_NAME,
742: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
743: x_msg_count => x_msg_count,
744: x_msg_data => x_msg_data,
745: p_api_type => '_PVT');
746: WHEN OTHERS THEN

Line 747: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

743: x_msg_count => x_msg_count,
744: x_msg_data => x_msg_data,
745: p_api_type => '_PVT');
746: WHEN OTHERS THEN
747: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
748: p_pkg_name => G_PKG_NAME,
749: p_exc_name => 'OTHERS',
750: x_msg_count => x_msg_count,
751: x_msg_data => x_msg_data,

Line 764: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,

760: ---------------------------------------------------------------------------
761: -- PROCEDURE update_pqualities for: Okl_pdt_Qualitys_v
762: ---------------------------------------------------------------------------
763: PROCEDURE update_pqualitys(p_api_version IN NUMBER,
764: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
765: x_return_status OUT NOCOPY VARCHAR2,
766: x_msg_count OUT NOCOPY NUMBER,
767: x_msg_data OUT NOCOPY VARCHAR2,
768: p_pqyv_rec IN pqyv_rec_type,

Line 773: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

769: x_pqyv_rec OUT NOCOPY pqyv_rec_type
770: ) IS
771: l_api_version CONSTANT NUMBER := 1;
772: l_api_name CONSTANT VARCHAR2(30) := 'update_tqualities';
773: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
774: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
775: l_valid BOOLEAN;
776: l_db_pqyv_rec pqyv_rec_type; /* database copy */
777: l_upd_pqyv_rec pqyv_rec_type; /* input copy */

Line 783: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

779: l_tmp_pqyv_rec pqyv_rec_type; /* for any other purposes */
780: l_no_data_found BOOLEAN := TRUE;
781: l_action VARCHAR2(1);
782: BEGIN
783: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
784:
785: l_upd_pqyv_rec := p_pqyv_rec;
786:
787: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,

Line 787: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,

783: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
784:
785: l_upd_pqyv_rec := p_pqyv_rec;
786:
787: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,
788: p_pkg_name => G_PKG_NAME,
789: p_init_msg_list => p_init_msg_list,
790: l_api_version => l_api_version,
791: p_api_version => p_api_version,

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

790: l_api_version => l_api_version,
791: p_api_version => p_api_version,
792: p_api_type => '_PVT',
793: x_return_status => l_return_status);
794: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
797: RAISE Okl_Api.G_EXCEPTION_ERROR;
798: END IF;

Line 795: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

791: p_api_version => p_api_version,
792: p_api_type => '_PVT',
793: x_return_status => l_return_status);
794: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
797: RAISE Okl_Api.G_EXCEPTION_ERROR;
798: END IF;
799:

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

792: p_api_type => '_PVT',
793: x_return_status => l_return_status);
794: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
797: RAISE Okl_Api.G_EXCEPTION_ERROR;
798: END IF;
799:
800: /* fetch old details from the database */

Line 797: RAISE Okl_Api.G_EXCEPTION_ERROR;

793: x_return_status => l_return_status);
794: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
795: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
796: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
797: RAISE Okl_Api.G_EXCEPTION_ERROR;
798: END IF;
799:
800: /* fetch old details from the database */
801: get_rec(p_pqyv_rec => l_upd_pqyv_rec,

Line 806: IF l_return_status <> Okl_Api.G_RET_STS_SUCCESS OR

802: x_return_status => l_return_status,
803: x_no_data_found => l_no_data_found,
804: x_pqyv_rec => l_db_pqyv_rec);
805:
806: IF l_return_status <> Okl_Api.G_RET_STS_SUCCESS OR
807: l_no_data_found = TRUE THEN
808: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
809: END IF;
810:

Line 808: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

804: x_pqyv_rec => l_db_pqyv_rec);
805:
806: IF l_return_status <> Okl_Api.G_RET_STS_SUCCESS OR
807: l_no_data_found = TRUE THEN
808: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
809: END IF;
810:
811: IF l_upd_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
812: /* update constraints */

Line 811: IF l_upd_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

807: l_no_data_found = TRUE THEN
808: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
809: END IF;
810:
811: IF l_upd_pqyv_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
812: /* update constraints */
813: copy_update_constraints(p_api_version => p_api_version,
814: p_init_msg_list => p_init_msg_list,
815: p_upd_pqyv_rec => l_upd_pqyv_rec,

Line 820: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

816: x_return_status => l_return_status,
817: x_msg_count => x_msg_count,
818: x_msg_data => x_msg_data);
819:
820: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
821: RAISE Okl_Api.G_EXCEPTION_ERROR;
822: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
823: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
824: END IF;

Line 821: RAISE Okl_Api.G_EXCEPTION_ERROR;

817: x_msg_count => x_msg_count,
818: x_msg_data => x_msg_data);
819:
820: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
821: RAISE Okl_Api.G_EXCEPTION_ERROR;
822: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
823: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
824: END IF;
825:

Line 822: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

818: x_msg_data => x_msg_data);
819:
820: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
821: RAISE Okl_Api.G_EXCEPTION_ERROR;
822: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
823: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
824: END IF;
825:
826: END IF;

Line 823: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

819:
820: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
821: RAISE Okl_Api.G_EXCEPTION_ERROR;
822: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
823: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
824: END IF;
825:
826: END IF;
827:

Line 835: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

831:
832: /* check for past records */
833: /*IF to_date(to_char(l_db_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate AND
834: to_date(to_char(l_db_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
835: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
836: p_msg_name => G_PAST_RECORDS);
837: x_return_status := Okl_Api.G_RET_STS_ERROR;
838: RAISE Okl_Api.G_EXCEPTION_ERROR;
839: END IF;

Line 837: x_return_status := Okl_Api.G_RET_STS_ERROR;

833: /*IF to_date(to_char(l_db_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate AND
834: to_date(to_char(l_db_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
835: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
836: p_msg_name => G_PAST_RECORDS);
837: x_return_status := Okl_Api.G_RET_STS_ERROR;
838: RAISE Okl_Api.G_EXCEPTION_ERROR;
839: END IF;
840: */
841:

Line 838: RAISE Okl_Api.G_EXCEPTION_ERROR;

834: to_date(to_char(l_db_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
835: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
836: p_msg_name => G_PAST_RECORDS);
837: x_return_status := Okl_Api.G_RET_STS_ERROR;
838: RAISE Okl_Api.G_EXCEPTION_ERROR;
839: END IF;
840: */
841:
842: IF (l_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE) then

Line 842: IF (l_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE) then

838: RAISE Okl_Api.G_EXCEPTION_ERROR;
839: END IF;
840: */
841:
842: IF (l_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE) then
843: l_upd_pqyv_rec.TO_DATE := p_pqyv_rec.to_date;
844: end if;
845:
846: IF (l_upd_pqyv_rec.from_DATE = Okl_Api.G_MISS_DATE) then

Line 846: IF (l_upd_pqyv_rec.from_DATE = Okl_Api.G_MISS_DATE) then

842: IF (l_upd_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE) then
843: l_upd_pqyv_rec.TO_DATE := p_pqyv_rec.to_date;
844: end if;
845:
846: IF (l_upd_pqyv_rec.from_DATE = Okl_Api.G_MISS_DATE) then
847: l_upd_pqyv_rec.from_DATE := p_pqyv_rec.from_date;
848: end if;
849:
850:

Line 852: Okl_Api.SET_MESSAGE(p_app_name => g_app_name

848: end if;
849:
850:
851: IF (l_upd_pqyv_rec.TO_DATE IS NOT NULL) AND (l_upd_pqyv_rec.TO_DATE < l_upd_pqyv_rec.from_date) THEN
852: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
853: ,p_msg_name => Okl_Pqy_Pvt.g_to_date_error
854: ,p_token1 => Okl_Pqy_Pvt.g_col_name_token
855: ,p_token1_value => 'to_date');
856: x_return_status := Okl_Api.G_RET_STS_ERROR;

Line 856: x_return_status := Okl_Api.G_RET_STS_ERROR;

852: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
853: ,p_msg_name => Okl_Pqy_Pvt.g_to_date_error
854: ,p_token1 => Okl_Pqy_Pvt.g_col_name_token
855: ,p_token1_value => 'to_date');
856: x_return_status := Okl_Api.G_RET_STS_ERROR;
857: RAISE Okl_Api.G_EXCEPTION_ERROR;
858: END IF;
859:
860: /* check for start date greater than sysdate */

Line 857: RAISE Okl_Api.G_EXCEPTION_ERROR;

853: ,p_msg_name => Okl_Pqy_Pvt.g_to_date_error
854: ,p_token1 => Okl_Pqy_Pvt.g_col_name_token
855: ,p_token1_value => 'to_date');
856: x_return_status := Okl_Api.G_RET_STS_ERROR;
857: RAISE Okl_Api.G_EXCEPTION_ERROR;
858: END IF;
859:
860: /* check for start date greater than sysdate */
861: /*IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

Line 861: /*IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

857: RAISE Okl_Api.G_EXCEPTION_ERROR;
858: END IF;
859:
860: /* check for start date greater than sysdate */
861: /*IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
862: to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
863: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
864: p_msg_name => G_START_DATE);
865: RAISE Okl_Api.G_EXCEPTION_ERROR;

Line 863: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,

859:
860: /* check for start date greater than sysdate */
861: /*IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
862: to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
863: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
864: p_msg_name => G_START_DATE);
865: RAISE Okl_Api.G_EXCEPTION_ERROR;
866: END IF;
867: */

Line 865: RAISE Okl_Api.G_EXCEPTION_ERROR;

861: /*IF to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
862: to_date(to_char(l_upd_pqyv_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
863: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
864: p_msg_name => G_START_DATE);
865: RAISE Okl_Api.G_EXCEPTION_ERROR;
866: END IF;
867: */
868: /* determine how the processing to be done */
869: l_action := determine_action(p_upd_pqyv_rec => l_upd_pqyv_rec,

Line 884: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

880: x_msg_data => x_msg_data,
881: p_pqyv_rec => l_upd_pqyv_rec,
882: x_pqyv_rec => x_pqyv_rec);
883:
884: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
885: RAISE Okl_Api.G_EXCEPTION_ERROR;
886: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
887: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
888: END IF;

Line 885: RAISE Okl_Api.G_EXCEPTION_ERROR;

881: p_pqyv_rec => l_upd_pqyv_rec,
882: x_pqyv_rec => x_pqyv_rec);
883:
884: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
885: RAISE Okl_Api.G_EXCEPTION_ERROR;
886: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
887: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
888: END IF;
889: /* Scenario 2: changing the dates */

Line 886: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

882: x_pqyv_rec => x_pqyv_rec);
883:
884: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
885: RAISE Okl_Api.G_EXCEPTION_ERROR;
886: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
887: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
888: END IF;
889: /* Scenario 2: changing the dates */
890: ELSIF l_action = '2' THEN

Line 887: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

883:
884: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
885: RAISE Okl_Api.G_EXCEPTION_ERROR;
886: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
887: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
888: END IF;
889: /* Scenario 2: changing the dates */
890: ELSIF l_action = '2' THEN
891: /* create a temporary record with all relevant details from db and upd records */

Line 901: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

897: p_pqyv_rec => l_pqyv_rec,
898: x_return_status => l_return_status,
899: x_msg_data => x_msg_data);
900:
901: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
902: RAISE Okl_Api.G_EXCEPTION_ERROR;
903: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
904: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
905: END IF;

Line 902: RAISE Okl_Api.G_EXCEPTION_ERROR;

898: x_return_status => l_return_status,
899: x_msg_data => x_msg_data);
900:
901: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
902: RAISE Okl_Api.G_EXCEPTION_ERROR;
903: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
904: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
905: END IF;
906:

Line 903: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

899: x_msg_data => x_msg_data);
900:
901: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
902: RAISE Okl_Api.G_EXCEPTION_ERROR;
903: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
904: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
905: END IF;
906:
907: /* public api to update tqualities */

Line 904: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

900:
901: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
902: RAISE Okl_Api.G_EXCEPTION_ERROR;
903: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
904: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
905: END IF;
906:
907: /* public api to update tqualities */
908: Okl_Pdt_Qualitys_Pub.update_pdt_qualitys(p_api_version => p_api_version,

Line 916: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

912: x_msg_data => x_msg_data,
913: p_pqyv_rec => l_upd_pqyv_rec,
914: x_pqyv_rec => x_pqyv_rec);
915:
916: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
917: RAISE Okl_Api.G_EXCEPTION_ERROR;
918: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
919: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
920: END IF;

Line 917: RAISE Okl_Api.G_EXCEPTION_ERROR;

913: p_pqyv_rec => l_upd_pqyv_rec,
914: x_pqyv_rec => x_pqyv_rec);
915:
916: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
917: RAISE Okl_Api.G_EXCEPTION_ERROR;
918: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
919: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
920: END IF;
921: END IF;

Line 918: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

914: x_pqyv_rec => x_pqyv_rec);
915:
916: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
917: RAISE Okl_Api.G_EXCEPTION_ERROR;
918: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
919: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
920: END IF;
921: END IF;
922:

Line 919: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

915:
916: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
917: RAISE Okl_Api.G_EXCEPTION_ERROR;
918: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
919: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
920: END IF;
921: END IF;
922:
923: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,

Line 923: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,

919: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
920: END IF;
921: END IF;
922:
923: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
924: x_msg_data => x_msg_data);
925: EXCEPTION
926: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
927: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

Line 926: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

922:
923: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
924: x_msg_data => x_msg_data);
925: EXCEPTION
926: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
927: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
928: p_pkg_name => G_PKG_NAME,
929: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
930: x_msg_count => x_msg_count,

Line 927: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

923: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
924: x_msg_data => x_msg_data);
925: EXCEPTION
926: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
927: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
928: p_pkg_name => G_PKG_NAME,
929: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
930: x_msg_count => x_msg_count,
931: x_msg_data => x_msg_data,

Line 929: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

925: EXCEPTION
926: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
927: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
928: p_pkg_name => G_PKG_NAME,
929: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
930: x_msg_count => x_msg_count,
931: x_msg_data => x_msg_data,
932: p_api_type => '_PVT');
933: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 933: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

929: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
930: x_msg_count => x_msg_count,
931: x_msg_data => x_msg_data,
932: p_api_type => '_PVT');
933: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
934: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
935: p_pkg_name => G_PKG_NAME,
936: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
937: x_msg_count => x_msg_count,

Line 934: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

930: x_msg_count => x_msg_count,
931: x_msg_data => x_msg_data,
932: p_api_type => '_PVT');
933: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
934: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
935: p_pkg_name => G_PKG_NAME,
936: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
937: x_msg_count => x_msg_count,
938: x_msg_data => x_msg_data,

Line 936: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

932: p_api_type => '_PVT');
933: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
934: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
935: p_pkg_name => G_PKG_NAME,
936: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
937: x_msg_count => x_msg_count,
938: x_msg_data => x_msg_data,
939: p_api_type => '_PVT');
940: WHEN OTHERS THEN

Line 941: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

937: x_msg_count => x_msg_count,
938: x_msg_data => x_msg_data,
939: p_api_type => '_PVT');
940: WHEN OTHERS THEN
941: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
942: p_pkg_name => G_PKG_NAME,
943: p_exc_name => 'OTHERS',
944: x_msg_count => x_msg_count,
945: x_msg_data => x_msg_data,