[Home] [Help]
866: ----------------------------------------------
867: FUNCTION Validate_Attributes (
868: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
869: p_import_action IN VARCHAR2 := NULL,
870: p_standard_yn IN VARCHAR2,
871:
872: p_article_version_id IN NUMBER,
873: p_article_id IN NUMBER,
874: p_article_version_number IN NUMBER,
933: SELECT '!'
934: FROM OKC_ARTICLES_ALL AA,OKC_ARTICLE_VERSIONS AV
935: WHERE AA.ARTICLE_ID = AV.ARTICLE_ID
936: AND AV.ARTICLE_VERSION_ID = p_std_article_version_id
937: AND AA.STANDARD_YN = 'Y';
938:
939: -- Below Added for FAR/DFAR Import
940: CURSOR l_date_published_csr is
941: SELECT av.date_published
947: IF (l_debug = 'Y') THEN
948: Okc_Debug.Log('1200: Entered Validate_Attributes', 2);
949: END IF;
950:
951: -- Article row will always be needed to test if this is a standard or not even for not null or FK checks
952:
953: IF p_validation_level > G_REQUIRED_VALUE_VALID_LEVEL THEN
954: IF (l_debug = 'Y') THEN
955: Okc_Debug.Log('1300: required values validation', 2);
1048: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ARTICLE_LANGUAGE');
1049: l_return_status := G_RET_STS_ERROR;
1050: END IF;
1051:
1052: IF p_standard_yn = 'Y' OR p_import_action IS NOT NULL Then
1053: IF (l_debug = 'Y') THEN
1054: Okc_Debug.Log('1400: - attribute START_DATE ', 2);
1055: END IF;
1056: IF ( p_start_date IS NULL) THEN
1355: l_dummy_var VARCHAR2(1) := '?';
1356: l_dummy_var1 VARCHAR2(1) ;
1357: l_dummy_var2 VARCHAR2(1) ;
1358:
1359: l_standard_yn VARCHAR2(1) ;
1360: l_article_language OKC_ARTICLES_ALL.ARTICLE_LANGUAGE%TYPE;
1361: l_global_start_date DATE := TO_DATE('12313999','MMDDYYYY');
1362: l_rownotfound BOOLEAN := FALSE;
1363:
1415: WHERE S.START_DATE = S.MAX_START_DATE;
1416: */
1417:
1418: CURSOR l_article_id_csr(p_article_id IN NUMBER) is
1419: SELECT standard_yn, article_language
1420: FROM OKC_ARTICLES_ALL
1421: WHERE ARTICLE_ID = p_article_id;
1422:
1423: -- Bug#3672511: Validation of start date of a localized clause should be >= start date of global clause.
1465: end if;
1466: */
1467:
1468: IF p_import_action in ('N', 'V', 'U') THEN
1469: l_standard_yn := 'Y';
1470: l_article_language := p_article_language;
1471: ELSIF p_article_id IS NOT NULL THEN
1472: l_standard_yn := '?';
1473: OPEN l_article_id_csr(p_article_id);
1468: IF p_import_action in ('N', 'V', 'U') THEN
1469: l_standard_yn := 'Y';
1470: l_article_language := p_article_language;
1471: ELSIF p_article_id IS NOT NULL THEN
1472: l_standard_yn := '?';
1473: OPEN l_article_id_csr(p_article_id);
1474: FETCH l_article_id_csr INTO l_standard_yn, l_article_language;
1475: CLOSE l_article_id_csr;
1476: IF (l_standard_yn = '?') THEN
1470: l_article_language := p_article_language;
1471: ELSIF p_article_id IS NOT NULL THEN
1472: l_standard_yn := '?';
1473: OPEN l_article_id_csr(p_article_id);
1474: FETCH l_article_id_csr INTO l_standard_yn, l_article_language;
1475: CLOSE l_article_id_csr;
1476: IF (l_standard_yn = '?') THEN
1477: IF (l_debug = 'Y') THEN
1478: Okc_Debug.Log('2300: - attribute ARTICLE_ID is invalid', 2);
1472: l_standard_yn := '?';
1473: OPEN l_article_id_csr(p_article_id);
1474: FETCH l_article_id_csr INTO l_standard_yn, l_article_language;
1475: CLOSE l_article_id_csr;
1476: IF (l_standard_yn = '?') THEN
1477: IF (l_debug = 'Y') THEN
1478: Okc_Debug.Log('2300: - attribute ARTICLE_ID is invalid', 2);
1479: END IF;
1480: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'ARTICLE_ID');
1486: --- Validate all non-missing attributes (Item Level Validation)
1487: l_return_status := Validate_Attributes(
1488: p_validation_level => p_validation_level,
1489: p_import_action => p_import_action,
1490: p_standard_yn => l_standard_yn, -- Introduced for checks related to Std version only.
1491: p_article_version_id => p_article_version_id,
1492: p_article_id => p_article_id,
1493: p_article_version_number => p_article_version_number,
1494: p_article_text => p_article_text,
1543: RETURN G_RET_STS_UNEXP_ERROR;
1544: END IF;
1545:
1546: -- The following lines will be used to:
1547: -- 1. Validate the current article attributes in the case of Standard Article from a previous version (if record level
1548: -- validation is desired).
1549: -- 2. Generate the version number later in the case of inserts of a article version in insert_row API using the
1550: -- x_previous_version_number parameter (even if record level validation is not desired).
1551: -- 3. Validate the effectivity even in case of approved.
1557: -- We would still need to check that an article cannot be imported as approved/
1558: -- pending approval if earlier version is draft/pending approval/rejected.
1559:
1560:
1561: IF (l_standard_yn = 'Y') AND -- All cases of Standard Articles Only (except first version of Import)
1562: (nvl(p_import_action,'X') <> 'N') THEN
1563: IF p_article_status in ('DRAFT','REJECTED','PENDING_APPROVAL') OR -- All Non Approved or Local or Start Date as null
1564: p_global_yn = 'N' OR
1565: p_import_action = 'V' OR -- Added by MSENGUPT on 05/24 Bug#3648236 as earlier version check is needed for new version of import
1588:
1589: IF ( p_end_date is NOT NULL ) THEN
1590: IF ( p_end_date < p_start_date ) THEN
1591: IF (l_debug = 'Y') THEN
1592: Okc_Debug.Log('1300: attribute START_DATE IS greater then end date for standard article', 2);
1593: END IF;
1594: OKC_API.Set_Message(G_APP_NAME, 'OKC_ART_START_GT_END_DATE');
1595: l_return_status := G_RET_STS_ERROR;
1596: ELSIF p_article_status in ('DRAFT','REJECTED','PENDING_APPROVAL') AND
1595: l_return_status := G_RET_STS_ERROR;
1596: ELSIF p_article_status in ('DRAFT','REJECTED','PENDING_APPROVAL') AND
1597: p_end_date < trunc(sysdate) THEN -- Added for Bug 3517002
1598: IF (l_debug = 'Y') THEN
1599: Okc_Debug.Log('1300: attribute END_DATE IS less then system date for standard article', 2);
1600: END IF;
1601: OKC_API.Set_Message(G_APP_NAME, 'OKC_ART_END_LT_SYS_DATE');
1602: l_return_status := G_RET_STS_ERROR;
1603: END IF;
1620: /*
1621: IF ( p_date_approved is NOT NULL ) THEN
1622: IF ( p_date_approved > nvl(p_end_date,p_date_approved + 1) ) THEN
1623: IF (l_debug = 'Y') THEN
1624: Okc_Debug.Log('1300: attribute END_DATE IS less then approved date for standard article', 2);
1625: END IF;
1626: OKC_API.Set_Message(G_APP_NAME, 'OKC_ART_APPROVED_GT_END_DATE');
1627: l_return_status := G_RET_STS_ERROR;
1628: END IF;
1627: l_return_status := G_RET_STS_ERROR;
1628: END IF;
1629: END IF;
1630: */
1631: -- In case of Standard Articles ONLY
1632: -- Validate that a global standard article cannot be created at a local org
1633: -- From the earlier version check
1634: -- 1. If global, current version cannot be local
1635: -- 2. earlier version cannot be status = DRAFT, REJECTED, PENDING APPROVAL'
1628: END IF;
1629: END IF;
1630: */
1631: -- In case of Standard Articles ONLY
1632: -- Validate that a global standard article cannot be created at a local org
1633: -- From the earlier version check
1634: -- 1. If global, current version cannot be local
1635: -- 2. earlier version cannot be status = DRAFT, REJECTED, PENDING APPROVAL'
1636: -- 3. Date Overlap
1634: -- 1. If global, current version cannot be local
1635: -- 2. earlier version cannot be status = DRAFT, REJECTED, PENDING APPROVAL'
1636: -- 3. Date Overlap
1637:
1638: IF l_standard_yn = 'Y' THEN
1639: IF (G_CURRENT_ORG_ID <> G_GLOBAL_ORG_ID AND
1640: p_global_yn = 'Y') Then
1641: IF (l_debug = 'Y') THEN
1642: Okc_Debug.Log('2300: - attribute Global Article cannot be created at a local org', 2);
1788: RETURN l_return_status ;
1789: end if;
1790: -- fix for bug#4006749 end
1791:
1792: END IF; -- if l_standard_yn = Y
1793: x_earlier_version_number := l_highest_version_rec.article_version_number;
1794: x_article_language := l_article_language;
1795: x_earlier_version_id := l_highest_version_rec.article_version_id;
1796: x_earlier_adoption_type := l_highest_version_rec.adoption_type;