eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.JL_CO_FA_PURGE_PKG dependencies on FND_FILE

Line 109: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);

105: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
106: END IF;
107:
108: fnd_message.set_name('JL', 'JL_CO_FA_PARAMETER');
109: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
110: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
111: fnd_message.set_name('JL', 'JL_CO_FA_BOOK');
112: fnd_message.set_token('BOOK', p_book);
113: fnd_file.put_line( 1, fnd_message.get);

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

106: END IF;
107:
108: fnd_message.set_name('JL', 'JL_CO_FA_PARAMETER');
109: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
110: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
111: fnd_message.set_name('JL', 'JL_CO_FA_BOOK');
112: fnd_message.set_token('BOOK', p_book);
113: fnd_file.put_line( 1, fnd_message.get);
114: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR');

Line 113: fnd_file.put_line( 1, fnd_message.get);

109: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
110: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
111: fnd_message.set_name('JL', 'JL_CO_FA_BOOK');
112: fnd_message.set_token('BOOK', p_book);
113: fnd_file.put_line( 1, fnd_message.get);
114: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR');
115: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
116: fnd_file.put_line( 1, fnd_message.get);
117: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');

Line 116: fnd_file.put_line( 1, fnd_message.get);

112: fnd_message.set_token('BOOK', p_book);
113: fnd_file.put_line( 1, fnd_message.get);
114: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR');
115: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
116: fnd_file.put_line( 1, fnd_message.get);
117: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');
118: fnd_message.set_token('OPTION', p_option);
119: fnd_file.put_line( 1, fnd_message.get);
120: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');

Line 119: fnd_file.put_line( 1, fnd_message.get);

115: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
116: fnd_file.put_line( 1, fnd_message.get);
117: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');
118: fnd_message.set_token('OPTION', p_option);
119: fnd_file.put_line( 1, fnd_message.get);
120: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
121: ---------------------------------------------------------
122: -- Find who_columns values --
123: ---------------------------------------------------------

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

116: fnd_file.put_line( 1, fnd_message.get);
117: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');
118: fnd_message.set_token('OPTION', p_option);
119: fnd_file.put_line( 1, fnd_message.get);
120: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
121: ---------------------------------------------------------
122: -- Find who_columns values --
123: ---------------------------------------------------------
124:

Line 145: fnd_file.put_line( 1, 'Deprn calendar :'||x_deprn_calendar);

141: FROM fa_book_controls
142: WHERE book_type_code = p_book;
143:
144: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
145: fnd_file.put_line( 1, 'Deprn calendar :'||x_deprn_calendar);
146: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deprn calendar :'||x_deprn_calendar);
147: fnd_file.put_line( 1, 'Initial period Counter :'||to_char(x_initial_period_counter));
148: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Initial period Counter :'||to_char(x_initial_period_counter));
149: fnd_file.put_line( 1, 'Current fiscal year :'||x_current_fiscal_year);

Line 147: fnd_file.put_line( 1, 'Initial period Counter :'||to_char(x_initial_period_counter));

143:
144: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
145: fnd_file.put_line( 1, 'Deprn calendar :'||x_deprn_calendar);
146: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deprn calendar :'||x_deprn_calendar);
147: fnd_file.put_line( 1, 'Initial period Counter :'||to_char(x_initial_period_counter));
148: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Initial period Counter :'||to_char(x_initial_period_counter));
149: fnd_file.put_line( 1, 'Current fiscal year :'||x_current_fiscal_year);
150: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Current fiscal year :'||x_current_fiscal_year);
151: fnd_file.put_line( 1, 'Deprn Status :'||x_deprn_status);

Line 149: fnd_file.put_line( 1, 'Current fiscal year :'||x_current_fiscal_year);

145: fnd_file.put_line( 1, 'Deprn calendar :'||x_deprn_calendar);
146: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deprn calendar :'||x_deprn_calendar);
147: fnd_file.put_line( 1, 'Initial period Counter :'||to_char(x_initial_period_counter));
148: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Initial period Counter :'||to_char(x_initial_period_counter));
149: fnd_file.put_line( 1, 'Current fiscal year :'||x_current_fiscal_year);
150: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Current fiscal year :'||x_current_fiscal_year);
151: fnd_file.put_line( 1, 'Deprn Status :'||x_deprn_status);
152: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deprn Status :'||x_deprn_status);
153: fnd_file.put_line( 1, 'book class :'||x_book_class);

Line 151: fnd_file.put_line( 1, 'Deprn Status :'||x_deprn_status);

147: fnd_file.put_line( 1, 'Initial period Counter :'||to_char(x_initial_period_counter));
148: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Initial period Counter :'||to_char(x_initial_period_counter));
149: fnd_file.put_line( 1, 'Current fiscal year :'||x_current_fiscal_year);
150: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Current fiscal year :'||x_current_fiscal_year);
151: fnd_file.put_line( 1, 'Deprn Status :'||x_deprn_status);
152: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deprn Status :'||x_deprn_status);
153: fnd_file.put_line( 1, 'book class :'||x_book_class);
154: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'book class :'||x_book_class);
155:

Line 153: fnd_file.put_line( 1, 'book class :'||x_book_class);

149: fnd_file.put_line( 1, 'Current fiscal year :'||x_current_fiscal_year);
150: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Current fiscal year :'||x_current_fiscal_year);
151: fnd_file.put_line( 1, 'Deprn Status :'||x_deprn_status);
152: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deprn Status :'||x_deprn_status);
153: fnd_file.put_line( 1, 'book class :'||x_book_class);
154: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'book class :'||x_book_class);
155:
156: END IF;
157:

Line 180: fnd_file.put_line( 1, 'Initial Fiscal year :'||x_initial_fiscal_year);

176: WHERE book_type_code = p_book
177: AND period_counter = x_initial_period_counter;
178:
179: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
180: fnd_file.put_line( 1, 'Initial Fiscal year :'||x_initial_fiscal_year);
181: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Initial Fiscal year :'||x_initial_fiscal_year);
182: END IF;
183:
184: ---------------------------------------------------------

Line 467: fnd_file.put_line( 1, 'Start period Counter :' || to_char(x_start_period_counter));

