DBA Data[Home] [Help]

APPS.OKC_TERMS_DEVIATIONS_PVT dependencies on FND_FILE

Line 1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_num_days: '||p_num_days);

1430: SAVEPOINT purge_deviations_data;
1431: l_return_status := G_RET_STS_SUCCESS;
1432: FND_MSG_PUB.initialize;
1433:
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_num_days: '||p_num_days);
1435: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entered into Purge Deviations');
1436:
1437: -- for each of the records selected in the above cursor
1438: -- issue a delete to purge the data

Line 1435: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entered into Purge Deviations');

1431: l_return_status := G_RET_STS_SUCCESS;
1432: FND_MSG_PUB.initialize;
1433:
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_num_days: '||p_num_days);
1435: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entered into Purge Deviations');
1436:
1437: -- for each of the records selected in the above cursor
1438: -- issue a delete to purge the data
1439: For i in del_csr loop

Line 1443: FND_FILE.PUT_LINE( FND_FILE.LOG,'Delete Records: '|| i);

1439: For i in del_csr loop
1440: delete from okc_terms_deviations_t
1441: where current of del_csr;
1442: end loop;
1443: FND_FILE.PUT_LINE( FND_FILE.LOG,'Delete Records: '|| i);
1444:
1445: retcode := 0;
1446:
1447: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);

Line 1447: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);

1443: FND_FILE.PUT_LINE( FND_FILE.LOG,'Delete Records: '|| i);
1444:
1445: retcode := 0;
1446:
1447: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);
1448:
1449: EXCEPTION
1450:
1451: WHEN E_RESOURCE_BUSY then

Line 1455: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);

1451: WHEN E_RESOURCE_BUSY then
1452: l_return_status := G_RET_STS_ERROR;
1453: retcode := 1;
1454: ROLLBACK TO purge_deviations_data;
1455: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);
1456: FND_FILE.PUT_LINE(FND_FILE.LOG,'Resource busy exception');
1457: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1458:
1459: WHEN OTHERS Then

Line 1456: FND_FILE.PUT_LINE(FND_FILE.LOG,'Resource busy exception');

1452: l_return_status := G_RET_STS_ERROR;
1453: retcode := 1;
1454: ROLLBACK TO purge_deviations_data;
1455: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);
1456: FND_FILE.PUT_LINE(FND_FILE.LOG,'Resource busy exception');
1457: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1458:
1459: WHEN OTHERS Then
1460: l_return_status := G_RET_STS_UNEXP_ERROR;

Line 1463: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);

1459: WHEN OTHERS Then
1460: l_return_status := G_RET_STS_UNEXP_ERROR;
1461: errbuf := substr(sqlerrm,1,200);
1462: retcode := 2;
1463: FND_FILE.PUT_LINE( FND_FILE.LOG,'Return Code of the Program: '|| retcode);
1464: ROLLBACK TO purge_deviations_data;
1465:
1466: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1467: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_api_name,'660: Other exception');

Line 1469: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception Others: '|| sqlerrm);

1465:
1466: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1467: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,l_api_name,'660: Other exception');
1468: END IF;
1469: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception Others: '|| sqlerrm);
1470: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1471: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1472: END IF;
1473: