The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
P_PAY_GL_ACCOUNT_ID OUT NOCOPY NUMBER,
P_EFFECTIVE_START_DATE in DATE,
P_EFFECTIVE_END_DATE in DATE,
P_SET_OF_BOOKS_ID in NUMBER,
P_GL_CASH_AC_ID in NUMBER,
P_GL_CASH_CLEARING_AC_ID in NUMBER,
P_GL_CONTROL_AC_ID in NUMBER,
P_GL_ERROR_AC_ID in NUMBER,
P_EXTERNAL_ACCOUNT_ID in NUMBER,
P_ORG_PAYMENT_METHOD_ID in NUMBER,
P_DEFAULT_GL_ACCOUNT in VARCHAR2
) is
--
cursor C is select ROWID from PAY_PAYMENT_GL_ACCOUNTS_F
where PAY_GL_ACCOUNT_ID = P_PAY_GL_ACCOUNT_ID
;
l_proc varchar2(100) := 'PAY_PAYMENT_GL_ACCOUNTS_PKG.INSERT_ROW';
update pay_payment_gl_accounts_f
set
set_of_books_id = p_set_of_books_id,
gl_cash_ac_id = p_gl_cash_ac_id,
gl_cash_clearing_ac_id = p_gl_cash_clearing_ac_id,
gl_control_ac_id = p_gl_control_ac_id,
gl_error_ac_id = p_gl_error_ac_id
where
pay_gl_account_id = l_def_gl_acct_id and
external_account_id = p_external_account_id ;
hr_utility.set_message_token('PROCEDURE','PAY_PAYMENT_GL_ACCOUNTS_PKG.INSERT_ROW');
end INSERT_ROW;
procedure UPDATE_ROW (
P_EFFECTIVE_START_DATE in DATE,
P_EFFECTIVE_END_DATE in DATE,
P_SET_OF_BOOKS_ID in NUMBER,
P_GL_CASH_AC_ID in NUMBER,
P_GL_CASH_CLEARING_AC_ID in NUMBER,
P_GL_CONTROL_AC_ID in NUMBER,
P_GL_ERROR_AC_ID in NUMBER,
P_EXTERNAL_ACCOUNT_ID in NUMBER,
P_ORG_PAYMENT_METHOD_ID in NUMBER,
P_DT_UPDATE_MODE IN VARCHAR2,
P_DEFAULT_GL_ACCOUNT in VARCHAR2,
P_PAY_GL_ACCOUNT_ID_OUT out nocopy number
) is
--
l_ovn number;
l_proc varchar2(100) := 'PAY_PAYMENT_GL_ACCOUNTS_PKG.UPDATE_ROW';
select object_version_number
from pay_payment_gl_accounts_f
where pay_gl_account_id = p_gl_acct_id
and p_effective_date between
effective_start_date and effective_end_date;
select gl_cash_ac_id, gl_cash_clearing_ac_id, gl_control_ac_id, gl_error_ac_id, set_of_books_id
from pay_payment_gl_accounts_f
where external_account_id = p_ext_gl_id
and p_effective_date between effective_start_date and effective_end_date;
select pay_payment_gl_accounts_s.nextval
from dual;
select effective_start_date, effective_end_date, external_account_id
from pay_org_payment_methods_f
where org_payment_method_id = p_org_payment_method_id;
update pay_payment_gl_accounts_f
set
set_of_books_id = p_set_of_books_id,
gl_cash_ac_id = p_gl_cash_ac_id,
gl_cash_clearing_ac_id = p_gl_cash_clearing_ac_id,
gl_control_ac_id = p_gl_control_ac_id,
gl_error_ac_id = p_gl_error_ac_id
where
pay_gl_account_id = l_def_gl_acct_id and
external_account_id = p_external_account_id ;
hr_utility.set_message_token('PROCEDURE','PAY_PAYMENT_GL_ACCOUNTS_PKG.UPDATE_ROW');
,p_datetrack_mode => p_dt_update_mode
,p_pay_gl_account_id => l_opm_gl_acct_id
,p_object_version_number => l_ovn
,p_set_of_books_id => p_set_of_books_id
,p_gl_cash_ac_id => p_gl_cash_ac_id
,p_gl_cash_clearing_ac_id => p_gl_cash_clearing_ac_id
,p_gl_control_ac_id => p_gl_control_ac_id
,p_gl_error_ac_id => p_gl_error_ac_id
,p_effective_start_date => l_esd_out
,p_effective_end_date => l_eed_out
);
hr_utility.set_message_token('PROCEDURE','PAY_PAYMENT_GL_ACCOUNTS_PKG.UPDATE_ROW');
hr_utility.trace('Inserting Row for OPM: ' || p_org_payment_method_id || ' ' || l_rec.effective_start_date || ' ' || l_rec.effective_end_date );
insert into PAY_PAYMENT_GL_ACCOUNTS_F
(
PAY_GL_ACCOUNT_ID,
EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE,
SET_OF_BOOKS_ID,
GL_CASH_AC_ID,
GL_CASH_CLEARING_AC_ID,
GL_CONTROL_AC_ID,
GL_ERROR_AC_ID,
EXTERNAL_ACCOUNT_ID,
ORG_PAYMENT_METHOD_ID,
OBJECT_VERSION_NUMBER
)
values
(
l_seq_id,
trunc(l_rec.effective_start_date),
trunc(l_rec.effective_end_date),
l_def_gl_set_of_books_id,
l_def_gl_cash_ac_id,
l_def_gl_cash_clearing_ac_id,
l_def_gl_control_ac_id,
l_def_gl_error_ac_id,
null,
p_org_payment_method_id,
l_ovn_seq
);
hr_utility.set_message_token('PROCEDURE','PAY_PAYMENT_GL_ACCOUNTS_PKG.UPDATE_ROW');
end UPDATE_ROW;
procedure DELETE_ROW (
p_org_payment_method_id in NUMBER
,p_effective_date in DATE
,p_datetrack_mode in VARCHAR2
,p_org_eff_start_date in DATE
,p_org_eff_end_date in DATE )
is
--
cursor csr_opm_gl_rows is
select pay_gl_account_id, object_version_number
from pay_payment_gl_accounts_f
where org_payment_method_id = p_org_payment_method_id
and p_effective_date between effective_start_date and effective_end_date ;
l_proc varchar2(100) := 'PAY_PAYMENT_GL_ACCOUNTS_PKG.DELETE_ROW';
end DELETE_ROW;
select pga.pay_gl_account_id
from pay_payment_gl_accounts_f pga
where pga.external_account_id = p_external_account_id;
select distinct pga.pay_gl_account_id
from pay_payment_gl_accounts_f pga
where pga.org_payment_method_id = p_org_payment_method_id;
select gl_cash_ac_id, gl_cash_clearing_ac_id, gl_control_ac_id, gl_error_ac_id, set_of_books_id
from pay_payment_gl_accounts_f
where pay_gl_account_id = p_pay_gl_account_id
and p_effective_date between effective_start_date and effective_end_date;
select name, chart_of_accounts_id
from gl_sets_of_books
where set_of_books_id = p_set_of_books_id;