DBA Data[Home] [Help]

APPS.OKC_EXP_DATE_ASMBLR_PVT dependencies on OKC_API

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

19:
20:
21: l_api_name CONSTANT VARCHAR2(30) := 'exp_date_assemble';
22: l_api_version CONSTANT NUMBER := 1.0;
23: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
24: k NUMBER;
25: l_last_rundate DATE;
26: l_variance okc_condition_headers_b.cnh_variance%TYPE;
27: --l_corrid_rec okc_aq_pub.corrid_rec_typ;

Line 93: l_return_status := OKC_API.START_ACTIVITY(l_api_name

89: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Rundate (dd/mm/yyyy:hh24:mi:ss) :'||to_char(p_last_rundate,'dd/mm/yyyy:hh24:mi:ss'));
90: FND_FILE.PUT_LINE(FND_FILE.LOG, 'End_Date Range (dd/mm/yyyy:hh24:mi:ss) :'||to_char((p_cnh_variance + trunc(p_last_rundate) + 1),'dd/mm/yyyy:hh24:mi:ss') || ' and ' || to_char((trunc(sysdate) + p_cnh_variance + 0.99999),'dd/mm/yyyy:hh24:mi:ss' ));
91: -- call start_activity to create savepoint, check comptability
92: -- and initialize message list
93: l_return_status := OKC_API.START_ACTIVITY(l_api_name
94: ,p_init_msg_list
95: ,'_PROCESS'
96: ,x_return_status
97: );

Line 99: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

95: ,'_PROCESS'
96: ,x_return_status
97: );
98: -- check if activity started successfully
99: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;

Line 100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

96: ,x_return_status
97: );
98: -- check if activity started successfully
99: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
104:

Line 101: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

97: );
98: -- check if activity started successfully
99: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
104:
105: --Get the correlation

Line 102: RAISE OKC_API.G_EXCEPTION_ERROR;

