APPS.OKC_CONTRACT_DOCS_PVT dependencies on FND_LOG

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

121: t.BUSINESS_DOCUMENT_VERSION = cp_business_document_version and
122: t.ATTACHED_DOCUMENT_ID = cp_attached_document_id;
123: BEGIN
124:
125: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'400: Entered get_rec');
127: END IF;
128:
129: -- Get current database values

Line 126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'400: Entered get_rec');

122: t.ATTACHED_DOCUMENT_ID = cp_attached_document_id;
123: BEGIN
124:
125: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'400: Entered get_rec');
127: END IF;
128:
129: -- Get current database values
130: OPEN OKC_CONTRACT_DOCS_pk_csr (p_business_document_type, p_business_document_id, p_business_document_version, p_attached_document_id);

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

153: RAISE NO_DATA_FOUND;
154: END IF;
155: CLOSE OKC_CONTRACT_DOCS_pk_csr;
156:
157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'500: Leaving get_rec ');
159: END IF;
160:
161: RETURN G_RET_STS_SUCCESS ;

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

154: END IF;
155: CLOSE OKC_CONTRACT_DOCS_pk_csr;
156:
157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'500: Leaving get_rec ');
159: END IF;
160:
161: RETURN G_RET_STS_SUCCESS ;
162:

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

162:
163: EXCEPTION
164: WHEN OTHERS THEN
165:
166: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving get_rec because of EXCEPTION: '||sqlerrm);
168: END IF;
169:
170: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

163: EXCEPTION
164: WHEN OTHERS THEN
165:
166: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'600: Leaving get_rec because of EXCEPTION: '||sqlerrm);
168: END IF;
169:
170: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
171: p_msg_name => G_UNEXPECTED_ERROR,

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

229: l_last_updated_by OKC_CONTRACT_DOCS.LAST_UPDATED_BY%TYPE;
230: l_last_update_login OKC_CONTRACT_DOCS.LAST_UPDATE_LOGIN%TYPE;
231: l_last_update_date OKC_CONTRACT_DOCS.LAST_UPDATE_DATE%TYPE;
232: BEGIN
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,'700: Entered Set_Attributes ');
235: END IF;
236:
237: IF( p_business_document_type IS NOT NULL AND p_business_document_id IS NOT NULL AND p_business_document_version IS NOT NULL AND p_attached_document_id IS NOT NULL ) THEN

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

230: l_last_update_login OKC_CONTRACT_DOCS.LAST_UPDATE_LOGIN%TYPE;
231: l_last_update_date OKC_CONTRACT_DOCS.LAST_UPDATE_DATE%TYPE;
232: BEGIN
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,'700: Entered Set_Attributes ');
235: END IF;
236:
237: IF( p_business_document_type IS NOT NULL AND p_business_document_id IS NOT NULL AND p_business_document_version IS NOT NULL AND p_attached_document_id IS NOT NULL ) THEN
238: -- Get current database values

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

362: END IF;
363:
364: END IF;
365:
366: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
367: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Leaving Set_Attributes ');
368: END IF;
369:
370: RETURN G_RET_STS_SUCCESS ;

Line 367: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Leaving Set_Attributes ');

363:
364: END IF;
365:
366: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
367: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Leaving Set_Attributes ');
368: END IF;
369:
370: RETURN G_RET_STS_SUCCESS ;
371: EXCEPTION

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

369:
370: RETURN G_RET_STS_SUCCESS ;
371: EXCEPTION
372: WHEN FND_API.G_EXC_ERROR THEN
373: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
374: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception');
375: END IF;
376: RETURN G_RET_STS_ERROR;
377:

Line 374: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception');

370: RETURN G_RET_STS_SUCCESS ;
371: EXCEPTION
372: WHEN FND_API.G_EXC_ERROR THEN
373: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
374: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception');
375: END IF;
376: RETURN G_RET_STS_ERROR;
377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

375: END IF;
376: RETURN G_RET_STS_ERROR;
377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
379: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
380: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
381: END IF;
382: RETURN G_RET_STS_UNEXP_ERROR;
383:

Line 380: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

376: RETURN G_RET_STS_ERROR;
377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
379: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
380: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
381: END IF;
382: RETURN G_RET_STS_UNEXP_ERROR;
383:
384: WHEN OTHERS THEN

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

381: END IF;
382: RETURN G_RET_STS_UNEXP_ERROR;
383:
384: WHEN OTHERS THEN
385: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
386: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving Set_Attributes because of EXCEPTION: '||sqlerrm);
387: END IF;
388: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
389: p_msg_name => G_UNEXPECTED_ERROR,

Line 386: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving Set_Attributes because of EXCEPTION: '||sqlerrm);

382: RETURN G_RET_STS_UNEXP_ERROR;
383:
384: WHEN OTHERS THEN
385: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
386: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'1100: Leaving Set_Attributes because of EXCEPTION: '||sqlerrm);
387: END IF;
388: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
389: p_msg_name => G_UNEXPECTED_ERROR,
390: p_token1 => G_SQLCODE_TOKEN,

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

426: l_dummy_var VARCHAR2(1) := '?';
427:
428: BEGIN
429:
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1200: Entered Validate_Attributes');
432: END IF;
433:
434: IF p_validation_level > G_REQUIRED_VALUE_VALID_LEVEL THEN

Line 431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1200: Entered Validate_Attributes');

427:
428: BEGIN
429:
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1200: Entered Validate_Attributes');
432: END IF;
433:
434: IF p_validation_level > G_REQUIRED_VALUE_VALID_LEVEL THEN
435: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1200: Entered Validate_Attributes');
432: END IF;
433:
434: IF p_validation_level > G_REQUIRED_VALUE_VALID_LEVEL THEN
435: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
436: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1300: required values validation');
437: END IF;
438:
439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 436: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1300: required values validation');

432: END IF;
433:
434: IF p_validation_level > G_REQUIRED_VALUE_VALID_LEVEL THEN
435: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
436: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1300: required values validation');
437: END IF;
438:
439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_TYPE ');

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

435: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
436: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1300: required values validation');
437: END IF;
438:
439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_TYPE ');
441: END IF;
442: IF ( p_business_document_type IS NULL) THEN
443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_TYPE ');

436: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1300: required values validation');
437: END IF;
438:
439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_TYPE ');
441: END IF;
442: IF ( p_business_document_type IS NULL) THEN
443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_TYPE is invalid');

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

439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_TYPE ');
441: END IF;
442: IF ( p_business_document_type IS NULL) THEN
443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_TYPE is invalid');
445: END IF;
446: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_TYPE');
447: l_return_status := G_RET_STS_ERROR;

Line 444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_TYPE is invalid');