463: WHERE book_type_code = p_book
464: AND fiscal_year = p_fiscal_year;
465:
466: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
467: fnd_file.put_line( 1, 'Start period Counter :' || to_char(x_start_period_counter));
468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Start period Counter :' || to_char(x_start_period_counter));
469: fnd_file.put_line( 1, 'Start end Counter :' || to_char(x_end_period_counter));
470: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Start end Counter :' || to_char(x_end_period_counter));
471: END IF;

Line 469: fnd_file.put_line( 1, 'Start end Counter :' || to_char(x_end_period_counter));

465:
466: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
467: fnd_file.put_line( 1, 'Start period Counter :' || to_char(x_start_period_counter));
468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Start period Counter :' || to_char(x_start_period_counter));
469: fnd_file.put_line( 1, 'Start end Counter :' || to_char(x_end_period_counter));
470: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Start end Counter :' || to_char(x_end_period_counter));
471: END IF;
472:
473:

Line 507: fnd_file.put_line( 1, 'adjustment rows :' || to_char(x_adjustments_rows));

503: AND period_counter_adjusted >= x_start_period_counter
504: AND period_counter_adjusted <= x_end_period_counter;
505:
506: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
507: fnd_file.put_line( 1, 'adjustment rows :' || to_char(x_adjustments_rows));
508: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'adjustment rows :' || to_char(x_adjustments_rows));
509: fnd_file.put_line( 1, 'adjustment amount :' || to_char(x_adjustments_amount));
510: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'adjustment amount :' || to_char(x_adjustments_amount));
511: END IF;

Line 509: fnd_file.put_line( 1, 'adjustment amount :' || to_char(x_adjustments_amount));

505:
506: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
507: fnd_file.put_line( 1, 'adjustment rows :' || to_char(x_adjustments_rows));
508: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'adjustment rows :' || to_char(x_adjustments_rows));
509: fnd_file.put_line( 1, 'adjustment amount :' || to_char(x_adjustments_amount));
510: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'adjustment amount :' || to_char(x_adjustments_amount));
511: END IF;
512:
513:

Line 525: fnd_file.put_line( 1, fnd_message.get);

521: IF (p_option = 'ARCHIVE') THEN
522:
523: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
524: fnd_message.set_token('OPTION', p_option);
525: fnd_file.put_line( 1, fnd_message.get);
526:
527: ---------------------------------------------------------
528: -- Check weather backup table for adjustments is --
529: -- exists. Its name is jl_co_fa_adjustment with --

Line 548: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

544:
545: x_string := 'drop table '||x_oracle_username||'.'||ltrim(rtrim(x_adj_table));
546:
547: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
548: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
549: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQl statement to be processed :'||x_string);
550: END IF;
551:
552: IF NOT (do_sql(x_string)) THEN

Line 581: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

577: ' and period_counter_adjusted >= '||to_char(x_start_period_counter)||
578: ' and period_counter_adjusted <= '||to_char(x_end_period_counter);
579:
580: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
581: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
582: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQl statement to be processed :'||x_string);
583: END IF;
584:
585: IF NOT (do_sql(x_string)) THEN

Line 595: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

591: ---------------------------------------------------------
592: -- change the status in jl_co_fa_purge to 'ARCHIVE' --
593: ---------------------------------------------------------
594: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
595: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');
596: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updating JL_CO_FA_PURGE');
597: END IF;
598:
599:

Line 611: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');

607: program_update_date = x_sysdate
608: WHERE purge_id = x_index;
609:
610: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
611: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');
612: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updated JL_CO_FA_PURGE');
613: END IF;
614:
615:

Line 620: fnd_file.put_line( 1, fnd_message.get);

616: ELSE
617:
618: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
619: fnd_message.set_token('OPTION', p_option);
620: fnd_file.put_line( 1, fnd_message.get);
621:
622: ---------------------------------------------------------
623: -- If the option is purge then check for correct set --
624: -- of rows to be purged. Stop the program if anything --

Line 645: fnd_file.put_line( 1, 'Deleting JL_CO_FA_ADJUSTMENTS');

641:
642: -- change the status in jl_co_fa_purge to 'PURGED' --
643: ---------------------------------------------------------
644: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
645: fnd_file.put_line( 1, 'Deleting JL_CO_FA_ADJUSTMENTS');
646: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleting JL_CO_FA_ADJUSTMENTS');
647: END IF;
648:
649: DELETE FROM jl_co_fa_adjustments

Line 655: fnd_file.put_line( 1, 'Deleted JL_CO_FA_ADJUSTMENTS');

651: AND period_counter_adjusted >= x_start_period_counter
652: AND period_counter_adjusted <= x_end_period_counter;
653:
654: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
655: fnd_file.put_line( 1, 'Deleted JL_CO_FA_ADJUSTMENTS');
656: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleted JL_CO_FA_ADJUSTMENTS');
657: END IF;
658:
659:

Line 661: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

657: END IF;
658:
659:
660: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
661: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');
662: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updating JL_CO_FA_PURGE');
663: END IF;
664:
665:

Line 675: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');

671: program_update_date = x_sysdate
672: WHERE purge_id = x_index;
673:
674: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
675: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');
676: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updated JL_CO_FA_PURGE');
677: END IF;
678:
679: END IF;

Line 685: fnd_file.put_line( 1, fnd_message.get);

681: ELSE
682:
683: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
684: fnd_message.set_token('OPTION', p_option);
685: fnd_file.put_line( 1, fnd_message.get);
686:
687: ---------------------------------------------------------
688: -- Process for the option 'RESTORE' --
689: ---------------------------------------------------------

Line 693: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

689: ---------------------------------------------------------
690:
691: x_string := 'insert into jl_co_fa_adjustments select * from '||x_oracle_username||'.'||ltrim(rtrim(x_adj_table));
692: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
693: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
694: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQl statement to be processed :'||x_string);
695: END IF;
696:
697: IF NOT (do_sql(x_string)) THEN

Line 702: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

698: RAISE UNABLE_TO_DO_SQL;
699: END IF;
700:
701: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
702: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');
703: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updating JL_CO_FA_PURGE');
704: END IF;
705:
706:

Line 716: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');

712: program_update_date = x_sysdate
713: WHERE purge_id = x_index;
714:
715: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
716: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');
717: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updated JL_CO_FA_PURGE');
718: END IF;
719:
720: END IF;

Line 732: fnd_file.put_line(fnd_file.log, err_msg);

728:
729: WHEN NOT_POSTED_TO_GL THEN
730: fnd_message.set_name('JL', 'JL_CO_FA_NOT_POSTED_TO_GL');
731: err_msg := fnd_message.get;
732: fnd_file.put_line(fnd_file.log, err_msg);
733: call_status := fnd_concurrent.set_completion_status('ERROR','');
734: /*
735: fnd_message.raise_error;
736: */

Line 741: fnd_file.put_line(fnd_file.log, err_msg);

737:
738: WHEN INVALID_FISCAL_YEAR THEN
739: fnd_message.set_name('JL', 'JL_CO_FA_INVALID_FISCAL_YEAR');
740: err_msg := fnd_message.get;
741: fnd_file.put_line(fnd_file.log, err_msg);
742: call_status := fnd_concurrent.set_completion_status('ERROR','');
743: /*
744: fnd_message.raise_error;
745: */

Line 751: fnd_file.put_line(fnd_file.log, err_msg);

747: WHEN NOT_A_TAX_BOOK THEN
748: fnd_message.set_name('JL', 'JL_CO_FA_INVALID_TAX_BOOK');
749: fnd_message.set_token('BOOK', p_book);
750: err_msg := fnd_message.get;
751: fnd_file.put_line(fnd_file.log, err_msg);
752: call_status := fnd_concurrent.set_completion_status('ERROR','');
753: /*
754: fnd_message.raise_error;
755: */

Line 761: fnd_file.put_line(fnd_file.log, err_msg);

757: WHEN DEPRN_STATUS_NOT_C THEN
758: fnd_message.set_name('JL', 'JL_CO_FA_DEPRECIATION_STATUS');
759: fnd_message.set_token('BOOK', p_book);
760: err_msg := fnd_message.get;
761: fnd_file.put_line(fnd_file.log, err_msg);
762: call_status := fnd_concurrent.set_completion_status('ERROR','');
763: /*
764: fnd_message.raise_error;
765: */

Line 770: fnd_file.put_line(fnd_file.log, err_msg);

766:
767: WHEN STATUS_NOT_NEW_OR_ARCHIVE THEN
768: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
769: err_msg := fnd_message.get;
770: fnd_file.put_line(fnd_file.log, err_msg);
771: call_status := fnd_concurrent.set_completion_status('ERROR','');
772: /*
773: fnd_message.raise_error;
774: */

Line 780: fnd_file.put_line(fnd_file.log, err_msg);

776: WHEN NOT_PROCESSED_FOR_LAST_YEAR THEN
777: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR_NOT_PROC');
778: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year - 1));
779: err_msg := fnd_message.get;
780: fnd_file.put_line(fnd_file.log, err_msg);
781: call_status := fnd_concurrent.set_completion_status('ERROR','');
782: /*
783: fnd_message.raise_error;
784: */

Line 789: fnd_file.put_line(fnd_file.log, err_msg);

785:
786: WHEN STATUS_NOT_ARCHVD_OR_RSTORE THEN
787: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
788: err_msg := fnd_message.get;
789: fnd_file.put_line(fnd_file.log, err_msg);
790: call_status := fnd_concurrent.set_completion_status('ERROR','');
791: /*
792: fnd_message.raise_error;
793: */

Line 799: fnd_file.put_line(fnd_file.log, err_msg);

795: WHEN STATUS_NOT_PURGED_LAST_YEAR THEN
796: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR_NOT_PROC');
797: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year - 1));
798: err_msg := fnd_message.get;
799: fnd_file.put_line(fnd_file.log, err_msg);
800: call_status := fnd_concurrent.set_completion_status('ERROR','');
801: /*
802: fnd_message.raise_error;
803: */

Line 808: fnd_file.put_line(fnd_file.log, err_msg);

804:
805: WHEN STATUS_NOT_PURGED THEN
806: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
807: err_msg := fnd_message.get;
808: fnd_file.put_line(fnd_file.log, err_msg);
809: call_status := fnd_concurrent.set_completion_status('ERROR','');
810: /*
811: fnd_message.raise_error;
812: */

Line 819: fnd_file.put_line(fnd_file.log, err_msg);

815: WHEN STATUS_PURGED THEN
816: fnd_message.set_name('JL', 'JL_CO_FA_PURGED');
817: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year +1));
818: err_msg := fnd_message.get;
819: fnd_file.put_line(fnd_file.log, err_msg);
820: call_status := fnd_concurrent.set_completion_status('ERROR','');
821: /*
822: fnd_message.raise_error;
823: */

Line 829: fnd_file.put_line(fnd_file.log, err_msg);

825: WHEN INCORRECT_SET_OF_ROWS THEN
826: fnd_message.set_name('JL', 'JL_CO_FA_INVALID_SET_OF_ROWS');
827: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year));
828: err_msg := fnd_message.get;
829: fnd_file.put_line(fnd_file.log, err_msg);
830: call_status := fnd_concurrent.set_completion_status('ERROR','');
831: /*
832: fnd_message.raise_error;
833: */

Line 837: fnd_file.put_line( fnd_file.log, fnd_message.get);

833: */
834:
835: WHEN UNABLE_TO_DO_SQL THEN
836: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
837: fnd_file.put_line( fnd_file.log, fnd_message.get);
838: err_num := SQLCODE;
839: err_msg := substr(SQLERRM, 1, 200);
840: ROLLBACK;
841: RAISE_APPLICATION_ERROR( err_num, err_msg);

Line 846: fnd_file.put_line( fnd_file.log, fnd_message.get);

842:
843:
844: WHEN OTHERS THEN
845: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
846: fnd_file.put_line( fnd_file.log, fnd_message.get);
847: err_num := SQLCODE;
848: err_msg := substr(SQLERRM, 1, 200);
849: ROLLBACK;
850: RAISE_APPLICATION_ERROR( err_num, err_msg);

Line 923: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);

919: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
920: END IF;
921:
922: fnd_message.set_name('JL', 'JL_CO_FA_PARAMETER');
923: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
924: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
925: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR');
926: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
927: fnd_file.put_line( 1, fnd_message.get);

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

920: END IF;
921:
922: fnd_message.set_name('JL', 'JL_CO_FA_PARAMETER');
923: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
924: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
925: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR');
926: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
927: fnd_file.put_line( 1, fnd_message.get);
928: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');

Line 927: fnd_file.put_line( 1, fnd_message.get);

923: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
924: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
925: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR');
926: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
927: fnd_file.put_line( 1, fnd_message.get);
928: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');
929: fnd_message.set_token('OPTION', p_option);
930: fnd_file.put_line( 1, fnd_message.get);
931: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');

Line 930: fnd_file.put_line( 1, fnd_message.get);

926: fnd_message.set_token('FISCAL_YEAR', p_fiscal_year);
927: fnd_file.put_line( 1, fnd_message.get);
928: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');
929: fnd_message.set_token('OPTION', p_option);
930: fnd_file.put_line( 1, fnd_message.get);
931: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
932: ---------------------------------------------------------
933: -- Find who_columns values --
934: ---------------------------------------------------------

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

927: fnd_file.put_line( 1, fnd_message.get);
928: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_OPTION');
929: fnd_message.set_token('OPTION', p_option);
930: fnd_file.put_line( 1, fnd_message.get);
931: fnd_file.put_line(FND_FILE.LOG, '----------------------------------------');
932: ---------------------------------------------------------
933: -- Find who_columns values --
934: ---------------------------------------------------------
935:

Line 943: fnd_file.put_line( 1, 'Delete erroneous appraisals PARAM:'||p_del_unproc_app);

939: -- fiscal year is not processed --
940: ---------------------------------------------------------
941: x_del_unproc_app := nvl(p_del_unproc_app, 'N');
942: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
943: fnd_file.put_line( 1, 'Delete erroneous appraisals PARAM:'||p_del_unproc_app);
944: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Delete erroneous appraisals PARAM:'||p_del_unproc_app);
945: fnd_file.put_line( 1, 'Delete erroneous appraisals VAR :'||x_del_unproc_app);
946: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Delete erroneous appraisals VAR :'||x_del_unproc_app);
947: END IF;

Line 945: fnd_file.put_line( 1, 'Delete erroneous appraisals VAR :'||x_del_unproc_app);

941: x_del_unproc_app := nvl(p_del_unproc_app, 'N');
942: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
943: fnd_file.put_line( 1, 'Delete erroneous appraisals PARAM:'||p_del_unproc_app);
944: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Delete erroneous appraisals PARAM:'||p_del_unproc_app);
945: fnd_file.put_line( 1, 'Delete erroneous appraisals VAR :'||x_del_unproc_app);
946: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Delete erroneous appraisals VAR :'||x_del_unproc_app);
947: END IF;
948:
949: SELECT count(*)

Line 1160: fnd_file.put_line( 1, 'Inserting row into JL_CO_FA_PURGE');

1156:
1157: IF x_count = 0 THEN
1158:
1159: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1160: fnd_file.put_line( 1, 'Inserting row into JL_CO_FA_PURGE');
1161: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Inserting row into JL_CO_FA_PURGE');
1162: END IF;
1163:
1164: INSERT INTO jl_co_fa_purge(

Line 1207: fnd_file.put_line( 1, 'Inserted row into JL_CO_FA_PURGE');

1203: x_program_id,
1204: x_sysdate);
1205:
1206: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1207: fnd_file.put_line( 1, 'Inserted row into JL_CO_FA_PURGE');
1208: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Inserted row into JL_CO_FA_PURGE');
1209: END IF;
1210:
1211:

Line 1231: fnd_file.put_line( 1, 'Backup table for JL_CO_FA_APPRAISALS :'||x_appr_table);

1227: x_book_table := 'JL_CO_FA_APPRAISAL_BOOKS'||TO_CHAR(x_index);
1228:
1229:
1230: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1231: fnd_file.put_line( 1, 'Backup table for JL_CO_FA_APPRAISALS :'||x_appr_table);
1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Backup table for JL_CO_FA_APPRAISALS :'||x_appr_table);
1233: fnd_file.put_line( 1, 'Backup table for JL_CO_FA_ASSET_APPRS :'||x_asset_table);
1234: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Backup table for JL_CO_FA_ASSET_APPRS :'||x_asset_table);
1235: END IF;

Line 1233: fnd_file.put_line( 1, 'Backup table for JL_CO_FA_ASSET_APPRS :'||x_asset_table);

1229:
1230: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1231: fnd_file.put_line( 1, 'Backup table for JL_CO_FA_APPRAISALS :'||x_appr_table);
1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Backup table for JL_CO_FA_APPRAISALS :'||x_appr_table);
1233: fnd_file.put_line( 1, 'Backup table for JL_CO_FA_ASSET_APPRS :'||x_asset_table);
1234: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Backup table for JL_CO_FA_ASSET_APPRS :'||x_asset_table);
1235: END IF;
1236:
1237: ---------------------------------------------------------

Line 1273: fnd_file.put_line( 1, 'No of appraisal rows :'||to_char(x_appraisal_rows));

1269: FROM jl_co_fa_appraisals
1270: WHERE fiscal_year = p_fiscal_year;
1271:
1272: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1273: fnd_file.put_line( 1, 'No of appraisal rows :'||to_char(x_appraisal_rows));
1274: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'No of appraisal rows :'||to_char(x_appraisal_rows));
1275: fnd_file.put_line( 1, 'Appraisal Amount :'||to_char(x_appraisal_amount));
1276: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Appraisal Amount :'||to_char(x_appraisal_amount));
1277: END IF;

Line 1275: fnd_file.put_line( 1, 'Appraisal Amount :'||to_char(x_appraisal_amount));

1271:
1272: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1273: fnd_file.put_line( 1, 'No of appraisal rows :'||to_char(x_appraisal_rows));
1274: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'No of appraisal rows :'||to_char(x_appraisal_rows));
1275: fnd_file.put_line( 1, 'Appraisal Amount :'||to_char(x_appraisal_amount));
1276: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Appraisal Amount :'||to_char(x_appraisal_amount));
1277: END IF;
1278:
1279:

