The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT je_batch_id
INTO dummy2
FROM gl_je_headers jeh
WHERE jeh.je_header_id = header_id
FOR UPDATE;
SELECT 'Good batch'
INTO dummy
FROM gl_je_batches jeb
WHERE jeb.je_batch_id = dummy2
FOR UPDATE;
SELECT jeh.tax_status_code, jeh.ledger_id, jeb.org_id,
jeb.default_period_name, lgr.currency_code
INTO tax_status_code, lgr_id, org_id, per_name,
base_currency
FROM gl_je_headers jeh, gl_je_batches jeb, gl_ledgers lgr
WHERE jeh.je_header_id = header_id
AND jeb.je_batch_id = jeh.je_batch_id
AND lgr.ledger_id = jeh.ledger_id;
SELECT nvl(multi_org_flag, 'N')
INTO dummy
FROM fnd_product_groups;
rec_next_line_num NUMBER; -- Next unused line number to insert recon lines
SELECT max(jeh.je_header_id), max(jel.je_line_num) + 1,
max(jeh.currency_conversion_rate),
max(jeh.default_effective_date),
max(jeh.currency_code),
max(decode(curr.minimum_accountable_unit,
NULL, power(10, -1*curr.precision),
curr.minimum_accountable_unit))
FROM gl_je_headers jeh, fnd_currencies curr, gl_je_lines jel
WHERE jeh.je_header_id = batch_header_id
AND curr.currency_code = jeh.currency_code
AND jel.je_header_id = jeh.je_header_id;
SELECT jeh.je_header_id, max(jel.je_line_num) + 1,
max(jeh.currency_conversion_rate),
max(jeh.default_effective_date),
max(jeh.currency_code),
max(decode(curr.minimum_accountable_unit,
NULL, power(10, -1*curr.precision),
curr.minimum_accountable_unit))
FROM gl_je_headers jeh, fnd_currencies curr, gl_je_lines jel
WHERE jeh.je_batch_id = batch_header_id
AND jeh.tax_status_code = 'R'
AND curr.currency_code = jeh.currency_code
AND jel.je_header_id = jeh.je_header_id
GROUP BY jeh.je_header_id;
SELECT max(decode(jeh.tax_status_code, 'R', '1', '0'))
INTO tax_status_code
FROM gl_je_headers jeh
WHERE jeh.je_batch_id = batch_header_id;
INSERT INTO gl_je_lines
(ledger_id, je_header_id, je_line_num,
code_combination_id, status,
period_name, effective_date,
entered_dr, entered_cr,
accounted_dr, accounted_cr,
taxable_line_flag, tax_line_flag, tax_group_id,
description,
creation_date, created_by,
last_update_date, last_updated_by, last_update_login)
VALUES
(lgr_id, header_id, next_line_num,
tax_ccid, 'U',
per_name, eff_date,
total_jtax_dr, total_jtax_cr,
total_jtax_acc_dr, total_jtax_acc_cr,
'N', 'Y', tax_group,
ltrim(rtrim(tax_line_descr)),
sysdate, user_id,
sysdate, user_id, login_id);
UPDATE gl_je_lines jel
SET entered_dr = decode(incl_tax,
'Y', jel.entered_dr - line_tax_dr,
jel.entered_dr),
entered_cr = decode(incl_tax,
'Y', jel.entered_cr - line_tax_cr,
jel.entered_cr),
accounted_dr = decode(incl_tax,
'Y', jel.accounted_dr - line_tax_acc_dr,
jel.accounted_dr),
accounted_cr = decode(incl_tax,
'Y', jel.accounted_cr - line_tax_acc_cr,
jel.accounted_cr),
tax_group_id = tax_group,
last_update_date = sysdate,
last_updated_by = user_id,
last_update_login = login_id
WHERE jel.je_header_id = header_id
AND jel.je_line_num = line_num;
UPDATE gl_je_headers
SET tax_status_code = 'T',
last_updated_by = user_id,
last_update_date = sysdate,
last_update_login = login_id,
(running_total_dr, running_total_cr,
running_total_accounted_dr, running_total_accounted_cr)
= (SELECT sum(entered_dr), sum(entered_cr),
sum(accounted_dr), sum(accounted_cr)
FROM gl_je_lines
WHERE je_header_id = header_id)
WHERE je_header_id = header_id
AND tax_status_code = 'R';
SELECT sum(entered_dr), sum(entered_cr),
sum(accounted_dr), sum(accounted_cr)
INTO header_total_dr, header_total_cr,
header_total_acc_dr, header_total_acc_cr
FROM gl_je_lines
WHERE je_header_id = header_id;
retval := gl_je_lines_recon_pkg.insert_gen_line_recon_lines
(
X_Je_Header_Id => header_id,
X_From_Je_Line_Num => rec_next_line_num,
X_Last_Updated_By => user_id,
X_Last_Update_Login => login_id
);
SELECT sum(running_total_dr), sum(running_total_cr),
sum(running_total_accounted_dr),
sum(running_total_accounted_cr)
INTO batch_total_dr, batch_total_cr,
batch_total_acc_dr, batch_total_acc_cr
FROM gl_je_headers
WHERE je_batch_id = batch_header_id
AND je_header_id <> nvl(disp_header_id, -1);