The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW(X_ROW_ID IN OUT VARCHAR2,
x_from_op_seq_id NUMBER,
x_to_op_seq_id NUMBER,
x_transition_type NUMBER,
x_planning_pct NUMBER,
x_last_updated_by NUMBER,
x_creation_date DATE,
x_last_update_date DATE,
x_created_by NUMBER,
x_last_update_login NUMBER,
x_attribute_category 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 BOM_OPERATION_NETWORKS
WHERE FROM_OP_SEQ_ID = X_FROM_OP_SEQ_ID
AND TO_OP_SEQ_ID = X_TO_OP_SEQ_ID;
INSERT INTO BOM_OPERATION_NETWORKS(
from_op_seq_id,
to_op_seq_id,
transition_type,
planning_pct,
last_updated_by,
creation_date,
last_update_date,
created_by,
last_update_login,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
) VALUES (
x_from_op_seq_id,
x_to_op_seq_id ,
x_transition_type,
x_planning_pct ,
x_last_updated_by,
x_creation_date,
x_last_update_date,
x_created_by,
x_last_update_login,
x_attribute_category,
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;
x_last_updated_by NUMBER,
x_creation_date DATE,
x_last_update_date DATE,
x_created_by NUMBER,
x_last_update_login NUMBER,
x_attribute_category 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_op_seq_id,
to_op_seq_id,
transition_type,
planning_pct,
effectivity_date,
disable_date,
last_updated_by,
creation_date,
last_update_date,
created_by,
last_update_login,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
FROM BOM_OPERATION_NETWORKS
WHERE rowid = x_row_id
FOR UPDATE of from_op_seq_id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_ROW_ID VARCHAR2,
x_from_op_seq_id NUMBER,
x_to_op_seq_id NUMBER,
x_transition_type NUMBER,
x_planning_pct NUMBER,
x_effectivity_date DATE,
x_disable_date DATE,
x_last_updated_by NUMBER,
x_creation_date DATE,
x_last_update_date DATE,
x_created_by NUMBER,
x_last_update_login NUMBER,
x_attribute_category 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
UPDATE BOM_OPERATION_NETWORKS SET
from_op_seq_id = x_from_op_seq_id,
to_op_seq_id = x_to_op_seq_id,
transition_type = x_transition_type,
planning_pct = x_planning_pct,
effectivity_date = x_effectivity_date,
created_by = x_created_by,
creation_date = x_creation_date,
disable_date = x_disable_date,
last_update_date = SYSDATE,
last_updated_by = x_last_updated_by,
last_update_login = x_last_update_login,
attribute_category = x_attribute_category,
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_row_id;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
DELETE FROM BOM_OPERATION_NETWORKS
WHERE rowid=x_rowid;
END Delete_Row;
SELECT operation_seq_num
INTO from_op_seq_num
FROM bom_operation_sequences
WHERE operation_sequence_id = x_from_op_seq_id;
SELECT operation_seq_num
INTO to_op_seq_num
FROM bom_operation_sequences
WHERE operation_sequence_id = x_to_op_seq_id;
SELECT 1 INTO dummy FROM DUAL WHERE NOT EXISTS
(SELECT 1 FROM BOM_OPERATION_NETWORKS
WHERE from_op_seq_id = X_From_Op_Seq_Id
AND To_Op_Seq_Id = X_To_Op_Seq_Id
AND ((X_Rowid IS NULL) OR (ROWID <> X_Rowid))
);