Line 1290: fnd_file.put_line( 1, 'No of asset rows :'||to_char(x_asset_rows));

1286: from jl_co_fa_appraisals
1287: where fiscal_year = p_fiscal_year);
1288:
1289: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1290: fnd_file.put_line( 1, 'No of asset rows :'||to_char(x_asset_rows));
1291: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'No of asset rows :'||to_char(x_asset_rows));
1292: fnd_file.put_line( 1, 'Asset Amount :'||to_char(x_asset_amount));
1293: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Asset Amount :'||to_char(x_asset_amount));
1294: END IF;

Line 1292: fnd_file.put_line( 1, 'Asset Amount :'||to_char(x_asset_amount));

1288:
1289: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1290: fnd_file.put_line( 1, 'No of asset rows :'||to_char(x_asset_rows));
1291: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'No of asset rows :'||to_char(x_asset_rows));
1292: fnd_file.put_line( 1, 'Asset Amount :'||to_char(x_asset_amount));
1293: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Asset Amount :'||to_char(x_asset_amount));
1294: END IF;
1295:
1296: SELECT count(*),

Line 1306: fnd_file.put_line( 1, 'No of appraisal_book rows :'||to_char(x_book_rows));

1302: from jl_co_fa_appraisals
1303: where fiscal_year = p_fiscal_year);
1304:
1305: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1306: fnd_file.put_line( 1, 'No of appraisal_book rows :'||to_char(x_book_rows));
1307: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'No of appraisal_book rows :'||to_char(x_book_rows));
1308: fnd_file.put_line( 1, 'Appraisal_book Amount :'||to_char(x_book_amount));
1309: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Appraisal_book Amount :'||to_char(x_book_amount));
1310: END IF;

Line 1308: fnd_file.put_line( 1, 'Appraisal_book Amount :'||to_char(x_book_amount));

1304:
1305: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1306: fnd_file.put_line( 1, 'No of appraisal_book rows :'||to_char(x_book_rows));
1307: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'No of appraisal_book rows :'||to_char(x_book_rows));
1308: fnd_file.put_line( 1, 'Appraisal_book Amount :'||to_char(x_book_amount));
1309: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Appraisal_book Amount :'||to_char(x_book_amount));
1310: END IF;
1311:
1312:

Line 1322: fnd_file.put_line( 1, fnd_message.get);

1318: IF (p_option = 'ARCHIVE') THEN
1319:
1320: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1321: fnd_message.set_token('OPTION', p_option);
1322: fnd_file.put_line( 1, fnd_message.get);
1323:
1324: ---------------------------------------------------------
1325: -- Check weather backup tables for appraisal is exists.--
1326: -- Its name is jl_co_fa_appraisals with extension --

Line 1343: fnd_file.put_line( 1, 'SQL statement to be processed :'||x_string);

1339:
1340: IF x_count <> 0 THEN
1341: x_string := 'drop table '||x_oracle_username||'.'||ltrim(rtrim(x_appr_table));
1342: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1343: fnd_file.put_line( 1, 'SQL statement to be processed :'||x_string);
1344: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQL statement to be processed :'||x_string);
1345: END IF;
1346:
1347: IF NOT (do_sql(x_string)) THEN

Line 1371: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

1367:
1368: IF x_count <> 0 THEN
1369: x_string := 'Drop table '||x_oracle_username||'.'||ltrim(rtrim(x_asset_table));
1370: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1371: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
1372: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQL statement to be processed :'||x_string);
1373: END IF;
1374:
1375: IF NOT (do_sql(x_string)) THEN

Line 1400: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

1396:
1397: IF x_count <> 0 THEN
1398: x_string := 'Drop table '||x_oracle_username||'.'||ltrim(rtrim(x_book_table));
1399: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1400: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
1401: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQL statement to be processed :'||x_string);
1402: END IF;
1403:
1404: IF NOT (do_sql(x_string)) THEN

Line 1433: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

1429: ' as select * from jl_co_fa_appraisals'||
1430: ' where fiscal_year = '||p_fiscal_year;
1431:
1432: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1433: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
1434: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQL statement to be processed :'||x_string);
1435: END IF;
1436:
1437: IF NOT (do_sql(x_string)) THEN

Line 1457: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

1453: ' as select * from jl_co_fa_asset_apprs'||
1454: ' where appraisal_id in (select appraisal_id from jl_co_fa_appraisals'||
1455: ' where fiscal_year = '||p_fiscal_year||')';
1456: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1457: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
1458: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQL statement to be processed :'||x_string);
1459: END IF;
1460:
1461: IF NOT (do_sql(x_string)) THEN

Line 1481: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);

1477: 'as select * from jl_co_fa_appraisal_books'||
1478: ' where appraisal_id in (select appraisal_id from jl_co_fa_appraisals'||
1479: ' where fiscal_year='||p_fiscal_year||')';
1480: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1481: fnd_file.put_line( 1, 'SQl statement to be processed :'||x_string);
1482: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'SQL statement to be processed :'||x_string);
1483: END IF;
1484:
1485: IF NOT (do_sql(x_string)) THEN

Line 1494: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

1490: ---------------------------------------------------------
1491: -- change the status in jl_co_fa_purge to 'ARCHIVE' --
1492: ---------------------------------------------------------
1493: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1494: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');
1495: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updating JL_CO_FA_PURGE');
1496: END IF;
1497:
1498:

Line 1514: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');

1510: program_update_date = x_sysdate
1511: WHERE purge_id = x_index;
1512:
1513: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1514: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');
1515: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updated JL_CO_FA_PURGE');
1516: END IF;
1517:
1518: ELSE

Line 1522: fnd_file.put_line( 1, fnd_message.get);

1518: ELSE
1519:
1520: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1521: fnd_message.set_token('OPTION', p_option);
1522: fnd_file.put_line( 1, fnd_message.get);
1523:
1524: ---------------------------------------------------------
1525: -- If the option is purge then check for correct set --
1526: -- of rows to be purged. Stop the program if anything --

Line 1552: fnd_file.put_line( 1, 'Deleting JL_CO_FA_APPRAISALS');

1548: -- and change the status in jl_co_fa_purge to 'PURGED' --
1549: ---------------------------------------------------------
1550:
1551: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1552: fnd_file.put_line( 1, 'Deleting JL_CO_FA_APPRAISALS');
1553: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleting JL_CO_FA_ASSET_APPRS');
1554: END IF;
1555:
1556: DELETE FROM jl_co_fa_asset_apprs

Line 1562: fnd_file.put_line( 1, 'Deleted JL_CO_FA_APPRAISALS');

1558: from jl_co_fa_appraisals
1559: where fiscal_year = p_fiscal_year);
1560:
1561: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1562: fnd_file.put_line( 1, 'Deleted JL_CO_FA_APPRAISALS');
1563: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleted JL_CO_FA_ASSET_APPRS');
1564: END IF;
1565:
1566: DELETE FROM jl_co_fa_appraisal_books

Line 1573: fnd_file.put_line( 1, 'Deleting JL_CO_FA_Appraisals');

1569: where fiscal_year = p_fiscal_year);
1570:
1571:
1572: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1573: fnd_file.put_line( 1, 'Deleting JL_CO_FA_Appraisals');
1574: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleting JL_CO_FA_Appraisals');
1575: END IF;
1576:
1577:

Line 1583: fnd_file.put_line( 1, 'Deleted JL_CO_FA_Appraisals');

1579: DELETE FROM jl_co_fa_appraisals
1580: WHERE fiscal_year = p_fiscal_year;
1581:
1582: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1583: fnd_file.put_line( 1, 'Deleted JL_CO_FA_Appraisals');
1584: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleted JL_CO_FA_Appraisals');
1585: END IF;
1586: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1587: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

Line 1587: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

1583: fnd_file.put_line( 1, 'Deleted JL_CO_FA_Appraisals');
1584: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Deleted JL_CO_FA_Appraisals');
1585: END IF;
1586: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1587: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');
1588: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updating JL_CO_FA_PURGE');
1589: END IF;
1590:
1591:

Line 1601: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');

1597: program_update_date = x_sysdate
1598: WHERE purge_id = x_index;
1599:
1600: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1601: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');
1602: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updated JL_CO_FA_PURGE');
1603: END IF;
1604:
1605: END IF;

Line 1612: fnd_file.put_line( 1, fnd_message.get);

1608: ELSE
1609:
1610: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1611: fnd_message.set_token('OPTION', p_option);
1612: fnd_file.put_line( 1, fnd_message.get);
1613:
1614: ---------------------------------------------------------
1615: -- Process for the option 'RESTORE' --
1616: ---------------------------------------------------------

Line 1633: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');

1629: RAISE UNABLE_TO_DO_SQL;
1630: END IF;
1631:
1632: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1633: fnd_file.put_line( 1, 'Updating JL_CO_FA_PURGE');
1634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updating JL_CO_FA_PURGE');
1635: END IF;
1636:
1637: UPDATE jl_co_fa_purge

Line 1646: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');

1642: program_update_date = x_sysdate
1643: WHERE purge_id = x_index;
1644:
1645: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1646: fnd_file.put_line( 1, 'Updated JL_CO_FA_PURGE');
1647: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'Updated JL_CO_FA_PURGE');
1648: END IF;
1649:
1650: END IF;

Line 1663: fnd_file.put_line(fnd_file.log, err_msg);

1659:
1660: WHEN APPRAISAL_NOT_PROCESSED THEN
1661: fnd_message.set_name('JL', 'JL_CO_FA_APPR_NOT_PROCESSED');
1662: err_msg := fnd_message.get;
1663: fnd_file.put_line(fnd_file.log, err_msg);
1664: call_status := fnd_concurrent.set_completion_status('ERROR','');
1665: /*
1666: fnd_message.raise_error;
1667: */

Line 1672: fnd_file.put_line(fnd_file.log, err_msg);

1668:
1669: WHEN NOTHING_TO_ARCHIVE THEN
1670: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1671: err_msg := fnd_message.get;
1672: fnd_file.put_line(fnd_file.log, err_msg);
1673: call_status := fnd_concurrent.set_completion_status('ERROR','');
1674: /*
1675: fnd_message.raise_error;
1676: /*

Line 1686: fnd_file.put_line(fnd_file.log, err_msg);

1682:
1683: WHEN STATUS_NOT_NEW_OR_ARCHIVE THEN
1684: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1685: err_msg := fnd_message.get;
1686: fnd_file.put_line(fnd_file.log, err_msg);
1687: call_status := fnd_concurrent.set_completion_status('ERROR','');
1688: /*
1689: fnd_message.raise_error;
1690: */

Line 1696: fnd_file.put_line(fnd_file.log, err_msg);

1692: WHEN NOT_PROCESSED_FOR_LAST_YEAR THEN
1693: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR_NOT_PROC');
1694: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year - 1));
1695: err_msg := fnd_message.get;
1696: fnd_file.put_line(fnd_file.log, err_msg);
1697: call_status := fnd_concurrent.set_completion_status('ERROR','');
1698: /*
1699: fnd_message.raise_error;
1700: */

Line 1705: fnd_file.put_line(fnd_file.log, err_msg);

1701:
1702: WHEN STATUS_NOT_ARCHVD_OR_RSTORE THEN
1703: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1704: err_msg := fnd_message.get;
1705: fnd_file.put_line(fnd_file.log, err_msg);
1706: call_status := fnd_concurrent.set_completion_status('ERROR','');
1707: /*
1708: fnd_message.raise_error;
1709: */

Line 1715: fnd_file.put_line(fnd_file.log, err_msg);

1711: WHEN STATUS_NOT_PURGED_LAST_YEAR THEN
1712: fnd_message.set_name('JL', 'JL_CO_FA_FISCAL_YEAR_NOT_PROC');
1713: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year - 1));
1714: err_msg := fnd_message.get;
1715: fnd_file.put_line(fnd_file.log, err_msg);
1716: call_status := fnd_concurrent.set_completion_status('ERROR','');
1717: /*
1718: fnd_message.raise_error;
1719: */

Line 1724: fnd_file.put_line(fnd_file.log, err_msg);

1720:
1721: WHEN STATUS_NOT_PURGED THEN
1722: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1723: err_msg := fnd_message.get;
1724: fnd_file.put_line(fnd_file.log, err_msg);
1725: call_status := fnd_concurrent.set_completion_status('ERROR','');
1726: /*
1727: fnd_message.raise_error;
1728: */

Line 1734: fnd_file.put_line(fnd_file.log, err_msg);

1730: WHEN STATUS_PURGED THEN
1731: fnd_message.set_name('JL', 'JL_CO_FA_PURGED');
1732: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year + 1));
1733: err_msg := fnd_message.get;
1734: fnd_file.put_line(fnd_file.log, err_msg);
1735: call_status := fnd_concurrent.set_completion_status('ERROR','');
1736: /*
1737: fnd_message.raise_error;
1738: */

Line 1744: fnd_file.put_line(fnd_file.log, err_msg);

1740: WHEN INCORRECT_SET_OF_ROWS THEN
1741: fnd_message.set_name('JL', 'JL_CO_FA_INVALID_SET_OF_ROWS');
1742: fnd_message.set_token('FISCAL_YEAR', TO_CHAR(p_fiscal_year));
1743: err_msg := fnd_message.get;
1744: fnd_file.put_line(fnd_file.log, err_msg);
1745: call_status := fnd_concurrent.set_completion_status('ERROR','');
1746: /*
1747: fnd_message.raise_error;
1748: */

Line 1752: fnd_file.put_line( fnd_file.log, fnd_message.get);

1748: */
1749:
1750: WHEN UNABLE_TO_DO_SQL THEN
1751: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1752: fnd_file.put_line( fnd_file.log, fnd_message.get);
1753: err_num := SQLCODE;
1754: err_msg := substr(SQLERRM, 1, 200);
1755: ROLLBACK;
1756: RAISE_APPLICATION_ERROR( err_num, err_msg);

Line 1762: fnd_file.put_line( fnd_file.log, fnd_message.get);

1758:
1759:
1760: WHEN OTHERS THEN
1761: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1762: fnd_file.put_line( fnd_file.log, fnd_message.get);
1763: err_num := SQLCODE;
1764: err_msg := substr(SQLERRM, 1, 200);
1765: ROLLBACK;
1766: RAISE_APPLICATION_ERROR( err_num, err_msg);

Line 1803: fnd_file.put_line( 1, 'last_update_login:'||to_char(x_last_update_login));

1799: x_sysdate := SYSDATE;
1800:
1801:
1802: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1803: fnd_file.put_line( 1, 'last_update_login:'||to_char(x_last_update_login));
1804: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_update_login:'||to_char(x_last_update_login));
1805: fnd_file.put_line( 1, 'last_updated_by:'||to_char(x_last_updated_by));
1806: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_updated_by:'||to_char(x_last_updated_by));
1807: fnd_file.put_line( 1, 'last_request_id:'||to_char(x_request_id));

Line 1805: fnd_file.put_line( 1, 'last_updated_by:'||to_char(x_last_updated_by));

1801:
1802: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1803: fnd_file.put_line( 1, 'last_update_login:'||to_char(x_last_update_login));
1804: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_update_login:'||to_char(x_last_update_login));
1805: fnd_file.put_line( 1, 'last_updated_by:'||to_char(x_last_updated_by));
1806: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_updated_by:'||to_char(x_last_updated_by));
1807: fnd_file.put_line( 1, 'last_request_id:'||to_char(x_request_id));
1808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_request_id:'||to_char(x_request_id));
1809: fnd_file.put_line( 1, 'x_program_application_id :'||to_char(x_program_application_id ));

Line 1807: fnd_file.put_line( 1, 'last_request_id:'||to_char(x_request_id));

1803: fnd_file.put_line( 1, 'last_update_login:'||to_char(x_last_update_login));
1804: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_update_login:'||to_char(x_last_update_login));
1805: fnd_file.put_line( 1, 'last_updated_by:'||to_char(x_last_updated_by));
1806: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_updated_by:'||to_char(x_last_updated_by));
1807: fnd_file.put_line( 1, 'last_request_id:'||to_char(x_request_id));
1808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_request_id:'||to_char(x_request_id));
1809: fnd_file.put_line( 1, 'x_program_application_id :'||to_char(x_program_application_id ));
1810: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_application_id :'||to_char(x_program_application_id ));
1811: fnd_file.put_line( 1, 'x_program_id :'||to_char(x_program_id ));

Line 1809: fnd_file.put_line( 1, 'x_program_application_id :'||to_char(x_program_application_id ));

1805: fnd_file.put_line( 1, 'last_updated_by:'||to_char(x_last_updated_by));
1806: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_updated_by:'||to_char(x_last_updated_by));
1807: fnd_file.put_line( 1, 'last_request_id:'||to_char(x_request_id));
1808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_request_id:'||to_char(x_request_id));
1809: fnd_file.put_line( 1, 'x_program_application_id :'||to_char(x_program_application_id ));
1810: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_application_id :'||to_char(x_program_application_id ));
1811: fnd_file.put_line( 1, 'x_program_id :'||to_char(x_program_id ));
1812: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_id :'||to_char(x_program_id ));
1813: fnd_file.put_line( 1, 'x_sysdate :'||to_char(x_sysdate ));

Line 1811: fnd_file.put_line( 1, 'x_program_id :'||to_char(x_program_id ));

1807: fnd_file.put_line( 1, 'last_request_id:'||to_char(x_request_id));
1808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'last_request_id:'||to_char(x_request_id));
1809: fnd_file.put_line( 1, 'x_program_application_id :'||to_char(x_program_application_id ));
1810: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_application_id :'||to_char(x_program_application_id ));
1811: fnd_file.put_line( 1, 'x_program_id :'||to_char(x_program_id ));
1812: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_id :'||to_char(x_program_id ));
1813: fnd_file.put_line( 1, 'x_sysdate :'||to_char(x_sysdate ));
1814: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_sysdate :'||to_char(x_sysdate ));
1815:

Line 1813: fnd_file.put_line( 1, 'x_sysdate :'||to_char(x_sysdate ));

1809: fnd_file.put_line( 1, 'x_program_application_id :'||to_char(x_program_application_id ));
1810: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_application_id :'||to_char(x_program_application_id ));
1811: fnd_file.put_line( 1, 'x_program_id :'||to_char(x_program_id ));
1812: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_program_id :'||to_char(x_program_id ));
1813: fnd_file.put_line( 1, 'x_sysdate :'||to_char(x_sysdate ));
1814: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'x_sysdate :'||to_char(x_sysdate ));
1815:
1816: END IF;
1817:

Line 2001: fnd_file.put_line(fnd_file.output, fnd_message.get);

1997: ORDER BY apprs.appraisal_id;
1998:
1999: BEGIN
2000:
2001: fnd_file.put_line(fnd_file.output, fnd_message.get);
2002: fnd_message.set_name('JL', 'JL_CO_FA_APPR_NUM_OUT');
2003: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,20,' '),1,20) || ' ');
2004: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISAL_STATUS_OUT');
2005: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,80,' '),1,80) || ' ');

Line 2003: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,20,' '),1,20) || ' ');

1999: BEGIN
2000:
2001: fnd_file.put_line(fnd_file.output, fnd_message.get);
2002: fnd_message.set_name('JL', 'JL_CO_FA_APPR_NUM_OUT');
2003: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,20,' '),1,20) || ' ');
2004: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISAL_STATUS_OUT');
2005: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,80,' '),1,80) || ' ');
2006: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISER_NAME_OUT');
2007: fnd_file.put(fnd_file.output, SUBSTR(fnd_message.get,1,60));

Line 2005: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,80,' '),1,80) || ' ');

2001: fnd_file.put_line(fnd_file.output, fnd_message.get);
2002: fnd_message.set_name('JL', 'JL_CO_FA_APPR_NUM_OUT');
2003: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,20,' '),1,20) || ' ');
2004: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISAL_STATUS_OUT');
2005: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,80,' '),1,80) || ' ');
2006: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISER_NAME_OUT');
2007: fnd_file.put(fnd_file.output, SUBSTR(fnd_message.get,1,60));
2008: fnd_file.new_line(fnd_file.output,1);
2009: FOR line_ctr IN 1..4 LOOP

Line 2007: fnd_file.put(fnd_file.output, SUBSTR(fnd_message.get,1,60));

2003: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,20,' '),1,20) || ' ');
2004: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISAL_STATUS_OUT');
2005: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,80,' '),1,80) || ' ');
2006: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISER_NAME_OUT');
2007: fnd_file.put(fnd_file.output, SUBSTR(fnd_message.get,1,60));
2008: fnd_file.new_line(fnd_file.output,1);
2009: FOR line_ctr IN 1..4 LOOP
2010: fnd_file.put(fnd_file.output, '----------------------------------------');
2011: END LOOP;

Line 2008: fnd_file.new_line(fnd_file.output,1);

2004: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISAL_STATUS_OUT');
2005: fnd_file.put(fnd_file.output, SUBSTR(RPAD(fnd_message.get,80,' '),1,80) || ' ');
2006: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISER_NAME_OUT');
2007: fnd_file.put(fnd_file.output, SUBSTR(fnd_message.get,1,60));
2008: fnd_file.new_line(fnd_file.output,1);
2009: FOR line_ctr IN 1..4 LOOP
2010: fnd_file.put(fnd_file.output, '----------------------------------------');
2011: END LOOP;
2012: fnd_file.new_line(fnd_file.output,1);

Line 2010: fnd_file.put(fnd_file.output, '----------------------------------------');

2006: fnd_message.set_name('JL', 'JL_CO_FA_APPRAISER_NAME_OUT');
2007: fnd_file.put(fnd_file.output, SUBSTR(fnd_message.get,1,60));
2008: fnd_file.new_line(fnd_file.output,1);
2009: FOR line_ctr IN 1..4 LOOP
2010: fnd_file.put(fnd_file.output, '----------------------------------------');
2011: END LOOP;
2012: fnd_file.new_line(fnd_file.output,1);
2013: FOR rec_unproc_appraisals IN c_unproc_appraisals LOOP
2014: x_output_line := SUBSTR(RPAD(to_char(rec_unproc_appraisals.appraisal_id),20,' '),1,20)||' ';

Line 2012: fnd_file.new_line(fnd_file.output,1);

2008: fnd_file.new_line(fnd_file.output,1);
2009: FOR line_ctr IN 1..4 LOOP
2010: fnd_file.put(fnd_file.output, '----------------------------------------');
2011: END LOOP;
2012: fnd_file.new_line(fnd_file.output,1);
2013: FOR rec_unproc_appraisals IN c_unproc_appraisals LOOP
2014: x_output_line := SUBSTR(RPAD(to_char(rec_unproc_appraisals.appraisal_id),20,' '),1,20)||' ';
2015: x_output_line := x_output_line || SUBSTR(RPAD(rec_unproc_appraisals.appraisal_status,80,' '),1,80)||' ';
2016: x_output_line := x_output_line || SUBSTR(rec_unproc_appraisals.appraiser_name,1,60);

Line 2017: fnd_file.put_line(fnd_file.output, x_output_line);

2013: FOR rec_unproc_appraisals IN c_unproc_appraisals LOOP
2014: x_output_line := SUBSTR(RPAD(to_char(rec_unproc_appraisals.appraisal_id),20,' '),1,20)||' ';
2015: x_output_line := x_output_line || SUBSTR(RPAD(rec_unproc_appraisals.appraisal_status,80,' '),1,80)||' ';
2016: x_output_line := x_output_line || SUBSTR(rec_unproc_appraisals.appraiser_name,1,60);
2017: fnd_file.put_line(fnd_file.output, x_output_line);
2018: END LOOP;
2019: FOR line_ctr IN 1..4 LOOP
2020: fnd_file.put(fnd_file.output, '----------------------------------------');
2021: END LOOP;

Line 2020: fnd_file.put(fnd_file.output, '----------------------------------------');

2016: x_output_line := x_output_line || SUBSTR(rec_unproc_appraisals.appraiser_name,1,60);
2017: fnd_file.put_line(fnd_file.output, x_output_line);
2018: END LOOP;
2019: FOR line_ctr IN 1..4 LOOP
2020: fnd_file.put(fnd_file.output, '----------------------------------------');
2021: END LOOP;
2022:
2023: END create_output_headings;
2024: