DBA Data[Home] [Help]

APPS.JL_ZZ_FA_REVAL_RULES_PKG dependencies on FND_FILE

Line 169: fnd_file.put_line (FND_FILE.LOG, g_char);

165: FND_PROFILE.GET('JLZZ_INF_RATIO_PRECISION',g_precision);
166:
167: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
168: g_char := 'Start Debugging';
169: fnd_file.put_line (FND_FILE.LOG, g_char);
170: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
171:
172: g_char := ' ';
173: fnd_file.put_line (FND_FILE.LOG, g_char);

Line 173: fnd_file.put_line (FND_FILE.LOG, g_char);

169: fnd_file.put_line (FND_FILE.LOG, g_char);
170: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
171:
172: g_char := ' ';
173: fnd_file.put_line (FND_FILE.LOG, g_char);
174: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
175:
176: g_char := 'Procedure initialize_process';
177: fnd_file.put_line (FND_FILE.LOG, g_char);

Line 177: fnd_file.put_line (FND_FILE.LOG, g_char);

173: fnd_file.put_line (FND_FILE.LOG, g_char);
174: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
175:
176: g_char := 'Procedure initialize_process';
177: fnd_file.put_line (FND_FILE.LOG, g_char);
178: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
179:
180: g_char := 'Country :'||g_country_code;
181: fnd_file.put_line (FND_FILE.LOG, g_char);

Line 181: fnd_file.put_line (FND_FILE.LOG, g_char);

177: fnd_file.put_line (FND_FILE.LOG, g_char);
178: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
179:
180: g_char := 'Country :'||g_country_code;
181: fnd_file.put_line (FND_FILE.LOG, g_char);
182: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
183:
184: g_char := 'Precision :'||g_precision;
185: fnd_file.put_line (FND_FILE.LOG, g_char);

Line 185: fnd_file.put_line (FND_FILE.LOG, g_char);

181: fnd_file.put_line (FND_FILE.LOG, g_char);
182: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
183:
184: g_char := 'Precision :'||g_precision;
185: fnd_file.put_line (FND_FILE.LOG, g_char);
186: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
187: END IF;
188:
189:

Line 202: fnd_file.put_line (FND_FILE.LOG, g_char);

198: g_step := 'DELETE_RULES';
199:
200: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
201: g_char := 'Deleting fa_mass_revaluation_rules table';
202: fnd_file.put_line (FND_FILE.LOG, g_char);
203: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
204: END IF;
205:
206: DELETE FROM fa_mass_revaluation_rules

Line 269: fnd_file.put_line (FND_FILE.LOG, g_char);

265: FROM fa_mass_revaluations rr
266: WHERE rr.mass_reval_id = p_mass_reval_id;
267: EXCEPTION WHEN OTHERS THEN
268: g_char := 'Error: Mass Revaluation Id : '||to_char(p_mass_reval_id)||SQLERRM;
269: fnd_file.put_line (FND_FILE.LOG, g_char);
270: END;
271:
272:
273: -----------------------------------------------------------------

Line 321: fnd_file.put_line (FND_FILE.LOG, g_char);

317:
318: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
319:
320: g_char := 'Period counter :'||TO_CHAR(g_current_period_counter1);
321: fnd_file.put_line (FND_FILE.LOG, g_char);
322: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
323:
324: g_char := ' ';
325: fnd_file.put_line (FND_FILE.LOG, g_char);

Line 325: fnd_file.put_line (FND_FILE.LOG, g_char);

321: fnd_file.put_line (FND_FILE.LOG, g_char);
322: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
323:
324: g_char := ' ';
325: fnd_file.put_line (FND_FILE.LOG, g_char);
326: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
327: g_char := 'End of procedure initialize_process';
328: fnd_file.put_line (FND_FILE.LOG, g_char);
329: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);

Line 328: fnd_file.put_line (FND_FILE.LOG, g_char);

324: g_char := ' ';
325: fnd_file.put_line (FND_FILE.LOG, g_char);
326: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
327: g_char := 'End of procedure initialize_process';
328: fnd_file.put_line (FND_FILE.LOG, g_char);
329: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
330: END IF;
331:
332: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 370: fnd_file.put_line (FND_FILE.LOG, g_char);

366: g_step := 'PRICE INDEX ID';
367:
368: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
369: g_char := 'Procedure initialize_category';
370: fnd_file.put_line (FND_FILE.LOG, g_char);
371: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
372: END IF;
373:
374: SELECT price_index_id

Line 387: fnd_file.put_line (FND_FILE.LOG, g_char);

383: g_step := '';
384:
385: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
386: g_char := 'Price index :'||TO_CHAR(g_price_index);
387: fnd_file.put_line (FND_FILE.LOG, g_char);
388: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
389: END IF;
390:
391: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 423: fnd_file.put_line (FND_FILE.LOG, g_char);

419:
420: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
421: g_char := 'Procedure get_close_date parameter p_date is '||p_date||
422: ' and must be in canonical format YYYY/MM/DD HH24:MI:SS';
423: fnd_file.put_line (FND_FILE.LOG, g_char);
424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
425: END IF;
426:
427:

Line 513: fnd_file.put_line (FND_FILE.LOG, g_char);

509: END IF;
510:
511: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
512: g_char := 'Function first_deprn';
513: fnd_file.put_line (FND_FILE.LOG, g_char);
514: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
515: END IF;
516:
517: --

Line 630: fnd_file.put_line (FND_FILE.LOG, g_char);

626: END IF;
627:
628: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
629: g_char := 'Function get_revaluation_rates ';
630: fnd_file.put_line (FND_FILE.LOG, g_char);
631: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
632: g_char := 'Asset id :'||TO_CHAR(p_asset_id);
633: fnd_file.put_line (FND_FILE.LOG, g_char);
634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);

Line 633: fnd_file.put_line (FND_FILE.LOG, g_char);

629: g_char := 'Function get_revaluation_rates ';
630: fnd_file.put_line (FND_FILE.LOG, g_char);
631: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
632: g_char := 'Asset id :'||TO_CHAR(p_asset_id);
633: fnd_file.put_line (FND_FILE.LOG, g_char);
634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
635: g_char := 'Asset start date :'||TO_CHAR(p_asset_start_date);
636: fnd_file.put_line (FND_FILE.LOG, g_char);
637: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);

Line 636: fnd_file.put_line (FND_FILE.LOG, g_char);

632: g_char := 'Asset id :'||TO_CHAR(p_asset_id);
633: fnd_file.put_line (FND_FILE.LOG, g_char);
634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
635: g_char := 'Asset start date :'||TO_CHAR(p_asset_start_date);
636: fnd_file.put_line (FND_FILE.LOG, g_char);
637: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
638: END IF;
639:
640: ------------------------------------------------------------

Line 678: fnd_file.put_line (FND_FILE.LOG, g_char);

674: p_date_retired ) THEN
675:
676: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
677: g_char := 'In eval_reinstatements';
678: fnd_file.put_line (FND_FILE.LOG, g_char);
679: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
680: END IF;
681:
682: get_close_date(p_date_retired,l_close_date);

Line 702: fnd_file.put_line (FND_FILE.LOG, g_char);

698: ELSIF first_deprn(p_asset_id , g_current_period_counter1) THEN
699:
700: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
701: g_char := 'In first_deprn';
702: fnd_file.put_line (FND_FILE.LOG, g_char);
703: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
704: END IF;
705:
706: get_close_date(p_asset_start_date,l_close_date);

Line 720: fnd_file.put_line (FND_FILE.LOG, g_char);

716: ELSE
717:
718: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
719: g_char := 'Normal Indexes';
720: fnd_file.put_line (FND_FILE.LOG, g_char);
721: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
722: END IF;
723:
724: get_price_index_rate (g_previous_period_to_date

Line 749: fnd_file.put_line (FND_FILE.LOG, g_char);

745: , l_change_in_cost);
746:
747: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
748: g_char := 'Asset CIP, previous cost, current cost :'||TO_CHAR(l_previous_period_cost)||','||TO_CHAR(p_current_cost);
749: fnd_file.put_line (FND_FILE.LOG, g_char);
750: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
751: END IF;
752:
753: l_rate := ((p_current_cost + l_previous_period_cost * l_rate)/p_current_cost)-1;

Line 787: fnd_file.put_line (FND_FILE.LOG, g_char);

783:
784: BEGIN
785: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
786: g_char := 'Procedure create_revaluation_rule(+)';
787: fnd_file.put_line (FND_FILE.LOG, g_char);
788: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
789: g_char := 'values inserted into fa_mass_revaluation_rules:';
790: fnd_file.put_line (FND_FILE.LOG, g_char);
791: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);

Line 790: fnd_file.put_line (FND_FILE.LOG, g_char);

786: g_char := 'Procedure create_revaluation_rule(+)';
787: fnd_file.put_line (FND_FILE.LOG, g_char);
788: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
789: g_char := 'values inserted into fa_mass_revaluation_rules:';
790: fnd_file.put_line (FND_FILE.LOG, g_char);
791: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
792: g_char := 'asset id:'||to_char(p_asset_id)||
793: ' override_defaults_flag:'||'No'||
794: ' revalue_cip_assets_flag:'||g_revalue_cip_assets_flag||

Line 797: fnd_file.put_line (FND_FILE.LOG, g_char);

793: ' override_defaults_flag:'||'No'||
794: ' revalue_cip_assets_flag:'||g_revalue_cip_assets_flag||
795: ' reval_fully_rsvd_flag:'||g_reval_fully_rsvd_flag||
796: ' life_extension_factor:'||to_char(g_life_extension_factor);
797: fnd_file.put_line (FND_FILE.LOG, g_char);
798: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
799: END IF;
800:
801: --

Line 807: fnd_file.put_line (FND_FILE.LOG, g_char);

803: -- conditions.
804: IF p_revaluation_rate > 0 AND g_reval_fully_rsvd_flag = 'YES' THEN
805: IF nvl(g_life_extension_ceiling,0) <= 0 THEN
806: g_char := 'Error: Invalid life extension ceiling:'||to_char(g_life_extension_ceiling);
807: fnd_file.put_line (FND_FILE.LOG, g_char);
808: END IF;
809: END IF;
810:
811: INSERT INTO fa_mass_revaluation_rules

Line 838: fnd_file.put_line (FND_FILE.LOG, g_char);

834:
835:
836: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
837: g_char := 'Procedure create_revaluation_rule(-)';
838: fnd_file.put_line (FND_FILE.LOG, g_char);
839: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
840: END IF;
841:
842: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 868: fnd_file.put_line (FND_FILE.LOG, g_char);

864: END IF;
865:
866: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
867: g_char := 'Procedure update_control_tables';
868: fnd_file.put_line (FND_FILE.LOG, g_char);
869: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
870: END IF;
871: UPDATE fa_book_controls
872: SET global_attribute2 = g_current_period_counter1,

Line 910: fnd_file.put_line (FND_FILE.LOG, g_char);

906: END IF;
907:
908: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
909: g_char := 'Submiting Preview Report.';
910: fnd_file.put_line (FND_FILE.LOG, g_char);
911: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, g_char);
912: END IF;
913:
914: l_request_id := FND_REQUEST.SUBMIT_REQUEST('OFA',

Line 929: FND_FILE.PUT_LINE(FND_FILE.log,'CONC-REQUEST SUBMISSION FAILED');

925: '','','','','','','','','','',
926: '','','','','','','','','','');
927:
928: IF l_request_id = 0 THEN
929: FND_FILE.PUT_LINE(FND_FILE.log,'CONC-REQUEST SUBMISSION FAILED');
930: ELSE
931: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
932: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);
933: l_message_text := FND_MESSAGE.GET;

Line 934: FND_FILE.PUT_LINE(FND_FILE.log, l_message_text);

930: ELSE
931: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
932: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);
933: l_message_text := FND_MESSAGE.GET;
934: FND_FILE.PUT_LINE(FND_FILE.log, l_message_text);
935: END IF;
936:
937: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
938: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');

Line 1008: fnd_file.put(FND_FILE.LOG,'+');

1004: COMMIT;
1005: --------------------------------------------------------------
1006: -- Will notify the user records processed --
1007: --------------------------------------------------------------
1008: fnd_file.put(FND_FILE.LOG,'+');
1009: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1010: fnd_file.put(FND_FILE.LOG,'+');
1011: fnd_file.put_line( FND_FILE.LOG, '');
1012: IF g_total_records > 0 THEN

Line 1009: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));

1005: --------------------------------------------------------------
1006: -- Will notify the user records processed --
1007: --------------------------------------------------------------
1008: fnd_file.put(FND_FILE.LOG,'+');
1009: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1010: fnd_file.put(FND_FILE.LOG,'+');
1011: fnd_file.put_line( FND_FILE.LOG, '');
1012: IF g_total_records > 0 THEN
1013: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');

Line 1010: fnd_file.put(FND_FILE.LOG,'+');

1006: -- Will notify the user records processed --
1007: --------------------------------------------------------------
1008: fnd_file.put(FND_FILE.LOG,'+');
1009: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1010: fnd_file.put(FND_FILE.LOG,'+');
1011: fnd_file.put_line( FND_FILE.LOG, '');
1012: IF g_total_records > 0 THEN
1013: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1014: fnd_message.set_token('OPTION', g_total_records);

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

1007: --------------------------------------------------------------
1008: fnd_file.put(FND_FILE.LOG,'+');
1009: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1010: fnd_file.put(FND_FILE.LOG,'+');
1011: fnd_file.put_line( FND_FILE.LOG, '');
1012: IF g_total_records > 0 THEN
1013: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1014: fnd_message.set_token('OPTION', g_total_records);
1015: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);

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

1011: fnd_file.put_line( FND_FILE.LOG, '');
1012: IF g_total_records > 0 THEN
1013: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1014: fnd_message.set_token('OPTION', g_total_records);
1015: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1016: fnd_file.put_line( FND_FILE.LOG, '');
1017: ELSE
1018: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1019: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);

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

1012: IF g_total_records > 0 THEN
1013: fnd_message.set_name('JL', 'JL_CO_FA_PURGE_MESG');
1014: fnd_message.set_token('OPTION', g_total_records);
1015: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1016: fnd_file.put_line( FND_FILE.LOG, '');
1017: ELSE
1018: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1019: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1020: END IF;

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

1015: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1016: fnd_file.put_line( FND_FILE.LOG, '');
1017: ELSE
1018: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1019: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1020: END IF;
1021: fnd_file.put(FND_FILE.LOG,'+');
1022: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1023: fnd_file.put(FND_FILE.LOG,'+');

Line 1021: fnd_file.put(FND_FILE.LOG,'+');

1017: ELSE
1018: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1019: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1020: END IF;
1021: fnd_file.put(FND_FILE.LOG,'+');
1022: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1023: fnd_file.put(FND_FILE.LOG,'+');
1024: fnd_file.put_line( FND_FILE.LOG, '');
1025: retcode := 0; -- Return normal status

Line 1022: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));

1018: fnd_message.set_name('JL', 'JL_CO_FA_NOTHING_TO_PROCESS');
1019: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1020: END IF;
1021: fnd_file.put(FND_FILE.LOG,'+');
1022: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1023: fnd_file.put(FND_FILE.LOG,'+');
1024: fnd_file.put_line( FND_FILE.LOG, '');
1025: retcode := 0; -- Return normal status
1026:

Line 1023: fnd_file.put(FND_FILE.LOG,'+');

1019: fnd_file.put_line( FND_FILE.LOG, fnd_message.get);
1020: END IF;
1021: fnd_file.put(FND_FILE.LOG,'+');
1022: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1023: fnd_file.put(FND_FILE.LOG,'+');
1024: fnd_file.put_line( FND_FILE.LOG, '');
1025: retcode := 0; -- Return normal status
1026:
1027:

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

1020: END IF;
1021: fnd_file.put(FND_FILE.LOG,'+');
1022: fnd_file.put(FND_FILE.LOG,LPAD('-',75,'-'));
1023: fnd_file.put(FND_FILE.LOG,'+');
1024: fnd_file.put_line( FND_FILE.LOG, '');
1025: retcode := 0; -- Return normal status
1026:
1027:
1028: EXCEPTION

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

1028: EXCEPTION
1029: WHEN TOO_MANY_COSTS THEN
1030: retcode := '2';
1031: fnd_message.set_name ('JL', 'JL_AR_FA_PREV_ADJ_COST_NAVL');
1032: fnd_file.put_line (fnd_file.log, fnd_message.get);
1033: call_status := fnd_concurrent.set_completion_status('ERROR','');
1034: /*
1035: jl_zz_fa_utilities_pkg.raise_error ('JL'
1036: , 'JL_AR_FA_PREV_ADJ_COST_NAVL', 'APP');

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

1038: WHEN OTHERS THEN
1039: retcode := '2';
1040: IF g_step = 'PRICE INDEX ID' THEN
1041: fnd_message.set_name ('JL', 'JL_AR_FA_INDX_NOT_DEF_FOR_CATG');
1042: fnd_file.put_line (fnd_file.log, fnd_message.get);
1043: call_status := fnd_concurrent.set_completion_status('ERROR','');
1044: /*
1045: jl_zz_fa_utilities_pkg.raise_error ('JL'
1046: , 'JL_AR_FA_INDX_NOT_DEF_FOR_CATG', 'APP');

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

1046: , 'JL_AR_FA_INDX_NOT_DEF_FOR_CATG', 'APP');
1047: */
1048: ELSIF g_step = 'PREVIOUS PERIOD' THEN
1049: fnd_message.set_name ('JL', 'JL_AR_FA_PERIODS_NOT_DEF_SEQUN');
1050: fnd_file.put_line (fnd_file.log, fnd_message.get);
1051: call_status := fnd_concurrent.set_completion_status('ERROR','');
1052: /*
1053: jl_zz_fa_utilities_pkg.raise_error ('JL'
1054: , 'JL_AR_FA_PERIODS_NOT_DEF_SEQUN', 'APP');

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

1054: , 'JL_AR_FA_PERIODS_NOT_DEF_SEQUN', 'APP');
1055: */
1056: ELSIF g_step = 'MISSING PERIOD' THEN
1057: fnd_message.set_name ('JL', 'JL_AR_FA_DEPRN_PERIOD_NOT_OPEN');
1058: fnd_file.put_line (fnd_file.log, fnd_message.get);
1059: call_status := fnd_concurrent.set_completion_status('ERROR','');
1060: /*
1061: jl_zz_fa_utilities_pkg.raise_error ('JL'
1062: , 'JL_AR_FA_DEPRN_PERIOD_NOT_OPEN', 'APP');

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

1062: , 'JL_AR_FA_DEPRN_PERIOD_NOT_OPEN', 'APP');
1063: */
1064: ELSIF g_step = 'PRICE INDEX VALUE' THEN
1065: fnd_message.set_name ('JL', 'JL_AR_FA_CURR_INDX_VAL_NOT_DEF');
1066: fnd_file.put_line (fnd_file.log, fnd_message.get);
1067: call_status := fnd_concurrent.set_completion_status('ERROR','');
1068: /*
1069: jl_zz_fa_utilities_pkg.raise_error ('JL'
1070: , 'JL_AR_FA_CURR_INDX_VAL_NOT_DEF', 'APP');