[Home] [Help]
813: x_msg_count OUT NOCOPY NUMBER,
814: x_msg_data OUT NOCOPY VARCHAR2,
815:
816: p_article_version_id IN NUMBER,
817: p_standard_yn IN VARCHAR2 := 'Y',
818: p_only_version IN VARCHAR2 := 'T',
819: p_adoption_type IN VARCHAR2 := NULL,
820: p_object_version_number IN NUMBER := NULL
821: ) IS
837: FETCH cur_org_csr INTO G_CURRENT_ORG_ID;
838: CLOSE cur_org_csr;
839: */
840:
841: -- Standard Start of API savepoint
842: SAVEPOINT g_delete_article_version_GRP;
843: -- Standard call to check for call compatibility.
844: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
845: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
839: */
840:
841: -- Standard Start of API savepoint
842: SAVEPOINT g_delete_article_version_GRP;
843: -- Standard call to check for call compatibility.
844: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
845: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
846: END IF;
847: -- Initialize message list if p_init_msg_list is set to TRUE.
889: IF (G_CURRENT_ORG_ID = G_GLOBAL_ORG_ID OR
890: G_CURRENT_ORG_ID = -99 OR
891: G_GLOBAL_ORG_ID = -99 ) THEN
892: NULL;
893: ELSIF p_standard_yn = 'Y' AND
894: p_adoption_type <> 'LOCAL' Then
895: OKC_ADOPTIONS_GRP.DELETE_LOCAL_ADOPTION_DETAILS(
896: p_api_version => p_api_version,
897: p_init_msg_list => p_init_msg_list,
910: RAISE FND_API.G_EXC_ERROR ;
911: END IF;
912: --------------------------------------------
913:
914: -- Standard check of p_commit
915: IF FND_API.To_Boolean( p_commit ) THEN
916: COMMIT WORK;
917: END IF;
918: -- Standard call to get message count and if count is 1, get message info.
914: -- Standard check of p_commit
915: IF FND_API.To_Boolean( p_commit ) THEN
916: COMMIT WORK;
917: END IF;
918: -- Standard call to get message count and if count is 1, get message info.
919: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
920:
921: IF (l_debug = 'Y') THEN
922: okc_debug.log('2300: Leaving delete_article_version', 2);
969: p_article_id IN NUMBER,
970: p_article_title IN VARCHAR2,
971: p_org_id IN NUMBER,
972: p_article_number IN VARCHAR2,
973: p_standard_yn IN VARCHAR2,
974: p_article_intent IN VARCHAR2,
975: p_article_language IN VARCHAR2,
976: p_article_type IN VARCHAR2,
977: p_orig_system_reference_code IN VARCHAR2,
1027: IF (l_debug = 'Y') THEN
1028: okc_debug.log('100: Entered validate_article', 2);
1029: END IF;
1030:
1031: -- Standard Start of API savepoint
1032: SAVEPOINT g_validate_article_GRP;
1033: -- Standard call to check for call compatibility.
1034: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1035: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1029: END IF;
1030:
1031: -- Standard Start of API savepoint
1032: SAVEPOINT g_validate_article_GRP;
1033: -- Standard call to check for call compatibility.
1034: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1035: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1036: END IF;
1037: -- Initialize message list if p_init_msg_list is set to TRUE.
1051: p_article_id => p_article_id,
1052: p_article_title => p_article_title,
1053: p_org_id => p_org_id,
1054: p_article_number => p_article_number,
1055: p_standard_yn => p_standard_yn,
1056: p_article_intent => p_article_intent,
1057: p_article_language => p_article_language,
1058: p_article_type => p_article_type,
1059: p_orig_system_reference_code => p_orig_system_reference_code,
1133: END IF;
1134: --------------------------------------------
1135: x_return_status := l_return_status;
1136:
1137: -- Standard call to get message count and if count is 1, get message info.
1138: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1139:
1140: IF (l_debug = 'Y') THEN
1141: okc_debug.log('200: Leaving validate_article', 2);
1188: x_msg_count OUT NOCOPY NUMBER,
1189: x_msg_data OUT NOCOPY VARCHAR2,
1190: p_article_title IN VARCHAR2,
1191: p_article_number IN VARCHAR2,
1192: p_standard_yn IN VARCHAR2,
1193: p_article_intent IN VARCHAR2,
1194: p_article_language IN VARCHAR2,
1195: p_article_type IN VARCHAR2,
1196: p_orig_system_reference_code IN VARCHAR2,
1259: IF (l_debug = 'Y') THEN
1260: okc_debug.log('600: Entered create_article', 2);
1261: END IF;
1262:
1263: -- Standard Start of API savepoint
1264: SAVEPOINT g_create_article_GRP;
1265: -- Standard call to check for call compatibility.
1266: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1267: --dbms_output.put_line('600: Entered create_article NOT Compatible');
1261: END IF;
1262:
1263: -- Standard Start of API savepoint
1264: SAVEPOINT g_create_article_GRP;
1265: -- Standard call to check for call compatibility.
1266: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1267: --dbms_output.put_line('600: Entered create_article NOT Compatible');
1268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1269: END IF;
1291:
1292: -- Fix for bug# 5158268. The variable l_article_number should be initialized with p_article_number
1293: l_article_number := p_article_number;
1294: -- Generate article_number for articles based on autonumbering is required or not
1295: IF p_standard_yn = 'Y' Then
1296: G_doc_category_code := substr(Fnd_Profile.Value('OKC_ARTICLE_DOC_SEQ_CATEGORY'),1,30) ;
1297: G_profile_doc_seq := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
1298: GET_ARTICLE_SEQ_NUMBER
1299: (p_article_number => p_article_number,
1317: x_return_status => x_return_status,
1318: p_article_title => p_article_title,
1319: p_org_id => G_CURRENT_ORG_ID,
1320: p_article_number => l_article_number,
1321: p_standard_yn => p_standard_yn,
1322: p_article_intent => p_article_intent,
1323: p_article_language => p_article_language,
1324: p_article_type => p_article_type,
1325: p_orig_system_reference_code => p_orig_system_reference_code,
1347: p_validation_level => p_validation_level,
1348: p_commit => p_commit,
1349: p_global_article_version_id => p_global_article_version_id,
1350: p_article_intent => p_article_intent,
1351: p_standard_yn => p_standard_yn,
1352:
1353: x_return_status => x_return_status,
1354: x_msg_count => x_msg_count,
1355: x_msg_data => x_msg_data,
1407: RAISE FND_API.G_EXC_ERROR ;
1408: END IF;
1409: --------------------------------------------
1410:
1411: -- Standard check of p_commit
1412: IF FND_API.To_Boolean( p_commit ) THEN
1413: COMMIT WORK;
1414: END IF;
1415: -- Standard call to get message count and if count is 1, get message info.
1411: -- Standard check of p_commit
1412: IF FND_API.To_Boolean( p_commit ) THEN
1413: COMMIT WORK;
1414: END IF;
1415: -- Standard call to get message count and if count is 1, get message info.
1416: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1417:
1418: IF (l_debug = 'Y') THEN
1419: okc_debug.log('700: Leaving create_article', 2);
1471: IF (l_debug = 'Y') THEN
1472: okc_debug.log('1100: Entered lock_article', 2);
1473: END IF;
1474:
1475: -- Standard Start of API savepoint
1476: SAVEPOINT g_lock_article_GRP;
1477: -- Standard call to check for call compatibility.
1478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1473: END IF;
1474:
1475: -- Standard Start of API savepoint
1476: SAVEPOINT g_lock_article_GRP;
1477: -- Standard call to check for call compatibility.
1478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1480: END IF;
1481: -- Initialize message list if p_init_msg_list is set to TRUE.
1520: RAISE FND_API.G_EXC_ERROR ;
1521: END IF;
1522: --------------------------------------------
1523:
1524: -- Standard call to get message count and if count is 1, get message info.
1525: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1526:
1527: IF (l_debug = 'Y') THEN
1528: okc_debug.log('1200: Leaving lock_article', 2);
1573:
1574: p_article_id IN NUMBER,
1575: p_article_title IN VARCHAR2,
1576: p_article_number IN VARCHAR2,
1577: p_standard_yn IN VARCHAR2,
1578: p_article_intent IN VARCHAR2,
1579: p_article_language IN VARCHAR2,
1580: p_article_type IN VARCHAR2,
1581: p_orig_system_reference_code IN VARCHAR2,
1637: okc_debug.log('1600: Entered update_article', 2);
1638: okc_debug.log('1700: Locking row', 2);
1639: END IF;
1640:
1641: -- Standard Start of API savepoint
1642: SAVEPOINT g_update_article_GRP;
1643: -- Standard call to check for call compatibility.
1644: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1639: END IF;
1640:
1641: -- Standard Start of API savepoint
1642: SAVEPOINT g_update_article_GRP;
1643: -- Standard call to check for call compatibility.
1644: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1646: END IF;
1647: -- Initialize message list if p_init_msg_list is set to TRUE.
1674: p_article_id => p_article_id,
1675: p_article_title => p_article_title,
1676: p_org_id => G_CURRENT_ORG_ID,
1677: p_article_number => p_article_number,
1678: p_standard_yn => p_standard_yn,
1679: p_article_intent => p_article_intent,
1680: p_article_language => p_article_language,
1681: p_article_type => p_article_type,
1682: p_orig_system_reference_code => p_orig_system_reference_code,
1756: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1757: RAISE FND_API.G_EXC_ERROR ;
1758: END IF;
1759: --------------------------------------------
1760: -- Standard check of p_commit
1761: IF FND_API.To_Boolean( p_commit ) THEN
1762: COMMIT WORK;
1763: END IF;
1764: -- Standard call to get message count and if count is 1, get message info.
1760: -- Standard check of p_commit
1761: IF FND_API.To_Boolean( p_commit ) THEN
1762: COMMIT WORK;
1763: END IF;
1764: -- Standard call to get message count and if count is 1, get message info.
1765: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1766:
1767: IF (l_debug = 'Y') THEN
1768: okc_debug.log('1800: Leaving update_article', 2);
1817: ) IS
1818: l_api_version CONSTANT NUMBER := 1;
1819: l_api_name CONSTANT VARCHAR2(30) := 'g_delete_article';
1820: l_status VARCHAR2(30) ;
1821: l_standard_yn VARCHAR2(1) ;
1822: l_only_version VARCHAR2(1) := 'T';
1823: l_adoption_type OKC_ARTICLE_VERSIONS.ADOPTION_TYPE%TYPE;
1824: l_dummy1 VARCHAR2(1) := '?';
1825:
1824: l_dummy1 VARCHAR2(1) := '?';
1825:
1826: Cursor l_status_csr (cp_article_id IN NUMBER,
1827: cp_article_version_id IN NUMBER) IS
1828: SELECT article_status,standard_yn, adoption_type
1829: FROM okc_article_versions av,okc_articles_all aa
1830: WHERE aa.article_id = av.article_id
1831: AND av.article_id = cp_article_id
1832: AND av.article_version_id = cp_article_version_id;
1849: IF (l_debug = 'Y') THEN
1850: okc_debug.log('2200: Entered delete_article', 2);
1851: END IF;
1852:
1853: -- Standard Start of API savepoint
1854: SAVEPOINT g_delete_article_GRP;
1855: -- Standard call to check for call compatibility.
1856: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1857: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1851: END IF;
1852:
1853: -- Standard Start of API savepoint
1854: SAVEPOINT g_delete_article_GRP;
1855: -- Standard call to check for call compatibility.
1856: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1857: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1858: END IF;
1859: -- Initialize message list if p_init_msg_list is set to TRUE.
1864: x_return_status := FND_API.G_RET_STS_SUCCESS;
1865:
1866:
1867: OPEN l_status_csr (p_article_id, p_article_version_id);
1868: FETCH l_status_csr INTO l_status,l_standard_yn, l_adoption_type;
1869: CLOSE l_status_csr;
1870:
1871: IF l_standard_yn = 'Y' THEN
1872: IF l_status NOT IN ( 'DRAFT','REJECTED') THEN
1867: OPEN l_status_csr (p_article_id, p_article_version_id);
1868: FETCH l_status_csr INTO l_status,l_standard_yn, l_adoption_type;
1869: CLOSE l_status_csr;
1870:
1871: IF l_standard_yn = 'Y' THEN
1872: IF l_status NOT IN ( 'DRAFT','REJECTED') THEN
1873: IF (l_debug = 'Y') THEN
1874: Okc_Debug.Log('2200: - Article Status is not Draft or Rejected,It cannot be deleted',2);
1875: END IF;
1924: END IF;
1925: END IF;
1926: END IF;
1927: END IF;
1928: ELSE -- in the case of non standard articles
1929: OKC_ARTICLES_ALL_PVT.Delete_Row(
1930: x_return_status => x_return_status,
1931: p_article_id => p_article_id,
1932: p_object_version_number => NULL
1940: Delete_Article_Version(
1941: p_api_version => p_api_version ,
1942: p_init_msg_list => p_init_msg_list,
1943: p_commit => p_commit,
1944: p_standard_yn => l_standard_yn,
1945: p_adoption_type => l_adoption_type,
1946: x_return_status => x_return_status,
1947: x_msg_count => x_msg_count,
1948: x_msg_data => x_msg_data,
1957: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1958: RAISE FND_API.G_EXC_ERROR ;
1959: END IF;
1960: --------------------------------------------
1961: -- Standard check of p_commit
1962: IF FND_API.To_Boolean( p_commit ) THEN
1963: COMMIT WORK;
1964: END IF;
1965: -- Standard call to get message count and if count is 1, get message info.
1961: -- Standard check of p_commit
1962: IF FND_API.To_Boolean( p_commit ) THEN
1963: COMMIT WORK;
1964: END IF;
1965: -- Standard call to get message count and if count is 1, get message info.
1966: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
1967:
1968: IF (l_debug = 'Y') THEN
1969: okc_debug.log('2300: Leaving delete_article', 2);
2093: IF (l_debug = 'Y') THEN
2094: okc_debug.log('100: Entered validate_article_version', 2);
2095: END IF;
2096:
2097: -- Standard Start of API savepoint
2098: SAVEPOINT g_validate_article_version_GRP;
2099: -- Standard call to check for call compatibility.
2100: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2095: END IF;
2096:
2097: -- Standard Start of API savepoint
2098: SAVEPOINT g_validate_article_version_GRP;
2099: -- Standard call to check for call compatibility.
2100: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2102: END IF;
2103: -- Initialize message list if p_init_msg_list is set to TRUE.
2169: RAISE FND_API.G_EXC_ERROR ;
2170: END IF;
2171: --------------------------------------------
2172:
2173: -- Standard call to get message count and if count is 1, get message info.
2174: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2175:
2176: IF (l_debug = 'Y') THEN
2177: okc_debug.log('200: Leaving validate_article_version', 2);
2216: p_init_msg_list IN VARCHAR2 ,
2217: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2218: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2219: p_article_intent IN VARCHAR2 := NULL,
2220: p_standard_yn IN VARCHAR2 := 'Y',
2221: p_global_article_version_id IN NUMBER := NULL,
2222:
2223: x_return_status OUT NOCOPY VARCHAR2,
2224: x_msg_count OUT NOCOPY NUMBER,
2302: IF (l_debug = 'Y') THEN
2303: okc_debug.log('600: Entered create_article_version', 2);
2304: END IF;
2305:
2306: -- Standard Start of API savepoint
2307: SAVEPOINT g_create_article_version_GRP;
2308: -- Standard call to check for call compatibility.
2309: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2304: END IF;
2305:
2306: -- Standard Start of API savepoint
2307: SAVEPOINT g_create_article_version_GRP;
2308: -- Standard call to check for call compatibility.
2309: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2311: END IF;
2312: -- MOAC
2453: END IF;
2454:
2455: -- Adoption row should not be created if the global/local org is -99 and
2456: -- if the global org = local org
2457: -- Adoption rows are not applicable for NON Standard Articles
2458: -- Global Article Version Id will be passed for "Localize" cases
2459: -- In the case of new version creation, global article version id will not be
2460: -- passed. The system will evaluate the creation of adoption based on the
2461: -- adoption row created from an earlier version.
2470: IF (G_CURRENT_ORG_ID = G_GLOBAL_ORG_ID OR
2471: G_CURRENT_ORG_ID = -99 OR
2472: G_GLOBAL_ORG_ID = -99 ) THEN
2473: NULL;
2474: ELSIF p_standard_yn = 'Y' AND
2475: nvl(l_earlier_adoption_type,'X') <> 'LOCAL' THEN
2476: OKC_ADOPTIONS_GRP.CREATE_LOCAL_ADOPTION_DETAILS
2477: (
2478: p_api_version => p_api_version,
2504: WHERE article_version_id = x_article_version_id;
2505: END IF;
2506:
2507:
2508: -- Standard check of p_commit
2509: IF FND_API.To_Boolean( p_commit ) THEN
2510: COMMIT WORK;
2511: END IF;
2512: -- Standard call to get message count and if count is 1, get message info.
2508: -- Standard check of p_commit
2509: IF FND_API.To_Boolean( p_commit ) THEN
2510: COMMIT WORK;
2511: END IF;
2512: -- Standard call to get message count and if count is 1, get message info.
2513: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2514:
2515: IF (l_debug = 'Y') THEN
2516: okc_debug.log('700: Leaving create_article_version', 2);
2567: IF (l_debug = 'Y') THEN
2568: okc_debug.log('1100: Entered lock_article_version', 2);
2569: END IF;
2570:
2571: -- Standard Start of API savepoint
2572: SAVEPOINT g_lock_article_version_GRP;
2573: -- Standard call to check for call compatibility.
2574: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2575: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2569: END IF;
2570:
2571: -- Standard Start of API savepoint
2572: SAVEPOINT g_lock_article_version_GRP;
2573: -- Standard call to check for call compatibility.
2574: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2575: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2576: END IF;
2577: -- Initialize message list if p_init_msg_list is set to TRUE.
2596: RAISE FND_API.G_EXC_ERROR ;
2597: END IF;
2598: --------------------------------------------
2599:
2600: -- Standard call to get message count and if count is 1, get message info.
2601: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
2602:
2603: IF (l_debug = 'Y') THEN
2604: okc_debug.log('1200: Leaving lock_article_version', 2);
2842: okc_debug.log('1600: Entered update_article_version', 2);
2843: okc_debug.log('1700: Locking row', 2);
2844: END IF;
2845:
2846: -- Standard Start of API savepoint
2847: SAVEPOINT g_update_article_version_GRP;
2848: -- Standard call to check for call compatibility.
2849: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2850: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2844: END IF;
2845:
2846: -- Standard Start of API savepoint
2847: SAVEPOINT g_update_article_version_GRP;
2848: -- Standard call to check for call compatibility.
2849: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2850: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2851: END IF;
2852: -- Initialize message list if p_init_msg_list is set to TRUE.
2865:
2866: l_article_status := p_article_status;
2867: l_article_text := p_article_text;
2868:
2869: -- nvl added to cater to non-standard articles. Std Articles will never be of NULL status
2870:
2871: IF p_article_text is NOT NULL AND
2872: nvl(l_article_status,'DRAFT') IN ('DRAFT','REJECTED') THEN
2873: DBMS_LOB.CREATETEMPORARY(l_clob,true);
2993: SET cz_transfer_status_flag = 'R'
2994: WHERE ARTICLE_ID = l_article_id;
2995: END IF;
2996:
2997: -- Standard check of p_commit
2998: IF FND_API.To_Boolean( p_commit ) THEN
2999: COMMIT WORK;
3000: END IF;
3001: -- Standard call to get message count and if count is 1, get message info.
2997: -- Standard check of p_commit
2998: IF FND_API.To_Boolean( p_commit ) THEN
2999: COMMIT WORK;
3000: END IF;
3001: -- Standard call to get message count and if count is 1, get message info.
3002: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
3003:
3004: IF (l_debug = 'Y') THEN
3005: okc_debug.log('1800: Leaving update_article_version', 2);
3048:
3049: p_article_version_id IN NUMBER,
3050: p_new_article_title IN VARCHAR2 := NULL,
3051: p_new_article_number IN VARCHAR2 := NULL,
3052: p_create_standard_yn IN VARCHAR2 := 'N',
3053: p_copy_relationship_yn IN VARCHAR2 := 'N',
3054: p_copy_folder_assoc_yn IN VARCHAR2 := 'N',
3055:
3056: x_article_version_id OUT NOCOPY NUMBER,
3066: l_article_number OKC_ARTICLES_ALL.ARTICLE_NUMBER%TYPE ;
3067: l_old_article_number OKC_ARTICLES_ALL.ARTICLE_NUMBER%TYPE ;
3068: l_article_title OKC_ARTICLES_ALL.ARTICLE_TITLE%TYPE ;
3069: l_object_version_number OKC_ARTICLES_ALL.OBJECT_VERSION_NUMBER%TYPE ;
3070: l_standard_yn OKC_ARTICLES_ALL.STANDARD_YN%TYPE;
3071: l_article_intent OKC_ARTICLES_ALL.ARTICLE_INTENT%TYPE;
3072: l_article_language OKC_ARTICLES_ALL.ARTICLE_LANGUAGE%TYPE;
3073: l_article_type OKC_ARTICLES_ALL.ARTICLE_TYPE%TYPE;
3074: l_doc_sequence_type VARCHAR2(1);
3156: lv_last_update_date OKC_ARTICLE_VERSIONS.LAST_UPDATE_DATE%TYPE;
3157: lv_last_updated_by OKC_ARTICLE_VERSIONS.LAST_UPDATED_BY%TYPE;
3158: lv_last_update_login OKC_ARTICLE_VERSIONS.LAST_UPDATE_LOGIN%TYPE;
3159:
3160: l_p_standard_yn VARCHAR2(1);
3161: l_p_article_id NUMBER;
3162: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
3163: l_api_version CONSTANT NUMBER := 1;
3164: l_api_name CONSTANT VARCHAR2(30) := 'g_copy_article';
3174: l_relationship_type_tbl l_relationship_type_list ;
3175: i NUMBER := 0;
3176:
3177: CURSOR l_article_csr (cp_article_version_id IN NUMBER) is
3178: SELECT aa.standard_yn,av.article_id
3179: FROM OKC_ARTICLES_ALL aa,OKC_ARTICLE_VERSIONS av
3180: WHERE aa.ARTICLE_ID = av.ARTICLE_ID
3181: AND av.ARTICLE_VERSION_ID = cp_article_version_id;
3182:
3196: Okc_Debug.Log('2700: Entered Copy_Articles ', 2);
3197: END IF;
3198: --dbms_output.put_line('2700: Entered Copy_Articles ');
3199:
3200: -- Standard Start of API savepoint
3201: SAVEPOINT g_copy_article_GRP;
3202: -- Standard call to check for call compatibility.
3203: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3198: --dbms_output.put_line('2700: Entered Copy_Articles ');
3199:
3200: -- Standard Start of API savepoint
3201: SAVEPOINT g_copy_article_GRP;
3202: -- Standard call to check for call compatibility.
3203: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3205: END IF;
3206: -- MOAC
3221: -- Insert into ... select would have been faster but we need to validate as well
3222:
3223:
3224: OPEN l_article_csr(p_article_version_id);
3225: FETCH l_article_csr INTO l_p_standard_yn, l_p_article_id;
3226: CLOSE l_article_csr;
3227:
3228: IF l_p_article_id IS NOT NULL THEN
3229: -- Get Current Database values for Article
3233: p_article_id => l_p_article_id,
3234: x_article_title => l_article_title,
3235: x_org_id => l_org_id,
3236: x_article_number => l_old_article_number,
3237: x_standard_yn => l_standard_yn,
3238: x_article_intent => l_article_intent,
3239: x_article_language => l_article_language,
3240: x_article_type => l_article_type,
3241: x_orig_system_reference_code => l_orig_system_reference_code,
3344: END IF;
3345: --------------------------------------------
3346: END IF;
3347: -- Copying Articles
3348: -- Setting the Attributes depending upon whether it is standard or non-standard article
3349: IF l_p_standard_yn = 'Y' THEN
3350:
3351: -- Bug#3680325 i.e. start date is greatest of sysdate, start date and end date is always null
3352: -- Bug#3826123 i.e. start date should be truncated
3345: --------------------------------------------
3346: END IF;
3347: -- Copying Articles
3348: -- Setting the Attributes depending upon whether it is standard or non-standard article
3349: IF l_p_standard_yn = 'Y' THEN
3350:
3351: -- Bug#3680325 i.e. start date is greatest of sysdate, start date and end date is always null
3352: -- Bug#3826123 i.e. start date should be truncated
3353:
3384: END IF;
3385: IF G_CURRENT_ORG_ID <> G_GLOBAL_ORG_ID THEN
3386: lv_global_yn := 'N';
3387: END IF;
3388: ELSE --IF l_p_standard_yn = 'Y' THEN
3389: lv_start_date := NULL;
3390: lv_article_status := NULL;
3391: l_cz_transfer_status_flag := NULL;
3392: lv_end_date := NULL;
3406: x_return_status => x_return_status,
3407: p_article_title => nvl(p_new_article_title,l_article_title),
3408: p_org_id => G_CURRENT_ORG_ID,
3409: p_article_number => l_article_number,
3410: p_standard_yn => p_create_standard_yn,
3411: p_article_intent => l_article_intent,
3412: p_article_language => l_article_language,
3413: p_article_type => l_article_type,
3414: p_orig_system_reference_code => l_orig_system_reference_code,
3652: and fold.folder_id = mem.folder_id);
3653:
3654: END IF;
3655:
3656: -- Standard check of p_commit
3657: IF FND_API.To_Boolean( p_commit ) THEN
3658: COMMIT WORK;
3659: END IF;
3660: -- Standard call to get message count and if count is 1, get message info.
3656: -- Standard check of p_commit
3657: IF FND_API.To_Boolean( p_commit ) THEN
3658: COMMIT WORK;
3659: END IF;
3660: -- Standard call to get message count and if count is 1, get message info.
3661: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
3662:
3663: IF (l_debug = 'Y') THEN
3664: okc_debug.log('2800: Leaving copy_article', 2);
4137: IF (l_debug = 'Y') THEN
4138: okc_debug.log('600: Entered insert_row', 2);
4139: END IF;
4140:
4141: -- Standard Start of API savepoint
4142: SAVEPOINT g_insert_row_GRP;
4143: -- Standard call to check for call compatibility.
4144: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4139: END IF;
4140:
4141: -- Standard Start of API savepoint
4142: SAVEPOINT g_insert_row_GRP;
4143: -- Standard call to check for call compatibility.
4144: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4146: END IF;
4147: -- Initialize message list if p_init_msg_list is set to TRUE.
4217: END IF;
4218: --------------------------------------------
4219: END IF;
4220:
4221: -- Standard check of p_commit
4222: IF FND_API.To_Boolean( p_commit ) THEN
4223: COMMIT WORK;
4224: END IF;
4225: -- Standard call to get message count and if count is 1, get message info.
4221: -- Standard check of p_commit
4222: IF FND_API.To_Boolean( p_commit ) THEN
4223: COMMIT WORK;
4224: END IF;
4225: -- Standard call to get message count and if count is 1, get message info.
4226: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
4227:
4228: IF (l_debug = 'Y') THEN
4229: okc_debug.log('700: Leaving insert_row', 2);
4306: IF (l_debug = 'Y') THEN
4307: okc_debug.log('100: Entered create_adoption', 2);
4308: END IF;
4309:
4310: -- Standard Start of API savepoint
4311: -- Initialize API return status to success
4312: x_return_status := FND_API.G_RET_STS_SUCCESS;
4313: --dbms_output.put_line('Global org is: '|| l_global_org_id);
4314: OPEN l_relationship_csr (p_source_global_article_id, p_target_global_article_id);
4386: IF (l_debug = 'Y') THEN
4387: okc_debug.log('2200: Entered delete_row', 2);
4388: END IF;
4389:
4390: -- Standard Start of API savepoint
4391: SAVEPOINT g_delete_row_GRP;
4392: -- Standard call to check for call compatibility.
4393: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4388: END IF;
4389:
4390: -- Standard Start of API savepoint
4391: SAVEPOINT g_delete_row_GRP;
4392: -- Standard call to check for call compatibility.
4393: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4395: END IF;
4396: -- Initialize message list if p_init_msg_list is set to TRUE.
4456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4457: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
4458: RAISE FND_API.G_EXC_ERROR ;
4459: END IF;
4460: -- Standard check of p_commit
4461: IF FND_API.To_Boolean( p_commit ) THEN
4462: COMMIT WORK;
4463: END IF;
4464: -- Standard call to get message count and if count is 1, get message info.
4460: -- Standard check of p_commit
4461: IF FND_API.To_Boolean( p_commit ) THEN
4462: COMMIT WORK;
4463: END IF;
4464: -- Standard call to get message count and if count is 1, get message info.
4465: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_encoded=> 'F', p_data => x_msg_data );
4466:
4467: IF (l_debug = 'Y') THEN
4468: okc_debug.log('2300: Leaving delete_row', 2);