The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
SELECT OKC_ARTICLES_ALL_S1.NEXTVAL FROM DUAL;
x_last_updated_by OUT NOCOPY NUMBER,
x_last_update_login OUT NOCOPY NUMBER,
x_last_update_date OUT NOCOPY DATE
) RETURN VARCHAR2 IS
CURSOR OKC_ART_REL_pk_csr (cp_source_article_id IN NUMBER,cp_target_article_id IN NUMBER,cp_org_id IN NUMBER) IS
SELECT
RELATIONSHIP_TYPE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE
FROM OKC_ARTICLE_RELATNS_ALL t
WHERE t.SOURCE_ARTICLE_ID = cp_source_article_id and
t.TARGET_ARTICLE_ID = cp_target_article_id and
t.ORG_ID = cp_org_id;
x_last_updated_by,
x_last_update_login,
x_last_update_date;
l_last_updated_by OKC_ARTICLE_RELATNS_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_DATE%TYPE;
x_last_updated_by => l_last_updated_by,
x_last_update_login => l_last_update_login,
x_last_update_date => l_last_update_date
);
SELECT '!'
FROM OKC_ARTICLES_ALL
WHERE ARTICLE_ID = p_source_article_id;
SELECT '!'
FROM OKC_ARTICLES_ALL
WHERE ARTICLE_ID = p_target_article_id;
SELECT '!'
FROM HR_ALL_ORGANIZATION_UNITS
WHERE ORGANIZATION_ID = p_org_id;
select provision_yn
from
okc_article_versions
where
article_id = c_article_id
and
article_version_number = 1;
SELECT '1' FROM OKC_ARTICLE_RELATNS_ALL
WHERE source_article_id = cp_source_article_id
AND target_article_id = cp_target_article_id
AND org_id = cp_org_id
AND rownum < 2;
l_last_updated_by OKC_ARTICLE_RELATNS_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_DATE%TYPE;
FUNCTION Insert_Row(
p_source_article_id IN NUMBER,
p_target_article_id IN NUMBER,
p_org_id IN NUMBER,
p_relationship_type IN VARCHAR2,
p_object_version_number IN NUMBER,
p_created_by IN NUMBER,
p_creation_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_last_update_date IN DATE
) RETURN VARCHAR2 IS
BEGIN
IF (l_debug = 'Y') THEN
Okc_Debug.Log('3600: Entered Insert_Row function', 2);
INSERT INTO OKC_ARTICLE_RELATNS_ALL(
SOURCE_ARTICLE_ID,
TARGET_ARTICLE_ID,
ORG_ID,
RELATIONSHIP_TYPE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE)
VALUES (
p_source_article_id,
p_target_article_id,
p_org_id,
p_relationship_type,
p_object_version_number,
p_created_by,
p_creation_date,
p_last_updated_by,
p_last_update_login,
p_last_update_date);
Okc_Debug.Log('3700: Leaving Insert_Row', 2);
Okc_Debug.Log('3800: Leaving Insert_Row:OTHERS Exception', 2);
END Insert_Row;
PROCEDURE Insert_Row(
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
p_source_article_id IN NUMBER,
p_target_article_id IN NUMBER,
p_org_id IN NUMBER,
p_relationship_type IN VARCHAR2,
x_source_article_id OUT NOCOPY NUMBER,
x_target_article_id OUT NOCOPY NUMBER,
x_org_id OUT NOCOPY NUMBER
) IS
l_object_version_number OKC_ARTICLE_RELATNS_ALL.OBJECT_VERSION_NUMBER%TYPE;
l_last_updated_by OKC_ARTICLE_RELATNS_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_DATE%TYPE;
Okc_Debug.Log('4200: Entered Insert_Row', 2);
l_last_update_date := l_creation_date;
l_last_updated_by := l_created_by;
l_last_update_login := Fnd_Global.Login_Id;
Okc_Debug.Log('4300: Call the internal Insert_Row for Base Table', 2);
x_return_status := Insert_Row(
p_source_article_id => x_source_article_id,
p_target_article_id => x_target_article_id,
p_org_id => x_org_id,
p_relationship_type => p_relationship_type,
p_object_version_number => l_object_version_number,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_last_update_login => l_last_update_login,
p_last_update_date => l_last_update_date
);
Okc_Debug.Log('4500: Leaving Insert_Row', 2);
Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
Okc_Debug.Log('4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm, 2);
END Insert_Row;
SELECT object_version_number
FROM OKC_ARTICLE_RELATNS_ALL
WHERE SOURCE_ARTICLE_ID = cp_source_article_id AND TARGET_ARTICLE_ID = cp_target_article_id AND ORG_ID = cp_org_id
AND (object_version_number = cp_object_version_number OR cp_object_version_number IS NULL)
FOR UPDATE OF object_version_number NOWAIT;
SELECT object_version_number
FROM OKC_ARTICLE_RELATNS_ALL
WHERE SOURCE_ARTICLE_ID = cp_source_article_id AND TARGET_ARTICLE_ID = cp_target_article_id AND ORG_ID = cp_org_id;
Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
FUNCTION Update_Row(
p_source_article_id IN NUMBER,
p_target_article_id IN NUMBER,
p_org_id IN NUMBER,
p_relationship_type IN VARCHAR2,
p_object_version_number IN NUMBER,
p_created_by IN NUMBER,
p_creation_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_last_update_date IN DATE
) RETURN VARCHAR2 IS
BEGIN
IF (l_debug = 'Y') THEN
Okc_Debug.Log('6400: Entered Update_Row', 2);
UPDATE OKC_ARTICLE_RELATNS_ALL
SET RELATIONSHIP_TYPE = p_relationship_type,
OBJECT_VERSION_NUMBER = p_object_version_number,
CREATED_BY = p_created_by,
CREATION_DATE = p_creation_date,
LAST_UPDATED_BY = p_last_updated_by,
LAST_UPDATE_LOGIN = p_last_update_login,
LAST_UPDATE_DATE = p_last_update_date
WHERE SOURCE_ARTICLE_ID = p_source_article_id AND TARGET_ARTICLE_ID = p_target_article_id AND ORG_ID = p_org_id;
Okc_Debug.Log('6500: Leaving Update_Row', 2);
Okc_Debug.Log('6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm, 2);
END Update_Row;
PROCEDURE Update_Row(
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
p_source_article_id IN NUMBER,
p_target_article_id IN NUMBER,
p_org_id IN NUMBER,
p_relationship_type IN VARCHAR2,
p_object_version_number IN NUMBER
) IS
l_relationship_type OKC_ARTICLE_RELATNS_ALL.RELATIONSHIP_TYPE%TYPE;
l_last_updated_by OKC_ARTICLE_RELATNS_ALL.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_ARTICLE_RELATNS_ALL.LAST_UPDATE_DATE%TYPE;
Okc_Debug.Log('7000: Entered Update_Row', 2);
l_last_update_date := SYSDATE;
l_last_updated_by := FND_GLOBAL.USER_ID;
l_last_update_login := FND_GLOBAL.LOGIN_ID;
x_return_status := Update_Row(
p_source_article_id => p_source_article_id,
p_target_article_id => p_target_article_id,
p_org_id => p_org_id,
p_relationship_type => l_relationship_type,
p_object_version_number => l_object_version_number,
p_created_by => l_created_by,
p_creation_date => l_creation_date,
p_last_updated_by => l_last_updated_by,
p_last_update_login => l_last_update_login,
p_last_update_date => l_last_update_date
);
Okc_Debug.Log('7800: Leaving Update_Row', 2);
Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
Okc_Debug.Log('8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm, 2);
END Update_Row;
FUNCTION Delete_Row(
p_source_article_id IN NUMBER,
p_target_article_id IN NUMBER,
p_org_id IN NUMBER
) RETURN VARCHAR2 IS
BEGIN
IF (l_debug = 'Y') THEN
Okc_Debug.Log('8200: Entered Delete_Row', 2);
DELETE FROM OKC_ARTICLE_RELATNS_ALL
WHERE SOURCE_ARTICLE_ID = p_SOURCE_ARTICLE_ID AND
TARGET_ARTICLE_ID = p_TARGET_ARTICLE_ID AND
ORG_ID = p_ORG_ID;
Okc_Debug.Log('8300: Leaving Delete_Row', 2);
Okc_Debug.Log('8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm, 2);
END Delete_Row;
PROCEDURE Delete_Row(
x_return_status OUT NOCOPY VARCHAR2,
p_source_article_id IN NUMBER,
p_target_article_id IN NUMBER,
p_org_id IN NUMBER,
p_object_version_number IN NUMBER
) IS
l_api_name CONSTANT VARCHAR2(30) := 'B_Delete_Row';
Okc_Debug.Log('8800: Entered Delete_Row', 2);
x_return_status := Delete_Row( p_source_article_id => p_source_article_id,p_target_article_id => p_target_article_id,p_org_id => p_org_id );
Okc_Debug.Log('9300: Leaving Delete_Row', 2);
Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
Okc_Debug.Log('9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm, 2);
END Delete_Row;