DBA Data[Home] [Help]

APPS.FV_CST_GL dependencies on GL_INTERFACE

Line 5: procedure CORRECT_GL_INTERFACE_ENTRIES (

1: Package BODY FV_CST_GL as
2: -- $Header: FVCSTGLB.pls 115.5 2003/12/17 21:19:58 ksriniva noship $
3: -- ==============================================================
4: g_module_name VARCHAR2(100) := 'fv.plsql.FV_CST_GL.';
5: procedure CORRECT_GL_INTERFACE_ENTRIES (
6: p_group_id in number,
7: p_Receipt_id in number,
8: p_Deliver_id in number)
9: -- Purpose of procedure

Line 12: -- select rows from gl interface with that batch id and a reference25

8: p_Deliver_id in number)
9: -- Purpose of procedure
10: --
11: -- Given group id, rcv transaction id 1, rcv transaction id 2
12: -- select rows from gl interface with that batch id and a reference25
13: -- of transaction id 1 or 2 (receive or deliver) and an actual_flag
14: -- of 'A' (don't want to process encumbrance entries) delete two rows
15: -- with the same value in code_combination_id, one DR and one CR.
16: -- If more or less than 4 rows found, throw an exception

Line 18: l_module_name VARCHAR2(200) := g_module_name || 'CORRECT_GL_INTERFACE_ENTRIES';

14: -- of 'A' (don't want to process encumbrance entries) delete two rows
15: -- with the same value in code_combination_id, one DR and one CR.
16: -- If more or less than 4 rows found, throw an exception
17: IS
18: l_module_name VARCHAR2(200) := g_module_name || 'CORRECT_GL_INTERFACE_ENTRIES';
19: l_errbuf VARCHAR2(1024);
20: temp_count number;
21: profile_value varchar2(1);
22: BEGIN

Line 30: from gl_interface

26: if profile_value = 'N' then
27:
28: select count('should be exactly four rows')
29: into temp_count
30: from gl_interface
31: where reference25 IN (to_char(p_Receipt_id),to_char(p_Deliver_id))
32: and group_id = p_group_id
33: and actual_flag = 'A';
34:

Line 37: from gl_interface

33: and actual_flag = 'A';
34:
35: if (temp_count) = 4 then
36: delete
37: from gl_interface
38: where group_id = p_group_id
39: and reference25 IN (to_char(p_Receipt_id),to_char(p_Deliver_id))
40: and actual_flag = 'A'
41: and code_combination_id = (

Line 43: from gl_interface

39: and reference25 IN (to_char(p_Receipt_id),to_char(p_Deliver_id))
40: and actual_flag = 'A'
41: and code_combination_id = (
42: select code_combination_id
43: from gl_interface
44: where reference25 IN (to_char(p_Receipt_id),to_char(p_Deliver_id))
45: and group_id = p_group_id
46: and actual_flag = 'A'
47: group by code_combination_id