DBA Data[Home] [Help]

APPS.OKL_SETUPPQYVALUES_PVT dependencies on OKL_API

Line 32: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

28: WHERE okl_pqy_values_v.id = p_id;
29: l_okl_qvev_pk okl_qvev_pk_csr%ROWTYPE;
30: l_qvev_rec qvev_rec_type;
31: BEGIN
32: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
33: x_no_data_found := TRUE;
34: -- Get current database values
35: OPEN okl_qvev_pk_csr (p_qvev_rec.id);
36: FETCH okl_qvev_pk_csr INTO

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

51: x_qvev_rec := l_qvev_rec;
52: EXCEPTION
53: WHEN OTHERS THEN
54: -- store SQL error message on message stack
55: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
56: p_msg_name => G_UNEXPECTED_ERROR,
57: p_token1 => G_SQLCODE_TOKEN,
58: p_token1_value => SQLCODE,
59: p_token2 => G_SQLERRM_TOKEN,

Line 62: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

58: p_token1_value => SQLCODE,
59: p_token2 => G_SQLERRM_TOKEN,
60: p_token2_value => SQLERRM);
61: -- notify UNEXPECTED error for calling API.
62: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
63:
64: IF (okl_qvev_pk_csr%ISOPEN) THEN
65: CLOSE okl_qvev_pk_csr;
66: END IF;

Line 89: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

85: WHERE pqy.id = p_pqy_id;
86: l_okl_pqyv_pk okl_pqyv_pk_csr%ROWTYPE;
87: l_pqyv_rec pqyv_rec_type;
88: BEGIN
89: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
90: x_no_data_found := TRUE;
91: -- Get current database values
92: OPEN okl_pqyv_pk_csr (p_qvev_rec.pqy_id);
93: FETCH okl_pqyv_pk_csr INTO

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

98: x_pqyv_rec := l_pqyv_rec;
99: EXCEPTION
100: WHEN OTHERS THEN
101: -- store SQL error message on message stack
102: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
103: p_msg_name => G_UNEXPECTED_ERROR,
104:
105: p_token1 => G_SQLCODE_TOKEN,
106: p_token1_value => SQLCODE,

Line 110: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

106: p_token1_value => SQLCODE,
107: p_token2 => G_SQLERRM_TOKEN,
108: p_token2_value => SQLERRM);
109: -- notify UNEXPECTED error for calling API.
110: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
111:
112: IF (okl_pqyv_pk_csr%ISOPEN) THEN
113: CLOSE okl_pqyv_pk_csr;
114: END IF;

Line 171: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

167: l_row_not_found BOOLEAN := FALSE;
168:
169: BEGIN
170: x_valid := TRUE;
171: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
172:
173:
174: l_token_1 := Okl_Accounting_Util.Get_Message_Token(p_region_code => 'OKL_LP_PQVALS_CRUPD',
175: p_attribute_code => 'OKL_PRODUCT_QUALITY_VALUES');

Line 184: IF p_qvev_rec.id = Okl_Api.G_MISS_NUM THEN

180: l_token_3 := Okl_Accounting_Util.Get_Message_Token(p_region_code => 'OKL_LP_PDT_PQV_VAL_SUMRY',
181: p_attribute_code => 'OKL_PDT_QUALITY_VALUES');
182:
183:
184: IF p_qvev_rec.id = Okl_Api.G_MISS_NUM THEN
185: p_qvev_rec.value := Okl_Accounting_Util.okl_upper(p_qvev_rec.value);
186:
187: OPEN okl_pqy_values_unique (p_qvev_rec.value, p_qvev_rec.pqy_id);
188: FETCH okl_pqy_values_unique INTO l_unique_key;

Line 190: Okl_Api.set_message(G_APP_NAME,'OKL_NOT_UNIQUE','OKL_TABLE_NAME',l_token_1);

186:
187: OPEN okl_pqy_values_unique (p_qvev_rec.value, p_qvev_rec.pqy_id);
188: FETCH okl_pqy_values_unique INTO l_unique_key;
189: IF okl_pqy_values_unique%FOUND THEN
190: Okl_Api.set_message(G_APP_NAME,'OKL_NOT_UNIQUE','OKL_TABLE_NAME',l_token_1);
191: x_valid := FALSE;
192: x_return_status := Okl_Api.G_RET_STS_ERROR;
193: RAISE G_EXCEPTION_HALT_PROCESSING;
194: END IF;

Line 192: x_return_status := Okl_Api.G_RET_STS_ERROR;

188: FETCH okl_pqy_values_unique INTO l_unique_key;
189: IF okl_pqy_values_unique%FOUND THEN
190: Okl_Api.set_message(G_APP_NAME,'OKL_NOT_UNIQUE','OKL_TABLE_NAME',l_token_1);
191: x_valid := FALSE;
192: x_return_status := Okl_Api.G_RET_STS_ERROR;
193: RAISE G_EXCEPTION_HALT_PROCESSING;
194: END IF;
195: CLOSE okl_pqy_values_unique;
196: END IF;

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

204: l_row_not_found := okl_chk_pqy_csr%NOTFOUND;
205: CLOSE okl_chk_pqy_csr;
206:
207: IF l_row_not_found = FALSE THEN
208: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
209: p_msg_name => G_DATES_MISMATCH,
210: p_token1 => G_PARENT_TABLE_TOKEN,
211: p_token1_value => l_token_2,
212: p_token2 => G_CHILD_TABLE_TOKEN,

Line 215: x_return_status := Okl_Api.G_RET_STS_ERROR;

211: p_token1_value => l_token_2,
212: p_token2 => G_CHILD_TABLE_TOKEN,
213: p_token2_value => l_token_1);
214: x_valid := FALSE;
215: x_return_status := Okl_Api.G_RET_STS_ERROR;
216: RAISE G_EXCEPTION_HALT_PROCESSING;
217: END IF;
218:
219: IF p_qvev_rec.id <> Okl_Api.G_MISS_NUM THEN

Line 219: IF p_qvev_rec.id <> Okl_Api.G_MISS_NUM THEN

215: x_return_status := Okl_Api.G_RET_STS_ERROR;
216: RAISE G_EXCEPTION_HALT_PROCESSING;
217: END IF;
218:
219: IF p_qvev_rec.id <> Okl_Api.G_MISS_NUM THEN
220: -- Check for Child dates
221: OPEN okl_chk_pqv_csr(p_qvev_rec.id,
222: p_qvev_rec.from_date,
223: p_qvev_rec.TO_DATE);

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

226: l_row_not_found := okl_chk_pqv_csr%NOTFOUND;
227: CLOSE okl_chk_pqv_csr;
228:
229: IF l_row_not_found = FALSE THEN
230: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
231: p_msg_name => G_DATES_MISMATCH,
232: p_token1 => G_PARENT_TABLE_TOKEN,
233: p_token1_value => l_token_1,
234: p_token2 => G_CHILD_TABLE_TOKEN,

Line 237: x_return_status := Okl_Api.G_RET_STS_ERROR;

233: p_token1_value => l_token_1,
234: p_token2 => G_CHILD_TABLE_TOKEN,
235: p_token2_value => l_token_3);
236: x_valid := FALSE;
237: x_return_status := Okl_Api.G_RET_STS_ERROR;
238: RAISE G_EXCEPTION_HALT_PROCESSING;
239: END IF;
240: END IF;
241:

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

245: -- with the next column
246: NULL;
247: WHEN OTHERS THEN
248: -- store SQL error message on message stack
249: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
250: p_msg_name => G_UNEXPECTED_ERROR,
251: p_token1 => G_SQLCODE_TOKEN,
252: p_token1_value => SQLCODE,
253: p_token2 => G_SQLERRM_TOKEN,

Line 256: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

252: p_token1_value => SQLCODE,
253: p_token2 => G_SQLERRM_TOKEN,
254: p_token2_value => SQLERRM);
255: x_valid := FALSE;
256: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
257:
258: IF (okl_chk_pqy_csr%ISOPEN) THEN
259: CLOSE okl_chk_pqy_csr;
260: END IF;

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

284: PROCEDURE Validate_Value (
285: p_qvev_rec IN OUT NOCOPY qvev_rec_type,
286: x_return_status OUT NOCOPY VARCHAR2
287: ) IS
288: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
289: l_token_1 VARCHAR2(999);
290: BEGIN
291: -- initialize return status
292: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

Line 292: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

288: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
289: l_token_1 VARCHAR2(999);
290: BEGIN
291: -- initialize return status
292: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
293:
294: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PQVALS_CRUPD','OKL_NAME');
295:
296: IF p_qvev_rec.value = Okl_Api.G_MISS_CHAR OR

Line 296: IF p_qvev_rec.value = Okl_Api.G_MISS_CHAR OR

292: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
293:
294: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PQVALS_CRUPD','OKL_NAME');
295:
296: IF p_qvev_rec.value = Okl_Api.G_MISS_CHAR OR
297: p_qvev_rec.value IS NULL
298: THEN
299: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);
300: x_return_status := Okl_Api.G_RET_STS_ERROR;

Line 299: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);

295:
296: IF p_qvev_rec.value = Okl_Api.G_MISS_CHAR OR
297: p_qvev_rec.value IS NULL
298: THEN
299: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);
300: x_return_status := Okl_Api.G_RET_STS_ERROR;
301: END IF;
302: p_qvev_rec.value := Okl_Accounting_Util.okl_upper(p_qvev_rec.value);
303: EXCEPTION

Line 300: x_return_status := Okl_Api.G_RET_STS_ERROR;

296: IF p_qvev_rec.value = Okl_Api.G_MISS_CHAR OR
297: p_qvev_rec.value IS NULL
298: THEN
299: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);
300: x_return_status := Okl_Api.G_RET_STS_ERROR;
301: END IF;
302: p_qvev_rec.value := Okl_Accounting_Util.okl_upper(p_qvev_rec.value);
303: EXCEPTION
304: WHEN OTHERS THEN

Line 305: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,

301: END IF;
302: p_qvev_rec.value := Okl_Accounting_Util.okl_upper(p_qvev_rec.value);
303: EXCEPTION
304: WHEN OTHERS THEN
305: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,
306: p_msg_name =>Okl_Qve_Pvt.G_UNEXPECTED_ERROR,
307: p_token1 =>Okl_Qve_Pvt.G_SQL_SQLCODE_TOKEN,
308: p_token1_value =>SQLCODE,
309: p_token2 =>Okl_Qve_Pvt.G_SQL_SQLERRM_TOKEN,

Line 311: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

307: p_token1 =>Okl_Qve_Pvt.G_SQL_SQLCODE_TOKEN,
308: p_token1_value =>SQLCODE,
309: p_token2 =>Okl_Qve_Pvt.G_SQL_SQLERRM_TOKEN,
310: p_token2_value =>SQLERRM);
311: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
312:
313: END Validate_Value;
314: ------end of Validate_Value-----------------------------------
315:

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

329: PROCEDURE Validate_From_Date(
330: p_qvev_rec IN qvev_rec_type,
331: x_return_status OUT NOCOPY VARCHAR2
332: ) IS
333: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
334: l_token_1 VARCHAR2(999);
335: BEGIN
336: -- initialize return status
337: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

Line 337: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

333: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
334: l_token_1 VARCHAR2(999);
335: BEGIN
336: -- initialize return status
337: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
338: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PQVALS_CRUPD','OKL_EFFECTIVE_FROM');
339: IF (p_qvev_rec.from_date IS NULL) OR
340: (p_qvev_rec.from_date = Okl_Api.G_MISS_DATE) THEN
341: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);

Line 340: (p_qvev_rec.from_date = Okl_Api.G_MISS_DATE) THEN

336: -- initialize return status
337: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
338: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PQVALS_CRUPD','OKL_EFFECTIVE_FROM');
339: IF (p_qvev_rec.from_date IS NULL) OR
340: (p_qvev_rec.from_date = Okl_Api.G_MISS_DATE) THEN
341: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);
342: x_return_status := Okl_Api.G_RET_STS_ERROR;
343: END IF;
344: EXCEPTION

Line 341: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);

337: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
338: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PQVALS_CRUPD','OKL_EFFECTIVE_FROM');
339: IF (p_qvev_rec.from_date IS NULL) OR
340: (p_qvev_rec.from_date = Okl_Api.G_MISS_DATE) THEN
341: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);
342: x_return_status := Okl_Api.G_RET_STS_ERROR;
343: END IF;
344: EXCEPTION
345: WHEN OTHERS THEN

Line 342: x_return_status := Okl_Api.G_RET_STS_ERROR;

