The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure updateBatchStatus(
p_batch_id IN iby_pay_batches_all.batch_id%TYPE,
p_new_status IN iby_pay_batches_all.batch_status%TYPE,
p_error_code IN iby_pay_batches_all.bep_code%TYPE,
p_error_message IN iby_pay_batches_all.bep_message%TYPE
)
IS
begin
update iby_pay_batches_all
set batch_status = p_new_status,
bep_code = p_error_code,
bep_message = p_error_message,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
object_version_number = object_version_number + 1
where batch_id = p_batch_id;
end updateBatchStatus;
PROCEDURE updateECBatches
(
payerid_in IN iby_pay_batches_all.payer_id%TYPE,
bepid_in IN iby_pay_batches_all.bepid%TYPE,
bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
newbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE
)
IS
BEGIN
UPDATE iby_pay_batches_all
SET
batch_status = newstatus_in,
iby_batch_id = newbatchid_in,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
object_version_number = object_version_number + 1
WHERE bepid = bepid_in
AND bepkey = bepkey_in
AND payer_id = payerid_in
AND batch_status = oldstatus_in
AND ((iby_batch_id IS NULL AND oldbatchid_in IS NULL) OR (iby_batch_id = oldbatchid_in));
END updateECBatches;
PROCEDURE updateTrxnStatus(
p_batch_id IN iby_pay_payments_all.batch_id%TYPE,
p_trxn_id IN iby_pay_payments_all.pmt_trxn_id%TYPE,
p_new_status IN iby_pay_payments_all.pmt_status%TYPE,
p_error_code IN iby_pay_payments_all.bep_code%TYPE,
p_error_message IN iby_pay_payments_all.bep_message%TYPE
)
IS
begin
IF (p_trxn_id <> 0) THEN
update iby_pay_payments_all
set pmt_status = p_new_status,
bep_code = p_error_code,
bep_message = p_error_message,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
object_version_number = object_version_number + 1
where batch_id = p_batch_id and pmt_trxn_id = p_trxn_id;
update iby_pay_payments_all
set pmt_status = p_new_status,
bep_code = p_error_code,
bep_message = p_error_message,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
object_version_number = object_version_number + 1
where batch_id = p_batch_id;
end updateTrxnStatus;
SELECT pb.batch_id
FROM IBY_PAY_BATCHES_ALL pb,
IBY_BATCHES_ALL ibyb
WHERE ibyb.batchid = p_iby_batchid
AND ibyb.payeeid = p_payerid;
UPDATE iby_pay_payments_all
SET
pmt_status = G_STATUS_QRY_TRXN_FAIL,
bep_code = p_error_code,
bep_message = p_error_message,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.conc_login_id,
object_version_number = object_version_number + 1
WHERE batch_id = l_ec_batch_rec.batch_id;
UPDATE iby_pay_batches_all
SET
batch_status = G_STATUS_QRY_BATCH_FAIL,
bep_code = p_error_code,
bep_message = p_error_message,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.conc_login_id,
object_version_number = object_version_number + 1
WHERE batch_id = l_ec_batch_rec.batch_id;
UPDATE iby_batches_all
SET
batchstatus = G_STATUS_QRY_BATCH_FAIL,
bepcode = p_error_code,
bepmessage = p_error_message,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.conc_login_id,
object_version_number = object_version_number + 1
WHERE batchid = p_iby_batchid
AND payeeid = p_payerid;
PROCEDURE updateQueryStatus (
p_payerid IN VARCHAR2,
p_iby_batchid IN VARCHAR2
)
IS
l_unfinished_ecbatch_notfound BOOLEAN := TRUE;
SELECT pb.batch_id, pb.batch_status
FROM IBY_PAY_BATCHES_ALL pb,
IBY_BATCHES_ALL ibyb
WHERE ibyb.batchid = p_iby_batchid
AND ibyb.payeeid = p_payerid
AND pb.batch_status not in (G_STATUS_SUCCESS, G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
SELECT pb.batch_id
FROM IBY_PAY_BATCHES_ALL pb,
IBY_BATCHES_ALL ibyb
WHERE ibyb.batchid = p_iby_batchid
AND ibyb.payeeid = p_payerid
AND pb.batch_status in (G_STATUS_SUCCESS, G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
SELECT count(pb.batch_id)
FROM IBY_PAY_BATCHES_ALL pb,
IBY_BATCHES_ALL ibyb
WHERE ibyb.batchid = p_iby_batchid
AND ibyb.payeeid = p_payerid;
SELECT count(pb.batch_id)
FROM IBY_PAY_BATCHES_ALL pb,
IBY_BATCHES_ALL ibyb
WHERE ibyb.batchid = p_iby_batchid
AND ibyb.payeeid = p_payerid
AND pb.batch_status in (G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
SELECT pt.pmt_trxn_id
FROM IBY_PAY_PAYMENTS_ALL pt
WHERE pt.batch_id = p_batch_id
AND pt.pmt_status not in (G_STATUS_SUCCESS, G_STATUS_BEP_ERROR, G_STATUS_QRY_TRXN_FAIL);
SELECT pt.pmt_trxn_id
FROM IBY_PAY_PAYMENTS_ALL pt
WHERE pt.batch_id = p_batch_id
AND pt.pmt_status in (G_STATUS_SUCCESS, G_STATUS_BEP_ERROR, G_STATUS_QRY_TRXN_FAIL);
SELECT count(pt.pmt_trxn_id)
FROM IBY_PAY_PAYMENTS_ALL pt
WHERE pt.batch_id = p_batch_id;
SELECT count(pt.pmt_trxn_id)
FROM IBY_PAY_PAYMENTS_ALL pt
WHERE pt.batch_id = p_batch_id
--AND pt.pmt_status <> G_STATUS_SUCCESS;
UPDATE iby_pay_batches_all
SET
batch_status = l_batch_status,
bep_code = null,
bep_message = null,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.conc_login_id,
object_version_number = object_version_number + 1
WHERE batch_id = l_ec_batch_rec.batch_id;
UPDATE iby_batches_all
SET
batchstatus = l_batch_status,
bepcode = null,
bepmessage = null,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.conc_login_id,
object_version_number = object_version_number + 1
WHERE batchid = p_iby_batchid
AND payeeid = p_payerid;
UPDATE iby_batches_all
SET
batchstatus = l_batch_status,
bepcode = null,
bepmessage = null,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.conc_login_id,
object_version_number = object_version_number + 1
WHERE batchid = p_iby_batchid
AND payeeid = p_payerid;