18:
19: -- TYPES
20: -- globals / constants
21:
22: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
23:
24: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
20: -- globals / constants
21:
22: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
23:
24: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
21:
22: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
23:
24: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
22: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
23:
24: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
23:
24: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
31: G_MODULE_NAME CONSTANT VARCHAR2(50):= 'fa.plsql.fa_xla_extract_trx_pkg.';
24: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
31: G_MODULE_NAME CONSTANT VARCHAR2(50):= 'fa.plsql.fa_xla_extract_trx_pkg.';
32:
25: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
31: G_MODULE_NAME CONSTANT VARCHAR2(50):= 'fa.plsql.fa_xla_extract_trx_pkg.';
32:
33:
52:
53: BEGIN
54:
55: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
56: fnd_log.string(G_LEVEL_PROCEDURE,
57: G_MODULE_NAME||l_procedure_name||'.begin',
58: 'Beginning of procedure');
59: END IF;
60:
90: AND dp.period_counter = ctlgd.source_id_int_2 ;
91:
92:
93: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
94: fnd_log.string(G_LEVEL_PROCEDURE,
95: G_MODULE_NAME||l_procedure_name,
96: 'Rows inserted into headers: ' || to_char(SQL%ROWCOUNT));
97: END IF;
98:
98:
99:
100:
101: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
102: fnd_log.string(G_LEVEL_PROCEDURE,
103: G_MODULE_NAME||l_procedure_name||'.end',
104: 'End of procedure');
105: END IF;
106:
108: WHEN others THEN
109: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
110: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
111: fnd_message.set_token('ORACLE_ERR',SQLERRM);
112: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
113: END IF;
114: raise;
115:
116: end load_header_data;
130:
131: BEGIN
132:
133: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
134: fnd_log.string(G_LEVEL_PROCEDURE,
135: G_MODULE_NAME||l_procedure_name||'.begin',
136: 'Beginning of procedure');
137: END IF;
138:
192: AND bc.book_type_code = ctlgd.source_id_char_1
193: AND le.ledger_id = bc.set_of_books_id ;
194:
195: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
196: fnd_log.string(G_LEVEL_PROCEDURE,
197: G_MODULE_NAME||l_procedure_name,
198: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
199: END IF;
200:
263: end if;
264:
265:
266: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
267: fnd_log.string(G_LEVEL_PROCEDURE,
268: G_MODULE_NAME||l_procedure_name,
269: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
270: END IF;
271:
271:
272:
273:
274: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
275: fnd_log.string(G_LEVEL_PROCEDURE,
276: G_MODULE_NAME||l_procedure_name||'.end',
277: 'End of procedure');
278: END IF;
279:
281: WHEN others THEN
282: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
283: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
284: fnd_message.set_token('ORACLE_ERR',SQLERRM);
285: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
286: END IF;
287: raise;
288:
289: end load_line_data;
303:
304: BEGIN
305:
306: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
307: fnd_log.string(G_LEVEL_PROCEDURE,
308: G_MODULE_NAME||l_procedure_name||'.begin',
309: 'Beginning of procedure');
310: END IF;
311:
311:
312: return;
313:
314: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
315: fnd_log.string(G_LEVEL_PROCEDURE,
316: G_MODULE_NAME||l_procedure_name,
317: 'Rows inserted into mls: ' || to_char(SQL%ROWCOUNT));
318: END IF;
319:
319:
320:
321:
322: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
323: fnd_log.string(G_LEVEL_PROCEDURE,
324: G_MODULE_NAME||l_procedure_name||'.end',
325: 'End of procedure');
326: END IF;
327:
329: WHEN others THEN
330: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
331: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
332: fnd_message.set_token('ORACLE_ERR',SQLERRM);
333: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
334: END IF;
335: raise;
336:
337: end load_mls_data;
412:
413: BEGIN
414:
415: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
416: fnd_log.string(G_LEVEL_PROCEDURE,
417: G_MODULE_NAME||l_procedure_name||'.begin',
418: 'Beginning of procedure');
419: END IF;
420:
500:
501: --
502:
503: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
504: fnd_log.string(G_LEVEL_PROCEDURE,
505: G_MODULE_NAME||l_procedure_name||'.end',
506: 'End of procedure');
507: END IF;
508:
510: WHEN others THEN
511: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
512: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
513: fnd_message.set_token('ORACLE_ERR',SQLERRM);
514: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
515: END IF;
516: raise;
517:
518: END load_generated_ccids;
538:
539: BEGIN
540:
541: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
542: fnd_log.string(G_LEVEL_PROCEDURE,
543: G_MODULE_NAME||l_procedure_name||'.begin',
544: 'Beginning of procedure');
545: END IF;
546:
567:
568:
569:
570: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
571: fnd_log.string(G_LEVEL_PROCEDURE,
572: G_MODULE_NAME||l_procedure_name||'.end',
573: 'End of procedure');
574: END IF;
575:
575:
576: EXCEPTION
577: WHEN error_found THEN
578: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
579: FND_LOG.string (G_LEVEL_ERROR,
580: G_MODULE_NAME||l_procedure_name,
581: 'ended in error');
582: END IF;
583: raise;
585: WHEN others THEN
586: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
587: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
588: fnd_message.set_token('ORACLE_ERR',SQLERRM);
589: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
590: END IF;
591: raise;
592:
593: END load_data;