[Home] [Help]
1057: 'Y', 'MFAR_TYPE', 'NOT_MFAR_TYPE') = 'MFAR_TYPE'
1058: AND arp_global.sysparam.accounting_method = 'ACCRUAL'
1059: UNION
1060: SELECT applied_customer_trx_id
1061: FROM ar_receivable_applications ra
1062: WHERE ra.status = 'APP'
1063: AND ra.posting_control_id = l_pst_ctrl_id
1064: AND DECODE (PSA_MFAR_VAL_PKG.ar_mfar_validate_check (ra.receivable_application_id, 'RCT', l_sob_id),
1065: 'Y', 'MFAR_TYPE', 'NOT_MFAR_TYPE') = 'MFAR_TYPE'
1064: AND DECODE (PSA_MFAR_VAL_PKG.ar_mfar_validate_check (ra.receivable_application_id, 'RCT', l_sob_id),
1065: 'Y', 'MFAR_TYPE', 'NOT_MFAR_TYPE') = 'MFAR_TYPE'
1066: UNION
1067: SELECT ra.applied_customer_trx_id
1068: FROM ar_receivable_applications ra,
1069: ar_cash_receipt_history crh,
1070: ar_cash_receipt_history crho
1071: WHERE crh.posting_control_id = l_pst_ctrl_id
1072: AND crh.cash_receipt_history_id = crho.reversal_cash_receipt_hist_id
1443:
1444: CURSOR Cur_MFAR_rct_app_id
1445: IS
1446: SELECT distinct ra.receivable_application_id receivable_application_id
1447: FROM ar_receivable_applications ra
1448: WHERE ra.status = 'APP'
1449: AND ra.posting_control_id = l_pst_ctrl_id
1450: AND DECODE (PSA_MFAR_VAL_PKG.ar_mfar_validate_check
1451: (ra.receivable_application_id, 'RCT', l_sob_id) , 'Y', 'MFAR_TYPE', 'NOT_MFAR_TYPE') = 'MFAR_TYPE';
1453: -- selects app_id if original cash receipt status had been reversed.
1454: CURSOR Cur_Clr_MFAR_rct_app_id
1455: IS
1456: SELECT distinct ra.receivable_application_id receivable_application_id
1457: FROM ar_receivable_applications ra, ar_cash_receipt_history crh, ar_cash_receipt_history crho
1458: WHERE crh.posting_control_id = l_pst_ctrl_id
1459: AND crh.cash_receipt_history_id = crho.reversal_cash_receipt_hist_id
1460: AND crh.cash_receipt_id = ra.cash_receipt_id
1461: AND DECODE (PSA_MFAR_VAL_PKG.ar_mfar_validate_check
1596: 'CM', 'CM_'||ard.source_type) ref29,
1597: DECODE(ra.application_type, 'CASH', 'PSA_RCT_DIST',
1598: 'CM', 'RA_CUST_TRX_LINE_GL_DIST') ref30
1599: FROM
1600: ar_receivable_applications ra,
1601: ar_cash_receipts cr,
1602: (SELECT * FROM ar_distributions
1603: WHERE source_table = 'RA'
1604: AND source_id = p_receivable_application_id
1686: -- 'PSA_RCT_DIST' ref30
1687: DECODE(ra.application_type, 'CASH', 'PSA_RCT_DIST',
1688: 'CM', 'RA_CUST_TRX_LINE_GL_DIST') ref30
1689: FROM
1690: ar_receivable_applications ra,
1691: (SELECT * FROM ar_distributions
1692: WHERE source_table = 'RA'
1693: AND source_id = p_receivable_application_id
1694: AND rownum = 1) ard,
1806: DECODE (ra.amount_applied_from, NULL,'TRADE_' ||ard.source_type, 'CCURR_' ||ard.source_type)
1807: ref29,
1808: 'PSA_RCT_DIST' ref30
1809: FROM
1810: ar_receivable_applications ra,
1811: ar_cash_receipts cr,
1812: (SELECT * FROM ar_distributions
1813: WHERE source_table = 'RA'
1814: AND source_id = p_receivable_application_id
1850: AND gl.group_id = c_group_id
1851: AND substr(gl.reference29, 7) IN ('CASH', 'REC')
1852: AND gl.reference10 NOT LIKE 'MFAR%'
1853: AND to_number(substr(gl.reference22, 1, instr(gl.reference22, 'C')-1)) IN
1854: (select cash_receipt_id from ar_receivable_applications where receivable_application_id = c_rcv_app_id)
1855: GROUP BY to_number(substr(gl.reference22, 1, instr(gl.reference22, 'C')-1))
1856: HAVING sum(accounted_dr) = sum(accounted_cr);
1857:
1858: l_fv_balance_check c_fv_balance_check%rowtype;
2086: UPDATE psa_mf_rct_dist_all pda
2087: SET pda.posting_control_id = l_pst_ctrl_id
2088: WHERE pda.attribute1 = 'CLEARED'
2089: AND pda.receivable_application_id IN
2090: (SELECT receivable_application_id FROM ar_receivable_applications ara, ar_cash_receipt_history crh
2091: WHERE ara.cash_receipt_id = crh.cash_receipt_id AND crh.status = 'CLEARED'
2092: AND crh.posting_control_id = l_pst_ctrl_id) ;
2093:
2094: -- ========================= FND LOG ===========================
2395:
2396: UPDATE psa_mf_rct_dist_all pda
2397: SET pda.posting_control_id = l_pst_ctrl_id
2398: WHERE pda.receivable_application_id IN
2399: (SELECT receivable_application_id FROM ar_receivable_applications ara
2400: WHERE ara.posting_control_id = l_pst_ctrl_id);
2401:
2402: IF (SQL%FOUND) THEN
2403: -- ========================= FND LOG ===========================
2833: SELECT distinct reference22 FROM gl_interface
2834: WHERE group_id = l_pst_ctrl_id
2835: AND reference28 = 'CMAPP'
2836: AND reference29 = 'CMAPP_REC'
2837: AND reference30 = 'AR_RECEIVABLE_APPLICATIONS';
2838:
2839: CURSOR Cur_CM_dets (p_cust_trx_id NUMBER)
2840: IS
2841: SELECT accounting_date gl_date,
2863: WHERE group_id = l_pst_ctrl_id
2864: AND reference22 = p_cust_trx_id
2865: AND reference28 = 'CMAPP'
2866: AND reference29 = 'CMAPP_REC'
2867: AND reference30 = 'AR_RECEIVABLE_APPLICATIONS';
2868:
2869: l_chart_of_accounts_id NUMBER;
2870: l_org_details PSA_IMPLEMENTATION_ALL%ROWTYPE;
2871: l_qual_name VARCHAR2(20);
2963: psa_utils.debug_other_string(g_state_level,l_full_path,' C_cust_trx_dets.reference22 --> ' || C_cust_trx_dets.reference22);
2964: psa_utils.debug_other_string(g_state_level,l_full_path,' l_select --> ' || l_select);
2965: -- ========================= FND LOG ===========================
2966:
2967: EXECUTE IMMEDIATE l_select BULK COLLECT INTO gl_int_dets USING C_cust_trx_dets.reference22, 'AR_RECEIVABLE_APPLICATIONS';
2968:
2969: -- ========================= FND LOG ===========================
2970: psa_utils.debug_other_string(g_state_level,l_full_path,' Execute immediate ');
2971: -- ========================= FND LOG ===========================
3777:
3778: CURSOR Cur_MFAR_rct_app_id
3779: IS
3780: SELECT distinct ra.receivable_application_id receivable_application_id
3781: FROM ar_receivable_applications ra
3782: WHERE ra.status = 'APP'
3783: AND ra.posting_control_id = l_pst_ctrl_id
3784: AND DECODE(PSA_MFAR_VAL_PKG.ar_mfar_validate_check
3785: (ra.receivable_application_id, 'RCT', l_sob_id) , 'Y', 'MFAR_TYPE', 'NOT_MFAR_TYPE') = 'MFAR_TYPE';
3867: 'CM', 'CMAPP_'||ar_trx_dist.account_class) ref29,
3868: DECODE(ra.application_type, 'CASH', 'PSA_RCT_DIST',
3869: 'CM', 'RA_CUST_TRX_LINE_GL_DIST') ref30
3870: FROM
3871: ar_receivable_applications ra,
3872: ar_cash_receipts cr,
3873: ra_customer_trx ctcm,
3874: ra_customer_trx ctinv,
3875: ra_cust_trx_types ctt,
3918: AND gl.group_id = c_group_id
3919: AND substr(gl.reference29, 7) IN ('CASH', 'REC')
3920: AND gl.reference10 NOT LIKE 'MFAR%'
3921: AND to_number(substr(gl.reference22, 1, instr(gl.reference22, 'C')-1)) IN
3922: (select cash_receipt_id from ar_receivable_applications where receivable_application_id = c_rcv_app_id)
3923: GROUP BY to_number(substr(gl.reference22, 1, instr(gl.reference22, 'C')-1))
3924: HAVING sum(accounted_dr) = sum(accounted_cr);
3925:
3926: -- l_run_num NUMBER(15);
4010: AND gl.reference30 = 'AR_CASH_BASIS_DISTRIBUTIONS'
4011: AND gl.reference10 NOT LIKE '%MFAR%'
4012: AND to_number(gl.reference22) =
4013: (select cash_receipt_id
4014: from ar_receivable_applications
4015: where receivable_application_id = I.receivable_application_id);
4016:
4017: INSERT INTO gl_interface
4018: (created_by,
4083: UPDATE psa_mf_rct_dist_all pda
4084: SET pda.posting_control_id = l_pst_ctrl_id
4085: WHERE pda.receivable_application_id IN
4086: (SELECT receivable_application_id
4087: FROM ar_receivable_applications ara
4088: WHERE ara.posting_control_id = l_pst_ctrl_id);
4089:
4090: retcode := 'S';
4091: