[Home] [Help]
69: -- initialize error message stack.
70: fa_srvr_msg.init_server_message;
71:
72: -- initialize debug message stack.
73: fa_debug_pkg.initialize;
74: end if;
75:
76: if not fa_util_pub.get_log_level_rec
77: (x_log_level_rec => g_log_level_rec) then
79: end if;
80:
81:
82: if g_log_level_rec.statement_level then
83: fa_debug_pkg.add(
84: l_calling_fn,
85: 'after initializing message stacks',
86: '',
87: p_log_level_rec => g_log_level_rec);
84: l_calling_fn,
85: 'after initializing message stacks',
86: '',
87: p_log_level_rec => g_log_level_rec);
88: fa_debug_pkg.add(
89: l_calling_fn,
90: 'p_src_ledger_id',
91: p_src_ledger_id,
92: p_log_level_rec => g_log_level_rec);
89: l_calling_fn,
90: 'p_src_ledger_id',
91: p_src_ledger_id,
92: p_log_level_rec => g_log_level_rec);
93: fa_debug_pkg.add(
94: l_calling_fn,
95: 'p_alc_ledger_id',
96: p_alc_ledger_id,
97: p_log_level_rec => g_log_level_rec);
117:
118: for i in 1..l_book_type_code.count loop
119:
120: if g_log_level_rec.statement_level then
121: fa_debug_pkg.add(
122: l_calling_fn,
123: 'processing book_type_code',
124: l_book_type_code(i),
125: p_log_level_rec => g_log_level_rec);
215: -- initialize error message stack.
216: fa_srvr_msg.init_server_message;
217:
218: -- initialize debug message stack.
219: fa_debug_pkg.initialize;
220: end if;
221:
222: if g_log_level_rec.statement_level then
223: fa_debug_pkg.add(
219: fa_debug_pkg.initialize;
220: end if;
221:
222: if g_log_level_rec.statement_level then
223: fa_debug_pkg.add(
224: l_calling_fn,
225: 'processing book_type_code',
226: p_book_type_code);
227: end if;
279: -- loop through each alternate ledger currency
280: -- and create the needed mc info
281: if(p_secondary_sob_id is null) then
282: if g_log_level_rec.statement_level then
283: fa_debug_pkg.add(
284: l_calling_fn,
285: 'calling GL_MC_INFO.GET_ALC_LEDGER_ID for src ledger',
286: l_src_ledger_id,
287: p_log_level_rec => g_log_level_rec);
297:
298: for i in 1..l_alc_ledger_list.count loop
299:
300: if g_log_level_rec.statement_level then
301: fa_debug_pkg.add
302: (l_calling_fn,
303: 'processing alc currency',
304: l_alc_ledger_list(i).r_sob_id,
305: p_log_level_rec => g_log_level_rec);
396: -- need to verify there is no pending deprn run first
397: -- and then that there are active mass request id's
398:
399: if (g_log_level_rec.statement_level) then
400: fa_debug_pkg.add
401: (l_calling_fn,
402: 'locking',
403: 'book controls record',
404: p_log_level_rec => g_log_level_rec);
439: END;
440:
441: -- check if assets exists
442: if (g_log_level_rec.statement_level) then
443: fa_debug_pkg.add
444: (l_calling_fn,
445: 'checking',
446: 'if assets exist',
447: p_log_level_rec => g_log_level_rec);
462: END;
463:
464: -- calculate nbv_threshold
465: if (g_log_level_rec.statement_level) then
466: fa_debug_pkg.add
467: (l_calling_fn,
468: 'calculating',
469: 'nbv amount threshold',
470: p_log_level_rec => g_log_level_rec);
476: where currency_code = p_alc_currency;
477:
478: -- remaining values
479: if (g_log_level_rec.statement_level) then
480: fa_debug_pkg.add
481: (l_calling_fn,
482: 'fetching',
483: 'remaining values from fa_book_controls',
484: p_log_level_rec => g_log_level_rec);
494: where book_type_code = p_book_type_code;
495:
496: -- insert mc book controls record
497: if (g_log_level_rec.statement_level) then
498: fa_debug_pkg.add
499: (l_calling_fn,
500: 'checking',
501: 'existing mc book controls record',
502: p_log_level_rec => g_log_level_rec);
519: -- can be changed i.e. CURRENCY_CODE and NBV_AMOUNT_THRESHOLD
520: if (l_exist_flag = 'N') then
521:
522: if (g_log_level_rec.statement_level) then
523: fa_debug_pkg.add
524: (l_calling_fn,
525: 'inserting',
526: 'mc book controls record',
527: p_log_level_rec => g_log_level_rec);
579: );
580:
581: -- insert the mc deprn periods rows
582: if (g_log_level_rec.statement_level) then
583: fa_debug_pkg.add
584: (l_calling_fn,
585: 'inserting',
586: 'mc deprn periods records',
587: p_log_level_rec => g_log_level_rec);
643:
644: ELSE
645:
646: if (g_log_level_rec.statement_level) then
647: fa_debug_pkg.add
648: (l_calling_fn,
649: 'updating',
650: 'mc book controls record',
651: p_log_level_rec => g_log_level_rec);
661: END IF; -- IF (l_exist_flag = 'N')
662:
663: -- update the mrc anabled flag on primary table
664: if (g_log_level_rec.statement_level) then
665: fa_debug_pkg.add
666: (l_calling_fn,
667: 'updating',
668: 'fa_book_controls.mc_source_flag',
669: p_log_level_rec => g_log_level_rec);
673: set mc_source_flag = 'Y'
674: where book_type_code = p_book_type_code;
675:
676: if (g_log_level_rec.statement_level) then
677: fa_debug_pkg.add
678: (l_calling_fn,
679: 'returning',
680: 'true',
681: p_log_level_rec => g_log_level_rec);
732: -- initialize error message stack.
733: fa_srvr_msg.init_server_message;
734:
735: -- initialize debug message stack.
736: fa_debug_pkg.initialize;
737: end if;
738:
739: if not fa_util_pub.get_log_level_rec
740: (x_log_level_rec => g_log_level_rec) then
742: end if;
743:
744:
745: if g_log_level_rec.statement_level then
746: fa_debug_pkg.add(
747: l_calling_fn,
748: 'after initializing message stacks',
749: '',
750: p_log_level_rec => g_log_level_rec);
747: l_calling_fn,
748: 'after initializing message stacks',
749: '',
750: p_log_level_rec => g_log_level_rec);
751: fa_debug_pkg.add(
752: l_calling_fn,
753: 'p_src_ledger_id',
754: p_src_ledger_id,
755: p_log_level_rec => g_log_level_rec);
752: l_calling_fn,
753: 'p_src_ledger_id',
754: p_src_ledger_id,
755: p_log_level_rec => g_log_level_rec);
756: fa_debug_pkg.add(
757: l_calling_fn,
758: 'p_alc_ledger_id',
759: p_alc_ledger_id,
760: p_log_level_rec => g_log_level_rec);
772: raise error_found;
773: end if;
774:
775: if g_log_level_rec.statement_level then
776: fa_debug_pkg.add(
777: l_calling_fn,
778: 'updating the books',
779: '',
780: p_log_level_rec => g_log_level_rec);