1553: v_trans_id VARCHAR2(100);
1554: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
1555: BEGIN
1556: IF (l_debug = 'Y') THEN
1557: okc_debug.Set_Indentation('OKC_CVM_PVT');
1558: okc_debug.log('1000: Entered update_contract_version, g_defer_min_vers_upd='||g_defer_min_vers_upd, 2);
1559: END IF;
1560:
1561: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1554: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
1555: BEGIN
1556: IF (l_debug = 'Y') THEN
1557: okc_debug.Set_Indentation('OKC_CVM_PVT');
1558: okc_debug.log('1000: Entered update_contract_version, g_defer_min_vers_upd='||g_defer_min_vers_upd, 2);
1559: END IF;
1560:
1561: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1562:
1692: IS
1693: BEGIN
1694:
1695: IF (l_debug = 'Y') THEN
1696: okc_debug.Set_Indentation('OKC_CVM_PVT');
1697: okc_debug.log('8000: Entered defer_minor_version_update, p_defer='||p_defer||' ,g_defer_min_vers_upd='||g_defer_min_vers_upd, 2);
1698: END IF;
1699:
1700: IF (FND_API.G_TRUE = p_defer) THEN
1693: BEGIN
1694:
1695: IF (l_debug = 'Y') THEN
1696: okc_debug.Set_Indentation('OKC_CVM_PVT');
1697: okc_debug.log('8000: Entered defer_minor_version_update, p_defer='||p_defer||' ,g_defer_min_vers_upd='||g_defer_min_vers_upd, 2);
1698: END IF;
1699:
1700: IF (FND_API.G_TRUE = p_defer) THEN
1701: g_defer_min_vers_upd := FND_API.G_TRUE;
1703: g_defer_min_vers_upd := FND_API.G_FALSE;
1704: END IF;
1705:
1706: IF (l_debug = 'Y') THEN
1707: okc_debug.log('8100: Leaving defer_minor_version_update, ,g_defer_min_vers_upd='||g_defer_min_vers_upd, 2);
1708: okc_debug.Reset_Indentation;
1709: END IF;
1710:
1711: END defer_minor_version_update;
1704: END IF;
1705:
1706: IF (l_debug = 'Y') THEN
1707: okc_debug.log('8100: Leaving defer_minor_version_update, ,g_defer_min_vers_upd='||g_defer_min_vers_upd, 2);
1708: okc_debug.Reset_Indentation;
1709: END IF;
1710:
1711: END defer_minor_version_update;
1712:
1720: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
1721: BEGIN
1722:
1723: IF (l_debug = 'Y') THEN
1724: okc_debug.Set_Indentation('OKC_CVM_PVT');
1725: okc_debug.log('9000: Entered Update_Minor_Version(p_chr_id), p_chr_id='||p_chr_id, 2);
1726: END IF;
1727:
1728: -- initialize return status
1721: BEGIN
1722:
1723: IF (l_debug = 'Y') THEN
1724: okc_debug.Set_Indentation('OKC_CVM_PVT');
1725: okc_debug.log('9000: Entered Update_Minor_Version(p_chr_id), p_chr_id='||p_chr_id, 2);
1726: END IF;
1727:
1728: -- initialize return status
1729: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1740: p_cvmv_rec => l_cvmv_rec,
1741: x_cvmv_rec => x_out_rec);
1742:
1743: IF (l_debug = 'Y') THEN
1744: okc_debug.log('9100: Leaving Update_Minor_Version(p_chr_id), x_return_status='||x_return_status, 2);
1745: okc_debug.Reset_Indentation;
1746: END IF;
1747:
1748: return (x_return_status);
1741: x_cvmv_rec => x_out_rec);
1742:
1743: IF (l_debug = 'Y') THEN
1744: okc_debug.log('9100: Leaving Update_Minor_Version(p_chr_id), x_return_status='||x_return_status, 2);
1745: okc_debug.Reset_Indentation;
1746: END IF;
1747:
1748: return (x_return_status);
1749: EXCEPTION
1759: p_token2 => g_sqlerrm_token,
1760: p_token2_value => sqlerrm);
1761:
1762: IF (l_debug = 'Y') THEN
1763: okc_debug.log('9200: Leaving Update_Minor_Version(p_chr_id):other_error: x_return_status='||x_return_status, 2);
1764: okc_debug.Reset_Indentation;
1765: END IF;
1766:
1767: return (x_return_status);
1760: p_token2_value => sqlerrm);
1761:
1762: IF (l_debug = 'Y') THEN
1763: okc_debug.log('9200: Leaving Update_Minor_Version(p_chr_id):other_error: x_return_status='||x_return_status, 2);
1764: okc_debug.Reset_Indentation;
1765: END IF;
1766:
1767: return (x_return_status);
1768: