[Home] [Help]
334: p_control_rec.comments := p_comments;
335:
336: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
337: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
338: '430: calling okc_contract_pub.update_contract_header');
339: END IF;
340:
341: --bug 5710909
342: -- Added the following code to place a lock on contract header.
339: END IF;
340:
341: --bug 5710909
342: -- Added the following code to place a lock on contract header.
343: okc_contract_pub.lock_contract_header(
344: p_api_version => 1.0,
345: p_init_msg_list => 'T',
346: x_return_status => x_return_status,
347: x_msg_count => g_msg_count,
355: end if;
356:
357: --end of 5710909
358:
359: OKC_CONTRACT_PUB.update_contract_header(
360: p_api_version => g_api_version,
361: P_INIT_MSG_LIST => 'F',
362: x_return_status => x_return_status,
363: x_msg_count => g_msg_count,
1452: close c_lines;
1453:
1454: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1455: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1456: '650: Calling OKC_CONTRACT_PUB.update_contract_line ');
1457: END IF;
1458:
1459: --bug 5710909
1460: -- Added the following code to place a lock on contract lines.
1474: -- end of bug 5710909
1475:
1476: -- Call the API to update the contract line with
1477: -- new status.
1478: OKC_CONTRACT_PUB.update_contract_line(
1479: p_api_version => 1,
1480: P_INIT_MSG_LIST => 'T',
1481: p_restricted_update => 'T',
1482: x_return_status => x_return_status,
1492: End if;
1493:
1494: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1496: '660: Succesfully completed OKC_CONTRACT_PUB.update_contract_line ');
1497: END IF;
1498:
1499: -- Calling the API to Clean OR Relink the Contract Line if it was
1500: -- a renewed contract.