[Home] [Help]
508: l_api_version CONSTANT NUMBER := 1.0;
509:
510: l_cc_headers_rec igc_cc_headers%ROWTYPE;
511: l_cc_acct_lines_rec igc_cc_acct_lines_v%ROWTYPE;
512: l_cc_pmt_fcst_rec igc_cc_det_pf_v%ROWTYPE;
513:
514: l_transaction_date DATE;
515:
516: l_cc_acct_comp_func_amt igc_cc_acct_lines_v.cc_acct_comp_func_amt%TYPE;
515:
516: l_cc_acct_comp_func_amt igc_cc_acct_lines_v.cc_acct_comp_func_amt%TYPE;
517: l_cc_acct_enc_amt igc_cc_acct_lines_v.cc_acct_encmbrnc_amt%TYPE;
518:
519: l_cc_det_pf_comp_func_amt igc_cc_det_pf_v.cc_det_pf_comp_func_amt%TYPE;
520: l_cc_det_pf_enc_amt igc_cc_det_pf_v.cc_det_pf_encmbrnc_amt%TYPE;
521:
522: l_billed_amt NUMBER;
523: l_func_billed_amt NUMBER;
516: l_cc_acct_comp_func_amt igc_cc_acct_lines_v.cc_acct_comp_func_amt%TYPE;
517: l_cc_acct_enc_amt igc_cc_acct_lines_v.cc_acct_encmbrnc_amt%TYPE;
518:
519: l_cc_det_pf_comp_func_amt igc_cc_det_pf_v.cc_det_pf_comp_func_amt%TYPE;
520: l_cc_det_pf_enc_amt igc_cc_det_pf_v.cc_det_pf_encmbrnc_amt%TYPE;
521:
522: l_billed_amt NUMBER;
523: l_func_billed_amt NUMBER;
524: l_encumbrance_status VARCHAR2(1);
620:
621: /* Contract Detail Payment Forecast lines */
622:
623: CURSOR c_payment_forecast(t_cc_acct_line_id NUMBER) IS
624: -- Performance Tuning, Replaced view igc_cc_det_pf_v with
625: -- igc_cc_det_pf
626: -- SELECT *
627: -- FROM igc_cc_det_pf_v
628: -- WHERE cc_acct_line_id = t_cc_acct_line_id;
623: CURSOR c_payment_forecast(t_cc_acct_line_id NUMBER) IS
624: -- Performance Tuning, Replaced view igc_cc_det_pf_v with
625: -- igc_cc_det_pf
626: -- SELECT *
627: -- FROM igc_cc_det_pf_v
628: -- WHERE cc_acct_line_id = t_cc_acct_line_id;
629: SELECT ccdpf.ROWID,
630: ccdpf.cc_det_pf_line_id,
631: ccdpf.cc_det_pf_line_num,
994: l_billed_amt := 0;
995: l_func_billed_amt := 0;
996:
997: -- Performance Tuning, Replaced view
998: -- igc_cc_det_pf_v with
999: -- igc_cc_det_pf and replaced the line
1000: -- below.
1001: -- SELECT cc_det_pf_billed_amt ,cc_det_pf_func_billed_amt
1002: SELECT IGC_CC_COMP_AMT_PKG.COMPUTE_PF_BILLED_AMT(ccdpf.cc_det_pf_line_id, ccdpf.cc_det_pf_line_num, ccdpf.cc_acct_line_id) cc_det_pf_billed_amt,
1427: PROCEDURE Process_Interface_Row(
1428: p_currency_code IN VARCHAR2,
1429: p_cc_headers_rec IN igc_cc_headers%ROWTYPE,
1430: p_cc_acct_lines_rec IN igc_cc_acct_lines_v%ROWTYPE,
1431: p_cc_pmt_fcst_rec IN igc_cc_det_pf_v%ROWTYPE,
1432: p_mode IN VARCHAR2,
1433: p_type IN VARCHAR2,
1434: p_accounting_date IN DATE,
1435: x_msg_count OUT NOCOPY NUMBER,
2031: -- l_cc_conf_enc_enable_flag igc_cc_encmbrnc_ctrls.cc_conf_encmbrnc_enable_flag%TYPE;
2032:
2033: l_cc_header_id igc_cc_headers.cc_header_id%TYPE;
2034: l_cc_acct_line_id igc_cc_acct_lines_v.cc_acct_line_id%TYPE;
2035: l_cc_det_pf_line_id igc_cc_det_pf_v.cc_det_pf_line_id%TYPE;
2036: l_budget_dest_flag igc_cc_interface.budget_dest_flag%TYPE;
2037: l_cc_transaction_date igc_cc_interface.cc_transaction_date%TYPE;
2038:
2039: l_cc_acct_comp_func_amt igc_cc_acct_lines_v.cc_acct_comp_func_amt%TYPE;
2038:
2039: l_cc_acct_comp_func_amt igc_cc_acct_lines_v.cc_acct_comp_func_amt%TYPE;
2040: l_cc_acct_enc_amt igc_cc_acct_lines_v.cc_acct_encmbrnc_amt%TYPE;
2041:
2042: l_cc_det_pf_comp_func_amt igc_cc_det_pf_v.cc_det_pf_comp_func_amt%TYPE;
2043: l_cc_det_pf_enc_amt igc_cc_det_pf_v.cc_det_pf_encmbrnc_amt%TYPE;
2044:
2045: l_flag BOOLEAN := FALSE;
2046: l_cbc_on BOOLEAN := FALSE;
2039: l_cc_acct_comp_func_amt igc_cc_acct_lines_v.cc_acct_comp_func_amt%TYPE;
2040: l_cc_acct_enc_amt igc_cc_acct_lines_v.cc_acct_encmbrnc_amt%TYPE;
2041:
2042: l_cc_det_pf_comp_func_amt igc_cc_det_pf_v.cc_det_pf_comp_func_amt%TYPE;
2043: l_cc_det_pf_enc_amt igc_cc_det_pf_v.cc_det_pf_encmbrnc_amt%TYPE;
2044:
2045: l_flag BOOLEAN := FALSE;
2046: l_cbc_on BOOLEAN := FALSE;
2047:
2061: l_cc_state VARCHAR2(2);
2062:
2063: l_cc_headers_rec igc_cc_headers%ROWTYPE;
2064: l_cc_acct_lines_rec igc_cc_acct_lines_v%ROWTYPE;
2065: l_cc_pmt_fcst_rec igc_cc_det_pf_v%ROWTYPE;
2066: l_cc_interface_rec igc_cc_interface%ROWTYPE;
2067:
2068: l_debug VARCHAR2(1);
2069:
2124: /* Current year payment forecast lines only */
2125:
2126: /* Contract Commitment detail payment forecast */
2127: CURSOR c_payment_forecast(t_cc_acct_line_id NUMBER) IS
2128: -- Performance Tuning, Replaced view igc_cc_det_pf_v with
2129: -- igc_cc_det_pf
2130: -- SELECT *
2131: -- FROM igc_cc_det_pf_v
2132: -- WHERE cc_acct_line_id = t_cc_acct_line_id;
2127: CURSOR c_payment_forecast(t_cc_acct_line_id NUMBER) IS
2128: -- Performance Tuning, Replaced view igc_cc_det_pf_v with
2129: -- igc_cc_det_pf
2130: -- SELECT *
2131: -- FROM igc_cc_det_pf_v
2132: -- WHERE cc_acct_line_id = t_cc_acct_line_id;
2133:
2134: SELECT ccdpf.ROWID,
2135: ccdpf.cc_det_pf_line_id,
3011: IF ((l_cc_det_pf_line_id IS NOT NULL) AND
3012: (l_budget_dest_flag = 'S'))
3013: THEN
3014: -- Performance Tuning, Replaced view
3015: -- igc_cc_det_pf_v with
3016: -- igc_cc_det_pf and replaced the line
3017: -- below.
3018: -- SELECT cc_det_pf_comp_func_amt
3019: SELECT IGC_CC_COMP_AMT_PKG.COMPUTE_FUNCTIONAL_AMT(p_cc_header_id,NVL(ccdpf.cc_det_pf_entered_amt,0)) cc_det_pf_comp_func_amt
3082: l_billed_amt := 0;
3083: l_func_billed_amt := 0;
3084:
3085: -- Performance Tuning, Replaced view
3086: -- igc_cc_det_pf_v with
3087: -- igc_cc_det_pf and replaced the line
3088: -- below.
3089: -- SELECT cc_det_pf_billed_amt , cc_det_pf_func_billed_amt
3090: SELECT IGC_CC_COMP_AMT_PKG.COMPUTE_PF_BILLED_AMT(ccdpf.cc_det_pf_line_id, ccdpf.cc_det_pf_line_num, ccdpf.cc_acct_line_id) cc_det_pf_billed_amt,
4187: l_api_version CONSTANT NUMBER := 1.0;
4188:
4189: l_cc_headers_rec igc_cc_headers%ROWTYPE;
4190: l_cc_acct_lines_rec igc_cc_acct_lines_v%ROWTYPE;
4191: l_cc_pmt_fcst_rec igc_cc_det_pf_v%ROWTYPE;
4192:
4193: l_error_message VARCHAR2(2000);
4194:
4195: -- -------------------------------------------------------------------------
4218:
4219: /* Contract Commitment detail payment forecast */
4220: CURSOR c_payment_forecast(t_cc_acct_line_id NUMBER) IS
4221:
4222: -- Performance Tuning, Replaced view igc_cc_det_pf_v with
4223: -- igc_cc_det_pf and replaced the line below.
4224: -- SELECT *
4225: -- FROM igc_cc_det_pf_v
4226: -- WHERE cc_acct_line_id = t_cc_acct_line_id;
4221:
4222: -- Performance Tuning, Replaced view igc_cc_det_pf_v with
4223: -- igc_cc_det_pf and replaced the line below.
4224: -- SELECT *
4225: -- FROM igc_cc_det_pf_v
4226: -- WHERE cc_acct_line_id = t_cc_acct_line_id;
4227:
4228: SELECT ccdpf.ROWID,
4229: ccdpf.cc_det_pf_line_id,
4676: l_api_name CONSTANT VARCHAR2(30) := 'Validate_CC';
4677: l_api_version CONSTANT NUMBER := 1.0;
4678: l_cc_headers_rec igc_cc_headers%ROWTYPE;
4679: l_cc_acct_lines_rec igc_cc_acct_lines_v%ROWTYPE;
4680: l_cc_det_pf_lines_rec igc_cc_det_pf_v%ROWTYPE;
4681: l_cc_pmt_fcst_rec igc_cc_det_pf_v%ROWTYPE;
4682: l_cc_acct_cnt NUMBER := 0;
4683: l_total_pf_entered_amt NUMBER := 0;
4684: l_cc_det_pf_cnt NUMBER := 0;
4677: l_api_version CONSTANT NUMBER := 1.0;
4678: l_cc_headers_rec igc_cc_headers%ROWTYPE;
4679: l_cc_acct_lines_rec igc_cc_acct_lines_v%ROWTYPE;
4680: l_cc_det_pf_lines_rec igc_cc_det_pf_v%ROWTYPE;
4681: l_cc_pmt_fcst_rec igc_cc_det_pf_v%ROWTYPE;
4682: l_cc_acct_cnt NUMBER := 0;
4683: l_total_pf_entered_amt NUMBER := 0;
4684: l_cc_det_pf_cnt NUMBER := 0;
4685: l_min_pf_date DATE;
4785: WHERE ccac.cc_header_id = t_cc_header_id;
4786:
4787: CURSOR c_det_pf_lines(t_cc_acct_line_id NUMBER) IS
4788: -- Performance Tuning, Replaced view
4789: -- igc_cc_det_pf_v with
4790: -- igc_cc_det_pf and replaced the line
4791: -- below.
4792: -- SELECT *
4793: -- FROM igc_cc_det_pf_v ccdpf
4789: -- igc_cc_det_pf_v with
4790: -- igc_cc_det_pf and replaced the line
4791: -- below.
4792: -- SELECT *
4793: -- FROM igc_cc_det_pf_v ccdpf
4794: -- WHERE ccdpf.cc_acct_line_id = t_cc_acct_line_id;
4795:
4796: SELECT ccdpf.ROWID,
4797: ccdpf.cc_det_pf_line_id,
5747: l_cc_det_pf_cnt := 0;
5748:
5749: BEGIN
5750: -- Performance Tuning, Replaced view
5751: -- igc_cc_det_pf_v with
5752: -- igc_cc_det_pf
5753: SELECT count(*)
5754: INTO l_cc_det_pf_cnt
5755: FROM igc_cc_det_pf
5863: l_cc_det_pf_cnt := 0;
5864:
5865: BEGIN
5866: -- Performance Tuning, Replaced view
5867: -- igc_cc_det_pf_v with
5868: -- igc_cc_det_pf and replaced the line
5869: -- below.
5870: SELECT count(*)
5871: INTO l_cc_det_pf_cnt
6121: CLOSE c_det_pf_lines;
6122:
6123: END IF;
6124: -- Performance Tuning, Replaced view
6125: -- igc_cc_det_pf_v with
6126: -- igc_cc_det_pf and replaced the line
6127: -- below.
6128: SELECT SUM(NVL(CC_DET_PF_ENTERED_AMT,0))
6129: INTO l_total_pf_entered_amt
6207: l_cc_det_pf_cnt := 0;
6208:
6209: BEGIN
6210: -- Performance Tuning, Replaced view
6211: -- igc_cc_det_pf_v with
6212: -- igc_cc_det_pf and replaced the line
6213: -- below.
6214: SELECT count(*)
6215: INTO l_cc_det_pf_cnt
6471: CLOSE c_det_pf_lines;
6472:
6473: END IF;
6474: -- Performance Tuning, Replaced view
6475: -- igc_cc_det_pf_v with igc_cc_det_pf
6476: SELECT SUM(NVL(CC_DET_PF_ENTERED_AMT,0))
6477: INTO l_total_pf_entered_amt
6478: FROM igc_cc_det_pf
6479: WHERE cc_acct_line_id = l_cc_acct_lines_rec.cc_acct_line_id;