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_review_upld_header_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,
x_new_contract_source OUT NOCOPY VARCHAR2,
x_enable_reporting_flag OUT NOCOPY VARCHAR2,
x_file_description OUT NOCOPY VARCHAR2
) RETURN VARCHAR2 IS
CURSOR OKC_review_upld_header_pk_csr (cp_review_upld_header_id IN NUMBER) IS
SELECT
FILE_NAME,
FILE_CONTENT_TYPE,
FILE_DATA,
DOCUMENT_TYPE,
DOCUMENT_ID,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
new_contract_source,
enable_reporting_flag,
file_description
FROM OKC_review_upld_header t
WHERE t.review_upld_header_ID = cp_review_upld_header_id;
x_last_updated_by,
x_last_update_login,
x_last_update_date,
x_new_contract_source,
x_enable_reporting_flag,
x_file_description ;
l_last_updated_by OKC_review_upld_header.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_review_upld_header.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_review_upld_header.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 ??unknown_table??
WHERE ??review_upld_header_ID?? = p_review_upld_header_id;
SELECT '!'
FROM ??unknown_table??
WHERE ??DOCUMENT_ID?? = p_document_id;
l_last_updated_by OKC_review_upld_header.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_review_upld_header.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_review_upld_header.LAST_UPDATE_DATE%TYPE;
FUNCTION Insert_Row(
p_review_upld_header_id IN NUMBER,
p_file_name IN VARCHAR2,
p_file_content_type IN VARCHAR2,
p_file_data IN BLOB,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
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,
p_new_contract_source IN VARCHAR2,
p_enable_reporting_flag IN VARCHAR2,
p_file_description IN VARCHAR2
) RETURN VARCHAR2 IS
BEGIN
IF (l_debug = 'Y') THEN
Okc_Debug.Log('3600: Entered Insert_Row function', 2);
INSERT INTO OKC_review_upld_header(
review_upld_header_ID,
FILE_NAME,
FILE_CONTENT_TYPE,
FILE_DATA,
DOCUMENT_TYPE,
DOCUMENT_ID,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
new_contract_source,
enable_reporting_flag,
file_description)
VALUES (
p_review_upld_header_id,
p_file_name,
p_file_content_type,
p_file_data,
p_document_type,
p_document_id,
p_object_version_number,
p_created_by,
p_creation_date,
p_last_updated_by,
p_last_update_login,
p_last_update_date,
p_new_contract_source,
p_enable_reporting_flag,
p_file_description);
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_review_upld_header_id IN NUMBER,
p_file_name IN VARCHAR2,
p_file_content_type IN VARCHAR2,
p_file_data IN BLOB,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
p_new_contract_source IN VARCHAR2,
p_enable_reporting_flag IN VARCHAR2,
p_file_description IN VARCHAR2,
x_review_upld_header_id OUT NOCOPY NUMBER
) IS
l_object_version_number OKC_review_upld_header.OBJECT_VERSION_NUMBER%TYPE;
l_last_updated_by OKC_review_upld_header.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_review_upld_header.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_review_upld_header.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_review_upld_header_id => x_review_upld_header_id,
p_file_name => p_file_name,
p_file_content_type => p_file_content_type,
p_file_data => p_file_data,
p_document_type => p_document_type,
p_document_id => p_document_id,
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,
p_new_contract_source => p_new_contract_source,
p_enable_reporting_flag => p_enable_reporting_flag,
p_file_description => p_file_description
);
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_review_upld_header
WHERE review_upld_header_ID = cp_review_upld_header_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_review_upld_header
WHERE review_upld_header_ID = cp_review_upld_header_id;
Okc_Api.Set_Message(G_APP_NAME,G_RECORD_DELETED);
Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
FUNCTION Update_Row(
p_review_upld_header_id IN NUMBER,
p_file_name IN VARCHAR2,
p_file_content_type IN VARCHAR2,
p_file_data IN BLOB,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
p_object_version_number IN NUMBER,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_last_update_date IN DATE,
p_new_contract_source IN VARCHAR2,
p_enable_reporting_flag IN VARCHAR2,
p_file_description IN VARCHAR2
) RETURN VARCHAR2 IS
BEGIN
IF (l_debug = 'Y') THEN
Okc_Debug.Log('6400: Entered Update_Row', 2);
UPDATE OKC_review_upld_header
SET FILE_NAME = p_file_name,
FILE_CONTENT_TYPE = p_file_content_type,
FILE_DATA = p_file_data,
DOCUMENT_TYPE = p_document_type,
DOCUMENT_ID = p_document_id,
OBJECT_VERSION_NUMBER = p_object_version_number,
LAST_UPDATED_BY = p_last_updated_by,
LAST_UPDATE_LOGIN = p_last_update_login,
LAST_UPDATE_DATE = p_last_update_date,
new_contract_source = p_new_contract_source,
enable_reporting_flag = p_enable_reporting_flag,
file_description = p_file_description
WHERE review_upld_header_ID = p_review_upld_header_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_review_upld_header_id IN NUMBER,
p_file_name IN VARCHAR2 := NULL,
p_file_content_type IN VARCHAR2 := NULL,
p_file_data IN BLOB := NULL,
p_document_type IN VARCHAR2 := NULL,
p_document_id IN NUMBER := NULL,
p_object_version_number IN NUMBER,
p_new_contract_source IN VARCHAR2 := NULL,
p_enable_reporting_flag IN VARCHAR2 := NULL,
p_file_description IN VARCHAR2 := NULL
) IS
l_file_name OKC_review_upld_header.FILE_NAME%TYPE;
l_last_updated_by OKC_review_upld_header.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_review_upld_header.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_review_upld_header.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_review_upld_header_id => p_review_upld_header_id,
p_file_name => l_file_name,
p_file_content_type => l_file_content_type,
p_file_data => l_file_data,
p_document_type => l_document_type,
p_document_id => l_document_id,
p_object_version_number => l_object_version_number,
p_last_updated_by => l_last_updated_by,
p_last_update_login => l_last_update_login,
p_last_update_date => l_last_update_date,
p_new_contract_source => l_new_contract_source,
p_enable_reporting_flag => p_enable_reporting_flag,
p_file_description => p_file_description
);
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_review_upld_header_id IN NUMBER
) RETURN VARCHAR2 IS
BEGIN
IF (l_debug = 'Y') THEN
Okc_Debug.Log('8200: Entered Delete_Row', 2);
DELETE FROM OKC_review_upld_header
WHERE review_upld_header_ID = p_review_upld_header_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_review_upld_header_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_review_upld_header_id => p_review_upld_header_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;