DBA Data[Home] [Help]

APPS.XTR_STREAMLINE_P dependencies on FND_MESSAGE

Line 343: FND_MESSAGE.Set_Name('XTR', p_no_data_error);

339:
340: EXCEPTION
341: when no_data_found then
342: rollback;
343: FND_MESSAGE.Set_Name('XTR', p_no_data_error);
344: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
345: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
346: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
347: --=================================== DEBUG ===============================================--

Line 344: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

340: EXCEPTION
341: when no_data_found then
342: rollback;
343: FND_MESSAGE.Set_Name('XTR', p_no_data_error);
344: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
345: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
346: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
347: --=================================== DEBUG ===============================================--
348: IF xtr_risk_debug_pkg.g_Debug THEN

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

341: when no_data_found then
342: rollback;
343: FND_MESSAGE.Set_Name('XTR', p_no_data_error);
344: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
345: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
346: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
347: --=================================== DEBUG ===============================================--
348: IF xtr_risk_debug_pkg.g_Debug THEN
349: xtr_risk_debug_pkg.dpush('LOCK_BATCH - error');

Line 357: FND_MESSAGE.Set_Name('XTR', p_locking_error);

353: --==========================================================================================--
354: return(2);
355: when e_record_locked then
356: rollback;
357: FND_MESSAGE.Set_Name('XTR', p_locking_error);
358: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
359: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
360: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
361: --=================================== DEBUG ===============================================--

Line 358: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

354: return(2);
355: when e_record_locked then
356: rollback;
357: FND_MESSAGE.Set_Name('XTR', p_locking_error);
358: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
359: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
360: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
361: --=================================== DEBUG ===============================================--
362: IF xtr_risk_debug_pkg.g_Debug THEN

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

355: when e_record_locked then
356: rollback;
357: FND_MESSAGE.Set_Name('XTR', p_locking_error);
358: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
359: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
360: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
361: --=================================== DEBUG ===============================================--
362: IF xtr_risk_debug_pkg.g_Debug THEN
363: xtr_risk_debug_pkg.dpush('LOCK_BATCH - error');

Line 371: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);

367: --==========================================================================================--
368: return(2);
369: when others then
370: rollback;
371: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);
372: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
373: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
374: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));
375: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

Line 372: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

368: return(2);
369: when others then
370: rollback;
371: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);
372: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
373: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
374: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));
375: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
376: --=================================== DEBUG ===============================================--

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

369: when others then
370: rollback;
371: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);
372: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
373: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
374: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));
375: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
376: --=================================== DEBUG ===============================================--
377: IF xtr_risk_debug_pkg.g_Debug THEN

Line 431: FND_MESSAGE.Set_Name('XTR', p_no_data_error);

427:
428: EXCEPTION
429: when no_data_found then
430: rollback;
431: FND_MESSAGE.Set_Name('XTR', p_no_data_error);
432: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
433: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
434: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
435: --=================================== DEBUG ===============================================--

Line 432: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

428: EXCEPTION
429: when no_data_found then
430: rollback;
431: FND_MESSAGE.Set_Name('XTR', p_no_data_error);
432: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
433: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
434: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
435: --=================================== DEBUG ===============================================--
436: IF xtr_risk_debug_pkg.g_Debug THEN

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

429: when no_data_found then
430: rollback;
431: FND_MESSAGE.Set_Name('XTR', p_no_data_error);
432: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
433: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
434: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
435: --=================================== DEBUG ===============================================--
436: IF xtr_risk_debug_pkg.g_Debug THEN
437: xtr_risk_debug_pkg.dpush('LOCK_EVENT - error');

Line 445: FND_MESSAGE.Set_Name('XTR', p_locking_error);

441: --==========================================================================================--
442: return(2);
443: when e_record_locked then
444: rollback;
445: FND_MESSAGE.Set_Name('XTR', p_locking_error);
446: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
447: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
448: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
449: --=================================== DEBUG ===============================================--

Line 446: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

442: return(2);
443: when e_record_locked then
444: rollback;
445: FND_MESSAGE.Set_Name('XTR', p_locking_error);
446: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
447: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
448: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
449: --=================================== DEBUG ===============================================--
450: IF xtr_risk_debug_pkg.g_Debug THEN

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

