DBA Data[Home] [Help]

APPS.OKC_TERMS_QA_GRP dependencies on FND_LOG

Line 104: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

100:
101: BEGIN
102: l_contract_source := 'NONE';
103: l_now := SYSDATE;
104: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
105: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered QA_Doc');
106: END IF;
107:
108: -- Standard Start of API savepoint

Line 105: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered QA_Doc');

101: BEGIN
102: l_contract_source := 'NONE';
103: l_now := SYSDATE;
104: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
105: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered QA_Doc');
106: END IF;
107:
108: -- Standard Start of API savepoint
109: SAVEPOINT g_QA_Doc;

Line 169: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

165: IF p_qa_mode='AMEND' THEN
166: --------------------------------------------
167: -- Calling API to mark any article amended if system variable used in that API has been changed
168: --------------------------------------------
169: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
170: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call API OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment ');
171: END IF;
172:
173: OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment(

Line 170: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call API OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment ');

166: --------------------------------------------
167: -- Calling API to mark any article amended if system variable used in that API has been changed
168: --------------------------------------------
169: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
170: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call API OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment ');
171: END IF;
172:
173: OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment(
174: p_api_version =>1,

Line 195: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

191:
192: --------------------------------------------
193: -- Call internal QA_Doc and put result into PLSQL table and save it in DB
194: --------------------------------------------
195: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
196: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private QA_Doc and put result into PLSQL table and save it in DB');
197: END IF;
198:
199: OKC_TERMS_QA_PVT.QA_Doc(

Line 196: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private QA_Doc and put result into PLSQL table and save it in DB');

192: --------------------------------------------
193: -- Call internal QA_Doc and put result into PLSQL table and save it in DB
194: --------------------------------------------
195: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
196: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private QA_Doc and put result into PLSQL table and save it in DB');
197: END IF;
198:
199: OKC_TERMS_QA_PVT.QA_Doc(
200: x_return_status => x_return_status,

Line 233: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

229: ----------------------------------------------------------------------
230: -- QA Check for Lock Contract - to be run for p_doc_type <> 'TEMPLATE'
231: ----------------------------------------------------------------------
232: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
233: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_lock_contract');
235: END IF;
236: OKC_TERMS_QA_PVT.Check_lock_contract(
237: p_qa_mode => p_qa_mode,

Line 234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_lock_contract');

230: -- QA Check for Lock Contract - to be run for p_doc_type <> 'TEMPLATE'
231: ----------------------------------------------------------------------
232: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
233: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_lock_contract');
235: END IF;
236: OKC_TERMS_QA_PVT.Check_lock_contract(
237: p_qa_mode => p_qa_mode,
238: p_doc_type => p_doc_type,

Line 255: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

251: ----------------------------------------------------------------------
252: -- QA Check for Contract Admin - to be run for p_doc_type <> 'TEMPLATE'
253: ----------------------------------------------------------------------
254: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
255: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
256: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_contract_admin');
257: END IF;
258: OKC_TERMS_QA_PVT.check_contract_admin(
259: p_qa_mode => p_qa_mode,

Line 256: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_contract_admin');

252: -- QA Check for Contract Admin - to be run for p_doc_type <> 'TEMPLATE'
253: ----------------------------------------------------------------------
254: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
255: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
256: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_contract_admin');
257: END IF;
258: OKC_TERMS_QA_PVT.check_contract_admin(
259: p_qa_mode => p_qa_mode,
260: p_doc_type => p_doc_type,

Line 284: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

280:
281: IF p_qa_terms_only = 'N' AND l_template_id IS NOT NULL THEN
282:
283:
284: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');
286: END IF;
287:
288: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (

Line 285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');

281: IF p_qa_terms_only = 'N' AND l_template_id IS NOT NULL THEN
282:
283:
284: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');
286: END IF;
287:
288: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (
289: p_api_version => 1,

Line 314: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

310: -- Now insert into Temp table.
311: --------------------------------------------
312: -- Save result from PLSQL table into DB table
313: --------------------------------------------
314: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
315: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2200: Save result from PLSQL table into DB table');
316: END IF;
317:
318: x_qa_return_status := G_QA_STS_SUCCESS;

Line 315: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2200: Save result from PLSQL table into DB table');

311: --------------------------------------------
312: -- Save result from PLSQL table into DB table
313: --------------------------------------------
314: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
315: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2200: Save result from PLSQL table into DB table');
316: END IF;
317:
318: x_qa_return_status := G_QA_STS_SUCCESS;
319:

Line 365: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

361: END IF;
362:
363: -- Standard call to get message count and if count is 1, get message info.
364: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
365: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
366: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving QA_Doc');
367: END IF;
368:
369: EXCEPTION

Line 366: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving QA_Doc');

362:
363: -- Standard call to get message count and if count is 1, get message info.
364: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
365: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
366: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving QA_Doc');
367: END IF;
368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN

Line 372: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: ROLLBACK TO g_QA_Doc;
372: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
373: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
374: END IF;
375: x_return_status := G_RET_STS_ERROR ;
376: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );

Line 373: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');

369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: ROLLBACK TO g_QA_Doc;
372: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
373: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
374: END IF;
375: x_return_status := G_RET_STS_ERROR ;
376: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
377:

Line 380: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

376: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
379: ROLLBACK TO g_QA_Doc;
380: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
381: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
382: END IF;
383: x_return_status := G_RET_STS_UNEXP_ERROR ;
384: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );

Line 381: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');

377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
379: ROLLBACK TO g_QA_Doc;
380: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
381: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
382: END IF;
383: x_return_status := G_RET_STS_UNEXP_ERROR ;
384: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
385:

Line 388: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

384: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
385:
386: WHEN OTHERS THEN
387: ROLLBACK TO g_QA_Doc;
388: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
389: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);
390: END IF;
391:
392: x_return_status := G_RET_STS_UNEXP_ERROR ;

Line 389: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);

385:
386: WHEN OTHERS THEN
387: ROLLBACK TO g_QA_Doc;
388: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
389: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);
390: END IF;
391:
392: x_return_status := G_RET_STS_UNEXP_ERROR ;
393: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 440: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

436: WHERE document_type = p_doc_type
437: AND document_id = p_doc_id;
438:
439: BEGIN
440: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Entered QA_Doc');
442: END IF;
443:
444: -- Standard Start of API savepoint

Line 441: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Entered QA_Doc');

437: AND document_id = p_doc_id;
438:
439: BEGIN
440: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Entered QA_Doc');
442: END IF;
443:
444: -- Standard Start of API savepoint
445: SAVEPOINT g_QA_Doc;

Line 507: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

503: IF p_qa_mode='AMEND' THEN
504: --------------------------------------------
505: -- Calling API to mark any article amended if system variable used in that API has been changed
506: --------------------------------------------
507: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
508: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call API OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment ');
509: END IF;
510:
511: OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment(

Line 508: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call API OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment ');

504: --------------------------------------------
505: -- Calling API to mark any article amended if system variable used in that API has been changed
506: --------------------------------------------
507: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
508: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call API OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment ');
509: END IF;
510:
511: OKC_TERMS_UTIL_GRP.Mark_Variable_Based_Amendment(
512: p_api_version =>1,

Line 532: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

528: END IF;
529: --------------------------------------------
530: -- Call internal QA_Doc and put result into PLSQL table
531: --------------------------------------------
532: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Call Private QA_Doc and put result into PLSQL table');
534: END IF;
535: OKC_TERMS_QA_PVT.QA_Doc(
536: x_return_status => x_return_status,

Line 533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Call Private QA_Doc and put result into PLSQL table');

529: --------------------------------------------
530: -- Call internal QA_Doc and put result into PLSQL table
531: --------------------------------------------
532: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Call Private QA_Doc and put result into PLSQL table');
534: END IF;
535: OKC_TERMS_QA_PVT.QA_Doc(
536: x_return_status => x_return_status,
537:

Line 573: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

569: ----------------------------------------------------------------------
570: -- QA Check for Lock Contract - to be run for p_doc_type <> 'TEMPLATE'
571: ----------------------------------------------------------------------
572: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
573: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
574: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_lock_contract');
575: END IF;
576: OKC_TERMS_QA_PVT.Check_lock_contract(
577: p_qa_mode => p_qa_mode,

Line 574: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_lock_contract');

570: -- QA Check for Lock Contract - to be run for p_doc_type <> 'TEMPLATE'
571: ----------------------------------------------------------------------
572: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
573: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
574: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_lock_contract');
575: END IF;
576: OKC_TERMS_QA_PVT.Check_lock_contract(
577: p_qa_mode => p_qa_mode,
578: p_doc_type => p_doc_type,

Line 595: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

591: ----------------------------------------------------------------------
592: -- QA Check for Contract Admin - to be run for p_doc_type <> 'TEMPLATE'
593: ----------------------------------------------------------------------
594: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
595: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
596: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_contract_admin');
597: END IF;
598: OKC_TERMS_QA_PVT.check_contract_admin(
599: p_qa_mode => p_qa_mode,

Line 596: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_contract_admin');

592: -- QA Check for Contract Admin - to be run for p_doc_type <> 'TEMPLATE'
593: ----------------------------------------------------------------------
594: IF p_doc_type<>G_TMPL_DOC_TYPE THEN
595: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
596: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2210: calling check_contract_admin');
597: END IF;
598: OKC_TERMS_QA_PVT.check_contract_admin(
599: p_qa_mode => p_qa_mode,
600: p_doc_type => p_doc_type,

Line 622: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

618:
619: IF p_qa_terms_only = 'N' AND l_template_id IS NOT NULL THEN
620:
621:
622: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
623: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');
624: END IF;
625:
626: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (

Line 623: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');

619: IF p_qa_terms_only = 'N' AND l_template_id IS NOT NULL THEN
620:
621:
622: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
623: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');
624: END IF;
625:
626: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (
627: p_api_version => 1,

Line 672: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

668: END IF;
669:
670: -- Standard call to get message count and if count is 1, get message info.
671: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
672: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'900: Leaving QA_Doc');
674: END IF;
675: END IF; -- Repository Enhancement (For Validate Action)
676:

Line 673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'900: Leaving QA_Doc');

669:
670: -- Standard call to get message count and if count is 1, get message info.
671: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
672: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'900: Leaving QA_Doc');
674: END IF;
675: END IF; -- Repository Enhancement (For Validate Action)
676:
677:

Line 681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

677:
678: EXCEPTION
679: WHEN FND_API.G_EXC_ERROR THEN
680: ROLLBACK TO g_QA_Doc;
681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1000: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
683: END IF;
684: x_return_status := G_RET_STS_ERROR ;
685: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );

Line 682: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1000: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');

678: EXCEPTION
679: WHEN FND_API.G_EXC_ERROR THEN
680: ROLLBACK TO g_QA_Doc;
681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1000: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
683: END IF;
684: x_return_status := G_RET_STS_ERROR ;
685: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
686:

Line 689: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

685: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
686:
687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
688: ROLLBACK TO g_QA_Doc;
689: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
690: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
691: END IF;
692: x_return_status := G_RET_STS_UNEXP_ERROR ;
693: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );

Line 690: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');

686:
687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
688: ROLLBACK TO g_QA_Doc;
689: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
690: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
691: END IF;
692: x_return_status := G_RET_STS_UNEXP_ERROR ;
693: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
694:

Line 697: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

693: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
694:
695: WHEN OTHERS THEN
696: ROLLBACK TO g_QA_Doc;
697: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1200: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);
699: END IF;
700:
701: x_return_status := G_RET_STS_UNEXP_ERROR ;

Line 698: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1200: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);

694:
695: WHEN OTHERS THEN
696: ROLLBACK TO g_QA_Doc;
697: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1200: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);
699: END IF;
700:
701: x_return_status := G_RET_STS_UNEXP_ERROR ;
702: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 727: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

723: l_qa_return_status VARCHAR2(50);
724:
725: BEGIN
726:
727: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
728: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Entered '||l_api_name);
729: END IF;
730: x_return_status := G_RET_STS_SUCCESS;
731:

Line 728: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Entered '||l_api_name);

724:
725: BEGIN
726:
727: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
728: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Entered '||l_api_name);
729: END IF;
730: x_return_status := G_RET_STS_SUCCESS;
731:
732: OKC_TERMS_UTIL_GRP.Get_Contract_Document_Type_ID(

Line 779: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

775: END IF;
776: x_return_status := l_qa_return_status;
777:
778: -- Standard call to get message count and if count is 1, get message info.
779: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'500: Leaving '||l_api_name);
781: END IF;
782:
783: EXCEPTION

Line 780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'500: Leaving '||l_api_name);

776: x_return_status := l_qa_return_status;
777:
778: -- Standard call to get message count and if count is 1, get message info.
779: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'500: Leaving '||l_api_name);
781: END IF;
782:
783: EXCEPTION
784: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 786: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

782:
783: EXCEPTION
784: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
785: ROLLBACK TO g_QA_Doc;
786: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
787: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving '||l_api_name||' : G_EXCEPTION_UNEXPECTED_ERROR Exception');
788: END IF;
789: x_return_status := G_QA_STS_ERROR ;
790:

Line 787: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving '||l_api_name||' : G_EXCEPTION_UNEXPECTED_ERROR Exception');

783: EXCEPTION
784: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
785: ROLLBACK TO g_QA_Doc;
786: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
787: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving '||l_api_name||' : G_EXCEPTION_UNEXPECTED_ERROR Exception');
788: END IF;
789: x_return_status := G_QA_STS_ERROR ;
790:
791: WHEN OTHERS THEN

Line 793: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

789: x_return_status := G_QA_STS_ERROR ;
790:
791: WHEN OTHERS THEN
792: ROLLBACK TO g_QA_Doc;
793: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
794: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1200: Leaving '||l_api_name||' because of EXCEPTION: '||sqlerrm);
795: END IF;
796:
797: x_return_status := G_QA_STS_ERROR ;

Line 794: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1200: Leaving '||l_api_name||' because of EXCEPTION: '||sqlerrm);

790:
791: WHEN OTHERS THEN
792: ROLLBACK TO g_QA_Doc;
793: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
794: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1200: Leaving '||l_api_name||' because of EXCEPTION: '||sqlerrm);
795: END IF;
796:
797: x_return_status := G_QA_STS_ERROR ;
798: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN

Line 837: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

833: l_warning_found Boolean := FALSE;
834:
835: BEGIN
836:
837: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered QA_Doc - OVERLOADED ONE');
839: END IF;
840:
841: -- Standard Start of API savepoint

Line 838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered QA_Doc - OVERLOADED ONE');

834:
835: BEGIN
836:
837: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'100: Entered QA_Doc - OVERLOADED ONE');
839: END IF;
840:
841: -- Standard Start of API savepoint
842: SAVEPOINT g_QA_Doc;

Line 861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

857:
858: --------------------------------------------
859: -- Call internal QA_Doc and put result into PLSQL table
860: --------------------------------------------
861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Call Private QA_Doc and put result into PLSQL table');
863: END IF;
864:
865: QA_Doc(

Line 862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Call Private QA_Doc and put result into PLSQL table');

858: --------------------------------------------
859: -- Call internal QA_Doc and put result into PLSQL table
860: --------------------------------------------
861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Call Private QA_Doc and put result into PLSQL table');
863: END IF;
864:
865: QA_Doc(
866: p_api_version => l_api_version,

Line 887: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

883: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
884: RAISE FND_API.G_EXC_ERROR ;
885: END IF;
886:
887: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
888: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');
889: END IF;
890:
891: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (

Line 888: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');

884: RAISE FND_API.G_EXC_ERROR ;
885: END IF;
886:
887: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
888: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'201: Call Private QA_Doc for deilverables and add result into PLSQL table and save it in DB');
889: END IF;
890:
891: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (
892: p_api_version => 1,

Line 934: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

930: END IF;
931:
932: -- Standard call to get message count and if count is 1, get message info.
933: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
934: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
935: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving QA_Doc - OVERLOADED ONE ');
936: END IF;
937:
938: EXCEPTION

Line 935: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving QA_Doc - OVERLOADED ONE ');

931:
932: -- Standard call to get message count and if count is 1, get message info.
933: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
934: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
935: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Leaving QA_Doc - OVERLOADED ONE ');
936: END IF;
937:
938: EXCEPTION
939: WHEN FND_API.G_EXC_ERROR THEN

Line 941: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

937:
938: EXCEPTION
939: WHEN FND_API.G_EXC_ERROR THEN
940: ROLLBACK TO g_QA_Doc;
941: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
942: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
943: END IF;
944: x_return_status := G_RET_STS_ERROR ;
945: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );

Line 942: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');

938: EXCEPTION
939: WHEN FND_API.G_EXC_ERROR THEN
940: ROLLBACK TO g_QA_Doc;
941: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
942: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
943: END IF;
944: x_return_status := G_RET_STS_ERROR ;
945: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
946:

Line 949: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

945: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
946:
947: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
948: ROLLBACK TO g_QA_Doc;
949: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
950: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
951: END IF;
952: x_return_status := G_RET_STS_UNEXP_ERROR ;
953: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );

Line 950: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');

946:
947: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
948: ROLLBACK TO g_QA_Doc;
949: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
950: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
951: END IF;
952: x_return_status := G_RET_STS_UNEXP_ERROR ;
953: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
954:

Line 957: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

953: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
954:
955: WHEN OTHERS THEN
956: ROLLBACK TO g_QA_Doc;
957: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
958: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);
959: END IF;
960:
961: x_return_status := G_RET_STS_UNEXP_ERROR ;

Line 958: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);

954:
955: WHEN OTHERS THEN
956: ROLLBACK TO g_QA_Doc;
957: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
958: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving QA_Doc because of EXCEPTION: '||sqlerrm);
959: END IF;
960:
961: x_return_status := G_RET_STS_UNEXP_ERROR ;
962: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN