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;
G_LOCK_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_LOCK_RECORD_DELETED;
SELECT OKC_SECTIONS_B_S.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_last_amended_by OUT NOCOPY NUMBER,
x_last_amendment_date OUT NOCOPY DATE
) RETURN VARCHAR2 IS
CURSOR OKC_SECTIONS_B_pk_csr (cp_id IN NUMBER) IS
SELECT
SECTION_SEQUENCE,
LABEL,
SCN_ID,
HEADING,
DESCRIPTION,
DOCUMENT_TYPE,
DOCUMENT_ID,
SCN_CODE,
AMENDMENT_DESCRIPTION,
AMENDMENT_OPERATION_CODE,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
PRINT_YN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
SUMMARY_AMEND_OPERATION_CODE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_AMENDED_BY,
LAST_AMENDMENT_DATE
FROM OKC_SECTIONS_B t
WHERE t.ID = cp_id;
x_last_updated_by,
x_last_update_login,
x_last_update_date,
x_last_amended_by,
x_last_amendment_date;
l_last_updated_by OKC_SECTIONS_B.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_SECTIONS_B.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_SECTIONS_B.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,
x_last_amended_by => x_last_amended_by,
x_last_amendment_date => x_last_amendment_date
);
SELECT '!'
FROM OKC_SECTIONS_B
WHERE ID = p_scn_id;
SELECT '!'
FROM OKC_BUS_DOC_TYPES_V
WHERE document_type = p_document_type;
l_last_updated_by OKC_SECTIONS_B.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_SECTIONS_B.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_SECTIONS_B.LAST_UPDATE_DATE%TYPE;
FUNCTION Insert_Row(
p_id IN NUMBER,
p_section_sequence IN NUMBER,
p_label IN VARCHAR2,
p_scn_id IN NUMBER,
p_heading IN VARCHAR2,
p_description IN VARCHAR2,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
p_scn_code IN VARCHAR2,
p_amendment_description IN VARCHAR2,
p_amendment_operation_code IN VARCHAR2,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_print_yn IN VARCHAR2,
p_attribute_category IN VARCHAR2,
p_attribute1 IN VARCHAR2,
p_attribute2 IN VARCHAR2,
p_attribute3 IN VARCHAR2,
p_attribute4 IN VARCHAR2,
p_attribute5 IN VARCHAR2,
p_attribute6 IN VARCHAR2,
p_attribute7 IN VARCHAR2,
p_attribute8 IN VARCHAR2,
p_attribute9 IN VARCHAR2,
p_attribute10 IN VARCHAR2,
p_attribute11 IN VARCHAR2,
p_attribute12 IN VARCHAR2,
p_attribute13 IN VARCHAR2,
p_attribute14 IN VARCHAR2,
p_attribute15 IN VARCHAR2,
p_summary_amend_operation_code 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,
p_last_amended_by IN NUMBER,
p_last_amendment_date IN DATE
) RETURN VARCHAR2 IS
l_chr_id NUMBER;
Okc_Debug.Log('3600: Entered Insert_Row function', 2);
G_PKG_NAME, '3600: Entered Insert_Row function' );
INSERT INTO OKC_SECTIONS_B(
ID,
SECTION_SEQUENCE,
SCN_TYPE,
CHR_ID,
SAT_CODE,
LABEL,
SCN_ID,
HEADING,
DESCRIPTION,
DOCUMENT_TYPE,
DOCUMENT_ID,
SCN_CODE,
AMENDMENT_DESCRIPTION,
AMENDMENT_OPERATION_CODE,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
PRINT_YN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
SUMMARY_AMEND_OPERATION_CODE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_AMENDED_BY,
LAST_AMENDMENT_DATE)
VALUES (
p_id,
p_section_sequence,
Null,
l_chr_id,
Null,
p_label,
p_scn_id,
p_heading,
p_description,
p_document_type,
p_document_id,
p_scn_code,
p_amendment_description,
p_amendment_operation_code,
p_orig_system_reference_code,
p_orig_system_reference_id1,
p_orig_system_reference_id2,
p_print_yn,
p_attribute_category,
p_attribute1,
p_attribute2,
p_attribute3,
p_attribute4,
p_attribute5,
p_attribute6,
p_attribute7,
p_attribute8,
p_attribute9,
p_attribute10,
p_attribute11,
p_attribute12,
p_attribute13,
p_attribute14,
p_attribute15,
p_summary_amend_operation_code,
p_object_version_number,
p_created_by,
p_creation_date,
p_last_updated_by,
p_last_update_login,
p_last_update_date,
p_last_amended_by,
p_last_amendment_date);
Okc_Debug.Log('3700: Leaving Insert_Row', 2);
G_PKG_NAME, '3700: Leaving Insert_Row' );
Okc_Debug.Log('3800: Leaving Insert_Row:OTHERS Exception', 2);
G_PKG_NAME, '3800: Leaving Insert_Row:OTHERS Exception' );
END Insert_Row;
PROCEDURE Insert_Row(
p_validation_level IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
p_id IN NUMBER,
p_section_sequence IN NUMBER,
p_label IN VARCHAR2,
p_scn_id IN NUMBER,
p_heading IN VARCHAR2,
p_description IN VARCHAR2,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
p_scn_code IN VARCHAR2,
p_amendment_description IN VARCHAR2,
p_amendment_operation_code IN VARCHAR2,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_print_yn IN VARCHAR2,
p_attribute_category IN VARCHAR2,
p_attribute1 IN VARCHAR2,
p_attribute2 IN VARCHAR2,
p_attribute3 IN VARCHAR2,
p_attribute4 IN VARCHAR2,
p_attribute5 IN VARCHAR2,
p_attribute6 IN VARCHAR2,
p_attribute7 IN VARCHAR2,
p_attribute8 IN VARCHAR2,
p_attribute9 IN VARCHAR2,
p_attribute10 IN VARCHAR2,
p_attribute11 IN VARCHAR2,
p_attribute12 IN VARCHAR2,
p_attribute13 IN VARCHAR2,
p_attribute14 IN VARCHAR2,
p_attribute15 IN VARCHAR2,
p_summary_amend_operation_code IN VARCHAR2,
x_id OUT NOCOPY NUMBER
) IS
l_object_version_number OKC_SECTIONS_B.OBJECT_VERSION_NUMBER%TYPE;
l_last_updated_by OKC_SECTIONS_B.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_SECTIONS_B.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_SECTIONS_B.LAST_UPDATE_DATE%TYPE;
Okc_Debug.Log('4200: Entered Insert_Row', 2);
G_PKG_NAME, '4200: Entered Insert_Row' );
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);
G_PKG_NAME, '4300: Call the internal Insert_Row for Base Table' );
x_return_status := Insert_Row(
p_id => x_id,
p_section_sequence => p_section_sequence,
p_label => p_label,
p_scn_id => p_scn_id,
p_heading => p_heading,
p_description => p_description,
p_document_type => p_document_type,
p_document_id => p_document_id,
p_scn_code => p_scn_code,
p_amendment_description => p_amendment_description,
p_amendment_operation_code => p_amendment_operation_code,
p_orig_system_reference_code => p_orig_system_reference_code,
p_orig_system_reference_id1 => p_orig_system_reference_id1,
p_orig_system_reference_id2 => p_orig_system_reference_id2,
p_print_yn => p_print_yn,
p_attribute_category => p_attribute_category,
p_attribute1 => p_attribute1,
p_attribute2 => p_attribute2,
p_attribute3 => p_attribute3,
p_attribute4 => p_attribute4,
p_attribute5 => p_attribute5,
p_attribute6 => p_attribute6,
p_attribute7 => p_attribute7,
p_attribute8 => p_attribute8,
p_attribute9 => p_attribute9,
p_attribute10 => p_attribute10,
p_attribute11 => p_attribute11,
p_attribute12 => p_attribute12,
p_attribute13 => p_attribute13,
p_attribute14 => p_attribute14,
p_attribute15 => p_attribute15,
p_summary_amend_operation_code => p_summary_amend_operation_code,
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_last_amended_by => l_last_amended_by,
p_last_amendment_date => l_last_amendment_date
);
Okc_Debug.Log('4500: Leaving Insert_Row', 2);
G_PKG_NAME, '4500: Leaving Insert_Row');
Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
G_PKG_NAME, '4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception' );
Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
G_PKG_NAME, '4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception' );
Okc_Debug.Log('4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm);
END Insert_Row;
SELECT object_version_number
FROM OKC_SECTIONS_B
WHERE ID = cp_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_SECTIONS_B
WHERE ID = cp_id;
Okc_Api.Set_Message(G_APP_NAME,G_LOCK_RECORD_DELETED,
'ENTITYNAME','OKC_SECTIONS_B',
'PKEY',p_id,
'OVN',p_object_version_number
);
Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
FUNCTION Update_Row(
p_id IN NUMBER,
p_section_sequence IN NUMBER,
p_label IN VARCHAR2,
p_scn_id IN NUMBER,
p_heading IN VARCHAR2,
p_description IN VARCHAR2,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
p_scn_code IN VARCHAR2,
p_amendment_description IN VARCHAR2,
p_amendment_operation_code IN VARCHAR2,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_print_yn IN VARCHAR2,
p_attribute_category IN VARCHAR2,
p_attribute1 IN VARCHAR2,
p_attribute2 IN VARCHAR2,
p_attribute3 IN VARCHAR2,
p_attribute4 IN VARCHAR2,
p_attribute5 IN VARCHAR2,
p_attribute6 IN VARCHAR2,
p_attribute7 IN VARCHAR2,
p_attribute8 IN VARCHAR2,
p_attribute9 IN VARCHAR2,
p_attribute10 IN VARCHAR2,
p_attribute11 IN VARCHAR2,
p_attribute12 IN VARCHAR2,
p_attribute13 IN VARCHAR2,
p_attribute14 IN VARCHAR2,
p_attribute15 IN VARCHAR2,
p_summary_amend_operation_code 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,
p_last_amended_by IN NUMBER,
p_last_amendment_date IN DATE
) RETURN VARCHAR2 IS
l_chr_id NUMBER;
Okc_Debug.Log('6400: Entered Update_Row', 2);
G_PKG_NAME, '6400: Entered Update_Row');
UPDATE OKC_SECTIONS_B
SET SECTION_SEQUENCE = p_section_sequence,
LABEL = p_label,
SCN_ID = p_scn_id,
HEADING = p_heading,
DESCRIPTION = p_description,
DOCUMENT_TYPE = p_document_type,
DOCUMENT_ID = p_document_id,
CHR_ID = l_chr_id,
SCN_CODE = p_scn_code,
AMENDMENT_DESCRIPTION = p_amendment_description,
AMENDMENT_OPERATION_CODE = p_amendment_operation_code,
ORIG_SYSTEM_REFERENCE_CODE = p_orig_system_reference_code,
ORIG_SYSTEM_REFERENCE_ID1 = p_orig_system_reference_id1,
ORIG_SYSTEM_REFERENCE_ID2 = p_orig_system_reference_id2,
PRINT_YN = p_print_yn,
ATTRIBUTE_CATEGORY = p_attribute_category,
ATTRIBUTE1 = p_attribute1,
ATTRIBUTE2 = p_attribute2,
ATTRIBUTE3 = p_attribute3,
ATTRIBUTE4 = p_attribute4,
ATTRIBUTE5 = p_attribute5,
ATTRIBUTE6 = p_attribute6,
ATTRIBUTE7 = p_attribute7,
ATTRIBUTE8 = p_attribute8,
ATTRIBUTE9 = p_attribute9,
ATTRIBUTE10 = p_attribute10,
ATTRIBUTE11 = p_attribute11,
ATTRIBUTE12 = p_attribute12,
ATTRIBUTE13 = p_attribute13,
ATTRIBUTE14 = p_attribute14,
ATTRIBUTE15 = p_attribute15,
SUMMARY_AMEND_OPERATION_CODE = p_summary_amend_operation_code,
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,
LAST_AMENDED_BY = p_last_amended_by,
LAST_AMENDMENT_DATE = p_last_amendment_date
WHERE ID = p_id;
Okc_Debug.Log('6500: Leaving Update_Row', 2);
G_PKG_NAME, '6500: Leaving Update_Row');
Okc_Debug.Log('6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
END Update_Row;
PROCEDURE Update_Row(
p_validation_level IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
p_id IN NUMBER,
p_section_sequence IN NUMBER,
p_label IN VARCHAR2,
p_scn_id IN NUMBER,
p_heading IN VARCHAR2,
p_description IN VARCHAR2,
p_document_type IN VARCHAR2,
p_document_id IN NUMBER,
p_scn_code IN VARCHAR2,
p_amendment_description IN VARCHAR2,
p_amendment_operation_code IN VARCHAR2,
p_orig_system_reference_code IN VARCHAR2,
p_orig_system_reference_id1 IN NUMBER,
p_orig_system_reference_id2 IN NUMBER,
p_print_yn IN VARCHAR2,
p_attribute_category IN VARCHAR2,
p_attribute1 IN VARCHAR2,
p_attribute2 IN VARCHAR2,
p_attribute3 IN VARCHAR2,
p_attribute4 IN VARCHAR2,
p_attribute5 IN VARCHAR2,
p_attribute6 IN VARCHAR2,
p_attribute7 IN VARCHAR2,
p_attribute8 IN VARCHAR2,
p_attribute9 IN VARCHAR2,
p_attribute10 IN VARCHAR2,
p_attribute11 IN VARCHAR2,
p_attribute12 IN VARCHAR2,
p_attribute13 IN VARCHAR2,
p_attribute14 IN VARCHAR2,
p_attribute15 IN VARCHAR2,
p_summary_amend_operation_code IN VARCHAR2,
p_last_amended_by IN NUMBER,
p_last_amendment_date IN DATE,
p_object_version_number IN NUMBER
) IS
l_section_sequence OKC_SECTIONS_B.SECTION_SEQUENCE%TYPE;
l_last_updated_by OKC_SECTIONS_B.LAST_UPDATED_BY%TYPE;
l_last_update_login OKC_SECTIONS_B.LAST_UPDATE_LOGIN%TYPE;
l_last_update_date OKC_SECTIONS_B.LAST_UPDATE_DATE%TYPE;
Okc_Debug.Log('7000: Entered Update_Row', 2);
G_PKG_NAME, '7000: Entered Update_Row');
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_id => p_id,
p_section_sequence => l_section_sequence,
p_label => l_label,
p_scn_id => l_scn_id,
p_heading => l_heading,
p_description => l_description,
p_document_type => l_document_type,
p_document_id => l_document_id,
p_scn_code => l_scn_code,
p_amendment_description => l_amendment_description,
p_amendment_operation_code => l_amendment_operation_code,
p_orig_system_reference_code => l_orig_system_reference_code,
p_orig_system_reference_id1 => l_orig_system_reference_id1,
p_orig_system_reference_id2 => l_orig_system_reference_id2,
p_print_yn => l_print_yn,
p_attribute_category => l_attribute_category,
p_attribute1 => l_attribute1,
p_attribute2 => l_attribute2,
p_attribute3 => l_attribute3,
p_attribute4 => l_attribute4,
p_attribute5 => l_attribute5,
p_attribute6 => l_attribute6,
p_attribute7 => l_attribute7,
p_attribute8 => l_attribute8,
p_attribute9 => l_attribute9,
p_attribute10 => l_attribute10,
p_attribute11 => l_attribute11,
p_attribute12 => l_attribute12,
p_attribute13 => l_attribute13,
p_attribute14 => l_attribute14,
p_attribute15 => l_attribute15,
p_summary_amend_operation_code => l_summary_amend_operation_code,
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_last_amended_by => l_last_amended_by,
p_last_amendment_date => l_last_amendment_date
);
Okc_Debug.Log('7800: Leaving Update_Row', 2);
G_PKG_NAME, '7800: Leaving Update_Row');
Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
G_PKG_NAME, '7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception' );
Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
G_PKG_NAME, '8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception' );
Okc_Debug.Log('8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm);
END Update_Row;
FUNCTION Delete_Row(
p_id IN NUMBER
) RETURN VARCHAR2 IS
BEGIN
/*IF (l_debug = 'Y') THEN
Okc_Debug.Log('8200: Entered Delete_Row', 2);
G_PKG_NAME, '8200: Entered Delete_Row');
DELETE FROM OKC_SECTIONS_B WHERE ID = p_ID;
Okc_Debug.Log('8300: Leaving Delete_Row', 2);
G_PKG_NAME, '8300: Leaving Delete_Row');
Okc_Debug.Log('8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm );
END Delete_Row;
PROCEDURE Delete_Row(
x_return_status OUT NOCOPY VARCHAR2,
p_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);
G_PKG_NAME, '8800: Entered Delete_Row');
x_return_status := Delete_Row( p_id => p_id );
Okc_Debug.Log('9300: Leaving Delete_Row', 2);
G_PKG_NAME, '9300: Leaving Delete_Row');
Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
G_PKG_NAME, '9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception' );
Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
G_PKG_NAME, '9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception' );
Okc_Debug.Log('9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm);
END Delete_Row;
PROCEDURE delete_set(
x_return_status OUT NOCOPY VARCHAR2,
p_doc_type IN VARCHAR2,
p_doc_id IN NUMBER
) IS
CURSOR lock_csr IS
SELECT rowid FROM OKC_SECTIONS_B
WHERE document_type = p_doc_type and
document_id = p_doc_id
FOR UPDATE NOWAIT;
Okc_Debug.Log('9700: Entered Delete_Set', 2);
G_PKG_NAME, '9700: Entered Delete_Set');
DELETE FROM OKC_SECTIONS_B
WHERE document_type = p_doc_type and
document_id = p_doc_id ;
Okc_Debug.Log('11000: Leaving Delete_set', 2);
G_PKG_NAME, '11000: Leaving Delete_set');
Okc_Debug.Log('000: Leaving Delete_set:E_Resource_Busy Exception', 2);
G_PKG_NAME, '000: Leaving Delete_set:E_Resource_Busy Exception' );
Okc_Debug.Log('11100: Leaving Delete_Set:FND_API.G_EXC_ERROR Exception', 2);
G_PKG_NAME, '11100: Leaving Delete_Set:FND_API.G_EXC_ERROR Exception' );
Okc_Debug.Log('11200: Leaving Delete_Set:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
G_PKG_NAME, '11200: Leaving Delete_Set:FND_API.G_EXC_UNEXPECTED_ERROR Exception' );
Okc_Debug.Log('11300: Leaving Delete_Set because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '11300: Leaving Delete_Set because of EXCEPTION: '||sqlerrm );
END Delete_Set;
INSERT INTO OKC_SECTIONS_BH (
major_version,
ID,
SECTION_SEQUENCE,
SCN_TYPE,
CHR_ID,
SAT_CODE,
LABEL,
SCN_ID,
HEADING,
DESCRIPTION,
DOCUMENT_TYPE,
DOCUMENT_ID,
SCN_CODE,
AMENDMENT_DESCRIPTION,
AMENDMENT_OPERATION_CODE,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
PRINT_YN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
SUMMARY_AMEND_OPERATION_CODE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_AMENDED_BY,
LAST_AMENDMENT_DATE)
SELECT
p_major_version,
ID,
SECTION_SEQUENCE,
SCN_TYPE,
CHR_ID,
SAT_CODE,
LABEL,
SCN_ID,
HEADING,
DESCRIPTION,
DOCUMENT_TYPE,
DOCUMENT_ID,
SCN_CODE,
AMENDMENT_DESCRIPTION,
AMENDMENT_OPERATION_CODE,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
PRINT_YN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
SUMMARY_AMEND_OPERATION_CODE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_AMENDED_BY,
LAST_AMENDMENT_DATE
FROM OKC_SECTIONS_B
WHERE document_type = p_doc_type
AND document_id = p_doc_id;
INSERT INTO OKC_SECTIONS_B (
ID,
SECTION_SEQUENCE,
SCN_TYPE,
CHR_ID,
SAT_CODE,
LABEL,
SCN_ID,
HEADING,
DESCRIPTION,
DOCUMENT_TYPE,
DOCUMENT_ID,
SCN_CODE,
AMENDMENT_DESCRIPTION,
AMENDMENT_OPERATION_CODE,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
PRINT_YN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
SUMMARY_AMEND_OPERATION_CODE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_AMENDED_BY,
LAST_AMENDMENT_DATE)
SELECT
ID,
SECTION_SEQUENCE,
SCN_TYPE,
CHR_ID,
SAT_CODE,
LABEL,
SCN_ID,
HEADING,
DESCRIPTION,
DOCUMENT_TYPE,
DOCUMENT_ID,
SCN_CODE,
AMENDMENT_DESCRIPTION,
AMENDMENT_OPERATION_CODE,
ORIG_SYSTEM_REFERENCE_CODE,
ORIG_SYSTEM_REFERENCE_ID1,
ORIG_SYSTEM_REFERENCE_ID2,
PRINT_YN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
SUMMARY_AMEND_OPERATION_CODE,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_AMENDED_BY,
LAST_AMENDMENT_DATE
FROM OKC_SECTIONS_BH
WHERE document_type = p_doc_type and document_id = p_doc_id AND major_version = p_major_version;
FUNCTION Delete_Version(
p_doc_type IN VARCHAR2,
p_doc_id IN NUMBER,
p_major_version IN NUMBER
) RETURN VARCHAR2 IS
BEGIN
/*IF (l_debug = 'Y') THEN
Okc_Debug.Log('7200: Entered Delete_Version', 2);
G_PKG_NAME, '7200: Entered Delete_Version' );
DELETE
FROM OKC_SECTIONS_BH
WHERE document_type = p_doc_type and document_id = p_doc_id AND major_version = p_major_version;
Okc_Debug.Log('7300: Leaving Delete_Version', 2);
G_PKG_NAME, '7300: Leaving Delete_Version' );
Okc_Debug.Log('7400: Leaving Delete_Version because of EXCEPTION: '||sqlerrm, 2);
G_PKG_NAME, '7400: Leaving Delete_Version because of EXCEPTION: '||sqlerrm );
END Delete_Version;