443: when e_record_locked then
444: rollback;
445: FND_MESSAGE.Set_Name('XTR', p_locking_error);
446: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
447: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
448: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
449: --=================================== DEBUG ===============================================--
450: IF xtr_risk_debug_pkg.g_Debug THEN
451: xtr_risk_debug_pkg.dpush('LOCK_EVENT - error');

Line 459: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);

455: --==========================================================================================--
456: return(2);
457: when others then
458: rollback;
459: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);
460: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
461: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
462: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));
463: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

Line 460: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

456: return(2);
457: when others then
458: rollback;
459: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);
460: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
461: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
462: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));
463: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
464: --=================================== DEBUG ===============================================--

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

457: when others then
458: rollback;
459: FND_MESSAGE.Set_Name('XTR', C_BATCH_ERROR);
460: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
461: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
462: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));
463: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
464: --=================================== DEBUG ===============================================--
465: IF xtr_risk_debug_pkg.g_Debug THEN

Line 617: FND_MESSAGE.Set_Name('XTR', p_err_code);

613: xtr_risk_debug_pkg.dpop('CHK_ELIGIBLE_COMPANY - LOG_ERROR');
614: END IF;
615: --==========================================================================================--
616:
617: FND_MESSAGE.Set_Name('XTR', p_err_code);
618: if p_err_code in (C_NO_REVAL_DATA, C_NO_ACCRUAL_DATA, C_NO_JOURNAL_DATA, C_INCOMPLETE_REVAL,
619: C_NO_RETROET_DATA, C_INCOMPLETE_RETROET ) then -- FAS 3378028 errors
620: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
621: elsif p_err_code in (C_MISSING_REVAL, C_MISSING_ACCRUAL, C_MISSING_JOURNAL,

Line 620: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

616:
617: FND_MESSAGE.Set_Name('XTR', p_err_code);
618: if p_err_code in (C_NO_REVAL_DATA, C_NO_ACCRUAL_DATA, C_NO_JOURNAL_DATA, C_INCOMPLETE_REVAL,
619: C_NO_RETROET_DATA, C_INCOMPLETE_RETROET ) then -- FAS 3378028 errors
620: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
621: elsif p_err_code in (C_MISSING_REVAL, C_MISSING_ACCRUAL, C_MISSING_JOURNAL,
622: C_MISSING_RETROET) then -- FAS 3378028 errors
623: FND_MESSAGE.Set_Token('BED', p_batch_BED);
624: end if;

Line 623: FND_MESSAGE.Set_Token('BED', p_batch_BED);

619: C_NO_RETROET_DATA, C_INCOMPLETE_RETROET ) then -- FAS 3378028 errors
620: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
621: elsif p_err_code in (C_MISSING_REVAL, C_MISSING_ACCRUAL, C_MISSING_JOURNAL,
622: C_MISSING_RETROET) then -- FAS 3378028 errors
623: FND_MESSAGE.Set_Token('BED', p_batch_BED);
624: end if;
625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
626: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
627: return(2);

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

621: elsif p_err_code in (C_MISSING_REVAL, C_MISSING_ACCRUAL, C_MISSING_JOURNAL,
622: C_MISSING_RETROET) then -- FAS 3378028 errors
623: FND_MESSAGE.Set_Token('BED', p_batch_BED);
624: end if;
625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
626: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
627: return(2);
628:
629: END;

Line 1001: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RATES);

997: p_batch_end,
998: 'N', -- only generate rates for Normal batch
999: p_batch_id);
1000: COMMIT;
1001: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RATES);
1002: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1003: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1004: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1005:

Line 1002: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

998: 'N', -- only generate rates for Normal batch
999: p_batch_id);
1000: COMMIT;
1001: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RATES);
1002: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1003: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1004: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1005:
1006: end if;

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

999: p_batch_id);
1000: COMMIT;
1001: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RATES);
1002: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1003: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1004: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1005:
1006: end if;
1007:

Line 1111: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_REVAL);

1107:
1108: if REVAL_DETAILS_INCOMPLETE (p_company, p_batch_start, p_batch_end, l_batch_id) then
1109:
1110: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1111: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_REVAL);
1112: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
1113: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1114: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1115: p_retcode := 2;

Line 1112: FND_MESSAGE.Set_Token('BATCH', l_batch_id);

1108: if REVAL_DETAILS_INCOMPLETE (p_company, p_batch_start, p_batch_end, l_batch_id) then
1109:
1110: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1111: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_REVAL);
1112: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
1113: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1114: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1115: p_retcode := 2;
1116:

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

1109:
1110: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1111: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_REVAL);
1112: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
1113: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1114: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1115: p_retcode := 2;
1116:
1117: else

Line 1118: FND_MESSAGE.Set_Name('XTR', C_GENERATED_REVAL);

1114: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1115: p_retcode := 2;
1116:
1117: else
1118: FND_MESSAGE.Set_Name('XTR', C_GENERATED_REVAL);
1119: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
1120: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1121: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1122: p_retcode := l_retcode; -- return any retcode from revaluation

Line 1119: FND_MESSAGE.Set_Token('BATCH', l_batch_id);

1115: p_retcode := 2;
1116:
1117: else
1118: FND_MESSAGE.Set_Name('XTR', C_GENERATED_REVAL);
1119: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
1120: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1121: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1122: p_retcode := l_retcode; -- return any retcode from revaluation
1123: end if;

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

1116:
1117: else
1118: FND_MESSAGE.Set_Name('XTR', C_GENERATED_REVAL);
1119: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
1120: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1121: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1122: p_retcode := l_retcode; -- return any retcode from revaluation
1123: end if;
1124:

Line 1211: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_REVAL);

1207:
1208: if p_retcode = 0 then
1209: COMMIT;
1210:
1211: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_REVAL);
1212: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1213: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1214: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1215:

Line 1212: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1208: if p_retcode = 0 then
1209: COMMIT;
1210:
1211: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_REVAL);
1212: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1213: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1214: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1215:
1216: end if;

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

1209: COMMIT;
1210:
1211: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_REVAL);
1212: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1213: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1214: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1215:
1216: end if;
1217:

Line 1326: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);

1322: if l_retcode = 0 then -- no special requirement for FAILURE/WARNING setting in retro process.
1323:
1324: if RETRO_DETAILS_INCOMPLETE(p_company, p_batch_start, p_batch_end,p_batch_id) then
1325: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1326: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);
1327: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1328: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1329: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1330: p_retcode := 2;

Line 1327: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1323:
1324: if RETRO_DETAILS_INCOMPLETE(p_company, p_batch_start, p_batch_end,p_batch_id) then
1325: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1326: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);
1327: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1328: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1329: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1330: p_retcode := 2;
1331:

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

1324: if RETRO_DETAILS_INCOMPLETE(p_company, p_batch_start, p_batch_end,p_batch_id) then
1325: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1326: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);
1327: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1328: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1329: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1330: p_retcode := 2;
1331:
1332: else

Line 1334: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RETROET);

1330: p_retcode := 2;
1331:
1332: else
1333:
1334: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RETROET);
1335: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1336: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1337: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1338: p_retcode := l_retcode;

Line 1335: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1331:
1332: else
1333:
1334: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RETROET);
1335: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1336: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1337: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1338: p_retcode := l_retcode;
1339:

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

1332: else
1333:
1334: FND_MESSAGE.Set_Name('XTR', C_GENERATED_RETROET);
1335: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1336: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1337: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1338: p_retcode := l_retcode;
1339:
1340: end if;

Line 1442: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_RETROET);

1438: p_retcode := 2;
1439: END;
1440:
1441: COMMIT;
1442: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_RETROET);
1443: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1444: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1445: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1446:

Line 1443: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1439: END;
1440:
1441: COMMIT;
1442: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_RETROET);
1443: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1444: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1445: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1446:
1447: end if;

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

1440:
1441: COMMIT;
1442: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_RETROET);
1443: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1444: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1445: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1446:
1447: end if;
1448:

Line 1562: FND_MESSAGE.Set_Name('XTR', C_GENERATED_ACCRUAL);

