DBA Data[Home] [Help]

APPS.ARI_DB_UTILITIES dependencies on FND_FILE

Line 1226: fnd_file.put_line( fnd_file.log,'Unable to apply template');

1222: ,template_territory => 'US'
1223: ,output_format => 'PDF');
1224:
1225: IF ( NOT v_set_layout_option ) THEN
1226: fnd_file.put_line( fnd_file.log,'Unable to apply template');
1227: END IF;
1228:
1229: l_request_id := fnd_request.submit_request('AR', 'RAXINV_SEL', l_program_name,
1230: null, false, 'TRX_NUMBER','','','','',

Line 1349: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || 'upload_ar_bank_branch_concur' || l_procedure_name);

1345:
1346: BEGIN
1347:
1348: l_procedure_name := '.import_ar_bank_brances_info';
1349: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || 'upload_ar_bank_branch_concur' || l_procedure_name);
1350: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1351: IF nvl(p_import_new_banks_only,'Y') = 'Y' THEN
1352: l_import_new_banks_only := 'Y';
1353: ELSE

Line 1350: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');

1346: BEGIN
1347:
1348: l_procedure_name := '.import_ar_bank_brances_info';
1349: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || 'upload_ar_bank_branch_concur' || l_procedure_name);
1350: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1351: IF nvl(p_import_new_banks_only,'Y') = 'Y' THEN
1352: l_import_new_banks_only := 'Y';
1353: ELSE
1354: l_import_new_banks_only := 'N';

Line 1357: fnd_file.put_line( FND_FILE.LOG, 'Import New Banks Only :: ' || l_import_new_banks_only);

1353: ELSE
1354: l_import_new_banks_only := 'N';
1355: END IF;
1356:
1357: fnd_file.put_line( FND_FILE.LOG, 'Import New Banks Only :: ' || l_import_new_banks_only);
1358: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1359:
1360: FOR ar_bank_branch_rec IN ar_bank_branch_cur LOOP
1361: l_total_recs := l_total_recs+1;

Line 1358: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');

1354: l_import_new_banks_only := 'N';
1355: END IF;
1356:
1357: fnd_file.put_line( FND_FILE.LOG, 'Import New Banks Only :: ' || l_import_new_banks_only);
1358: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1359:
1360: FOR ar_bank_branch_rec IN ar_bank_branch_cur LOOP
1361: l_total_recs := l_total_recs+1;
1362:

Line 1390: fnd_file.put_line( FND_FILE.LOG, 'Error - Endating the Routing Number :: '||ar_bank_branch_rec.routing_number ||' , Bank Name :: '||ar_bank_branch_rec.bank_name);

1386: x_response => l_branch_response );
1387:
1388: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1389:
1390: fnd_file.put_line( FND_FILE.LOG, 'Error - Endating the Routing Number :: '||ar_bank_branch_rec.routing_number ||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1391: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1392: l_cr_return_status := 'WARNING';
1393: ELSE
1394: fnd_file.put_line( FND_FILE.LOG, 'Successful - Endated the Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);

Line 1391: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);

1387:
1388: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1389:
1390: fnd_file.put_line( FND_FILE.LOG, 'Error - Endating the Routing Number :: '||ar_bank_branch_rec.routing_number ||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1391: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1392: l_cr_return_status := 'WARNING';
1393: ELSE
1394: fnd_file.put_line( FND_FILE.LOG, 'Successful - Endated the Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1395: l_success_recs := l_success_recs+1;

Line 1394: fnd_file.put_line( FND_FILE.LOG, 'Successful - Endated the Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);

1390: fnd_file.put_line( FND_FILE.LOG, 'Error - Endating the Routing Number :: '||ar_bank_branch_rec.routing_number ||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1391: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1392: l_cr_return_status := 'WARNING';
1393: ELSE
1394: fnd_file.put_line( FND_FILE.LOG, 'Successful - Endated the Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1395: l_success_recs := l_success_recs+1;
1396: END IF;
1397:
1398: ELSE -- If routing number not exists in CE -- NO ACTIVITY REQUIRED

Line 1400: fnd_file.put_line( FND_FILE.LOG, 'Skipping - New Routing Number :: '||ar_bank_branch_rec.new_routing_number || ' exists for this Bank Name :: '||ar_bank_branch_rec.bank_name ||', Routing Number :: '||ar_bank_branch_rec.new_routing_number);

1396: END IF;
1397:
1398: ELSE -- If routing number not exists in CE -- NO ACTIVITY REQUIRED
1399:
1400: fnd_file.put_line( FND_FILE.LOG, 'Skipping - New Routing Number :: '||ar_bank_branch_rec.new_routing_number || ' exists for this Bank Name :: '||ar_bank_branch_rec.bank_name ||', Routing Number :: '||ar_bank_branch_rec.new_routing_number);
1401:
1402: CLOSE ce_bank_branch_cur;
1403:
1404: END IF; --ce_bank_branch_cur%FOUND

Line 1446: fnd_file.put_line( FND_FILE.LOG, 'Error - Updating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.branch_name);

1442: x_response => l_branch_response );
1443:
1444: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1445:
1446: fnd_file.put_line( FND_FILE.LOG, 'Error - Updating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.branch_name);
1447: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1448: l_cr_return_status := 'WARNING';
1449:
1450: ELSE

Line 1447: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);

1443:
1444: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1445:
1446: fnd_file.put_line( FND_FILE.LOG, 'Error - Updating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.branch_name);
1447: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1448: l_cr_return_status := 'WARNING';
1449:
1450: ELSE
1451: fnd_file.put_line( FND_FILE.LOG, 'Successful - Updating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.bank_name);

Line 1451: fnd_file.put_line( FND_FILE.LOG, 'Successful - Updating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.bank_name);

1447: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1448: l_cr_return_status := 'WARNING';
1449:
1450: ELSE
1451: fnd_file.put_line( FND_FILE.LOG, 'Successful - Updating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.bank_name);
1452: l_success_recs := l_success_recs+1;
1453: END IF;
1454:
1455: ELSE -- If branch associated with this routing number exists -- NO ACTIVITY REQUIRED

Line 1457: fnd_file.put_line( FND_FILE.LOG, 'Skipping - This Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.bank_name || ' already exists in ce_bank_branches_v');

1453: END IF;
1454:
1455: ELSE -- If branch associated with this routing number exists -- NO ACTIVITY REQUIRED
1456:
1457: fnd_file.put_line( FND_FILE.LOG, 'Skipping - This Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.bank_name || ' already exists in ce_bank_branches_v');
1458: CLOSE ce_chk_branch_exists;
1459:
1460: END IF; --ce_chk_branch_exists%NOTFOUND
1461:

Line 1526: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Bank Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);

1522: x_response => l_bank_response );
1523:
1524: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1525:
1526: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Bank Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1527: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1528: l_cr_return_status := 'WARNING';
1529:
1530: ELSIF (RETCODE = FND_API.G_RET_STS_SUCCESS AND l_bank_party_id is not null) THEN

Line 1527: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);

1523:
1524: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1525:
1526: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Bank Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1527: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1528: l_cr_return_status := 'WARNING';
1529:
1530: ELSIF (RETCODE = FND_API.G_RET_STS_SUCCESS AND l_bank_party_id is not null) THEN
1531:

Line 1554: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Branch Name :: '||ar_bank_branch_rec.branch_name);

1550: x_response => l_branch_response);
1551:
1552: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1553:
1554: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Branch Name :: '||ar_bank_branch_rec.branch_name);
1555: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1556: l_cr_return_status := 'WARNING';
1557:
1558: ELSE

Line 1555: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);

1551:
1552: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1553:
1554: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Branch Name :: '||ar_bank_branch_rec.branch_name);
1555: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1556: l_cr_return_status := 'WARNING';
1557:
1558: ELSE
1559: fnd_file.put_line( FND_FILE.LOG, 'Successful - Creating Bank and Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);

Line 1559: fnd_file.put_line( FND_FILE.LOG, 'Successful - Creating Bank and Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);

1555: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1556: l_cr_return_status := 'WARNING';
1557:
1558: ELSE
1559: fnd_file.put_line( FND_FILE.LOG, 'Successful - Creating Bank and Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name);
1560: l_success_recs := l_success_recs+1;
1561: END IF;
1562:
1563: END IF; -- RETCODE = FND_API.G_RET_STS_ERROR

Line 1593: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.routing_number);

1589: x_response => l_branch_response);
1590:
1591: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1592:
1593: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.routing_number);
1594: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1595: l_cr_return_status := 'WARNING';
1596:
1597: ELSE

Line 1594: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);

1590:
1591: IF(RETCODE = FND_API.G_RET_STS_ERROR ) THEN
1592:
1593: fnd_file.put_line( FND_FILE.LOG, 'Error - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.routing_number);
1594: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1595: l_cr_return_status := 'WARNING';
1596:
1597: ELSE
1598: fnd_file.put_line( FND_FILE.LOG, 'Successful - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.routing_number);

Line 1598: fnd_file.put_line( FND_FILE.LOG, 'Successful - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.routing_number);

1594: fnd_file.put_line( FND_FILE.LOG, 'ERRBUF :: '||ERRBUF);
1595: l_cr_return_status := 'WARNING';
1596:
1597: ELSE
1598: fnd_file.put_line( FND_FILE.LOG, 'Successful - Creating Branch Info for Routing Number :: '||ar_bank_branch_rec.routing_number||' , with Branch Name :: '||ar_bank_branch_rec.routing_number);
1599: l_success_recs := l_success_recs+1;
1600: END IF;
1601:
1602: END IF; -- ce_chk_bank_exists%NOTFOUND

Line 1606: fnd_file.put_line( FND_FILE.LOG, 'Skipping - This Routing Number :: '||ar_bank_branch_rec.routing_number||' , associated with Bank Name :: '||ar_bank_branch_rec.bank_name || ' already exists in ce_bank_branches_v');

1602: END IF; -- ce_chk_bank_exists%NOTFOUND
1603:
1604: ELSE -- If routing number exixts in CE -- NO ACTIVITY REQUIRED
1605:
1606: fnd_file.put_line( FND_FILE.LOG, 'Skipping - This Routing Number :: '||ar_bank_branch_rec.routing_number||' , associated with Bank Name :: '||ar_bank_branch_rec.bank_name || ' already exists in ce_bank_branches_v');
1607: CLOSE ce_bank_branch_cur;
1608:
1609: END IF; --ce_bank_branch_cur%NOTFOUND
1610:

Line 1612: fnd_file.put_line( FND_FILE.LOG, 'Skipping - New Routing Number Exits for this Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name || ' in AR_BANK_DIRECTORY');

1608:
1609: END IF; --ce_bank_branch_cur%NOTFOUND
1610:
1611: ELSE -- ar_bank_branch_rec.new_routing_number is not null
1612: fnd_file.put_line( FND_FILE.LOG, 'Skipping - New Routing Number Exits for this Routing Number :: '||ar_bank_branch_rec.routing_number||' , Bank Name :: '||ar_bank_branch_rec.bank_name || ' in AR_BANK_DIRECTORY');
1613: END IF; -- ar_bank_branch_rec.new_routing_number is null
1614:
1615: END IF; -- l_import_new_banks_only = 'Y'
1616:

Line 1617: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');

1613: END IF; -- ar_bank_branch_rec.new_routing_number is null
1614:
1615: END IF; -- l_import_new_banks_only = 'Y'
1616:
1617: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1618:
1619:
1620: END LOOP;
1621:

Line 1624: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);

1620: END LOOP;
1621:
1622: l_failure_recs :=l_total_recs - l_success_recs;
1623: IF (l_import_new_banks_only = 'Y' ) THEN
1624: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1625: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created Records :: '||l_success_recs);
1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);
1627: ELSE
1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);

Line 1625: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created Records :: '||l_success_recs);

1621:
1622: l_failure_recs :=l_total_recs - l_success_recs;
1623: IF (l_import_new_banks_only = 'Y' ) THEN
1624: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1625: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created Records :: '||l_success_recs);
1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);
1627: ELSE
1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);

Line 1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);

1622: l_failure_recs :=l_total_recs - l_success_recs;
1623: IF (l_import_new_banks_only = 'Y' ) THEN
1624: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1625: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created Records :: '||l_success_recs);
1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);
1627: ELSE
1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);
1630: fnd_file.put_line( FND_FILE.LOG, 'Failed to Create/Update Records :: '||l_failure_recs);

Line 1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);

1624: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1625: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created Records :: '||l_success_recs);
1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);
1627: ELSE
1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);
1630: fnd_file.put_line( FND_FILE.LOG, 'Failed to Create/Update Records :: '||l_failure_recs);
1631: END IF;
1632:

Line 1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);

1625: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created Records :: '||l_success_recs);
1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);
1627: ELSE
1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);
1630: fnd_file.put_line( FND_FILE.LOG, 'Failed to Create/Update Records :: '||l_failure_recs);
1631: END IF;
1632:
1633: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');

Line 1630: fnd_file.put_line( FND_FILE.LOG, 'Failed to Create/Update Records :: '||l_failure_recs);

1626: fnd_file.put_line( FND_FILE.LOG, 'Not Processed/Failed to Create Records :: '||l_failure_recs);
1627: ELSE
1628: fnd_file.put_line( FND_FILE.LOG, 'Total Records Processed :: '||l_total_recs);
1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);
1630: fnd_file.put_line( FND_FILE.LOG, 'Failed to Create/Update Records :: '||l_failure_recs);
1631: END IF;
1632:
1633: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1634:

Line 1633: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');

1629: fnd_file.put_line( FND_FILE.LOG, 'Successfully Created/Updated Records :: '||l_success_recs);
1630: fnd_file.put_line( FND_FILE.LOG, 'Failed to Create/Update Records :: '||l_failure_recs);
1631: END IF;
1632:
1633: fnd_file.put_line( FND_FILE.LOG, '------------------------------------------------------------------------------------------+');
1634:
1635: IF ( l_cr_return_status = 'WARNING' AND l_import_new_banks_only = 'N') THEN
1636: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(
1637: status => l_cr_return_status,

Line 1646: fnd_file.put_line( FND_FILE.LOG, 'End Procedure ' || 'upload_ar_bank_branch_concur' || l_procedure_name);

1642: message => 'Not all banks informartion were created successfully. Please review the log file.');
1643:
1644: END IF;
1645:
1646: fnd_file.put_line( FND_FILE.LOG, 'End Procedure ' || 'upload_ar_bank_branch_concur' || l_procedure_name);
1647:
1648: EXCEPTION WHEN OTHERS THEN
1649: l_cr_return_status := 'ERROR';
1650: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(

Line 1654: fnd_file.put_line( FND_FILE.LOG,'Unexpected Exception in ' || 'upload_ar_bank_branch_concur' || l_procedure_name);

1650: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(
1651: status => l_cr_return_status,
1652: message => 'Exporting Bank Information has failed. Please review the log file.');
1653:
1654: fnd_file.put_line( FND_FILE.LOG,'Unexpected Exception in ' || 'upload_ar_bank_branch_concur' || l_procedure_name);
1655: fnd_file.put_line( FND_FILE.LOG,'ERROR =>'|| SQLERRM);
1656:
1657: END upload_ar_bank_branch_concur;
1658:

Line 1655: fnd_file.put_line( FND_FILE.LOG,'ERROR =>'|| SQLERRM);

1651: status => l_cr_return_status,
1652: message => 'Exporting Bank Information has failed. Please review the log file.');
1653:
1654: fnd_file.put_line( FND_FILE.LOG,'Unexpected Exception in ' || 'upload_ar_bank_branch_concur' || l_procedure_name);
1655: fnd_file.put_line( FND_FILE.LOG,'ERROR =>'|| SQLERRM);
1656:
1657: END upload_ar_bank_branch_concur;
1658:
1659: /*========================================================================

Line 1701: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || l_procedure_name);

1697:
1698: BEGIN
1699:
1700: l_procedure_name := '.PURGE_IREC_PRINT_REQUESTS';
1701: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || l_procedure_name);
1702: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');
1703:
1704: if(p_creation_date is NULL) then
1705: select min(request_date) into l_fnd_request_date from fnd_concurrent_requests;

Line 1702: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');

1698: BEGIN
1699:
1700: l_procedure_name := '.PURGE_IREC_PRINT_REQUESTS';
1701: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || l_procedure_name);
1702: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');
1703:
1704: if(p_creation_date is NULL) then
1705: select min(request_date) into l_fnd_request_date from fnd_concurrent_requests;
1706: else

Line 1717: FND_FILE.put_line(FND_FILE.log,errbuf);

1713: status => l_cp_return_status,
1714: message => errbuf);
1715:
1716: retcode := '2';
1717: FND_FILE.put_line(FND_FILE.log,errbuf);
1718:
1719: return;
1720: end if;
1721: end if;

Line 1727: FND_FILE.put_line(FND_FILE.log, msgbuf);

1723: fnd_message.set_name('FND', 'PURGING_UP_TO_DATE');
1724: fnd_message.set_token('ENTITY', 'AR_IREC_PRINT_REQUESTS');
1725: fnd_message.set_token('DATE', l_fnd_request_date);
1726: msgbuf := fnd_message.get;
1727: FND_FILE.put_line(FND_FILE.log, msgbuf);
1728:
1729: select count(*) into numrows from ar_irec_print_requests where trunc(creation_date) < trunc(l_fnd_request_date);
1730: delete from ar_irec_print_requests where trunc(creation_date) < trunc(l_fnd_request_date);
1731: commit;

Line 1733: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');

1729: select count(*) into numrows from ar_irec_print_requests where trunc(creation_date) < trunc(l_fnd_request_date);
1730: delete from ar_irec_print_requests where trunc(creation_date) < trunc(l_fnd_request_date);
1731: commit;
1732:
1733: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');
1734:
1735: fnd_message.set_name('FND', 'GENERIC_ROWS_PROCESSED');
1736: fnd_message.set_token('ROWS', numrows);
1737: msgbuf := fnd_message.get;

Line 1738: FND_FILE.put_line(FND_FILE.log, msgbuf);

1734:
1735: fnd_message.set_name('FND', 'GENERIC_ROWS_PROCESSED');
1736: fnd_message.set_token('ROWS', numrows);
1737: msgbuf := fnd_message.get;
1738: FND_FILE.put_line(FND_FILE.log, msgbuf);
1739: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(
1740: status => l_cp_return_status,
1741: message => 'Purging AR_IREC_PRINT_REQUESTS completed successfully');
1742: exception

Line 1746: FND_FILE.put_line(FND_FILE.log,errbuf);

1742: exception
1743: when others then
1744: errbuf := sqlerrm;
1745: retcode := '2';
1746: FND_FILE.put_line(FND_FILE.log,errbuf);
1747: l_cp_return_status := 'ERROR';
1748: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(
1749: status => l_cp_return_status,
1750: message => 'Unexpected error during purge process');

Line 1796: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || l_procedure_name);

1792:
1793: BEGIN
1794:
1795: l_procedure_name := '.PURGE_IREC_USER_ACCT_SITES_ALL';
1796: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || l_procedure_name);
1797: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');
1798:
1799: if(p_creation_date is NULL) then
1800: select trunc(sysdate)-1 into l_purge_date from dual;

Line 1797: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');

1793: BEGIN
1794:
1795: l_procedure_name := '.PURGE_IREC_USER_ACCT_SITES_ALL';
1796: fnd_file.put_line( FND_FILE.LOG, 'Begin Procedure ' || l_procedure_name);
1797: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');
1798:
1799: if(p_creation_date is NULL) then
1800: select trunc(sysdate)-1 into l_purge_date from dual;
1801: else

Line 1812: FND_FILE.put_line(FND_FILE.log,errbuf);

1808: status => l_cp_return_status,
1809: message => errbuf);
1810:
1811: retcode := '2';
1812: FND_FILE.put_line(FND_FILE.log,errbuf);
1813:
1814: return;
1815: end if;
1816: end if;

Line 1822: FND_FILE.put_line(FND_FILE.log, msgbuf);

1818: fnd_message.set_name('FND', 'PURGING_UP_TO_DATE');
1819: fnd_message.set_token('ENTITY', 'AR_IREC_USER_ACCT_SITES_ALL');
1820: fnd_message.set_token('DATE', l_purge_date);
1821: msgbuf := fnd_message.get;
1822: FND_FILE.put_line(FND_FILE.log, msgbuf);
1823:
1824: select count(*) into numrows from ar_irec_user_acct_sites_all where trunc(creation_date) < trunc(l_purge_date);
1825: delete from ar_irec_user_acct_sites_all where trunc(creation_date) < trunc(l_purge_date);
1826: commit;

Line 1828: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');

1824: select count(*) into numrows from ar_irec_user_acct_sites_all where trunc(creation_date) < trunc(l_purge_date);
1825: delete from ar_irec_user_acct_sites_all where trunc(creation_date) < trunc(l_purge_date);
1826: commit;
1827:
1828: fnd_file.put_line( FND_FILE.LOG, '+---------------------------------------------------------------------------+');
1829:
1830: fnd_message.set_name('FND', 'GENERIC_ROWS_PROCESSED');
1831: fnd_message.set_token('ROWS', numrows);
1832: msgbuf := fnd_message.get;

Line 1833: FND_FILE.put_line(FND_FILE.log, msgbuf);

1829:
1830: fnd_message.set_name('FND', 'GENERIC_ROWS_PROCESSED');
1831: fnd_message.set_token('ROWS', numrows);
1832: msgbuf := fnd_message.get;
1833: FND_FILE.put_line(FND_FILE.log, msgbuf);
1834: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(
1835: status => l_cp_return_status,
1836: message => 'Purging AR_IREC_USER_ACCT_SITES_ALL completed successfully');
1837: exception

Line 1841: FND_FILE.put_line(FND_FILE.log,errbuf);

1837: exception
1838: when others then
1839: errbuf := sqlerrm;
1840: retcode := '2';
1841: FND_FILE.put_line(FND_FILE.log,errbuf);
1842: l_cp_return_status := 'ERROR';
1843: l_return := FND_CONCURRENT.SET_COMPLETION_STATUS(
1844: status => l_cp_return_status,
1845: message => 'Unexpected error during purge process');