[Home] [Help]
57: l_amount number := p_amount;
58: l_amount_old number := p_amount;
59: --l_path varchar2(150) := g_path||'do_round';
60: begin
61: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'--- Inside Round() ---');
62: IF IGI_IAC_COMMON_UTILS.Iac_Round(X_Amount => l_amount, X_Book => p_book_type_code)
63: THEN
64: p_amount := l_amount;
65: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is TRUE');
61: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'--- Inside Round() ---');
62: IF IGI_IAC_COMMON_UTILS.Iac_Round(X_Amount => l_amount, X_Book => p_book_type_code)
63: THEN
64: p_amount := l_amount;
65: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is TRUE');
66: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
67: ELSE
68: p_amount := round( l_amount, 2);
69: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is FALSE');
62: IF IGI_IAC_COMMON_UTILS.Iac_Round(X_Amount => l_amount, X_Book => p_book_type_code)
63: THEN
64: p_amount := l_amount;
65: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is TRUE');
66: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
67: ELSE
68: p_amount := round( l_amount, 2);
69: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is FALSE');
70: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
65: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is TRUE');
66: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
67: ELSE
68: p_amount := round( l_amount, 2);
69: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is FALSE');
70: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
71: END IF;
72: exception when others then
73: p_amount := l_amount_old;
66: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
67: ELSE
68: p_amount := round( l_amount, 2);
69: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IGI_IAC_COMMON_UTILS.Iac_Round is FALSE');
70: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
71: END IF;
72: exception when others then
73: p_amount := l_amount_old;
74: igi_iac_debug_pkg.debug_unexpected_msg(l_path);
70: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'p_amount = '||p_amount);
71: END IF;
72: exception when others then
73: p_amount := l_amount_old;
74: igi_iac_debug_pkg.debug_unexpected_msg(l_path);
75: Raise;
76: END;
77:
78: -- ======================================================================
110:
111: BEGIN
112: l_path_name := g_path||'do_validate_category';
113: l_return_value := False;
114: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
115: p_full_path => l_path_name,
116: p_string => ' + Enter validate category');
117:
118: -- check if same category or null category
118: -- check if same category or null category
119: IF ((l_asset_cat_rec_old.category_id = l_asset_cat_rec_new.category_id)or
120: (l_asset_cat_rec_old.category_id is null or l_asset_cat_rec_new.category_id is null))
121: THEN
122: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
123: p_full_path => l_path_name,
124: p_string => ' + Same category old and new or null value');
125:
126: Return false;
124: p_string => ' + Same category old and new or null value');
125:
126: Return false;
127: End if;
128: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
129: p_full_path => l_path_name,
130: p_string => ' + different categories old ' || l_asset_cat_rec_old.category_id
131: || 'and new' ||l_asset_cat_rec_new.category_id );
132:
134: --validate if both categories are added to IAC book controls
135: **/
136: -- A record should exisit in iac category books for both categories for same book_typec_code
137: -- check for original category id
138: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
139: p_full_path => l_path_name,
140: p_string => ' + orinignal category id iac book test ..'||l_asset_cat_rec_old.category_id);
141:
142: Open get_category_id(l_asset_cat_rec_old.category_id);
144: l_old_index_reval_flag,
145: l_old_prof_reval_flag ;
146: IF NOT get_category_id%FOUND THEN
147: -- Raise error message that category is not exisiting in iac book
148: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
149: p_full_path => l_path_name,
150: p_string => ' +error message that category is not exisiting in iac book '||l_asset_cat_rec_old.category_id);
151:
152: Close get_category_id;
153: Return false;
154: END IF;
155: Close get_category_id;
156:
157: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
158: p_full_path => l_path_name,
159: p_string => ' + Original category exisits in iac book '||l_asset_cat_rec_old.category_id);
160:
161: Open get_category_id(l_asset_cat_rec_new.category_id);
163: l_new_index_reval_flag,
164: l_new_prof_reval_flag ;
165: IF NOT get_category_id%FOUND THEN
166: -- Raise error message that category is not exisiting in iac book
167: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
168: p_full_path => l_path_name,
169: p_string => ' +error message that category is not exisiting in iac book '||l_asset_cat_rec_new.category_id);
170: Close get_category_id;
171: Return false;
171: Return false;
172: END IF;
173: Close get_category_id;
174:
175: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
176: p_full_path => l_path_name,
177: p_string => ' + New category exisits in iac book '||l_asset_cat_rec_old.category_id);
178:
179: /**
189: Fetch get_cat_cap_flag into l_new_cap_flag,
190: l_new_cat_type;
191: Close get_cat_cap_flag;
192: --check the category flags
193: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
194: p_full_path => l_path_name,
195: p_string => ' + check for category captilized falgs');
196:
197: IF (l_old_cap_flag = 'YES') THEN
195: p_string => ' + check for category captilized falgs');
196:
197: IF (l_old_cap_flag = 'YES') THEN
198: IF (l_old_cap_flag <> l_new_cap_flag) THEN
199: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
200: p_full_path => l_path_name,
201: p_string => ' + both the categories not captilized falgs');
202:
203: Return False;
203: Return False;
204: End IF;
205: END IF;
206:
207: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
208: p_full_path => l_path_name,
209: p_string => ' + check for category captilized falgs success');
210:
211: /**
223: ELSE
224: allow_prof_reval_flag := False;
225: END IF;
226:
227: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
228: p_full_path => l_path_name,
229: p_string => ' + set the indexed and prof flags ');
230: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
231: p_full_path => l_path_name,
226:
227: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
228: p_full_path => l_path_name,
229: p_string => ' + set the indexed and prof flags ');
230: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
231: p_full_path => l_path_name,
232: p_string => ' + set the indexed flag ' || l_new_index_reval_flag );
233: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
234: p_full_path => l_path_name,
229: p_string => ' + set the indexed and prof flags ');
230: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
231: p_full_path => l_path_name,
232: p_string => ' + set the indexed flag ' || l_new_index_reval_flag );
233: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
234: p_full_path => l_path_name,
235: p_string => ' + set the prof flag ' ||l_new_prof_reval_flag );
236: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
237: p_full_path => l_path_name,
232: p_string => ' + set the indexed flag ' || l_new_index_reval_flag );
233: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
234: p_full_path => l_path_name,
235: p_string => ' + set the prof flag ' ||l_new_prof_reval_flag );
236: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
237: p_full_path => l_path_name,
238: p_string => ' + EXIT Validate category' );
239:
240: Return True;
262:
263: BEGIN
264: l_path_name := g_path||'do_validate_asset';
265: -- check if revaluation atleast once
266: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
267: p_full_path => l_path_name,
268: p_string => ' + check if revaluation atleast once' );
269: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
270: p_full_path => l_path_name,
265: -- check if revaluation atleast once
266: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
267: p_full_path => l_path_name,
268: p_string => ' + check if revaluation atleast once' );
269: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
270: p_full_path => l_path_name,
271: p_string => ' + check if revaluation atleast once ...' || l_asset_hdr_rec.asset_id );
272: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
273: p_full_path => l_path_name,
268: p_string => ' + check if revaluation atleast once' );
269: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
270: p_full_path => l_path_name,
271: p_string => ' + check if revaluation atleast once ...' || l_asset_hdr_rec.asset_id );
272: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
273: p_full_path => l_path_name,
274: p_string => ' + check if revaluation atleast once ...' || l_asset_hdr_rec.book_type_code);
275:
276: /* Check IF Asset is revalued at least once */
277: open c_asset_revalued(l_asset_hdr_rec.asset_id);
278: fetch c_asset_revalued into l_asset_revalued;
279: IF c_asset_revalued%NOTFOUND THEN
280: close c_asset_revalued;
281: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
282: p_full_path => l_path_name,
283: p_string => '+ No IAC revaluation atleast once');
284:
285: RETURN(FALSE);
286: END IF;
287:
288: close c_asset_revalued;
289:
290: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
291: p_full_path => l_path_name,
292: p_string => ' + check if revaluation atleast once success' );
293:
294: IF NOT (l_asset_type_rec.asset_type in ('CAPITALIZED') ) THEN
292: p_string => ' + check if revaluation atleast once success' );
293:
294: IF NOT (l_asset_type_rec.asset_type in ('CAPITALIZED') ) THEN
295: -- ERROR MESSAGE
296: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
297: p_full_path => l_path_name,
298: p_string => ' + NOT CAPITALIZED ASSET' );
299: return FALSE;
300: END IF;
356:
357:
358: EXCEPTION
359: WHEN OTHERS THEN
360: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
361:
362: l_mesg:=SQLERRM;
363: FA_SRVR_MSG.Add_Message(
364: Calling_FN => l_calling_function ,
447: );
448:
449: EXCEPTION
450: WHEN OTHERS THEN
451: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
452:
453: l_mesg:=SQLERRM;
454: FA_SRVR_MSG.Add_Message(
455: Calling_FN => l_calling_function ,
518: P_op_acct_ytd := round(P_op_acct_ytd,2);
519:
520: EXCEPTION
521: WHEN OTHERS THEN
522: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
523:
524: l_mesg:=SQLERRM;
525: FA_SRVR_MSG.Add_Message(
526: Calling_FN => l_calling_function ,
551: begin
552: l_rowid := null;
553: l_path_name := g_path||'create_acctg_entry';
554: if p_amount = 0 then
555: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
556: p_full_path => l_path_name,
557: p_string => '+amount is 0, accounting entries skipped');
558:
559: return;
624: procedure check_ccid ( p_ccid_desc in varchar2) is
625: l_path_name VARCHAR2(150);
626: begin
627: l_path_name := g_path||'check_ccid';
628: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
629: p_full_path => l_path_name,
630: p_string => '+acctg creation for '||p_ccid_desc||' failed');
631: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
632: p_full_path => l_path_name,
627: l_path_name := g_path||'check_ccid';
628: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
629: p_full_path => l_path_name,
630: p_string => '+acctg creation for '||p_ccid_desc||' failed');
631: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
632: p_full_path => l_path_name,
633: p_string => 'error create_iac_acctg');
634: end;
635:
635:
636: begin
637: l_path_name := g_path||'create_iac_acctg';
638:
639: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
640: p_full_path => l_path_name,
641: p_string => 'begin create_iac_acctg');
642: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
643: p_full_path => l_path_name,
638:
639: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
640: p_full_path => l_path_name,
641: p_string => 'begin create_iac_acctg');
642: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
643: p_full_path => l_path_name,
644: p_string => '+ Det Balances');
645: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
646: p_full_path => l_path_name,
641: p_string => 'begin create_iac_acctg');
642: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
643: p_full_path => l_path_name,
644: p_string => '+ Det Balances');
645: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
646: p_full_path => l_path_name,
647: p_string => '+ book type code'||fp_det_balances.book_type_code);
648: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
649: p_full_path => l_path_name,
644: p_string => '+ Det Balances');
645: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
646: p_full_path => l_path_name,
647: p_string => '+ book type code'||fp_det_balances.book_type_code);
648: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
649: p_full_path => l_path_name,
650: p_string => '+ asset id'||fp_det_balances.asset_id);
651: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
652: p_full_path => l_path_name,
647: p_string => '+ book type code'||fp_det_balances.book_type_code);
648: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
649: p_full_path => l_path_name,
650: p_string => '+ asset id'||fp_det_balances.asset_id);
651: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
652: p_full_path => l_path_name,
653: p_string => '+ distribution id '||fp_det_balances.distribution_id);
654: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
655: p_full_path => l_path_name,
650: p_string => '+ asset id'||fp_det_balances.asset_id);
651: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
652: p_full_path => l_path_name,
653: p_string => '+ distribution id '||fp_det_balances.distribution_id);
654: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
655: p_full_path => l_path_name,
656: p_string => '+ adjustment id '||fp_det_balances.adjustment_id);
657: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
658: p_full_path => l_path_name,
653: p_string => '+ distribution id '||fp_det_balances.distribution_id);
654: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
655: p_full_path => l_path_name,
656: p_string => '+ adjustment id '||fp_det_balances.adjustment_id);
657: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
658: p_full_path => l_path_name,
659: p_string => '+ reval reserve '||fp_det_balances.reval_reserve_cost);
660: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
661: p_full_path => l_path_name,
656: p_string => '+ adjustment id '||fp_det_balances.adjustment_id);
657: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
658: p_full_path => l_path_name,
659: p_string => '+ reval reserve '||fp_det_balances.reval_reserve_cost);
660: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
661: p_full_path => l_path_name,
662: p_string => '+ reserve backlog '||fp_det_balances.reval_reserve_backlog);
663: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
664: p_full_path => l_path_name,
659: p_string => '+ reval reserve '||fp_det_balances.reval_reserve_cost);
660: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
661: p_full_path => l_path_name,
662: p_string => '+ reserve backlog '||fp_det_balances.reval_reserve_backlog);
663: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
664: p_full_path => l_path_name,
665: p_string => '+ gen fund'||fp_det_balances.reval_reserve_gen_fund);
666: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
667: p_full_path => l_path_name,
662: p_string => '+ reserve backlog '||fp_det_balances.reval_reserve_backlog);
663: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
664: p_full_path => l_path_name,
665: p_string => '+ gen fund'||fp_det_balances.reval_reserve_gen_fund);
666: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
667: p_full_path => l_path_name,
668: p_string => '+ acct cost'||fp_det_balances.operating_acct_cost);
669: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
670: p_full_path => l_path_name,
665: p_string => '+ gen fund'||fp_det_balances.reval_reserve_gen_fund);
666: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
667: p_full_path => l_path_name,
668: p_string => '+ acct cost'||fp_det_balances.operating_acct_cost);
669: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
670: p_full_path => l_path_name,
671: p_string => '+ op acct backlog'||fp_det_balances.operating_acct_backlog);
672: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
673: p_full_path => l_path_name,
668: p_string => '+ acct cost'||fp_det_balances.operating_acct_cost);
669: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
670: p_full_path => l_path_name,
671: p_string => '+ op acct backlog'||fp_det_balances.operating_acct_backlog);
672: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
673: p_full_path => l_path_name,
674: p_string => '+ deprn ytd'||fp_det_balances.deprn_ytd);
675: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
676: p_full_path => l_path_name,
671: p_string => '+ op acct backlog'||fp_det_balances.operating_acct_backlog);
672: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
673: p_full_path => l_path_name,
674: p_string => '+ deprn ytd'||fp_det_balances.deprn_ytd);
675: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
676: p_full_path => l_path_name,
677: p_string => '+ rserv back deprn '||fp_det_balances.deprn_reserve_backlog);
678:
679:
677: p_string => '+ rserv back deprn '||fp_det_balances.deprn_reserve_backlog);
678:
679:
680: if not fp_create_acctg_flag then
681: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
682: p_full_path => l_path_name,
683: p_string => '+acctg creation not allowed');
684: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
685: p_full_path => l_path_name,
680: if not fp_create_acctg_flag then
681: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
682: p_full_path => l_path_name,
683: p_string => '+acctg creation not allowed');
684: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
685: p_full_path => l_path_name,
686: p_string => 'end create_iac_acctg');
687:
688: return true;
687:
688: return true;
689: end if;
690:
691: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
692: p_full_path => l_path_name,
693: p_string => '+acctg creation get gl information');
694:
695: if not IGI_IAC_COMMON_UTILS.GET_BOOK_GL_INFO
699: , CURRENCY => l_currency
700: , PRECISION => l_precision
701: )
702: then
703: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
704: p_full_path => l_path_name,
705: p_string => '+acctg creation unable to get gl info');
706: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
707: p_full_path => l_path_name,
702: then
703: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
704: p_full_path => l_path_name,
705: p_string => '+acctg creation unable to get gl info');
706: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
707: p_full_path => l_path_name,
708: p_string => 'end create_iac_acctg');
709:
710: return false;
709:
710: return false;
711: end if;
712: --
713: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
714: p_full_path => l_path_name,
715: p_string => '+acctg creation get all accounts');
716: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
717: p_full_path => l_path_name,
712: --
713: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
714: p_full_path => l_path_name,
715: p_string => '+acctg creation get all accounts');
716: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
717: p_full_path => l_path_name,
718: p_string => '+distribution id '|| fp_det_balances.distribution_id );
719:
720: IF NOT IGI_IAC_COMMON_UTILS.get_account_ccid
811:
812: begin
813: If fp_adjustement_type = 'OLD' Then
814:
815: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
816: p_full_path => l_path_name,
817: p_string => '+acctg creation cost vs reval reserve');
818:
819: /*create_acctg_entry ( l_dr_ccid => l_asset_cost_ccid
846: , l_report_ccid => Null
847: , p_event_id => p_event_id
848: );
849:
850: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
851: p_full_path => l_path_name,
852: p_string => '+acctg creation reval reserve vs backlog reserve');
853:
854: /*create_acctg_entry ( l_dr_ccid => l_revl_rsv_ccid
880: , l_report_ccid => l_revl_rsv_ccid
881: , p_event_id => p_event_id
882: );
883:
884: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
885: p_full_path => l_path_name,
886: p_string => '+acctg creation reval reserve vs gen fund');
887:
888:
915: , l_report_ccid => l_revl_rsv_ccid
916: , p_event_id => p_event_id
917: );
918:
919: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
920: p_full_path => l_path_name,
921: p_string => '+acctg creation op account vs cost');
922:
923: /*create_acctg_entry ( l_dr_ccid => l_op_exp_ccid
950: , l_report_ccid => l_op_exp_ccid
951: , p_event_id => p_event_id
952: );
953:
954: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
955: p_full_path => l_path_name,
956: p_string => '+acctg creation backlog vs op account');
957:
958: /*create_acctg_entry ( l_dr_ccid => l_blog_rsv_ccid
986: , p_event_id => p_event_id
987: );
988: End if;
989:
990: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
991: p_full_path => l_path_name,
992: p_string => '+acctg creation deprn reserve vs deprn expense');
993:
994: create_acctg_entry ( l_ccid => l_deprn_rsv_ccid
1018: , l_report_ccid => Null
1019: , p_event_id => p_event_id
1020: );
1021:
1022: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1023: p_full_path => l_path_name,
1024: p_string => '+acctg creation depreciation expenese for old ');
1025:
1026: create_acctg_entry ( l_ccid => l_deprn_exp_ccid
1085:
1086: /* bug 2439006 additional dep_resrver account created old category depreciation expense negation
1087: entry to the new category*/
1088:
1089: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1090: p_full_path => l_path_name,
1091: p_string => '+acctg creation depreciation expenese for new ');
1092:
1093: create_acctg_entry ( l_ccid => l_deprn_exp_ccid
1103:
1104:
1105: ELSE
1106:
1107: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1108: p_full_path => l_path_name,
1109: p_string => '+acctg creation cost vs reval reserve');
1110: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1111: p_full_path => l_path_name,
1106:
1107: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1108: p_full_path => l_path_name,
1109: p_string => '+acctg creation cost vs reval reserve');
1110: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1111: p_full_path => l_path_name,
1112: p_string => '+acctg creation cost vs reval reserve');
1113:
1114: /*create_acctg_entry ( l_dr_ccid => l_asset_cost_ccid
1140: , l_report_ccid => Null
1141: , p_event_id => p_event_id
1142: );
1143:
1144: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1145: p_full_path => l_path_name,
1146: p_string => '+acctg creation reval reserve vs backlog reserve');
1147:
1148: /*create_acctg_entry ( l_dr_ccid => l_revl_rsv_ccid
1174: , l_report_ccid => l_revl_rsv_ccid
1175: , p_event_id => p_event_id
1176: );
1177:
1178: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1179: p_full_path => l_path_name,
1180: p_string => '+acctg creation reval reserve vs gen fund');
1181:
1182: /*create_acctg_entry ( l_dr_ccid => l_revl_rsv_ccid
1208: , l_report_ccid => l_revl_rsv_ccid
1209: , p_event_id => p_event_id
1210: );
1211:
1212: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1213: p_full_path => l_path_name,
1214: p_string => '+acctg creation op account vs cost');
1215:
1216: /*create_acctg_entry ( l_dr_ccid => l_op_exp_ccid
1240: , l_report_ccid => l_op_exp_ccid,
1241: p_event_id => p_event_id
1242: );
1243:
1244: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1245: p_full_path => l_path_name,
1246: p_string => '+acctg creation backlog vs op account');
1247:
1248: /*create_acctg_entry ( l_dr_ccid => l_blog_rsv_ccid
1273: , fp_det_balances => fp_det_balances
1274: );*/
1275:
1276: -- removing these entries as per bug 2483321
1277: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1278: p_full_path => l_path_name,
1279: p_string => '+acctg creation deprn reserve vs deprn expense');
1280:
1281: create_acctg_entry ( l_ccid => l_deprn_rsv_ccid
1327:
1328: end if;
1329: end;
1330:
1331: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1332: p_full_path => l_path_name,
1333: p_string => 'end acctg creation');
1334: return true;
1335: end;
1619: l_transaction_type_code := NULL;
1620: l_adjustment_status := NULL ;
1621: l_path_name := g_path||'do_no_index_reval';
1622:
1623: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1624: p_full_path => l_path_name,
1625: p_string => ' + Index revaluation OFF - In Do_No_Index_Reval');
1626:
1627: /* Store the previous transaction adjustment id */
1635: X_Mass_Reference_ID => l_mass_reference_id,
1636: X_Adjustment_Id => l_adjustment_id_out,
1637: X_Prev_Adjustment_Id => l_prev_adjustment_id,
1638: X_Adjustment_Status => l_adjustment_status) THEN
1639: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
1640: p_full_path => l_path_name,
1641: p_string => '*** Error in fetching the latest transaction');
1642: RETURN FALSE;
1643: END IF;
1644:
1645: -- Get the current open period
1646: IF igi_iac_common_utils.get_open_period_info(l_asset_hdr_rec.book_type_code,l_prd_rec) THEN
1647: l_current_period_counter:=l_prd_rec.period_counter;
1648: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1649: p_full_path => l_path_name,
1650: p_string => ' + Current OPen Period counter' ||l_prd_rec.period_counter );
1651: END IF;
1652:
1671: l_current_period_counter,
1672: p_event_id
1673: );
1674:
1675: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1676: p_full_path => l_path_name,
1677: p_string => ' + After Insert into trans header' );
1678:
1679: -- Need to close the previous transaction to pick the latest catgeory --
1712:
1713: IF (l_impacted_dist.distribution_id IS NULL ) THEN
1714: OPEN c_impacted_dist(l_all_dist.distribution_id);
1715: FETCH c_impacted_dist INTO l_impacted_dist;
1716: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1717: p_full_path => l_path_name,
1718: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1719: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1720: p_full_path => l_path_name,
1715: FETCH c_impacted_dist INTO l_impacted_dist;
1716: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1717: p_full_path => l_path_name,
1718: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1719: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1720: p_full_path => l_path_name,
1721: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
1722:
1723: CLOSE c_impacted_dist;
1723: CLOSE c_impacted_dist;
1724: ELSE
1725: OPEN c_impacted_dist_new(l_all_dist.distribution_id,l_impacted_dist.distribution_id);
1726: FETCH c_impacted_dist_new INTO l_impacted_dist;
1727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1728: p_full_path => l_path_name,
1729: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1731: p_full_path => l_path_name,
1726: FETCH c_impacted_dist_new INTO l_impacted_dist;
1727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1728: p_full_path => l_path_name,
1729: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1731: p_full_path => l_path_name,
1732: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
1733:
1734: CLOSE c_impacted_dist_new;
1736:
1737: OPEN c_old_dist(l_all_dist.distribution_id);
1738: FETCH c_old_dist INTO l_old_dist;
1739: IF c_old_dist%NOTFOUND THEN
1740: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1741: p_full_path => l_path_name,
1742: p_string => ' No old distribution for asset found ' || l_old_dist.distribution_id);
1743: CLOSE c_old_dist;
1744: RETURN FALSE;
1743: CLOSE c_old_dist;
1744: RETURN FALSE;
1745: END IF;
1746: CLOSE c_old_dist;
1747: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1748: p_full_path => l_path_name,
1749: p_string => ' + no old distribution for asset ' || l_old_dist.distribution_id);
1750:
1751: /* get the closing det balances record form iac det balances */
1753:
1754: OPEN c_closing_det_balances(l_old_dist.distribution_id,l_prev_adjustment_id);
1755: FETCH c_closing_det_balances INTO l_closing_det_balances;
1756: IF c_closing_det_balances%NOTFOUND THEN
1757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1758: p_full_path => l_path_name,
1759: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1761: p_full_path => l_path_name,
1756: IF c_closing_det_balances%NOTFOUND THEN
1757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1758: p_full_path => l_path_name,
1759: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1761: p_full_path => l_path_name,
1762: p_string => ' + adjustement id '||l_prev_adjustment_id);
1763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1764: p_full_path => l_path_name,
1759: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1761: p_full_path => l_path_name,
1762: p_string => ' + adjustement id '||l_prev_adjustment_id);
1763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1764: p_full_path => l_path_name,
1765: p_string => ' Could not find the IAC det balances record ');
1766: CLOSE c_closing_det_balances;
1767: RETURN FALSE;
1766: CLOSE c_closing_det_balances;
1767: RETURN FALSE;
1768: END IF;
1769:
1770: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1771: p_full_path => l_path_name,
1772: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1773: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1774: p_full_path => l_path_name,
1769:
1770: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1771: p_full_path => l_path_name,
1772: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1773: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1774: p_full_path => l_path_name,
1775: p_string => ' + adjustement id '||l_prev_adjustment_id);
1776:
1777: CLOSE c_closing_det_balances;
1786: WHERE adjustment_id = l_adj_id;
1787:
1788: -- reverse the accounting entries for the existing dist ids
1789: IF create_iac_acctg ( l_closing_det_balances,TRUE,'OLD',p_event_id => p_event_id) THEN
1790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1791: p_full_path => l_path_name,
1792: p_string => '+Accounting entries created for old');
1793: ELSE
1794: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1791: p_full_path => l_path_name,
1792: p_string => '+Accounting entries created for old');
1793: ELSE
1794: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1795: p_full_path => l_path_name,
1796: p_string => 'Failed to create Accounting entries');
1797: RETURN FALSE;
1798: END IF;
1997:
1998:
1999: EXCEPTION
2000: WHEN OTHERS THEN
2001: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
2002: l_mesg:=SQLERRM;
2003: FA_SRVR_MSG.Add_Message(
2004: Calling_FN => l_calling_function ,
2005: Name => 'IGI_IAC_EXCEPTION',
2297: l_transaction_type_code := Null;
2298: l_adjustment_status := null ;
2299: l_path_name := g_path||'do_same_price_index';
2300:
2301: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2302: p_full_path => l_path_name,
2303: p_string => ' + Same price index begin ');
2304:
2305: /* Store the previous transaction adjustment id */
2319: X_Mass_Reference_ID => l_mass_reference_id,
2320: X_Adjustment_Id => l_adjustment_id_out,
2321: X_Prev_Adjustment_Id => l_prev_adjustment_id,
2322: X_Adjustment_Status => l_adjustment_status) THEN
2323: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
2324: p_full_path => l_path_name,
2325: p_string => '*** Error in fetching the latest transaction');
2326:
2327: return FALSE;
2326:
2327: return FALSE;
2328: END IF;
2329:
2330: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2331: p_full_path => l_path_name,
2332: p_string => ' + Fetch the previous transaction adjustment id '||l_prev_adjustment_id);
2333:
2334:
2334:
2335: /*Get the open period and create new transaction record in the transaction headers table */
2336: IF igi_iac_common_utils.get_open_period_info(l_asset_hdr_rec.book_type_code,l_prd_rec) THEN
2337: l_current_period_counter:=l_prd_rec.period_counter;
2338: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2339: p_full_path => l_path_name,
2340: p_string => ' + Current OPen Period counter' ||l_prd_rec.period_counter );
2341:
2342: END IF;
2345: open c_adj_id;
2346: fetch c_adj_id into l_adj_id;
2347: close c_adj_id;
2348:
2349: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2350: p_full_path => l_path_name,
2351: p_string => ' + before Insert into trans header' );
2352:
2353: /*Insert into transaction headers */
2366: l_current_period_counter,
2367: p_event_id
2368: );
2369:
2370: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2371: p_full_path => l_path_name,
2372: p_string => ' + After Insert into trans header' );
2373:
2374: /* To select the backlog data for the old distribution to be prorated into new */
2431: close c_old_dist;
2432: If (l_impacted_dist.distribution_id IS NULL ) Then
2433: open c_impacted_dist(l_all_dist.distribution_id);
2434: fetch c_impacted_dist into l_impacted_dist;
2435: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2436: p_full_path => l_path_name,
2437: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2438: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2439: p_full_path => l_path_name,
2434: fetch c_impacted_dist into l_impacted_dist;
2435: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2436: p_full_path => l_path_name,
2437: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2438: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2439: p_full_path => l_path_name,
2440: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
2441: close c_impacted_dist;
2442: Else
2441: close c_impacted_dist;
2442: Else
2443: open c_impacted_dist_new(l_all_dist.distribution_id,l_impacted_dist.distribution_id);
2444: fetch c_impacted_dist_new into l_impacted_dist;
2445: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2446: p_full_path => l_path_name,
2447: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2448: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2449: p_full_path => l_path_name,
2444: fetch c_impacted_dist_new into l_impacted_dist;
2445: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2446: p_full_path => l_path_name,
2447: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2448: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2449: p_full_path => l_path_name,
2450: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
2451:
2452: close c_impacted_dist_new;
2454:
2455: open c_old_dist(l_all_dist.distribution_id);
2456: fetch c_old_dist into l_old_dist;
2457: IF c_old_dist%NOTFOUND THEN
2458: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2459: p_full_path => l_path_name,
2460: p_string => ' No old distribution for asset found ' || l_old_dist.distribution_id);
2461:
2462: close c_old_dist;
2462: close c_old_dist;
2463: return false;
2464: End if;
2465: close c_old_dist;
2466: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2467: p_full_path => l_path_name,
2468: p_string => ' + no old distribution for asset ' || l_old_dist.distribution_id);
2469:
2470: /* get the closing det balances record form iac det balances */
2473:
2474: open c_closing_det_balances(l_old_dist.distribution_id,l_prev_adjustment_id);
2475: fetch c_closing_det_balances into l_closing_det_balances;
2476: IF c_closing_det_balances%NOTFOUND THEN
2477: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2478: p_full_path => l_path_name,
2479: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2480: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2481: p_full_path => l_path_name,
2476: IF c_closing_det_balances%NOTFOUND THEN
2477: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2478: p_full_path => l_path_name,
2479: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2480: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2481: p_full_path => l_path_name,
2482: p_string => ' + adjustement id '||l_prev_adjustment_id);
2483: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2484: p_full_path => l_path_name,
2479: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2480: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2481: p_full_path => l_path_name,
2482: p_string => ' + adjustement id '||l_prev_adjustment_id);
2483: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2484: p_full_path => l_path_name,
2485: p_string => ' Could not find the IAC det balances record ');
2486:
2487: close c_closing_det_balances;
2486:
2487: close c_closing_det_balances;
2488: return false;
2489: End if;
2490: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2491: p_full_path => l_path_name,
2492: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2493: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2494: p_full_path => l_path_name,
2489: End if;
2490: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2491: p_full_path => l_path_name,
2492: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2493: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2494: p_full_path => l_path_name,
2495: p_string => ' + adjustement id '||l_prev_adjustment_id);
2496:
2497: close c_closing_det_balances;
2505: set category_id = l_asset_cat_rec_old.category_id
2506: where adjustment_id = l_adj_id;
2507:
2508: if create_iac_acctg ( l_closing_det_balances,TRUE,'OLD',p_event_id => p_event_id) Then
2509: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2510: p_full_path => l_path_name,
2511: p_string => '+Accounting entries created for old');
2512: else
2513: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2509: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2510: p_full_path => l_path_name,
2511: p_string => '+Accounting entries created for old');
2512: else
2513: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2514: p_full_path => l_path_name,
2515: p_string => 'Failed to create Accounting entries');
2516:
2517: return false;
2588: (ALLOW_INDEX_REVAL_FLAG OR ALLOW_PROF_REVAL_FLAG) THEN
2589:
2590: l_closing_det_balances.distribution_id := l_impacted_dist.distribution_id;
2591: if create_iac_acctg ( l_closing_det_balances,TRUE,'NEW',p_event_id => p_event_id) Then
2592: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2593: p_full_path => l_path_name,
2594: p_string => '+Accounting entries created for new ');
2595:
2596: else
2593: p_full_path => l_path_name,
2594: p_string => '+Accounting entries created for new ');
2595:
2596: else
2597: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2598: p_full_path => l_path_name,
2599: p_string => 'Failed to create Accounting entries ');
2600:
2601: return false;
2641: l_closing_det_balances.distribution_id := l_impacted_dist.distribution_id;
2642: l_closing_det_balances.period_counter := l_current_period_counter;
2643: --accounting entry for YTD
2644: if create_iac_acctg ( l_closing_det_balances,TRUE,'NEW',p_event_id => p_event_id) Then
2645: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2646: p_full_path => l_path_name,
2647: p_string => '+Accounting entries created');
2648:
2649: else
2646: p_full_path => l_path_name,
2647: p_string => '+Accounting entries created');
2648:
2649: else
2650: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2651: p_full_path => l_path_name,
2652: p_string => 'Failed to create Accounting entries ');
2653:
2654: return false;
2709: Close c_get_deprn_dist;
2710: -- enchancement 2480915 maintiain the ytd values ---
2711:
2712:
2713: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2714: p_full_path => l_path_name,
2715: p_string => ' + After insert into det balances ' || l_old_dist.distribution_id);
2716:
2717: open c_closing_det_balances(l_impacted_dist.distribution_id,l_adj_id);
2716:
2717: open c_closing_det_balances(l_impacted_dist.distribution_id,l_adj_id);
2718: fetch c_closing_det_balances into l_closing_det_balances;
2719: IF c_closing_det_balances%NOTFOUND THEN
2720: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2721: p_full_path => l_path_name,
2722: p_string => ' Could not find the IAC records ');
2723:
2724: close c_closing_det_balances;
2724: close c_closing_det_balances;
2725: return false;
2726: End if;
2727:
2728: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2729: p_full_path => l_path_name,
2730: p_string => ' + old distruibution id ' || l_impacted_dist.distribution_id);
2731: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2732: p_full_path => l_path_name,
2727:
2728: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2729: p_full_path => l_path_name,
2730: p_string => ' + old distruibution id ' || l_impacted_dist.distribution_id);
2731: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2732: p_full_path => l_path_name,
2733: p_string => ' + adjustement id '|| l_adj_id);
2734:
2735:
2869:
2870:
2871:
2872: /*Terminate the previous active row with the adjustment_id_out in transaction_headers table*/
2873: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2874: p_full_path => l_path_name,
2875: p_string => ' close the prevooius adjusment');
2876: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2877: p_full_path => l_path_name,
2872: /*Terminate the previous active row with the adjustment_id_out in transaction_headers table*/
2873: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2874: p_full_path => l_path_name,
2875: p_string => ' close the prevooius adjusment');
2876: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2877: p_full_path => l_path_name,
2878: p_string => 'old adjusment id ' || l_adjustment_id_out);
2879: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2880: p_full_path => l_path_name,
2875: p_string => ' close the prevooius adjusment');
2876: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2877: p_full_path => l_path_name,
2878: p_string => 'old adjusment id ' || l_adjustment_id_out);
2879: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2880: p_full_path => l_path_name,
2881: p_string => 'current adjusment id ' || l_adj_id);
2882:
2883: IGI_IAC_TRANS_HEADERS_PKG.update_row (
2890:
2891:
2892: EXCEPTION
2893: WHEN OTHERS THEN
2894: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
2895: l_mesg:=SQLERRM;
2896: FA_SRVR_MSG.Add_Message(
2897: Calling_FN => l_calling_function ,
2898: Name => 'IGI_IAC_EXCEPTION',
2910: PROCEDURE Debug_Period(p_period igi_iac_types.prd_rec) IS
2911: l_path_name VARCHAR2(150);
2912: BEGIN
2913: l_path_name := g_path||'debug_period';
2914: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2915: p_full_path => l_path_name,
2916: p_string => ' Period counter :'||to_char(p_period.period_counter));
2917: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2918: p_full_path => l_path_name,
2913: l_path_name := g_path||'debug_period';
2914: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2915: p_full_path => l_path_name,
2916: p_string => ' Period counter :'||to_char(p_period.period_counter));
2917: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2918: p_full_path => l_path_name,
2919: p_string => ' Period Num :'||to_char(p_period.period_num));
2920: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2921: p_full_path => l_path_name,
2916: p_string => ' Period counter :'||to_char(p_period.period_counter));
2917: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2918: p_full_path => l_path_name,
2919: p_string => ' Period Num :'||to_char(p_period.period_num));
2920: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2921: p_full_path => l_path_name,
2922: p_string => ' Fiscal Year :'||to_char(p_period.fiscal_year));
2923: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2924: p_full_path => l_path_name,
2919: p_string => ' Period Num :'||to_char(p_period.period_num));
2920: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2921: p_full_path => l_path_name,
2922: p_string => ' Fiscal Year :'||to_char(p_period.fiscal_year));
2923: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2924: p_full_path => l_path_name,
2925: p_string => ' Period Name :'||p_period.period_name);
2926:
2927: END Debug_Period;
2929: PROCEDURE Debug_Asset(p_asset igi_iac_types.iac_reval_input_asset) IS
2930: l_path_name VARCHAR2(150);
2931: BEGIN
2932: l_path_name := g_path||'debug_asset';
2933: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2934: p_full_path => l_path_name,
2935: p_string => ' Net book value :'||to_char(p_asset.net_book_value));
2936: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2937: p_full_path => l_path_name,
2932: l_path_name := g_path||'debug_asset';
2933: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2934: p_full_path => l_path_name,
2935: p_string => ' Net book value :'||to_char(p_asset.net_book_value));
2936: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2937: p_full_path => l_path_name,
2938: p_string => ' Adjusted Cost :'||to_char(p_asset.adjusted_cost));
2939: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2940: p_full_path => l_path_name,
2935: p_string => ' Net book value :'||to_char(p_asset.net_book_value));
2936: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2937: p_full_path => l_path_name,
2938: p_string => ' Adjusted Cost :'||to_char(p_asset.adjusted_cost));
2939: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2940: p_full_path => l_path_name,
2941: p_string => ' Operating Account :'||to_char(p_asset.operating_acct));
2942: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2943: p_full_path => l_path_name,
2938: p_string => ' Adjusted Cost :'||to_char(p_asset.adjusted_cost));
2939: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2940: p_full_path => l_path_name,
2941: p_string => ' Operating Account :'||to_char(p_asset.operating_acct));
2942: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2943: p_full_path => l_path_name,
2944: p_string => ' Reval Reserve :'||to_char(p_asset.reval_reserve));
2945: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2946: p_full_path => l_path_name,
2941: p_string => ' Operating Account :'||to_char(p_asset.operating_acct));
2942: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2943: p_full_path => l_path_name,
2944: p_string => ' Reval Reserve :'||to_char(p_asset.reval_reserve));
2945: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2946: p_full_path => l_path_name,
2947: p_string => ' Deprn Amount :'||to_char(p_asset.deprn_amount));
2948: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2949: p_full_path => l_path_name,
2944: p_string => ' Reval Reserve :'||to_char(p_asset.reval_reserve));
2945: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2946: p_full_path => l_path_name,
2947: p_string => ' Deprn Amount :'||to_char(p_asset.deprn_amount));
2948: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2949: p_full_path => l_path_name,
2950: p_string => ' Deprn Reserve :'||to_char(p_asset.deprn_reserve));
2951: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2952: p_full_path => l_path_name,
2947: p_string => ' Deprn Amount :'||to_char(p_asset.deprn_amount));
2948: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2949: p_full_path => l_path_name,
2950: p_string => ' Deprn Reserve :'||to_char(p_asset.deprn_reserve));
2951: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2952: p_full_path => l_path_name,
2953: p_string => ' Backlog Deprn Reserve :'||to_char(p_asset.backlog_deprn_reserve));
2954: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2955: p_full_path => l_path_name,
2950: p_string => ' Deprn Reserve :'||to_char(p_asset.deprn_reserve));
2951: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2952: p_full_path => l_path_name,
2953: p_string => ' Backlog Deprn Reserve :'||to_char(p_asset.backlog_deprn_reserve));
2954: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2955: p_full_path => l_path_name,
2956: p_string => ' General Fund :'||to_char(p_asset.general_fund));
2957: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2958: p_full_path => l_path_name,
2953: p_string => ' Backlog Deprn Reserve :'||to_char(p_asset.backlog_deprn_reserve));
2954: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2955: p_full_path => l_path_name,
2956: p_string => ' General Fund :'||to_char(p_asset.general_fund));
2957: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2958: p_full_path => l_path_name,
2959: p_string => ' Current Reval Factor :'||to_char(p_asset.current_reval_factor));
2960: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2961: p_full_path => l_path_name,
2956: p_string => ' General Fund :'||to_char(p_asset.general_fund));
2957: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2958: p_full_path => l_path_name,
2959: p_string => ' Current Reval Factor :'||to_char(p_asset.current_reval_factor));
2960: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2961: p_full_path => l_path_name,
2962: p_string => ' Cumulative Reval Factor :'||to_char(p_asset.Cumulative_reval_factor));
2963:
2964: END Debug_Asset;
3054: l_user_id := fnd_global.user_id;
3055: l_login_id := fnd_global.login_id;
3056: l_path_name := g_path||'do_revaluation_catchup';
3057:
3058: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3059: p_full_path => l_path_name,
3060: p_string => '=========================================');
3061: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3062: p_full_path => l_path_name,
3057:
3058: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3059: p_full_path => l_path_name,
3060: p_string => '=========================================');
3061: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3062: p_full_path => l_path_name,
3063: p_string => 'Start of IAC Prior Additions Processing....');
3064: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3065: p_full_path => l_path_name,
3060: p_string => '=========================================');
3061: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3062: p_full_path => l_path_name,
3063: p_string => 'Start of IAC Prior Additions Processing....');
3064: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3065: p_full_path => l_path_name,
3066: p_string => '-----Parameters from FA code hook-----------');
3067: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3068: p_full_path => l_path_name,
3063: p_string => 'Start of IAC Prior Additions Processing....');
3064: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3065: p_full_path => l_path_name,
3066: p_string => '-----Parameters from FA code hook-----------');
3067: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3068: p_full_path => l_path_name,
3069: p_string => ' Book type code :'||p_book_type_code);
3070: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3071: p_full_path => l_path_name,
3066: p_string => '-----Parameters from FA code hook-----------');
3067: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3068: p_full_path => l_path_name,
3069: p_string => ' Book type code :'||p_book_type_code);
3070: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3071: p_full_path => l_path_name,
3072: p_string => ' Category Id :'||to_char(p_category_id));
3073: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3074: p_full_path => l_path_name,
3069: p_string => ' Book type code :'||p_book_type_code);
3070: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3071: p_full_path => l_path_name,
3072: p_string => ' Category Id :'||to_char(p_category_id));
3073: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3074: p_full_path => l_path_name,
3075: p_string => ' Asset Id :'||to_char(p_asset_id));
3076: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3077: p_full_path => l_path_name,
3072: p_string => ' Category Id :'||to_char(p_category_id));
3073: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3074: p_full_path => l_path_name,
3075: p_string => ' Asset Id :'||to_char(p_asset_id));
3076: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3077: p_full_path => l_path_name,
3078: p_string => '--------------------------------------------');
3079:
3080:
3089:
3090: IF NOT igi_iac_common_utils.get_dpis_period_counter(p_book_type_code,
3091: p_asset_id,
3092: l_dpis_period_counter) THEN
3093: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3094: p_full_path => l_path_name,
3095: p_string => '*** Error in Fetching DPIS period counter');
3096: return FALSE;
3097: END IF;
3097: END IF;
3098:
3099: IF NOT igi_iac_common_utils.get_open_period_info(p_book_type_code,
3100: l_open_period) THEN
3101: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3102: p_full_path => l_path_name,
3103: p_string => '*** Error in Fetching Open period info for book');
3104: return FALSE;
3105: END IF;
3108: FETCH c_period_num_for_catchup INTO l_period_num_for_catchup;
3109: CLOSE c_period_num_for_catchup;
3110:
3111:
3112: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3113: p_full_path => l_path_name,
3114: p_string => ' Revaluation catchup period for the book :'||to_char(l_period_num_for_catchup));
3115: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3116: p_full_path => l_path_name,
3111:
3112: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3113: p_full_path => l_path_name,
3114: p_string => ' Revaluation catchup period for the book :'||to_char(l_period_num_for_catchup));
3115: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3116: p_full_path => l_path_name,
3117: p_string => '------- Revaluation catchup periods for the asset -------');
3118:
3119: /* get the first revaluation period */
3130:
3131: IF NOT igi_iac_common_utils.get_period_info_for_counter(p_book_type_code,
3132: l_period_counter,
3133: l_period_info) THEN
3134: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3135: p_full_path => l_path_name,
3136: p_string => '*** Error in fetching period info');
3137:
3138: return FALSE;
3141:
3142:
3143: IF (l_period_num_for_catchup = l_period_info.period_num) THEN
3144: Debug_Period(l_period_info);
3145: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3146: p_full_path => l_path_name,
3147: p_string => 'catch up Reval period ' || to_char(l_period_counter));
3148:
3149: l_idx1 := l_idx1 + 1;
3156:
3157: END IF;
3158: END LOOP;
3159:
3160: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3161: p_full_path => l_path_name,
3162: p_string => '------------------------------------------------------');
3163:
3164: /* Get the number of professional revaluations done and intialize the structure */
3161: p_full_path => l_path_name,
3162: p_string => '------------------------------------------------------');
3163:
3164: /* Get the number of professional revaluations done and intialize the structure */
3165: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3166: p_full_path => l_path_name,
3167: p_string => 'Get the number of professional revaluations done and intialize the structure');
3168:
3169: IF l_idx1 = 0 then
3171:
3172: IF NOT igi_iac_common_utils.get_period_info_for_counter(p_book_type_code,
3173: l_period_counter,
3174: l_period_info) THEN
3175: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3176: p_full_path => l_path_name,
3177: p_string => '*** Error in fetching period info');
3178:
3179: return FALSE;
3182: FOR l_prof_occ_reval_periods in c_prof_occ_reval_periods LOOP
3183:
3184: IF (l_prof_occ_reval_periods.revaluation_period = l_period_counter) THEN
3185: Debug_Period(l_period_info);
3186: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3187: p_full_path => l_path_name,
3188: p_string => ' Reval period ' || to_char(l_period_counter));
3189: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3190: p_full_path => l_path_name,
3185: Debug_Period(l_period_info);
3186: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3187: p_full_path => l_path_name,
3188: p_string => ' Reval period ' || to_char(l_period_counter));
3189: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3190: p_full_path => l_path_name,
3191: p_string => ' Reval type ' || l_prof_occ_reval_periods.revaluation_type);
3192: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3193: p_full_path => l_path_name,
3188: p_string => ' Reval period ' || to_char(l_period_counter));
3189: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3190: p_full_path => l_path_name,
3191: p_string => ' Reval type ' || l_prof_occ_reval_periods.revaluation_type);
3192: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3193: p_full_path => l_path_name,
3194: p_string => ' Reval new cost '|| l_prof_occ_reval_periods.new_cost);
3195: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3196: p_full_path => l_path_name,
3191: p_string => ' Reval type ' || l_prof_occ_reval_periods.revaluation_type);
3192: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3193: p_full_path => l_path_name,
3194: p_string => ' Reval new cost '|| l_prof_occ_reval_periods.new_cost);
3195: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3196: p_full_path => l_path_name,
3197: p_string => ' Reval current cost '|| l_prof_occ_reval_periods.current_cost);
3198:
3199: l_idx1 := l_idx1 + 1;
3210: END LOOP;
3211: END LOOP;
3212: END IF;
3213:
3214: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3215: p_full_path => l_path_name,
3216: p_string => '------------------------------------------------------');
3217: /* Get the number of professional revaluations done and intialize the structure */
3218:
3217: /* Get the number of professional revaluations done and intialize the structure */
3218:
3219:
3220: IF (l_idx1 = 0) THEN /* No catch-up required */
3221: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3222: p_full_path => l_path_name,
3223: p_string => ' No revaluation catchup periods found');
3224:
3225: return TRUE;
3234: NULL,
3235: l_fa_deprn_amount_py,
3236: l_fa_deprn_amount_cy,
3237: l_last_asset_period) THEN
3238: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3239: p_full_path => l_path_name,
3240: p_string => '*** Error in get_FA_Deprn_Expense function');
3241:
3242: return FALSE;
3248: FETCH c_fa_books into l_salvage_value,
3249: l_cost;
3250: CLOSE c_fa_books;
3251: IF l_salvage_value <> 0 Then
3252: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3253: p_full_path => l_path_name,
3254: p_string => '+Salavge Value Correction deprn_amount_py before :' ||l_fa_deprn_amount_py);
3255:
3256: -- deprn amount l_fa_deprn_amount_py
3259: P_value=>l_fa_deprn_amount_py,
3260: P_cost=>l_cost,
3261: P_salvage_value=>l_salvage_value,
3262: P_calling_program=>'RECLASS') THEN
3263: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3264: p_full_path => l_path_name,
3265: p_string => '+Salvage Value Correction Failed : ');
3266:
3267: return false;
3266:
3267: return false;
3268: END IF;
3269:
3270: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3271: p_full_path => l_path_name,
3272: p_string => '+Salavge Value Correction deprn_amount_py after :' ||l_fa_deprn_amount_py );
3273: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3274: p_full_path => l_path_name,
3269:
3270: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3271: p_full_path => l_path_name,
3272: p_string => '+Salavge Value Correction deprn_amount_py after :' ||l_fa_deprn_amount_py );
3273: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3274: p_full_path => l_path_name,
3275: p_string => '+Salavge Value Correction deprn_amount_cy before :' ||l_fa_deprn_amount_cy);
3276:
3277:
3282: P_cost=>l_cost,
3283: P_salvage_value=>l_salvage_value,
3284: P_calling_program=>'RECLASS') THEN
3285:
3286: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3287: p_full_path => l_path_name,
3288: p_string => '+Salvage Value Correction Failed : ');
3289:
3290: return false;
3289:
3290: return false;
3291: END IF;
3292:
3293: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3294: p_full_path => l_path_name,
3295: p_string => '+Salavge Value Correction deprn_amount_cy after :' ||l_fa_deprn_amount_cy);
3296:
3297: END IF;
3296:
3297: END IF;
3298: /*salvage value correction*/
3299:
3300: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3301: p_full_path => l_path_name,
3302: p_string => ' Calling Revaluation Initialization program ');
3303:
3304: IF NOT igi_iac_catchup_pkg.do_reval_init_struct(l_open_period.period_counter,
3318: l_fa_deprn_amount_cy, -- For bug 2961656
3319: l_last_asset_period, -- For bug 2961656
3320: 'RECLASS') THEN
3321:
3322: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3323: p_full_path => l_path_name,
3324: p_string => '*** Error in catchup pkg for revaluation initialization');
3325:
3326: return FALSE;
3325:
3326: return FALSE;
3327: END IF;
3328:
3329: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3330: p_full_path => l_path_name,
3331: p_string => ' Back from Revaluation Initialization');
3332:
3333: FOR l_idx2 IN 1..l_idx1 LOOP
3335: IF (l_idx2 <> 1) THEN
3336:
3337: l_reval_asset := l_reval_output_asset(l_idx2 - 1);
3338:
3339: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3340: p_full_path => l_path_name,
3341: p_string => ' Doing depreciation catchup for the periods between revaluation');
3342:
3343: IF NOT igi_iac_catchup_pkg.do_deprn_catchup(l_reval_asset_params(l_idx2 - 1).period_counter +1,
3351: NULL, -- For bug 2961656
3352: NULL, -- For bug 2961656
3353: l_reval_asset ,
3354: p_event_id => p_event_id)THEN
3355: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3356: p_full_path => l_path_name,
3357: p_string => '*** Error in depreciation catchup');
3358:
3359: return FALSE;
3358:
3359: return FALSE;
3360: END IF;
3361:
3362: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3363: p_full_path => l_path_name,
3364: p_string => 'Back from depreciation catchup');
3365:
3366:
3445: NULL);*/
3446:
3447: /* Last revaluation - Insert records into revaluation tables*/
3448:
3449: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3450: p_full_path => l_path_name,
3451: p_string => ' Last Revaluation - Inserting into igi_iac_revaluations');
3452:
3453:
3465: NULL,
3466: 'ADDITION',
3467: X_event_id => p_event_id);
3468:
3469: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3470: p_full_path => l_path_name,
3471: p_string => ' Revaluation Id :'||to_char(l_revaluation_id));
3472:
3473: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3469: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3470: p_full_path => l_path_name,
3471: p_string => ' Revaluation Id :'||to_char(l_revaluation_id));
3472:
3473: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3474: p_full_path => l_path_name,
3475: p_string => ' Inserting into igi_iac_reval_asset_rules');
3476:
3477: l_rowid := NULL;
3495: l_reval_input_asset(l_idx2).period_counter := l_open_period.period_counter ;
3496: l_reval_asset_params(l_idx2).revaluation_id := l_revaluation_id;
3497: l_reval_asset_rules(l_idx2).revaluation_id := l_revaluation_id;
3498:
3499: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3500: p_full_path => l_path_name,
3501: p_string => ' Period counter passed to Reval CRUD :'||to_char(l_open_period.period_counter ));
3502:
3503:
3516: l_reval_params.fa_asset_info := l_fa_asset_info(l_idx2);
3517:
3518: /* call revaluation processing function here */
3519:
3520: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3521: p_full_path => l_path_name,
3522: p_string => ' Input asset balances to revaluation program');
3523:
3524:
3525: Debug_Asset(l_reval_input_asset(l_idx2));
3526:
3527: IF NOT igi_iac_reval_wrapper.do_reval_calc_asset(l_reval_params,
3528: l_reval_asset_out) THEN
3529: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3530: p_full_path => l_path_name,
3531: p_string => '*** Error in Revaluation Program');
3532:
3533: return FALSE;
3541:
3542: /* Bug 2425856 vgadde 20/06/2002 Start(1) */
3543: BEGIN
3544: IF (l_idx2 = l_idx1) THEN /* Last Revaluation */
3545: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3546: p_full_path => l_path_name,
3547: p_string => ' Last revaluation period :'||to_char(l_last_reval_period));
3548: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3549: p_full_path => l_path_name,
3544: IF (l_idx2 = l_idx1) THEN /* Last Revaluation */
3545: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3546: p_full_path => l_path_name,
3547: p_string => ' Last revaluation period :'||to_char(l_last_reval_period));
3548: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3549: p_full_path => l_path_name,
3550: p_string => ' Revaluation Id :'||to_char(l_revaluation_id));
3551:
3552:
3556: AND asset_id = p_asset_id
3557: AND book_type_code = p_book_type_code;
3558:
3559: IF SQL%FOUND then
3560: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3561: p_full_path => l_path_name,
3562: p_string => ' Records in reval rates updated for correct period');
3563: ELSE
3564: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3560: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3561: p_full_path => l_path_name,
3562: p_string => ' Records in reval rates updated for correct period');
3563: ELSE
3564: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3565: p_full_path => l_path_name,
3566: p_string => '*** No record found in reval rates table to update');
3567:
3568: return FALSE;
3574: END LOOP;
3575:
3576: IF (l_last_reval_period < l_open_period.period_counter) THEN
3577:
3578: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3579: p_full_path => l_path_name,
3580: p_string => ' Doing the final catchup for depreciation');
3581:
3582:
3592: NULL, -- For bug 2961656
3593: NULL, -- For bug 2961656
3594: l_reval_asset ,
3595: p_event_id => p_event_id)THEN
3596: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3597: p_full_path => l_path_name,
3598: p_string => '*** Error in depreciation catchup for final run' );
3599:
3600: return FALSE;
3599:
3600: return FALSE;
3601: END IF;
3602:
3603: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3604: p_full_path => l_path_name,
3605: p_string => ' Output from final catchup');
3606:
3607: Debug_Asset(l_reval_asset);
3630: AND PERIOD_COUNTER = l_open_period.period_counter
3631: AND TRANSACTION_TYPE_CODE = 'RECLASS'
3632: AND EVENT_ID IS NULL;
3633:
3634: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3635: p_full_path => l_path_name,
3636: p_string => ' Updated all reclass trasactions with event_id');
3637: EXCEPTION
3638: WHEN NO_DATA_FOUND THEN
3643: return TRUE;
3644:
3645: EXCEPTION
3646: WHEN OTHERS THEN
3647: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
3648: return FALSE;
3649:
3650:
3651: END Do_Revaluation_Catchup;
3675: l_transaction_type_code := Null;
3676: l_adjustment_status := null ;
3677: l_path_name := g_path||'do_diff_price_index';
3678:
3679: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3680: p_full_path => l_path_name,
3681: p_string => 'Enter The Do different price index');
3682:
3683: l_get_latest_adjustment_id:=0;
3684: /* Create a new transaction header for RECLASS reversal of the det balances and
3685: create the adjustments accordingly */
3686: /* to do this call the same price index */
3687: IF Do_same_price_index(p_event_id) then
3688: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3689: p_full_path => l_path_name,
3690: p_string => '+DIFF PRICE INDEX RECLASS REVERSAL SUCCESS');
3691: ELSE
3692: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3688: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3689: p_full_path => l_path_name,
3690: p_string => '+DIFF PRICE INDEX RECLASS REVERSAL SUCCESS');
3691: ELSE
3692: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3693: p_full_path => l_path_name,
3694: p_string => 'DIFFERENT PRICE INDEX RECLASS NEGATION FAILED ');
3695:
3696: return false;
3708: l_asset_cat_rec_new.category_id,
3709: 'RECLASS',
3710: p_event_id => p_event_id)THEN
3711:
3712: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3713: p_full_path => l_path_name,
3714: p_string => 'FAILED TO DO DIFFERENT PRICE INDEX RECLASSIFICATION');
3715:
3716: return false;
3721: OPEN C_Reval_Rates;
3722: FETCH C_Reval_Rates into l_get_latest_adjustment_id;
3723: CLOSE C_Reval_Rates;
3724: IF NOT IGI_IAC_REVAL_CRUD.update_reval_rates (fp_adjustment_id => l_get_latest_adjustment_id) THEN
3725: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3726: p_full_path => l_path_name,
3727: p_string => 'FAILED UPDATE REVAL RATES');
3728: END IF;
3729:
3726: p_full_path => l_path_name,
3727: p_string => 'FAILED UPDATE REVAL RATES');
3728: END IF;
3729:
3730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3731: p_full_path => l_path_name,
3732: p_string => 'SUCESSFULL DIFF PRICE INDEX');
3733:
3734: return True;
3744: PROCEDURE Print_Parameter_values is
3745: l_path_name VARCHAR2(150);
3746: BEGIN
3747: l_path_name := g_path||'print_parameter_values';
3748: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3749: p_full_path => l_path_name,
3750: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3751: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3752: p_full_path => l_path_name,
3747: l_path_name := g_path||'print_parameter_values';
3748: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3749: p_full_path => l_path_name,
3750: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3751: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3752: p_full_path => l_path_name,
3753: p_string => ' +ASSET_TRANS_HDR_REC');
3754: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3755: p_full_path => l_path_name,
3750: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3751: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3752: p_full_path => l_path_name,
3753: p_string => ' +ASSET_TRANS_HDR_REC');
3754: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3755: p_full_path => l_path_name,
3756: p_string => ' +TRANSACTION_HEADER_ID.......... '||l_trans_rec.TRANSACTION_HEADER_ID );
3757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3758: p_full_path => l_path_name,
3753: p_string => ' +ASSET_TRANS_HDR_REC');
3754: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3755: p_full_path => l_path_name,
3756: p_string => ' +TRANSACTION_HEADER_ID.......... '||l_trans_rec.TRANSACTION_HEADER_ID );
3757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3758: p_full_path => l_path_name,
3759: p_string => ' +TRANSACTION_TYPE_CODE.......... '||l_trans_rec.TRANSACTION_TYPE_CODE );
3760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3761: p_full_path => l_path_name,
3756: p_string => ' +TRANSACTION_HEADER_ID.......... '||l_trans_rec.TRANSACTION_HEADER_ID );
3757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3758: p_full_path => l_path_name,
3759: p_string => ' +TRANSACTION_TYPE_CODE.......... '||l_trans_rec.TRANSACTION_TYPE_CODE );
3760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3761: p_full_path => l_path_name,
3762: p_string => ' +TRANSACTION_DATE_ENTERED....... '||l_trans_rec.TRANSACTION_DATE_ENTERED );
3763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3764: p_full_path => l_path_name,
3759: p_string => ' +TRANSACTION_TYPE_CODE.......... '||l_trans_rec.TRANSACTION_TYPE_CODE );
3760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3761: p_full_path => l_path_name,
3762: p_string => ' +TRANSACTION_DATE_ENTERED....... '||l_trans_rec.TRANSACTION_DATE_ENTERED );
3763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3764: p_full_path => l_path_name,
3765: p_string => ' +TRANSACTION_NAME............... '||l_trans_rec.TRANSACTION_NAME);
3766: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3767: p_full_path => l_path_name,
3762: p_string => ' +TRANSACTION_DATE_ENTERED....... '||l_trans_rec.TRANSACTION_DATE_ENTERED );
3763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3764: p_full_path => l_path_name,
3765: p_string => ' +TRANSACTION_NAME............... '||l_trans_rec.TRANSACTION_NAME);
3766: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3767: p_full_path => l_path_name,
3768: p_string => ' +SOURCE_TRANSACTION_HEADER_ID... '||l_trans_rec.SOURCE_TRANSACTION_HEADER_ID);
3769: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3770: p_full_path => l_path_name,
3765: p_string => ' +TRANSACTION_NAME............... '||l_trans_rec.TRANSACTION_NAME);
3766: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3767: p_full_path => l_path_name,
3768: p_string => ' +SOURCE_TRANSACTION_HEADER_ID... '||l_trans_rec.SOURCE_TRANSACTION_HEADER_ID);
3769: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3770: p_full_path => l_path_name,
3771: p_string => ' +MASS_REFERENCE_ID.............. '|| l_trans_rec.MASS_REFERENCE_ID);
3772: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3773: p_full_path => l_path_name,
3768: p_string => ' +SOURCE_TRANSACTION_HEADER_ID... '||l_trans_rec.SOURCE_TRANSACTION_HEADER_ID);
3769: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3770: p_full_path => l_path_name,
3771: p_string => ' +MASS_REFERENCE_ID.............. '|| l_trans_rec.MASS_REFERENCE_ID);
3772: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3773: p_full_path => l_path_name,
3774: p_string => ' +TRANSACTION_SUBTYPE............ '|| l_trans_rec.TRANSACTION_SUBTYPE);
3775: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3776: p_full_path => l_path_name,
3771: p_string => ' +MASS_REFERENCE_ID.............. '|| l_trans_rec.MASS_REFERENCE_ID);
3772: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3773: p_full_path => l_path_name,
3774: p_string => ' +TRANSACTION_SUBTYPE............ '|| l_trans_rec.TRANSACTION_SUBTYPE);
3775: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3776: p_full_path => l_path_name,
3777: p_string => ' +TRANSACTION_KEY................ '|| l_trans_rec.TRANSACTION_KEY);
3778: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3779: p_full_path => l_path_name,
3774: p_string => ' +TRANSACTION_SUBTYPE............ '|| l_trans_rec.TRANSACTION_SUBTYPE);
3775: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3776: p_full_path => l_path_name,
3777: p_string => ' +TRANSACTION_KEY................ '|| l_trans_rec.TRANSACTION_KEY);
3778: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3779: p_full_path => l_path_name,
3780: p_string => ' +AMORTIZATION_START_DATE........ '||l_trans_rec.AMORTIZATION_START_DATE);
3781: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3782: p_full_path => l_path_name,
3777: p_string => ' +TRANSACTION_KEY................ '|| l_trans_rec.TRANSACTION_KEY);
3778: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3779: p_full_path => l_path_name,
3780: p_string => ' +AMORTIZATION_START_DATE........ '||l_trans_rec.AMORTIZATION_START_DATE);
3781: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3782: p_full_path => l_path_name,
3783: p_string => ' +CALLING_INTERFACE.............. '||l_trans_rec.CALLING_INTERFACE);
3784: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3785: p_full_path => l_path_name,
3780: p_string => ' +AMORTIZATION_START_DATE........ '||l_trans_rec.AMORTIZATION_START_DATE);
3781: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3782: p_full_path => l_path_name,
3783: p_string => ' +CALLING_INTERFACE.............. '||l_trans_rec.CALLING_INTERFACE);
3784: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3785: p_full_path => l_path_name,
3786: p_string => ' +MASS_TRANSACTION_ID............ '||l_trans_rec.MASS_TRANSACTION_ID);
3787: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3788: p_full_path => l_path_name,
3783: p_string => ' +CALLING_INTERFACE.............. '||l_trans_rec.CALLING_INTERFACE);
3784: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3785: p_full_path => l_path_name,
3786: p_string => ' +MASS_TRANSACTION_ID............ '||l_trans_rec.MASS_TRANSACTION_ID);
3787: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3788: p_full_path => l_path_name,
3789: p_string => ' +ASSET_HDR_REC');
3790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3791: p_full_path => l_path_name,
3786: p_string => ' +MASS_TRANSACTION_ID............ '||l_trans_rec.MASS_TRANSACTION_ID);
3787: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3788: p_full_path => l_path_name,
3789: p_string => ' +ASSET_HDR_REC');
3790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3791: p_full_path => l_path_name,
3792: p_string => ' +ASSET_ID....................... '|| l_asset_hdr_rec.ASSET_ID );
3793: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3794: p_full_path => l_path_name,
3789: p_string => ' +ASSET_HDR_REC');
3790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3791: p_full_path => l_path_name,
3792: p_string => ' +ASSET_ID....................... '|| l_asset_hdr_rec.ASSET_ID );
3793: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3794: p_full_path => l_path_name,
3795: p_string => ' +BOOK_TYPE_CODE................. '|| l_asset_hdr_rec.BOOK_TYPE_CODE );
3796: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3797: p_full_path => l_path_name,
3792: p_string => ' +ASSET_ID....................... '|| l_asset_hdr_rec.ASSET_ID );
3793: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3794: p_full_path => l_path_name,
3795: p_string => ' +BOOK_TYPE_CODE................. '|| l_asset_hdr_rec.BOOK_TYPE_CODE );
3796: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3797: p_full_path => l_path_name,
3798: p_string => ' +SET_OF_BOOKS_ID................ '|| l_asset_hdr_rec.SET_OF_BOOKS_ID);
3799: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3800: p_full_path => l_path_name,
3795: p_string => ' +BOOK_TYPE_CODE................. '|| l_asset_hdr_rec.BOOK_TYPE_CODE );
3796: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3797: p_full_path => l_path_name,
3798: p_string => ' +SET_OF_BOOKS_ID................ '|| l_asset_hdr_rec.SET_OF_BOOKS_ID);
3799: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3800: p_full_path => l_path_name,
3801: p_string => ' +PERIOD_OF_ADDITION............. '||l_asset_hdr_rec.PERIOD_OF_ADDITION);
3802: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3803: p_full_path => l_path_name,
3798: p_string => ' +SET_OF_BOOKS_ID................ '|| l_asset_hdr_rec.SET_OF_BOOKS_ID);
3799: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3800: p_full_path => l_path_name,
3801: p_string => ' +PERIOD_OF_ADDITION............. '||l_asset_hdr_rec.PERIOD_OF_ADDITION);
3802: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3803: p_full_path => l_path_name,
3804: p_string => ' +ASSET_CAT_REC_OLD');
3805: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3806: p_full_path => l_path_name,
3801: p_string => ' +PERIOD_OF_ADDITION............. '||l_asset_hdr_rec.PERIOD_OF_ADDITION);
3802: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3803: p_full_path => l_path_name,
3804: p_string => ' +ASSET_CAT_REC_OLD');
3805: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3806: p_full_path => l_path_name,
3807: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_old.category_id);
3808: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3809: p_full_path => l_path_name,
3804: p_string => ' +ASSET_CAT_REC_OLD');
3805: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3806: p_full_path => l_path_name,
3807: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_old.category_id);
3808: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3809: p_full_path => l_path_name,
3810: p_string => ' +ASSET_CAT_REC_NEW');
3811: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3812: p_full_path => l_path_name,
3807: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_old.category_id);
3808: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3809: p_full_path => l_path_name,
3810: p_string => ' +ASSET_CAT_REC_NEW');
3811: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3812: p_full_path => l_path_name,
3813: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_new.category_id);
3814: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3815: p_full_path => l_path_name,
3810: p_string => ' +ASSET_CAT_REC_NEW');
3811: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3812: p_full_path => l_path_name,
3813: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_new.category_id);
3814: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3815: p_full_path => l_path_name,
3816: p_string => ' +ASSET_TYPE_REC');
3817: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3818: p_full_path => l_path_name,
3813: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_new.category_id);
3814: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3815: p_full_path => l_path_name,
3816: p_string => ' +ASSET_TYPE_REC');
3817: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3818: p_full_path => l_path_name,
3819: p_string => ' +ASSET_TYPE..................... '|| l_asset_type_rec.asset_type );
3820: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3821: p_full_path => l_path_name,
3816: p_string => ' +ASSET_TYPE_REC');
3817: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3818: p_full_path => l_path_name,
3819: p_string => ' +ASSET_TYPE..................... '|| l_asset_type_rec.asset_type );
3820: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3821: p_full_path => l_path_name,
3822: p_string => ' +CALLING FUNCTION................... ' || l_calling_function);
3823: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3824: p_full_path => l_path_name,
3819: p_string => ' +ASSET_TYPE..................... '|| l_asset_type_rec.asset_type );
3820: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3821: p_full_path => l_path_name,
3822: p_string => ' +CALLING FUNCTION................... ' || l_calling_function);
3823: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3824: p_full_path => l_path_name,
3825: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3826: END;
3827:
3875: l_chart_of_accounts_id :=0;
3876: l_precision :=0;
3877: l_path_name := g_path||'do_reclass';
3878:
3879: /* igi_iac_debug_pkg.debug_on('RECLASS');
3880: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3881: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3882: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3883: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3876: l_precision :=0;
3877: l_path_name := g_path||'do_reclass';
3878:
3879: /* igi_iac_debug_pkg.debug_on('RECLASS');
3880: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3881: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3882: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3883: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3884: --
3877: l_path_name := g_path||'do_reclass';
3878:
3879: /* igi_iac_debug_pkg.debug_on('RECLASS');
3880: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3881: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3882: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3883: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3884: --
3885: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3878:
3879: /* igi_iac_debug_pkg.debug_on('RECLASS');
3880: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3881: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3882: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3883: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3884: --
3885: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3886: p_full_path => l_path_name,
3879: /* igi_iac_debug_pkg.debug_on('RECLASS');
3880: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3881: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3882: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3883: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3884: --
3885: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3886: p_full_path => l_path_name,
3887: p_string => 'Creating a message log file for RECLASS');
3881: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3882: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3883: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3884: --
3885: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3886: p_full_path => l_path_name,
3887: p_string => 'Creating a message log file for RECLASS');
3888: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3889: p_full_path => l_path_name,
3884: --
3885: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3886: p_full_path => l_path_name,
3887: p_string => 'Creating a message log file for RECLASS');
3888: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3889: p_full_path => l_path_name,
3890: p_string => 'Date '||sysdate);
3891: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3892: p_full_path => l_path_name,
3887: p_string => 'Creating a message log file for RECLASS');
3888: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3889: p_full_path => l_path_name,
3890: p_string => 'Date '||sysdate);
3891: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3892: p_full_path => l_path_name,
3893: p_string => 'Calling function '||p_calling_function);
3894: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3895: p_full_path => l_path_name,
3890: p_string => 'Date '||sysdate);
3891: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3892: p_full_path => l_path_name,
3893: p_string => 'Calling function '||p_calling_function);
3894: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3895: p_full_path => l_path_name,
3896: p_string => 'Entry for IAC reclass');
3897:
3898: --validate the IAC book
3896: p_string => 'Entry for IAC reclass');
3897:
3898: --validate the IAC book
3899: IF Not (igi_iac_common_utils.is_iac_book(p_asset_hdr_rec.book_type_code)) THEN
3900: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3901: p_full_path => l_path_name,
3902: p_string => 'Not an IAC book ..'||p_asset_hdr_rec.book_type_code);
3903:
3904: Return True;
3905: End if;
3906:
3907: IF NOT igi_iac_common_utils.populate_iac_fa_deprn_data(p_asset_hdr_rec.book_type_code,
3908: 'RECLASS') THEN
3909: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3910: p_full_path => l_path_name,
3911: p_string => '*** Error in Synchronizing Depreciation Data ***');
3912:
3913: return FALSE;
3926: Print_Parameter_values;
3927:
3928: /* return ture if the reclass being done in the same period asset added */
3929: IF l_asset_hdr_rec.PERIOD_OF_ADDITION = 'Y' THEN
3930: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3931: p_full_path => l_path_name,
3932: p_string => 'RECLASS in the same period as asset Added');
3933:
3934: Return True;
3941: l_set_of_books_id,
3942: l_chart_of_accounts_id,
3943: l_currency,
3944: l_precision ) THEN
3945: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3946: p_full_path => l_path_name,
3947: p_string => '+Set of books Failed');
3948: FA_SRVR_MSG.Add_Message(
3949: CALLING_FN => p_calling_function,
3952: APPLICATION => 'IGI');
3953: Return False;
3954: END IF;
3955:
3956: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3957: p_full_path => l_path_name,
3958: p_string => '+Set of books value is set to ....'|| l_set_of_books_id);
3959:
3960: l_asset_hdr_rec.set_of_books_id := l_set_of_books_id;
3960: l_asset_hdr_rec.set_of_books_id := l_set_of_books_id;
3961: END IF;
3962:
3963: -- validate the category
3964: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3965: p_full_path => l_path_name,
3966: p_string => '+Validate categories');
3967: IF not do_validate_category THEN
3968: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3964: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3965: p_full_path => l_path_name,
3966: p_string => '+Validate categories');
3967: IF not do_validate_category THEN
3968: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3969: p_full_path => l_path_name,
3970: p_string => '+Failed Validate categories');
3971: FA_SRVR_MSG.Add_Message(
3972: CALLING_FN => p_calling_function,
3975: APPLICATION => 'IGI');
3976: Return False;
3977: END IF;
3978:
3979: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3980: p_full_path => l_path_name,
3981: p_string => '+Validate categories successful');
3982:
3983: -- validate the asset
3980: p_full_path => l_path_name,
3981: p_string => '+Validate categories successful');
3982:
3983: -- validate the asset
3984: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3985: p_full_path => l_path_name,
3986: p_string => '+Validate Asset');
3987:
3988: IF NOT do_validate_asset THEN
3985: p_full_path => l_path_name,
3986: p_string => '+Validate Asset');
3987:
3988: IF NOT do_validate_asset THEN
3989: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3990: p_full_path => l_path_name,
3991: p_string => '+Failed Validate Asset');
3992:
3993: FA_SRVR_MSG.Add_Message(
3997: APPLICATION => 'IGI');
3998: Return TRUE;
3999: END IF;
4000:
4001: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4002: p_full_path => l_path_name,
4003: p_string => '+Validate Asset successfully');
4004:
4005: -- Check whether adjustments exist in the open period
4032:
4033: IF l_old_price_index = l_new_Price_index THEN
4034:
4035: -- call the same price index
4036: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4037: p_full_path => l_path_name,
4038: p_string => '+SAME PRICE INDEX');
4039:
4040:
4040:
4041: SAME_PRICE_INDEX_FLAG := TRUE;
4042: DIFF_PRICE_INDEX_FLAG:= FALSE;
4043: IF do_same_price_index(p_event_id) THEN
4044: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4045: p_full_path => l_path_name,
4046: p_string => '+SAME PRICE INDEX SUCCESS');
4047: ELSE
4048: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4044: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4045: p_full_path => l_path_name,
4046: p_string => '+SAME PRICE INDEX SUCCESS');
4047: ELSE
4048: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4049: p_full_path => l_path_name,
4050: p_string => 'SAME PRICE INDEX IAC RECLASSIFICATION FAILED');
4051:
4052: FA_SRVR_MSG.Add_Message(
4061: SAME_PRICE_INDEX_FLAG := FALSE;
4062: DIFF_PRICE_INDEX_FLAG:= TRUE;
4063: IF Do_Diff_Price_Index(p_event_id => p_event_id) THEN
4064: -- call the different price index
4065: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4066: p_full_path => l_path_name,
4067: p_string => '+DIFFERENT PRICE INDEX');
4068:
4069: return True;
4067: p_string => '+DIFFERENT PRICE INDEX');
4068:
4069: return True;
4070: ELSE
4071: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4072: p_full_path => l_path_name,
4073: p_string => '+DIFFERENT PRICE INDEX RETURNED FALSE');
4074: return false;
4075: END IF;