[Home] [Help]
1037: SELECT iby_trxnsumm_mid_s.nextval
1038: FROM DUAL;
1039:
1040: CURSOR c_mtangibleid IS
1041: SELECT iby_tangible_s.nextval
1042: FROM DUAL;
1043:
1044: BEGIN
1045: /**
1104:
1105: END LOOP;
1106:
1107: /**
1108: * Create tangible records in iby_tangible.
1109: */
1110: FOR j IN i_tangibleid.FIRST..i_tangibleid.LAST LOOP
1111:
1112: /**
1119: and UPPER(reqType) = UPPER(i_reqType);
1120:
1121: IF (l_count=0) THEN
1122:
1123: INSERT INTO iby_tangible
1124: (
1125: mtangibleId, tangibleid, amount,
1126: currencyNameCode, refinfo, memo, issuedate,
1127: order_medium, eft_auth_method,
1176: * it has to be in a failed status, as 'requestExists' has already
1177: * been checked, hence updating the duplicate failed request.
1178: */
1179:
1180: UPDATE iby_tangible
1181: set mtangibleId = l_mtangibleid(j),
1182: amount = i_amount(j),
1183: currencyNameCode = i_currency(j),
1184: refinfo = i_refinfo(j),
1258: i_tangibleid IN iby_trxn_summaries_all.tangibleid%TYPE,
1259: i_amount IN iby_trxn_summaries_all.amount%TYPE,
1260: i_currency IN iby_trxn_summaries_all.currencynamecode%TYPE,
1261: i_status IN iby_trxn_summaries_all.status%TYPE,
1262: i_refinfo IN iby_tangible.refinfo%TYPE,
1263: i_memo IN iby_tangible.memo%TYPE,
1264: i_acctno IN iby_tangible.acctno%TYPE,
1265: i_ordermedium IN iby_tangible.order_medium%TYPE,
1266: i_eftauthmethod IN iby_tangible.eft_auth_method%TYPE,
1259: i_amount IN iby_trxn_summaries_all.amount%TYPE,
1260: i_currency IN iby_trxn_summaries_all.currencynamecode%TYPE,
1261: i_status IN iby_trxn_summaries_all.status%TYPE,
1262: i_refinfo IN iby_tangible.refinfo%TYPE,
1263: i_memo IN iby_tangible.memo%TYPE,
1264: i_acctno IN iby_tangible.acctno%TYPE,
1265: i_ordermedium IN iby_tangible.order_medium%TYPE,
1266: i_eftauthmethod IN iby_tangible.eft_auth_method%TYPE,
1267: i_orgid IN iby_trxn_summaries_all.org_id%TYPE,
1260: i_currency IN iby_trxn_summaries_all.currencynamecode%TYPE,
1261: i_status IN iby_trxn_summaries_all.status%TYPE,
1262: i_refinfo IN iby_tangible.refinfo%TYPE,
1263: i_memo IN iby_tangible.memo%TYPE,
1264: i_acctno IN iby_tangible.acctno%TYPE,
1265: i_ordermedium IN iby_tangible.order_medium%TYPE,
1266: i_eftauthmethod IN iby_tangible.eft_auth_method%TYPE,
1267: i_orgid IN iby_trxn_summaries_all.org_id%TYPE,
1268: i_pmtmethod IN iby_trxn_summaries_all.paymentmethodname%TYPE,
1261: i_status IN iby_trxn_summaries_all.status%TYPE,
1262: i_refinfo IN iby_tangible.refinfo%TYPE,
1263: i_memo IN iby_tangible.memo%TYPE,
1264: i_acctno IN iby_tangible.acctno%TYPE,
1265: i_ordermedium IN iby_tangible.order_medium%TYPE,
1266: i_eftauthmethod IN iby_tangible.eft_auth_method%TYPE,
1267: i_orgid IN iby_trxn_summaries_all.org_id%TYPE,
1268: i_pmtmethod IN iby_trxn_summaries_all.paymentmethodname%TYPE,
1269: i_payerid IN iby_trxn_summaries_all.payerid%TYPE,
1262: i_refinfo IN iby_tangible.refinfo%TYPE,
1263: i_memo IN iby_tangible.memo%TYPE,
1264: i_acctno IN iby_tangible.acctno%TYPE,
1265: i_ordermedium IN iby_tangible.order_medium%TYPE,
1266: i_eftauthmethod IN iby_tangible.eft_auth_method%TYPE,
1267: i_orgid IN iby_trxn_summaries_all.org_id%TYPE,
1268: i_pmtmethod IN iby_trxn_summaries_all.paymentmethodname%TYPE,
1269: i_payerid IN iby_trxn_summaries_all.payerid%TYPE,
1270: i_instrtype IN iby_trxn_summaries_all.instrtype%TYPE,
1392:
1393: END IF;
1394:
1395: IF (NVL(l_trxn_exists, 'N') = 'N') THEN
1396: --Create an entry in iby_tangible table
1397: iby_bill_pkg.createBill(
1398: i_tangibleid, -- IN i_billId
1399: i_amount, -- IN i_billAmount
1400: i_currency, -- IN i_billCurDef
1503:
1504: ELSE
1505: -- A transaction is already created.
1506:
1507: -- Update iby_tangible table
1508:
1509: iby_bill_pkg.modBill(
1510: l_mtangibleid, -- IN i_mtangibleid
1511: i_tangibleid, -- IN i_billId