1558: fetch cur_new_BID into p_batch_id;
1559: close cur_new_BID;
1560: end if;
1561:
1562: FND_MESSAGE.Set_Name('XTR', C_GENERATED_ACCRUAL);
1563: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1564: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1565: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1566:

Line 1563: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1559: close cur_new_BID;
1560: end if;
1561:
1562: FND_MESSAGE.Set_Name('XTR', C_GENERATED_ACCRUAL);
1563: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1564: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1565: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1566:
1567: end if;

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

1560: end if;
1561:
1562: FND_MESSAGE.Set_Name('XTR', C_GENERATED_ACCRUAL);
1563: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1564: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1565: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1566:
1567: end if;
1568:

Line 1640: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_ACCRUAL);

1636: and event_code = C_ACCRUAL;
1637:
1638: COMMIT;
1639:
1640: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_ACCRUAL);
1641: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1642: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1643: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1644:

Line 1641: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1637:
1638: COMMIT;
1639:
1640: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_ACCRUAL);
1641: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1642: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1643: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1644:
1645: end if;

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

1638: COMMIT;
1639:
1640: FND_MESSAGE.Set_Name('XTR', C_AUTHORIZED_ACCRUAL);
1641: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1642: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1643: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1644:
1645: end if;
1646:

Line 1727: FND_MESSAGE.Set_Name('XTR', C_GENERATED_JOURNAL);

1723: p_retcode := 2;
1724:
1725: else
1726:
1727: FND_MESSAGE.Set_Name('XTR', C_GENERATED_JOURNAL);
1728: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1729: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1730: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1731:

Line 1728: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1724:
1725: else
1726:
1727: FND_MESSAGE.Set_Name('XTR', C_GENERATED_JOURNAL);
1728: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1729: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1730: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1731:
1732: end If;

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

1725: else
1726:
1727: FND_MESSAGE.Set_Name('XTR', C_GENERATED_JOURNAL);
1728: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1729: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1730: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1731:
1732: end If;
1733:

Line 1809: FND_MESSAGE.Set_Name('XTR', C_TRANSFERRED_JOURNAL);

1805: p_retcode := 2;
1806:
1807: else
1808:
1809: FND_MESSAGE.Set_Name('XTR', C_TRANSFERRED_JOURNAL);
1810: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1811: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1812: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1813:

Line 1810: FND_MESSAGE.Set_Token('BATCH', p_batch_id);

1806:
1807: else
1808:
1809: FND_MESSAGE.Set_Name('XTR', C_TRANSFERRED_JOURNAL);
1810: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1811: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1812: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1813:
1814: end If;

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

1807: else
1808:
1809: FND_MESSAGE.Set_Name('XTR', C_TRANSFERRED_JOURNAL);
1810: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
1811: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1812: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1813:
1814: end If;
1815:

Line 1987: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);

1983: end if;
1984:
1985: if l_upgrade is not null then
1986: if l_lastBED >= p_cutoff_date then
1987: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);
1988: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));
1989: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1990: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1991: p_retcode := 2;

Line 1988: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));

1984:
1985: if l_upgrade is not null then
1986: if l_lastBED >= p_cutoff_date then
1987: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);
1988: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));
1989: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1990: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1991: p_retcode := 2;
1992: else

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

1985: if l_upgrade is not null then
1986: if l_lastBED >= p_cutoff_date then
1987: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);
1988: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));
1989: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
1990: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
1991: p_retcode := 2;
1992: else
1993: l_period_start := l_lastBED + 1;

Line 2039: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);

2035:
2036: if p_retcode = -1 then -- just in case
2037: p_retcode := 2;
2038: elsif p_retcode <> 2 then
2039: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);
2040: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2041: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2042: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2043: end if;

Line 2040: FND_MESSAGE.Set_Token('BATCH', l_batch_id);

2036: if p_retcode = -1 then -- just in case
2037: p_retcode := 2;
2038: elsif p_retcode <> 2 then
2039: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);
2040: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2041: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2042: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2043: end if;
2044:

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

2037: p_retcode := 2;
2038: elsif p_retcode <> 2 then
2039: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);
2040: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2041: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2042: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2043: end if;
2044:
2045: end if; -- p_retcode = 0

Line 2139: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);

2135: -- FAS 3378028
2136: -- If start from REVAL/RETRO and end at RETRO, but the first incomplete batch
2137: -- has RETRO event but some of the details are incomplete.
2138: -----------------------------------------------------------------------------
2139: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);
2140: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2141: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2142: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2143: p_retcode := 2; -- should this be WARNING or ERROR

Line 2140: FND_MESSAGE.Set_Token('BATCH', l_batch_id);

2136: -- If start from REVAL/RETRO and end at RETRO, but the first incomplete batch
2137: -- has RETRO event but some of the details are incomplete.
2138: -----------------------------------------------------------------------------
2139: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);
2140: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2141: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2142: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2143: p_retcode := 2; -- should this be WARNING or ERROR
2144:

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

2137: -- has RETRO event but some of the details are incomplete.
2138: -----------------------------------------------------------------------------
2139: FND_MESSAGE.Set_Name('XTR', C_INCOMPLETE_RETROET);
2140: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2141: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2142: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2143: p_retcode := 2; -- should this be WARNING or ERROR
2144:
2145: else

Line 2329: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);

2325: end if;
2326:
2327: if l_upgrade is not null then
2328: if l_lastBED >= p_cutoff_date then
2329: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);
2330: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));
2331: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2332: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2333: p_retcode := 2;

Line 2330: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));

2326:
2327: if l_upgrade is not null then
2328: if l_lastBED >= p_cutoff_date then
2329: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);
2330: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));
2331: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2332: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2333: p_retcode := 2;
2334: else

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

2327: if l_upgrade is not null then
2328: if l_lastBED >= p_cutoff_date then
2329: FND_MESSAGE.Set_Name('XTR', C_COMPLETED_BATCH);
2330: FND_MESSAGE.Set_Token('BATCH_END', to_char(p_cutoff_date));
2331: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2332: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2333: p_retcode := 2;
2334: else
2335: l_period_start := l_lastBED + 1;

Line 2369: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);

2365: p_retcode := greatest(l_sub_retcode, p_retcode);
2366: end if;
2367:
2368: if p_retcode <> 2 then
2369: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);
2370: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2371: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2372: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2373: end if;

Line 2370: FND_MESSAGE.Set_Token('BATCH', l_batch_id);

2366: end if;
2367:
2368: if p_retcode <> 2 then
2369: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);
2370: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2371: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2372: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2373: end if;
2374:

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

2367:
2368: if p_retcode <> 2 then
2369: FND_MESSAGE.Set_Name('XTR', C_NEW_BATCH);
2370: FND_MESSAGE.Set_Token('BATCH', l_batch_id);
2371: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2372: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2373: end if;
2374:
2375: end if;

Line 2606: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_REVAL);

2602:
2603: if p_do_reval = 'Y' and p_start_process = C_PROCESS_REVAL then
2604:
2605: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2606: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_REVAL);
2607: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2608: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2609:
2610: if p_incomplete = 'Y' then

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

2603: if p_do_reval = 'Y' and p_start_process = C_PROCESS_REVAL then
2604:
2605: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2606: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_REVAL);
2607: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2608: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2609:
2610: if p_incomplete = 'Y' then
2611: REVAL_SUBPROCESS(l_retcode,

Line 2635: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_RETROET);

2631: -- (If we check for p_incomplete, then Retro will not be processed at all, which will be wrong.)
2632: --
2633: if p_do_retro = 'Y' and p_start_process <= C_PROCESS_RETROET and p_end_process >= C_PROCESS_RETROET then
2634: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2635: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_RETROET);
2636: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2637: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2638: RETRO_SUBPROCESS (l_retcode,
2639: p_company,

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

2632: --
2633: if p_do_retro = 'Y' and p_start_process <= C_PROCESS_RETROET and p_end_process >= C_PROCESS_RETROET then
2634: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2635: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_RETROET);
2636: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2637: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2638: RETRO_SUBPROCESS (l_retcode,
2639: p_company,
2640: l_cutoff_date);

Line 2650: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_ACCRUAL);

