[Home] [Help]
2572: dbms_sql.close_cursor(l_cur);
2573:
2574: /* END for je_source is Receivables , based on AR_RECEIVABLE_APPLICATIONS_ALL */
2575: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,'End of Insert for je_source is Receivables , based on AR_RECEIVABLE_APPLICATIONS_ALL ');
2576: /* Start for for je_source is Receivables , based on AR_MISC_CASH_DISTRIBUTIONS_ALL */
2577:
2578: l_string2 := ' SELECT glb.je_batch_id,
2579: ffp.fund_value,
2580: ffp.description,
2622: fv_report_definitions frd,
2623: fv_fund_parameters ffp,
2624: fv_treasury_symbols fts,
2625: ar_distributions_all ard,
2626: AR_MISC_CASH_DISTRIBUTIONS_ALL arm,
2627: gl_import_references glir,
2628: xla_ae_headers xah,
2629: xla_ae_lines xal,
2630: xla_events xet,
2682: dbms_sql.bind_variable(l_cur,':b_login_id',g_login_id);
2683: dbms_sql.bind_variable(l_cur,':b_request_id',g_request_id);
2684: l_row := dbms_sql.EXECUTE(l_cur);
2685: dbms_sql.close_cursor(l_cur);
2686: /* END for je_source is Receivables , based on AR_MISC_CASH_DISTRIBUTIONS_ALL */
2687: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,'End of Insert for je_source is Receivables , based on AR_MISC_CASH_DISTRIBUTIONS_ALL ');
2688:
2689: EXCEPTION
2690: WHEN OTHERS THEN
2683: dbms_sql.bind_variable(l_cur,':b_request_id',g_request_id);
2684: l_row := dbms_sql.EXECUTE(l_cur);
2685: dbms_sql.close_cursor(l_cur);
2686: /* END for je_source is Receivables , based on AR_MISC_CASH_DISTRIBUTIONS_ALL */
2687: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,'End of Insert for je_source is Receivables , based on AR_MISC_CASH_DISTRIBUTIONS_ALL ');
2688:
2689: EXCEPTION
2690: WHEN OTHERS THEN
2691: p_error_code := sqlcode;
3303: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3304: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'FOR MISC RECEIPT: '||
3305: 'Cash Receipt Hist Id does not '||
3306: 'exist in Ar_Cash_Receipt_History_All table.'||
3307: 'Checking in Ar_Misc_Cash_Distributions_All table.');
3308: END IF;
3309: l_exists := 'M';
3310: ELSE
3311: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3368: ELSIF ((l_je_category = 'Misc Receipts') AND (l_exists = 'M')) THEN
3369: BEGIN
3370: SELECT 'Y'
3371: INTO l_exists
3372: FROM Ar_Misc_Cash_Distributions_All
3373: WHERE misc_cash_distribution_id = TO_NUMBER(l_cash_receipt_hist_id)
3374: AND cash_receipt_id = TO_NUMBER(l_cash_receipt_id);
3375: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3376: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISC CASH DISTRIBUTION ID EXISTS IN '||
3373: WHERE misc_cash_distribution_id = TO_NUMBER(l_cash_receipt_hist_id)
3374: AND cash_receipt_id = TO_NUMBER(l_cash_receipt_id);
3375: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3376: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISC CASH DISTRIBUTION ID EXISTS IN '||
3377: 'Ar_Misc_Cash_Distributions_All table and is '|| TO_NUMBER(l_cash_receipt_hist_id));
3378: END IF;
3379: vl_misc_cd_flag := 'Y';
3380: EXCEPTION
3381: WHEN NO_DATA_FOUND THEN
3479: IF ((l_je_category = 'Misc Receipts') AND (vl_misc_cd_flag = 'Y')) THEN -- rev check
3480: BEGIN
3481: SELECT 'Y'
3482: INTO l_exists
3483: FROM Ar_Misc_Cash_Distributions_All
3484: WHERE misc_cash_distribution_id = l_cash_receipt_hist_id
3485: AND cash_receipt_id = l_cash_receipt_id
3486: AND created_from = 'ARP_REVERSE_RECEIPT.REVERSE';
3487: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4439: l_exists := 'M';
4440: END;
4441: IF(l_exists = 'M') AND (l_je_category = 'Misc Receipts') THEN
4442: BEGIN
4443: sql_stmt:='SELECT ''Y'' FROM AR_CASH_RECEIPTS_ALL ac, Ar_Misc_Cash_Distributions_All ah
4444: where ac.cash_receipt_id = ah.cash_receipt_id
4445: and ah.misc_cash_distribution_id = '|| l_cash_receipt_hist_id ||
4446: ' and ah.cash_receipt_id = '||l_cash_receipt_id||
4447: ' and ah.created_from= ''ARP_REVERSE_RECEIPT.REVERSE'' '||