[Home] [Help]
131: l_sql VARCHAR2(5000);
132: -- exceptions
133: l_path VARCHAR2(150) := g_path||'proj';
134: BEGIN
135: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Entered inner procedure');
136: -- get the category and asset key flex structures
137: SELECT category_flex_structure, asset_key_flex_structure
138: INTO l_cat_struct, l_assetkey_struct
139: FROM fa_system_controls;
172: l_prd_rec );
173:
174: l_end_period_name := l_prd_rec.period_name;
175:
176: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Start populating IAC Projections RXi interface table');
177:
178: -- main loop for getting info for interface table
179: FOR l_proj_data IN c_proj_data(p_projection_id)
180: LOOP
191: l_rxi_proj_rec.latest_reval_cost(l_count) := l_proj_data.latest_reval_cost;
192: l_rxi_proj_rec.deprn_period(l_count) := l_proj_data.deprn_period;
193: l_rxi_proj_rec.deprn_ytd(l_count) := l_proj_data.deprn_ytd;
194:
195: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Asset Number: '||l_proj_data.asset_number||' Reccount: '||l_count);
196:
197: -- get period name for projection period counter
198: l_ret_flag := igi_iac_common_utils.get_period_info_for_counter( l_get_proj.book_type_code,
199: l_proj_data.proj_period_counter,
279: when others then
280: l_min_cat := 'null';
281: end;
282:
283: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Minor category segment: '||l_min_cat);
284:
285: IF (l_min_cat IS NOT NULL) THEN
286: l_sql := 'SELECT ' ||l_min_cat||
287: ' FROM fa_categories cat
292: l_rxi_proj_rec.minor_category(l_count) := null;
293: END IF;
294:
295:
296: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Minor category value: '||l_rxi_proj_rec.minor_category(l_count));
297:
298: -- get the concatenated category name
299: fa_rx_shared_pkg.concat_category (
300: struct_id => l_cat_struct,
302: concat_string => l_concat_cat,
303: segarray => l_cat_segs);
304:
305:
306: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Category: '||l_concat_cat);
307: l_rxi_proj_rec.category(l_count) := l_concat_cat;
308:
309: -- get the exception code description
310: l_rxi_proj_rec.exception_code(l_count) := l_proj_data.exception_code;
318: ELSE
319: l_exception_desc := NULL;
320: END IF;
321:
322: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Exception: '||l_exception_desc);
323: l_rxi_proj_rec.exception_desc(l_count) := l_exception_desc;
324:
325: END LOOP;
326:
324:
325: END LOOP;
326:
327: -- insert into the RXi interface table
328: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Inserting.......');
329:
330: FORALL i IN l_rxi_proj_rec.reccount.FIRST .. l_rxi_proj_rec.reccount.LAST
331: INSERT INTO igi_iac_proj_rep_itf(
332: projection_id,
397: sysdate,
398: l_rxi_proj_rec.period_counter(i)
399: );
400:
401: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'End populating IAC Projections RXi interface table');
402:
403: -- 02-Oct-2003, Bug 3140574, delete from main projections tables
404: DELETE FROM igi_iac_projections
405: WHERE projection_id = p_projection_id;
415: FND_MESSAGE.SET_NAME('IGI', 'IGI_IAC_EXCEPTION');
416: FND_MESSAGE.SET_TOKEN('PACKAGE','igirx_iac_proj');
417: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE','Inner Process unsuccessful!');
418:
419: igi_iac_debug_pkg.debug_other_msg(g_unexp_level,l_path,FALSE);
420: errbuf := fnd_message.get;
421: igi_iac_debug_pkg.debug_other_string(g_unexp_level,l_path,'Population of IAC Projections RXi interface table unsuccessful');
422: END proj;
423:
417: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE','Inner Process unsuccessful!');
418:
419: igi_iac_debug_pkg.debug_other_msg(g_unexp_level,l_path,FALSE);
420: errbuf := fnd_message.get;
421: igi_iac_debug_pkg.debug_other_string(g_unexp_level,l_path,'Population of IAC Projections RXi interface table unsuccessful');
422: END proj;
423:
424: END igirx_iac_proj; -- Package body