375: IS
376: BEGIN
377:
378:
379: fnd_file.put_line(fnd_file.log,'p_ca_set_of_books_id is '||p_ca_set_of_books_id);
380: IF p_ca_set_of_books_id <> -1999
381: THEN
382:
383: BEGIN
384: select mrc_sob_type_code, currency_code
385: into P_MRCSOBTYPE, lp_currency_code
386: from gl_sets_of_books
387: where set_of_books_id = p_ca_set_of_books_id;
388: fnd_file.put_line(fnd_file.log, 'P_MRCSOBTYPE '||P_MRCSOBTYPE);
389: fnd_file.put_line(fnd_file.log, 'lp_currency_code '||lp_currency_code);
390: EXCEPTION
391: WHEN OTHERS THEN
392: P_MRCSOBTYPE := 'P';
385: into P_MRCSOBTYPE, lp_currency_code
386: from gl_sets_of_books
387: where set_of_books_id = p_ca_set_of_books_id;
388: fnd_file.put_line(fnd_file.log, 'P_MRCSOBTYPE '||P_MRCSOBTYPE);
389: fnd_file.put_line(fnd_file.log, 'lp_currency_code '||lp_currency_code);
390: EXCEPTION
391: WHEN OTHERS THEN
392: P_MRCSOBTYPE := 'P';
393: END;
395: P_MRCSOBTYPE := 'P';
396: END IF;
397:
398:
399: fnd_file.put_line(fnd_file.log,'In the Before Report Proc');
400: fnd_file.put_line(fnd_file.log, 'P_MRCSOBTYPE '||P_MRCSOBTYPE);
401: IF upper(P_MRCSOBTYPE) = 'R'
402: THEN
403: fnd_client_info.set_currency_context(p_ca_set_of_books_id);
396: END IF;
397:
398:
399: fnd_file.put_line(fnd_file.log,'In the Before Report Proc');
400: fnd_file.put_line(fnd_file.log, 'P_MRCSOBTYPE '||P_MRCSOBTYPE);
401: IF upper(P_MRCSOBTYPE) = 'R'
402: THEN
403: fnd_client_info.set_currency_context(p_ca_set_of_books_id);
404: END IF;
401: IF upper(P_MRCSOBTYPE) = 'R'
402: THEN
403: fnd_client_info.set_currency_context(p_ca_set_of_books_id);
404: END IF;
405: fnd_file.put_line(fnd_file.log, ' after fnd_client_info ');
406: fnd_file.put_line(fnd_file.log, 'P_MRCSOBTYPE '||P_MRCSOBTYPE);
407: IF upper(P_MRCSOBTYPE) = 'R'
408: THEN
409: SELECT PERIOD_COUNTER
402: THEN
403: fnd_client_info.set_currency_context(p_ca_set_of_books_id);
404: END IF;
405: fnd_file.put_line(fnd_file.log, ' after fnd_client_info ');
406: fnd_file.put_line(fnd_file.log, 'P_MRCSOBTYPE '||P_MRCSOBTYPE);
407: IF upper(P_MRCSOBTYPE) = 'R'
408: THEN
409: SELECT PERIOD_COUNTER
410: INTO p_lex_begin_period_counter
410: INTO p_lex_begin_period_counter
411: FROM FA_DEPRN_PERIODS_MRC_V
412: WHERE BOOK_TYPE_CODE = P_BOOK_NAME
413: AND PERIOD_NAME = P_BEGIN_PERIOD;
414: fnd_file.put_line(fnd_file.log,'R-p_lex_begin_period_counter::'||p_lex_begin_period_counter);
415:
416: SELECT PERIOD_COUNTER
417: INTO p_lex_end_period_counter
418: FROM FA_DEPRN_PERIODS_MRC_V
417: INTO p_lex_end_period_counter
418: FROM FA_DEPRN_PERIODS_MRC_V
419: WHERE BOOK_TYPE_CODE = P_BOOK_NAME
420: AND PERIOD_NAME = P_END_PERIOD;
421: fnd_file.put_line(fnd_file.log,'R-p_lex_end_period_counter::'||p_lex_end_period_counter);
422:
423: SELECT Accounting_flex_structure
424: INTO lc_acct_flex_struc
425: FROM FA_BOOK_CONTROLS_MRC_V
423: SELECT Accounting_flex_structure
424: INTO lc_acct_flex_struc
425: FROM FA_BOOK_CONTROLS_MRC_V
426: WHERE book_type_code = P_BOOK_NAME;
427: fnd_file.put_line(fnd_file.log,'R-lc_acct_flex_struc::'||lc_acct_flex_struc);
428:
429: ELSE
430: SELECT PERIOD_COUNTER
431: INTO p_lex_begin_period_counter
431: INTO p_lex_begin_period_counter
432: FROM FA_DEPRN_PERIODS
433: WHERE BOOK_TYPE_CODE = P_BOOK_NAME
434: AND PERIOD_NAME = P_BEGIN_PERIOD;
435: fnd_file.put_line(fnd_file.log,'p_lex_begin_period_counter::'||p_lex_begin_period_counter);
436:
437: SELECT PERIOD_COUNTER
438: INTO p_lex_end_period_counter
439: FROM FA_DEPRN_PERIODS
438: INTO p_lex_end_period_counter
439: FROM FA_DEPRN_PERIODS
440: WHERE BOOK_TYPE_CODE = P_BOOK_NAME
441: AND PERIOD_NAME = P_END_PERIOD;
442: fnd_file.put_line(fnd_file.log,'p_lex_end_period_counter::'||p_lex_end_period_counter);
443:
444: SELECT Accounting_flex_structure
445: INTO lc_acct_flex_struc
446: FROM FA_BOOK_CONTROLS
444: SELECT Accounting_flex_structure
445: INTO lc_acct_flex_struc
446: FROM FA_BOOK_CONTROLS
447: WHERE book_type_code = P_BOOK_NAME;
448: fnd_file.put_line(fnd_file.log,'lc_acct_flex_struc::'||lc_acct_flex_struc);
449:
450: END IF;
451:
452: IF upper(P_MRCSOBTYPE) = 'R'
451:
452: IF upper(P_MRCSOBTYPE) = 'R'
453:
454: THEN
455: fnd_file.put_line(fnd_file.log,'R-b4 lp statementss ');
456: LP_FA_BOOK_CONTROLS := 'FA_BOOK_CONTROLS_MRC_V';
457: LP_FA_BOOKS := 'FA_BOOKS_MRC_V';
458: LP_FA_ADJUSTMENTS := 'FA_ADJUSTMENTS_MRC_V';
459: LP_FA_RETIREMENTS := 'FA_RETIREMENTS_MRC_V';