The following lines contain the word 'select', 'insert', 'update' or 'delete':
CURSOR C1 IS SELECT 'Overlaps'
FROM JG_ZZ_TA_CC_RANGES CCS
WHERE RULE_SET_ID = X_rule_set_id
AND ((CCS.cc_range_low between
X_cc_range_low and X_cc_range_high)
OR
(CCS.cc_range_high between
X_cc_range_low and X_cc_range_high)
OR
(X_cc_range_low between
CCS.cc_range_low and CCS.cc_range_high)
OR
(X_cc_range_high between
CCS.cc_range_low and CCS.cc_range_high))
AND ROWIDTOCHAR(CCS.rowid) <> nvl(X_rowid, 'x');
PROCEDURE Insert_Row( X_rowid IN OUT NOCOPY VARCHAR2
,X_cc_range_id IN OUT NOCOPY NUMBER
,X_rule_set_id IN OUT NOCOPY NUMBER
,X_cc_range_low VARCHAR2
,X_cc_range_high VARCHAR2
,X_creation_date DATE
,X_created_by NUMBER
,X_last_updated_by NUMBER
,X_last_update_date DATE
,X_last_update_login NUMBER
,X_description VARCHAR2
,X_Context VARCHAR2
,X_attribute1 VARCHAR2
,X_attribute2 VARCHAR2
,X_attribute3 VARCHAR2
,X_attribute4 VARCHAR2
,X_attribute5 VARCHAR2
,X_attribute6 VARCHAR2
,X_attribute7 VARCHAR2
,X_attribute8 VARCHAR2
,X_attribute9 VARCHAR2
,X_attribute10 VARCHAR2
,X_attribute11 VARCHAR2
,X_attribute12 VARCHAR2
,X_attribute13 VARCHAR2
,X_attribute14 VARCHAR2
,X_attribute15 VARCHAR2 ) IS
CURSOR C IS SELECT rowid
FROM JG_ZZ_TA_CC_RANGES
WHERE CC_RANGE_ID = X_cc_range_id;
CURSOR C2 IS SELECT JG_ZZ_TA_CC_RANGES_S.nextval FROM sys.dual;
CURSOR C4 IS SELECT JG_ZZ_TA_RULE_SETS_S.nextval FROM sys.dual;
CURSOR C3 IS SELECT 'FOUND'
FROM JG_ZZ_TA_CC_RANGES
WHERE RULE_SET_ID = X_rule_set_id
AND CC_RANGE_LOW = X_cc_range_low
AND CC_RANGE_HIGH = X_cc_range_high;
-- Insert Row
--
INSERT INTO JG_ZZ_TA_CC_RANGES
(
rule_set_id
,cc_range_id
,cc_range_low
,cc_range_high
,creation_date
,created_by
,last_updated_by
,last_update_date
,last_update_login
,description
,context
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
)
VALUES
(
X_rule_set_id
,X_cc_range_id
,X_cc_range_low
,X_cc_range_high
,X_creation_date
,X_created_by
,X_last_updated_by
,X_last_update_date
,X_last_update_login
,X_description
,X_context
,X_attribute1
,X_attribute2
,X_attribute3
,X_attribute4
,X_attribute5
,X_attribute6
,X_attribute7
,X_attribute8
,X_attribute9
,X_attribute10
,X_attribute11
,X_attribute12
,X_attribute13
,X_attribute14
,X_attribute15
);
END insert_row;
PROCEDURE Update_Row( X_rowid VARCHAR2
,X_cc_range_id NUMBER
,X_rule_set_id NUMBER
,X_cc_range_low VARCHAR2
,X_cc_range_high VARCHAR2
,X_creation_date DATE
,X_created_by NUMBER
,X_last_updated_by NUMBER
,X_last_update_date DATE
,X_last_update_login NUMBER
,X_description VARCHAR2
,X_Context VARCHAR2
,X_attribute1 VARCHAR2
,X_attribute2 VARCHAR2
,X_attribute3 VARCHAR2
,X_attribute4 VARCHAR2
,X_attribute5 VARCHAR2
,X_attribute6 VARCHAR2
,X_attribute7 VARCHAR2
,X_attribute8 VARCHAR2
,X_attribute9 VARCHAR2
,X_attribute10 VARCHAR2
,X_attribute11 VARCHAR2
,X_attribute12 VARCHAR2
,X_attribute13 VARCHAR2
,X_attribute14 VARCHAR2
,X_attribute15 VARCHAR2 ) IS
BEGIN
--
-- Standard ON-UPDATE routine
--
UPDATE JG_ZZ_TA_CC_RANGES
SET
rule_set_id = X_rule_set_id
,cc_range_id = X_cc_range_id /* ??????? */
,cc_range_low = X_cc_range_low
,cc_range_high = X_cc_range_high
,creation_date = X_creation_date
,created_by = X_created_by
,last_updated_by = X_last_updated_by
,last_update_date = X_last_update_date
,last_update_login = X_last_update_login
,description = X_description
,context = X_context
,attribute1 = X_attribute1
,attribute2 = X_attribute2
,attribute3 = X_attribute3
,attribute4 = X_attribute4
,attribute5 = X_attribute5
,attribute6 = X_attribute6
,attribute7 = X_attribute7
,attribute8 = X_attribute8
,attribute9 = X_attribute9
,attribute10 = X_attribute10
,attribute11 = X_attribute11
,attribute12 = X_attribute12
,attribute13 = X_attribute13
,attribute14 = X_attribute14
,attribute15 = X_attribute15
WHERE
rowid = X_rowid;
END Update_Row;
PROCEDURE Delete_Row( X_rowid VARCHAR2 ) IS
-- ITHEODOR CHANGE START
CURSOR Get_Children(P_rowid VARCHAR2) IS
SELECT Row_Id
FROM JG_ZZ_TA_ACCOUNT_RANGES_V C
WHERE C.CC_RANGE_ID = (SELECT P.CC_RANGE_ID
FROM JG_ZZ_TA_CC_RANGES P
WHERE P.ROWID = P_rowid);
JG_ZZ_TA_ACCOUNT_RANGES_PKG.Delete_Row( Rec.Row_id );
DELETE FROM JG_ZZ_TA_CC_RANGES
WHERE
ROWID = X_rowid;
END Delete_Row;
,X_last_updated_by NUMBER
,X_last_update_date DATE
,X_last_update_login NUMBER
,X_description VARCHAR2
,X_Context VARCHAR2
,X_attribute1 VARCHAR2
,X_attribute2 VARCHAR2
,X_attribute3 VARCHAR2
,X_attribute4 VARCHAR2
,X_attribute5 VARCHAR2
,X_attribute6 VARCHAR2
,X_attribute7 VARCHAR2
,X_attribute8 VARCHAR2
,X_attribute9 VARCHAR2
,X_attribute10 VARCHAR2
,X_attribute11 VARCHAR2
,X_attribute12 VARCHAR2
,X_attribute13 VARCHAR2
,X_attribute14 VARCHAR2
,X_attribute15 VARCHAR2 ) IS
CURSOR C IS
SELECT *
FROM JG_ZZ_TA_CC_RANGES
WHERE rowid = X_Rowid
FOR UPDATE of rule_set_id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');