[Home] [Help]
296: FND_MESSAGE.set_name('JA', 'JA_CN_PERIOD_OPEN');
297: FND_MESSAGE.SET_TOKEN('PERIOD_FROM', p_start_period, TRUE);
298: FND_MESSAGE.SET_TOKEN('PERIOD_TO', p_end_period, TRUE);
299: l_message := FND_MESSAGE.get();
300: FND_FILE.put_line(FND_FILE.LOG, l_message);
301:
302: IF (l_exception_level >= l_runtime_level) THEN
303: FND_LOG.STRING(l_exception_level,
304: l_module_name,
512: --no data found with the requested parameters
513: IF (c_in_ja_cn_account_balances%ROWCOUNT = 0) THEN
514: FND_MESSAGE.set_name('JA', 'JA_CN_NO_DATA_FOUND');
515: l_message := FND_MESSAGE.get();
516: FND_FILE.put_line(FND_FILE.output, l_message);
517: IF (l_exception_level >= l_runtime_level) THEN
518: FND_LOG.STRING(l_exception_level, l_module_name, l_message);
519: END IF;
520: retcode := 1;
544: l_module_name,
545: 'Fetched: l_functional_currency=' ||
546: nvl(to_char(l_functional_currency), 'null'));
547: END IF;
548: --FND_FILE.PUT_LINE(FND_FILE.LOG, l_functional_currency);
549:
550: --combine the journal lines and save them to the JA_CN_JOURNAL_LINES_GBL_TMP
551: OPEN c_in_closed_periods;
552: LOOP
571: l_current_start_date);
572:
573: END IF;
574:
575: --FND_FILE.PUT_LINE(FND_FILE.LOG, l_current_start_date);
576:
577: OPEN c_in_ja_cn_subsidiary_gbl_tmp;
578: LOOP
579: FETCH c_in_ja_cn_subsidiary_gbl_tmp
623: 0 ORIG_PERIOD_NET_DR,
624: 0 ORIG_PERIOD_NET_CR,
625: SUM(FUNC_END_BALANCE) FUNC_END_BALANCE,
626: 0 ORIG_END_BALANCE,');
627: --fnd_file.PUT_LINE(fnd_file.LOG,l_ja_cn_subsidiary_gbl_tmp_row.ACCOUNT_SEGMENT_VALUE);
628: --foreign currency enabled
629: ELSE
630: l_sql_stmt := REPLACE(l_sql_stmt,
631: '@CURRENCY_CLAUSE1',
644: SUM(func_end_balance) func_end_balance,
645: SUM(orig_end_balance) orig_end_balance,');
646: END IF;
647: /*IF l_ja_cn_subsidiary_gbl_tmp_row.account_segment_value = '6001' THEN
648: FND_FILE.PUT_LINE(FND_FILE.LOG, l_sql_stmt);
649: END IF;*/
650:
651: EXECUTE IMMEDIATE l_sql_stmt
652: USING l_current_start_date, l_current_period, l_ja_cn_subsidiary_gbl_tmp_row.account_segment_value, p_ledger_id, p_legal_entity;
663: FETCH c_in_account_balances_gbl_tmp
664: INTO l_account_balances_gbl_tmp_row;
665: EXIT WHEN c_in_account_balances_gbl_tmp%NOTFOUND;
666: --is foreign account enabled
667: --fnd_file.PUT_LINE(fnd_file.LOG,'is f: '||l_account_balances_gbl_tmp_row.is_foreign||' f c code: '||l_functional_currency_code);
668: IF l_account_balances_gbl_tmp_row.is_foreign IS NOT NULL AND
669: l_account_balances_gbl_tmp_row.is_foreign <>
670: l_functional_currency_code THEN
671: SELECT COUNT(*)
685: FROM fnd_currencies_vl
686: WHERE currency_code = l_account_balances_gbl_tmp_row.is_foreign)
687: AND FUNC_BEGIN_BALANCE <> 0
688: AND FUNC_END_BALANCE <> 0;
689: --fnd_file.PUT_LINE(fnd_file.LOG,l_number_a);
690: IF l_number_a >= 1 THEN
691: --error balance
692: INSERT INTO JA_CN_ERROR_ACCOUNTS
693: (request_id
772: FETCH c_in_ja_cn_subsidiary_gbl_tmp
773: INTO l_ja_cn_subsidiary_gbl_tmp_row;
774: EXIT WHEN c_in_ja_cn_subsidiary_gbl_tmp%NOTFOUND;
775: --is foreign account enabled
776: --fnd_file.PUT_LINE(fnd_file.LOG,'is f: '||l_account_balances_gbl_tmp_row.is_foreign||' f c code: '||l_functional_currency_code);
777: IF l_ja_cn_subsidiary_gbl_tmp_row.is_foreign IS NOT NULL AND
778: l_ja_cn_subsidiary_gbl_tmp_row.is_foreign <>
779: l_functional_currency_code THEN
780: INSERT INTO JA_CN_ERROR_ACCOUNTS
916: l_account_balances_gbl_tmp_row.orig_period_net_cr := 0;
917: l_account_balances_gbl_tmp_row.orig_end_balance := 0;
918: END IF;*/
919:
920: FND_FILE.put_line(FND_FILE.output,
921: '"' || l_account_balances_gbl_tmp_row.account_segment --account number
922: || '"' || FND_GLOBAL.Local_Chr(9) || '"' ||
923: l_account_balances_gbl_tmp_row.currency_code --currency
924: || '"' || FND_GLOBAL.Local_Chr(9) || '"' ||