440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_TYPE ');
441: END IF;
442: IF ( p_business_document_type IS NULL) THEN
443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_TYPE is invalid');
445: END IF;
446: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_TYPE');
447: l_return_status := G_RET_STS_ERROR;
448: END IF;

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

446: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_TYPE');
447: l_return_status := G_RET_STS_ERROR;
448: END IF;
449:
450: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_ID ');
452: END IF;
453: IF ( p_business_document_id IS NULL) THEN
454: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_ID ');

447: l_return_status := G_RET_STS_ERROR;
448: END IF;
449:
450: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_ID ');
452: END IF;
453: IF ( p_business_document_id IS NULL) THEN
454: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_ID is invalid');

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

450: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_ID ');
452: END IF;
453: IF ( p_business_document_id IS NULL) THEN
454: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_ID is invalid');
456: END IF;
457: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_ID');
458: l_return_status := G_RET_STS_ERROR;

Line 455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_ID is invalid');

451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_ID ');
452: END IF;
453: IF ( p_business_document_id IS NULL) THEN
454: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_ID is invalid');
456: END IF;
457: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_ID');
458: l_return_status := G_RET_STS_ERROR;
459: END IF;

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

457: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_ID');
458: l_return_status := G_RET_STS_ERROR;
459: END IF;
460:
461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_VERSION ');
463: END IF;
464: IF ( p_business_document_version IS NULL) THEN
465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_VERSION ');

458: l_return_status := G_RET_STS_ERROR;
459: END IF;
460:
461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_VERSION ');
463: END IF;
464: IF ( p_business_document_version IS NULL) THEN
465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_VERSION is invalid');

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

461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_VERSION ');
463: END IF;
464: IF ( p_business_document_version IS NULL) THEN
465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_VERSION is invalid');
467: END IF;
468: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_VERSION');
469: l_return_status := G_RET_STS_ERROR;

Line 466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_VERSION is invalid');

462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute BUSINESS_DOCUMENT_VERSION ');
463: END IF;
464: IF ( p_business_document_version IS NULL) THEN
465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute BUSINESS_DOCUMENT_VERSION is invalid');
467: END IF;
468: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_VERSION');
469: l_return_status := G_RET_STS_ERROR;
470: END IF;

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

468: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BUSINESS_DOCUMENT_VERSION');
469: l_return_status := G_RET_STS_ERROR;
470: END IF;
471:
472: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute ATTACHED_DOCUMENT_ID ');
474: END IF;
475: IF ( p_attached_document_id IS NULL) THEN
476: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute ATTACHED_DOCUMENT_ID ');

469: l_return_status := G_RET_STS_ERROR;
470: END IF;
471:
472: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute ATTACHED_DOCUMENT_ID ');
474: END IF;
475: IF ( p_attached_document_id IS NULL) THEN
476: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
477: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute ATTACHED_DOCUMENT_ID is invalid');

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

472: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute ATTACHED_DOCUMENT_ID ');
474: END IF;
475: IF ( p_attached_document_id IS NULL) THEN
476: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
477: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute ATTACHED_DOCUMENT_ID is invalid');
478: END IF;
479: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ATTACHED_DOCUMENT_ID');
480: l_return_status := G_RET_STS_ERROR;

Line 477: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute ATTACHED_DOCUMENT_ID is invalid');

473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute ATTACHED_DOCUMENT_ID ');
474: END IF;
475: IF ( p_attached_document_id IS NULL) THEN
476: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
477: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute ATTACHED_DOCUMENT_ID is invalid');
478: END IF;
479: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ATTACHED_DOCUMENT_ID');
480: l_return_status := G_RET_STS_ERROR;
481: END IF;

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

479: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ATTACHED_DOCUMENT_ID');
480: l_return_status := G_RET_STS_ERROR;
481: END IF;
482:
483: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
484: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EXTERNAL_VISIBILITY_FLAG ');
485: END IF;
486: IF ( p_external_visibility_flag IS NULL) THEN
487: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 484: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EXTERNAL_VISIBILITY_FLAG ');

480: l_return_status := G_RET_STS_ERROR;
481: END IF;
482:
483: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
484: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EXTERNAL_VISIBILITY_FLAG ');
485: END IF;
486: IF ( p_external_visibility_flag IS NULL) THEN
487: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EXTERNAL_VISIBILITY_FLAG is invalid');

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

483: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
484: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EXTERNAL_VISIBILITY_FLAG ');
485: END IF;
486: IF ( p_external_visibility_flag IS NULL) THEN
487: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EXTERNAL_VISIBILITY_FLAG is invalid');
489: END IF;
490: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EXTERNAL_VISIBILITY_FLAG');
491: l_return_status := G_RET_STS_ERROR;

Line 488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EXTERNAL_VISIBILITY_FLAG is invalid');

484: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EXTERNAL_VISIBILITY_FLAG ');
485: END IF;
486: IF ( p_external_visibility_flag IS NULL) THEN
487: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EXTERNAL_VISIBILITY_FLAG is invalid');
489: END IF;
490: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EXTERNAL_VISIBILITY_FLAG');
491: l_return_status := G_RET_STS_ERROR;
492: END IF;

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

490: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EXTERNAL_VISIBILITY_FLAG');
491: l_return_status := G_RET_STS_ERROR;
492: END IF;
493:
494: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_TYPE ');
496: END IF;
497: IF ( p_effective_from_type IS NULL) THEN
498: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_TYPE ');

491: l_return_status := G_RET_STS_ERROR;
492: END IF;
493:
494: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_TYPE ');
496: END IF;
497: IF ( p_effective_from_type IS NULL) THEN
498: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_TYPE is invalid');

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

494: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_TYPE ');
496: END IF;
497: IF ( p_effective_from_type IS NULL) THEN
498: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_TYPE is invalid');
500: END IF;
501: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_TYPE');
502: l_return_status := G_RET_STS_ERROR;

Line 499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_TYPE is invalid');

495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_TYPE ');
496: END IF;
497: IF ( p_effective_from_type IS NULL) THEN
498: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_TYPE is invalid');
500: END IF;
501: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_TYPE');
502: l_return_status := G_RET_STS_ERROR;
503: END IF;

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

501: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_TYPE');
502: l_return_status := G_RET_STS_ERROR;
503: END IF;
504:
505: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
506: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_ID ');
507: END IF;
508: IF ( p_effective_from_id IS NULL) THEN
509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 506: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_ID ');

502: l_return_status := G_RET_STS_ERROR;
503: END IF;
504:
505: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
506: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_ID ');
507: END IF;
508: IF ( p_effective_from_id IS NULL) THEN
509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
510: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_ID is invalid');

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

505: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
506: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_ID ');
507: END IF;
508: IF ( p_effective_from_id IS NULL) THEN
509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
510: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_ID is invalid');
511: END IF;
512: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_ID');
513: l_return_status := G_RET_STS_ERROR;

Line 510: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_ID is invalid');

506: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_ID ');
507: END IF;
508: IF ( p_effective_from_id IS NULL) THEN
509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
510: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_ID is invalid');
511: END IF;
512: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_ID');
513: l_return_status := G_RET_STS_ERROR;
514: END IF;

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

512: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_ID');
513: l_return_status := G_RET_STS_ERROR;
514: END IF;
515:
516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_VERSION ');
518: END IF;
519: IF ( p_effective_from_version IS NULL) THEN
520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_VERSION ');

513: l_return_status := G_RET_STS_ERROR;
514: END IF;
515:
516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_VERSION ');
518: END IF;
519: IF ( p_effective_from_version IS NULL) THEN
520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_VERSION is invalid');

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

516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_VERSION ');
518: END IF;
519: IF ( p_effective_from_version IS NULL) THEN
520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_VERSION is invalid');
522: END IF;
523: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_VERSION');
524: l_return_status := G_RET_STS_ERROR;

Line 521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_VERSION is invalid');

517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute EFFECTIVE_FROM_VERSION ');
518: END IF;
519: IF ( p_effective_from_version IS NULL) THEN
520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute EFFECTIVE_FROM_VERSION is invalid');
522: END IF;
523: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_VERSION');
524: l_return_status := G_RET_STS_ERROR;
525: END IF;

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

523: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'EFFECTIVE_FROM_VERSION');
524: l_return_status := G_RET_STS_ERROR;
525: END IF;
526:
527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute INCLUDE_FOR_APPROVAL_FLAG ');
529: END IF;
530: IF ( p_include_for_approval_flag IS NULL) THEN
531: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute INCLUDE_FOR_APPROVAL_FLAG ');

524: l_return_status := G_RET_STS_ERROR;
525: END IF;
526:
527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute INCLUDE_FOR_APPROVAL_FLAG ');
529: END IF;
530: IF ( p_include_for_approval_flag IS NULL) THEN
531: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute INCLUDE_FOR_APPROVAL_FLAG is invalid');

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

527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute INCLUDE_FOR_APPROVAL_FLAG ');
529: END IF;
530: IF ( p_include_for_approval_flag IS NULL) THEN
531: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute INCLUDE_FOR_APPROVAL_FLAG is invalid');
533: END IF;
534: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INCLUDE_FOR_APPROVAL_FLAG');
535: l_return_status := G_RET_STS_ERROR;

Line 532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute INCLUDE_FOR_APPROVAL_FLAG is invalid');

528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1400: - attribute INCLUDE_FOR_APPROVAL_FLAG ');
529: END IF;
530: IF ( p_include_for_approval_flag IS NULL) THEN
531: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1500: - attribute INCLUDE_FOR_APPROVAL_FLAG is invalid');
533: END IF;
534: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INCLUDE_FOR_APPROVAL_FLAG');
535: l_return_status := G_RET_STS_ERROR;
536: END IF;

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

537:
538: END IF;
539:
540: IF p_validation_level > G_VALID_VALUE_VALID_LEVEL THEN
541: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1600: static values and range validation');
543: END IF;
544:
545: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1600: static values and range validation');

538: END IF;
539:
540: IF p_validation_level > G_VALID_VALUE_VALID_LEVEL THEN
541: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1600: static values and range validation');
543: END IF;
544:
545: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: - attribute PRIMARY_CONTRACT_DOC_FLAG ');

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

541: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1600: static values and range validation');
543: END IF;
544:
545: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: - attribute PRIMARY_CONTRACT_DOC_FLAG ');
547: END IF;
548: IF ( p_primary_contract_doc_flag NOT IN ('Y','N') AND p_primary_contract_doc_flag IS NOT NULL) THEN
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 546: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: - attribute PRIMARY_CONTRACT_DOC_FLAG ');

542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1600: static values and range validation');
543: END IF;
544:
545: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: - attribute PRIMARY_CONTRACT_DOC_FLAG ');
547: END IF;
548: IF ( p_primary_contract_doc_flag NOT IN ('Y','N') AND p_primary_contract_doc_flag IS NOT NULL) THEN
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute PRIMARY_CONTRACT_DOC_FLAG is invalid');

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

545: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: - attribute PRIMARY_CONTRACT_DOC_FLAG ');
547: END IF;
548: IF ( p_primary_contract_doc_flag NOT IN ('Y','N') AND p_primary_contract_doc_flag IS NOT NULL) THEN
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute PRIMARY_CONTRACT_DOC_FLAG is invalid');
551: END IF;
552: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'PRIMARY_CONTRACT_DOC_FLAG');
553: l_return_status := G_RET_STS_ERROR;

Line 550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute PRIMARY_CONTRACT_DOC_FLAG is invalid');

546: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1700: - attribute PRIMARY_CONTRACT_DOC_FLAG ');
547: END IF;
548: IF ( p_primary_contract_doc_flag NOT IN ('Y','N') AND p_primary_contract_doc_flag IS NOT NULL) THEN
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute PRIMARY_CONTRACT_DOC_FLAG is invalid');
551: END IF;
552: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'PRIMARY_CONTRACT_DOC_FLAG');
553: l_return_status := G_RET_STS_ERROR;
554: END IF;

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

553: l_return_status := G_RET_STS_ERROR;
554: END IF;
555:
556: IF ( p_mergeable_doc_flag NOT IN ('Y','N') AND p_mergeable_doc_flag IS NOT NULL) THEN
557: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
558: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute mergeable_doc_flag is invalid');
559: END IF;
560: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'mergeable_doc_flag');
561: l_return_status := G_RET_STS_ERROR;

Line 558: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute mergeable_doc_flag is invalid');

554: END IF;
555:
556: IF ( p_mergeable_doc_flag NOT IN ('Y','N') AND p_mergeable_doc_flag IS NOT NULL) THEN
557: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
558: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: - attribute mergeable_doc_flag is invalid');
559: END IF;
560: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'mergeable_doc_flag');
561: l_return_status := G_RET_STS_ERROR;
562: END IF;

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

563:
564: END IF;
565:
566: IF p_validation_level > G_LOOKUP_CODE_VALID_LEVEL THEN
567: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
568: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1900: lookup codes validation');
569: END IF;
570:
571: END IF;

Line 568: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1900: lookup codes validation');

564: END IF;
565:
566: IF p_validation_level > G_LOOKUP_CODE_VALID_LEVEL THEN
567: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
568: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1900: lookup codes validation');
569: END IF;
570:
571: END IF;
572:

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

570:
571: END IF;
572:
573: IF p_validation_level > G_FOREIGN_KEY_VALID_LEVEL THEN
574: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
575: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2100: foreigh keys validation ');
576: END IF;
577:
578: END IF;

Line 575: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2100: foreigh keys validation ');

571: END IF;
572:
573: IF p_validation_level > G_FOREIGN_KEY_VALID_LEVEL THEN
574: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
575: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2100: foreigh keys validation ');
576: END IF;
577:
578: END IF;
579:

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

577:
578: END IF;
579:
580:
581: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2400: Leaving Validate_Attributes ');
583: END IF;
584:
585: RETURN l_return_status;

Line 582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2400: Leaving Validate_Attributes ');

578: END IF;
579:
580:
581: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2400: Leaving Validate_Attributes ');
583: END IF;
584:
585: RETURN l_return_status;
586:

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

585: RETURN l_return_status;
586:
587: EXCEPTION
588: WHEN OTHERS THEN
589: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
590: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2500: Leaving Validate_Attributes because of EXCEPTION: '||sqlerrm);
591: END IF;
592: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
593: p_msg_name => G_UNEXPECTED_ERROR,

Line 590: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2500: Leaving Validate_Attributes because of EXCEPTION: '||sqlerrm);

586:
587: EXCEPTION
588: WHEN OTHERS THEN
589: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
590: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2500: Leaving Validate_Attributes because of EXCEPTION: '||sqlerrm);
591: END IF;
592: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
593: p_msg_name => G_UNEXPECTED_ERROR,
594: p_token1 => G_SQLCODE_TOKEN,

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

635: l_api_name CONSTANT VARCHAR2(30) := 'validate_record';
636: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
637: BEGIN
638:
639: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2600: Entered Validate_Record');
641: END IF;
642:
643: --- Validate all non-missing attributes (Item Level Validation)

Line 640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2600: Entered Validate_Record');

636: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
637: BEGIN
638:
639: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2600: Entered Validate_Record');
641: END IF;
642:
643: --- Validate all non-missing attributes (Item Level Validation)
644: l_return_status := Validate_Attributes(

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

663: p_primary_contract_doc_flag => p_primary_contract_doc_flag,
664: p_mergeable_doc_flag => p_mergeable_doc_flag
665: );
666: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
667: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
668: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2700: Leaving Validate_Record because of UNEXP_ERROR in Validate_Attributes: '||sqlerrm);
669: END IF;
670: RETURN G_RET_STS_UNEXP_ERROR;
671: END IF;

Line 668: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2700: Leaving Validate_Record because of UNEXP_ERROR in Validate_Attributes: '||sqlerrm);

664: p_mergeable_doc_flag => p_mergeable_doc_flag
665: );
666: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
667: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
668: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2700: Leaving Validate_Record because of UNEXP_ERROR in Validate_Attributes: '||sqlerrm);
669: END IF;
670: RETURN G_RET_STS_UNEXP_ERROR;
671: END IF;
672:

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

671: END IF;
672:
673: --- Record Level Validation
674: IF p_validation_level > G_RECORD_VALID_LEVEL THEN
675: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
676: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2800: Entered Record Level Validations');
677: END IF;
678:
679: END IF;

Line 676: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2800: Entered Record Level Validations');

672:
673: --- Record Level Validation
674: IF p_validation_level > G_RECORD_VALID_LEVEL THEN
675: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
676: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2800: Entered Record Level Validations');
677: END IF;
678:
679: END IF;
680:

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

677: END IF;
678:
679: END IF;
680:
681: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2900: Leaving Validate_Record : '||sqlerrm);
683: END IF;
684: RETURN l_return_status ;
685:

Line 682: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2900: Leaving Validate_Record : '||sqlerrm);

678:
679: END IF;
680:
681: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2900: Leaving Validate_Record : '||sqlerrm);
683: END IF;
684: RETURN l_return_status ;
685:
686: EXCEPTION

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

685:
686: EXCEPTION
687: WHEN OTHERS THEN
688:
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,'3000: Leaving Validate_Record because of EXCEPTION: '||sqlerrm);
691: END IF;
692:
693: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 690: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3000: Leaving Validate_Record because of EXCEPTION: '||sqlerrm);

686: EXCEPTION
687: WHEN OTHERS THEN
688:
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,'3000: Leaving Validate_Record because of EXCEPTION: '||sqlerrm);
691: END IF;
692:
693: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
694: p_msg_name => G_UNEXPECTED_ERROR,

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

755: l_primary_contract_doc_flag OKC_CONTRACT_DOCS.PRIMARY_CONTRACT_DOC_FLAG%TYPE;
756: l_mergeable_doc_flag OKC_CONTRACT_DOCS.MERGEABLE_DOC_FLAG%TYPE;
757: BEGIN
758:
759: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
760: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3100: Entered validate_row');
761: END IF;
762:
763: -- Setting attributes

Line 760: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3100: Entered validate_row');

756: l_mergeable_doc_flag OKC_CONTRACT_DOCS.MERGEABLE_DOC_FLAG%TYPE;
757: BEGIN
758:
759: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
760: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3100: Entered validate_row');
761: END IF;
762:
763: -- Setting attributes
764: x_return_status := Set_Attributes(

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

826: p_primary_contract_doc_flag => l_primary_contract_doc_flag,
827: p_mergeable_doc_flag => l_mergeable_doc_flag
828: );
829:
830: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
831: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3200: Leaving validate_row');
832: END IF;
833:
834: EXCEPTION

Line 831: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3200: Leaving validate_row');

827: p_mergeable_doc_flag => l_mergeable_doc_flag
828: );
829:
830: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
831: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3200: Leaving validate_row');
832: END IF;
833:
834: EXCEPTION
835: WHEN FND_API.G_EXC_ERROR THEN

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

832: END IF;
833:
834: EXCEPTION
835: WHEN FND_API.G_EXC_ERROR THEN
836: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
837: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception');
838: END IF;
839: x_return_status := G_RET_STS_ERROR;
840:

Line 837: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception');

833:
834: EXCEPTION
835: WHEN FND_API.G_EXC_ERROR THEN
836: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
837: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception');
838: END IF;
839: x_return_status := G_RET_STS_ERROR;
840:
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

838: END IF;
839: x_return_status := G_RET_STS_ERROR;
840:
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
842: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
843: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
844: END IF;
845: x_return_status := G_RET_STS_UNEXP_ERROR;
846:

Line 843: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

839: x_return_status := G_RET_STS_ERROR;
840:
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
842: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
843: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
844: END IF;
845: x_return_status := G_RET_STS_UNEXP_ERROR;
846:
847: WHEN OTHERS THEN

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

844: END IF;
845: x_return_status := G_RET_STS_UNEXP_ERROR;
846:
847: WHEN OTHERS THEN
848: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
849: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3500: Leaving Validate_Row because of EXCEPTION: '||sqlerrm);
850: END IF;
851: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
852: p_msg_name => G_UNEXPECTED_ERROR,

Line 849: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3500: Leaving Validate_Row because of EXCEPTION: '||sqlerrm);

845: x_return_status := G_RET_STS_UNEXP_ERROR;
846:
847: WHEN OTHERS THEN
848: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
849: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3500: Leaving Validate_Row because of EXCEPTION: '||sqlerrm);
850: END IF;
851: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
852: p_msg_name => G_UNEXPECTED_ERROR,
853: p_token1 => G_SQLCODE_TOKEN,

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

893: ) RETURN VARCHAR2 IS
894: l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
895: BEGIN
896:
897: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
898: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3600: Entered Insert_Row function');
899: END IF;
900:
901: INSERT INTO OKC_CONTRACT_DOCS(

Line 898: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3600: Entered Insert_Row function');

894: l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
895: BEGIN
896:
897: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
898: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3600: Entered Insert_Row function');
899: END IF;
900:
901: INSERT INTO OKC_CONTRACT_DOCS(
902: BUSINESS_DOCUMENT_TYPE,

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

948: p_last_update_date,
949: p_primary_contract_doc_flag,
950: p_mergeable_doc_flag );
951:
952: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3700: Leaving Insert_Row');
954: END IF;
955:
956: RETURN( G_RET_STS_SUCCESS );

Line 953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3700: Leaving Insert_Row');

949: p_primary_contract_doc_flag,
950: p_mergeable_doc_flag );
951:
952: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3700: Leaving Insert_Row');
954: END IF;
955:
956: RETURN( G_RET_STS_SUCCESS );
957:

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

957:
958: EXCEPTION
959: WHEN OTHERS THEN
960:
961: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
962: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3800: Leaving Insert_Row:OTHERS Exception');
963: END IF;
964:
965: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 962: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3800: Leaving Insert_Row:OTHERS Exception');

958: EXCEPTION
959: WHEN OTHERS THEN
960:
961: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
962: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'3800: Leaving Insert_Row:OTHERS Exception');
963: END IF;
964:
965: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
966: p_msg_name => G_UNEXPECTED_ERROR,

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

1017: BEGIN
1018:
1019: x_return_status := G_RET_STS_SUCCESS;
1020:
1021: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1022: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4200: Entered Insert_Row');
1023: END IF;
1024:
1025: x_business_document_type := p_business_document_type;

Line 1022: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4200: Entered Insert_Row');

1018:
1019: x_return_status := G_RET_STS_SUCCESS;
1020:
1021: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1022: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4200: Entered Insert_Row');
1023: END IF;
1024:
1025: x_business_document_type := p_business_document_type;
1026: x_business_document_id := p_business_document_id;

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

1065:
1066: --------------------------------------------
1067: -- Call the internal Insert_Row for each child record
1068: --------------------------------------------
1069: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1070: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4300: Call the internal Insert_Row for Base Table');
1071: END IF;
1072:
1073: x_return_status := Insert_Row(

Line 1070: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4300: Call the internal Insert_Row for Base Table');

1066: --------------------------------------------
1067: -- Call the internal Insert_Row for each child record
1068: --------------------------------------------
1069: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1070: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4300: Call the internal Insert_Row for Base Table');
1071: END IF;
1072:
1073: x_return_status := Insert_Row(
1074: p_business_document_type => x_business_document_type,

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

1103: END IF;
1104:
1105:
1106:
1107: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1108: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Leaving Insert_Row');
1109: END IF;
1110:
1111: EXCEPTION

Line 1108: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Leaving Insert_Row');

1104:
1105:
1106:
1107: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1108: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Leaving Insert_Row');
1109: END IF;
1110:
1111: EXCEPTION
1112: WHEN FND_API.G_EXC_ERROR THEN

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

1109: END IF;
1110:
1111: EXCEPTION
1112: WHEN FND_API.G_EXC_ERROR THEN
1113: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1114: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception');
1115: END IF;
1116: x_return_status := G_RET_STS_ERROR;
1117:

Line 1114: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception');

1110:
1111: EXCEPTION
1112: WHEN FND_API.G_EXC_ERROR THEN
1113: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1114: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception');
1115: END IF;
1116: x_return_status := G_RET_STS_ERROR;
1117:
1118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

1115: END IF;
1116: x_return_status := G_RET_STS_ERROR;
1117:
1118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1119: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1120: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1121: END IF;
1122: x_return_status := G_RET_STS_UNEXP_ERROR;
1123:

Line 1120: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1116: x_return_status := G_RET_STS_ERROR;
1117:
1118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1119: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1120: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1121: END IF;
1122: x_return_status := G_RET_STS_UNEXP_ERROR;
1123:
1124: WHEN OTHERS THEN

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

1121: END IF;
1122: x_return_status := G_RET_STS_UNEXP_ERROR;
1123:
1124: WHEN OTHERS THEN
1125: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1126: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm);
1127: END IF;
1128: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1129: p_msg_name => G_UNEXPECTED_ERROR,

Line 1126: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm);

1122: x_return_status := G_RET_STS_UNEXP_ERROR;
1123:
1124: WHEN OTHERS THEN
1125: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1126: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm);
1127: END IF;
1128: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1129: p_msg_name => G_UNEXPECTED_ERROR,
1130: p_token1 => G_SQLCODE_TOKEN,

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

1165: FROM OKC_CONTRACT_DOCS
1166: WHERE BUSINESS_DOCUMENT_TYPE = cp_business_document_type AND BUSINESS_DOCUMENT_ID = cp_business_document_id AND BUSINESS_DOCUMENT_VERSION = cp_business_document_version AND ATTACHED_DOCUMENT_ID = cp_attached_document_id;
1167: BEGIN
1168:
1169: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1170: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4900: Entered Lock_Row');
1171: END IF;
1172:
1173:

Line 1170: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4900: Entered Lock_Row');

1166: WHERE BUSINESS_DOCUMENT_TYPE = cp_business_document_type AND BUSINESS_DOCUMENT_ID = cp_business_document_id AND BUSINESS_DOCUMENT_VERSION = cp_business_document_version AND ATTACHED_DOCUMENT_ID = cp_attached_document_id;
1167: BEGIN
1168:
1169: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1170: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4900: Entered Lock_Row');
1171: END IF;
1172:
1173:
1174: BEGIN

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

1180:
1181: EXCEPTION
1182: WHEN E_Resource_Busy THEN
1183:
1184: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1185: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5000: Leaving Lock_Row:E_Resource_Busy Exception');
1186: END IF;
1187:
1188: IF (lock_csr%ISOPEN) THEN

Line 1185: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5000: Leaving Lock_Row:E_Resource_Busy Exception');

1181: EXCEPTION
1182: WHEN E_Resource_Busy THEN
1183:
1184: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1185: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5000: Leaving Lock_Row:E_Resource_Busy Exception');
1186: END IF;
1187:
1188: IF (lock_csr%ISOPEN) THEN
1189: CLOSE lock_csr;

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

1222: ELSE
1223: l_return_status := G_RET_STS_SUCCESS;
1224: END IF;
1225:
1226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1227: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5100: Leaving Lock_Row');
1228: END IF;
1229:
1230: RETURN( l_return_status );

Line 1227: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5100: Leaving Lock_Row');

1223: l_return_status := G_RET_STS_SUCCESS;
1224: END IF;
1225:
1226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1227: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5100: Leaving Lock_Row');
1228: END IF;
1229:
1230: RETURN( l_return_status );
1231:

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

1238: IF (lchk_csr%ISOPEN) THEN
1239: CLOSE lchk_csr;
1240: END IF;
1241:
1242: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1243: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'5200: Leaving Lock_Row because of EXCEPTION: '||sqlerrm);
1244: END IF;
1245:
1246: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1243: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'5200: Leaving Lock_Row because of EXCEPTION: '||sqlerrm);

1239: CLOSE lchk_csr;
1240: END IF;
1241:
1242: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1243: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'5200: Leaving Lock_Row because of EXCEPTION: '||sqlerrm);
1244: END IF;
1245:
1246: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1247: p_msg_name => G_UNEXPECTED_ERROR,

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

1267: ) IS
1268: l_api_name CONSTANT VARCHAR2(30) := 'lock_row';
1269: BEGIN
1270:
1271: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1272: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5700: Entered Lock_Row');
1273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5800: Locking Row for Base Table');
1274: END IF;
1275:

Line 1272: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5700: Entered Lock_Row');

1268: l_api_name CONSTANT VARCHAR2(30) := 'lock_row';
1269: BEGIN
1270:
1271: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1272: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5700: Entered Lock_Row');
1273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5800: Locking Row for Base Table');
1274: END IF;
1275:
1276: --------------------------------------------

Line 1273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5800: Locking Row for Base Table');

1269: BEGIN
1270:
1271: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1272: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5700: Entered Lock_Row');
1273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5800: Locking Row for Base Table');
1274: END IF;
1275:
1276: --------------------------------------------
1277: -- Call the LOCK_ROW for each _B child record

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

1290: END IF;
1291:
1292:
1293:
1294: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6000: Leaving Lock_Row');
1296: END IF;
1297:
1298: EXCEPTION

Line 1295: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6000: Leaving Lock_Row');

1291:
1292:
1293:
1294: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6000: Leaving Lock_Row');
1296: END IF;
1297:
1298: EXCEPTION
1299: WHEN FND_API.G_EXC_ERROR THEN

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

1296: END IF;
1297:
1298: EXCEPTION
1299: WHEN FND_API.G_EXC_ERROR THEN
1300: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1301: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception');
1302: END IF;
1303: x_return_status := G_RET_STS_ERROR;
1304:

Line 1301: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception');

1297:
1298: EXCEPTION
1299: WHEN FND_API.G_EXC_ERROR THEN
1300: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1301: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception');
1302: END IF;
1303: x_return_status := G_RET_STS_ERROR;
1304:
1305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

1302: END IF;
1303: x_return_status := G_RET_STS_ERROR;
1304:
1305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1306: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1307: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1308: END IF;
1309: x_return_status := G_RET_STS_UNEXP_ERROR;
1310:

Line 1307: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1303: x_return_status := G_RET_STS_ERROR;
1304:
1305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1306: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1307: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1308: END IF;
1309: x_return_status := G_RET_STS_UNEXP_ERROR;
1310:
1311: WHEN OTHERS THEN

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

1308: END IF;
1309: x_return_status := G_RET_STS_UNEXP_ERROR;
1310:
1311: WHEN OTHERS THEN
1312: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1313: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6300: Leaving Lock_Row because of EXCEPTION: '||sqlerrm);
1314: END IF;
1315: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1316: p_msg_name => G_UNEXPECTED_ERROR,

Line 1313: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6300: Leaving Lock_Row because of EXCEPTION: '||sqlerrm);

1309: x_return_status := G_RET_STS_UNEXP_ERROR;
1310:
1311: WHEN OTHERS THEN
1312: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1313: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6300: Leaving Lock_Row because of EXCEPTION: '||sqlerrm);
1314: END IF;
1315: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1316: p_msg_name => G_UNEXPECTED_ERROR,
1317: p_token1 => G_SQLCODE_TOKEN,

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

1354: ) RETURN VARCHAR2 IS
1355: l_api_name CONSTANT VARCHAR2(30) := 'update_row';
1356: BEGIN
1357:
1358: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6400: Entered Update_Row');
1360: END IF;
1361:
1362: UPDATE OKC_CONTRACT_DOCS

Line 1359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6400: Entered Update_Row');

1355: l_api_name CONSTANT VARCHAR2(30) := 'update_row';
1356: BEGIN
1357:
1358: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6400: Entered Update_Row');
1360: END IF;
1361:
1362: UPDATE OKC_CONTRACT_DOCS
1363: SET EXTERNAL_VISIBILITY_FLAG = p_external_visibility_flag,

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

1379: PRIMARY_CONTRACT_DOC_FLAG = p_primary_contract_doc_flag,
1380: MERGEABLE_DOC_FLAG = p_mergeable_doc_flag
1381: WHERE BUSINESS_DOCUMENT_TYPE = p_business_document_type AND BUSINESS_DOCUMENT_ID = p_business_document_id AND BUSINESS_DOCUMENT_VERSION = p_business_document_version AND ATTACHED_DOCUMENT_ID = p_attached_document_id;
1382:
1383: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1384: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6500: Leaving Update_Row');
1385: END IF;
1386:
1387: RETURN G_RET_STS_SUCCESS ;

Line 1384: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6500: Leaving Update_Row');

1380: MERGEABLE_DOC_FLAG = p_mergeable_doc_flag
1381: WHERE BUSINESS_DOCUMENT_TYPE = p_business_document_type AND BUSINESS_DOCUMENT_ID = p_business_document_id AND BUSINESS_DOCUMENT_VERSION = p_business_document_version AND ATTACHED_DOCUMENT_ID = p_attached_document_id;
1382:
1383: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1384: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'6500: Leaving Update_Row');
1385: END IF;
1386:
1387: RETURN G_RET_STS_SUCCESS ;
1388:

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

1388:
1389: EXCEPTION
1390: WHEN OTHERS THEN
1391:
1392: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1393: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
1394: END IF;
1395:
1396: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1393: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm);

1389: EXCEPTION
1390: WHEN OTHERS THEN
1391:
1392: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1393: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
1394: END IF;
1395:
1396: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1397: p_msg_name => G_UNEXPECTED_ERROR,

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

1457: l_mergeable_doc_flag OKC_CONTRACT_DOCS.MERGEABLE_DOC_FLAG%TYPE;
1458:
1459: BEGIN
1460:
1461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Entered Update_Row');
1463: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Locking _B row');
1464: END IF;
1465:

Line 1462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Entered Update_Row');

1458:
1459: BEGIN
1460:
1461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Entered Update_Row');
1463: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Locking _B row');
1464: END IF;
1465:
1466: x_return_status := Lock_row(

Line 1463: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Locking _B row');

1459: BEGIN
1460:
1461: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1462: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7000: Entered Update_Row');
1463: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7100: Locking _B row');
1464: END IF;
1465:
1466: x_return_status := Lock_row(
1467: p_business_document_type => p_business_document_type,

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

1476: RAISE FND_API.G_EXC_ERROR;
1477: END IF;
1478:
1479:
1480: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1481: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7300: Setting attributes');
1482: END IF;
1483:
1484: l_object_version_number := p_object_version_number;

Line 1481: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7300: Setting attributes');

1477: END IF;
1478:
1479:
1480: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1481: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7300: Setting attributes');
1482: END IF;
1483:
1484: l_object_version_number := p_object_version_number;
1485: x_return_status := Set_Attributes(

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

1523: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;
1526:
1527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7400: Record Validation');
1529: END IF;
1530:
1531: --- Validate all non-missing attributes

Line 1528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7400: Record Validation');

1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;
1526:
1527: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7400: Record Validation');
1529: END IF;
1530:
1531: --- Validate all non-missing attributes
1532: x_return_status := Validate_Record(

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

1556: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1557: RAISE FND_API.G_EXC_ERROR;
1558: END IF;
1559:
1560: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7500: Filling WHO columns');
1562: END IF;
1563:
1564: -- Filling who columns

Line 1561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7500: Filling WHO columns');

1557: RAISE FND_API.G_EXC_ERROR;
1558: END IF;
1559:
1560: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7500: Filling WHO columns');
1562: END IF;
1563:
1564: -- Filling who columns
1565: l_last_update_date := SYSDATE;

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

1574:
1575: --------------------------------------------
1576: -- Call the Update_Row for each child record
1577: --------------------------------------------
1578: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1579: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7600: Updating Row');
1580: END IF;
1581:
1582: x_return_status := Update_Row(

Line 1579: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7600: Updating Row');

1575: --------------------------------------------
1576: -- Call the Update_Row for each child record
1577: --------------------------------------------
1578: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1579: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7600: Updating Row');
1580: END IF;
1581:
1582: x_return_status := Update_Row(
1583: p_business_document_type => p_business_document_type,

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

1609: RAISE FND_API.G_EXC_ERROR;
1610: END IF;
1611:
1612:
1613: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7800: Leaving Update_Row');
1615: END IF;
1616:
1617: EXCEPTION

Line 1614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7800: Leaving Update_Row');

1610: END IF;
1611:
1612:
1613: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'7800: Leaving Update_Row');
1615: END IF;
1616:
1617: EXCEPTION
1618: WHEN FND_API.G_EXC_ERROR THEN

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

1615: END IF;
1616:
1617: EXCEPTION
1618: WHEN FND_API.G_EXC_ERROR THEN
1619: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1620: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception');
1621: END IF;
1622: x_return_status := G_RET_STS_ERROR;
1623:

Line 1620: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception');

1616:
1617: EXCEPTION
1618: WHEN FND_API.G_EXC_ERROR THEN
1619: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1620: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception');
1621: END IF;
1622: x_return_status := G_RET_STS_ERROR;
1623:
1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

1621: END IF;
1622: x_return_status := G_RET_STS_ERROR;
1623:
1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1625: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1627: END IF;
1628: x_return_status := G_RET_STS_UNEXP_ERROR;
1629:

Line 1626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1622: x_return_status := G_RET_STS_ERROR;
1623:
1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1625: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1626: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1627: END IF;
1628: x_return_status := G_RET_STS_UNEXP_ERROR;
1629:
1630: WHEN OTHERS THEN

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

1627: END IF;
1628: x_return_status := G_RET_STS_UNEXP_ERROR;
1629:
1630: WHEN OTHERS THEN
1631: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1632: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
1633: END IF;
1634: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1635: p_msg_name => G_UNEXPECTED_ERROR,

Line 1632: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm);

1628: x_return_status := G_RET_STS_UNEXP_ERROR;
1629:
1630: WHEN OTHERS THEN
1631: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1632: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
1633: END IF;
1634: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1635: p_msg_name => G_UNEXPECTED_ERROR,
1636: p_token1 => G_SQLCODE_TOKEN,

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

1655: ) RETURN VARCHAR2 IS
1656: l_api_name CONSTANT VARCHAR2(30) := 'delete_row';
1657: BEGIN
1658:
1659: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1660: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8200: Entered Delete_Row');
1661: END IF;
1662:
1663: DELETE FROM OKC_CONTRACT_DOCS

Line 1660: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8200: Entered Delete_Row');

1656: l_api_name CONSTANT VARCHAR2(30) := 'delete_row';
1657: BEGIN
1658:
1659: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1660: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8200: Entered Delete_Row');
1661: END IF;
1662:
1663: DELETE FROM OKC_CONTRACT_DOCS
1664: WHERE BUSINESS_DOCUMENT_TYPE = p_BUSINESS_DOCUMENT_TYPE AND BUSINESS_DOCUMENT_ID = p_BUSINESS_DOCUMENT_ID AND BUSINESS_DOCUMENT_VERSION = p_BUSINESS_DOCUMENT_VERSION AND ATTACHED_DOCUMENT_ID = p_ATTACHED_DOCUMENT_ID;

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

1662:
1663: DELETE FROM OKC_CONTRACT_DOCS
1664: WHERE BUSINESS_DOCUMENT_TYPE = p_BUSINESS_DOCUMENT_TYPE AND BUSINESS_DOCUMENT_ID = p_BUSINESS_DOCUMENT_ID AND BUSINESS_DOCUMENT_VERSION = p_BUSINESS_DOCUMENT_VERSION AND ATTACHED_DOCUMENT_ID = p_ATTACHED_DOCUMENT_ID;
1665:
1666: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8300: Leaving Delete_Row');
1668: END IF;
1669:
1670: RETURN( G_RET_STS_SUCCESS );

Line 1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8300: Leaving Delete_Row');

1663: DELETE FROM OKC_CONTRACT_DOCS
1664: WHERE BUSINESS_DOCUMENT_TYPE = p_BUSINESS_DOCUMENT_TYPE AND BUSINESS_DOCUMENT_ID = p_BUSINESS_DOCUMENT_ID AND BUSINESS_DOCUMENT_VERSION = p_BUSINESS_DOCUMENT_VERSION AND ATTACHED_DOCUMENT_ID = p_ATTACHED_DOCUMENT_ID;
1665:
1666: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8300: Leaving Delete_Row');
1668: END IF;
1669:
1670: RETURN( G_RET_STS_SUCCESS );
1671:

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

1671:
1672: EXCEPTION
1673: WHEN OTHERS THEN
1674:
1675: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1676: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
1677: END IF;
1678:
1679: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1676: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);

1672: EXCEPTION
1673: WHEN OTHERS THEN
1674:
1675: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1676: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
1677: END IF;
1678:
1679: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1680: p_msg_name => G_UNEXPECTED_ERROR,

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

1700: ) IS
1701: l_api_name CONSTANT VARCHAR2(30) := 'B_Delete_Row';
1702: BEGIN
1703:
1704: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8800: Entered Delete_Row');
1706: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8900: Locking _B row');
1707: END IF;
1708:

Line 1705: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8800: Entered Delete_Row');

1701: l_api_name CONSTANT VARCHAR2(30) := 'B_Delete_Row';
1702: BEGIN
1703:
1704: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8800: Entered Delete_Row');
1706: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8900: Locking _B row');
1707: END IF;
1708:
1709: x_return_status := Lock_row(

Line 1706: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8900: Locking _B row');

1702: BEGIN
1703:
1704: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1705: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8800: Entered Delete_Row');
1706: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'8900: Locking _B row');
1707: END IF;
1708:
1709: x_return_status := Lock_row(
1710: p_business_document_type => p_business_document_type,

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

1719: RAISE FND_API.G_EXC_ERROR;
1720: END IF;
1721:
1722:
1723: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9100: Removing _B row');
1725: END IF;
1726: x_return_status := Delete_Row( p_business_document_type => p_business_document_type,p_business_document_id => p_business_document_id,p_business_document_version => p_business_document_version,p_attached_document_id => p_attached_document_id );
1727: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN

Line 1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9100: Removing _B row');

1720: END IF;
1721:
1722:
1723: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9100: Removing _B row');
1725: END IF;
1726: x_return_status := Delete_Row( p_business_document_type => p_business_document_type,p_business_document_id => p_business_document_id,p_business_document_version => p_business_document_version,p_attached_document_id => p_attached_document_id );
1727: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

1730: RAISE FND_API.G_EXC_ERROR;
1731: END IF;
1732:
1733:
1734: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1735: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9300: Leaving Delete_Row');
1736: END IF;
1737:
1738: EXCEPTION

Line 1735: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9300: Leaving Delete_Row');

1731: END IF;
1732:
1733:
1734: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1735: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'9300: Leaving Delete_Row');
1736: END IF;
1737:
1738: EXCEPTION
1739: WHEN FND_API.G_EXC_ERROR THEN

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

1736: END IF;
1737:
1738: EXCEPTION
1739: WHEN FND_API.G_EXC_ERROR THEN
1740: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1741: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception');
1742: END IF;
1743: x_return_status := G_RET_STS_ERROR;
1744:

Line 1741: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception');

1737:
1738: EXCEPTION
1739: WHEN FND_API.G_EXC_ERROR THEN
1740: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1741: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception');
1742: END IF;
1743: x_return_status := G_RET_STS_ERROR;
1744:
1745: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

1742: END IF;
1743: x_return_status := G_RET_STS_ERROR;
1744:
1745: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1746: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1747: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1748: END IF;
1749: x_return_status := G_RET_STS_UNEXP_ERROR;
1750:

Line 1747: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1743: x_return_status := G_RET_STS_ERROR;
1744:
1745: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1746: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1747: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1748: END IF;
1749: x_return_status := G_RET_STS_UNEXP_ERROR;
1750:
1751: WHEN OTHERS THEN

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

1748: END IF;
1749: x_return_status := G_RET_STS_UNEXP_ERROR;
1750:
1751: WHEN OTHERS THEN
1752: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1753: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
1754: END IF;
1755: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1756: p_msg_name => G_UNEXPECTED_ERROR,

Line 1753: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);

