The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row
( X_rowid in out NOCOPY VARCHAR2
, X_set_of_books_id in NUMBER
, X_future_posting_ccid in NUMBER
, X_default_accounting_rule_id in NUMBER
, X_je_category_name in VARCHAR2
, X_je_source_name in VARCHAR2
, X_creation_date in date
, X_created_by in number
, X_last_update_date in date
, X_last_updated_by in number
, X_last_update_login in number
) IS
CURSOR c_insert IS
SELECT rowid row_id
FROM igi_mpp_setup
WHERE set_of_books_id = X_set_of_books_id ;
INSERT INTO IGI_MPP_SETUP
( set_of_books_id
, future_posting_ccid
, default_accounting_rule_id
, je_category_name
, je_source_name
, creation_date
, created_by
, last_update_date
, last_updated_by
, last_update_login )
VALUES (
X_set_of_books_id
, X_future_posting_ccid
, X_default_accounting_rule_id
, X_je_category_name
, X_je_source_name
, X_creation_date
, X_created_by
, X_last_update_date
, X_last_updated_by
, X_last_update_login
);
OPEN c_insert;
FETCH c_insert INTO X_rowid;
IF c_insert%NOTFOUND THEN
CLOSE c_insert;
FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Insert_Row',FALSE);
CLOSE c_insert;
PROCEDURE update_row
( X_rowid in out NOCOPY VARCHAR2
, X_future_posting_ccid in NUMBER
, X_default_accounting_rule_id in NUMBER
, X_je_category_name in VARCHAR2
, X_je_source_name in VARCHAR2
, X_last_update_date in date
, X_last_updated_by in number
, X_last_update_login in number
) IS
BEGIN
UPDATE igi_mpp_setup SET
future_posting_ccid = X_future_posting_ccid
, default_accounting_rule_id = X_default_accounting_rule_id
, je_category_name = X_je_category_name
, je_source_name = X_je_source_name
, last_update_date = X_last_update_date
, last_updated_by = X_last_updated_by
, last_update_login = X_last_update_login
WHERE rowid = X_rowid
;
FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Update_Row',FALSE);
SELECT *
from igi_mpp_setup
where rowid = X_rowid
for update of set_of_books_id NOWAIT
;
fnd_message.set_name( 'FND', 'FORM_RECORD_DELETED');
FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Lock_Row.FORM_RECORD_DELETED',FALSE);