105: EXCEPTION
106:
107: WHEN UTL_FILE.INVALID_PATH THEN
108:
109: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_PATH');
110: x_error_text := SUBSTR(fnd_message.get, 1, 100);
111: app_exception.raise_exception (exception_type => 'APP',
112: exception_code =>
113: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_PATH'),
106:
107: WHEN UTL_FILE.INVALID_PATH THEN
108:
109: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_PATH');
110: x_error_text := SUBSTR(fnd_message.get, 1, 100);
111: app_exception.raise_exception (exception_type => 'APP',
112: exception_code =>
113: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_PATH'),
114: exception_text => x_error_text);
114: exception_text => x_error_text);
115:
116: WHEN UTL_FILE.INVALID_MODE THEN
117:
118: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_MODE');
119: x_error_text := SUBSTR(fnd_message.get, 1, 100);
120: app_exception.raise_exception (exception_type => 'APP',
121: exception_code =>
122: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_MODE'),
115:
116: WHEN UTL_FILE.INVALID_MODE THEN
117:
118: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_MODE');
119: x_error_text := SUBSTR(fnd_message.get, 1, 100);
120: app_exception.raise_exception (exception_type => 'APP',
121: exception_code =>
122: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_MODE'),
123: exception_text => x_error_text);
123: exception_text => x_error_text);
124:
125: WHEN UTL_FILE.WRITE_ERROR THEN
126:
127: fnd_message.set_name('JL', 'JL_CO_GL_MG_WRITE_ERROR');
128: x_error_text := SUBSTR(fnd_message.get, 1, 100);
129: app_exception.raise_exception (exception_type => 'APP',
130: exception_code =>
131: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_WRITE_ERROR'),
124:
125: WHEN UTL_FILE.WRITE_ERROR THEN
126:
127: fnd_message.set_name('JL', 'JL_CO_GL_MG_WRITE_ERROR');
128: x_error_text := SUBSTR(fnd_message.get, 1, 100);
129: app_exception.raise_exception (exception_type => 'APP',
130: exception_code =>
131: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_WRITE_ERROR'),
132: exception_text => x_error_text);
132: exception_text => x_error_text);
133:
134: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
135:
136: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_FILEHANDLE');
137: x_error_text := SUBSTR(fnd_message.get, 1, 100);
138: app_exception.raise_exception (exception_type => 'APP',
139: exception_code =>
140: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_FILEHANDLE'),
133:
134: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
135:
136: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_FILEHANDLE');
137: x_error_text := SUBSTR(fnd_message.get, 1, 100);
138: app_exception.raise_exception (exception_type => 'APP',
139: exception_code =>
140: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_FILEHANDLE'),
141: exception_text => x_error_text);
141: exception_text => x_error_text);
142:
143: WHEN UTL_FILE.INVALID_OPERATION THEN
144:
145: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_OPERATION');
146: x_error_text := SUBSTR(fnd_message.get, 1, 100);
147: app_exception.raise_exception (exception_type => 'APP',
148: exception_code =>
149: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_OPERATION'),
142:
143: WHEN UTL_FILE.INVALID_OPERATION THEN
144:
145: fnd_message.set_name('JL', 'JL_CO_GL_MG_INVALID_OPERATION');
146: x_error_text := SUBSTR(fnd_message.get, 1, 100);
147: app_exception.raise_exception (exception_type => 'APP',
148: exception_code =>
149: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_INVALID_OPERATION'),
150: exception_text => x_error_text);
150: exception_text => x_error_text);
151:
152: WHEN OTHERS THEN
153:
154: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
155: x_error_text := SUBSTR(fnd_message.get, 1, 100);
156: ROLLBACK;
157: app_exception.raise_exception (exception_type => 'APP',
158: exception_code =>
151:
152: WHEN OTHERS THEN
153:
154: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
155: x_error_text := SUBSTR(fnd_message.get, 1, 100);
156: ROLLBACK;
157: app_exception.raise_exception (exception_type => 'APP',
158: exception_code =>
159: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_FA_GENERAL_ERROR'),
190: EXCEPTION
191:
192: WHEN NO_DATA_FOUND THEN
193:
194: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
195: fnd_message.set_token('GENERIC_TEXT',
196: 'Exception "NO_DATA_FOUND" for selection of nit information from JL_CO_GL_NITS table');
197: x_error_text := SUBSTR(fnd_message.get, 1, 100);
198: app_exception.raise_exception (exception_type => 'APP',
191:
192: WHEN NO_DATA_FOUND THEN
193:
194: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
195: fnd_message.set_token('GENERIC_TEXT',
196: 'Exception "NO_DATA_FOUND" for selection of nit information from JL_CO_GL_NITS table');
197: x_error_text := SUBSTR(fnd_message.get, 1, 100);
198: app_exception.raise_exception (exception_type => 'APP',
199: exception_code =>
193:
194: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
195: fnd_message.set_token('GENERIC_TEXT',
196: 'Exception "NO_DATA_FOUND" for selection of nit information from JL_CO_GL_NITS table');
197: x_error_text := SUBSTR(fnd_message.get, 1, 100);
198: app_exception.raise_exception (exception_type => 'APP',
199: exception_code =>
200: jl_zz_fa_utilities_pkg.get_app_errnum('AR', 'GENERIC_MESSAGE'),
201: exception_text => x_error_text);
201: exception_text => x_error_text);
202:
203: WHEN OTHERS THEN
204:
205: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
206: fnd_message.set_token('GENERIC_TEXT',
207: 'Exception "OTHERS" for selection of nit information from JL_CO_GL_NITS table');
208: x_error_text := SUBSTR(fnd_message.get, 1, 100);
209: app_exception.raise_exception (exception_type => 'APP',
202:
203: WHEN OTHERS THEN
204:
205: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
206: fnd_message.set_token('GENERIC_TEXT',
207: 'Exception "OTHERS" for selection of nit information from JL_CO_GL_NITS table');
208: x_error_text := SUBSTR(fnd_message.get, 1, 100);
209: app_exception.raise_exception (exception_type => 'APP',
210: exception_code =>
204:
205: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
206: fnd_message.set_token('GENERIC_TEXT',
207: 'Exception "OTHERS" for selection of nit information from JL_CO_GL_NITS table');
208: x_error_text := SUBSTR(fnd_message.get, 1, 100);
209: app_exception.raise_exception (exception_type => 'APP',
210: exception_code =>
211: jl_zz_fa_utilities_pkg.get_app_errnum('AR', 'GENERIC_MESSAGE'),
212: exception_text => x_error_text);
384: EXCEPTION
385:
386: WHEN OTHERS THEN
387:
388: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
389: fnd_message.set_token('GENERIC_TEXT',
390: 'Exception "OTHERS" while inserting into jl_co_gl_mg_lines table');
391: x_error_text := SUBSTR(fnd_message.get, 1, 100);
392: ROLLBACK;
385:
386: WHEN OTHERS THEN
387:
388: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
389: fnd_message.set_token('GENERIC_TEXT',
390: 'Exception "OTHERS" while inserting into jl_co_gl_mg_lines table');
391: x_error_text := SUBSTR(fnd_message.get, 1, 100);
392: ROLLBACK;
393: app_exception.raise_exception (exception_type => 'APP',
387:
388: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
389: fnd_message.set_token('GENERIC_TEXT',
390: 'Exception "OTHERS" while inserting into jl_co_gl_mg_lines table');
391: x_error_text := SUBSTR(fnd_message.get, 1, 100);
392: ROLLBACK;
393: app_exception.raise_exception (exception_type => 'APP',
394: exception_code =>
395: jl_zz_fa_utilities_pkg.get_app_errnum('AR', 'GENERIC_MESSAGE'),
662:
663: x_trx_count := 0;
664: x_bal_count := 0;
665:
666: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
667: fnd_file.put_line( fnd_file.log, fnd_message.get);
668: fnd_file.put_line(fnd_file.log, '----------------------------------------');
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
663: x_trx_count := 0;
664: x_bal_count := 0;
665:
666: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
667: fnd_file.put_line( fnd_file.log, fnd_message.get);
668: fnd_file.put_line(fnd_file.log, '----------------------------------------');
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
665:
666: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
667: fnd_file.put_line( fnd_file.log, fnd_message.get);
668: fnd_file.put_line(fnd_file.log, '----------------------------------------');
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
666: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
667: fnd_file.put_line( fnd_file.log, fnd_message.get);
668: fnd_file.put_line(fnd_file.log, '----------------------------------------');
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
667: fnd_file.put_line( fnd_file.log, fnd_message.get);
668: fnd_file.put_line(fnd_file.log, '----------------------------------------');
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
668: fnd_file.put_line(fnd_file.log, '----------------------------------------');
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
669: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
670: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
671: put_line( fnd_file.log, fnd_message.get);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
672: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
673: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
674: put_line( fnd_file.log, fnd_message.get);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
675: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_START');
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
676: fnd_message.set_token('PERIOD_START', p_period_start);
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
677: put_line( fnd_file.log, fnd_message.get);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
685: fnd_message.set_token('LITERAL_END', p_literal_end);
678: fnd_message.set_name('JL', 'JL_CO_GL_MG_PERIOD_END');
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
685: fnd_message.set_token('LITERAL_END', p_literal_end);
686: put_line( fnd_file.log, fnd_message.get);
679: fnd_message.set_token('PERIOD_END', p_period_end);
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
685: fnd_message.set_token('LITERAL_END', p_literal_end);
686: put_line( fnd_file.log, fnd_message.get);
687: fnd_file.put_line(fnd_file.log, '----------------------------------------');
680: put_line( fnd_file.log, fnd_message.get);
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
685: fnd_message.set_token('LITERAL_END', p_literal_end);
686: put_line( fnd_file.log, fnd_message.get);
687: fnd_file.put_line(fnd_file.log, '----------------------------------------');
688:
681: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
685: fnd_message.set_token('LITERAL_END', p_literal_end);
686: put_line( fnd_file.log, fnd_message.get);
687: fnd_file.put_line(fnd_file.log, '----------------------------------------');
688:
689:
682: fnd_message.set_token('LITERAL_START', p_literal_start);
683: put_line( fnd_file.log, fnd_message.get);
684: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
685: fnd_message.set_token('LITERAL_END', p_literal_end);
686: put_line( fnd_file.log, fnd_message.get);
687: fnd_file.put_line(fnd_file.log, '----------------------------------------');
688:
689:
690: /******************************************************
739: AND origin = 'A';
740:
741: IF SQL%FOUND THEN
742: COMMIT;
743: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
744: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
745: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
746: put_line( fnd_file.log, fnd_message.get);
747: ELSE
740:
741: IF SQL%FOUND THEN
742: COMMIT;
743: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
744: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
745: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
746: put_line( fnd_file.log, fnd_message.get);
747: ELSE
748: NULL;
741: IF SQL%FOUND THEN
742: COMMIT;
743: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
744: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
745: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
746: put_line( fnd_file.log, fnd_message.get);
747: ELSE
748: NULL;
749: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
742: COMMIT;
743: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
744: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
745: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
746: put_line( fnd_file.log, fnd_message.get);
747: ELSE
748: NULL;
749: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
750: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
745: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
746: put_line( fnd_file.log, fnd_message.get);
747: ELSE
748: NULL;
749: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
750: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
751: put_line( fnd_file.log, fnd_message.get);
752: END IF;
753:
746: put_line( fnd_file.log, fnd_message.get);
747: ELSE
748: NULL;
749: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
750: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
751: put_line( fnd_file.log, fnd_message.get);
752: END IF;
753:
754: EXCEPTION
747: ELSE
748: NULL;
749: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
750: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
751: put_line( fnd_file.log, fnd_message.get);
752: END IF;
753:
754: EXCEPTION
755:
771: );
772:
773: IF SQL%FOUND THEN
774: COMMIT;
775: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
776: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
777: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
778: put_line( fnd_file.log, fnd_message.get);
779: ELSE
772:
773: IF SQL%FOUND THEN
774: COMMIT;
775: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
776: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
777: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
778: put_line( fnd_file.log, fnd_message.get);
779: ELSE
780: NULL;
773: IF SQL%FOUND THEN
774: COMMIT;
775: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
776: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
777: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
778: put_line( fnd_file.log, fnd_message.get);
779: ELSE
780: NULL;
781: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
774: COMMIT;
775: fnd_message.set_name('JL', 'JL_CO_GL_MG_DELETE');
776: fnd_message.set_token('NUMBER', TO_CHAR(SQL%ROWCOUNT));
777: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
778: put_line( fnd_file.log, fnd_message.get);
779: ELSE
780: NULL;
781: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
782: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
777: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
778: put_line( fnd_file.log, fnd_message.get);
779: ELSE
780: NULL;
781: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
782: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
783: put_line( fnd_file.log, fnd_message.get);
784: END IF;
785:
778: put_line( fnd_file.log, fnd_message.get);
779: ELSE
780: NULL;
781: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
782: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
783: put_line( fnd_file.log, fnd_message.get);
784: END IF;
785:
786: EXCEPTION
779: ELSE
780: NULL;
781: fnd_message.set_name('JL', 'JL_CO_GL_MG_NOT_DELETE');
782: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
783: put_line( fnd_file.log, fnd_message.get);
784: END IF;
785:
786: EXCEPTION
787:
837: );
838:
839: COMMIT;
840:
841: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
842: fnd_message.set_token('NUMBER', '1');
843: fnd_message.set_token('TYPE', ' ');
844: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
845: put_line( fnd_file.log, fnd_message.get);
838:
839: COMMIT;
840:
841: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
842: fnd_message.set_token('NUMBER', '1');
843: fnd_message.set_token('TYPE', ' ');
844: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
845: put_line( fnd_file.log, fnd_message.get);
846:
839: COMMIT;
840:
841: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
842: fnd_message.set_token('NUMBER', '1');
843: fnd_message.set_token('TYPE', ' ');
844: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
845: put_line( fnd_file.log, fnd_message.get);
846:
847: EXCEPTION
840:
841: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
842: fnd_message.set_token('NUMBER', '1');
843: fnd_message.set_token('TYPE', ' ');
844: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
845: put_line( fnd_file.log, fnd_message.get);
846:
847: EXCEPTION
848:
841: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
842: fnd_message.set_token('NUMBER', '1');
843: fnd_message.set_token('TYPE', ' ');
844: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_HEADERS');
845: put_line( fnd_file.log, fnd_message.get);
846:
847: EXCEPTION
848:
849: WHEN OTHERS THEN
847: EXCEPTION
848:
849: WHEN OTHERS THEN
850:
851: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
852: fnd_message.set_token('GENERIC_TEXT',
853: 'Exception "OTHERS" while inserting into jl_co_gl_mg_headers table');
854: x_error_text := SUBSTR(fnd_message.get, 1, 100);
855: ROLLBACK;
848:
849: WHEN OTHERS THEN
850:
851: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
852: fnd_message.set_token('GENERIC_TEXT',
853: 'Exception "OTHERS" while inserting into jl_co_gl_mg_headers table');
854: x_error_text := SUBSTR(fnd_message.get, 1, 100);
855: ROLLBACK;
856: app_exception.raise_exception (exception_type => 'APP',
850:
851: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
852: fnd_message.set_token('GENERIC_TEXT',
853: 'Exception "OTHERS" while inserting into jl_co_gl_mg_headers table');
854: x_error_text := SUBSTR(fnd_message.get, 1, 100);
855: ROLLBACK;
856: app_exception.raise_exception (exception_type => 'APP',
857: exception_code =>
858: jl_zz_fa_utilities_pkg.get_app_errnum('AR', 'GENERIC_MESSAGE'),
932: END LOOP;
933:
934: IF x_trx_count > 0 THEN
935:
936: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
937: fnd_message.set_token('NUMBER', TO_CHAR(x_trx_count));
938: fnd_message.set_token('TYPE', 'NIT_TRANSACTIONS');
939: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
940: put_line( fnd_file.log, fnd_message.get);
933:
934: IF x_trx_count > 0 THEN
935:
936: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
937: fnd_message.set_token('NUMBER', TO_CHAR(x_trx_count));
938: fnd_message.set_token('TYPE', 'NIT_TRANSACTIONS');
939: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
940: put_line( fnd_file.log, fnd_message.get);
941:
934: IF x_trx_count > 0 THEN
935:
936: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
937: fnd_message.set_token('NUMBER', TO_CHAR(x_trx_count));
938: fnd_message.set_token('TYPE', 'NIT_TRANSACTIONS');
939: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
940: put_line( fnd_file.log, fnd_message.get);
941:
942: END IF;
935:
936: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
937: fnd_message.set_token('NUMBER', TO_CHAR(x_trx_count));
938: fnd_message.set_token('TYPE', 'NIT_TRANSACTIONS');
939: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
940: put_line( fnd_file.log, fnd_message.get);
941:
942: END IF;
943:
936: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
937: fnd_message.set_token('NUMBER', TO_CHAR(x_trx_count));
938: fnd_message.set_token('TYPE', 'NIT_TRANSACTIONS');
939: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
940: put_line( fnd_file.log, fnd_message.get);
941:
942: END IF;
943:
944: IF x_bal_count > 0 THEN
942: END IF;
943:
944: IF x_bal_count > 0 THEN
945:
946: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
947: fnd_message.set_token('NUMBER', TO_CHAR(x_bal_count));
948: fnd_message.set_token('TYPE', 'NIT_BALANCES');
949: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
950: put_line( fnd_file.log, fnd_message.get);
943:
944: IF x_bal_count > 0 THEN
945:
946: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
947: fnd_message.set_token('NUMBER', TO_CHAR(x_bal_count));
948: fnd_message.set_token('TYPE', 'NIT_BALANCES');
949: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
950: put_line( fnd_file.log, fnd_message.get);
951:
944: IF x_bal_count > 0 THEN
945:
946: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
947: fnd_message.set_token('NUMBER', TO_CHAR(x_bal_count));
948: fnd_message.set_token('TYPE', 'NIT_BALANCES');
949: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
950: put_line( fnd_file.log, fnd_message.get);
951:
952: END IF;
945:
946: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
947: fnd_message.set_token('NUMBER', TO_CHAR(x_bal_count));
948: fnd_message.set_token('TYPE', 'NIT_BALANCES');
949: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
950: put_line( fnd_file.log, fnd_message.get);
951:
952: END IF;
953:
946: fnd_message.set_name('JL', 'JL_CO_GL_MG_INSERT');
947: fnd_message.set_token('NUMBER', TO_CHAR(x_bal_count));
948: fnd_message.set_token('TYPE', 'NIT_BALANCES');
949: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LINES');
950: put_line( fnd_file.log, fnd_message.get);
951:
952: END IF;
953:
954: IF x_trx_count = 0 AND x_bal_count = 0 THEN
981: WHEN HEADERS_STATUS_Y THEN
982:
983: x_message := '----***************** W A R N I N G **********************----';
984: put_line( fnd_file.log, x_message);
985: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
986: fnd_message.set_token('YEAR', p_reported_year);
987: x_error_text := fnd_message.get;
988: put_line( fnd_file.log, x_error_text);
989: x_error_text := SUBSTR(x_error_text, 1, 100);
982:
983: x_message := '----***************** W A R N I N G **********************----';
984: put_line( fnd_file.log, x_message);
985: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
986: fnd_message.set_token('YEAR', p_reported_year);
987: x_error_text := fnd_message.get;
988: put_line( fnd_file.log, x_error_text);
989: x_error_text := SUBSTR(x_error_text, 1, 100);
990: x_message := '----******************************************************----';
983: x_message := '----***************** W A R N I N G **********************----';
984: put_line( fnd_file.log, x_message);
985: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
986: fnd_message.set_token('YEAR', p_reported_year);
987: x_error_text := fnd_message.get;
988: put_line( fnd_file.log, x_error_text);
989: x_error_text := SUBSTR(x_error_text, 1, 100);
990: x_message := '----******************************************************----';
991: put_line( fnd_file.log, x_message);
995: exception_text => x_error_text);
996:
997: WHEN OTHERS THEN
998:
999: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1000: fnd_file.put_line( fnd_file.log, fnd_message.get);
1001: x_error_code := SQLCODE;
1002: x_error_text := SUBSTR(SQLERRM,1,200);
1003: ROLLBACK;
996:
997: WHEN OTHERS THEN
998:
999: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1000: fnd_file.put_line( fnd_file.log, fnd_message.get);
1001: x_error_code := SQLCODE;
1002: x_error_text := SUBSTR(SQLERRM,1,200);
1003: ROLLBACK;
1004: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1175:
1176:
1177: BEGIN <
1178:
1179: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1180: fnd_file.put_line( fnd_file.log, fnd_message.get);
1181: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1176:
1177: BEGIN <
1178:
1179: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1180: fnd_file.put_line( fnd_file.log, fnd_message.get);
1181: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1178:
1179: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1180: fnd_file.put_line( fnd_file.log, fnd_message.get);
1181: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1179: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1180: fnd_file.put_line( fnd_file.log, fnd_message.get);
1181: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1180: fnd_file.put_line( fnd_file.log, fnd_message.get);
1181: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1181: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1182: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1183: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1184: put_line( fnd_file.log, fnd_message.get);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1192: fnd_message.set_token('LITERAL_END', p_literal_end);
1185: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1192: fnd_message.set_token('LITERAL_END', p_literal_end);
1193: put_line( fnd_file.log, fnd_message.get);
1186: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1192: fnd_message.set_token('LITERAL_END', p_literal_end);
1193: put_line( fnd_file.log, fnd_message.get);
1194: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1187: put_line( fnd_file.log, fnd_message.get);
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1192: fnd_message.set_token('LITERAL_END', p_literal_end);
1193: put_line( fnd_file.log, fnd_message.get);
1194: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1195:
1188: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_START');
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1192: fnd_message.set_token('LITERAL_END', p_literal_end);
1193: put_line( fnd_file.log, fnd_message.get);
1194: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1195:
1196: /******************************************************
1189: fnd_message.set_token('LITERAL_START', p_literal_start);
1190: put_line( fnd_file.log, fnd_message.get);
1191: fnd_message.set_name('JL', 'JL_CO_GL_MG_LITERAL_END');
1192: fnd_message.set_token('LITERAL_END', p_literal_end);
1193: put_line( fnd_file.log, fnd_message.get);
1194: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1195:
1196: /******************************************************
1197: Check for JL_CO_GL_MG_HEADERS.STATUS = 'Y'. If any row
1253: EXCEPTION
1254:
1255: WHEN NO_DATA_FOUND THEN
1256:
1257: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1258: fnd_message.set_token('GENERIC_TEXT',
1259: 'Exception "NO_DATA_FOUND" for selection of flags from JL_CO_GL_MG_LITERALS table');
1260: put_line(fnd_file.log, fnd_message.get);
1261: x_error_code := SQLCODE;
1254:
1255: WHEN NO_DATA_FOUND THEN
1256:
1257: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1258: fnd_message.set_token('GENERIC_TEXT',
1259: 'Exception "NO_DATA_FOUND" for selection of flags from JL_CO_GL_MG_LITERALS table');
1260: put_line(fnd_file.log, fnd_message.get);
1261: x_error_code := SQLCODE;
1262: x_error_text := SUBSTR(SQLERRM,1,200);
1256:
1257: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1258: fnd_message.set_token('GENERIC_TEXT',
1259: 'Exception "NO_DATA_FOUND" for selection of flags from JL_CO_GL_MG_LITERALS table');
1260: put_line(fnd_file.log, fnd_message.get);
1261: x_error_code := SQLCODE;
1262: x_error_text := SUBSTR(SQLERRM,1,200);
1263: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1264:
1263: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1264:
1265: WHEN TOO_MANY_ROWS THEN
1266:
1267: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1268: fnd_message.set_token('GENERIC_TEXT',
1269: 'Exception "TOO_MANY_ROWS" for selection of flags from JL_CO_GL_MG_LITERALS table');
1270: put_line(fnd_file.log, fnd_message.get);
1271: x_error_code := SQLCODE;
1264:
1265: WHEN TOO_MANY_ROWS THEN
1266:
1267: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1268: fnd_message.set_token('GENERIC_TEXT',
1269: 'Exception "TOO_MANY_ROWS" for selection of flags from JL_CO_GL_MG_LITERALS table');
1270: put_line(fnd_file.log, fnd_message.get);
1271: x_error_code := SQLCODE;
1272: x_error_text := SUBSTR(SQLERRM,1,200);
1266:
1267: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1268: fnd_message.set_token('GENERIC_TEXT',
1269: 'Exception "TOO_MANY_ROWS" for selection of flags from JL_CO_GL_MG_LITERALS table');
1270: put_line(fnd_file.log, fnd_message.get);
1271: x_error_code := SQLCODE;
1272: x_error_text := SUBSTR(SQLERRM,1,200);
1273: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1274:
1273: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1274:
1275: WHEN OTHERS THEN
1276:
1277: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1278: fnd_message.set_token('GENERIC_TEXT',
1279: 'Exception "OTHERS" for selection of flags from JL_CO_GL_MG_LITERALS table');
1280: put_line(fnd_file.log, fnd_message.get);
1281: x_error_code := SQLCODE;
1274:
1275: WHEN OTHERS THEN
1276:
1277: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1278: fnd_message.set_token('GENERIC_TEXT',
1279: 'Exception "OTHERS" for selection of flags from JL_CO_GL_MG_LITERALS table');
1280: put_line(fnd_file.log, fnd_message.get);
1281: x_error_code := SQLCODE;
1282: x_error_text := SUBSTR(SQLERRM,1,200);
1276:
1277: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1278: fnd_message.set_token('GENERIC_TEXT',
1279: 'Exception "OTHERS" for selection of flags from JL_CO_GL_MG_LITERALS table');
1280: put_line(fnd_file.log, fnd_message.get);
1281: x_error_code := SQLCODE;
1282: x_error_text := SUBSTR(SQLERRM,1,200);
1283: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1284:
1457: IF count_process_flag > 0 THEN
1458:
1459: x_message := '----***************** W A R N I N G **********************----';
1460: put_line( fnd_file.log, x_message);
1461: fnd_message.set_name('JL', 'JL_CO_GL_MG_TH_ALERT');
1462: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1463: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1464: x_error_text := fnd_message.get;
1465: put_line( fnd_file.log, x_error_text);
1458:
1459: x_message := '----***************** W A R N I N G **********************----';
1460: put_line( fnd_file.log, x_message);
1461: fnd_message.set_name('JL', 'JL_CO_GL_MG_TH_ALERT');
1462: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1463: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1464: x_error_text := fnd_message.get;
1465: put_line( fnd_file.log, x_error_text);
1466: x_error_text := SUBSTR(x_error_text, 1, 100);
1459: x_message := '----***************** W A R N I N G **********************----';
1460: put_line( fnd_file.log, x_message);
1461: fnd_message.set_name('JL', 'JL_CO_GL_MG_TH_ALERT');
1462: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1463: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1464: x_error_text := fnd_message.get;
1465: put_line( fnd_file.log, x_error_text);
1466: x_error_text := SUBSTR(x_error_text, 1, 100);
1467: x_message := '----******************************************************----';
1460: put_line( fnd_file.log, x_message);
1461: fnd_message.set_name('JL', 'JL_CO_GL_MG_TH_ALERT');
1462: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1463: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1464: x_error_text := fnd_message.get;
1465: put_line( fnd_file.log, x_error_text);
1466: x_error_text := SUBSTR(x_error_text, 1, 100);
1467: x_message := '----******************************************************----';
1468: put_line( fnd_file.log, x_message);
1478: WHEN HEADERS_STATUS_Y THEN
1479:
1480: x_message := '----***************** W A R N I N G **********************----';
1481: put_line( fnd_file.log, x_message);
1482: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
1483: fnd_message.set_token('YEAR', p_reported_year);
1484: x_error_text := fnd_message.get;
1485: put_line( fnd_file.log, x_error_text);
1486: x_error_text := SUBSTR(x_error_text, 1, 100);
1479:
1480: x_message := '----***************** W A R N I N G **********************----';
1481: put_line( fnd_file.log, x_message);
1482: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
1483: fnd_message.set_token('YEAR', p_reported_year);
1484: x_error_text := fnd_message.get;
1485: put_line( fnd_file.log, x_error_text);
1486: x_error_text := SUBSTR(x_error_text, 1, 100);
1487: x_message := '----******************************************************----';
1480: x_message := '----***************** W A R N I N G **********************----';
1481: put_line( fnd_file.log, x_message);
1482: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
1483: fnd_message.set_token('YEAR', p_reported_year);
1484: x_error_text := fnd_message.get;
1485: put_line( fnd_file.log, x_error_text);
1486: x_error_text := SUBSTR(x_error_text, 1, 100);
1487: x_message := '----******************************************************----';
1488: put_line( fnd_file.log, x_message);
1492: exception_text => x_error_text);
1493:
1494: WHEN OTHERS THEN
1495:
1496: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1497: fnd_file.put_line( fnd_file.log, fnd_message.get);
1498: x_error_code := SQLCODE;
1499: x_error_text := SUBSTR(SQLERRM,1,200);
1500: ROLLBACK;
1493:
1494: WHEN OTHERS THEN
1495:
1496: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1497: fnd_file.put_line( fnd_file.log, fnd_message.get);
1498: x_error_code := SQLCODE;
1499: x_error_text := SUBSTR(SQLERRM,1,200);
1500: ROLLBACK;
1501: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1585:
1586:
1587: BEGIN <
1588:
1589: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1590: fnd_file.put_line( fnd_file.log, fnd_message.get);
1591: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1586:
1587: BEGIN <
1588:
1589: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1590: fnd_file.put_line( fnd_file.log, fnd_message.get);
1591: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1588:
1589: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1590: fnd_file.put_line( fnd_file.log, fnd_message.get);
1591: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1589: fnd_message.set_name('FND', 'CONC-ARGUMENTS');
1590: fnd_file.put_line( fnd_file.log, fnd_message.get);
1591: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1590: fnd_file.put_line( fnd_file.log, fnd_message.get);
1591: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1591: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1592: fnd_message.set_name('JL', 'JL_CO_GL_MG_LEGAL_ENTITY_ID');
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1593: fnd_message.set_token('LEGAL_ENTITY_ID', p_legal_entity_id);
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1594: put_line( fnd_file.log, fnd_message.get);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1602: fnd_message.set_token('LABEL', p_label);
1595: fnd_message.set_name('JL', 'JL_CO_GL_MG_SET_OF_BOOKS_ID');
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1602: fnd_message.set_token('LABEL', p_label);
1603: put_line( fnd_file.log, fnd_message.get);
1596: fnd_message.set_token('SET_OF_BOOKS_ID', p_set_of_books_id);
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1602: fnd_message.set_token('LABEL', p_label);
1603: put_line( fnd_file.log, fnd_message.get);
1604: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1597: put_line( fnd_file.log, fnd_message.get);
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1602: fnd_message.set_token('LABEL', p_label);
1603: put_line( fnd_file.log, fnd_message.get);
1604: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1605:
1598: fnd_message.set_name('JL', 'JL_CO_GL_MG_REPORTED_YEAR');
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1602: fnd_message.set_token('LABEL', p_label);
1603: put_line( fnd_file.log, fnd_message.get);
1604: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1605:
1606:
1599: fnd_message.set_token('REPORTED_YEAR', p_reported_year);
1600: put_line( fnd_file.log, fnd_message.get);
1601: fnd_message.set_name('JL', 'JL_CO_GL_MG_LABEL');
1602: fnd_message.set_token('LABEL', p_label);
1603: put_line( fnd_file.log, fnd_message.get);
1604: fnd_file.put_line(fnd_file.log, '----------------------------------------');
1605:
1606:
1607: /******************************************************
1694: EXCEPTION
1695:
1696: WHEN NO_DATA_FOUND THEN
1697:
1698: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1699: fnd_message.set_token('GENERIC_TEXT',
1700: 'Exception "NO_DATA_FOUND" while selecting company information');
1701: put_line(fnd_file.log, fnd_message.get);
1702: x_error_code := SQLCODE;
1695:
1696: WHEN NO_DATA_FOUND THEN
1697:
1698: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1699: fnd_message.set_token('GENERIC_TEXT',
1700: 'Exception "NO_DATA_FOUND" while selecting company information');
1701: put_line(fnd_file.log, fnd_message.get);
1702: x_error_code := SQLCODE;
1703: x_error_text := SUBSTR(SQLERRM,1,200);
1697:
1698: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1699: fnd_message.set_token('GENERIC_TEXT',
1700: 'Exception "NO_DATA_FOUND" while selecting company information');
1701: put_line(fnd_file.log, fnd_message.get);
1702: x_error_code := SQLCODE;
1703: x_error_text := SUBSTR(SQLERRM,1,200);
1704: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1705:
1704: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1705:
1706: WHEN TOO_MANY_ROWS THEN
1707:
1708: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1709: fnd_message.set_token('GENERIC_TEXT',
1710: 'Exception "TOO_MANY_ROWS" while selecting company information');
1711: put_line(fnd_file.log, fnd_message.get);
1712: x_error_code := SQLCODE;
1705:
1706: WHEN TOO_MANY_ROWS THEN
1707:
1708: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1709: fnd_message.set_token('GENERIC_TEXT',
1710: 'Exception "TOO_MANY_ROWS" while selecting company information');
1711: put_line(fnd_file.log, fnd_message.get);
1712: x_error_code := SQLCODE;
1713: x_error_text := SUBSTR(SQLERRM,1,200);
1707:
1708: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1709: fnd_message.set_token('GENERIC_TEXT',
1710: 'Exception "TOO_MANY_ROWS" while selecting company information');
1711: put_line(fnd_file.log, fnd_message.get);
1712: x_error_code := SQLCODE;
1713: x_error_text := SUBSTR(SQLERRM,1,200);
1714: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1715:
1714: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1715:
1716: WHEN OTHERS THEN
1717:
1718: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1719: fnd_message.set_token('GENERIC_TEXT',
1720: 'Exception "OTHERS" while selecting company information');
1721: put_line(fnd_file.log, fnd_message.get);
1722: x_error_code := SQLCODE;
1715:
1716: WHEN OTHERS THEN
1717:
1718: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1719: fnd_message.set_token('GENERIC_TEXT',
1720: 'Exception "OTHERS" while selecting company information');
1721: put_line(fnd_file.log, fnd_message.get);
1722: x_error_code := SQLCODE;
1723: x_error_text := SUBSTR(SQLERRM,1,200);
1717:
1718: fnd_message.set_name('AR', 'GENERIC_MESSAGE');
1719: fnd_message.set_token('GENERIC_TEXT',
1720: 'Exception "OTHERS" while selecting company information');
1721: put_line(fnd_file.log, fnd_message.get);
1722: x_error_code := SQLCODE;
1723: x_error_text := SUBSTR(SQLERRM,1,200);
1724: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1725:
1826: **********************************************/
1827:
1828: put_line(fnd_file.output, identifi_register);
1829:
1830: fnd_message.set_name('JL', 'JL_CO_GL_MG_INDENTI_REGISTER');
1831: put_line( fnd_file.log, fnd_message.get);
1832:
1833: /****************************************
1834: Write movement_register to the flat file
1827:
1828: put_line(fnd_file.output, identifi_register);
1829:
1830: fnd_message.set_name('JL', 'JL_CO_GL_MG_INDENTI_REGISTER');
1831: put_line( fnd_file.log, fnd_message.get);
1832:
1833: /****************************************
1834: Write movement_register to the flat file
1835: ****************************************/
1843: put_line(fnd_file.output, movement_register);
1844:
1845: END LOOP;
1846:
1847: fnd_message.set_name('JL', 'JL_CO_GL_MG_MOVE_REGISTER');
1848: fnd_message.set_token('NUMBER', tab_record_counter);
1849: put_line( fnd_file.log, fnd_message.get);
1850:
1851: ELSE
1844:
1845: END LOOP;
1846:
1847: fnd_message.set_name('JL', 'JL_CO_GL_MG_MOVE_REGISTER');
1848: fnd_message.set_token('NUMBER', tab_record_counter);
1849: put_line( fnd_file.log, fnd_message.get);
1850:
1851: ELSE
1852:
1845: END LOOP;
1846:
1847: fnd_message.set_name('JL', 'JL_CO_GL_MG_MOVE_REGISTER');
1848: fnd_message.set_token('NUMBER', tab_record_counter);
1849: put_line( fnd_file.log, fnd_message.get);
1850:
1851: ELSE
1852:
1853: NULL;
1851: ELSE
1852:
1853: NULL;
1854:
1855: fnd_message.set_name('JL', 'JL_CO_GL_MG_NO_MOVE_REGISTER');
1856: x_message := fnd_message.get;
1857: put_line( fnd_file.log, x_message);
1858: put_line( fnd_file.output, x_message);
1859:
1852:
1853: NULL;
1854:
1855: fnd_message.set_name('JL', 'JL_CO_GL_MG_NO_MOVE_REGISTER');
1856: x_message := fnd_message.get;
1857: put_line( fnd_file.log, x_message);
1858: put_line( fnd_file.output, x_message);
1859:
1860: END IF;
1874: **************************************/
1875:
1876: put_line(fnd_file.output, closed_register);
1877:
1878: fnd_message.set_name('JL', 'JL_CO_GL_MG_CLOSE_REGISTER');
1879: put_line( fnd_file.log, fnd_message.get);
1880:
1881: /********************************************
1882: Update the jl_co_gl_mg_headers.status to 'Y'
1875:
1876: put_line(fnd_file.output, closed_register);
1877:
1878: fnd_message.set_name('JL', 'JL_CO_GL_MG_CLOSE_REGISTER');
1879: put_line( fnd_file.log, fnd_message.get);
1880:
1881: /********************************************
1882: Update the jl_co_gl_mg_headers.status to 'Y'
1883: for final generation is done for DIAN
1917: WHEN HEADERS_STATUS_Y THEN
1918:
1919: x_message := '----***************** W A R N I N G **********************----';
1920: put_line( fnd_file.log, x_message);
1921: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
1922: fnd_message.set_token('YEAR', p_reported_year);
1923: x_error_text := fnd_message.get;
1924: put_line( fnd_file.log, x_error_text);
1925: x_error_text := SUBSTR(x_error_text, 1, 100);
1918:
1919: x_message := '----***************** W A R N I N G **********************----';
1920: put_line( fnd_file.log, x_message);
1921: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
1922: fnd_message.set_token('YEAR', p_reported_year);
1923: x_error_text := fnd_message.get;
1924: put_line( fnd_file.log, x_error_text);
1925: x_error_text := SUBSTR(x_error_text, 1, 100);
1926: x_message := '----******************************************************----';
1919: x_message := '----***************** W A R N I N G **********************----';
1920: put_line( fnd_file.log, x_message);
1921: fnd_message.set_name('JL', 'JL_CO_GL_MG_FILE_SENT');
1922: fnd_message.set_token('YEAR', p_reported_year);
1923: x_error_text := fnd_message.get;
1924: put_line( fnd_file.log, x_error_text);
1925: x_error_text := SUBSTR(x_error_text, 1, 100);
1926: x_message := '----******************************************************----';
1927: put_line( fnd_file.log, x_message);
1934: WHEN MG_GENERAL_ALERT THEN
1935:
1936: x_message := '----***************** W A R N I N G **********************----';
1937: put_line( fnd_file.log, x_message);
1938: fnd_message.set_name('JL', 'JL_CO_GL_MG_GEN_ALERT');
1939: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1940: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1941: x_error_text := SUBSTR(fnd_message.get, 1, 200);
1942: put_line( fnd_file.log, x_error_text);
1935:
1936: x_message := '----***************** W A R N I N G **********************----';
1937: put_line( fnd_file.log, x_message);
1938: fnd_message.set_name('JL', 'JL_CO_GL_MG_GEN_ALERT');
1939: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1940: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1941: x_error_text := SUBSTR(fnd_message.get, 1, 200);
1942: put_line( fnd_file.log, x_error_text);
1943: x_error_text := SUBSTR(x_error_text, 1, 100);
1936: x_message := '----***************** W A R N I N G **********************----';
1937: put_line( fnd_file.log, x_message);
1938: fnd_message.set_name('JL', 'JL_CO_GL_MG_GEN_ALERT');
1939: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1940: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1941: x_error_text := SUBSTR(fnd_message.get, 1, 200);
1942: put_line( fnd_file.log, x_error_text);
1943: x_error_text := SUBSTR(x_error_text, 1, 100);
1944: x_message := '----******************************************************----';
1937: put_line( fnd_file.log, x_message);
1938: fnd_message.set_name('JL', 'JL_CO_GL_MG_GEN_ALERT');
1939: fnd_message.set_token('NUMBER', TO_CHAR(count_process_flag));
1940: fnd_message.set_token('TABLE', 'JL_CO_GL_MG_LITERALS');
1941: x_error_text := SUBSTR(fnd_message.get, 1, 200);
1942: put_line( fnd_file.log, x_error_text);
1943: x_error_text := SUBSTR(x_error_text, 1, 100);
1944: x_message := '----******************************************************----';
1945: put_line( fnd_file.log, x_message);
1949: exception_text => x_error_text);
1950:
1951: WHEN LOCATION_ID_DOES_NOT_EXIST THEN
1952:
1953: fnd_message.set_name('JL', 'JL_CO_GL_MG_NO_LOCATION_ID');
1954: x_error_text := SUBSTR(fnd_message.get, 1, 100);
1955: app_exception.raise_exception (exception_type => 'APP',
1956: exception_code =>
1957: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_NO_LOCATION_ID'),
1950:
1951: WHEN LOCATION_ID_DOES_NOT_EXIST THEN
1952:
1953: fnd_message.set_name('JL', 'JL_CO_GL_MG_NO_LOCATION_ID');
1954: x_error_text := SUBSTR(fnd_message.get, 1, 100);
1955: app_exception.raise_exception (exception_type => 'APP',
1956: exception_code =>
1957: jl_zz_fa_utilities_pkg.get_app_errnum('JL', 'JL_CO_GL_MG_NO_LOCATION_ID'),
1958: exception_text => x_error_text);
1958: exception_text => x_error_text);
1959:
1960: WHEN OTHERS THEN
1961:
1962: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1963: fnd_file.put_line( fnd_file.log, fnd_message.get);
1964: x_error_code := SQLCODE;
1965: x_error_text := SUBSTR(SQLERRM,1,200);
1966: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1959:
1960: WHEN OTHERS THEN
1961:
1962: fnd_message.set_name('JL', 'JL_CO_FA_GENERAL_ERROR');
1963: fnd_file.put_line( fnd_file.log, fnd_message.get);
1964: x_error_code := SQLCODE;
1965: x_error_text := SUBSTR(SQLERRM,1,200);
1966: RAISE_APPLICATION_ERROR( x_error_code, x_error_text);
1967: