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 1219: FND_MESSAGE.Set_Name ('XTR','XTR_UNHANDLED_EXCEPTION');

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 3154: comment_msg := FND_MESSAGE.get;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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