13:
14: /* ========================================================================
15: -- Procedure Name: updateBatchStatus
16: --
17: -- Purpose: This procedure will update the iby_pay_batches_all table
18: -- with the new batch status value.
19: -- The possible batch status values considered at present
20: -- includes -
21: -- 1) 18 - Submitted to Processor
41: --
42: -- =======================================================================*/
43:
44: procedure updateBatchStatus(
45: p_batch_id IN iby_pay_batches_all.batch_id%TYPE,
46: p_new_status IN iby_pay_batches_all.batch_status%TYPE,
47: p_error_code IN iby_pay_batches_all.bep_code%TYPE,
48: p_error_message IN iby_pay_batches_all.bep_message%TYPE
49: )
42: -- =======================================================================*/
43:
44: procedure updateBatchStatus(
45: p_batch_id IN iby_pay_batches_all.batch_id%TYPE,
46: p_new_status IN iby_pay_batches_all.batch_status%TYPE,
47: p_error_code IN iby_pay_batches_all.bep_code%TYPE,
48: p_error_message IN iby_pay_batches_all.bep_message%TYPE
49: )
50: IS
43:
44: procedure updateBatchStatus(
45: p_batch_id IN iby_pay_batches_all.batch_id%TYPE,
46: p_new_status IN iby_pay_batches_all.batch_status%TYPE,
47: p_error_code IN iby_pay_batches_all.bep_code%TYPE,
48: p_error_message IN iby_pay_batches_all.bep_message%TYPE
49: )
50: IS
51:
44: procedure updateBatchStatus(
45: p_batch_id IN iby_pay_batches_all.batch_id%TYPE,
46: p_new_status IN iby_pay_batches_all.batch_status%TYPE,
47: p_error_code IN iby_pay_batches_all.bep_code%TYPE,
48: p_error_message IN iby_pay_batches_all.bep_message%TYPE
49: )
50: IS
51:
52: begin
50: IS
51:
52: begin
53:
54: update iby_pay_batches_all
55: set batch_status = p_new_status,
56: bep_code = p_error_code,
57: bep_message = p_error_message,
58: last_update_date = sysdate,
72: -- =======================================================================*/
73:
74: PROCEDURE updateECBatches
75: (
76: payerid_in IN iby_pay_batches_all.payer_id%TYPE,
77: bepid_in IN iby_pay_batches_all.bepid%TYPE,
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
73:
74: PROCEDURE updateECBatches
75: (
76: payerid_in IN iby_pay_batches_all.payer_id%TYPE,
77: bepid_in IN iby_pay_batches_all.bepid%TYPE,
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
81: oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
74: PROCEDURE updateECBatches
75: (
76: payerid_in IN iby_pay_batches_all.payer_id%TYPE,
77: bepid_in IN iby_pay_batches_all.bepid%TYPE,
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
81: oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
82: newbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE
75: (
76: payerid_in IN iby_pay_batches_all.payer_id%TYPE,
77: bepid_in IN iby_pay_batches_all.bepid%TYPE,
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
81: oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
82: newbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE
83: )
76: payerid_in IN iby_pay_batches_all.payer_id%TYPE,
77: bepid_in IN iby_pay_batches_all.bepid%TYPE,
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
81: oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
82: newbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE
83: )
84: IS
77: bepid_in IN iby_pay_batches_all.bepid%TYPE,
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
81: oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
82: newbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE
83: )
84: IS
85:
78: bepkey_in IN iby_pay_batches_all.bepkey%TYPE,
79: oldstatus_in IN iby_pay_batches_all.batch_status%TYPE,
80: newstatus_in IN iby_pay_batches_all.batch_status%TYPE,
81: oldbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE,
82: newbatchid_in IN iby_pay_batches_all.iby_batch_id%TYPE
83: )
84: IS
85:
86: BEGIN
83: )
84: IS
85:
86: BEGIN
87: UPDATE iby_pay_batches_all
88: SET
89: batch_status = newstatus_in,
90: iby_batch_id = newbatchid_in,
91: last_update_date = sysdate,
217: IS
218:
219: CURSOR l_ec_batch_csr (p_payerid IN VARCHAR2, p_iby_batchid IN VARCHAR2) IS
220: SELECT pb.batch_id
221: FROM IBY_PAY_BATCHES_ALL pb,
222: IBY_BATCHES_ALL ibyb
223: WHERE ibyb.batchid = p_iby_batchid
224: AND ibyb.payeeid = p_payerid;
225:
240: object_version_number = object_version_number + 1
241: WHERE batch_id = l_ec_batch_rec.batch_id;
242:
243: -- update the EC batch
244: UPDATE iby_pay_batches_all
245: SET
246: batch_status = G_STATUS_QRY_BATCH_FAIL,
247: bep_code = p_error_code,
248: bep_message = p_error_message,
333:
334:
335: CURSOR l_ec_batch_csr (p_payerid IN VARCHAR2, p_iby_batchid IN VARCHAR2) IS
336: SELECT pb.batch_id, pb.batch_status
337: FROM IBY_PAY_BATCHES_ALL pb,
338: IBY_BATCHES_ALL ibyb
339: WHERE ibyb.batchid = p_iby_batchid
340: AND ibyb.payeeid = p_payerid
341: AND pb.batch_status not in (G_STATUS_SUCCESS, G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
341: AND pb.batch_status not in (G_STATUS_SUCCESS, G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
342:
343: CURSOR l_finished_ecbatch_csr (p_payerid IN VARCHAR2, p_iby_batchid IN VARCHAR2) IS
344: SELECT pb.batch_id
345: FROM IBY_PAY_BATCHES_ALL pb,
346: IBY_BATCHES_ALL ibyb
347: WHERE ibyb.batchid = p_iby_batchid
348: AND ibyb.payeeid = p_payerid
349: AND pb.batch_status in (G_STATUS_SUCCESS, G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
350:
351: -- count of all EC batches in an iby merged batch
352: CURSOR l_ecbatch_cnt_csr (p_payerid IN VARCHAR2, p_iby_batchid IN VARCHAR2) IS
353: SELECT count(pb.batch_id)
354: FROM IBY_PAY_BATCHES_ALL pb,
355: IBY_BATCHES_ALL ibyb
356: WHERE ibyb.batchid = p_iby_batchid
357: AND ibyb.payeeid = p_payerid;
358:
358:
359: -- count of all unsuccessful EC batches in an iby merged batch
360: CURSOR l_failed_ecbatch_cnt_csr (p_payerid IN VARCHAR2, p_iby_batchid IN VARCHAR2) IS
361: SELECT count(pb.batch_id)
362: FROM IBY_PAY_BATCHES_ALL pb,
363: IBY_BATCHES_ALL ibyb
364: WHERE ibyb.batchid = p_iby_batchid
365: AND ibyb.payeeid = p_payerid
366: AND pb.batch_status in (G_STATUS_QRY_BATCH_PARTIAL, G_STATUS_QRY_BATCH_FAIL);
445:
446: -- update the EC batch
447: -- note as the status is synthesized
448: -- we don't have bep_code and message
449: UPDATE iby_pay_batches_all
450: SET
451: batch_status = l_batch_status,
452: bep_code = null,
453: bep_message = null,