6: It will be redesigned to do the following
7: 1. Improve performance
8: 2. Reduce dependence on OKC code
9: 3. Incorporate functional design changes for R12
10: 4. Comply with current Oracle Applications coding and logging standards
11: 5. Ease of maintenance
12:
13: Parameters
14: p_chr_id : id of the contract being renewed, mandatory
61: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id||' ,p_new_contract_number='||p_new_contract_number||' ,p_new_contract_modifier='||p_new_contract_modifier||
62: ' ,p_new_start_date='||p_new_start_date||' ,p_new_end_date='||p_new_end_date||' ,p_new_duration='||p_new_duration||' ,p_new_uom_code='||p_new_uom_code||' ,p_renewal_called_from_ui='||p_renewal_called_from_ui);
63: END IF;
64:
65: --standard api initilization and checks
66: SAVEPOINT renew_contract_PUB;
67: IF NOT FND_API.compatible_api_call (l_api_version, p_api_version, l_api_name, G_PKG_NAME)THEN
68: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
69: END IF;
94: ELSIF x_return_status = FND_API.g_ret_sts_error THEN
95: RAISE FND_API.g_exc_error;
96: END IF;
97:
98: --standard check of p_commit
99: IF FND_API.to_boolean( p_commit ) THEN
100: COMMIT;
101: END IF;
102:
174: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
175: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id||' ,p_date='||p_date||' ,p_validation_level='||p_validation_level);
176: END IF;
177:
178: --standard api initilization and checks
179: IF NOT FND_API.compatible_api_call (l_api_version, p_api_version, l_api_name, G_PKG_NAME)THEN
180: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
181: END IF;
182: IF FND_API.to_boolean(p_init_msg_list ) THEN
349: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
350: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id||' ,p_commit='||p_commit);
351: END IF;
352:
353: --standard api initilization and checks
354: SAVEPOINT update_invoice_text_PUB;
355: IF NOT FND_API.compatible_api_call (l_api_version, p_api_version, l_api_name, G_PKG_NAME)THEN
356: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
357: END IF;
374: ELSIF x_return_status = FND_API.g_ret_sts_error THEN
375: RAISE FND_API.g_exc_error;
376: END IF;
377:
378: --standard check of p_commit
379: IF FND_API.to_boolean( p_commit ) THEN
380: COMMIT;
381: END IF;
382:
454: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
455: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id||' ,p_hdesk_user_id='||p_hdesk_user_id);
456: END IF;
457:
458: --standard api initilization and checks
459: IF NOT FND_API.compatible_api_call (l_api_version, p_api_version, l_api_name, G_PKG_NAME)THEN
460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
461: END IF;
462: IF FND_API.to_boolean(p_init_msg_list ) THEN