2646: --------------------------------------------------------------------
2647: if p_start_process <= C_PROCESS_ACCRUAL and p_end_process >= C_PROCESS_ACCRUAL then
2648:
2649: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2650: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_ACCRUAL);
2651: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2652: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2653:
2654: ACCRUAL_SUBPROCESS (l_retcode,

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

2647: if p_start_process <= C_PROCESS_ACCRUAL and p_end_process >= C_PROCESS_ACCRUAL then
2648:
2649: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2650: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_ACCRUAL);
2651: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2652: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2653:
2654: ACCRUAL_SUBPROCESS (l_retcode,
2655: p_company,

Line 2677: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_JOURNAL);

2673: --------------------------------------------------------------------
2674: if p_start_process <= C_PROCESS_JOURNAL and p_end_process >= C_PROCESS_JOURNAL then
2675:
2676: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2677: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_JOURNAL);
2678: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2679: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2680:
2681: JOURNAL_SUBPROCESS (l_retcode,

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

2674: if p_start_process <= C_PROCESS_JOURNAL and p_end_process >= C_PROCESS_JOURNAL then
2675:
2676: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2677: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_JOURNAL);
2678: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2679: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2680:
2681: JOURNAL_SUBPROCESS (l_retcode,
2682: p_company,

Line 2693: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_TRANSFER);

2689: --------------------------------------------------------------------
2690: if p_end_process = C_PROCESS_TRANSFER then
2691:
2692: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2693: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_TRANSFER);
2694: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2695: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2696:
2697: TRANSFER_SUBPROCESS (l_retcode,

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

2690: if p_end_process = C_PROCESS_TRANSFER then
2691:
2692: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2693: FND_MESSAGE.Set_Name('XTR', C_SUBPROCESS_TRANSFER);
2694: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2695: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');
2696:
2697: TRANSFER_SUBPROCESS (l_retcode,
2698: p_company,

Line 2780: FND_MESSAGE.Set_Name('XTR',C_INVALID_STRM_PROCESS);

2776: -- 3378028 FAS To check that new options are submitted.
2777: if p_start_process not in (C_PROCESS_REVAL, C_PROCESS_RETROET, C_PROCESS_ACCRUAL, C_PROCESS_JOURNAL, C_PROCESS_TRANSFER) or
2778: p_end_process not in (C_PROCESS_REVAL, C_PROCESS_RETROET, C_PROCESS_ACCRUAL, C_PROCESS_JOURNAL, C_PROCESS_TRANSFER) then
2779:
2780: FND_MESSAGE.Set_Name('XTR',C_INVALID_STRM_PROCESS);
2781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2782: l_retcode := 2;
2783:
2784: elsif l_cutoff_date > sysdate then

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

2777: if p_start_process not in (C_PROCESS_REVAL, C_PROCESS_RETROET, C_PROCESS_ACCRUAL, C_PROCESS_JOURNAL, C_PROCESS_TRANSFER) or
2778: p_end_process not in (C_PROCESS_REVAL, C_PROCESS_RETROET, C_PROCESS_ACCRUAL, C_PROCESS_JOURNAL, C_PROCESS_TRANSFER) then
2779:
2780: FND_MESSAGE.Set_Name('XTR',C_INVALID_STRM_PROCESS);
2781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2782: l_retcode := 2;
2783:
2784: elsif l_cutoff_date > sysdate then
2785:

Line 2786: FND_MESSAGE.Set_Name('XTR',C_CUTOFF_DATE_ERROR);

2782: l_retcode := 2;
2783:
2784: elsif l_cutoff_date > sysdate then
2785:
2786: FND_MESSAGE.Set_Name('XTR',C_CUTOFF_DATE_ERROR);
2787: FND_MESSAGE.Set_Token('CUTOFF', l_cutoff_date);
2788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2789: l_retcode := 2;
2790:

Line 2787: FND_MESSAGE.Set_Token('CUTOFF', l_cutoff_date);

2783:
2784: elsif l_cutoff_date > sysdate then
2785:
2786: FND_MESSAGE.Set_Name('XTR',C_CUTOFF_DATE_ERROR);
2787: FND_MESSAGE.Set_Token('CUTOFF', l_cutoff_date);
2788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2789: l_retcode := 2;
2790:
2791: else

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

2784: elsif l_cutoff_date > sysdate then
2785:
2786: FND_MESSAGE.Set_Name('XTR',C_CUTOFF_DATE_ERROR);
2787: FND_MESSAGE.Set_Token('CUTOFF', l_cutoff_date);
2788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2789: l_retcode := 2;
2790:
2791: else
2792:

Line 2838: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_REVAL);

2834: -------------------------------------------------------------------------------------------------
2835: -- if (p_end_process = C_PROCESS_REVAL) then -- 3050444 new issue 1
2836: --
2837: if p_start_process = C_PROCESS_REVAL then
2838: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_REVAL);
2839: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2840: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2841: l_sub_retcode := 2;
2842: elsif p_start_process = C_PROCESS_RETROET then

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

2835: -- if (p_end_process = C_PROCESS_REVAL) then -- 3050444 new issue 1
2836: --
2837: if p_start_process = C_PROCESS_REVAL then
2838: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_REVAL);
2839: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2840: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2841: l_sub_retcode := 2;
2842: elsif p_start_process = C_PROCESS_RETROET then
2843: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_RETROET);

Line 2843: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_RETROET);

2839: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2840: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2841: l_sub_retcode := 2;
2842: elsif p_start_process = C_PROCESS_RETROET then
2843: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_RETROET);
2844: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);
2845: FND_FILE.Put_Line(FND_FILE.LOG, ' ');
2846: l_sub_retcode := 2;
2847: end if;

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

2840: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2841: l_sub_retcode := 2;
2842: elsif p_start_process = C_PROCESS_RETROET then
2843: FND_MESSAGE.Set_Name('XTR', C_COMPANY_NO_RETROET);
2844: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);
2845: FND_FILE.Put_Line(FND_FILE.LOG, ' ');
2846: l_sub_retcode := 2;
2847: end if;
2848:

Line 2856: FND_MESSAGE.Set_Name('XTR',C_COMPANY_NO_RETROET);

2852: -- 3378028 Check that company runs retrospective testing.
2853: -- Only failed for companies starts from Reval and not use Effectiveness Testing
2854: --------------------------------------------------------------------------------
2855: if l_do_retro = 'N' and p_start_process = C_PROCESS_RETROET then
2856: FND_MESSAGE.Set_Name('XTR',C_COMPANY_NO_RETROET);
2857: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);
2858: FND_FILE.Put_Line(FND_FILE.LOG, ' ');
2859: l_sub_retcode := 2;
2860: end if;

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

2853: -- Only failed for companies starts from Reval and not use Effectiveness Testing
2854: --------------------------------------------------------------------------------
2855: if l_do_retro = 'N' and p_start_process = C_PROCESS_RETROET then
2856: FND_MESSAGE.Set_Name('XTR',C_COMPANY_NO_RETROET);
2857: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);
2858: FND_FILE.Put_Line(FND_FILE.LOG, ' ');
2859: l_sub_retcode := 2;
2860: end if;
2861:

Line 2902: FND_MESSAGE.Set_Name('XTR', C_COMPANY_SKIP_RETROET);

2898: -- if p_end_process = C_PROCESS_RETROET, then it should be caught in CHK_ELIGIBLE_COMPANY
2899: -- and a child process should not be submitted.
2900: ------------------------------------------------------------------------------------------------
2901: if p_start_process = C_PROCESS_REVAL and p_end_process >= C_PROCESS_RETROET then
2902: FND_MESSAGE.Set_Name('XTR', C_COMPANY_SKIP_RETROET);
2903: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);
2904: FND_FILE.Put_Line(FND_FILE.LOG, ' ');
2905: -- Do not set l_sub_retcode to 1 here.
2906: -- It is not necessary to display WARNING due to the possibilities of ALL companies

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

2899: -- and a child process should not be submitted.
2900: ------------------------------------------------------------------------------------------------
2901: if p_start_process = C_PROCESS_REVAL and p_end_process >= C_PROCESS_RETROET then
2902: FND_MESSAGE.Set_Name('XTR', C_COMPANY_SKIP_RETROET);
2903: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);
2904: FND_FILE.Put_Line(FND_FILE.LOG, ' ');
2905: -- Do not set l_sub_retcode to 1 here.
2906: -- It is not necessary to display WARNING due to the possibilities of ALL companies
2907: -- submitted and if ALL/many do not require to run Retrospective Testing we do not

Line 2950: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_REQUEST);

2946: '','','','','','','','','','','','','','','','','','','','');
2947:
2948: if l_request_id <> 0 then
2949: l_success := l_success + 1;
2950: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_REQUEST);
2951: FND_MESSAGE.Set_Token('REQUEST', l_request_id);
2952: FND_MESSAGE.Set_Token('DATETIME', FND_DATE.date_to_canonical(sysdate));
2953: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2954: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

Line 2951: FND_MESSAGE.Set_Token('REQUEST', l_request_id);

2947:
2948: if l_request_id <> 0 then
2949: l_success := l_success + 1;
2950: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_REQUEST);
2951: FND_MESSAGE.Set_Token('REQUEST', l_request_id);
2952: FND_MESSAGE.Set_Token('DATETIME', FND_DATE.date_to_canonical(sysdate));
2953: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2954: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2955: else

Line 2952: FND_MESSAGE.Set_Token('DATETIME', FND_DATE.date_to_canonical(sysdate));

2948: if l_request_id <> 0 then
2949: l_success := l_success + 1;
2950: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_REQUEST);
2951: FND_MESSAGE.Set_Token('REQUEST', l_request_id);
2952: FND_MESSAGE.Set_Token('DATETIME', FND_DATE.date_to_canonical(sysdate));
2953: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2954: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2955: else
2956: l_failure := l_failure + 1;

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

2949: l_success := l_success + 1;
2950: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_REQUEST);
2951: FND_MESSAGE.Set_Token('REQUEST', l_request_id);
2952: FND_MESSAGE.Set_Token('DATETIME', FND_DATE.date_to_canonical(sysdate));
2953: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2954: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2955: else
2956: l_failure := l_failure + 1;
2957: l_sub_retcode := 2;

Line 2958: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_FAILURE);

2954: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2955: else
2956: l_failure := l_failure + 1;
2957: l_sub_retcode := 2;
2958: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_FAILURE);
2959: FND_MESSAGE.Set_Token('COMPANY', p_company);
2960: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2961: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2962: end If;

Line 2959: FND_MESSAGE.Set_Token('COMPANY', p_company);

2955: else
2956: l_failure := l_failure + 1;
2957: l_sub_retcode := 2;
2958: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_FAILURE);
2959: FND_MESSAGE.Set_Token('COMPANY', p_company);
2960: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2961: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2962: end If;
2963:

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

2956: l_failure := l_failure + 1;
2957: l_sub_retcode := 2;
2958: FND_MESSAGE.Set_Name('XTR', C_SUBMIT_FAILURE);
2959: FND_MESSAGE.Set_Token('COMPANY', p_company);
2960: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2961: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2962: end If;
2963:
2964: else -- error in eligible check

Line 2983: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_SUBMIT);

2979: -- Summary Log
2980: -----------------------------------------------------------
2981: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2982: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2983: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_SUBMIT);
2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);
2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);

Line 2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);

2980: -----------------------------------------------------------
2981: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2982: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2983: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_SUBMIT);
2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);
2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

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

2981: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2982: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2983: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_SUBMIT);
2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);
2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);

Line 2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);

2982: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2983: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_SUBMIT);
2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);
2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);
2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);

Line 2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);

2983: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_SUBMIT);
2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);
2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);
2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);
2991: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

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

2984: FND_MESSAGE.Set_Token('TOTAL_SUBMIT', l_success);
2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);
2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);
2991: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2992: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

Line 2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);

2985: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);
2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);
2991: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2992: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2993: -----------------------------------------------------------

Line 2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);

2986: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_FAIL);
2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);
2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);
2991: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2992: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2993: -----------------------------------------------------------
2994:

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

2987: FND_MESSAGE.Set_Token('TOTAL_FAIL', l_failure);
2988: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2989: FND_MESSAGE.Set_Name ('XTR', C_TOTAL_COMPANY);
2990: FND_MESSAGE.Set_Token('TOTAL', l_success + l_failure);
2991: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2992: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2993: -----------------------------------------------------------
2994:
2995: if l_retcode <> 0 then