DBA Data[Home] [Help]

APPS.JL_ZZ_FA_REVAL_RULES_PKG dependencies on FND_FILE

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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