1749: x_return_status := G_RET_STS_UNEXP_ERROR;
1750:
1751: WHEN OTHERS THEN
1752: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1753: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
1754: END IF;
1755: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1756: p_msg_name => G_UNEXPECTED_ERROR,
1757: p_token1 => G_SQLCODE_TOKEN,

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

1791: ) RETURN VARCHAR2 IS
1792: l_api_name VARCHAR2(35);
1793: BEGIN
1794:
1795: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1796: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1797: 'Entered OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1798: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1799: 'p_business_document_type is: ' || p_business_document_type);

Line 1796: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1792: l_api_name VARCHAR2(35);
1793: BEGIN
1794:
1795: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1796: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1797: 'Entered OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1798: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1799: 'p_business_document_type is: ' || p_business_document_type);
1800: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 1798: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1794:
1795: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1796: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1797: 'Entered OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1798: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1799: 'p_business_document_type is: ' || p_business_document_type);
1800: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1801: 'p_business_document_id is: ' || to_char(p_business_document_id));
1802: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 1800: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1796: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1797: 'Entered OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1798: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1799: 'p_business_document_type is: ' || p_business_document_type);
1800: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1801: 'p_business_document_id is: ' || to_char(p_business_document_id));
1802: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1803: 'p_business_document_version is: ' || to_char(p_business_document_version));
1804: END IF;

Line 1802: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1798: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1799: 'p_business_document_type is: ' || p_business_document_type);
1800: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1801: 'p_business_document_id is: ' || to_char(p_business_document_id));
1802: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1803: 'p_business_document_version is: ' || to_char(p_business_document_version));
1804: END IF;
1805:
1806: l_api_name := 'reset_bus_doc_ver_to_current';

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

1829: AND business_document_id = p_business_document_id
1830: AND business_document_type = p_business_document_type;
1831:
1832:
1833: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1834: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1835: 'Leaving OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1836: END IF;
1837:

Line 1834: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1830: AND business_document_type = p_business_document_type;
1831:
1832:
1833: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1834: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1835: 'Leaving OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1836: END IF;
1837:
1838: RETURN(G_RET_STS_SUCCESS);

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

1839:
1840: EXCEPTION
1841: WHEN OTHERS THEN
1842:
1843: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1844: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'Leaving OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current because of EXCEPTION: '||sqlerrm);
1845: END IF;
1846:
1847: ROLLBACK TO reset_bus_doc_ver_to_current;

Line 1844: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'Leaving OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current because of EXCEPTION: '||sqlerrm);

1840: EXCEPTION
1841: WHEN OTHERS THEN
1842:
1843: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1844: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'Leaving OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current because of EXCEPTION: '||sqlerrm);
1845: END IF;
1846:
1847: ROLLBACK TO reset_bus_doc_ver_to_current;
1848: