APPS.XTR_JOURNAL_PROCESS_P dependencies on FND_MESSAGE

Line 99: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CLOSE_PER_PARAM');

95:
96: Return (l_param_value);
97: Exception
98: When others then
99: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CLOSE_PER_PARAM');
100: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);
101: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
102: Return null;
103: End GET_CLOSED_PERIOD_PARAM;

Line 100: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);

96: Return (l_param_value);
97: Exception
98: When others then
99: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CLOSE_PER_PARAM');
100: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);
101: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
102: Return null;
103: End GET_CLOSED_PERIOD_PARAM;
104:

Line 101: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

97: Exception
98: When others then
99: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CLOSE_PER_PARAM');
100: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);
101: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
102: Return null;
103: End GET_CLOSED_PERIOD_PARAM;
104:
105:

Line 269: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_BID');

265:
266: -- Added for flex journals. 2404342. ekl
267: -- Issue info message at beginning of each batch being processed.
268:
269: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_BID');
270: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);
271: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
272:
273: -- End addition for 2404342.

Line 270: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);

266: -- Added for flex journals. 2404342. ekl
267: -- Issue info message at beginning of each batch being processed.
268:
269: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_BID');
270: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);
271: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
272:
273: -- End addition for 2404342.
274:

Line 271: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

267: -- Issue info message at beginning of each batch being processed.
268:
269: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_BID');
270: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);
271: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
272:
273: -- End addition for 2404342.
274:
275: Open BATCH_PERIOD;

Line 293: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');

289: Open CHK_JOURNAL_GEN;
290: Fetch CHK_JOURNAL_GEN into l_temp;
291: If CHK_JOURNAL_GEN%FOUND then
292: Close CHK_JOURNAL_GEN;
293: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');
294: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
295: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
296: l_retcode := greatest(l_retcode,1);
297: l_warn_flag := TRUE;

Line 294: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);

290: Fetch CHK_JOURNAL_GEN into l_temp;
291: If CHK_JOURNAL_GEN%FOUND then
292: Close CHK_JOURNAL_GEN;
293: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');
294: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
295: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
296: l_retcode := greatest(l_retcode,1);
297: l_warn_flag := TRUE;
298: Else

Line 295: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

291: If CHK_JOURNAL_GEN%FOUND then
292: Close CHK_JOURNAL_GEN;
293: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');
294: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
295: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
296: l_retcode := greatest(l_retcode,1);
297: l_warn_flag := TRUE;
298: Else
299: Close CHK_JOURNAL_GEN;

Line 387: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_BID');

383:
384: -- Added for flex journals. 2404342. ekl
385: -- Issue info message at end of each batch being processed.
386:
387: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_BID');
388: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);
389: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
390:
391: -- End addition for 2404342.

Line 388: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);

384: -- Added for flex journals. 2404342. ekl
385: -- Issue info message at end of each batch being processed.
386:
387: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_BID');
388: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);
389: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
390:
391: -- End addition for 2404342.
392:

Line 389: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

385: -- Issue info message at end of each batch being processed.
386:
387: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_BID');
388: FND_MESSAGE.Set_Token ('BID', p_curr_batch_id);
389: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
390:
391: -- End addition for 2404342.
392:
393: Fetch BATCH_SEQ into p_curr_batch_id;

Line 465: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');

461: retcode := l_retcode;
462:
463: EXCEPTION
464: when ex_journal_gen then
465: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');
466: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
467: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
468: retcode := greatest(l_retcode,2);
469: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.

Line 466: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);

462:
463: EXCEPTION
464: when ex_journal_gen then
465: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');
466: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
467: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
468: retcode := greatest(l_retcode,2);
469: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
470: when ex_accrls_auth then

Line 467: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

463: EXCEPTION
464: when ex_journal_gen then
465: FND_MESSAGE.Set_Name('XTR', 'XTR_JOURNAL_GEN');
466: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
467: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
468: retcode := greatest(l_retcode,2);
469: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
470: when ex_accrls_auth then
471: FND_MESSAGE.Set_Name('XTR', 'XTR_ACCRLS_AUTH');

Line 471: FND_MESSAGE.Set_Name('XTR', 'XTR_ACCRLS_AUTH');

467: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
468: retcode := greatest(l_retcode,2);
469: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
470: when ex_accrls_auth then
471: FND_MESSAGE.Set_Name('XTR', 'XTR_ACCRLS_AUTH');
472: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
473: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
474: retcode := greatest(l_retcode,2);
475: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.

Line 472: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);

468: retcode := greatest(l_retcode,2);
469: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
470: when ex_accrls_auth then
471: FND_MESSAGE.Set_Name('XTR', 'XTR_ACCRLS_AUTH');
472: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
473: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
474: retcode := greatest(l_retcode,2);
475: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
476: when ex_early_batch then

Line 473: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

469: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
470: when ex_accrls_auth then
471: FND_MESSAGE.Set_Name('XTR', 'XTR_ACCRLS_AUTH');
472: FND_MESSAGE.Set_Token('BATCH', p_curr_batch_id);
473: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
474: retcode := greatest(l_retcode,2);
475: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
476: when ex_early_batch then
477: FND_MESSAGE.Set_Name('XTR', 'XTR_EARLY_BATCH');

Line 477: FND_MESSAGE.Set_Name('XTR', 'XTR_EARLY_BATCH');

473: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
474: retcode := greatest(l_retcode,2);
475: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
476: when ex_early_batch then
477: FND_MESSAGE.Set_Name('XTR', 'XTR_EARLY_BATCH');
478: FND_MESSAGE.Set_Token('PRE_BATCH', l_pre_batch_id);
479: FND_MESSAGE.Set_Token('CUR_BATCH', p_curr_batch_id);
480: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
481: retcode := greatest(l_retcode,2);

Line 478: FND_MESSAGE.Set_Token('PRE_BATCH', l_pre_batch_id);

474: retcode := greatest(l_retcode,2);
475: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
476: when ex_early_batch then
477: FND_MESSAGE.Set_Name('XTR', 'XTR_EARLY_BATCH');
478: FND_MESSAGE.Set_Token('PRE_BATCH', l_pre_batch_id);
479: FND_MESSAGE.Set_Token('CUR_BATCH', p_curr_batch_id);
480: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
481: retcode := greatest(l_retcode,2);
482: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.

Line 479: FND_MESSAGE.Set_Token('CUR_BATCH', p_curr_batch_id);

475: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
476: when ex_early_batch then
477: FND_MESSAGE.Set_Name('XTR', 'XTR_EARLY_BATCH');
478: FND_MESSAGE.Set_Token('PRE_BATCH', l_pre_batch_id);
479: FND_MESSAGE.Set_Token('CUR_BATCH', p_curr_batch_id);
480: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
481: retcode := greatest(l_retcode,2);
482: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
483: END Do_Journal_Process;

Line 480: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

476: when ex_early_batch then
477: FND_MESSAGE.Set_Name('XTR', 'XTR_EARLY_BATCH');
478: FND_MESSAGE.Set_Token('PRE_BATCH', l_pre_batch_id);
479: FND_MESSAGE.Set_Token('CUR_BATCH', p_curr_batch_id);
480: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
481: retcode := greatest(l_retcode,2);
482: -- APP_EXCEPTION.Raise_exception; -- Removed for 2404342. Interferring with new wrapper procedure JOURNALS' put_line.
483: END Do_Journal_Process;
484:

Line 1220: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

1216: Exception
1217: when DUP_VAL_ON_INDEX then
1218: NULL;
1219: when OTHERS then
1220: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1221: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1222: FND_MESSAGE.Set_Token ('EVENT','INSERT_INTO_TEMP_TABLE');
1223: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1224: End;

Line 1221: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');

1217: when DUP_VAL_ON_INDEX then
1218: NULL;
1219: when OTHERS then
1220: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1221: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1222: FND_MESSAGE.Set_Token ('EVENT','INSERT_INTO_TEMP_TABLE');
1223: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1224: End;
1225: End If;

Line 1222: FND_MESSAGE.Set_Token ('EVENT','INSERT_INTO_TEMP_TABLE');

1218: NULL;
1219: when OTHERS then
1220: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1221: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1222: FND_MESSAGE.Set_Token ('EVENT','INSERT_INTO_TEMP_TABLE');
1223: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1224: End;
1225: End If;
1226: return l_ret_value;

Line 1223: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

1219: when OTHERS then
1220: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1221: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1222: FND_MESSAGE.Set_Token ('EVENT','INSERT_INTO_TEMP_TABLE');
1223: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1224: End;
1225: End If;
1226: return l_ret_value;
1227:

Line 1244: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

1240: Exception
1241: when DUP_VAL_ON_INDEX then
1242: NULL;
1243: when OTHERS then
1244: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1245: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1246: FND_MESSAGE.Set_Token ('EVENT','Inserting non-validated deal/transaction number into temp table.');
1247: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1248: End;

Line 1245: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');

1241: when DUP_VAL_ON_INDEX then
1242: NULL;
1243: when OTHERS then
1244: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1245: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1246: FND_MESSAGE.Set_Token ('EVENT','Inserting non-validated deal/transaction number into temp table.');
1247: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1248: End;
1249: return FALSE;

Line 1246: FND_MESSAGE.Set_Token ('EVENT','Inserting non-validated deal/transaction number into temp table.');

1242: NULL;
1243: when OTHERS then
1244: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1245: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1246: FND_MESSAGE.Set_Token ('EVENT','Inserting non-validated deal/transaction number into temp table.');
1247: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1248: End;
1249: return FALSE;
1250: End;

Line 1247: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

1243: when OTHERS then
1244: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1245: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS:VALIDATED');
1246: FND_MESSAGE.Set_Token ('EVENT','Inserting non-validated deal/transaction number into temp table.');
1247: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1248: End;
1249: return FALSE;
1250: End;
1251:

Line 1264: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS_LIST');

1260: Open UNVAL_DEALS;
1261: Fetch UNVAL_DEALS into unval_deals_rec;
1262: If (UNVAL_DEALS%FOUND) then
1263: FND_FILE.Put_Line (FND_FILE.Log, null);
1264: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS_LIST');
1265: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1266: FND_FILE.Put_Line (FND_FILE.Log, null);
1267: While (UNVAL_DEALS%FOUND)
1268: Loop

Line 1265: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);

1261: Fetch UNVAL_DEALS into unval_deals_rec;
1262: If (UNVAL_DEALS%FOUND) then
1263: FND_FILE.Put_Line (FND_FILE.Log, null);
1264: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS_LIST');
1265: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1266: FND_FILE.Put_Line (FND_FILE.Log, null);
1267: While (UNVAL_DEALS%FOUND)
1268: Loop
1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');

Line 1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');

1265: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1266: FND_FILE.Put_Line (FND_FILE.Log, null);
1267: While (UNVAL_DEALS%FOUND)
1268: Loop
1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');
1270: FND_MESSAGE.Set_Token ('DEAL_TYPE', unval_deals_rec.deal_type);
1271: FND_MESSAGE.Set_Token ('DEAL_NO', rtrim(to_char(unval_deals_rec.deal_number)));
1272: FND_MESSAGE.Set_Token ('TRANS_NO', rtrim(to_char(unval_deals_rec.trans_number)));
1273: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);

Line 1270: FND_MESSAGE.Set_Token ('DEAL_TYPE', unval_deals_rec.deal_type);

1266: FND_FILE.Put_Line (FND_FILE.Log, null);
1267: While (UNVAL_DEALS%FOUND)
1268: Loop
1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');
1270: FND_MESSAGE.Set_Token ('DEAL_TYPE', unval_deals_rec.deal_type);
1271: FND_MESSAGE.Set_Token ('DEAL_NO', rtrim(to_char(unval_deals_rec.deal_number)));
1272: FND_MESSAGE.Set_Token ('TRANS_NO', rtrim(to_char(unval_deals_rec.trans_number)));
1273: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1274: Fetch UNVAL_DEALS into unval_deals_rec;

Line 1271: FND_MESSAGE.Set_Token ('DEAL_NO', rtrim(to_char(unval_deals_rec.deal_number)));

1267: While (UNVAL_DEALS%FOUND)
1268: Loop
1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');
1270: FND_MESSAGE.Set_Token ('DEAL_TYPE', unval_deals_rec.deal_type);
1271: FND_MESSAGE.Set_Token ('DEAL_NO', rtrim(to_char(unval_deals_rec.deal_number)));
1272: FND_MESSAGE.Set_Token ('TRANS_NO', rtrim(to_char(unval_deals_rec.trans_number)));
1273: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1274: Fetch UNVAL_DEALS into unval_deals_rec;
1275: End Loop;

Line 1272: FND_MESSAGE.Set_Token ('TRANS_NO', rtrim(to_char(unval_deals_rec.trans_number)));

1268: Loop
1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');
1270: FND_MESSAGE.Set_Token ('DEAL_TYPE', unval_deals_rec.deal_type);
1271: FND_MESSAGE.Set_Token ('DEAL_NO', rtrim(to_char(unval_deals_rec.deal_number)));
1272: FND_MESSAGE.Set_Token ('TRANS_NO', rtrim(to_char(unval_deals_rec.trans_number)));
1273: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1274: Fetch UNVAL_DEALS into unval_deals_rec;
1275: End Loop;
1276: End If;

Line 1273: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);

1269: FND_MESSAGE.Set_Name ('XTR','XTR_UNVAL_DEALS');
1270: FND_MESSAGE.Set_Token ('DEAL_TYPE', unval_deals_rec.deal_type);
1271: FND_MESSAGE.Set_Token ('DEAL_NO', rtrim(to_char(unval_deals_rec.deal_number)));
1272: FND_MESSAGE.Set_Token ('TRANS_NO', rtrim(to_char(unval_deals_rec.trans_number)));
1273: FND_FILE.Put_Line (FND_FILE.Log, FND_MESSAGE.Get);
1274: Fetch UNVAL_DEALS into unval_deals_rec;
1275: End Loop;
1276: End If;
1277: Close UNVAL_DEALS;

Line 1433: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');

1429: v_ChkCpnRateReset_out);
1430: --if the coupon or its tax comp has not been reset
1431: --print out a warning message.
1432: if not v_ChkCpnRateReset_out.yes then
1433: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');
1434: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);
1435: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1436: --1336492 g_gen_journal_retcode:=1;
1437:

Line 1434: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);

1430: --if the coupon or its tax comp has not been reset
1431: --print out a warning message.
1432: if not v_ChkCpnRateReset_out.yes then
1433: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');
1434: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);
1435: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1436: --1336492 g_gen_journal_retcode:=1;
1437:
1438: -- 1336492 modification.

Line 1435: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

1431: --print out a warning message.
1432: if not v_ChkCpnRateReset_out.yes then
1433: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');
1434: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);
1435: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1436: --1336492 g_gen_journal_retcode:=1;
1437:
1438: -- 1336492 modification.
1439: l_ret_value := greatest(l_ret_value,1);

Line 1504: FND_MESSAGE.Set_Name ('XTR','XTR_2206');

1500: Q2_REC.cr_amount);
1501:
1502: EXCEPTION
1503: when GL_CURRENCY_API.INVALID_CURRENCY then
1504: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1505: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1506: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1507: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1508:

Line 1505: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);

1501:
1502: EXCEPTION
1503: when GL_CURRENCY_API.INVALID_CURRENCY then
1504: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1505: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1506: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1507: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1508:
1509: --1336492 l_error_flag := 'Y';

Line 1506: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

1502: EXCEPTION
1503: when GL_CURRENCY_API.INVALID_CURRENCY then
1504: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1505: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1506: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1507: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1508:
1509: --1336492 l_error_flag := 'Y';
1510:

Line 1507: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

1503: when GL_CURRENCY_API.INVALID_CURRENCY then
1504: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1505: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1506: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1507: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1508:
1509: --1336492 l_error_flag := 'Y';
1510:
1511: -- 1336492 modification, replaces above l_error_flag.

Line 1519: FND_MESSAGE.Set_Name ('XTR','XTR_2207');

1515:
1516: Goto NEXT_Q2;
1517:
1518: when GL_CURRENCY_API.NO_RATE then
1519: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));
1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

Line 1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);

1516: Goto NEXT_Q2;
1517:
1518: when GL_CURRENCY_API.NO_RATE then
1519: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));
1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1524: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

Line 1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

1517:
1518: when GL_CURRENCY_API.NO_RATE then
1519: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));
1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1524: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1525:

Line 1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));

1518: when GL_CURRENCY_API.NO_RATE then
1519: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));
1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1524: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1525:
1526: --1336492 l_error_flag := 'Y';

Line 1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

1519: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));
1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1524: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1525:
1526: --1336492 l_error_flag := 'Y';
1527:

Line 1524: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

1520: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1521: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1522: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));
1523: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1524: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1525:
1526: --1336492 l_error_flag := 'Y';
1527:
1528: -- 1336492 modification, replaces above l_error_flag.

Line 1590: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

1586: EXCEPTION
1587: when DUP_VAL_ON_INDEX then
1588: NULL;
1589: when OTHERS then
1590: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1591: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1592: FND_MESSAGE.Set_Token ('EVENT','Inserting journal into table.');
1593: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1594:

Line 1591: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

1587: when DUP_VAL_ON_INDEX then
1588: NULL;
1589: when OTHERS then
1590: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1591: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1592: FND_MESSAGE.Set_Token ('EVENT','Inserting journal into table.');
1593: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1594:
1595: -- 1336492 addition.

Line 1592: FND_MESSAGE.Set_Token ('EVENT','Inserting journal into table.');

1588: NULL;
1589: when OTHERS then
1590: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1591: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1592: FND_MESSAGE.Set_Token ('EVENT','Inserting journal into table.');
1593: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1594:
1595: -- 1336492 addition.
1596: l_ret_value := 2;

Line 1593: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

1589: when OTHERS then
1590: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1591: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1592: FND_MESSAGE.Set_Token ('EVENT','Inserting journal into table.');
1593: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1594:
1595: -- 1336492 addition.
1596: l_ret_value := 2;
1597: END;

Line 1788: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');

1784: v_ChkCpnRateReset_out);
1785: --if the coupon or its tax comp has not been reset
1786: --print out a warning message.
1787: if not v_ChkCpnRateReset_out.yes then
1788: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');
1789: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);
1790: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1791: --1336492 g_gen_journal_retcode:=1;
1792:

Line 1789: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);

1785: --if the coupon or its tax comp has not been reset
1786: --print out a warning message.
1787: if not v_ChkCpnRateReset_out.yes then
1788: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');
1789: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);
1790: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1791: --1336492 g_gen_journal_retcode:=1;
1792:
1793: -- 1336492. Replaces above g_gen_journal_retcode.

Line 1790: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

1786: --print out a warning message.
1787: if not v_ChkCpnRateReset_out.yes then
1788: FND_MESSAGE.Set_Name ('XTR','XTR_COUPON_RESET_DEAL');
1789: FND_MESSAGE.Set_Token ('DEAL_NO',v_ChkCpnRateReset_out.deal_no);
1790: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1791: --1336492 g_gen_journal_retcode:=1;
1792:
1793: -- 1336492. Replaces above g_gen_journal_retcode.
1794: l_ret_value := greatest(l_ret_value,1);

Line 1827: FND_MESSAGE.Set_Name ('XTR','XTR_2206');

1823: l_pty_convert_type,
1824: Q3_REC.credit_amount);
1825: EXCEPTION
1826: when GL_CURRENCY_API.INVALID_CURRENCY then
1827: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1828: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1829: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1830: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1831: --1336492 l_error_flag := 'Y';

Line 1828: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);

1824: Q3_REC.credit_amount);
1825: EXCEPTION
1826: when GL_CURRENCY_API.INVALID_CURRENCY then
1827: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1828: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1829: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1830: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1831: --1336492 l_error_flag := 'Y';
1832:

Line 1829: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

1825: EXCEPTION
1826: when GL_CURRENCY_API.INVALID_CURRENCY then
1827: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1828: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1829: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1830: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1831: --1336492 l_error_flag := 'Y';
1832:
1833: -- 1336492. Replaces l_error_flag.

Line 1830: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

1826: when GL_CURRENCY_API.INVALID_CURRENCY then
1827: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1828: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1829: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1830: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1831: --1336492 l_error_flag := 'Y';
1832:
1833: -- 1336492. Replaces l_error_flag.
1834: l_ret_value := greatest(l_ret_value,2);

Line 1840: FND_MESSAGE.Set_Name ('XTR','XTR_2207');

1836:
1837: Goto NEXT_Q3;
1838:
1839: when GL_CURRENCY_API.NO_RATE then
1840: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));
1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

Line 1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);

1837: Goto NEXT_Q3;
1838:
1839: when GL_CURRENCY_API.NO_RATE then
1840: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));
1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1845: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

Line 1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

1838:
1839: when GL_CURRENCY_API.NO_RATE then
1840: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));
1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1845: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1846: --1336492 l_error_flag := 'Y';

Line 1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));

1839: when GL_CURRENCY_API.NO_RATE then
1840: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));
1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1845: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1846: --1336492 l_error_flag := 'Y';
1847:

Line 1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

1840: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));
1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1845: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1846: --1336492 l_error_flag := 'Y';
1847:
1848: -- 1336492. Replaces l_error_flag.

Line 1845: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

1841: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1842: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1843: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));
1844: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
1845: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1846: --1336492 l_error_flag := 'Y';
1847:
1848: -- 1336492. Replaces l_error_flag.
1849: l_ret_value := greatest(l_ret_value,2);

Line 1911: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

1907: EXCEPTION
1908: when DUP_VAL_ON_INDEX then
1909: NULL;
1910: when OTHERS then
1911: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1912: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1913: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1914: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1915:

Line 1912: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

1908: when DUP_VAL_ON_INDEX then
1909: NULL;
1910: when OTHERS then
1911: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1912: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1913: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1914: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1915:
1916: -- 1336492.

Line 1913: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');

1909: NULL;
1910: when OTHERS then
1911: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1912: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1913: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1914: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1915:
1916: -- 1336492.
1917: l_ret_value := greatest(l_ret_value,2);

Line 1914: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

1910: when OTHERS then
1911: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1912: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1913: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1914: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1915:
1916: -- 1336492.
1917: l_ret_value := greatest(l_ret_value,2);
1918: END;

Line 1995: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

1991: EXCEPTION
1992: when DUP_VAL_ON_INDEX then
1993: NULL;
1994: when OTHERS then
1995: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1996: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1997: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1998: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1999:

Line 1996: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

1992: when DUP_VAL_ON_INDEX then
1993: NULL;
1994: when OTHERS then
1995: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1996: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1997: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1998: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1999:
2000: -- 1336492.

Line 1997: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');

1993: NULL;
1994: when OTHERS then
1995: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1996: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1997: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1998: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1999:
2000: -- 1336492.
2001: l_ret_value := greatest(l_ret_value,2);

Line 1998: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

1994: when OTHERS then
1995: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
1996: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
1997: FND_MESSAGE.Set_Token ('EVENT','Inserting exposure journal into table.');
1998: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
1999:
2000: -- 1336492.
2001: l_ret_value := greatest(l_ret_value,2);
2002:

Line 2120: FND_MESSAGE.Set_Name ('XTR','XTR_2206');

2116: End If;
2117:
2118: EXCEPTION
2119: when GL_CURRENCY_API.INVALID_CURRENCY then
2120: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2121: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2122: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2123: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2124: --1336492 l_error_flag := 'Y';

Line 2121: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);

2117:
2118: EXCEPTION
2119: when GL_CURRENCY_API.INVALID_CURRENCY then
2120: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2121: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2122: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2123: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2124: --1336492 l_error_flag := 'Y';
2125: l_ret_value := greatest(l_ret_value,2);

Line 2122: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2118: EXCEPTION
2119: when GL_CURRENCY_API.INVALID_CURRENCY then
2120: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2121: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2122: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2123: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2124: --1336492 l_error_flag := 'Y';
2125: l_ret_value := greatest(l_ret_value,2);
2126: Goto NEXT_Q4;

Line 2123: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

2119: when GL_CURRENCY_API.INVALID_CURRENCY then
2120: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2121: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2122: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2123: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2124: --1336492 l_error_flag := 'Y';
2125: l_ret_value := greatest(l_ret_value,2);
2126: Goto NEXT_Q4;
2127:

Line 2129: FND_MESSAGE.Set_Name ('XTR','XTR_2207');

2125: l_ret_value := greatest(l_ret_value,2);
2126: Goto NEXT_Q4;
2127:
2128: when GL_CURRENCY_API.NO_RATE then
2129: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));
2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

Line 2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);

2126: Goto NEXT_Q4;
2127:
2128: when GL_CURRENCY_API.NO_RATE then
2129: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));
2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2134: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

Line 2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2127:
2128: when GL_CURRENCY_API.NO_RATE then
2129: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));
2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2134: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2135: --1336492 l_error_flag := 'Y';

Line 2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));

2128: when GL_CURRENCY_API.NO_RATE then
2129: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));
2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2134: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2135: --1336492 l_error_flag := 'Y';
2136: l_ret_value := greatest(l_ret_value,2);

Line 2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

2129: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));
2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2134: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2135: --1336492 l_error_flag := 'Y';
2136: l_ret_value := greatest(l_ret_value,2);
2137: Goto NEXT_Q4;

Line 2134: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2130: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2131: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2132: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));
2133: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2134: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2135: --1336492 l_error_flag := 'Y';
2136: l_ret_value := greatest(l_ret_value,2);
2137: Goto NEXT_Q4;
2138: END;

Line 2194: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

2190: EXCEPTION
2191: when DUP_VAL_ON_INDEX then
2192: NULL;
2193: when OTHERS then
2194: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2195: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2196: FND_MESSAGE.Set_Token ('EVENT','Inserting accruals journal into table');
2197: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2198:

Line 2195: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

2191: when DUP_VAL_ON_INDEX then
2192: NULL;
2193: when OTHERS then
2194: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2195: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2196: FND_MESSAGE.Set_Token ('EVENT','Inserting accruals journal into table');
2197: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2198:
2199: -- 1336492.

Line 2196: FND_MESSAGE.Set_Token ('EVENT','Inserting accruals journal into table');

2192: NULL;
2193: when OTHERS then
2194: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2195: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2196: FND_MESSAGE.Set_Token ('EVENT','Inserting accruals journal into table');
2197: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2198:
2199: -- 1336492.
2200: l_ret_value := greatest(l_ret_value,2);

Line 2197: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2193: when OTHERS then
2194: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2195: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2196: FND_MESSAGE.Set_Token ('EVENT','Inserting accruals journal into table');
2197: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2198:
2199: -- 1336492.
2200: l_ret_value := greatest(l_ret_value,2);
2201: END;

Line 2315: FND_MESSAGE.Set_Name ('XTR','XTR_2206');

2311: End If;
2312:
2313: EXCEPTION
2314: when GL_CURRENCY_API.INVALID_CURRENCY then
2315: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2316: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2317: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2318: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2319: --1336492 l_error_flag := 'Y';

Line 2316: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);

2312:
2313: EXCEPTION
2314: when GL_CURRENCY_API.INVALID_CURRENCY then
2315: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2316: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2317: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2318: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2319: --1336492 l_error_flag := 'Y';
2320: l_ret_value := greatest(l_ret_value,2);

Line 2317: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2313: EXCEPTION
2314: when GL_CURRENCY_API.INVALID_CURRENCY then
2315: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2316: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2317: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2318: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2319: --1336492 l_error_flag := 'Y';
2320: l_ret_value := greatest(l_ret_value,2);
2321: Goto NEXT_Q5;

Line 2318: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

2314: when GL_CURRENCY_API.INVALID_CURRENCY then
2315: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2316: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2317: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2318: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2319: --1336492 l_error_flag := 'Y';
2320: l_ret_value := greatest(l_ret_value,2);
2321: Goto NEXT_Q5;
2322:

Line 2324: FND_MESSAGE.Set_Name ('XTR','XTR_2207');

2320: l_ret_value := greatest(l_ret_value,2);
2321: Goto NEXT_Q5;
2322:
2323: when GL_CURRENCY_API.NO_RATE then
2324: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));
2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

Line 2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);

2321: Goto NEXT_Q5;
2322:
2323: when GL_CURRENCY_API.NO_RATE then
2324: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));
2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2329: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

Line 2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2322:
2323: when GL_CURRENCY_API.NO_RATE then
2324: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));
2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2329: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2330: --1336492 l_error_flag := 'Y';

Line 2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));

2323: when GL_CURRENCY_API.NO_RATE then
2324: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));
2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2329: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2330: --1336492 l_error_flag := 'Y';
2331: l_ret_value := greatest(l_ret_value,2);

Line 2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

2324: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));
2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2329: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2330: --1336492 l_error_flag := 'Y';
2331: l_ret_value := greatest(l_ret_value,2);
2332: Goto NEXT_Q5;

Line 2329: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2325: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2326: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2327: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));
2328: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2329: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2330: --1336492 l_error_flag := 'Y';
2331: l_ret_value := greatest(l_ret_value,2);
2332: Goto NEXT_Q5;
2333: END;

Line 2414: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

2410: EXCEPTION
2411: when DUP_VAL_ON_INDEX then
2412: NULL;
2413: when OTHERS then
2414: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2415: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2416: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2417: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2418:

Line 2415: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

2411: when DUP_VAL_ON_INDEX then
2412: NULL;
2413: when OTHERS then
2414: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2415: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2416: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2417: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2418:
2419: END;

Line 2416: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');

2412: NULL;
2413: when OTHERS then
2414: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2415: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2416: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2417: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2418:
2419: END;
2420:

Line 2417: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2413: when OTHERS then
2414: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2415: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2416: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2417: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2418:
2419: END;
2420:
2421:

Line 2488: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

2484: EXCEPTION
2485: when DUP_VAL_ON_INDEX then
2486: NULL;
2487: when OTHERS then
2488: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2489: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2490: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2491: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2492:

Line 2489: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

2485: when DUP_VAL_ON_INDEX then
2486: NULL;
2487: when OTHERS then
2488: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2489: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2490: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2491: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2492:
2493: -- 1336492.

Line 2490: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');

2486: NULL;
2487: when OTHERS then
2488: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2489: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2490: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2491: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2492:
2493: -- 1336492.
2494: l_ret_value := greatest(l_ret_value,2);

Line 2491: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2487: when OTHERS then
2488: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2489: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2490: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2491: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2492:
2493: -- 1336492.
2494: l_ret_value := greatest(l_ret_value,2);
2495: END;

Line 2620: FND_MESSAGE.Set_Name ('XTR','XTR_2206');

2616: Q6_REC.amount);
2617: End If;
2618: EXCEPTION
2619: when GL_CURRENCY_API.INVALID_CURRENCY then
2620: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2621: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2622: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2623: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2624: l_ret_value := greatest(l_ret_value,2);

Line 2621: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);

2617: End If;
2618: EXCEPTION
2619: when GL_CURRENCY_API.INVALID_CURRENCY then
2620: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2621: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2622: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2623: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2624: l_ret_value := greatest(l_ret_value,2);
2625: Goto NEXT_Q6;

Line 2622: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2618: EXCEPTION
2619: when GL_CURRENCY_API.INVALID_CURRENCY then
2620: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2621: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2622: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2623: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2624: l_ret_value := greatest(l_ret_value,2);
2625: Goto NEXT_Q6;
2626:

Line 2623: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

2619: when GL_CURRENCY_API.INVALID_CURRENCY then
2620: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2621: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2622: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2623: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2624: l_ret_value := greatest(l_ret_value,2);
2625: Goto NEXT_Q6;
2626:
2627: when GL_CURRENCY_API.NO_RATE then

Line 2628: FND_MESSAGE.Set_Name ('XTR','XTR_2207');

2624: l_ret_value := greatest(l_ret_value,2);
2625: Goto NEXT_Q6;
2626:
2627: when GL_CURRENCY_API.NO_RATE then
2628: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));
2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

Line 2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);

2625: Goto NEXT_Q6;
2626:
2627: when GL_CURRENCY_API.NO_RATE then
2628: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));
2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

Line 2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2626:
2627: when GL_CURRENCY_API.NO_RATE then
2628: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));
2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2634: l_ret_value := greatest(l_ret_value,2);

Line 2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));

2627: when GL_CURRENCY_API.NO_RATE then
2628: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));
2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2634: l_ret_value := greatest(l_ret_value,2);
2635: Goto NEXT_Q6;

Line 2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

2628: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));
2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2634: l_ret_value := greatest(l_ret_value,2);
2635: Goto NEXT_Q6;
2636: END;

Line 2633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2629: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2630: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2631: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));
2632: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2634: l_ret_value := greatest(l_ret_value,2);
2635: Goto NEXT_Q6;
2636: END;
2637:

Line 2716: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

2712: EXCEPTION
2713: when DUP_VAL_ON_INDEX then
2714: NULL;
2715: when OTHERS then
2716: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2717: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2718: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2719: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2720:

Line 2717: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

2713: when DUP_VAL_ON_INDEX then
2714: NULL;
2715: when OTHERS then
2716: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2717: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2718: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2719: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2720:
2721: END;

Line 2718: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');

2714: NULL;
2715: when OTHERS then
2716: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2717: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2718: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2719: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2720:
2721: END;
2722:

Line 2719: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2715: when OTHERS then
2716: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2717: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2718: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2719: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2720:
2721: END;
2722:
2723:

Line 2784: FND_MESSAGE.set_name('XTR', 'XTR_HEDGE_JOURNAL_TREAT');

2780: Q6_REC.date_type,
2781: Q6_REC.action_code);
2782:
2783: if Q6_REC.reval_eff_flag = 'T' then
2784: FND_MESSAGE.set_name('XTR', 'XTR_HEDGE_JOURNAL_TREAT');
2785: FND_MESSAGE.Set_Token ('DEAL_NO', Q6_REC.deal_number);
2786: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2787: End if;
2788:

Line 2785: FND_MESSAGE.Set_Token ('DEAL_NO', Q6_REC.deal_number);

2781: Q6_REC.action_code);
2782:
2783: if Q6_REC.reval_eff_flag = 'T' then
2784: FND_MESSAGE.set_name('XTR', 'XTR_HEDGE_JOURNAL_TREAT');
2785: FND_MESSAGE.Set_Token ('DEAL_NO', Q6_REC.deal_number);
2786: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2787: End if;
2788:
2789: EXCEPTION

Line 2786: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2782:
2783: if Q6_REC.reval_eff_flag = 'T' then
2784: FND_MESSAGE.set_name('XTR', 'XTR_HEDGE_JOURNAL_TREAT');
2785: FND_MESSAGE.Set_Token ('DEAL_NO', Q6_REC.deal_number);
2786: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2787: End if;
2788:
2789: EXCEPTION
2790: when DUP_VAL_ON_INDEX then

Line 2793: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

2789: EXCEPTION
2790: when DUP_VAL_ON_INDEX then
2791: NULL;
2792: when OTHERS then
2793: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2794: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2795: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2796: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2797: l_ret_value := greatest(l_ret_value,2);

Line 2794: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

2790: when DUP_VAL_ON_INDEX then
2791: NULL;
2792: when OTHERS then
2793: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2794: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2795: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2796: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2797: l_ret_value := greatest(l_ret_value,2);
2798: END;

Line 2795: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');

2791: NULL;
2792: when OTHERS then
2793: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2794: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2795: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2796: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2797: l_ret_value := greatest(l_ret_value,2);
2798: END;
2799:

Line 2796: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2792: when OTHERS then
2793: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2794: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2795: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2796: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2797: l_ret_value := greatest(l_ret_value,2);
2798: END;
2799:
2800: End if; -- Fx in SOB currency

Line 2872: FND_MESSAGE.Set_Name ('XTR','XTR_2206');

2868: End If;
2869:
2870: EXCEPTION
2871: when GL_CURRENCY_API.INVALID_CURRENCY then
2872: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2873: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2874: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2875: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2876: l_ret_value := greatest(l_ret_value,2);

Line 2873: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);

2869:
2870: EXCEPTION
2871: when GL_CURRENCY_API.INVALID_CURRENCY then
2872: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2873: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2874: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2875: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2876: l_ret_value := greatest(l_ret_value,2);
2877: Goto NEXT_Q7;

Line 2874: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2870: EXCEPTION
2871: when GL_CURRENCY_API.INVALID_CURRENCY then
2872: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2873: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2874: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2875: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2876: l_ret_value := greatest(l_ret_value,2);
2877: Goto NEXT_Q7;
2878:

Line 2875: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

2871: when GL_CURRENCY_API.INVALID_CURRENCY then
2872: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2873: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2874: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2875: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2876: l_ret_value := greatest(l_ret_value,2);
2877: Goto NEXT_Q7;
2878:
2879: when GL_CURRENCY_API.NO_RATE then

Line 2880: FND_MESSAGE.Set_Name ('XTR','XTR_2207');

2876: l_ret_value := greatest(l_ret_value,2);
2877: Goto NEXT_Q7;
2878:
2879: when GL_CURRENCY_API.NO_RATE then
2880: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));
2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

Line 2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);

2877: Goto NEXT_Q7;
2878:
2879: when GL_CURRENCY_API.NO_RATE then
2880: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));
2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2885: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

Line 2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);

2878:
2879: when GL_CURRENCY_API.NO_RATE then
2880: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));
2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2885: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2886: l_ret_value := greatest(l_ret_value,2);

Line 2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));

2879: when GL_CURRENCY_API.NO_RATE then
2880: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));
2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2885: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2886: l_ret_value := greatest(l_ret_value,2);
2887: Goto NEXT_Q7;

Line 2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));

2880: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));
2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2885: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2886: l_ret_value := greatest(l_ret_value,2);
2887: Goto NEXT_Q7;
2888: END;

Line 2885: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2881: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2882: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2883: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));
2884: FND_MESSAGE.Set_Token ('C_TYPE', nvl(l_pty_user_convert_type,l_pty_convert_type));
2885: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2886: l_ret_value := greatest(l_ret_value,2);
2887: Goto NEXT_Q7;
2888: END;
2889: BEGIN

Line 2944: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

2940: EXCEPTION
2941: when DUP_VAL_ON_INDEX then
2942: NULL;
2943: when OTHERS then
2944: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2945: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2946: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2947: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2948: l_ret_value := greatest(l_ret_value,2);

Line 2945: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

2941: when DUP_VAL_ON_INDEX then
2942: NULL;
2943: when OTHERS then
2944: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2945: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2946: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2947: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2948: l_ret_value := greatest(l_ret_value,2);
2949: END;

Line 2946: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');

2942: NULL;
2943: when OTHERS then
2944: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2945: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2946: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2947: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2948: l_ret_value := greatest(l_ret_value,2);
2949: END;
2950:

Line 2947: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

2943: when OTHERS then
2944: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
2945: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
2946: FND_MESSAGE.Set_Token ('EVENT','Inserting revaluation journal into table');
2947: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
2948: l_ret_value := greatest(l_ret_value,2);
2949: END;
2950:
2951: End If; -- If zero amounts.

Line 3019: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

3015: l_sysdate,
3016: fnd_global.login_id);
3017: EXCEPTION
3018: when OTHERS then
3019: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
3020: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
3021: FND_MESSAGE.Set_Token ('EVENT','Inserting batch event record into table');
3022: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
3023: PRT_UNVAL_DEALS; -- added for 1336492.

Line 3020: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');

3016: fnd_global.login_id);
3017: EXCEPTION
3018: when OTHERS then
3019: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
3020: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
3021: FND_MESSAGE.Set_Token ('EVENT','Inserting batch event record into table');
3022: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
3023: PRT_UNVAL_DEALS; -- added for 1336492.
3024: Rollback;

Line 3021: FND_MESSAGE.Set_Token ('EVENT','Inserting batch event record into table');

3017: EXCEPTION
3018: when OTHERS then
3019: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
3020: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
3021: FND_MESSAGE.Set_Token ('EVENT','Inserting batch event record into table');
3022: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
3023: PRT_UNVAL_DEALS; -- added for 1336492.
3024: Rollback;
3025: return 2; -- modified for 1336492.

Line 3022: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);

3018: when OTHERS then
3019: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');
3020: FND_MESSAGE.Set_Token ('PROCEDURE','GEN_JOURNALS');
3021: FND_MESSAGE.Set_Token ('EVENT','Inserting batch event record into table');
3022: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.get);
3023: PRT_UNVAL_DEALS; -- added for 1336492.
3024: Rollback;
3025: return 2; -- modified for 1336492.
3026: END;

Line 3154: FND_MESSAGE.set_name ('XTR','XTR_2115');

3150: --
3151: BEGIN
3152: -- Setup reversal comment message.
3153:
3154: FND_MESSAGE.set_name ('XTR','XTR_2115');
3155: comment_msg := FND_MESSAGE.get;
3156:
3157: -- Set the dealer code
3158:

Line 3155: comment_msg := FND_MESSAGE.get;

3151: BEGIN
3152: -- Setup reversal comment message.
3153:
3154: FND_MESSAGE.set_name ('XTR','XTR_2115');
3155: comment_msg := FND_MESSAGE.get;
3156:
3157: -- Set the dealer code
3158:
3159: fnd_user_id := FND_GLOBAL.USER_ID;

Line 3408: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CUTOFF_DATE');

3404: -- Invalid combination.
3405: -- Cutoff date not provided for a Non-Revaluation/Non-Accrual
3406: -- related journal generation request.
3407:
3408: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CUTOFF_DATE');
3409: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3410: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3411: l_retcode := greatest(l_retcode,2);
3412:

Line 3409: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3405: -- Cutoff date not provided for a Non-Revaluation/Non-Accrual
3406: -- related journal generation request.
3407:
3408: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CUTOFF_DATE');
3409: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3410: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3411: l_retcode := greatest(l_retcode,2);
3412:
3413: Elsif (p_batch_id_from is not null and p_batch_id_to is not null) then

Line 3410: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3406: -- related journal generation request.
3407:
3408: FND_MESSAGE.Set_Name ('XTR','XTR_NO_CUTOFF_DATE');
3409: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3410: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3411: l_retcode := greatest(l_retcode,2);
3412:
3413: Elsif (p_batch_id_from is not null and p_batch_id_to is not null) then
3414:

Line 3420: FND_MESSAGE.Set_Name ('XTR','XTR_INVALID_PARAMETER_COMBO');

3416: -- related journal generation.
3417: -- Cannot already have a specific batch id range for a
3418: -- journal only batch that is about to be created.
3419:
3420: FND_MESSAGE.Set_Name ('XTR','XTR_INVALID_PARAMETER_COMBO');
3421: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3422: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3423: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3424: l_retcode := greatest(l_retcode,2);

Line 3421: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));

3417: -- Cannot already have a specific batch id range for a
3418: -- journal only batch that is about to be created.
3419:
3420: FND_MESSAGE.Set_Name ('XTR','XTR_INVALID_PARAMETER_COMBO');
3421: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3422: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3423: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3424: l_retcode := greatest(l_retcode,2);
3425:

Line 3422: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));

3418: -- journal only batch that is about to be created.
3419:
3420: FND_MESSAGE.Set_Name ('XTR','XTR_INVALID_PARAMETER_COMBO');
3421: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3422: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3423: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3424: l_retcode := greatest(l_retcode,2);
3425:
3426: Elsif (p_cutoff_date is not null) then

Line 3423: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3419:
3420: FND_MESSAGE.Set_Name ('XTR','XTR_INVALID_PARAMETER_COMBO');
3421: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3422: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3423: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3424: l_retcode := greatest(l_retcode,2);
3425:
3426: Elsif (p_cutoff_date is not null) then
3427:

Line 3434: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_DATE');

3430: While USER_COMPANIES%FOUND
3431: Loop
3432: l_sub_retcode := 0;
3433:
3434: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_DATE');
3435: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3436: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3437: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3438:

Line 3435: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3431: Loop
3432: l_sub_retcode := 0;
3433:
3434: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_DATE');
3435: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3436: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3437: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3438:
3439: Do_Journal_Process

Line 3436: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);

3432: l_sub_retcode := 0;
3433:
3434: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_DATE');
3435: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3436: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3437: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3438:
3439: Do_Journal_Process
3440: (l_sub_errbuf,

Line 3437: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3433:
3434: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_DATE');
3435: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3436: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3437: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3438:
3439: Do_Journal_Process
3440: (l_sub_errbuf,
3441: l_sub_retcode,

Line 3450: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_DATE');

3446: l_cutoff_date);
3447:
3448: l_retcode := greatest(l_retcode,l_sub_retcode);
3449:
3450: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_DATE');
3451: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3452: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3453: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3454:

Line 3451: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3447:
3448: l_retcode := greatest(l_retcode,l_sub_retcode);
3449:
3450: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_DATE');
3451: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3452: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3453: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3454:
3455: Fetch USER_COMPANIES into l_company_code, l_sob_id;

Line 3452: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);

3448: l_retcode := greatest(l_retcode,l_sub_retcode);
3449:
3450: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_DATE');
3451: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3452: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3453: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3454:
3455: Fetch USER_COMPANIES into l_company_code, l_sob_id;
3456: End Loop;

Line 3453: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3449:
3450: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_DATE');
3451: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3452: FND_MESSAGE.Set_Token ('CUTOFF_DATE', p_cutoff_date);
3453: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3454:
3455: Fetch USER_COMPANIES into l_company_code, l_sob_id;
3456: End Loop;
3457: Close USER_COMPANIES;

Line 3473: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_BID');

3469: While USER_COMPANIES%FOUND
3470: Loop
3471: l_sub_retcode := 0;
3472:
3473: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_BID');
3474: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3475: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3476: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3477: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 3474: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3470: Loop
3471: l_sub_retcode := 0;
3472:
3473: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_BID');
3474: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3475: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3476: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3477: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3478:

Line 3475: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));

3471: l_sub_retcode := 0;
3472:
3473: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_BID');
3474: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3475: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3476: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3477: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3478:
3479: Do_Journal_Process

Line 3476: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));

3472:
3473: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_BID');
3474: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3475: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3476: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3477: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3478:
3479: Do_Journal_Process
3480: (l_sub_errbuf,

Line 3477: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3473: FND_MESSAGE.Set_Name ('XTR','XTR_START_GEN_JRNL_BY_BID');
3474: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3475: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3476: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3477: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3478:
3479: Do_Journal_Process
3480: (l_sub_errbuf,
3481: l_sub_retcode,

Line 3490: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_BID');

3486: to_date(null));
3487:
3488: l_retcode := greatest(l_retcode,l_sub_retcode);
3489:
3490: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_BID');
3491: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3492: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3493: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3494: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 3491: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3487:
3488: l_retcode := greatest(l_retcode,l_sub_retcode);
3489:
3490: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_BID');
3491: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3492: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3493: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3494: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3495:

Line 3492: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));

3488: l_retcode := greatest(l_retcode,l_sub_retcode);
3489:
3490: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_BID');
3491: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3492: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3493: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3494: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3495:
3496: Fetch USER_COMPANIES into l_company_code, l_sob_id;

Line 3493: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));

3489:
3490: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_BID');
3491: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3492: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3493: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3494: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3495:
3496: Fetch USER_COMPANIES into l_company_code, l_sob_id;
3497: End Loop;

Line 3494: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3490: FND_MESSAGE.Set_Name ('XTR','XTR_END_GEN_JRNL_BY_BID');
3491: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3492: FND_MESSAGE.Set_Token ('BID_FROM', to_char(p_batch_id_from));
3493: FND_MESSAGE.Set_Token ('BID_TO', to_char(p_batch_id_to));
3494: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3495:
3496: Fetch USER_COMPANIES into l_company_code, l_sob_id;
3497: End Loop;
3498: Close USER_COMPANIES;

Line 3516: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL');

3512: While USER_COMPANIES%FOUND
3513: Loop
3514: -- Start journal transfer process for company.
3515:
3516: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL');
3517: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3518: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3519:
3520: -- If no specific closed period posting denoted, use per company parameter.

Line 3517: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3513: Loop
3514: -- Start journal transfer process for company.
3515:
3516: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL');
3517: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3518: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3519:
3520: -- If no specific closed period posting denoted, use per company parameter.
3521: -- Otherwise, use the user overridden value.

Line 3518: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3514: -- Start journal transfer process for company.
3515:
3516: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL');
3517: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3518: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3519:
3520: -- If no specific closed period posting denoted, use per company parameter.
3521: -- Otherwise, use the user overridden value.
3522:

Line 3594: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');

3590: close c_acctg_period;
3591:
3592: If (nvl(l_min_period_name,'$$$') <> nvl(l_max_period_name,'@@@')) then
3593: l_sub_retcode := 1;
3594: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');

Line 3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3591:
3592: If (nvl(l_min_period_name,'$$$') <> nvl(l_max_period_name,'@@@')) then
3593: l_sub_retcode := 1;
3594: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));

3592: If (nvl(l_min_period_name,'$$$') <> nvl(l_max_period_name,'@@@')) then
3593: l_sub_retcode := 1;
3594: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');

Line 3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3593: l_sub_retcode := 1;
3594: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

Line 3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');

3594: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));

Line 3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3595: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3603: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');

3596: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3603: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3604: l_retcode := greatest(l_retcode, l_sub_retcode);

Line 3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3597: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3603: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3604: l_retcode := greatest(l_retcode, l_sub_retcode);
3605: Else

Line 3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));

3598: FND_MESSAGE.Set_Name ('XTR','XTR_CONC_DIFF_ACCTG');
3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3603: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3604: l_retcode := greatest(l_retcode, l_sub_retcode);
3605: Else
3606:

Line 3603: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3599: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3600: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
3601: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3602: FND_MESSAGE.Set_Token ('BID', to_char(l_next_bid));
3603: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3604: l_retcode := greatest(l_retcode, l_sub_retcode);
3605: Else
3606:
3607: XTR_ORACLE_FIN_INTERFACES_P.Transfer_Jnls

Line 3636: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL');

3632: Else
3633: Close BATCHES_BY_BID_RANGE;
3634: End If;
3635:
3636: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL');
3637: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3638: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3639:
3640: Fetch USER_COMPANIES into l_company_code, l_sob_id;

Line 3637: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);

3633: Close BATCHES_BY_BID_RANGE;
3634: End If;
3635:
3636: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL');
3637: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3638: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3639:
3640: Fetch USER_COMPANIES into l_company_code, l_sob_id;
3641: End Loop;

Line 3638: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

3634: End If;
3635:
3636: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL');
3637: FND_MESSAGE.Set_Token ('COMPANY_CODE', l_company_code);
3638: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
3639:
3640: Fetch USER_COMPANIES into l_company_code, l_sob_id;
3641: End Loop;
3642: End If;