DBA Data[Home] [Help]

APPS.XTR_STREAMLINE_P dependencies on FND_FILE

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 346: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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');
350: xtr_risk_debug_pkg.dlog('Exception Error ' , 'NO_DATA_FOUND');

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 360: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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');
364: xtr_risk_debug_pkg.dlog('Exception Error ' , 'E_RECORD_LOCKED');

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 374: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));

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
378: xtr_risk_debug_pkg.dpush('LOCK_BATCH - error');

Line 375: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
378: xtr_risk_debug_pkg.dpush('LOCK_BATCH - error');
379: xtr_risk_debug_pkg.dlog('Exception Error ' , 'OTHERS');

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 434: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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');
438: xtr_risk_debug_pkg.dlog('Exception Error ' , 'NO_DATA_FOUND');

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 448: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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');
452: xtr_risk_debug_pkg.dlog('Exception Error ' , 'E_RECORD_LOCKED');

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 462: FND_FILE.Put_line (FND_FILE.LOG, sqlcode||'- '||sqlerrm(sqlcode));

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
466: xtr_risk_debug_pkg.dpush('LOCK_EVENT - error');

Line 463: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
466: xtr_risk_debug_pkg.dpush('LOCK_EVENT - error');
467: xtr_risk_debug_pkg.dlog('Exception Error ' , 'OTHERS');

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 626: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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;
630:

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 1004: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1008: --=================================== DEBUG ===============================================--

Line 1110: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

1106: end if;
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, ' ');

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 1114: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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

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 1121: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1125: else

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 1214: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1218: end if;

Line 1325: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

1321: /*=============================================================*/
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, ' ');

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 1329: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
1333:

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 1337: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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;
1341:

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 1445: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1449: --=================================== DEBUG =================================--

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 1565: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1569: 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 1643: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1647: --=================================== DEBUG ===============================================--

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 1730: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1734: 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 1812: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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:
1816: end if;

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 1990: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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;
1994: end if;

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 2042: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
2046:

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 2142: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
2146: AUTHORIZE_RETRO_EVENT(l_sub_retcode,

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 2332: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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;
2336: end if;

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 2372: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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;
2376:

Line 2597: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2593: --==========================================================================================--
2594:
2595: G_MULTIPLE_ACCT := p_multiple_acct; -- Bug 4639287
2596: p_retcode := 0;
2597: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2598:
2599: --------------------------------------------------------------------
2600: -- 1. Revaluation
2601: --------------------------------------------------------------------

Line 2605: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2601: --------------------------------------------------------------------
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:

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 2608: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');

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,
2612: p_company,

Line 2634: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2630: -- p_incomplete is 'N', Retro subprocess should continue.
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,

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 2637: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');

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);
2641: p_retcode := greatest(l_retcode, p_retcode);

Line 2649: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2645: -- 3. 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:

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 2652: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');

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,
2656: p_do_reval,

Line 2676: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2672: -- 4. Journals
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:

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 2679: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');

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,
2683: l_cutoff_date);

Line 2692: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2688: -- 5. 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:

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 2695: FND_FILE.Put_Line (FND_FILE.LOG, '============================================');

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,
2699: l_cutoff_date,

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 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 2793: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2789: l_retcode := 2;
2790:
2791: else
2792:
2793: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2794:
2795: open ALL_COMPANIES;
2796: fetch ALL_COMPANIES into l_company, l_do_reval, l_do_retro;
2797: while ALL_COMPANIES%FOUND loop

Line 2799: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2795: open ALL_COMPANIES;
2796: fetch ALL_COMPANIES into l_company, l_do_reval, l_do_retro;
2797: while ALL_COMPANIES%FOUND loop
2798:
2799: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2800: FND_FILE.Put_Line (FND_FILE.LOG, l_company);
2801: FND_FILE.Put_Line (FND_FILE.LOG, '============================================================================');
2802:
2803: l_sub_retcode := 0;

Line 2800: FND_FILE.Put_Line (FND_FILE.LOG, l_company);

2796: fetch ALL_COMPANIES into l_company, l_do_reval, l_do_retro;
2797: while ALL_COMPANIES%FOUND loop
2798:
2799: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2800: FND_FILE.Put_Line (FND_FILE.LOG, l_company);
2801: FND_FILE.Put_Line (FND_FILE.LOG, '============================================================================');
2802:
2803: l_sub_retcode := 0;
2804: l_incomplete := 'N';

Line 2801: FND_FILE.Put_Line (FND_FILE.LOG, '============================================================================');

2797: while ALL_COMPANIES%FOUND loop
2798:
2799: FND_FILE.Put_Line (FND_FILE.LOG, ' ');
2800: FND_FILE.Put_Line (FND_FILE.LOG, l_company);
2801: FND_FILE.Put_Line (FND_FILE.LOG, '============================================================================');
2802:
2803: l_sub_retcode := 0;
2804: l_incomplete := 'N';
2805:

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 2840: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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);
2844: FND_FILE.Put_Line(FND_FILE.LOG, FND_MESSAGE.Get);

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 2845: 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:
2849: else -- l_do_reval = 'Y'

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 2858: FND_FILE.Put_Line(FND_FILE.LOG, ' ');

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:
2862: end if;

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 2904: FND_FILE.Put_Line(FND_FILE.LOG, ' ');

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
2908: -- want a list of child process submitted with a WARNING sign.

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 2954: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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

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 2961: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
2965:

Line 2981: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2977:
2978: -----------------------------------------------------------
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);

Line 2982: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

2978: -----------------------------------------------------------
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);

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 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 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

Line 2992: FND_FILE.Put_Line (FND_FILE.LOG, ' ');

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
2996: p_retcode := 1; -- just warning, instead of '-1' for error