338: l_token_1 := Okl_Accounting_Util.Get_Message_Token('OKL_LP_PQVALS_CRUPD','OKL_EFFECTIVE_FROM');
339: IF (p_qvev_rec.from_date IS NULL) OR
340: (p_qvev_rec.from_date = Okl_Api.G_MISS_DATE) THEN
341: Okl_Api.set_message(Okl_Qve_Pvt.G_APP_NAME, Okl_Qve_Pvt.G_REQUIRED_VALUE,Okl_Qve_Pvt.G_COL_NAME_TOKEN,l_token_1);
342: x_return_status := Okl_Api.G_RET_STS_ERROR;
343: END IF;
344: EXCEPTION
345: WHEN OTHERS THEN
346: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,

Line 346: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,

342: x_return_status := Okl_Api.G_RET_STS_ERROR;
343: END IF;
344: EXCEPTION
345: WHEN OTHERS THEN
346: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,
347: p_msg_name =>Okl_Qve_Pvt.G_UNEXPECTED_ERROR,
348: p_token1 =>Okl_Qve_Pvt.G_SQL_SQLCODE_TOKEN,
349: p_token1_value =>SQLCODE,
350: p_token2 =>Okl_Qve_Pvt.G_SQL_SQLERRM_TOKEN,

Line 352: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

348: p_token1 =>Okl_Qve_Pvt.G_SQL_SQLCODE_TOKEN,
349: p_token1_value =>SQLCODE,
350: p_token2 =>Okl_Qve_Pvt.G_SQL_SQLERRM_TOKEN,
351: p_token2_value =>SQLERRM);
352: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
353:
354: END Validate_From_Date;
355: ------end of Validate_From_Date-----------------------------------
356:

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

369:
370: FUNCTION Validate_Attributes(
371: p_qvev_rec IN OUT NOCOPY qvev_rec_type
372: ) RETURN VARCHAR IS
373: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
374: l_return_status VARCHAR2(1):= Okl_Api.G_RET_STS_SUCCESS;
375:
376:
377: BEGIN

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

370: FUNCTION Validate_Attributes(
371: p_qvev_rec IN OUT NOCOPY qvev_rec_type
372: ) RETURN VARCHAR IS
373: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
374: l_return_status VARCHAR2(1):= Okl_Api.G_RET_STS_SUCCESS;
375:
376:
377: BEGIN
378:

Line 381: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN

377: BEGIN
378:
379: -----CHECK FOR PQY_VALUE----------------------------
380: Validate_Value (p_qvev_rec, x_return_status);
381: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
382: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
383: -- need to leave
384: l_return_status := x_return_status;
385: RAISE G_EXCEPTION_HALT_PROCESSING;

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

378:
379: -----CHECK FOR PQY_VALUE----------------------------
380: Validate_Value (p_qvev_rec, x_return_status);
381: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
382: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
383: -- need to leave
384: l_return_status := x_return_status;
385: RAISE G_EXCEPTION_HALT_PROCESSING;
386: ELSE

Line 394: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN

390: END IF;
391:
392: -----CHECK FOR FROM_DATE----------------------------
393: Validate_From_Date (p_qvev_rec,x_return_status);
394: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
395: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
396: -- need to leave
397: l_return_status := x_return_status;
398: RAISE G_EXCEPTION_HALT_PROCESSING;

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

391:
392: -----CHECK FOR FROM_DATE----------------------------
393: Validate_From_Date (p_qvev_rec,x_return_status);
394: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
395: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
396: -- need to leave
397: l_return_status := x_return_status;
398: RAISE G_EXCEPTION_HALT_PROCESSING;
399: ELSE

Line 413: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,

409: NULL;
410: RETURN (l_return_status);
411:
412: WHEN OTHERS THEN
413: Okl_Api.set_message(p_app_name =>Okl_Qve_Pvt.G_APP_NAME,
414: p_msg_name =>Okl_Qve_Pvt.G_UNEXPECTED_ERROR,
415: p_token1 =>Okl_Qve_Pvt.G_SQL_SQLCODE_TOKEN,
416: p_token1_value =>SQLCODE,
417: p_token2 =>Okl_Qve_Pvt.G_SQL_SQLERRM_TOKEN,

Line 419: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

415: p_token1 =>Okl_Qve_Pvt.G_SQL_SQLCODE_TOKEN,
416: p_token1_value =>SQLCODE,
417: p_token2 =>Okl_Qve_Pvt.G_SQL_SQLERRM_TOKEN,
418: p_token2_value =>SQLERRM);
419: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
420: RETURN(l_return_status);
421:
422: END Validate_Attributes;
423:

Line 445: IF p_upd_qvev_rec.description <> Okl_Api.G_MISS_CHAR THEN

441:
442: /* create a temporary record with all relevant details from db and upd records */
443: l_qvev_rec := p_db_qvev_rec;
444:
445: IF p_upd_qvev_rec.description <> Okl_Api.G_MISS_CHAR THEN
446: l_qvev_rec.description := p_upd_qvev_rec.description;
447: END IF;
448:
449: IF p_upd_qvev_rec.value <> Okl_Api.G_MISS_CHAR THEN

Line 449: IF p_upd_qvev_rec.value <> Okl_Api.G_MISS_CHAR THEN

445: IF p_upd_qvev_rec.description <> Okl_Api.G_MISS_CHAR THEN
446: l_qvev_rec.description := p_upd_qvev_rec.description;
447: END IF;
448:
449: IF p_upd_qvev_rec.value <> Okl_Api.G_MISS_CHAR THEN
450: l_qvev_rec.value := p_upd_qvev_rec.value;
451: END IF;
452:
453: IF p_upd_qvev_rec.from_date <> Okl_Api.G_MISS_DATE THEN

Line 453: IF p_upd_qvev_rec.from_date <> Okl_Api.G_MISS_DATE THEN

449: IF p_upd_qvev_rec.value <> Okl_Api.G_MISS_CHAR THEN
450: l_qvev_rec.value := p_upd_qvev_rec.value;
451: END IF;
452:
453: IF p_upd_qvev_rec.from_date <> Okl_Api.G_MISS_DATE THEN
454: l_qvev_rec.from_date := p_upd_qvev_rec.from_date;
455: END IF;
456:
457: IF p_upd_qvev_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

Line 457: IF p_upd_qvev_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

453: IF p_upd_qvev_rec.from_date <> Okl_Api.G_MISS_DATE THEN
454: l_qvev_rec.from_date := p_upd_qvev_rec.from_date;
455: END IF;
456:
457: IF p_upd_qvev_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
458: l_qvev_rec.TO_DATE := p_upd_qvev_rec.TO_DATE;
459: END IF;
460:
461: RETURN l_qvev_rec;

Line 481: l_upd_qvev_rec.description := Okl_Api.G_MISS_CHAR;

477: l_upd_qvev_rec := p_upd_qvev_rec;
478: l_db_qvev_rec := p_db_qvev_rec;
479:
480: IF l_upd_qvev_rec.description = l_db_qvev_rec.description THEN
481: l_upd_qvev_rec.description := Okl_Api.G_MISS_CHAR;
482: END IF;
483:
484: IF to_date(to_char(l_upd_qvev_rec.from_date , 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
485: l_upd_qvev_rec.from_date := Okl_Api.G_MISS_DATE;

Line 485: l_upd_qvev_rec.from_date := Okl_Api.G_MISS_DATE;

481: l_upd_qvev_rec.description := Okl_Api.G_MISS_CHAR;
482: END IF;
483:
484: IF to_date(to_char(l_upd_qvev_rec.from_date , 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
485: l_upd_qvev_rec.from_date := Okl_Api.G_MISS_DATE;
486: END IF;
487:
488: IF to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
489: l_upd_qvev_rec.TO_DATE := Okl_Api.G_MISS_DATE;

Line 489: l_upd_qvev_rec.TO_DATE := Okl_Api.G_MISS_DATE;

485: l_upd_qvev_rec.from_date := Okl_Api.G_MISS_DATE;
486: END IF;
487:
488: IF to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(l_db_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') THEN
489: l_upd_qvev_rec.TO_DATE := Okl_Api.G_MISS_DATE;
490: END IF;
491:
492: IF l_upd_qvev_rec.value = l_db_qvev_rec.value THEN
493: l_upd_qvev_rec.value := Okl_Api.G_MISS_CHAR;

Line 493: l_upd_qvev_rec.value := Okl_Api.G_MISS_CHAR;

489: l_upd_qvev_rec.TO_DATE := Okl_Api.G_MISS_DATE;
490: END IF;
491:
492: IF l_upd_qvev_rec.value = l_db_qvev_rec.value THEN
493: l_upd_qvev_rec.value := Okl_Api.G_MISS_CHAR;
494: END IF;
495:
496: p_upd_qvev_rec := l_upd_qvev_rec;
497:

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

508: x_return_status OUT NOCOPY VARCHAR2,
509: x_msg_data OUT NOCOPY VARCHAR2
510: ) IS
511: l_qvev_rec qvev_rec_type;
512: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
513: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
514: l_valid BOOLEAN;
515: BEGIN
516:

Line 517: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

513: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
514: l_valid BOOLEAN;
515: BEGIN
516:
517: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
518: l_qvev_rec := p_qvev_rec;
519:
520: /* check for start date greater than sysdate */
521: /*IF to_date(to_char(p_upd_qvev_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 521: /*IF to_date(to_char(p_upd_qvev_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

517: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
518: l_qvev_rec := p_qvev_rec;
519:
520: /* check for start date greater than sysdate */
521: /*IF to_date(to_char(p_upd_qvev_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
522: to_date(to_char(p_upd_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
523: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
524: p_msg_name => G_START_DATE);
525: x_return_status := Okl_Api.G_RET_STS_ERROR;

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

519:
520: /* check for start date greater than sysdate */
521: /*IF to_date(to_char(p_upd_qvev_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
522: to_date(to_char(p_upd_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
523: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
524: p_msg_name => G_START_DATE);
525: x_return_status := Okl_Api.G_RET_STS_ERROR;
526: RAISE G_EXCEPTION_HALT_PROCESSING;
527: END IF;

Line 525: x_return_status := Okl_Api.G_RET_STS_ERROR;

521: /*IF to_date(to_char(p_upd_qvev_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
522: to_date(to_char(p_upd_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
523: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
524: p_msg_name => G_START_DATE);
525: x_return_status := Okl_Api.G_RET_STS_ERROR;
526: RAISE G_EXCEPTION_HALT_PROCESSING;
527: END IF;
528: */
529:

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

528: */
529:
530: /* check for the records with from and to dates less than sysdate */
531: /*IF to_date(to_char(p_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
532: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
533: p_msg_name => G_PAST_RECORDS);
534: x_return_status := Okl_Api.G_RET_STS_ERROR;
535: RAISE G_EXCEPTION_HALT_PROCESSING;
536: END IF;

Line 534: x_return_status := Okl_Api.G_RET_STS_ERROR;

530: /* check for the records with from and to dates less than sysdate */
531: /*IF to_date(to_char(p_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
532: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
533: p_msg_name => G_PAST_RECORDS);
534: x_return_status := Okl_Api.G_RET_STS_ERROR;
535: RAISE G_EXCEPTION_HALT_PROCESSING;
536: END IF;
537: */
538: /* if the start date is in the past, the start date cannot be

Line 540: /*IF to_date(to_char(p_upd_qvev_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

536: END IF;
537: */
538: /* if the start date is in the past, the start date cannot be
539: modified */
540: /*IF to_date(to_char(p_upd_qvev_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
541: to_date(to_char(p_db_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <= l_sysdate THEN
542: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
543: p_msg_name => G_NOT_ALLOWED,
544: p_token1 => G_COL_NAME_TOKEN,

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

538: /* if the start date is in the past, the start date cannot be
539: modified */
540: /*IF to_date(to_char(p_upd_qvev_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
541: to_date(to_char(p_db_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') <= l_sysdate THEN
542: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
543: p_msg_name => G_NOT_ALLOWED,
544: p_token1 => G_COL_NAME_TOKEN,
545: p_token1_value => 'START_DATE');
546: x_return_status := Okl_Api.G_RET_STS_ERROR;

Line 546: x_return_status := Okl_Api.G_RET_STS_ERROR;

542: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
543: p_msg_name => G_NOT_ALLOWED,
544: p_token1 => G_COL_NAME_TOKEN,
545: p_token1_value => 'START_DATE');
546: x_return_status := Okl_Api.G_RET_STS_ERROR;
547: RAISE G_EXCEPTION_HALT_PROCESSING;
548: END IF;
549: */
550: IF l_qvev_rec.from_date <> Okl_Api.G_MISS_DATE OR

Line 550: IF l_qvev_rec.from_date <> Okl_Api.G_MISS_DATE OR

546: x_return_status := Okl_Api.G_RET_STS_ERROR;
547: RAISE G_EXCEPTION_HALT_PROCESSING;
548: END IF;
549: */
550: IF l_qvev_rec.from_date <> Okl_Api.G_MISS_DATE OR
551: l_qvev_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
552:
553: --- check dates constraints
554: Check_Constraints(p_qvev_rec => l_qvev_rec,

Line 551: l_qvev_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN

547: RAISE G_EXCEPTION_HALT_PROCESSING;
548: END IF;
549: */
550: IF l_qvev_rec.from_date <> Okl_Api.G_MISS_DATE OR
551: l_qvev_rec.TO_DATE <> Okl_Api.G_MISS_DATE THEN
552:
553: --- check dates constraints
554: Check_Constraints(p_qvev_rec => l_qvev_rec,
555: x_return_status => l_return_status,

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

554: Check_Constraints(p_qvev_rec => l_qvev_rec,
555: x_return_status => l_return_status,
556: x_valid => l_valid);
557:
558: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
559: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
560: RAISE G_EXCEPTION_HALT_PROCESSING;
561: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
562: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND

Line 559: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

555: x_return_status => l_return_status,
556: x_valid => l_valid);
557:
558: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
559: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
560: RAISE G_EXCEPTION_HALT_PROCESSING;
561: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
562: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
563: l_valid <> TRUE) THEN

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

557:
558: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
559: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
560: RAISE G_EXCEPTION_HALT_PROCESSING;
561: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
562: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
563: l_valid <> TRUE) THEN
564: x_return_status := Okl_Api.G_RET_STS_ERROR;
565: RAISE G_EXCEPTION_HALT_PROCESSING;

Line 562: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND

558: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
559: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
560: RAISE G_EXCEPTION_HALT_PROCESSING;
561: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
562: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
563: l_valid <> TRUE) THEN
564: x_return_status := Okl_Api.G_RET_STS_ERROR;
565: RAISE G_EXCEPTION_HALT_PROCESSING;
566: END IF;

Line 564: x_return_status := Okl_Api.G_RET_STS_ERROR;

560: RAISE G_EXCEPTION_HALT_PROCESSING;
561: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
562: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
563: l_valid <> TRUE) THEN
564: x_return_status := Okl_Api.G_RET_STS_ERROR;
565: RAISE G_EXCEPTION_HALT_PROCESSING;
566: END IF;
567:
568: END IF;

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

573: NULL;
574:
575: WHEN OTHERS THEN
576: -- store SQL error message on message stack for caller
577: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
578: p_msg_name => G_UNEXPECTED_ERROR,
579: p_token1 => G_SQLCODE_TOKEN,
580: p_token1_value => SQLCODE,
581: p_token2 => G_SQLERRM_TOKEN,

Line 585: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

581: p_token2 => G_SQLERRM_TOKEN,
582: p_token2_value => SQLERRM );
583: x_msg_data := 'Unexpected DATABASE Error';
584: -- notify caller of an UNEXPECTED error
585: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
586: END check_updates;
587:
588: ---------------------------------------------------------------------------
589: -- PROCEDURE determine_action for: Okl_pdt_Qualitys_v

Line 602: IF p_upd_qvev_rec.from_date = Okl_Api.G_MISS_DATE AND

598: l_action VARCHAR2(1);
599: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
600: BEGIN
601: /* Scenario 1: Only description and/or descriptive flexfield changes */
602: IF p_upd_qvev_rec.from_date = Okl_Api.G_MISS_DATE AND
603: p_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
604: l_action := '1';
605: /* Scenario 2: Changing the dates */
606: ELSE

Line 603: p_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN

599: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
600: BEGIN
601: /* Scenario 1: Only description and/or descriptive flexfield changes */
602: IF p_upd_qvev_rec.from_date = Okl_Api.G_MISS_DATE AND
603: p_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
604: l_action := '1';
605: /* Scenario 2: Changing the dates */
606: ELSE
607: l_action := '2';

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

623: x_qvev_rec OUT NOCOPY qvev_rec_type
624: ) IS
625: l_api_version CONSTANT NUMBER := 1;
626: l_api_name CONSTANT VARCHAR2(30) := 'insert_pqyvalues';
627: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
628: l_valid BOOLEAN;
629: l_qvev_rec qvev_rec_type;
630: l_pqyv_rec pqyv_rec_type;
631: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');

Line 634: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

630: l_pqyv_rec pqyv_rec_type;
631: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
632: l_row_notfound BOOLEAN := TRUE;
633: BEGIN
634: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
635:
636: l_qvev_rec := p_qvev_rec;
637: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,
638: p_pkg_name => G_PKG_NAME,

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

633: BEGIN
634: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
635:
636: l_qvev_rec := p_qvev_rec;
637: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,
638: p_pkg_name => G_PKG_NAME,
639: p_init_msg_list => p_init_msg_list,
640: l_api_version => l_api_version,
641: p_api_version => p_api_version,

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

640: l_api_version => l_api_version,
641: p_api_version => p_api_version,
642: p_api_type => '_PVT',
643: x_return_status => l_return_status);
644: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
647: RAISE Okl_Api.G_EXCEPTION_ERROR;
648: END IF;

Line 645: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

641: p_api_version => p_api_version,
642: p_api_type => '_PVT',
643: x_return_status => l_return_status);
644: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
647: RAISE Okl_Api.G_EXCEPTION_ERROR;
648: END IF;
649:

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

642: p_api_type => '_PVT',
643: x_return_status => l_return_status);
644: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
647: RAISE Okl_Api.G_EXCEPTION_ERROR;
648: END IF;
649:
650: l_return_status := Validate_Attributes(l_qvev_rec);

Line 647: RAISE Okl_Api.G_EXCEPTION_ERROR;

643: x_return_status => l_return_status);
644: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
647: RAISE Okl_Api.G_EXCEPTION_ERROR;
648: END IF;
649:
650: l_return_status := Validate_Attributes(l_qvev_rec);
651: --- If any errors happen abort API

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

648: END IF;
649:
650: l_return_status := Validate_Attributes(l_qvev_rec);
651: --- If any errors happen abort API
652: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
653: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
654: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
655: RAISE Okl_Api.G_EXCEPTION_ERROR;
656: END IF;

Line 653: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

649:
650: l_return_status := Validate_Attributes(l_qvev_rec);
651: --- If any errors happen abort API
652: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
653: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
654: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
655: RAISE Okl_Api.G_EXCEPTION_ERROR;
656: END IF;
657:

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

650: l_return_status := Validate_Attributes(l_qvev_rec);
651: --- If any errors happen abort API
652: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
653: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
654: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
655: RAISE Okl_Api.G_EXCEPTION_ERROR;
656: END IF;
657:
658: /* check for the records with from and to dates less than sysdate */

Line 655: RAISE Okl_Api.G_EXCEPTION_ERROR;

651: --- If any errors happen abort API
652: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
653: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
654: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
655: RAISE Okl_Api.G_EXCEPTION_ERROR;
656: END IF;
657:
658: /* check for the records with from and to dates less than sysdate */
659: /*IF to_date(to_char(l_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate OR

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

657:
658: /* check for the records with from and to dates less than sysdate */
659: /*IF to_date(to_char(l_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate OR
660: to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
661: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
662: p_msg_name => G_PAST_RECORDS);
663: RAISE Okl_Api.G_EXCEPTION_ERROR;
664: END IF;
665: */

Line 663: RAISE Okl_Api.G_EXCEPTION_ERROR;

659: /*IF to_date(to_char(l_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate OR
660: to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate THEN
661: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
662: p_msg_name => G_PAST_RECORDS);
663: RAISE Okl_Api.G_EXCEPTION_ERROR;
664: END IF;
665: */
666: default_parent_dates( p_qvev_rec => l_qvev_rec,
667: x_no_data_found => l_row_notfound,

Line 672: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

668: x_return_status => l_return_status,
669: x_pqyv_rec => l_pqyv_rec);
670:
671: IF (l_row_notfound) THEN
672: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
673: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 673: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

669: x_pqyv_rec => l_pqyv_rec);
670:
671: IF (l_row_notfound) THEN
672: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
673: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
677: END IF;

Line 674: RAISE Okl_Api.G_EXCEPTION_ERROR;

670:
671: IF (l_row_notfound) THEN
672: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
673: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
677: END IF;
678:

Line 675: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

671: IF (l_row_notfound) THEN
672: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
673: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
677: END IF;
678:
679: --Default Child End Date With Its Parents End Date If It Is Not Entered.

Line 676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

672: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
673: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
674: RAISE Okl_Api.G_EXCEPTION_ERROR;
675: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
677: END IF;
678:
679: --Default Child End Date With Its Parents End Date If It Is Not Entered.
680: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

Line 680: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

676: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
677: END IF;
678:
679: --Default Child End Date With Its Parents End Date If It Is Not Entered.
680: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
681: (to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') OR
682: to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') IS NULL) THEN
683: l_qvev_rec.TO_DATE := l_pqyv_rec.TO_DATE;
684: END IF;

Line 681: (to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') OR

677: END IF;
678:
679: --Default Child End Date With Its Parents End Date If It Is Not Entered.
680: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
681: (to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') OR
682: to_date(to_char(l_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') IS NULL) THEN
683: l_qvev_rec.TO_DATE := l_pqyv_rec.TO_DATE;
684: END IF;
685:

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

687: Check_Constraints(p_qvev_rec => l_qvev_rec,
688: x_return_status => l_return_status,
689: x_valid => l_valid);
690:
691: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
695: l_valid <> TRUE) THEN

Line 692: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

688: x_return_status => l_return_status,
689: x_valid => l_valid);
690:
691: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
695: l_valid <> TRUE) THEN
696: x_return_status := Okl_Api.G_RET_STS_ERROR;

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

689: x_valid => l_valid);
690:
691: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
695: l_valid <> TRUE) THEN
696: x_return_status := Okl_Api.G_RET_STS_ERROR;
697: RAISE Okl_Api.G_EXCEPTION_ERROR;

Line 694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND

690:
691: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
695: l_valid <> TRUE) THEN
696: x_return_status := Okl_Api.G_RET_STS_ERROR;
697: RAISE Okl_Api.G_EXCEPTION_ERROR;
698: END IF;

Line 696: x_return_status := Okl_Api.G_RET_STS_ERROR;

692: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
695: l_valid <> TRUE) THEN
696: x_return_status := Okl_Api.G_RET_STS_ERROR;
697: RAISE Okl_Api.G_EXCEPTION_ERROR;
698: END IF;
699:
700: /* public api to insert PQYVALUES */

Line 697: RAISE Okl_Api.G_EXCEPTION_ERROR;

693: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) OR
694: (l_return_status = Okl_Api.G_RET_STS_SUCCESS AND
695: l_valid <> TRUE) THEN
696: x_return_status := Okl_Api.G_RET_STS_ERROR;
697: RAISE Okl_Api.G_EXCEPTION_ERROR;
698: END IF;
699:
700: /* public api to insert PQYVALUES */
701:

Line 710: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

706: x_msg_data => x_msg_data,
707: p_qvev_rec => l_qvev_rec,
708: x_qvev_rec => x_qvev_rec);
709:
710: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
711: RAISE Okl_Api.G_EXCEPTION_ERROR;
712: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
714: END IF;

Line 711: RAISE Okl_Api.G_EXCEPTION_ERROR;

707: p_qvev_rec => l_qvev_rec,
708: x_qvev_rec => x_qvev_rec);
709:
710: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
711: RAISE Okl_Api.G_EXCEPTION_ERROR;
712: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
714: END IF;
715:

Line 712: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

708: x_qvev_rec => x_qvev_rec);
709:
710: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
711: RAISE Okl_Api.G_EXCEPTION_ERROR;
712: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
714: END IF;
715:
716: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,

Line 713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

709:
710: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
711: RAISE Okl_Api.G_EXCEPTION_ERROR;
712: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
714: END IF;
715:
716: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
717: x_msg_data => x_msg_data);

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

712: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
713: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
714: END IF;
715:
716: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
717: x_msg_data => x_msg_data);
718: EXCEPTION
719: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
720: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,

Line 719: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

715:
716: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
717: x_msg_data => x_msg_data);
718: EXCEPTION
719: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
720: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
721: p_pkg_name => G_PKG_NAME,
722: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
723: x_msg_count => x_msg_count,

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

716: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
717: x_msg_data => x_msg_data);
718: EXCEPTION
719: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
720: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
721: p_pkg_name => G_PKG_NAME,
722: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
723: x_msg_count => x_msg_count,
724: x_msg_data => x_msg_data,

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

718: EXCEPTION
719: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
720: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
721: p_pkg_name => G_PKG_NAME,
722: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
723: x_msg_count => x_msg_count,
724: x_msg_data => x_msg_data,
725: p_api_type => '_PVT');
726: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 726: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

722: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
723: x_msg_count => x_msg_count,
724: x_msg_data => x_msg_data,
725: p_api_type => '_PVT');
726: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
727: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
728: p_pkg_name => G_PKG_NAME,
729: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
730: x_msg_count => x_msg_count,

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

723: x_msg_count => x_msg_count,
724: x_msg_data => x_msg_data,
725: p_api_type => '_PVT');
726: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
727: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
728: p_pkg_name => G_PKG_NAME,
729: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
730: x_msg_count => x_msg_count,
731: x_msg_data => x_msg_data,

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

725: p_api_type => '_PVT');
726: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
727: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
728: p_pkg_name => G_PKG_NAME,
729: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
730: x_msg_count => x_msg_count,
731: x_msg_data => x_msg_data,
732: p_api_type => '_PVT');
733: WHEN OTHERS THEN

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

730: x_msg_count => x_msg_count,
731: x_msg_data => x_msg_data,
732: p_api_type => '_PVT');
733: WHEN OTHERS THEN
734: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
735: p_pkg_name => G_PKG_NAME,
736: p_exc_name => 'OTHERS',
737: x_msg_count => x_msg_count,
738: x_msg_data => x_msg_data,

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

754: x_qvev_rec OUT NOCOPY qvev_rec_type
755: ) IS
756: l_api_version CONSTANT NUMBER := 1;
757: l_api_name CONSTANT VARCHAR2(30) := 'update_pqyvalues';
758: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
759: l_sysdate DATE := to_date(to_char(SYSDATE, 'DD/MM/YYYY'), 'DD/MM/YYYY');
760: l_valid BOOLEAN;
761: l_db_qvev_rec qvev_rec_type; /* database copy */
762: l_upd_qvev_rec qvev_rec_type; /* input copy */

Line 770: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

766: l_no_data_found BOOLEAN := TRUE;
767: l_action VARCHAR2(1);
768: l_row_notfound BOOLEAN := TRUE;
769: BEGIN
770: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
771:
772: l_upd_qvev_rec := p_qvev_rec;
773:
774: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,

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

770: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
771:
772: l_upd_qvev_rec := p_qvev_rec;
773:
774: l_return_status := Okl_Api.START_ACTIVITY(p_api_name => l_api_name,
775: p_pkg_name => G_PKG_NAME,
776: p_init_msg_list => p_init_msg_list,
777: l_api_version => l_api_version,
778: p_api_version => p_api_version,

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

778: p_api_version => p_api_version,
779: p_api_type => '_PVT',
780: x_return_status => l_return_status);
781:
782: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
783: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
784: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
785: RAISE Okl_Api.G_EXCEPTION_ERROR;
786: END IF;

Line 783: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

779: p_api_type => '_PVT',
780: x_return_status => l_return_status);
781:
782: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
783: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
784: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
785: RAISE Okl_Api.G_EXCEPTION_ERROR;
786: END IF;
787:

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

780: x_return_status => l_return_status);
781:
782: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
783: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
784: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
785: RAISE Okl_Api.G_EXCEPTION_ERROR;
786: END IF;
787:
788: /* fetch old details from the database */

Line 785: RAISE Okl_Api.G_EXCEPTION_ERROR;

781:
782: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
783: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
784: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
785: RAISE Okl_Api.G_EXCEPTION_ERROR;
786: END IF;
787:
788: /* fetch old details from the database */
789: get_rec(p_qvev_rec => l_upd_qvev_rec,

Line 794: IF l_return_status <> Okl_Api.G_RET_STS_SUCCESS OR

790: x_return_status => l_return_status,
791: x_no_data_found => l_no_data_found,
792: x_qvev_rec => l_db_qvev_rec);
793:
794: IF l_return_status <> Okl_Api.G_RET_STS_SUCCESS OR
795: l_no_data_found = TRUE THEN
796: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
797: END IF;
798:

Line 796: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

792: x_qvev_rec => l_db_qvev_rec);
793:
794: IF l_return_status <> Okl_Api.G_RET_STS_SUCCESS OR
795: l_no_data_found = TRUE THEN
796: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
797: END IF;
798:
799: default_parent_dates( p_qvev_rec => l_db_qvev_rec,
800: x_no_data_found => l_row_notfound,

Line 805: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

801: x_return_status => l_return_status,
802: x_pqyv_rec => l_pqyv_rec);
803:
804: IF (l_row_notfound) THEN
805: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
806: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
807: RAISE Okl_Api.G_EXCEPTION_ERROR;
808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 806: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

802: x_pqyv_rec => l_pqyv_rec);
803:
804: IF (l_row_notfound) THEN
805: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
806: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
807: RAISE Okl_Api.G_EXCEPTION_ERROR;
808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
810: END IF;

Line 807: RAISE Okl_Api.G_EXCEPTION_ERROR;

803:
804: IF (l_row_notfound) THEN
805: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
806: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
807: RAISE Okl_Api.G_EXCEPTION_ERROR;
808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
810: END IF;
811:

Line 808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

804: IF (l_row_notfound) THEN
805: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
806: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
807: RAISE Okl_Api.G_EXCEPTION_ERROR;
808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
810: END IF;
811:
812: IF l_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN

Line 809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

805: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
806: ELSIF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
807: RAISE Okl_Api.G_EXCEPTION_ERROR;
808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
810: END IF;
811:
812: IF l_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
813: l_pqyv_rec.TO_DATE := NULL;

Line 812: IF l_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN

808: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
809: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
810: END IF;
811:
812: IF l_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
813: l_pqyv_rec.TO_DATE := NULL;
814: END IF;
815:
816: IF l_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN

Line 816: IF l_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN

812: IF l_pqyv_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
813: l_pqyv_rec.TO_DATE := NULL;
814: END IF;
815:
816: IF l_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE THEN
817: l_upd_qvev_rec.TO_DATE := NULL;
818: END IF;
819:
820:

Line 822: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND

818: END IF;
819:
820:
821: --Default Child End Date With Its Parents End Date If It Is Not Entered.
822: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
823: (to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') OR
824: to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') IS NULL) THEN
825: l_upd_qvev_rec.TO_DATE := l_pqyv_rec.TO_DATE;
826: END IF;

Line 823: (to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') OR

819:
820:
821: --Default Child End Date With Its Parents End Date If It Is Not Entered.
822: IF to_date(to_char(l_pqyv_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') <> to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') AND
823: (to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') = to_date(to_char(Okl_Api.G_MISS_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') OR
824: to_date(to_char(l_upd_qvev_rec.TO_DATE, 'DD/MM/YYYY'), 'DD/MM/YYYY') IS NULL) THEN
825: l_upd_qvev_rec.TO_DATE := l_pqyv_rec.TO_DATE;
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_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate AND
834: to_date(to_char(l_db_qvev_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_qvev_rec.from_date, 'DD/MM/YYYY'), 'DD/MM/YYYY') < l_sysdate AND
834: to_date(to_char(l_db_qvev_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_qvev_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_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE) then

Line 842: IF (l_upd_qvev_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_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE) then
843: l_upd_qvev_rec.TO_DATE := p_qvev_rec.to_date;
844: end if;
845:
846: IF (l_upd_qvev_rec.from_DATE = Okl_Api.G_MISS_DATE) then

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

842: IF (l_upd_qvev_rec.TO_DATE = Okl_Api.G_MISS_DATE) then
843: l_upd_qvev_rec.TO_DATE := p_qvev_rec.to_date;
844: end if;
845:
846: IF (l_upd_qvev_rec.from_DATE = Okl_Api.G_MISS_DATE) then
847: l_upd_qvev_rec.from_DATE := p_qvev_rec.from_date;
848: end if;
849:
850: IF (l_upd_qvev_rec.TO_DATE IS NOT NULL) AND (l_upd_qvev_rec.TO_DATE < l_upd_qvev_rec.from_date) THEN

Line 851: Okl_Api.SET_MESSAGE(p_app_name => g_app_name

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

Line 855: x_return_status := Okl_Api.G_RET_STS_ERROR;

851: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
852: ,p_msg_name => Okl_Qve_Pvt.g_to_date_error
853: ,p_token1 => Okl_Qve_Pvt.g_col_name_token
854: ,p_token1_value => 'TO_DATE');
855: x_return_status := Okl_Api.G_RET_STS_ERROR;
856: RAISE Okl_Api.G_EXCEPTION_ERROR;
857: END IF;
858:
859:

Line 856: RAISE Okl_Api.G_EXCEPTION_ERROR;

852: ,p_msg_name => Okl_Qve_Pvt.g_to_date_error
853: ,p_token1 => Okl_Qve_Pvt.g_col_name_token
854: ,p_token1_value => 'TO_DATE');
855: x_return_status := Okl_Api.G_RET_STS_ERROR;
856: RAISE Okl_Api.G_EXCEPTION_ERROR;
857: END IF;
858:
859:
860: /* determine how the processing to be done */

Line 876: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

872: x_msg_data => x_msg_data,
873: p_qvev_rec => l_upd_qvev_rec,
874: x_qvev_rec => x_qvev_rec);
875:
876: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
877: RAISE Okl_Api.G_EXCEPTION_ERROR;
878: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
879: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
880: END IF;

Line 877: RAISE Okl_Api.G_EXCEPTION_ERROR;

873: p_qvev_rec => l_upd_qvev_rec,
874: x_qvev_rec => x_qvev_rec);
875:
876: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
877: RAISE Okl_Api.G_EXCEPTION_ERROR;
878: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
879: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
880: END IF;
881: /* Scenario 2: changing the dates */

Line 878: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

874: x_qvev_rec => x_qvev_rec);
875:
876: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
877: RAISE Okl_Api.G_EXCEPTION_ERROR;
878: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
879: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
880: END IF;
881: /* Scenario 2: changing the dates */
882: ELSIF l_action = '2' THEN

Line 879: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

875:
876: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
877: RAISE Okl_Api.G_EXCEPTION_ERROR;
878: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
879: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
880: END IF;
881: /* Scenario 2: changing the dates */
882: ELSIF l_action = '2' THEN
883: /* create a temporary record with all relevant details from db and upd records */

Line 893: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

889: p_qvev_rec => l_qvev_rec,
890: x_return_status => l_return_status,
891: x_msg_data => x_msg_data);
892:
893: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
894: RAISE Okl_Api.G_EXCEPTION_ERROR;
895: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
896: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
897: END IF;

Line 894: RAISE Okl_Api.G_EXCEPTION_ERROR;

890: x_return_status => l_return_status,
891: x_msg_data => x_msg_data);
892:
893: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
894: RAISE Okl_Api.G_EXCEPTION_ERROR;
895: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
896: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
897: END IF;
898:

Line 895: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

891: x_msg_data => x_msg_data);
892:
893: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
894: RAISE Okl_Api.G_EXCEPTION_ERROR;
895: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
896: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
897: END IF;
898:
899: /* public api to update pqyvalues */

Line 896: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

892:
893: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
894: RAISE Okl_Api.G_EXCEPTION_ERROR;
895: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
896: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
897: END IF;
898:
899: /* public api to update pqyvalues */
900: Okl_Pdt_Qualitys_Pub.update_pdt_quality_vals(p_api_version => p_api_version,

Line 908: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN

904: x_msg_data => x_msg_data,
905: p_qvev_rec => l_upd_qvev_rec,
906: x_qvev_rec => x_qvev_rec);
907:
908: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
909: RAISE Okl_Api.G_EXCEPTION_ERROR;
910: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
911: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
912: END IF;

Line 909: RAISE Okl_Api.G_EXCEPTION_ERROR;

905: p_qvev_rec => l_upd_qvev_rec,
906: x_qvev_rec => x_qvev_rec);
907:
908: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
909: RAISE Okl_Api.G_EXCEPTION_ERROR;
910: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
911: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
912: END IF;
913:

Line 910: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN

906: x_qvev_rec => x_qvev_rec);
907:
908: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
909: RAISE Okl_Api.G_EXCEPTION_ERROR;
910: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
911: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
912: END IF;
913:
914: END IF;

Line 911: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

907:
908: IF l_return_status = Okl_Api.G_RET_STS_ERROR THEN
909: RAISE Okl_Api.G_EXCEPTION_ERROR;
910: ELSIF l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR THEN
911: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
912: END IF;
913:
914: END IF;
915:

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

912: END IF;
913:
914: END IF;
915:
916: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
917: x_msg_data => x_msg_data);
918:
919: EXCEPTION
920: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

Line 920: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

916: Okl_Api.END_ACTIVITY(x_msg_count => x_msg_count,
917: x_msg_data => x_msg_data);
918:
919: EXCEPTION
920: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
921: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
922: p_pkg_name => G_PKG_NAME,
923: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
924: x_msg_count => x_msg_count,

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

917: x_msg_data => x_msg_data);
918:
919: EXCEPTION
920: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
921: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
922: p_pkg_name => G_PKG_NAME,
923: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
924: x_msg_count => x_msg_count,
925: x_msg_data => x_msg_data,

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

919: EXCEPTION
920: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
921: x_return_status := Okl_Api.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
922: p_pkg_name => G_PKG_NAME,
923: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
924: x_msg_count => x_msg_count,
925: x_msg_data => x_msg_data,
926: p_api_type => '_PVT');
927: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 927: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

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

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

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

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

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

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