20:
21: -- rmunjulu R12 Fixes
22: TYPE dist_rec_type IS RECORD (
23: account_class RA_INTERFACE_DISTRIBUTIONS_ALL.account_class%TYPE,
24: dist_amount OKL_TRNS_ACC_DSTRS.amount%TYPE,
25: dist_percent OKL_TRNS_ACC_DSTRS.percentage%TYPE,
26: code_combination_id OKL_TRNS_ACC_DSTRS.code_combination_id%TYPE);
27:
28: -- rmunjulu R12 Fixes
21: -- rmunjulu R12 Fixes
22: TYPE dist_rec_type IS RECORD (
23: account_class RA_INTERFACE_DISTRIBUTIONS_ALL.account_class%TYPE,
24: dist_amount OKL_TRNS_ACC_DSTRS.amount%TYPE,
25: dist_percent OKL_TRNS_ACC_DSTRS.percentage%TYPE,
26: code_combination_id OKL_TRNS_ACC_DSTRS.code_combination_id%TYPE);
27:
28: -- rmunjulu R12 Fixes
29: TYPE dist_tbl_type IS TABLE OF dist_rec_type INDEX BY BINARY_INTEGER;
22: TYPE dist_rec_type IS RECORD (
23: account_class RA_INTERFACE_DISTRIBUTIONS_ALL.account_class%TYPE,
24: dist_amount OKL_TRNS_ACC_DSTRS.amount%TYPE,
25: dist_percent OKL_TRNS_ACC_DSTRS.percentage%TYPE,
26: code_combination_id OKL_TRNS_ACC_DSTRS.code_combination_id%TYPE);
27:
28: -- rmunjulu R12 Fixes
29: TYPE dist_tbl_type IS TABLE OF dist_rec_type INDEX BY BINARY_INTEGER;
30: --
570: amount,
571: percentage,
572: --Start code changes for rev rec by fmiao on 10/05/2004
573: NVL(comments, '-99') comments --End code changes for rev rec by fmiao on 10/05/2004
574: FROM okl_trns_acc_dstrs
575: WHERE source_id = p_source_id
576: AND source_table = p_source_table;
577:
578: i NUMBER := 1; -- rmunjulu R12 Fixes