The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row(
x_org_id pn_rec_expcl_dtl.org_id%TYPE,
x_expense_class_id pn_rec_expcl_dtl.expense_class_id%TYPE,
x_expense_line_id pn_rec_expcl_dtl.expense_line_id%TYPE,
x_expense_class_dtl_id IN OUT NOCOPY pn_rec_expcl_dtl.expense_class_dtl_id%TYPE,
x_status pn_rec_expcl_dtl.status%TYPE,
x_def_area_cls_id pn_rec_expcl_dtl.default_area_class_id%TYPE,
x_cls_line_fee_bf_ct pn_rec_expcl_dtl.cls_line_fee_before_contr%TYPE,
x_cls_line_fee_af_ct pn_rec_expcl_dtl.cls_line_fee_after_contr%TYPE,
x_cls_line_portion_pct pn_rec_expcl_dtl.cls_line_portion_pct%TYPE,
x_last_update_date pn_rec_expcl_dtl.last_update_date%TYPE,
x_last_updated_by pn_rec_expcl_dtl.last_updated_by%TYPE,
x_creation_date pn_rec_expcl_dtl.creation_date%TYPE,
x_created_by pn_rec_expcl_dtl.created_by%TYPE,
x_last_update_login pn_rec_expcl_dtl.last_update_login%TYPE)
IS
l_desc VARCHAR2(100) := 'pn_rec_expcl_dtl_pkg.insert_row';
SELECT org_id
FROM pn_rec_exp_line_all
WHERE expense_line_id = x_expense_line_id ;
INSERT INTO pn_rec_expcl_dtl_all(
org_id,
expense_class_id,
expense_line_id,
expense_class_dtl_id,
status,
default_area_class_id,
cls_line_fee_before_contr,
cls_line_fee_after_contr,
cls_line_portion_pct,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login )
VALUES (
l_org_id,
x_expense_class_id,
x_expense_line_id,
pn_rec_expcl_dtl_s.nextval,
x_status,
x_def_area_cls_id,
x_cls_line_fee_bf_ct,
x_cls_line_fee_af_ct,
x_cls_line_portion_pct,
x_last_update_date,
x_last_updated_by,
x_creation_date,
x_created_by,
x_last_update_login
) RETURNING expense_class_dtl_id INTO x_expense_class_dtl_id;
END insert_row;
PROCEDURE update_row(
x_expense_class_id pn_rec_expcl_dtl.expense_class_id%TYPE,
x_expense_line_id pn_rec_expcl_dtl.expense_line_id%TYPE,
x_expense_class_dtl_id pn_rec_expcl_dtl.expense_class_dtl_id%TYPE,
x_status pn_rec_expcl_dtl.status%TYPE,
x_def_area_cls_id pn_rec_expcl_dtl.default_area_class_id%TYPE,
x_cls_line_fee_bf_ct pn_rec_expcl_dtl.cls_line_fee_before_contr%TYPE,
x_cls_line_fee_af_ct pn_rec_expcl_dtl.cls_line_fee_after_contr%TYPE,
x_cls_line_portion_pct pn_rec_expcl_dtl.cls_line_portion_pct%TYPE,
x_last_update_date pn_rec_expcl_dtl.last_update_date%TYPE,
x_last_updated_by pn_rec_expcl_dtl.last_updated_by%TYPE,
x_creation_date pn_rec_expcl_dtl.creation_date%TYPE,
x_created_by pn_rec_expcl_dtl.created_by%TYPE,
x_last_update_login pn_rec_expcl_dtl.last_update_login%TYPE)
IS
l_desc VARCHAR2(100) := 'pn_rec_expcl_dtl_pkg.update_row';
UPDATE pn_rec_expcl_dtl_all
SET
expense_class_id = x_expense_class_id,
expense_line_id = x_expense_line_id,
status = x_status,
default_area_class_id = x_def_area_cls_id,
cls_line_fee_before_contr = x_cls_line_fee_bf_ct,
cls_line_fee_after_contr = x_cls_line_fee_af_ct,
cls_line_portion_pct = x_cls_line_portion_pct,
last_update_date = x_last_update_date,
last_updated_by = x_last_updated_by,
creation_date = x_creation_date,
created_by = x_created_by,
last_update_login = x_last_update_login
WHERE expense_class_dtl_id = x_expense_class_dtl_id;
END update_row;
PROCEDURE delete_row(x_expense_class_dtl_id pn_rec_expcl_dtl.expense_class_dtl_id%TYPE) IS
l_desc VARCHAR2(100) := 'pn_rec_expcl_dtl_pkg.delete_row';
DELETE pn_rec_expcl_dtl_all
WHERE expense_class_dtl_id = x_expense_class_dtl_id;
END delete_row;