98: -- check if activity started successfully
99: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
104:
105: --Get the correlation
106: /* SELECT acn.correlation INTO l_corrid_rec FROM okc_actions_v acn

Line 224: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

220: x_msg_data =>x_msg_data,
221: p_cnh_id =>p_cnh_id ,
222: p_msg_tab =>l_msg_tbl
223: );
224: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
226: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
227: RAISE OKC_API.G_EXCEPTION_ERROR;
228: --ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

Line 225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

221: p_cnh_id =>p_cnh_id ,
222: p_msg_tab =>l_msg_tbl
223: );
224: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
226: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
227: RAISE OKC_API.G_EXCEPTION_ERROR;
228: --ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
229: --commit;

Line 226: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

222: p_msg_tab =>l_msg_tbl
223: );
224: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
226: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
227: RAISE OKC_API.G_EXCEPTION_ERROR;
228: --ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
229: --commit;
230: END IF;

Line 227: RAISE OKC_API.G_EXCEPTION_ERROR;

223: );
224: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
226: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
227: RAISE OKC_API.G_EXCEPTION_ERROR;
228: --ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
229: --commit;
230: END IF;
231:

Line 228: --ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

224: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
226: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
227: RAISE OKC_API.G_EXCEPTION_ERROR;
228: --ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
229: --commit;
230: END IF;
231:
232: FND_MESSAGE.SET_NAME('OKC','OKC_EDA_CONTRACTS');

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

235: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
236: END IF; -- l_hook_filter if
237: END LOOP; -- end of k1_csr
238: COMMIT;
239: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
240:
241:
242: IF (l_debug = 'Y') THEN
243: okc_debug.Log('1000: Leaving ',2);

Line 248: WHEN OKC_API.G_EXCEPTION_ERROR THEN

244: okc_debug.Reset_Indentation;
245: END IF;
246:
247: EXCEPTION
248: WHEN OKC_API.G_EXCEPTION_ERROR THEN
249: x_return_status := OKC_API.HANDLE_EXCEPTIONS
250: (l_api_name,
251: G_PKG_NAME,
252: 'OKC_API.G_RET_STS_ERROR',

Line 249: x_return_status := OKC_API.HANDLE_EXCEPTIONS

245: END IF;
246:
247: EXCEPTION
248: WHEN OKC_API.G_EXCEPTION_ERROR THEN
249: x_return_status := OKC_API.HANDLE_EXCEPTIONS
250: (l_api_name,
251: G_PKG_NAME,
252: 'OKC_API.G_RET_STS_ERROR',
253: x_msg_count,

Line 252: 'OKC_API.G_RET_STS_ERROR',

248: WHEN OKC_API.G_EXCEPTION_ERROR THEN
249: x_return_status := OKC_API.HANDLE_EXCEPTIONS
250: (l_api_name,
251: G_PKG_NAME,
252: 'OKC_API.G_RET_STS_ERROR',
253: x_msg_count,
254: x_msg_data,
255: '_PROCESS');
256: IF (l_debug = 'Y') THEN

Line 260: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

256: IF (l_debug = 'Y') THEN
257: okc_debug.Log('2000: Leaving ',2);
258: okc_debug.Reset_Indentation;
259: END IF;
260: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (l_api_name,
263: G_PKG_NAME,
264: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 261: x_return_status := OKC_API.HANDLE_EXCEPTIONS

257: okc_debug.Log('2000: Leaving ',2);
258: okc_debug.Reset_Indentation;
259: END IF;
260: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (l_api_name,
263: G_PKG_NAME,
264: 'OKC_API.G_RET_STS_UNEXP_ERROR',
265: x_msg_count,

Line 264: 'OKC_API.G_RET_STS_UNEXP_ERROR',

260: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (l_api_name,
263: G_PKG_NAME,
264: 'OKC_API.G_RET_STS_UNEXP_ERROR',
265: x_msg_count,
266: x_msg_data,
267: '_PROCESS');
268: IF (l_debug = 'Y') THEN

Line 273: x_return_status := OKC_API.HANDLE_EXCEPTIONS

269: okc_debug.Log('3000: Leaving ',2);
270: okc_debug.Reset_Indentation;
271: END IF;
272: WHEN OTHERS THEN
273: x_return_status := OKC_API.HANDLE_EXCEPTIONS
274: (l_api_name,
275: G_PKG_NAME,
276: 'OTHERS',
277: x_msg_count,

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

299:
300: -- l_api_name CONSTANT VARCHAR2(30) := 'exp_lines_date_assemble';
301: l_api_name CONSTANT VARCHAR2(30) := 'exp_ln_date_ass';
302: l_api_version CONSTANT NUMBER := 1.0;
303: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
304: k NUMBER;
305: l_last_rundate DATE;
306: l_variance okc_condition_headers_b.cnh_variance%TYPE;
307: --l_corrid_rec okc_aq_pub.corrid_rec_typ;

Line 380: l_return_status := OKC_API.START_ACTIVITY(l_api_name

376:
377:
378: -- call start_activity to create savepoint, check comptability
379: -- and initialize message list
380: l_return_status := OKC_API.START_ACTIVITY(l_api_name
381: ,p_init_msg_list
382: ,'_PROCESS'
383: ,x_return_status
384: );

Line 390: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

386: okc_debug.Log('110: l_return_status : '||l_return_status ,2);
387: END IF;
388:
389: -- check if activity started successfully
390: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
391: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
392: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
393: RAISE OKC_API.G_EXCEPTION_ERROR;
394: END IF;

Line 391: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

387: END IF;
388:
389: -- check if activity started successfully
390: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
391: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
392: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
393: RAISE OKC_API.G_EXCEPTION_ERROR;
394: END IF;
395:

Line 392: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

388:
389: -- check if activity started successfully
390: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
391: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
392: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
393: RAISE OKC_API.G_EXCEPTION_ERROR;
394: END IF;
395:
396: --Get the correlation

Line 393: RAISE OKC_API.G_EXCEPTION_ERROR;

389: -- check if activity started successfully
390: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
391: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
392: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
393: RAISE OKC_API.G_EXCEPTION_ERROR;
394: END IF;
395:
396: --Get the correlation
397: /*SELECT acn.correlation INTO l_corrid_rec FROM okc_actions_v acn

Line 523: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

519: okc_debug.Log('150: Called OKC_AQ_PUB.send_message ',2);
520: okc_debug.Log('160: l_return_status : '||l_return_status,2);
521: END IF;
522:
523: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
524: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
525: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
526: RAISE OKC_API.G_EXCEPTION_ERROR;
527: END IF;

Line 524: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

520: okc_debug.Log('160: l_return_status : '||l_return_status,2);
521: END IF;
522:
523: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
524: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
525: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
526: RAISE OKC_API.G_EXCEPTION_ERROR;
527: END IF;
528:

Line 525: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

521: END IF;
522:
523: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
524: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
525: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
526: RAISE OKC_API.G_EXCEPTION_ERROR;
527: END IF;
528:
529: FND_MESSAGE.SET_NAME('OKC','OKC_EDA_CONTRACTS');

Line 526: RAISE OKC_API.G_EXCEPTION_ERROR;

522:
523: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
524: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
525: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
526: RAISE OKC_API.G_EXCEPTION_ERROR;
527: END IF;
528:
529: FND_MESSAGE.SET_NAME('OKC','OKC_EDA_CONTRACTS');
530: FND_MESSAGE.SET_TOKEN('NUMBER',k1_rec.k_number||': '||k1_rec.k_nbr_mod||':Ending '|| to_char(k1_rec.k_expire_date,'DD-MM-YYYY:hh24:mi:ss'));

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

538: END LOOP; -- for each K
539:
540: COMMIT;
541:
542: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
543:
544: IF (l_debug = 'Y') THEN
545: okc_debug.Log('1000: Leaving ',2);
546: okc_debug.Reset_Indentation;

Line 550: WHEN OKC_API.G_EXCEPTION_ERROR THEN

546: okc_debug.Reset_Indentation;
547: END IF;
548:
549: EXCEPTION
550: WHEN OKC_API.G_EXCEPTION_ERROR THEN
551: IF (l_debug = 'Y') THEN
552: okc_debug.Log('2000: Leaving ',2);
553: okc_debug.Reset_Indentation;
554: END IF;

Line 555: x_return_status := OKC_API.HANDLE_EXCEPTIONS

551: IF (l_debug = 'Y') THEN
552: okc_debug.Log('2000: Leaving ',2);
553: okc_debug.Reset_Indentation;
554: END IF;
555: x_return_status := OKC_API.HANDLE_EXCEPTIONS
556: (l_api_name,
557: G_PKG_NAME,
558: 'OKC_API.G_RET_STS_ERROR',
559: x_msg_count,

Line 558: 'OKC_API.G_RET_STS_ERROR',

554: END IF;
555: x_return_status := OKC_API.HANDLE_EXCEPTIONS
556: (l_api_name,
557: G_PKG_NAME,
558: 'OKC_API.G_RET_STS_ERROR',
559: x_msg_count,
560: x_msg_data,
561: '_PROCESS');
562: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 562: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

558: 'OKC_API.G_RET_STS_ERROR',
559: x_msg_count,
560: x_msg_data,
561: '_PROCESS');
562: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
563: IF (l_debug = 'Y') THEN
564: okc_debug.Log('3000: Leaving ',2);
565: okc_debug.Reset_Indentation;
566: END IF;

Line 567: x_return_status := OKC_API.HANDLE_EXCEPTIONS

563: IF (l_debug = 'Y') THEN
564: okc_debug.Log('3000: Leaving ',2);
565: okc_debug.Reset_Indentation;
566: END IF;
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS
568: (l_api_name,
569: G_PKG_NAME,
570: 'OKC_API.G_RET_STS_UNEXP_ERROR',
571: x_msg_count,

Line 570: 'OKC_API.G_RET_STS_UNEXP_ERROR',

566: END IF;
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS
568: (l_api_name,
569: G_PKG_NAME,
570: 'OKC_API.G_RET_STS_UNEXP_ERROR',
571: x_msg_count,
572: x_msg_data,
573: '_PROCESS');
574: WHEN OTHERS THEN

Line 579: x_return_status := OKC_API.HANDLE_EXCEPTIONS

575: IF (l_debug = 'Y') THEN
576: okc_debug.Log('4000: Leaving ',2);
577: okc_debug.Reset_Indentation;
578: END IF;
579: x_return_status := OKC_API.HANDLE_EXCEPTIONS
580: (l_api_name,
581: G_PKG_NAME,
582: 'OTHERS',
583: x_msg_count,