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:
87: AND bc.book_type_code = ctlgd.source_id_char_1;
88:
89:
90: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
91: fnd_log.string(G_LEVEL_PROCEDURE,
92: G_MODULE_NAME||l_procedure_name,
93: 'Rows inserted into headers: ' || to_char(SQL%ROWCOUNT));
94: END IF;
95:
95:
96:
97:
98: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
99: fnd_log.string(G_LEVEL_PROCEDURE,
100: G_MODULE_NAME||l_procedure_name||'.end',
101: 'End of procedure');
102: END IF;
103:
105: WHEN others THEN
106: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
107: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
108: fnd_message.set_token('ORACLE_ERR',SQLERRM);
109: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
110: END IF;
111: raise;
112:
113: end load_header_data;
120:
121: BEGIN
122:
123: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
124: fnd_log.string(G_LEVEL_PROCEDURE,
125: G_MODULE_NAME||l_procedure_name||'.begin',
126: 'Beginning of procedure');
127: END IF;
128:
156: AND dp.period_counter = ds.period_counter;
157:
158:
159: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
160: fnd_log.string(G_LEVEL_PROCEDURE,
161: G_MODULE_NAME||l_procedure_name||'.end',
162: 'End of procedure');
163: END IF;
164:
166: WHEN others THEN
167: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
168: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
169: fnd_message.set_token('ORACLE_ERR',SQLERRM);
170: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
171: END IF;
172: raise;
173:
174: END Load_header_data_rb ;
188:
189: BEGIN
190:
191: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
192: fnd_log.string(G_LEVEL_PROCEDURE,
193: G_MODULE_NAME||l_procedure_name||'.begin',
194: 'Beginning of procedure');
195: END IF;
196:
287: AND bc.book_type_code = ctlgd.source_id_char_1
288: AND le.ledger_id = bc.set_of_books_id ;
289:
290: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
291: fnd_log.string(G_LEVEL_PROCEDURE,
292: G_MODULE_NAME||l_procedure_name,
293: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
294: END IF;
295:
395: end if;
396:
397:
398: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
399: fnd_log.string(G_LEVEL_PROCEDURE,
400: G_MODULE_NAME||l_procedure_name,
401: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
402: END IF;
403:
403:
404:
405:
406: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
407: fnd_log.string(G_LEVEL_PROCEDURE,
408: G_MODULE_NAME||l_procedure_name||'.end',
409: 'End of procedure');
410: END IF;
411:
413: WHEN others THEN
414: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
415: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
416: fnd_message.set_token('ORACLE_ERR',SQLERRM);
417: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
418: END IF;
419: raise;
420:
421: end load_line_data;
435:
436: BEGIN
437:
438: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
439: fnd_log.string(G_LEVEL_PROCEDURE,
440: G_MODULE_NAME||l_procedure_name||'.begin',
441: 'Beginning of procedure');
442: END IF;
443:
443:
444: return;
445:
446: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
447: fnd_log.string(G_LEVEL_PROCEDURE,
448: G_MODULE_NAME||l_procedure_name,
449: 'Rows inserted into mls: ' || to_char(SQL%ROWCOUNT));
450: END IF;
451:
451:
452:
453:
454: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
455: fnd_log.string(G_LEVEL_PROCEDURE,
456: G_MODULE_NAME||l_procedure_name||'.end',
457: 'End of procedure');
458: END IF;
459:
461: WHEN others THEN
462: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
463: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
464: fnd_message.set_token('ORACLE_ERR',SQLERRM);
465: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
466: END IF;
467: raise;
468:
469: end load_mls_data;
579:
580: BEGIN
581:
582: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
583: fnd_log.string(G_LEVEL_PROCEDURE,
584: G_MODULE_NAME||l_procedure_name||'.begin',
585: 'Beginning of procedure');
586: END IF;
587:
759:
760: --
761:
762: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
763: fnd_log.string(G_LEVEL_PROCEDURE,
764: G_MODULE_NAME||l_procedure_name||'.end',
765: 'End of procedure');
766: END IF;
767:
769: WHEN others THEN
770: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
771: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
772: fnd_message.set_token('ORACLE_ERR',SQLERRM);
773: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
774: END IF;
775: raise;
776:
777: END load_generated_ccids;
797:
798: BEGIN
799:
800: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
801: fnd_log.string(G_LEVEL_PROCEDURE,
802: G_MODULE_NAME||l_procedure_name||'.begin',
803: 'Beginning of procedure');
804: END IF;
805:
805:
806:
807: --
808: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
809: fnd_log.string(G_LEVEL_PROCEDURE,
810: G_MODULE_NAME||l_procedure_name||'.end',
811: 'End of procedure');
812: END IF;
813:
815: WHEN others THEN
816: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
817: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
818: fnd_message.set_token('ORACLE_ERR',SQLERRM);
819: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
820: END IF;
821: raise;
822:
823:
844:
845: BEGIN
846:
847: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
848: fnd_log.string(G_LEVEL_PROCEDURE,
849: G_MODULE_NAME||l_procedure_name||'.begin',
850: 'Beginning of procedure');
851: END IF;
852:
883:
884:
885:
886: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
887: fnd_log.string(G_LEVEL_PROCEDURE,
888: G_MODULE_NAME||l_procedure_name||'.end',
889: 'End of procedure');
890: END IF;
891:
891:
892: EXCEPTION
893: WHEN error_found THEN
894: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
895: FND_LOG.string (G_LEVEL_ERROR,
896: G_MODULE_NAME||l_procedure_name,
897: 'ended in error');
898: END IF;
899: raise;
901: WHEN others THEN
902: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
903: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
904: fnd_message.set_token('ORACLE_ERR',SQLERRM);
905: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
906: END IF;
907: raise;
908:
909: END load_data;