70: --*********************************************************
71: BEGIN
72: SELECT gl.currency_code
73: INTO gc_currency_code
74: FROM fa_book_controls fbc
75: ,gl_ledgers gl
76: WHERE fbc.book_type_code = P_BOOK
77: AND fbc.set_of_books_id = gl.ledger_id;
78: EXCEPTION
170: --*********************************************************
171: BEGIN
172: SELECT ffy.start_date
173: INTO ld_fiscal_start_date
174: FROM fa_book_controls fbc
175: ,fa_fiscal_year ffy
176: WHERE fbc.book_type_code = P_BOOK
177: AND ffy.fiscal_year = gc_fiscal_year
178: AND ffy.fiscal_year_name = fbc.fiscal_year_name;