The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(p_row_id IN OUT NOCOPY VARCHAR2
,P_application_id IN NUMBER
,p_dff_name IN VARCHAR2
,p_dff_title_code IN VARCHAR2
,p_context_code IN VARCHAR2
,p_attribute_column IN VARCHAR2
,p_creation_date IN DATE
,p_created_by IN NUMBER
,p_last_update_date IN DATE
,p_last_updated_by IN NUMBER
,p_last_update_login IN NUMBER
,p_chart_of_accounts_id In NUMBER
) IS
l_procedure_name VARCHAR2(100) := 'Insert_Row';
SELECT ROWID
FROM JA_CN_DFF_ASSIGNMENTS
WHERE DFF_TITLE_CODE = p_dff_title_code;
INSERT INTO JA_CN_DFF_ASSIGNMENTS
(application_id
,descriptive_flexfield_name
,dff_title_code
,context_code
,attribute_column
,creation_date
,created_by
,last_update_date
,last_updated_by
,last_update_login
,chart_of_accounts_id
)
VALUES
(
p_application_id
,p_dff_name
,p_dff_title_code
,p_context_code
,p_attribute_column
,p_creation_date
,p_created_by
,p_last_update_date
,p_last_updated_by
,p_last_update_login
,p_chart_of_accounts_id
);
END Insert_Row;
PROCEDURE Update_Row(p_row_id IN OUT NOCOPY VARCHAR2
,p_application_id IN NUMBER
,p_dff_name IN VARCHAR2
,p_dff_title_code IN VARCHAR2
,p_context_code IN VARCHAR2
,p_attribute_column IN VARCHAR2
,p_creation_date IN DATE
,p_created_by IN NUMBER
,p_last_update_date IN DATE
,p_last_updated_by IN NUMBER
,p_last_update_login IN NUMBER
,p_chart_of_accounts_id In NUMBER) IS
l_procedure_name VARCHAR2(100) := 'Update_Row';
UPDATE JA_CN_DFF_ASSIGNMENTS
SET application_id = p_application_id,
descriptive_flexfield_name = p_dff_name,
dff_title_code = p_dff_title_code,
context_code = p_context_code,
attribute_column = p_attribute_column,
creation_date = p_creation_date,
created_by = p_created_by,
last_update_date = p_last_update_date,
last_updated_by = p_last_updated_by,
last_update_login = p_last_update_login,
chart_of_accounts_id = p_chart_of_accounts_id
WHERE ROWID = p_row_id;
END Update_Row;
,p_last_update_date IN DATE
,p_last_updated_by IN NUMBER
,p_last_update_login IN NUMBER
,p_chart_of_accounts_id In NUMBER) IS
l_procedure_name VARCHAR2(100) := 'Lock_Row';
SELECT *
FROM JA_CN_DFF_ASSIGNMENTS
WHERE ROWID = p_row_id
FOR UPDATE OF dff_title_code NOWAIT;
'FORM_RECORD_DELETED');