1: PACKAGE BODY gl_alloc_history_pkg AS
2: /* $Header: glimahib.pls 120.5 2005/05/05 01:17:09 kvora ship $ */
3:
4: --
5: -- PUBLIC FUNCTIONS
12: journal_eff_date IN OUT NOCOPY DATE) IS
13: CURSOR get_period IS
14: SELECT H1.to_period_name, H1.calculation_effective_date,
15: H1.journal_effective_date
16: FROM GL_ALLOC_HISTORY H1
17: WHERE H1.ALLOCATION_BATCH_ID = batch_id
18: AND H1.ACCESS_SET_ID = access_set_id
19: AND H1.LAST_UPDATE_DATE
20: = (SELECT MAX(H2.LAST_UPDATE_DATE)
17: WHERE H1.ALLOCATION_BATCH_ID = batch_id
18: AND H1.ACCESS_SET_ID = access_set_id
19: AND H1.LAST_UPDATE_DATE
20: = (SELECT MAX(H2.LAST_UPDATE_DATE)
21: FROM GL_ALLOC_HISTORY H2
22: WHERE H2.ALLOCATION_BATCH_ID
23: = batch_id
24: AND H2.ACCESS_SET_ID
25: = access_set_id
35: RAISE;
36: WHEN OTHERS THEN
37: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
38: fnd_message.set_token('PROCEDURE',
39: 'gl_alloc_history_pkg.period_last_run');
40: RAISE;
41: END period_last_run;
42:
43:
215:
216: RETURN TRUE;
217: END allow_average_usage;
218:
219: END gl_alloc_history_pkg;