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: --
587: amount,
588: percentage,
589: --Start code changes for rev rec by fmiao on 10/05/2004
590: NVL(comments, '-99') comments --End code changes for rev rec by fmiao on 10/05/2004
591: FROM okl_trns_acc_dstrs
592: WHERE source_id = p_source_id
593: AND source_table = p_source_table;
594:
595: i NUMBER := 1; -- rmunjulu R12 Fixes