57: --p_dff_name: the name of the descriptive flexfield, e.g., 'DELIVERABLES_FLEX'
58: ----------------------------------------------------------------------------
59:
60: FUNCTION Dff_Displayed ( p_api_version IN NUMBER,
61: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
62: p_application_short_name VARCHAR2,
63: p_dff_name VARCHAR2,
64: x_return_status OUT NOCOPY VARCHAR2,
65: x_msg_data OUT NOCOPY VARCHAR2,
3322: p_chr_id => p_chr_id,
3323: x_doc_id => x_doc_id,
3324: x_doc_type => x_doc_type
3325: );
3326: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3328: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3329: RAISE FND_API.G_EXC_ERROR ;
3330: END IF;
3323: x_doc_id => x_doc_id,
3324: x_doc_type => x_doc_type
3325: );
3326: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3328: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3329: RAISE FND_API.G_EXC_ERROR ;
3330: END IF;
3331:
3324: x_doc_type => x_doc_type
3325: );
3326: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3328: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3329: RAISE FND_API.G_EXC_ERROR ;
3330: END IF;
3331:
3332: OPEN get_doc_usage_crs;
3325: );
3326: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3328: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3329: RAISE FND_API.G_EXC_ERROR ;
3330: END IF;
3331:
3332: OPEN get_doc_usage_crs;
3333: FETCH get_doc_usage_crs INTO l_tmpl_id;
3415: p_api_version => 1,
3416: x_return_status => x_return_status,
3417: x_msg_data => l_msg_data,
3418: x_msg_count => l_msg_count,
3419: p_commit => FND_API.G_TRUE,
3420:
3421: p_template_id => l_tmpl_id,
3422: p_target_doc_type => x_doc_type,
3423: p_target_doc_id => x_doc_id,
3423: p_target_doc_id => x_doc_id,
3424: p_article_effective_date => l_start_date,
3425: p_validation_string => NULL
3426: );
3427: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3429: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3430: RAISE FND_API.G_EXC_ERROR ;
3431: END IF;
3424: p_article_effective_date => l_start_date,
3425: p_validation_string => NULL
3426: );
3427: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3429: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3430: RAISE FND_API.G_EXC_ERROR ;
3431: END IF;
3432: END IF;
3425: p_validation_string => NULL
3426: );
3427: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3429: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3430: RAISE FND_API.G_EXC_ERROR ;
3431: END IF;
3432: END IF;
3433: END IF;
3426: );
3427: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3429: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3430: RAISE FND_API.G_EXC_ERROR ;
3431: END IF;
3432: END IF;
3433: END IF;
3434:
3437: END IF;
3438:
3439: EXCEPTION
3440:
3441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3442: IF (l_debug = 'Y') THEN
3443: okc_debug.log('500: Leaving Prepare_Contract_Terms because of FND_API.G_EXC_UNEXPECTED_ERROR ', 2);
3444: END IF;
3445:
3439: EXCEPTION
3440:
3441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3442: IF (l_debug = 'Y') THEN
3443: okc_debug.log('500: Leaving Prepare_Contract_Terms because of FND_API.G_EXC_UNEXPECTED_ERROR ', 2);
3444: END IF;
3445:
3446: IF get_doc_usage_crs%ISOPEN THEN
3447: CLOSE get_doc_usage_crs;
3454: IF start_date_crs%ISOPEN THEN
3455: CLOSE start_date_crs;
3456: END IF;
3457:
3458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3459:
3460: WHEN FND_API.G_EXC_ERROR THEN
3461: IF (l_debug = 'Y') THEN
3462: okc_debug.log('500: Leaving Prepare_Contract_Terms because of FND_API.G_EXC_ERROR. ', 2);
3456: END IF;
3457:
3458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3459:
3460: WHEN FND_API.G_EXC_ERROR THEN
3461: IF (l_debug = 'Y') THEN
3462: okc_debug.log('500: Leaving Prepare_Contract_Terms because of FND_API.G_EXC_ERROR. ', 2);
3463: END IF;
3464:
3458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3459:
3460: WHEN FND_API.G_EXC_ERROR THEN
3461: IF (l_debug = 'Y') THEN
3462: okc_debug.log('500: Leaving Prepare_Contract_Terms because of FND_API.G_EXC_ERROR. ', 2);
3463: END IF;
3464:
3465: IF get_doc_usage_crs%ISOPEN THEN
3466: CLOSE get_doc_usage_crs;
3473: IF start_date_crs%ISOPEN THEN
3474: CLOSE start_date_crs;
3475: END IF;
3476:
3477: x_return_status := FND_API.G_RET_STS_ERROR ;
3478:
3479: WHEN OTHERS THEN
3480: IF (l_debug = 'Y') THEN
3481: okc_debug.log('500: Leaving Prepare_Contract_Terms because of EXCEPTION: '||sqlerrm, 2);
3492: IF start_date_crs%ISOPEN THEN
3493: CLOSE start_date_crs;
3494: END IF;
3495:
3496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3497: END Prepare_Contract_Terms;
3498:
3499:
3500: