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:
128: nvl(dp.period_close_date, sysdate) ;
129:
130:
131: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
132: fnd_log.string(G_LEVEL_PROCEDURE,
133: G_MODULE_NAME||l_procedure_name,
134: 'Rows inserted into headers: ' || to_char(SQL%ROWCOUNT));
135: END IF;
136:
136:
137:
138:
139: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
140: fnd_log.string(G_LEVEL_PROCEDURE,
141: G_MODULE_NAME||l_procedure_name||'.end',
142: 'End of procedure');
143: END IF;
144:
146: WHEN others THEN
147: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
148: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
149: fnd_message.set_token('ORACLE_ERR',SQLERRM);
150: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
151: END IF;
152: raise;
153:
154: end load_header_data_stg1;
168:
169: BEGIN
170:
171: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
172: fnd_log.string(G_LEVEL_PROCEDURE,
173: G_MODULE_NAME||l_procedure_name||'.begin',
174: 'Beginning of procedure');
175: END IF;
176:
214: nvl(dp.period_close_date, sysdate) ;
215:
216:
217: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
218: fnd_log.string(G_LEVEL_PROCEDURE,
219: G_MODULE_NAME||l_procedure_name,
220: 'Rows inserted into headers: ' || to_char(SQL%ROWCOUNT));
221: END IF;
222:
222:
223:
224:
225: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
226: fnd_log.string(G_LEVEL_PROCEDURE,
227: G_MODULE_NAME||l_procedure_name||'.end',
228: 'End of procedure');
229: END IF;
230:
232: WHEN others THEN
233: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
234: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
235: fnd_message.set_token('ORACLE_ERR',SQLERRM);
236: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
237: END IF;
238: raise;
239:
240: end load_header_data_stg2;
254:
255: BEGIN
256:
257: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
258: fnd_log.string(G_LEVEL_PROCEDURE,
259: G_MODULE_NAME||l_procedure_name||'.begin',
260: 'Beginning of procedure');
261: END IF;
262:
359: AND ad.asset_type in ('CAPITALIZED', 'CIP', 'GROUP') ;
360:
361:
362: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
363: fnd_log.string(G_LEVEL_PROCEDURE,
364: G_MODULE_NAME||l_procedure_name,
365: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
366: END IF;
367:
367:
368:
369:
370: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
371: fnd_log.string(G_LEVEL_PROCEDURE,
372: G_MODULE_NAME||l_procedure_name||'.end',
373: 'End of procedure');
374: END IF;
375:
377: WHEN others THEN
378: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
379: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
380: fnd_message.set_token('ORACLE_ERR',SQLERRM);
381: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
382: END IF;
383: raise;
384:
385: end load_line_data_stg1;
399:
400: BEGIN
401:
402: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
403: fnd_log.string(G_LEVEL_PROCEDURE,
404: G_MODULE_NAME||l_procedure_name||'.begin',
405: 'Beginning of procedure');
406: END IF;
407:
495: AND ad.asset_type in ('CAPITALIZED', 'CIP', 'GROUP') ;
496:
497:
498: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
499: fnd_log.string(G_LEVEL_PROCEDURE,
500: G_MODULE_NAME||l_procedure_name,
501: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
502: END IF;
503:
591: AND ad.asset_type in ('GROUP') ;
592:
593:
594: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
595: fnd_log.string(G_LEVEL_PROCEDURE,
596: G_MODULE_NAME||l_procedure_name,
597: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
598: END IF;
599:
599:
600:
601:
602: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
603: fnd_log.string(G_LEVEL_PROCEDURE,
604: G_MODULE_NAME||l_procedure_name||'.end',
605: 'End of procedure');
606: END IF;
607:
609: WHEN others THEN
610: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
611: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
612: fnd_message.set_token('ORACLE_ERR',SQLERRM);
613: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
614: END IF;
615: raise;
616:
617: end load_line_data_stg2;
631:
632: BEGIN
633:
634: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
635: fnd_log.string(G_LEVEL_PROCEDURE,
636: G_MODULE_NAME||l_procedure_name||'.begin',
637: 'Beginning of procedure');
638: END IF;
639:
790: 'RETIREMENT_ADJUSTMENT')
791: AND adj.source_line_id = ai.source_line_id(+) ;
792:
793: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
794: fnd_log.string(G_LEVEL_PROCEDURE,
795: G_MODULE_NAME||l_procedure_name,
796: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
797: END IF;
798:
963: end if;
964:
965:
966: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
967: fnd_log.string(G_LEVEL_PROCEDURE,
968: G_MODULE_NAME||l_procedure_name,
969: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
970: END IF;
971:
971:
972:
973:
974: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
975: fnd_log.string(G_LEVEL_PROCEDURE,
976: G_MODULE_NAME||l_procedure_name||'.end',
977: 'End of procedure');
978: END IF;
979:
981: WHEN others THEN
982: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
983: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
984: fnd_message.set_token('ORACLE_ERR',SQLERRM);
985: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
986: END IF;
987: raise;
988:
989: end load_line_data_fin1;
1003:
1004: BEGIN
1005:
1006: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1007: fnd_log.string(G_LEVEL_PROCEDURE,
1008: G_MODULE_NAME||l_procedure_name||'.begin',
1009: 'Beginning of procedure');
1010: END IF;
1011:
1144: 'RESERVE_TRANSFERS')
1145: AND adj.source_line_id = ai.source_line_id(+) ;
1146:
1147: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
1148: fnd_log.string(G_LEVEL_PROCEDURE,
1149: G_MODULE_NAME||l_procedure_name,
1150: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
1151: END IF;
1152:
1299: end if;
1300:
1301:
1302: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
1303: fnd_log.string(G_LEVEL_PROCEDURE,
1304: G_MODULE_NAME||l_procedure_name,
1305: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
1306: END IF;
1307:
1307:
1308:
1309:
1310: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1311: fnd_log.string(G_LEVEL_PROCEDURE,
1312: G_MODULE_NAME||l_procedure_name||'.end',
1313: 'End of procedure');
1314: END IF;
1315:
1317: WHEN others THEN
1318: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
1319: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
1320: fnd_message.set_token('ORACLE_ERR',SQLERRM);
1321: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
1322: END IF;
1323: raise;
1324:
1325: end load_line_data_fin2;
1339:
1340: BEGIN
1341:
1342: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1343: fnd_log.string(G_LEVEL_PROCEDURE,
1344: G_MODULE_NAME||l_procedure_name||'.begin',
1345: 'Beginning of procedure');
1346: END IF;
1347:
1470: AND adj.adjustment_amount <> 0
1471: AND stg.event_type_code in ('TRANSFERS', 'CIP_TRANSFERS') ;
1472:
1473: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
1474: fnd_log.string(G_LEVEL_PROCEDURE,
1475: G_MODULE_NAME||l_procedure_name,
1476: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
1477: END IF;
1478:
1614: end if;
1615:
1616:
1617: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
1618: fnd_log.string(G_LEVEL_PROCEDURE,
1619: G_MODULE_NAME||l_procedure_name,
1620: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
1621: END IF;
1622:
1622:
1623:
1624:
1625: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1626: fnd_log.string(G_LEVEL_PROCEDURE,
1627: G_MODULE_NAME||l_procedure_name||'.end',
1628: 'End of procedure');
1629: END IF;
1630:
1632: WHEN others THEN
1633: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
1634: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
1635: fnd_message.set_token('ORACLE_ERR',SQLERRM);
1636: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
1637: END IF;
1638: raise;
1639:
1640: end load_line_data_xfr;
1654:
1655: BEGIN
1656:
1657: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1658: fnd_log.string(G_LEVEL_PROCEDURE,
1659: G_MODULE_NAME||l_procedure_name||'.begin',
1660: 'Beginning of procedure');
1661: END IF;
1662:
1775: AND cb.book_type_code = adj.book_type_code
1776: AND adj.source_dest_code = 'SOURCE' ;
1777:
1778: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
1779: fnd_log.string(G_LEVEL_PROCEDURE,
1780: G_MODULE_NAME||l_procedure_name,
1781: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
1782: END IF;
1783:
1909: end if;
1910:
1911:
1912: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
1913: fnd_log.string(G_LEVEL_PROCEDURE,
1914: G_MODULE_NAME||l_procedure_name,
1915: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
1916: END IF;
1917:
2024: 'UNIT_ADJUSTMENTS', 'CIP_UNIT_ADJUSTMENTS')
2025: AND adj.source_dest_code = 'DEST' ;
2026:
2027: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2028: fnd_log.string(G_LEVEL_PROCEDURE,
2029: G_MODULE_NAME||l_procedure_name,
2030: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
2031: END IF;
2032:
2152: end if;
2153:
2154:
2155: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2156: fnd_log.string(G_LEVEL_PROCEDURE,
2157: G_MODULE_NAME||l_procedure_name,
2158: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
2159: END IF;
2160:
2160:
2161:
2162:
2163: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2164: fnd_log.string(G_LEVEL_PROCEDURE,
2165: G_MODULE_NAME||l_procedure_name||'.end',
2166: 'End of procedure');
2167: END IF;
2168:
2170: WHEN others THEN
2171: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
2172: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
2173: fnd_message.set_token('ORACLE_ERR',SQLERRM);
2174: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
2175: END IF;
2176: raise;
2177:
2178: end load_line_data_dist;
2192:
2193: BEGIN
2194:
2195: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2196: fnd_log.string(G_LEVEL_PROCEDURE,
2197: G_MODULE_NAME||l_procedure_name||'.begin',
2198: 'Beginning of procedure');
2199: END IF;
2200:
2319: AND stg.event_type_code in ('RETIREMENTS', 'CIP_RETIREMENTS')
2320: AND ret.transaction_header_id_in = stg.member_transaction_header_id ;
2321:
2322: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2323: fnd_log.string(G_LEVEL_PROCEDURE,
2324: G_MODULE_NAME||l_procedure_name,
2325: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
2326: END IF;
2327:
2459: end if;
2460:
2461:
2462: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2463: fnd_log.string(G_LEVEL_PROCEDURE,
2464: G_MODULE_NAME||l_procedure_name,
2465: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
2466: END IF;
2467:
2467:
2468:
2469:
2470: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2471: fnd_log.string(G_LEVEL_PROCEDURE,
2472: G_MODULE_NAME||l_procedure_name||'.end',
2473: 'End of procedure');
2474: END IF;
2475:
2477: WHEN others THEN
2478: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
2479: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
2480: fnd_message.set_token('ORACLE_ERR',SQLERRM);
2481: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
2482: END IF;
2483: raise;
2484:
2485: end load_line_data_ret;
2499:
2500: BEGIN
2501:
2502: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2503: fnd_log.string(G_LEVEL_PROCEDURE,
2504: G_MODULE_NAME||l_procedure_name||'.begin',
2505: 'Beginning of procedure');
2506: END IF;
2507:
2626: AND stg.event_type_code in ('REINSTATEMENTS','CIP_REINSTATEMENTS')
2627: AND ret.transaction_header_id_out = stg.member_transaction_header_id ;
2628:
2629: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2630: fnd_log.string(G_LEVEL_PROCEDURE,
2631: G_MODULE_NAME||l_procedure_name,
2632: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
2633: END IF;
2634:
2766: end if;
2767:
2768:
2769: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2770: fnd_log.string(G_LEVEL_PROCEDURE,
2771: G_MODULE_NAME||l_procedure_name,
2772: 'Rows inserted into lines: ' || to_char(SQL%ROWCOUNT));
2773: END IF;
2774:
2774:
2775:
2776:
2777: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2778: fnd_log.string(G_LEVEL_PROCEDURE,
2779: G_MODULE_NAME||l_procedure_name||'.end',
2780: 'End of procedure');
2781: END IF;
2782:
2784: WHEN others THEN
2785: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
2786: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
2787: fnd_message.set_token('ORACLE_ERR',SQLERRM);
2788: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
2789: END IF;
2790: raise;
2791:
2792: end load_line_data_res;
2806:
2807: BEGIN
2808:
2809: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2810: fnd_log.string(G_LEVEL_PROCEDURE,
2811: G_MODULE_NAME||l_procedure_name||'.begin',
2812: 'Beginning of procedure');
2813: END IF;
2814:
2814:
2815: return;
2816:
2817: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
2818: fnd_log.string(G_LEVEL_PROCEDURE,
2819: G_MODULE_NAME||l_procedure_name,
2820: 'Rows inserted into mls: ' || to_char(SQL%ROWCOUNT));
2821: END IF;
2822:
2822:
2823:
2824:
2825: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2826: fnd_log.string(G_LEVEL_PROCEDURE,
2827: G_MODULE_NAME||l_procedure_name||'.end',
2828: 'End of procedure');
2829: END IF;
2830:
2832: WHEN others THEN
2833: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
2834: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
2835: fnd_message.set_token('ORACLE_ERR',SQLERRM);
2836: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
2837: END IF;
2838: raise;
2839:
2840: end load_mls_data;
3029:
3030: BEGIN
3031:
3032: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3033: fnd_log.string(G_LEVEL_PROCEDURE,
3034: G_MODULE_NAME||l_procedure_name||'.begin',
3035: 'Beginning of procedure');
3036: END IF;
3037:
3116:
3117: --
3118:
3119: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3120: fnd_log.string(G_LEVEL_PROCEDURE,
3121: G_MODULE_NAME||l_procedure_name||'.end',
3122: 'End of procedure');
3123: END IF;
3124:
3126: WHEN others THEN
3127: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
3128: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
3129: fnd_message.set_token('ORACLE_ERR',SQLERRM);
3130: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
3131: END IF;
3132: raise;
3133:
3134: END load_generated_ccids;
3154:
3155: BEGIN
3156:
3157: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3158: fnd_log.string(G_LEVEL_PROCEDURE,
3159: G_MODULE_NAME||l_procedure_name||'.begin',
3160: 'Beginning of procedure');
3161: END IF;
3162:
3162:
3163:
3164: --
3165: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3166: fnd_log.string(G_LEVEL_PROCEDURE,
3167: G_MODULE_NAME||l_procedure_name||'.end',
3168: 'End of procedure');
3169: END IF;
3170:
3172: WHEN others THEN
3173: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL ) THEN
3174: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
3175: fnd_message.set_token('ORACLE_ERR',SQLERRM);
3176: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
3177: END IF;
3178: raise;
3179:
3180:
3201:
3202: BEGIN
3203:
3204: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3205: fnd_log.string(G_LEVEL_PROCEDURE,
3206: G_MODULE_NAME||l_procedure_name||'.begin',
3207: 'Beginning of procedure');
3208: END IF;
3209:
3263:
3264:
3265:
3266: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3267: fnd_log.string(G_LEVEL_PROCEDURE,
3268: G_MODULE_NAME||l_procedure_name||'.end',
3269: 'End of procedure');
3270: END IF;
3271:
3271:
3272: EXCEPTION
3273: WHEN error_found THEN
3274: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
3275: FND_LOG.string (G_LEVEL_ERROR,
3276: G_MODULE_NAME||l_procedure_name,
3277: 'ended in error');
3278: END IF;
3279: raise;
3281: WHEN others THEN
3282: IF (G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
3283: fnd_message.set_name('OFA','FA_SHARED_ORACLE_ERR');
3284: fnd_message.set_token('ORACLE_ERR',SQLERRM);
3285: FND_LOG.MESSAGE (G_LEVEL_UNEXPECTED,G_MODULE_NAME||l_procedure_name,TRUE);
3286: END IF;
3287: raise;
3288:
3289: END load_data;