The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE CUSTOM_UPDATE_CHARGE_ACCOUNT(
p_orig_ccid IN NUMBER, -- the code-combination ID before any user changes
p_changed_seg IN NUMBER, -- index of the changed segment (starts at 0)
p_seg_vals IN OUT NOCOPY POR_CHARGE_ACCT_SEG_TBL_TYPE, -- table of segment values
result_code OUT NOCOPY NUMBER,
x_error_msg OUT NOCOPY VARCHAR2
)
IS
BEGIN
result_code := 0;