The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Coa_Mapping_Id IN OUT NOCOPY NUMBER,
X_To_Coa_Id NUMBER,
X_From_Coa_Id NUMBER,
X_Name VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Login NUMBER,
X_Description VARCHAR2,
X_Start_Date_Active DATE,
X_End_Date_Active DATE,
X_Security_Flag VARCHAR2
) IS
CURSOR C IS SELECT rowid FROM gl_coa_mappings
WHERE coa_mapping_id = X_Coa_Mapping_Id;
INSERT INTO gl_coa_mappings(
coa_mapping_id,
to_coa_id,
from_coa_id,
name,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
description,
start_date_active,
end_date_active,
security_flag
) VALUES (
X_Coa_Mapping_Id,
X_To_Coa_Id,
X_From_Coa_Id,
X_Name,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
X_Last_Update_Login,
X_Description,
X_Start_Date_Active,
X_End_Date_Active,
X_Security_Flag
);
END Insert_Row;
SELECT *
FROM gl_coa_mappings
WHERE rowid = X_Rowid
FOR UPDATE of Coa_Mapping_Id NOWAIT;
PROCEDURE Update_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Coa_Mapping_Id IN OUT NOCOPY NUMBER,
X_To_Coa_Id NUMBER,
X_From_Coa_Id NUMBER,
X_Name VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER,
X_Description VARCHAR2,
X_Start_Date_Active DATE,
X_End_Date_Active DATE,
X_Security_Flag VARCHAR2
) IS
BEGIN
UPDATE gl_coa_mappings
SET
coa_mapping_id = X_Coa_Mapping_Id,
to_coa_id = X_To_Coa_Id,
from_coa_id = X_From_Coa_Id,
name = X_Name,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login,
description = X_Description,
start_date_active = X_Start_Date_Active,
end_date_active = X_End_Date_Active,
security_flag = X_Security_Flag
WHERE rowid = X_rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2, X_Coa_Mapping_Id NUMBER) IS
BEGIN
null;
DELETE FROM GL_CONS_FLEXFIELD_MAP
WHERE COA_MAPPING_ID = X_Coa_Mapping_Id;
DELETE FROM GL_CONS_SEGMENT_MAP
WHERE COA_MAPPING_ID = X_Coa_Mapping_Id;
DELETE FROM gl_coa_mappings
WHERE rowid = X_Rowid;
END Delete_Row;
SELECT 1
FROM GL_COA_MAPPINGS map
WHERE map.name = X_Name
AND ( X_Rowid is NULL
OR map.rowid <> X_Rowid);
SELECT 1
FROM GL_COA_MAPPINGS map
WHERE map.coa_mapping_id = X_Coa_Mapping_Id
AND ( X_Rowid is NULL
OR map.rowid <> X_Rowid);
SELECT 'Y'
FROM DUAL
WHERE EXISTS
( SELECT flex.application_column_name
FROM FND_ID_FLEX_SEGMENTS flex
WHERE flex.application_id = 101
AND flex.id_flex_code = 'GL#'
AND flex.enabled_flag = 'Y'
AND flex.id_flex_num = X_From_Coa_Id
MINUS
SELECT map.from_application_column_name
FROM GL_CONS_SEGMENT_MAP map
WHERE map.coa_mapping_id = X_Coa_Mapping_Id
);