[Home] [Help]
824: x_msg_count OUT NOCOPY NUMBER,
825: x_msg_data OUT NOCOPY VARCHAR2,
826:
827: p_article_version_id IN NUMBER,
828: p_standard_yn IN VARCHAR2 := 'Y',
829: p_only_version IN VARCHAR2 := 'T',
830: p_adoption_type IN VARCHAR2 := NULL,
831: p_object_version_number IN NUMBER := NULL
832: ) IS
848: FETCH cur_org_csr INTO G_CURRENT_ORG_ID;
849: CLOSE cur_org_csr;
850: */
851:
852: -- Standard Start of API savepoint
853: SAVEPOINT g_delete_article_version_GRP;
854: -- Standard call to check for call compatibility.
855: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
850: */
851:
852: -- Standard Start of API savepoint
853: SAVEPOINT g_delete_article_version_GRP;
854: -- Standard call to check for call compatibility.
855: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
857: END IF;
858: -- Initialize message list if p_init_msg_list is set to TRUE.
900: IF (G_CURRENT_ORG_ID = G_GLOBAL_ORG_ID OR
901: G_CURRENT_ORG_ID = -99 OR
902: G_GLOBAL_ORG_ID = -99 ) THEN
903: NULL;
904: ELSIF p_standard_yn = 'Y' AND
905: p_adoption_type <> 'LOCAL' Then
906: OKC_ADOPTIONS_GRP.DELETE_LOCAL_ADOPTION_DETAILS(
907: p_api_version => p_api_version,
908: p_init_msg_list => p_init_msg_list,
921: RAISE FND_API.G_EXC_ERROR ;
922: END IF;
923: --------------------------------------------
924:
925: -- Standard check of p_commit
926: IF FND_API.To_Boolean( p_commit ) THEN
927: COMMIT WORK;
928: END IF;
929: -- Standard call to get message count and if count is 1, get message info.
925: -- Standard check of p_commit
926: IF FND_API.To_Boolean( p_commit ) THEN
927: COMMIT WORK;
928: END IF;
929: -- Standard call to get message count and if count is 1, get message info.
930: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
931:
932: IF (l_debug = 'Y') THEN
933: okc_debug.log('2300: Leaving delete_article_version', 2);
980: p_article_id IN NUMBER,
981: p_article_title IN VARCHAR2,
982: p_org_id IN NUMBER,
983: p_article_number IN VARCHAR2,
984: p_standard_yn IN VARCHAR2,
985: p_article_intent IN VARCHAR2,
986: p_article_language IN VARCHAR2,
987: p_article_type IN VARCHAR2,
988: p_orig_system_reference_code IN VARCHAR2,
1043: IF (l_debug = 'Y') THEN
1044: okc_debug.log('100: Entered validate_article', 2);
1045: END IF;
1046:
1047: -- Standard Start of API savepoint
1048: SAVEPOINT g_validate_article_GRP;
1049: -- Standard call to check for call compatibility.
1050: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1051: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1045: END IF;
1046:
1047: -- Standard Start of API savepoint
1048: SAVEPOINT g_validate_article_GRP;
1049: -- Standard call to check for call compatibility.
1050: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1051: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1052: END IF;
1053: -- Initialize message list if p_init_msg_list is set to TRUE.
1067: p_article_id => p_article_id,
1068: p_article_title => p_article_title,
1069: p_org_id => p_org_id,
1070: p_article_number => p_article_number,
1071: p_standard_yn => p_standard_yn,
1072: p_article_intent => p_article_intent,
1073: p_article_language => p_article_language,
1074: p_article_type => p_article_type,
1075: p_orig_system_reference_code => p_orig_system_reference_code,
1155: END IF;
1156: --------------------------------------------
1157: x_return_status := l_return_status;
1158:
1159: -- Standard call to get message count and if count is 1, get message info.
1160: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1161:
1162: IF (l_debug = 'Y') THEN
1163: okc_debug.log('200: Leaving validate_article', 2);
1210: x_msg_count OUT NOCOPY NUMBER,
1211: x_msg_data OUT NOCOPY VARCHAR2,
1212: p_article_title IN VARCHAR2,
1213: p_article_number IN VARCHAR2,
1214: p_standard_yn IN VARCHAR2,
1215: p_article_intent IN VARCHAR2,
1216: p_article_language IN VARCHAR2,
1217: p_article_type IN VARCHAR2,
1218: p_orig_system_reference_code IN VARCHAR2,
1286: IF (l_debug = 'Y') THEN
1287: okc_debug.log('600: Entered create_article', 2);
1288: END IF;
1289:
1290: -- Standard Start of API savepoint
1291: SAVEPOINT g_create_article_GRP;
1292: -- Standard call to check for call compatibility.
1293: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1294: --dbms_output.put_line('600: Entered create_article NOT Compatible');
1288: END IF;
1289:
1290: -- Standard Start of API savepoint
1291: SAVEPOINT g_create_article_GRP;
1292: -- Standard call to check for call compatibility.
1293: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1294: --dbms_output.put_line('600: Entered create_article NOT Compatible');
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: END IF;
1318:
1319: -- Fix for bug# 5158268. The variable l_article_number should be initialized with p_article_number
1320: l_article_number := p_article_number;
1321: -- Generate article_number for articles based on autonumbering is required or not
1322: IF p_standard_yn = 'Y' Then
1323: G_doc_category_code := substr(Fnd_Profile.Value('OKC_ARTICLE_DOC_SEQ_CATEGORY'),1,30) ;
1324: G_profile_doc_seq := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
1325: GET_ARTICLE_SEQ_NUMBER
1326: (p_article_number => p_article_number,
1344: x_return_status => x_return_status,
1345: p_article_title => p_article_title,
1346: p_org_id => G_CURRENT_ORG_ID,
1347: p_article_number => l_article_number,
1348: p_standard_yn => p_standard_yn,
1349: p_article_intent => p_article_intent,
1350: p_article_language => p_article_language,
1351: p_article_type => p_article_type,
1352: p_orig_system_reference_code => p_orig_system_reference_code,
1374: p_validation_level => p_validation_level,
1375: p_commit => p_commit,
1376: p_global_article_version_id => p_global_article_version_id,
1377: p_article_intent => p_article_intent,
1378: p_standard_yn => p_standard_yn,
1379:
1380: x_return_status => x_return_status,
1381: x_msg_count => x_msg_count,
1382: x_msg_data => x_msg_data,
1439: RAISE FND_API.G_EXC_ERROR ;
1440: END IF;
1441: --------------------------------------------
1442:
1443: -- Standard check of p_commit
1444: IF FND_API.To_Boolean( p_commit ) THEN
1445: COMMIT WORK;
1446: END IF;
1447: -- Standard call to get message count and if count is 1, get message info.
1443: -- Standard check of p_commit
1444: IF FND_API.To_Boolean( p_commit ) THEN
1445: COMMIT WORK;
1446: END IF;
1447: -- Standard call to get message count and if count is 1, get message info.
1448: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1449:
1450: IF (l_debug = 'Y') THEN
1451: okc_debug.log('700: Leaving create_article', 2);
1503: IF (l_debug = 'Y') THEN
1504: okc_debug.log('1100: Entered lock_article', 2);
1505: END IF;
1506:
1507: -- Standard Start of API savepoint
1508: SAVEPOINT g_lock_article_GRP;
1509: -- Standard call to check for call compatibility.
1510: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1505: END IF;
1506:
1507: -- Standard Start of API savepoint
1508: SAVEPOINT g_lock_article_GRP;
1509: -- Standard call to check for call compatibility.
1510: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1512: END IF;
1513: -- Initialize message list if p_init_msg_list is set to TRUE.
1552: RAISE FND_API.G_EXC_ERROR ;
1553: END IF;
1554: --------------------------------------------
1555:
1556: -- Standard call to get message count and if count is 1, get message info.
1557: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1558:
1559: IF (l_debug = 'Y') THEN
1560: okc_debug.log('1200: Leaving lock_article', 2);
1605:
1606: p_article_id IN NUMBER,
1607: p_article_title IN VARCHAR2,
1608: p_article_number IN VARCHAR2,
1609: p_standard_yn IN VARCHAR2,
1610: p_article_intent IN VARCHAR2,
1611: p_article_language IN VARCHAR2,
1612: p_article_type IN VARCHAR2,
1613: p_orig_system_reference_code IN VARCHAR2,
1674: okc_debug.log('1600: Entered update_article', 2);
1675: okc_debug.log('1700: Locking row', 2);
1676: END IF;
1677:
1678: -- Standard Start of API savepoint
1679: SAVEPOINT g_update_article_GRP;
1680: -- Standard call to check for call compatibility.
1681: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1676: END IF;
1677:
1678: -- Standard Start of API savepoint
1679: SAVEPOINT g_update_article_GRP;
1680: -- Standard call to check for call compatibility.
1681: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1683: END IF;
1684: -- Initialize message list if p_init_msg_list is set to TRUE.
1711: p_article_id => p_article_id,
1712: p_article_title => p_article_title,
1713: p_org_id => G_CURRENT_ORG_ID,
1714: p_article_number => p_article_number,
1715: p_standard_yn => p_standard_yn,
1716: p_article_intent => p_article_intent,
1717: p_article_language => p_article_language,
1718: p_article_type => p_article_type,
1719: p_orig_system_reference_code => p_orig_system_reference_code,
1798: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1799: RAISE FND_API.G_EXC_ERROR ;
1800: END IF;
1801: --------------------------------------------
1802: -- Standard check of p_commit
1803: IF FND_API.To_Boolean( p_commit ) THEN
1804: COMMIT WORK;
1805: END IF;
1806: -- Standard call to get message count and if count is 1, get message info.
1802: -- Standard check of p_commit
1803: IF FND_API.To_Boolean( p_commit ) THEN
1804: COMMIT WORK;
1805: END IF;
1806: -- Standard call to get message count and if count is 1, get message info.
1807: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1808:
1809: IF (l_debug = 'Y') THEN
1810: okc_debug.log('1800: Leaving update_article', 2);
1859: ) IS
1860: l_api_version CONSTANT NUMBER := 1;
1861: l_api_name CONSTANT VARCHAR2(30) := 'g_delete_article';
1862: l_status VARCHAR2(30) ;
1863: l_standard_yn VARCHAR2(1) ;
1864: l_only_version VARCHAR2(1) := 'T';
1865: l_adoption_type OKC_ARTICLE_VERSIONS.ADOPTION_TYPE%TYPE;
1866: l_dummy1 VARCHAR2(1) := '?';
1867:
1866: l_dummy1 VARCHAR2(1) := '?';
1867:
1868: Cursor l_status_csr (cp_article_id IN NUMBER,
1869: cp_article_version_id IN NUMBER) IS
1870: SELECT article_status,standard_yn, adoption_type
1871: FROM okc_article_versions av,okc_articles_all aa
1872: WHERE aa.article_id = av.article_id
1873: AND av.article_id = cp_article_id
1874: AND av.article_version_id = cp_article_version_id;
1891: IF (l_debug = 'Y') THEN
1892: okc_debug.log('2200: Entered delete_article', 2);
1893: END IF;
1894:
1895: -- Standard Start of API savepoint
1896: SAVEPOINT g_delete_article_GRP;
1897: -- Standard call to check for call compatibility.
1898: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1899: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1893: END IF;
1894:
1895: -- Standard Start of API savepoint
1896: SAVEPOINT g_delete_article_GRP;
1897: -- Standard call to check for call compatibility.
1898: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1899: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1900: END IF;
1901: -- Initialize message list if p_init_msg_list is set to TRUE.
1906: x_return_status := FND_API.G_RET_STS_SUCCESS;
1907:
1908:
1909: OPEN l_status_csr (p_article_id, p_article_version_id);
1910: FETCH l_status_csr INTO l_status,l_standard_yn, l_adoption_type;
1911: CLOSE l_status_csr;
1912:
1913: IF l_standard_yn = 'Y' THEN
1914: IF l_status NOT IN ( 'DRAFT','REJECTED') THEN
1909: OPEN l_status_csr (p_article_id, p_article_version_id);
1910: FETCH l_status_csr INTO l_status,l_standard_yn, l_adoption_type;
1911: CLOSE l_status_csr;
1912:
1913: IF l_standard_yn = 'Y' THEN
1914: IF l_status NOT IN ( 'DRAFT','REJECTED') THEN
1915: IF (l_debug = 'Y') THEN
1916: Okc_Debug.Log('2200: - Article Status is not Draft or Rejected,It cannot be deleted',2);
1917: END IF;
1966: END IF;
1967: END IF;
1968: END IF;
1969: END IF;
1970: ELSE -- in the case of non standard articles
1971: OKC_ARTICLES_ALL_PVT.Delete_Row(
1972: x_return_status => x_return_status,
1973: p_article_id => p_article_id,
1974: p_object_version_number => NULL
1982: Delete_Article_Version(
1983: p_api_version => p_api_version ,
1984: p_init_msg_list => p_init_msg_list,
1985: p_commit => p_commit,
1986: p_standard_yn => l_standard_yn,
1987: p_adoption_type => l_adoption_type,
1988: x_return_status => x_return_status,
1989: x_msg_count => x_msg_count,
1990: x_msg_data => x_msg_data,
1999: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2000: RAISE FND_API.G_EXC_ERROR ;
2001: END IF;
2002: --------------------------------------------
2003: -- Standard check of p_commit
2004: IF FND_API.To_Boolean( p_commit ) THEN
2005: COMMIT WORK;
2006: END IF;
2007: -- Standard call to get message count and if count is 1, get message info.
2003: -- Standard check of p_commit
2004: IF FND_API.To_Boolean( p_commit ) THEN
2005: COMMIT WORK;
2006: END IF;
2007: -- Standard call to get message count and if count is 1, get message info.
2008: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2009:
2010: IF (l_debug = 'Y') THEN
2011: okc_debug.log('2300: Leaving delete_article', 2);
2139: IF (l_debug = 'Y') THEN
2140: okc_debug.log('100: Entered validate_article_version', 2);
2141: END IF;
2142:
2143: -- Standard Start of API savepoint
2144: SAVEPOINT g_validate_article_version_GRP;
2145: -- Standard call to check for call compatibility.
2146: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2141: END IF;
2142:
2143: -- Standard Start of API savepoint
2144: SAVEPOINT g_validate_article_version_GRP;
2145: -- Standard call to check for call compatibility.
2146: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2148: END IF;
2149: -- Initialize message list if p_init_msg_list is set to TRUE.
2220: RAISE FND_API.G_EXC_ERROR ;
2221: END IF;
2222: --------------------------------------------
2223:
2224: -- Standard call to get message count and if count is 1, get message info.
2225: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2226:
2227: IF (l_debug = 'Y') THEN
2228: okc_debug.log('200: Leaving validate_article_version', 2);
2267: p_init_msg_list IN VARCHAR2 ,
2268: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2269: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2270: p_article_intent IN VARCHAR2 := NULL,
2271: p_standard_yn IN VARCHAR2 := 'Y',
2272: p_global_article_version_id IN NUMBER := NULL,
2273:
2274: x_return_status OUT NOCOPY VARCHAR2,
2275: x_msg_count OUT NOCOPY NUMBER,
2358: IF (l_debug = 'Y') THEN
2359: okc_debug.log('600: Entered create_article_version', 2);
2360: END IF;
2361:
2362: -- Standard Start of API savepoint
2363: SAVEPOINT g_create_article_version_GRP;
2364: -- Standard call to check for call compatibility.
2365: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2360: END IF;
2361:
2362: -- Standard Start of API savepoint
2363: SAVEPOINT g_create_article_version_GRP;
2364: -- Standard call to check for call compatibility.
2365: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2367: END IF;
2368: -- MOAC
2514: END IF;
2515:
2516: -- Adoption row should not be created if the global/local org is -99 and
2517: -- if the global org = local org
2518: -- Adoption rows are not applicable for NON Standard Articles
2519: -- Global Article Version Id will be passed for "Localize" cases
2520: -- In the case of new version creation, global article version id will not be
2521: -- passed. The system will evaluate the creation of adoption based on the
2522: -- adoption row created from an earlier version.
2531: IF (G_CURRENT_ORG_ID = G_GLOBAL_ORG_ID OR
2532: G_CURRENT_ORG_ID = -99 OR
2533: G_GLOBAL_ORG_ID = -99 ) THEN
2534: NULL;
2535: ELSIF p_standard_yn = 'Y' AND
2536: nvl(l_earlier_adoption_type,'X') <> 'LOCAL' THEN
2537: OKC_ADOPTIONS_GRP.CREATE_LOCAL_ADOPTION_DETAILS
2538: (
2539: p_api_version => p_api_version,
2606: ---------------------------------------------
2607:
2608: --end CLM Changes.
2609:
2610: -- Standard check of p_commit
2611: IF FND_API.To_Boolean( p_commit ) THEN
2612: COMMIT WORK;
2613: END IF;
2614: -- Standard call to get message count and if count is 1, get message info.
2610: -- Standard check of p_commit
2611: IF FND_API.To_Boolean( p_commit ) THEN
2612: COMMIT WORK;
2613: END IF;
2614: -- Standard call to get message count and if count is 1, get message info.
2615: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2616:
2617: IF (l_debug = 'Y') THEN
2618: okc_debug.log('700: Leaving create_article_version', 2);
2669: IF (l_debug = 'Y') THEN
2670: okc_debug.log('1100: Entered lock_article_version', 2);
2671: END IF;
2672:
2673: -- Standard Start of API savepoint
2674: SAVEPOINT g_lock_article_version_GRP;
2675: -- Standard call to check for call compatibility.
2676: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2671: END IF;
2672:
2673: -- Standard Start of API savepoint
2674: SAVEPOINT g_lock_article_version_GRP;
2675: -- Standard call to check for call compatibility.
2676: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2678: END IF;
2679: -- Initialize message list if p_init_msg_list is set to TRUE.
2698: RAISE FND_API.G_EXC_ERROR ;
2699: END IF;
2700: --------------------------------------------
2701:
2702: -- Standard call to get message count and if count is 1, get message info.
2703: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2704:
2705: IF (l_debug = 'Y') THEN
2706: okc_debug.log('1200: Leaving lock_article_version', 2);
2949: okc_debug.log('1600: Entered update_article_version', 2);
2950: okc_debug.log('1700: Locking row', 2);
2951: END IF;
2952:
2953: -- Standard Start of API savepoint
2954: SAVEPOINT g_update_article_version_GRP;
2955: -- Standard call to check for call compatibility.
2956: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2951: END IF;
2952:
2953: -- Standard Start of API savepoint
2954: SAVEPOINT g_update_article_version_GRP;
2955: -- Standard call to check for call compatibility.
2956: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2958: END IF;
2959: -- Initialize message list if p_init_msg_list is set to TRUE.
2972:
2973: l_article_status := p_article_status;
2974: l_article_text := p_article_text;
2975:
2976: -- nvl added to cater to non-standard articles. Std Articles will never be of NULL status
2977:
2978: IF p_article_text is NOT NULL AND
2979: nvl(l_article_status,'DRAFT') IN ('DRAFT','REJECTED') THEN
2980: DBMS_LOB.CREATETEMPORARY(l_clob,true);
3105: SET cz_transfer_status_flag = 'R'
3106: WHERE ARTICLE_ID = l_article_id;
3107: END IF;
3108:
3109: -- Standard check of p_commit
3110: IF FND_API.To_Boolean( p_commit ) THEN
3111: COMMIT WORK;
3112: END IF;
3113: -- Standard call to get message count and if count is 1, get message info.
3109: -- Standard check of p_commit
3110: IF FND_API.To_Boolean( p_commit ) THEN
3111: COMMIT WORK;
3112: END IF;
3113: -- Standard call to get message count and if count is 1, get message info.
3114: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
3115:
3116: IF (l_debug = 'Y') THEN
3117: okc_debug.log('1800: Leaving update_article_version', 2);
3160:
3161: p_article_version_id IN NUMBER,
3162: p_new_article_title IN VARCHAR2 := NULL,
3163: p_new_article_number IN VARCHAR2 := NULL,
3164: p_create_standard_yn IN VARCHAR2 := 'N',
3165: p_copy_relationship_yn IN VARCHAR2 := 'N',
3166: p_copy_folder_assoc_yn IN VARCHAR2 := 'N',
3167:
3168: x_article_version_id OUT NOCOPY NUMBER,
3178: l_article_number OKC_ARTICLES_ALL.ARTICLE_NUMBER%TYPE ;
3179: l_old_article_number OKC_ARTICLES_ALL.ARTICLE_NUMBER%TYPE ;
3180: l_article_title OKC_ARTICLES_ALL.ARTICLE_TITLE%TYPE ;
3181: l_object_version_number OKC_ARTICLES_ALL.OBJECT_VERSION_NUMBER%TYPE ;
3182: l_standard_yn OKC_ARTICLES_ALL.STANDARD_YN%TYPE;
3183: l_article_intent OKC_ARTICLES_ALL.ARTICLE_INTENT%TYPE;
3184: l_article_language OKC_ARTICLES_ALL.ARTICLE_LANGUAGE%TYPE;
3185: l_article_type OKC_ARTICLES_ALL.ARTICLE_TYPE%TYPE;
3186: l_doc_sequence_type VARCHAR2(1);
3273: lv_article_text_in_word OKC_ARTICLE_VERSIONS.ARTICLE_TEXT_IN_WORD%TYPE;
3274: --CLM
3275: lv_variable_code OKC_ARTICLE_VERSIONS.VARIABLE_CODE%TYPE;
3276:
3277: l_p_standard_yn VARCHAR2(1);
3278: l_p_article_id NUMBER;
3279: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
3280: l_api_version CONSTANT NUMBER := 1;
3281: l_api_name CONSTANT VARCHAR2(30) := 'g_copy_article';
3291: l_relationship_type_tbl l_relationship_type_list ;
3292: i NUMBER := 0;
3293:
3294: CURSOR l_article_csr (cp_article_version_id IN NUMBER) is
3295: SELECT aa.standard_yn,av.article_id
3296: FROM OKC_ARTICLES_ALL aa,OKC_ARTICLE_VERSIONS av
3297: WHERE aa.ARTICLE_ID = av.ARTICLE_ID
3298: AND av.ARTICLE_VERSION_ID = cp_article_version_id;
3299:
3313: Okc_Debug.Log('2700: Entered Copy_Articles ', 2);
3314: END IF;
3315: --dbms_output.put_line('2700: Entered Copy_Articles ');
3316:
3317: -- Standard Start of API savepoint
3318: SAVEPOINT g_copy_article_GRP;
3319: -- Standard call to check for call compatibility.
3320: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3315: --dbms_output.put_line('2700: Entered Copy_Articles ');
3316:
3317: -- Standard Start of API savepoint
3318: SAVEPOINT g_copy_article_GRP;
3319: -- Standard call to check for call compatibility.
3320: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3322: END IF;
3323: -- MOAC
3338: -- Insert into ... select would have been faster but we need to validate as well
3339:
3340:
3341: OPEN l_article_csr(p_article_version_id);
3342: FETCH l_article_csr INTO l_p_standard_yn, l_p_article_id;
3343: CLOSE l_article_csr;
3344:
3345: IF l_p_article_id IS NOT NULL THEN
3346: -- Get Current Database values for Article
3350: p_article_id => l_p_article_id,
3351: x_article_title => l_article_title,
3352: x_org_id => l_org_id,
3353: x_article_number => l_old_article_number,
3354: x_standard_yn => l_standard_yn,
3355: x_article_intent => l_article_intent,
3356: x_article_language => l_article_language,
3357: x_article_type => l_article_type,
3358: x_orig_system_reference_code => l_orig_system_reference_code,
3465: END IF;
3466: --------------------------------------------
3467: END IF;
3468: -- Copying Articles
3469: -- Setting the Attributes depending upon whether it is standard or non-standard article
3470: IF l_p_standard_yn = 'Y' THEN
3471:
3472: -- Bug#3680325 i.e. start date is greatest of sysdate, start date and end date is always null
3473: -- Bug#3826123 i.e. start date should be truncated
3466: --------------------------------------------
3467: END IF;
3468: -- Copying Articles
3469: -- Setting the Attributes depending upon whether it is standard or non-standard article
3470: IF l_p_standard_yn = 'Y' THEN
3471:
3472: -- Bug#3680325 i.e. start date is greatest of sysdate, start date and end date is always null
3473: -- Bug#3826123 i.e. start date should be truncated
3474:
3505: END IF;
3506: IF G_CURRENT_ORG_ID <> G_GLOBAL_ORG_ID THEN
3507: lv_global_yn := 'N';
3508: END IF;
3509: ELSE --IF l_p_standard_yn = 'Y' THEN
3510: lv_start_date := NULL;
3511: lv_article_status := NULL;
3512: l_cz_transfer_status_flag := NULL;
3513: lv_end_date := NULL;
3527: x_return_status => x_return_status,
3528: p_article_title => nvl(p_new_article_title,l_article_title),
3529: p_org_id => G_CURRENT_ORG_ID,
3530: p_article_number => l_article_number,
3531: p_standard_yn => p_create_standard_yn,
3532: p_article_intent => l_article_intent,
3533: p_article_language => l_article_language,
3534: p_article_type => l_article_type,
3535: p_orig_system_reference_code => l_orig_system_reference_code,
3819: RAISE FND_API.G_EXC_ERROR ;
3820: END IF;
3821: ----------------------------------------------
3822:
3823: -- Standard check of p_commit
3824: IF FND_API.To_Boolean( p_commit ) THEN
3825: COMMIT WORK;
3826: END IF;
3827: -- Standard call to get message count and if count is 1, get message info.
3823: -- Standard check of p_commit
3824: IF FND_API.To_Boolean( p_commit ) THEN
3825: COMMIT WORK;
3826: END IF;
3827: -- Standard call to get message count and if count is 1, get message info.
3828: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
3829:
3830: IF (l_debug = 'Y') THEN
3831: okc_debug.log('2800: Leaving copy_article', 2);
4304: IF (l_debug = 'Y') THEN
4305: okc_debug.log('600: Entered insert_row', 2);
4306: END IF;
4307:
4308: -- Standard Start of API savepoint
4309: SAVEPOINT g_insert_row_GRP;
4310: -- Standard call to check for call compatibility.
4311: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4306: END IF;
4307:
4308: -- Standard Start of API savepoint
4309: SAVEPOINT g_insert_row_GRP;
4310: -- Standard call to check for call compatibility.
4311: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4313: END IF;
4314: -- Initialize message list if p_init_msg_list is set to TRUE.
4384: END IF;
4385: --------------------------------------------
4386: END IF;
4387:
4388: -- Standard check of p_commit
4389: IF FND_API.To_Boolean( p_commit ) THEN
4390: COMMIT WORK;
4391: END IF;
4392: -- Standard call to get message count and if count is 1, get message info.
4388: -- Standard check of p_commit
4389: IF FND_API.To_Boolean( p_commit ) THEN
4390: COMMIT WORK;
4391: END IF;
4392: -- Standard call to get message count and if count is 1, get message info.
4393: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
4394:
4395: IF (l_debug = 'Y') THEN
4396: okc_debug.log('700: Leaving insert_row', 2);
4473: IF (l_debug = 'Y') THEN
4474: okc_debug.log('100: Entered create_adoption', 2);
4475: END IF;
4476:
4477: -- Standard Start of API savepoint
4478: -- Initialize API return status to success
4479: x_return_status := FND_API.G_RET_STS_SUCCESS;
4480: --dbms_output.put_line('Global org is: '|| l_global_org_id);
4481: OPEN l_relationship_csr (p_source_global_article_id, p_target_global_article_id);
4553: IF (l_debug = 'Y') THEN
4554: okc_debug.log('2200: Entered delete_row', 2);
4555: END IF;
4556:
4557: -- Standard Start of API savepoint
4558: SAVEPOINT g_delete_row_GRP;
4559: -- Standard call to check for call compatibility.
4560: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4555: END IF;
4556:
4557: -- Standard Start of API savepoint
4558: SAVEPOINT g_delete_row_GRP;
4559: -- Standard call to check for call compatibility.
4560: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4562: END IF;
4563: -- Initialize message list if p_init_msg_list is set to TRUE.
4623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4624: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
4625: RAISE FND_API.G_EXC_ERROR ;
4626: END IF;
4627: -- Standard check of p_commit
4628: IF FND_API.To_Boolean( p_commit ) THEN
4629: COMMIT WORK;
4630: END IF;
4631: -- Standard call to get message count and if count is 1, get message info.
4627: -- Standard check of p_commit
4628: IF FND_API.To_Boolean( p_commit ) THEN
4629: COMMIT WORK;
4630: END IF;
4631: -- Standard call to get message count and if count is 1, get message info.
4632: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
4633:
4634: IF (l_debug = 'Y') THEN
4635: okc_debug.log('2300: Leaving delete_row', 2);