[Home] [Help]
PACKAGE BODY: APPS.IGI_IAC_SUBMIT_ASSET_BALANCE
Source
1 PACKAGE BODY igi_iac_submit_Asset_balance AS
2 -- $Header: igiiabpb.pls 120.6.12000000.1 2007/08/01 16:13:00 npandya ship $
3
4 --===========================FND_LOG.START=====================================
5
6 g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
7 g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
8 g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
9 g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
10 g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
11 g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
12 g_path VARCHAR2(100):= 'IGI.PLSQL.igiiabpb.igi_iac_submit_asset_balance.';
13
14 --===========================FND_LOG.END=====================================
15
16 PROCEDURE submit_report ( ERRBUF OUT NOCOPY VARCHAR2,
17 RETCODE OUT NOCOPY NUMBER ,
18 p_book_type_code VARCHAR2 ,
19 p_period_counter NUMBER ,
20 p_mode VARCHAR2 ,
21 p_category_struct_id NUMBER ,
22 p_category_id NUMBER ,
23 p_called_from VARCHAR2,
24 acct_flex_structure NUMBER,
25 p_from_cost_center VARCHAR2,
26 p_to_cost_center VARCHAR2,
27 p_from_asset NUMBER,
28 p_to_asset NUMBER )
29 IS
30 l_report_request_id NUMBER ;
31 l_path_name VARCHAR2(150) := g_path||'submit_report';
32 BEGIN
33
34
35 IF ( p_mode IN ( 'S' ,'A' ) ) THEN
36
37 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
38 , 'IGIIACAB'
39 , null
40 , null
41 , FALSE -- Is a sub request
42 , 'P_BOOK_TYPE_CODE='||p_book_type_code
43 , 'P_PERIOD_COUNTER='||p_period_counter
44 , 'P_CATEGORY_ID='||p_category_id
45 , 'P_FROM_COST_CENTER='||p_from_cost_center
46 , 'P_TO_COST_CENTER='||p_to_cost_center
47 , 'P_FROM_ASSET='||p_to_asset
48 , 'P_TO_ASSET='||p_to_asset
49 );
50 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
51 p_full_path => l_path_name,
52 p_string => 'Asset Balance Summary Report Submitted .... ');
53
54 END IF;
55 IF ( p_mode IN ( 'R' , 'A' ) ) THEN
56 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
57 , 'IGIIACRB'
58 , null
59 , null
60 , FALSE -- Is a sub request
61 , 'P_BOOK_TYPE_CODE='||p_book_type_code
62 , 'P_PERIOD_COUNTER='||p_period_counter
63 , 'P_CATEGORY_ID='||p_category_id
64 , 'P_FROM_COST_CENTER='||p_from_cost_center
65 , 'P_TO_COST_CENTER='||p_to_cost_center
66 , 'P_FROM_ASSET='||p_to_asset
67 , 'P_TO_ASSET='||p_to_asset
68 );
69 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
70 p_full_path => l_path_name,
71 p_string => 'Asset Balance Revaluation Report Submitted .... ');
72
73 END IF;
74 IF ( p_mode IN ( 'O' , 'A' ) ) THEN
75 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
76 , 'IGIIACOB'
77 , null
78 , null
79 , FALSE -- Is a sub request
80 , 'P_BOOK_TYPE_CODE='||p_book_type_code
81 , 'P_PERIOD_COUNTER='||p_period_counter
82 , 'P_CATEGORY_ID='||p_category_id
83 , 'P_FROM_COST_CENTER='||p_from_cost_center
84 , 'P_TO_COST_CENTER='||p_to_cost_center
85 , 'P_FROM_ASSET='||p_to_asset
86 , 'P_TO_ASSET='||p_to_asset
87 );
88 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
89 p_full_path => l_path_name,
90 p_string => 'Asset Balance Operating Expense Report Submitted .... ');
91
92
93 END IF;
94 IF ( p_mode IN ( 'D' , 'A' ) ) THEN
95 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
96 , 'IGIIACDB'
97 , null
98 , null
99 , FALSE -- Is a sub request
100 , 'P_BOOK_TYPE_CODE='||p_book_type_code
101 , 'P_PERIOD_COUNTER='||p_period_counter
102 , 'P_CATEGORY_ID='||p_category_id
103 , 'P_FROM_COST_CENTER='||p_from_cost_center
104 , 'P_TO_COST_CENTER='||p_to_cost_center
105 , 'P_FROM_ASSET='||p_to_asset
106 , 'P_TO_ASSET='||p_to_asset
107 );
108
109 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
110 p_full_path => l_path_name,
111 p_string => 'Asset Balance Depreciation Report Submitted .... ');
112 END IF;
113
114 COMMIT;
115 END ;
116
117
118 PROCEDURE submit_summary( ERRBUF OUT NOCOPY VARCHAR2,
119 RETCODE OUT NOCOPY NUMBER ,
120 p_book_type_code VARCHAR2 ,
121 p_period_counter NUMBER ,
122 p_mode VARCHAR2 ,
123 p_category_struct_id NUMBER ,
124 p_category_id NUMBER ,
125 p_called_from VARCHAR2,
126 acct_flex_structure NUMBER,
127 p_from_cost_center VARCHAR2,
128 p_to_cost_center VARCHAR2)
129 IS
130 l_report_request_id NUMBER ;
131 l_path_name VARCHAR2(150) := g_path||'submit_summary';
132 BEGIN
133
134
135 IF ( p_mode IN ( 'S' ,'A' ) ) THEN
136
137 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
138 , 'IGIIACAS'
139 , null
140 , null
141 , FALSE -- Is a sub request
142 , 'P_BOOK_TYPE_CODE='||p_book_type_code
143 , 'P_PERIOD_COUNTER='||p_period_counter
144 , 'P_CATEGORY_ID='||p_category_id
145 , 'P_FROM_COST_CENTER='||p_from_cost_center
146 , 'P_TO_COST_CENTER='||p_to_cost_center
147 );
148 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
149 p_full_path => l_path_name,
150 p_string => 'Asset Balance Summary Report Submitted .... ');
151
152 END IF;
153 IF ( p_mode IN ( 'R' , 'A' ) ) THEN
154 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
155 , 'IGIIACRS'
156 , null
157 , null
158 , FALSE -- Is a sub request
159 , 'P_BOOK_TYPE_CODE='||p_book_type_code
160 , 'P_PERIOD_COUNTER='||p_period_counter
161 , 'P_CATEGORY_ID='||p_category_id
162 , 'P_FROM_COST_CENTER='||p_from_cost_center
163 , 'P_TO_COST_CENTER='||p_to_cost_center
164 );
165 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
166 p_full_path => l_path_name,
167 p_string => 'Asset Balance Revaluation Report Submitted .... ');
168
169 END IF;
170 IF ( p_mode IN ( 'O' , 'A' ) ) THEN
171 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
172 , 'IGIIACOS'
173 , null
174 , null
175 , FALSE -- Is a sub request
176 , 'P_BOOK_TYPE_CODE='||p_book_type_code
177 , 'P_PERIOD_COUNTER='||p_period_counter
178 , 'P_CATEGORY_ID='||p_category_id
179 , 'P_FROM_COST_CENTER='||p_from_cost_center
180 , 'P_TO_COST_CENTER='||p_to_cost_center
181 );
182 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
183 p_full_path => l_path_name,
184 p_string => 'Asset Balance Operating Expense Report Submitted .... ');
185
186
187 END IF;
188 IF ( p_mode IN ( 'D' , 'A' ) ) THEN
189 l_report_Request_id := FND_REQUEST.SUBMIT_REQUEST ( 'IGI'
190 , 'IGIIACDS'
191 , null
192 , null
193 , FALSE -- Is a sub request
194 , 'P_BOOK_TYPE_CODE='||p_book_type_code
195 , 'P_PERIOD_COUNTER='||p_period_counter
196 , 'P_CATEGORY_ID='||p_category_id
197 , 'P_FROM_COST_CENTER='||p_from_cost_center
198 , 'P_TO_COST_CENTER='||p_to_cost_center
199 );
200
201 igi_iac_debug_pkg.debug_other_string(p_level => g_event_level,
202 p_full_path => l_path_name,
203 p_string => 'Asset Balance Depreciation Report Submitted .... ');
204 END IF;
205
206 COMMIT;
207 END ;
208 END;