[Home] [Help]
87:
88: BEGIN
89: l_path_name := g_path||'do_validate_category';
90: l_return_value := False;
91: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
92: p_full_path => l_path_name,
93: p_string => ' + Enter validate category');
94:
95: -- check if same category or null category
95: -- check if same category or null category
96: IF ((l_asset_cat_rec_old.category_id = l_asset_cat_rec_new.category_id)or
97: (l_asset_cat_rec_old.category_id is null or l_asset_cat_rec_new.category_id is null))
98: THEN
99: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
100: p_full_path => l_path_name,
101: p_string => ' + Same category old and new or null value');
102:
103: Return false;
101: p_string => ' + Same category old and new or null value');
102:
103: Return false;
104: End if;
105: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
106: p_full_path => l_path_name,
107: p_string => ' + different categories old ' || l_asset_cat_rec_old.category_id
108: || 'and new' ||l_asset_cat_rec_new.category_id );
109:
111: --validate if both categories are added to IAC book controls
112: **/
113: -- A record should exisit in iac category books for both categories for same book_typec_code
114: -- check for original category id
115: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
116: p_full_path => l_path_name,
117: p_string => ' + orinignal category id iac book test ..'||l_asset_cat_rec_old.category_id);
118:
119: Open get_category_id(l_asset_cat_rec_old.category_id);
121: l_old_index_reval_flag,
122: l_old_prof_reval_flag ;
123: IF NOT get_category_id%FOUND THEN
124: -- Raise error message that category is not exisiting in iac book
125: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
126: p_full_path => l_path_name,
127: p_string => ' +error message that category is not exisiting in iac book '||l_asset_cat_rec_old.category_id);
128:
129: Close get_category_id;
130: Return false;
131: END IF;
132: Close get_category_id;
133:
134: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
135: p_full_path => l_path_name,
136: p_string => ' + Original category exisits in iac book '||l_asset_cat_rec_old.category_id);
137:
138: Open get_category_id(l_asset_cat_rec_new.category_id);
140: l_new_index_reval_flag,
141: l_new_prof_reval_flag ;
142: IF NOT get_category_id%FOUND THEN
143: -- Raise error message that category is not exisiting in iac book
144: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
145: p_full_path => l_path_name,
146: p_string => ' +error message that category is not exisiting in iac book '||l_asset_cat_rec_new.category_id);
147: Close get_category_id;
148: Return false;
148: Return false;
149: END IF;
150: Close get_category_id;
151:
152: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
153: p_full_path => l_path_name,
154: p_string => ' + New category exisits in iac book '||l_asset_cat_rec_old.category_id);
155:
156: /**
166: Fetch get_cat_cap_flag into l_new_cap_flag,
167: l_new_cat_type;
168: Close get_cat_cap_flag;
169: --check the category flags
170: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
171: p_full_path => l_path_name,
172: p_string => ' + check for category captilized falgs');
173:
174: IF (l_old_cap_flag = 'YES') THEN
172: p_string => ' + check for category captilized falgs');
173:
174: IF (l_old_cap_flag = 'YES') THEN
175: IF (l_old_cap_flag <> l_new_cap_flag) THEN
176: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
177: p_full_path => l_path_name,
178: p_string => ' + both the categories not captilized falgs');
179:
180: Return False;
180: Return False;
181: End IF;
182: END IF;
183:
184: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
185: p_full_path => l_path_name,
186: p_string => ' + check for category captilized falgs success');
187:
188: /**
200: ELSE
201: allow_prof_reval_flag := False;
202: END IF;
203:
204: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
205: p_full_path => l_path_name,
206: p_string => ' + set the indexed and prof flags ');
207: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
208: p_full_path => l_path_name,
203:
204: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
205: p_full_path => l_path_name,
206: p_string => ' + set the indexed and prof flags ');
207: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
208: p_full_path => l_path_name,
209: p_string => ' + set the indexed flag ' || l_new_index_reval_flag );
210: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
211: p_full_path => l_path_name,
206: p_string => ' + set the indexed and prof flags ');
207: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
208: p_full_path => l_path_name,
209: p_string => ' + set the indexed flag ' || l_new_index_reval_flag );
210: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
211: p_full_path => l_path_name,
212: p_string => ' + set the prof flag ' ||l_new_prof_reval_flag );
213: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
214: p_full_path => l_path_name,
209: p_string => ' + set the indexed flag ' || l_new_index_reval_flag );
210: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
211: p_full_path => l_path_name,
212: p_string => ' + set the prof flag ' ||l_new_prof_reval_flag );
213: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
214: p_full_path => l_path_name,
215: p_string => ' + EXIT Validate category' );
216:
217: Return True;
239:
240: BEGIN
241: l_path_name := g_path||'do_validate_asset';
242: -- check if revaluation atleast once
243: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
244: p_full_path => l_path_name,
245: p_string => ' + check if revaluation atleast once' );
246: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
247: p_full_path => l_path_name,
242: -- check if revaluation atleast once
243: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
244: p_full_path => l_path_name,
245: p_string => ' + check if revaluation atleast once' );
246: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
247: p_full_path => l_path_name,
248: p_string => ' + check if revaluation atleast once ...' || l_asset_hdr_rec.asset_id );
249: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
250: p_full_path => l_path_name,
245: p_string => ' + check if revaluation atleast once' );
246: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
247: p_full_path => l_path_name,
248: p_string => ' + check if revaluation atleast once ...' || l_asset_hdr_rec.asset_id );
249: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
250: p_full_path => l_path_name,
251: p_string => ' + check if revaluation atleast once ...' || l_asset_hdr_rec.book_type_code);
252:
253: /* Check IF Asset is revalued at least once */
254: open c_asset_revalued(l_asset_hdr_rec.asset_id);
255: fetch c_asset_revalued into l_asset_revalued;
256: IF c_asset_revalued%NOTFOUND THEN
257: close c_asset_revalued;
258: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
259: p_full_path => l_path_name,
260: p_string => '+ No IAC revaluation atleast once');
261:
262: RETURN(FALSE);
263: END IF;
264:
265: close c_asset_revalued;
266:
267: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
268: p_full_path => l_path_name,
269: p_string => ' + check if revaluation atleast once success' );
270:
271: IF NOT (l_asset_type_rec.asset_type in ('CAPITALIZED') ) THEN
269: p_string => ' + check if revaluation atleast once success' );
270:
271: IF NOT (l_asset_type_rec.asset_type in ('CAPITALIZED') ) THEN
272: -- ERROR MESSAGE
273: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
274: p_full_path => l_path_name,
275: p_string => ' + NOT CAPITALIZED ASSET' );
276: return FALSE;
277: END IF;
333:
334:
335: EXCEPTION
336: WHEN OTHERS THEN
337: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
338:
339: l_mesg:=SQLERRM;
340: FA_SRVR_MSG.Add_Message(
341: Calling_FN => l_calling_function ,
424: );
425:
426: EXCEPTION
427: WHEN OTHERS THEN
428: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
429:
430: l_mesg:=SQLERRM;
431: FA_SRVR_MSG.Add_Message(
432: Calling_FN => l_calling_function ,
485: P_op_acct_ytd := p_op_acct_ytd*Prorate_factor;
486:
487: EXCEPTION
488: WHEN OTHERS THEN
489: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
490:
491: l_mesg:=SQLERRM;
492: FA_SRVR_MSG.Add_Message(
493: Calling_FN => l_calling_function ,
518: begin
519: l_rowid := null;
520: l_path_name := g_path||'create_acctg_entry';
521: if p_amount = 0 then
522: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
523: p_full_path => l_path_name,
524: p_string => '+amount is 0, accounting entries skipped');
525:
526: return;
591: procedure check_ccid ( p_ccid_desc in varchar2) is
592: l_path_name VARCHAR2(150);
593: begin
594: l_path_name := g_path||'check_ccid';
595: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
596: p_full_path => l_path_name,
597: p_string => '+acctg creation for '||p_ccid_desc||' failed');
598: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
599: p_full_path => l_path_name,
594: l_path_name := g_path||'check_ccid';
595: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
596: p_full_path => l_path_name,
597: p_string => '+acctg creation for '||p_ccid_desc||' failed');
598: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
599: p_full_path => l_path_name,
600: p_string => 'error create_iac_acctg');
601: end;
602:
602:
603: begin
604: l_path_name := g_path||'create_iac_acctg';
605:
606: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
607: p_full_path => l_path_name,
608: p_string => 'begin create_iac_acctg');
609: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
610: p_full_path => l_path_name,
605:
606: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
607: p_full_path => l_path_name,
608: p_string => 'begin create_iac_acctg');
609: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
610: p_full_path => l_path_name,
611: p_string => '+ Det Balances');
612: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
613: p_full_path => l_path_name,
608: p_string => 'begin create_iac_acctg');
609: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
610: p_full_path => l_path_name,
611: p_string => '+ Det Balances');
612: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
613: p_full_path => l_path_name,
614: p_string => '+ book type code'||fp_det_balances.book_type_code);
615: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
616: p_full_path => l_path_name,
611: p_string => '+ Det Balances');
612: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
613: p_full_path => l_path_name,
614: p_string => '+ book type code'||fp_det_balances.book_type_code);
615: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
616: p_full_path => l_path_name,
617: p_string => '+ asset id'||fp_det_balances.asset_id);
618: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
619: p_full_path => l_path_name,
614: p_string => '+ book type code'||fp_det_balances.book_type_code);
615: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
616: p_full_path => l_path_name,
617: p_string => '+ asset id'||fp_det_balances.asset_id);
618: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
619: p_full_path => l_path_name,
620: p_string => '+ distribution id '||fp_det_balances.distribution_id);
621: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
622: p_full_path => l_path_name,
617: p_string => '+ asset id'||fp_det_balances.asset_id);
618: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
619: p_full_path => l_path_name,
620: p_string => '+ distribution id '||fp_det_balances.distribution_id);
621: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
622: p_full_path => l_path_name,
623: p_string => '+ adjustment id '||fp_det_balances.adjustment_id);
624: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
625: p_full_path => l_path_name,
620: p_string => '+ distribution id '||fp_det_balances.distribution_id);
621: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
622: p_full_path => l_path_name,
623: p_string => '+ adjustment id '||fp_det_balances.adjustment_id);
624: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
625: p_full_path => l_path_name,
626: p_string => '+ reval reserve '||fp_det_balances.reval_reserve_cost);
627: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
628: p_full_path => l_path_name,
623: p_string => '+ adjustment id '||fp_det_balances.adjustment_id);
624: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
625: p_full_path => l_path_name,
626: p_string => '+ reval reserve '||fp_det_balances.reval_reserve_cost);
627: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
628: p_full_path => l_path_name,
629: p_string => '+ reserve backlog '||fp_det_balances.reval_reserve_backlog);
630: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
631: p_full_path => l_path_name,
626: p_string => '+ reval reserve '||fp_det_balances.reval_reserve_cost);
627: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
628: p_full_path => l_path_name,
629: p_string => '+ reserve backlog '||fp_det_balances.reval_reserve_backlog);
630: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
631: p_full_path => l_path_name,
632: p_string => '+ gen fund'||fp_det_balances.reval_reserve_gen_fund);
633: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
634: p_full_path => l_path_name,
629: p_string => '+ reserve backlog '||fp_det_balances.reval_reserve_backlog);
630: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
631: p_full_path => l_path_name,
632: p_string => '+ gen fund'||fp_det_balances.reval_reserve_gen_fund);
633: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
634: p_full_path => l_path_name,
635: p_string => '+ acct cost'||fp_det_balances.operating_acct_cost);
636: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
637: p_full_path => l_path_name,
632: p_string => '+ gen fund'||fp_det_balances.reval_reserve_gen_fund);
633: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
634: p_full_path => l_path_name,
635: p_string => '+ acct cost'||fp_det_balances.operating_acct_cost);
636: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
637: p_full_path => l_path_name,
638: p_string => '+ op acct backlog'||fp_det_balances.operating_acct_backlog);
639: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
640: p_full_path => l_path_name,
635: p_string => '+ acct cost'||fp_det_balances.operating_acct_cost);
636: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
637: p_full_path => l_path_name,
638: p_string => '+ op acct backlog'||fp_det_balances.operating_acct_backlog);
639: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
640: p_full_path => l_path_name,
641: p_string => '+ deprn ytd'||fp_det_balances.deprn_ytd);
642: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
643: p_full_path => l_path_name,
638: p_string => '+ op acct backlog'||fp_det_balances.operating_acct_backlog);
639: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
640: p_full_path => l_path_name,
641: p_string => '+ deprn ytd'||fp_det_balances.deprn_ytd);
642: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
643: p_full_path => l_path_name,
644: p_string => '+ rserv back deprn '||fp_det_balances.deprn_reserve_backlog);
645:
646:
644: p_string => '+ rserv back deprn '||fp_det_balances.deprn_reserve_backlog);
645:
646:
647: if not fp_create_acctg_flag then
648: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
649: p_full_path => l_path_name,
650: p_string => '+acctg creation not allowed');
651: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
652: p_full_path => l_path_name,
647: if not fp_create_acctg_flag then
648: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
649: p_full_path => l_path_name,
650: p_string => '+acctg creation not allowed');
651: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
652: p_full_path => l_path_name,
653: p_string => 'end create_iac_acctg');
654:
655: return true;
654:
655: return true;
656: end if;
657:
658: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
659: p_full_path => l_path_name,
660: p_string => '+acctg creation get gl information');
661:
662: if not IGI_IAC_COMMON_UTILS.GET_BOOK_GL_INFO
666: , CURRENCY => l_currency
667: , PRECISION => l_precision
668: )
669: then
670: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
671: p_full_path => l_path_name,
672: p_string => '+acctg creation unable to get gl info');
673: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
674: p_full_path => l_path_name,
669: then
670: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
671: p_full_path => l_path_name,
672: p_string => '+acctg creation unable to get gl info');
673: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
674: p_full_path => l_path_name,
675: p_string => 'end create_iac_acctg');
676:
677: return false;
676:
677: return false;
678: end if;
679: --
680: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
681: p_full_path => l_path_name,
682: p_string => '+acctg creation get all accounts');
683: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
684: p_full_path => l_path_name,
679: --
680: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
681: p_full_path => l_path_name,
682: p_string => '+acctg creation get all accounts');
683: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
684: p_full_path => l_path_name,
685: p_string => '+distribution id '|| fp_det_balances.distribution_id );
686:
687: IF NOT IGI_IAC_COMMON_UTILS.get_account_ccid
778:
779: begin
780: If fp_adjustement_type = 'OLD' Then
781:
782: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
783: p_full_path => l_path_name,
784: p_string => '+acctg creation cost vs reval reserve');
785:
786: /*create_acctg_entry ( l_dr_ccid => l_asset_cost_ccid
813: , l_report_ccid => Null
814: , p_event_id => p_event_id
815: );
816:
817: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
818: p_full_path => l_path_name,
819: p_string => '+acctg creation reval reserve vs backlog reserve');
820:
821: /*create_acctg_entry ( l_dr_ccid => l_revl_rsv_ccid
847: , l_report_ccid => l_revl_rsv_ccid
848: , p_event_id => p_event_id
849: );
850:
851: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
852: p_full_path => l_path_name,
853: p_string => '+acctg creation reval reserve vs gen fund');
854:
855:
882: , l_report_ccid => l_revl_rsv_ccid
883: , p_event_id => p_event_id
884: );
885:
886: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
887: p_full_path => l_path_name,
888: p_string => '+acctg creation op account vs cost');
889:
890: /*create_acctg_entry ( l_dr_ccid => l_op_exp_ccid
917: , l_report_ccid => l_op_exp_ccid
918: , p_event_id => p_event_id
919: );
920:
921: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
922: p_full_path => l_path_name,
923: p_string => '+acctg creation backlog vs op account');
924:
925: /*create_acctg_entry ( l_dr_ccid => l_blog_rsv_ccid
953: , p_event_id => p_event_id
954: );
955: End if;
956:
957: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
958: p_full_path => l_path_name,
959: p_string => '+acctg creation deprn reserve vs deprn expense');
960:
961: create_acctg_entry ( l_ccid => l_deprn_rsv_ccid
985: , l_report_ccid => Null
986: , p_event_id => p_event_id
987: );
988:
989: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
990: p_full_path => l_path_name,
991: p_string => '+acctg creation depreciation expenese for old ');
992:
993: create_acctg_entry ( l_ccid => l_deprn_exp_ccid
1052:
1053: /* bug 2439006 additional dep_resrver account created old category depreciation expense negation
1054: entry to the new category*/
1055:
1056: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1057: p_full_path => l_path_name,
1058: p_string => '+acctg creation depreciation expenese for new ');
1059:
1060: create_acctg_entry ( l_ccid => l_deprn_exp_ccid
1070:
1071:
1072: ELSE
1073:
1074: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1075: p_full_path => l_path_name,
1076: p_string => '+acctg creation cost vs reval reserve');
1077: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1078: p_full_path => l_path_name,
1073:
1074: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1075: p_full_path => l_path_name,
1076: p_string => '+acctg creation cost vs reval reserve');
1077: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1078: p_full_path => l_path_name,
1079: p_string => '+acctg creation cost vs reval reserve');
1080:
1081: /*create_acctg_entry ( l_dr_ccid => l_asset_cost_ccid
1107: , l_report_ccid => Null
1108: , p_event_id => p_event_id
1109: );
1110:
1111: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1112: p_full_path => l_path_name,
1113: p_string => '+acctg creation reval reserve vs backlog reserve');
1114:
1115: /*create_acctg_entry ( l_dr_ccid => l_revl_rsv_ccid
1141: , l_report_ccid => l_revl_rsv_ccid
1142: , p_event_id => p_event_id
1143: );
1144:
1145: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1146: p_full_path => l_path_name,
1147: p_string => '+acctg creation reval reserve vs gen fund');
1148:
1149: /*create_acctg_entry ( l_dr_ccid => l_revl_rsv_ccid
1175: , l_report_ccid => l_revl_rsv_ccid
1176: , p_event_id => p_event_id
1177: );
1178:
1179: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1180: p_full_path => l_path_name,
1181: p_string => '+acctg creation op account vs cost');
1182:
1183: /*create_acctg_entry ( l_dr_ccid => l_op_exp_ccid
1207: , l_report_ccid => l_op_exp_ccid,
1208: p_event_id => p_event_id
1209: );
1210:
1211: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1212: p_full_path => l_path_name,
1213: p_string => '+acctg creation backlog vs op account');
1214:
1215: /*create_acctg_entry ( l_dr_ccid => l_blog_rsv_ccid
1240: , fp_det_balances => fp_det_balances
1241: );*/
1242:
1243: -- removing these entries as per bug 2483321
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 deprn reserve vs deprn expense');
1247:
1248: create_acctg_entry ( l_ccid => l_deprn_rsv_ccid
1294:
1295: end if;
1296: end;
1297:
1298: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1299: p_full_path => l_path_name,
1300: p_string => 'end acctg creation');
1301: return true;
1302: end;
1586: l_transaction_type_code := NULL;
1587: l_adjustment_status := NULL ;
1588: l_path_name := g_path||'do_no_index_reval';
1589:
1590: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1591: p_full_path => l_path_name,
1592: p_string => ' + Index revaluation OFF - In Do_No_Index_Reval');
1593:
1594: /* Store the previous transaction adjustment id */
1602: X_Mass_Reference_ID => l_mass_reference_id,
1603: X_Adjustment_Id => l_adjustment_id_out,
1604: X_Prev_Adjustment_Id => l_prev_adjustment_id,
1605: X_Adjustment_Status => l_adjustment_status) THEN
1606: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
1607: p_full_path => l_path_name,
1608: p_string => '*** Error in fetching the latest transaction');
1609: RETURN FALSE;
1610: END IF;
1611:
1612: -- Get the current open period
1613: IF igi_iac_common_utils.get_open_period_info(l_asset_hdr_rec.book_type_code,l_prd_rec) THEN
1614: l_current_period_counter:=l_prd_rec.period_counter;
1615: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1616: p_full_path => l_path_name,
1617: p_string => ' + Current OPen Period counter' ||l_prd_rec.period_counter );
1618: END IF;
1619:
1638: l_current_period_counter,
1639: p_event_id
1640: );
1641:
1642: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1643: p_full_path => l_path_name,
1644: p_string => ' + After Insert into trans header' );
1645:
1646: -- Need to close the previous transaction to pick the latest catgeory --
1679:
1680: IF (l_impacted_dist.distribution_id IS NULL ) THEN
1681: OPEN c_impacted_dist(l_all_dist.distribution_id);
1682: FETCH c_impacted_dist INTO l_impacted_dist;
1683: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1684: p_full_path => l_path_name,
1685: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1686: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1687: p_full_path => l_path_name,
1682: FETCH c_impacted_dist INTO l_impacted_dist;
1683: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1684: p_full_path => l_path_name,
1685: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1686: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1687: p_full_path => l_path_name,
1688: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
1689:
1690: CLOSE c_impacted_dist;
1690: CLOSE c_impacted_dist;
1691: ELSE
1692: OPEN c_impacted_dist_new(l_all_dist.distribution_id,l_impacted_dist.distribution_id);
1693: FETCH c_impacted_dist_new INTO l_impacted_dist;
1694: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1695: p_full_path => l_path_name,
1696: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1697: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1698: p_full_path => l_path_name,
1693: FETCH c_impacted_dist_new INTO l_impacted_dist;
1694: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1695: p_full_path => l_path_name,
1696: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
1697: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1698: p_full_path => l_path_name,
1699: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
1700:
1701: CLOSE c_impacted_dist_new;
1703:
1704: OPEN c_old_dist(l_all_dist.distribution_id);
1705: FETCH c_old_dist INTO l_old_dist;
1706: IF c_old_dist%NOTFOUND THEN
1707: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1708: p_full_path => l_path_name,
1709: p_string => ' No old distribution for asset found ' || l_old_dist.distribution_id);
1710: CLOSE c_old_dist;
1711: RETURN FALSE;
1710: CLOSE c_old_dist;
1711: RETURN FALSE;
1712: END IF;
1713: CLOSE c_old_dist;
1714: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1715: p_full_path => l_path_name,
1716: p_string => ' + no old distribution for asset ' || l_old_dist.distribution_id);
1717:
1718: /* get the closing det balances record form iac det balances */
1720:
1721: OPEN c_closing_det_balances(l_old_dist.distribution_id,l_prev_adjustment_id);
1722: FETCH c_closing_det_balances INTO l_closing_det_balances;
1723: IF c_closing_det_balances%NOTFOUND THEN
1724: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1725: p_full_path => l_path_name,
1726: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1728: p_full_path => l_path_name,
1723: IF c_closing_det_balances%NOTFOUND THEN
1724: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1725: p_full_path => l_path_name,
1726: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1728: p_full_path => l_path_name,
1729: p_string => ' + adjustement id '||l_prev_adjustment_id);
1730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1731: p_full_path => l_path_name,
1726: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1728: p_full_path => l_path_name,
1729: p_string => ' + adjustement id '||l_prev_adjustment_id);
1730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1731: p_full_path => l_path_name,
1732: p_string => ' Could not find the IAC det balances record ');
1733: CLOSE c_closing_det_balances;
1734: RETURN FALSE;
1733: CLOSE c_closing_det_balances;
1734: RETURN FALSE;
1735: END IF;
1736:
1737: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1738: p_full_path => l_path_name,
1739: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1740: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1741: p_full_path => l_path_name,
1736:
1737: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1738: p_full_path => l_path_name,
1739: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
1740: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1741: p_full_path => l_path_name,
1742: p_string => ' + adjustement id '||l_prev_adjustment_id);
1743:
1744: CLOSE c_closing_det_balances;
1753: WHERE adjustment_id = l_adj_id;
1754:
1755: -- reverse the accounting entries for the existing dist ids
1756: IF create_iac_acctg ( l_closing_det_balances,TRUE,'OLD',p_event_id => p_event_id) THEN
1757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1758: p_full_path => l_path_name,
1759: p_string => '+Accounting entries created for old');
1760: ELSE
1761: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1758: p_full_path => l_path_name,
1759: p_string => '+Accounting entries created for old');
1760: ELSE
1761: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
1762: p_full_path => l_path_name,
1763: p_string => 'Failed to create Accounting entries');
1764: RETURN FALSE;
1765: END IF;
1964:
1965:
1966: EXCEPTION
1967: WHEN OTHERS THEN
1968: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
1969: l_mesg:=SQLERRM;
1970: FA_SRVR_MSG.Add_Message(
1971: Calling_FN => l_calling_function ,
1972: Name => 'IGI_IAC_EXCEPTION',
2264: l_transaction_type_code := Null;
2265: l_adjustment_status := null ;
2266: l_path_name := g_path||'do_same_price_index';
2267:
2268: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2269: p_full_path => l_path_name,
2270: p_string => ' + Same price index begin ');
2271:
2272: /* Store the previous transaction adjustment id */
2286: X_Mass_Reference_ID => l_mass_reference_id,
2287: X_Adjustment_Id => l_adjustment_id_out,
2288: X_Prev_Adjustment_Id => l_prev_adjustment_id,
2289: X_Adjustment_Status => l_adjustment_status) THEN
2290: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
2291: p_full_path => l_path_name,
2292: p_string => '*** Error in fetching the latest transaction');
2293:
2294: return FALSE;
2293:
2294: return FALSE;
2295: END IF;
2296:
2297: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2298: p_full_path => l_path_name,
2299: p_string => ' + Fetch the previous transaction adjustment id '||l_prev_adjustment_id);
2300:
2301:
2301:
2302: /*Get the open period and create new transaction record in the transaction headers table */
2303: IF igi_iac_common_utils.get_open_period_info(l_asset_hdr_rec.book_type_code,l_prd_rec) THEN
2304: l_current_period_counter:=l_prd_rec.period_counter;
2305: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2306: p_full_path => l_path_name,
2307: p_string => ' + Current OPen Period counter' ||l_prd_rec.period_counter );
2308:
2309: END IF;
2312: open c_adj_id;
2313: fetch c_adj_id into l_adj_id;
2314: close c_adj_id;
2315:
2316: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2317: p_full_path => l_path_name,
2318: p_string => ' + before Insert into trans header' );
2319:
2320: /*Insert into transaction headers */
2333: l_current_period_counter,
2334: p_event_id
2335: );
2336:
2337: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2338: p_full_path => l_path_name,
2339: p_string => ' + After Insert into trans header' );
2340:
2341: /* To select the backlog data for the old distribution to be prorated into new */
2398: close c_old_dist;
2399: If (l_impacted_dist.distribution_id IS NULL ) Then
2400: open c_impacted_dist(l_all_dist.distribution_id);
2401: fetch c_impacted_dist into l_impacted_dist;
2402: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2403: p_full_path => l_path_name,
2404: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2405: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2406: p_full_path => l_path_name,
2401: fetch c_impacted_dist into l_impacted_dist;
2402: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2403: p_full_path => l_path_name,
2404: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2405: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2406: p_full_path => l_path_name,
2407: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
2408: close c_impacted_dist;
2409: Else
2408: close c_impacted_dist;
2409: Else
2410: open c_impacted_dist_new(l_all_dist.distribution_id,l_impacted_dist.distribution_id);
2411: fetch c_impacted_dist_new into l_impacted_dist;
2412: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2413: p_full_path => l_path_name,
2414: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2415: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2416: p_full_path => l_path_name,
2411: fetch c_impacted_dist_new into l_impacted_dist;
2412: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2413: p_full_path => l_path_name,
2414: p_string => ' + impacted distribution id ' || l_all_dist.distribution_id);
2415: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2416: p_full_path => l_path_name,
2417: p_string => ' + new impacted distribution id ' || l_impacted_dist.distribution_id);
2418:
2419: close c_impacted_dist_new;
2421:
2422: open c_old_dist(l_all_dist.distribution_id);
2423: fetch c_old_dist into l_old_dist;
2424: IF c_old_dist%NOTFOUND THEN
2425: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2426: p_full_path => l_path_name,
2427: p_string => ' No old distribution for asset found ' || l_old_dist.distribution_id);
2428:
2429: close c_old_dist;
2429: close c_old_dist;
2430: return false;
2431: End if;
2432: close c_old_dist;
2433: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2434: p_full_path => l_path_name,
2435: p_string => ' + no old distribution for asset ' || l_old_dist.distribution_id);
2436:
2437: /* get the closing det balances record form iac det balances */
2440:
2441: open c_closing_det_balances(l_old_dist.distribution_id,l_prev_adjustment_id);
2442: fetch c_closing_det_balances into l_closing_det_balances;
2443: IF c_closing_det_balances%NOTFOUND THEN
2444: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2445: p_full_path => l_path_name,
2446: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2447: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2448: p_full_path => l_path_name,
2443: IF c_closing_det_balances%NOTFOUND THEN
2444: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2445: p_full_path => l_path_name,
2446: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2447: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2448: p_full_path => l_path_name,
2449: p_string => ' + adjustement id '||l_prev_adjustment_id);
2450: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2451: p_full_path => l_path_name,
2446: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2447: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2448: p_full_path => l_path_name,
2449: p_string => ' + adjustement id '||l_prev_adjustment_id);
2450: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2451: p_full_path => l_path_name,
2452: p_string => ' Could not find the IAC det balances record ');
2453:
2454: close c_closing_det_balances;
2453:
2454: close c_closing_det_balances;
2455: return false;
2456: End if;
2457: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2458: p_full_path => l_path_name,
2459: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2460: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2461: p_full_path => l_path_name,
2456: End if;
2457: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2458: p_full_path => l_path_name,
2459: p_string => ' + old distruibution id ' || l_old_dist.distribution_id);
2460: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2461: p_full_path => l_path_name,
2462: p_string => ' + adjustement id '||l_prev_adjustment_id);
2463:
2464: close c_closing_det_balances;
2472: set category_id = l_asset_cat_rec_old.category_id
2473: where adjustment_id = l_adj_id;
2474:
2475: if create_iac_acctg ( l_closing_det_balances,TRUE,'OLD',p_event_id => p_event_id) Then
2476: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2477: p_full_path => l_path_name,
2478: p_string => '+Accounting entries created for old');
2479: else
2480: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2476: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2477: p_full_path => l_path_name,
2478: p_string => '+Accounting entries created for old');
2479: else
2480: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2481: p_full_path => l_path_name,
2482: p_string => 'Failed to create Accounting entries');
2483:
2484: return false;
2555: (ALLOW_INDEX_REVAL_FLAG OR ALLOW_PROF_REVAL_FLAG) THEN
2556:
2557: l_closing_det_balances.distribution_id := l_impacted_dist.distribution_id;
2558: if create_iac_acctg ( l_closing_det_balances,TRUE,'NEW',p_event_id => p_event_id) Then
2559: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2560: p_full_path => l_path_name,
2561: p_string => '+Accounting entries created for new ');
2562:
2563: else
2560: p_full_path => l_path_name,
2561: p_string => '+Accounting entries created for new ');
2562:
2563: else
2564: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2565: p_full_path => l_path_name,
2566: p_string => 'Failed to create Accounting entries ');
2567:
2568: return false;
2608: l_closing_det_balances.distribution_id := l_impacted_dist.distribution_id;
2609: l_closing_det_balances.period_counter := l_current_period_counter;
2610: --accounting entry for YTD
2611: if create_iac_acctg ( l_closing_det_balances,TRUE,'NEW',p_event_id => p_event_id) Then
2612: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2613: p_full_path => l_path_name,
2614: p_string => '+Accounting entries created');
2615:
2616: else
2613: p_full_path => l_path_name,
2614: p_string => '+Accounting entries created');
2615:
2616: else
2617: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2618: p_full_path => l_path_name,
2619: p_string => 'Failed to create Accounting entries ');
2620:
2621: return false;
2676: Close c_get_deprn_dist;
2677: -- enchancement 2480915 maintiain the ytd values ---
2678:
2679:
2680: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2681: p_full_path => l_path_name,
2682: p_string => ' + After insert into det balances ' || l_old_dist.distribution_id);
2683:
2684: open c_closing_det_balances(l_impacted_dist.distribution_id,l_adj_id);
2683:
2684: open c_closing_det_balances(l_impacted_dist.distribution_id,l_adj_id);
2685: fetch c_closing_det_balances into l_closing_det_balances;
2686: IF c_closing_det_balances%NOTFOUND THEN
2687: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2688: p_full_path => l_path_name,
2689: p_string => ' Could not find the IAC records ');
2690:
2691: close c_closing_det_balances;
2691: close c_closing_det_balances;
2692: return false;
2693: End if;
2694:
2695: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2696: p_full_path => l_path_name,
2697: p_string => ' + old distruibution id ' || l_impacted_dist.distribution_id);
2698: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2699: p_full_path => l_path_name,
2694:
2695: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2696: p_full_path => l_path_name,
2697: p_string => ' + old distruibution id ' || l_impacted_dist.distribution_id);
2698: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2699: p_full_path => l_path_name,
2700: p_string => ' + adjustement id '|| l_adj_id);
2701:
2702:
2836:
2837:
2838:
2839: /*Terminate the previous active row with the adjustment_id_out in transaction_headers table*/
2840: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2841: p_full_path => l_path_name,
2842: p_string => ' close the prevooius adjusment');
2843: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2844: p_full_path => l_path_name,
2839: /*Terminate the previous active row with the adjustment_id_out in transaction_headers table*/
2840: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2841: p_full_path => l_path_name,
2842: p_string => ' close the prevooius adjusment');
2843: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2844: p_full_path => l_path_name,
2845: p_string => 'old adjusment id ' || l_adjustment_id_out);
2846: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2847: p_full_path => l_path_name,
2842: p_string => ' close the prevooius adjusment');
2843: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2844: p_full_path => l_path_name,
2845: p_string => 'old adjusment id ' || l_adjustment_id_out);
2846: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2847: p_full_path => l_path_name,
2848: p_string => 'current adjusment id ' || l_adj_id);
2849:
2850: IGI_IAC_TRANS_HEADERS_PKG.update_row (
2857:
2858:
2859: EXCEPTION
2860: WHEN OTHERS THEN
2861: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
2862: l_mesg:=SQLERRM;
2863: FA_SRVR_MSG.Add_Message(
2864: Calling_FN => l_calling_function ,
2865: Name => 'IGI_IAC_EXCEPTION',
2877: PROCEDURE Debug_Period(p_period igi_iac_types.prd_rec) IS
2878: l_path_name VARCHAR2(150);
2879: BEGIN
2880: l_path_name := g_path||'debug_period';
2881: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2882: p_full_path => l_path_name,
2883: p_string => ' Period counter :'||to_char(p_period.period_counter));
2884: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2885: p_full_path => l_path_name,
2880: l_path_name := g_path||'debug_period';
2881: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2882: p_full_path => l_path_name,
2883: p_string => ' Period counter :'||to_char(p_period.period_counter));
2884: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2885: p_full_path => l_path_name,
2886: p_string => ' Period Num :'||to_char(p_period.period_num));
2887: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2888: p_full_path => l_path_name,
2883: p_string => ' Period counter :'||to_char(p_period.period_counter));
2884: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2885: p_full_path => l_path_name,
2886: p_string => ' Period Num :'||to_char(p_period.period_num));
2887: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2888: p_full_path => l_path_name,
2889: p_string => ' Fiscal Year :'||to_char(p_period.fiscal_year));
2890: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2891: p_full_path => l_path_name,
2886: p_string => ' Period Num :'||to_char(p_period.period_num));
2887: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2888: p_full_path => l_path_name,
2889: p_string => ' Fiscal Year :'||to_char(p_period.fiscal_year));
2890: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2891: p_full_path => l_path_name,
2892: p_string => ' Period Name :'||p_period.period_name);
2893:
2894: END Debug_Period;
2896: PROCEDURE Debug_Asset(p_asset igi_iac_types.iac_reval_input_asset) IS
2897: l_path_name VARCHAR2(150);
2898: BEGIN
2899: l_path_name := g_path||'debug_asset';
2900: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2901: p_full_path => l_path_name,
2902: p_string => ' Net book value :'||to_char(p_asset.net_book_value));
2903: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2904: p_full_path => l_path_name,
2899: l_path_name := g_path||'debug_asset';
2900: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2901: p_full_path => l_path_name,
2902: p_string => ' Net book value :'||to_char(p_asset.net_book_value));
2903: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2904: p_full_path => l_path_name,
2905: p_string => ' Adjusted Cost :'||to_char(p_asset.adjusted_cost));
2906: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2907: p_full_path => l_path_name,
2902: p_string => ' Net book value :'||to_char(p_asset.net_book_value));
2903: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2904: p_full_path => l_path_name,
2905: p_string => ' Adjusted Cost :'||to_char(p_asset.adjusted_cost));
2906: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2907: p_full_path => l_path_name,
2908: p_string => ' Operating Account :'||to_char(p_asset.operating_acct));
2909: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2910: p_full_path => l_path_name,
2905: p_string => ' Adjusted Cost :'||to_char(p_asset.adjusted_cost));
2906: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2907: p_full_path => l_path_name,
2908: p_string => ' Operating Account :'||to_char(p_asset.operating_acct));
2909: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2910: p_full_path => l_path_name,
2911: p_string => ' Reval Reserve :'||to_char(p_asset.reval_reserve));
2912: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2913: p_full_path => l_path_name,
2908: p_string => ' Operating Account :'||to_char(p_asset.operating_acct));
2909: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2910: p_full_path => l_path_name,
2911: p_string => ' Reval Reserve :'||to_char(p_asset.reval_reserve));
2912: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2913: p_full_path => l_path_name,
2914: p_string => ' Deprn Amount :'||to_char(p_asset.deprn_amount));
2915: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2916: p_full_path => l_path_name,
2911: p_string => ' Reval Reserve :'||to_char(p_asset.reval_reserve));
2912: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2913: p_full_path => l_path_name,
2914: p_string => ' Deprn Amount :'||to_char(p_asset.deprn_amount));
2915: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2916: p_full_path => l_path_name,
2917: p_string => ' Deprn Reserve :'||to_char(p_asset.deprn_reserve));
2918: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2919: p_full_path => l_path_name,
2914: p_string => ' Deprn Amount :'||to_char(p_asset.deprn_amount));
2915: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2916: p_full_path => l_path_name,
2917: p_string => ' Deprn Reserve :'||to_char(p_asset.deprn_reserve));
2918: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2919: p_full_path => l_path_name,
2920: p_string => ' Backlog Deprn Reserve :'||to_char(p_asset.backlog_deprn_reserve));
2921: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2922: p_full_path => l_path_name,
2917: p_string => ' Deprn Reserve :'||to_char(p_asset.deprn_reserve));
2918: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2919: p_full_path => l_path_name,
2920: p_string => ' Backlog Deprn Reserve :'||to_char(p_asset.backlog_deprn_reserve));
2921: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2922: p_full_path => l_path_name,
2923: p_string => ' General Fund :'||to_char(p_asset.general_fund));
2924: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2925: p_full_path => l_path_name,
2920: p_string => ' Backlog Deprn Reserve :'||to_char(p_asset.backlog_deprn_reserve));
2921: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2922: p_full_path => l_path_name,
2923: p_string => ' General Fund :'||to_char(p_asset.general_fund));
2924: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2925: p_full_path => l_path_name,
2926: p_string => ' Current Reval Factor :'||to_char(p_asset.current_reval_factor));
2927: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2928: p_full_path => l_path_name,
2923: p_string => ' General Fund :'||to_char(p_asset.general_fund));
2924: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2925: p_full_path => l_path_name,
2926: p_string => ' Current Reval Factor :'||to_char(p_asset.current_reval_factor));
2927: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
2928: p_full_path => l_path_name,
2929: p_string => ' Cumulative Reval Factor :'||to_char(p_asset.Cumulative_reval_factor));
2930:
2931: END Debug_Asset;
3021: l_user_id := fnd_global.user_id;
3022: l_login_id := fnd_global.login_id;
3023: l_path_name := g_path||'do_revaluation_catchup';
3024:
3025: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3026: p_full_path => l_path_name,
3027: p_string => '=========================================');
3028: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3029: p_full_path => l_path_name,
3024:
3025: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3026: p_full_path => l_path_name,
3027: p_string => '=========================================');
3028: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3029: p_full_path => l_path_name,
3030: p_string => 'Start of IAC Prior Additions Processing....');
3031: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3032: p_full_path => l_path_name,
3027: p_string => '=========================================');
3028: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3029: p_full_path => l_path_name,
3030: p_string => 'Start of IAC Prior Additions Processing....');
3031: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3032: p_full_path => l_path_name,
3033: p_string => '-----Parameters from FA code hook-----------');
3034: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3035: p_full_path => l_path_name,
3030: p_string => 'Start of IAC Prior Additions Processing....');
3031: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3032: p_full_path => l_path_name,
3033: p_string => '-----Parameters from FA code hook-----------');
3034: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3035: p_full_path => l_path_name,
3036: p_string => ' Book type code :'||p_book_type_code);
3037: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3038: p_full_path => l_path_name,
3033: p_string => '-----Parameters from FA code hook-----------');
3034: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3035: p_full_path => l_path_name,
3036: p_string => ' Book type code :'||p_book_type_code);
3037: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3038: p_full_path => l_path_name,
3039: p_string => ' Category Id :'||to_char(p_category_id));
3040: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3041: p_full_path => l_path_name,
3036: p_string => ' Book type code :'||p_book_type_code);
3037: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3038: p_full_path => l_path_name,
3039: p_string => ' Category Id :'||to_char(p_category_id));
3040: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3041: p_full_path => l_path_name,
3042: p_string => ' Asset Id :'||to_char(p_asset_id));
3043: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3044: p_full_path => l_path_name,
3039: p_string => ' Category Id :'||to_char(p_category_id));
3040: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3041: p_full_path => l_path_name,
3042: p_string => ' Asset Id :'||to_char(p_asset_id));
3043: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3044: p_full_path => l_path_name,
3045: p_string => '--------------------------------------------');
3046:
3047:
3056:
3057: IF NOT igi_iac_common_utils.get_dpis_period_counter(p_book_type_code,
3058: p_asset_id,
3059: l_dpis_period_counter) THEN
3060: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3061: p_full_path => l_path_name,
3062: p_string => '*** Error in Fetching DPIS period counter');
3063: return FALSE;
3064: END IF;
3064: END IF;
3065:
3066: IF NOT igi_iac_common_utils.get_open_period_info(p_book_type_code,
3067: l_open_period) THEN
3068: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3069: p_full_path => l_path_name,
3070: p_string => '*** Error in Fetching Open period info for book');
3071: return FALSE;
3072: END IF;
3075: FETCH c_period_num_for_catchup INTO l_period_num_for_catchup;
3076: CLOSE c_period_num_for_catchup;
3077:
3078:
3079: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3080: p_full_path => l_path_name,
3081: p_string => ' Revaluation catchup period for the book :'||to_char(l_period_num_for_catchup));
3082: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3083: p_full_path => l_path_name,
3078:
3079: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3080: p_full_path => l_path_name,
3081: p_string => ' Revaluation catchup period for the book :'||to_char(l_period_num_for_catchup));
3082: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3083: p_full_path => l_path_name,
3084: p_string => '------- Revaluation catchup periods for the asset -------');
3085:
3086: /* get the first revaluation period */
3097:
3098: IF NOT igi_iac_common_utils.get_period_info_for_counter(p_book_type_code,
3099: l_period_counter,
3100: l_period_info) 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 period info');
3104:
3105: return FALSE;
3108:
3109:
3110: IF (l_period_num_for_catchup = l_period_info.period_num) THEN
3111: Debug_Period(l_period_info);
3112: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3113: p_full_path => l_path_name,
3114: p_string => 'catch up Reval period ' || to_char(l_period_counter));
3115:
3116: l_idx1 := l_idx1 + 1;
3123:
3124: END IF;
3125: END LOOP;
3126:
3127: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3128: p_full_path => l_path_name,
3129: p_string => '------------------------------------------------------');
3130:
3131: /* Get the number of professional revaluations done and intialize the structure */
3128: p_full_path => l_path_name,
3129: p_string => '------------------------------------------------------');
3130:
3131: /* Get the number of professional revaluations done and intialize the structure */
3132: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3133: p_full_path => l_path_name,
3134: p_string => 'Get the number of professional revaluations done and intialize the structure');
3135:
3136: IF l_idx1 = 0 then
3138:
3139: IF NOT igi_iac_common_utils.get_period_info_for_counter(p_book_type_code,
3140: l_period_counter,
3141: l_period_info) THEN
3142: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3143: p_full_path => l_path_name,
3144: p_string => '*** Error in fetching period info');
3145:
3146: return FALSE;
3149: FOR l_prof_occ_reval_periods in c_prof_occ_reval_periods LOOP
3150:
3151: IF (l_prof_occ_reval_periods.revaluation_period = l_period_counter) THEN
3152: Debug_Period(l_period_info);
3153: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3154: p_full_path => l_path_name,
3155: p_string => ' Reval period ' || to_char(l_period_counter));
3156: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3157: p_full_path => l_path_name,
3152: Debug_Period(l_period_info);
3153: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3154: p_full_path => l_path_name,
3155: p_string => ' Reval period ' || to_char(l_period_counter));
3156: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3157: p_full_path => l_path_name,
3158: p_string => ' Reval type ' || l_prof_occ_reval_periods.revaluation_type);
3159: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3160: p_full_path => l_path_name,
3155: p_string => ' Reval period ' || to_char(l_period_counter));
3156: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3157: p_full_path => l_path_name,
3158: p_string => ' Reval type ' || l_prof_occ_reval_periods.revaluation_type);
3159: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3160: p_full_path => l_path_name,
3161: p_string => ' Reval new cost '|| l_prof_occ_reval_periods.new_cost);
3162: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3163: p_full_path => l_path_name,
3158: p_string => ' Reval type ' || l_prof_occ_reval_periods.revaluation_type);
3159: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3160: p_full_path => l_path_name,
3161: p_string => ' Reval new cost '|| l_prof_occ_reval_periods.new_cost);
3162: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3163: p_full_path => l_path_name,
3164: p_string => ' Reval current cost '|| l_prof_occ_reval_periods.current_cost);
3165:
3166: l_idx1 := l_idx1 + 1;
3177: END LOOP;
3178: END LOOP;
3179: END IF;
3180:
3181: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3182: p_full_path => l_path_name,
3183: p_string => '------------------------------------------------------');
3184: /* Get the number of professional revaluations done and intialize the structure */
3185:
3184: /* Get the number of professional revaluations done and intialize the structure */
3185:
3186:
3187: IF (l_idx1 = 0) THEN /* No catch-up required */
3188: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3189: p_full_path => l_path_name,
3190: p_string => ' No revaluation catchup periods found');
3191:
3192: return TRUE;
3201: NULL,
3202: l_fa_deprn_amount_py,
3203: l_fa_deprn_amount_cy,
3204: l_last_asset_period) THEN
3205: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3206: p_full_path => l_path_name,
3207: p_string => '*** Error in get_FA_Deprn_Expense function');
3208:
3209: return FALSE;
3215: FETCH c_fa_books into l_salvage_value,
3216: l_cost;
3217: CLOSE c_fa_books;
3218: IF l_salvage_value <> 0 Then
3219: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3220: p_full_path => l_path_name,
3221: p_string => '+Salavge Value Correction deprn_amount_py before :' ||l_fa_deprn_amount_py);
3222:
3223: -- deprn amount l_fa_deprn_amount_py
3226: P_value=>l_fa_deprn_amount_py,
3227: P_cost=>l_cost,
3228: P_salvage_value=>l_salvage_value,
3229: P_calling_program=>'RECLASS') THEN
3230: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3231: p_full_path => l_path_name,
3232: p_string => '+Salvage Value Correction Failed : ');
3233:
3234: return false;
3233:
3234: return false;
3235: END IF;
3236:
3237: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3238: p_full_path => l_path_name,
3239: p_string => '+Salavge Value Correction deprn_amount_py after :' ||l_fa_deprn_amount_py );
3240: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3241: p_full_path => l_path_name,
3236:
3237: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3238: p_full_path => l_path_name,
3239: p_string => '+Salavge Value Correction deprn_amount_py after :' ||l_fa_deprn_amount_py );
3240: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3241: p_full_path => l_path_name,
3242: p_string => '+Salavge Value Correction deprn_amount_cy before :' ||l_fa_deprn_amount_cy);
3243:
3244:
3249: P_cost=>l_cost,
3250: P_salvage_value=>l_salvage_value,
3251: P_calling_program=>'RECLASS') THEN
3252:
3253: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3254: p_full_path => l_path_name,
3255: p_string => '+Salvage Value Correction Failed : ');
3256:
3257: return false;
3256:
3257: return false;
3258: END IF;
3259:
3260: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3261: p_full_path => l_path_name,
3262: p_string => '+Salavge Value Correction deprn_amount_cy after :' ||l_fa_deprn_amount_cy);
3263:
3264: END IF;
3263:
3264: END IF;
3265: /*salvage value correction*/
3266:
3267: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3268: p_full_path => l_path_name,
3269: p_string => ' Calling Revaluation Initialization program ');
3270:
3271: IF NOT igi_iac_catchup_pkg.do_reval_init_struct(l_open_period.period_counter,
3285: l_fa_deprn_amount_cy, -- For bug 2961656
3286: l_last_asset_period, -- For bug 2961656
3287: 'RECLASS') THEN
3288:
3289: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3290: p_full_path => l_path_name,
3291: p_string => '*** Error in catchup pkg for revaluation initialization');
3292:
3293: return FALSE;
3292:
3293: return FALSE;
3294: END IF;
3295:
3296: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3297: p_full_path => l_path_name,
3298: p_string => ' Back from Revaluation Initialization');
3299:
3300: FOR l_idx2 IN 1..l_idx1 LOOP
3302: IF (l_idx2 <> 1) THEN
3303:
3304: l_reval_asset := l_reval_output_asset(l_idx2 - 1);
3305:
3306: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3307: p_full_path => l_path_name,
3308: p_string => ' Doing depreciation catchup for the periods between revaluation');
3309:
3310: IF NOT igi_iac_catchup_pkg.do_deprn_catchup(l_reval_asset_params(l_idx2 - 1).period_counter +1,
3318: NULL, -- For bug 2961656
3319: NULL, -- For bug 2961656
3320: l_reval_asset ,
3321: p_event_id => p_event_id)THEN
3322: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3323: p_full_path => l_path_name,
3324: p_string => '*** Error in depreciation catchup');
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 depreciation catchup');
3332:
3333:
3412: NULL);*/
3413:
3414: /* Last revaluation - Insert records into revaluation tables*/
3415:
3416: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3417: p_full_path => l_path_name,
3418: p_string => ' Last Revaluation - Inserting into igi_iac_revaluations');
3419:
3420:
3432: NULL,
3433: 'ADDITION',
3434: X_event_id => p_event_id);
3435:
3436: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3437: p_full_path => l_path_name,
3438: p_string => ' Revaluation Id :'||to_char(l_revaluation_id));
3439:
3440: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3436: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3437: p_full_path => l_path_name,
3438: p_string => ' Revaluation Id :'||to_char(l_revaluation_id));
3439:
3440: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3441: p_full_path => l_path_name,
3442: p_string => ' Inserting into igi_iac_reval_asset_rules');
3443:
3444: l_rowid := NULL;
3462: l_reval_input_asset(l_idx2).period_counter := l_open_period.period_counter ;
3463: l_reval_asset_params(l_idx2).revaluation_id := l_revaluation_id;
3464: l_reval_asset_rules(l_idx2).revaluation_id := l_revaluation_id;
3465:
3466: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3467: p_full_path => l_path_name,
3468: p_string => ' Period counter passed to Reval CRUD :'||to_char(l_open_period.period_counter ));
3469:
3470:
3483: l_reval_params.fa_asset_info := l_fa_asset_info(l_idx2);
3484:
3485: /* call revaluation processing function here */
3486:
3487: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3488: p_full_path => l_path_name,
3489: p_string => ' Input asset balances to revaluation program');
3490:
3491:
3492: Debug_Asset(l_reval_input_asset(l_idx2));
3493:
3494: IF NOT igi_iac_reval_wrapper.do_reval_calc_asset(l_reval_params,
3495: l_reval_asset_out) THEN
3496: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3497: p_full_path => l_path_name,
3498: p_string => '*** Error in Revaluation Program');
3499:
3500: return FALSE;
3508:
3509: /* Bug 2425856 vgadde 20/06/2002 Start(1) */
3510: BEGIN
3511: IF (l_idx2 = l_idx1) THEN /* Last Revaluation */
3512: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3513: p_full_path => l_path_name,
3514: p_string => ' Last revaluation period :'||to_char(l_last_reval_period));
3515: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3516: p_full_path => l_path_name,
3511: IF (l_idx2 = l_idx1) THEN /* Last Revaluation */
3512: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3513: p_full_path => l_path_name,
3514: p_string => ' Last revaluation period :'||to_char(l_last_reval_period));
3515: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3516: p_full_path => l_path_name,
3517: p_string => ' Revaluation Id :'||to_char(l_revaluation_id));
3518:
3519:
3523: AND asset_id = p_asset_id
3524: AND book_type_code = p_book_type_code;
3525:
3526: IF SQL%FOUND then
3527: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3528: p_full_path => l_path_name,
3529: p_string => ' Records in reval rates updated for correct period');
3530: ELSE
3531: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3527: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3528: p_full_path => l_path_name,
3529: p_string => ' Records in reval rates updated for correct period');
3530: ELSE
3531: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3532: p_full_path => l_path_name,
3533: p_string => '*** No record found in reval rates table to update');
3534:
3535: return FALSE;
3541: END LOOP;
3542:
3543: IF (l_last_reval_period < l_open_period.period_counter) THEN
3544:
3545: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3546: p_full_path => l_path_name,
3547: p_string => ' Doing the final catchup for depreciation');
3548:
3549:
3559: NULL, -- For bug 2961656
3560: NULL, -- For bug 2961656
3561: l_reval_asset ,
3562: p_event_id => p_event_id)THEN
3563: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3564: p_full_path => l_path_name,
3565: p_string => '*** Error in depreciation catchup for final run' );
3566:
3567: return FALSE;
3566:
3567: return FALSE;
3568: END IF;
3569:
3570: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3571: p_full_path => l_path_name,
3572: p_string => ' Output from final catchup');
3573:
3574: Debug_Asset(l_reval_asset);
3597: AND PERIOD_COUNTER = l_open_period.period_counter
3598: AND TRANSACTION_TYPE_CODE = 'RECLASS'
3599: AND EVENT_ID IS NULL;
3600:
3601: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3602: p_full_path => l_path_name,
3603: p_string => ' Updated all reclass trasactions with event_id');
3604: EXCEPTION
3605: WHEN NO_DATA_FOUND THEN
3610: return TRUE;
3611:
3612: EXCEPTION
3613: WHEN OTHERS THEN
3614: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
3615: return FALSE;
3616:
3617:
3618: END Do_Revaluation_Catchup;
3642: l_transaction_type_code := Null;
3643: l_adjustment_status := null ;
3644: l_path_name := g_path||'do_diff_price_index';
3645:
3646: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3647: p_full_path => l_path_name,
3648: p_string => 'Enter The Do different price index');
3649:
3650: l_get_latest_adjustment_id:=0;
3651: /* Create a new transaction header for RECLASS reversal of the det balances and
3652: create the adjustments accordingly */
3653: /* to do this call the same price index */
3654: IF Do_same_price_index(p_event_id) then
3655: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3656: p_full_path => l_path_name,
3657: p_string => '+DIFF PRICE INDEX RECLASS REVERSAL SUCCESS');
3658: ELSE
3659: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3655: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3656: p_full_path => l_path_name,
3657: p_string => '+DIFF PRICE INDEX RECLASS REVERSAL SUCCESS');
3658: ELSE
3659: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3660: p_full_path => l_path_name,
3661: p_string => 'DIFFERENT PRICE INDEX RECLASS NEGATION FAILED ');
3662:
3663: return false;
3675: l_asset_cat_rec_new.category_id,
3676: 'RECLASS',
3677: p_event_id => p_event_id)THEN
3678:
3679: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3680: p_full_path => l_path_name,
3681: p_string => 'FAILED TO DO DIFFERENT PRICE INDEX RECLASSIFICATION');
3682:
3683: return false;
3688: OPEN C_Reval_Rates;
3689: FETCH C_Reval_Rates into l_get_latest_adjustment_id;
3690: CLOSE C_Reval_Rates;
3691: IF NOT IGI_IAC_REVAL_CRUD.update_reval_rates (fp_adjustment_id => l_get_latest_adjustment_id) THEN
3692: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3693: p_full_path => l_path_name,
3694: p_string => 'FAILED UPDATE REVAL RATES');
3695: END IF;
3696:
3693: p_full_path => l_path_name,
3694: p_string => 'FAILED UPDATE REVAL RATES');
3695: END IF;
3696:
3697: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3698: p_full_path => l_path_name,
3699: p_string => 'SUCESSFULL DIFF PRICE INDEX');
3700:
3701: return True;
3711: PROCEDURE Print_Parameter_values is
3712: l_path_name VARCHAR2(150);
3713: BEGIN
3714: l_path_name := g_path||'print_parameter_values';
3715: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3716: p_full_path => l_path_name,
3717: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3718: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3719: p_full_path => l_path_name,
3714: l_path_name := g_path||'print_parameter_values';
3715: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3716: p_full_path => l_path_name,
3717: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3718: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3719: p_full_path => l_path_name,
3720: p_string => ' +ASSET_TRANS_HDR_REC');
3721: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3722: p_full_path => l_path_name,
3717: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3718: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3719: p_full_path => l_path_name,
3720: p_string => ' +ASSET_TRANS_HDR_REC');
3721: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3722: p_full_path => l_path_name,
3723: p_string => ' +TRANSACTION_HEADER_ID.......... '||l_trans_rec.TRANSACTION_HEADER_ID );
3724: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3725: p_full_path => l_path_name,
3720: p_string => ' +ASSET_TRANS_HDR_REC');
3721: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3722: p_full_path => l_path_name,
3723: p_string => ' +TRANSACTION_HEADER_ID.......... '||l_trans_rec.TRANSACTION_HEADER_ID );
3724: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3725: p_full_path => l_path_name,
3726: p_string => ' +TRANSACTION_TYPE_CODE.......... '||l_trans_rec.TRANSACTION_TYPE_CODE );
3727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3728: p_full_path => l_path_name,
3723: p_string => ' +TRANSACTION_HEADER_ID.......... '||l_trans_rec.TRANSACTION_HEADER_ID );
3724: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3725: p_full_path => l_path_name,
3726: p_string => ' +TRANSACTION_TYPE_CODE.......... '||l_trans_rec.TRANSACTION_TYPE_CODE );
3727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3728: p_full_path => l_path_name,
3729: p_string => ' +TRANSACTION_DATE_ENTERED....... '||l_trans_rec.TRANSACTION_DATE_ENTERED );
3730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3731: p_full_path => l_path_name,
3726: p_string => ' +TRANSACTION_TYPE_CODE.......... '||l_trans_rec.TRANSACTION_TYPE_CODE );
3727: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3728: p_full_path => l_path_name,
3729: p_string => ' +TRANSACTION_DATE_ENTERED....... '||l_trans_rec.TRANSACTION_DATE_ENTERED );
3730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3731: p_full_path => l_path_name,
3732: p_string => ' +TRANSACTION_NAME............... '||l_trans_rec.TRANSACTION_NAME);
3733: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3734: p_full_path => l_path_name,
3729: p_string => ' +TRANSACTION_DATE_ENTERED....... '||l_trans_rec.TRANSACTION_DATE_ENTERED );
3730: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3731: p_full_path => l_path_name,
3732: p_string => ' +TRANSACTION_NAME............... '||l_trans_rec.TRANSACTION_NAME);
3733: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3734: p_full_path => l_path_name,
3735: p_string => ' +SOURCE_TRANSACTION_HEADER_ID... '||l_trans_rec.SOURCE_TRANSACTION_HEADER_ID);
3736: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3737: p_full_path => l_path_name,
3732: p_string => ' +TRANSACTION_NAME............... '||l_trans_rec.TRANSACTION_NAME);
3733: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3734: p_full_path => l_path_name,
3735: p_string => ' +SOURCE_TRANSACTION_HEADER_ID... '||l_trans_rec.SOURCE_TRANSACTION_HEADER_ID);
3736: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3737: p_full_path => l_path_name,
3738: p_string => ' +MASS_REFERENCE_ID.............. '|| l_trans_rec.MASS_REFERENCE_ID);
3739: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3740: p_full_path => l_path_name,
3735: p_string => ' +SOURCE_TRANSACTION_HEADER_ID... '||l_trans_rec.SOURCE_TRANSACTION_HEADER_ID);
3736: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3737: p_full_path => l_path_name,
3738: p_string => ' +MASS_REFERENCE_ID.............. '|| l_trans_rec.MASS_REFERENCE_ID);
3739: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3740: p_full_path => l_path_name,
3741: p_string => ' +TRANSACTION_SUBTYPE............ '|| l_trans_rec.TRANSACTION_SUBTYPE);
3742: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3743: p_full_path => l_path_name,
3738: p_string => ' +MASS_REFERENCE_ID.............. '|| l_trans_rec.MASS_REFERENCE_ID);
3739: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3740: p_full_path => l_path_name,
3741: p_string => ' +TRANSACTION_SUBTYPE............ '|| l_trans_rec.TRANSACTION_SUBTYPE);
3742: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3743: p_full_path => l_path_name,
3744: p_string => ' +TRANSACTION_KEY................ '|| l_trans_rec.TRANSACTION_KEY);
3745: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3746: p_full_path => l_path_name,
3741: p_string => ' +TRANSACTION_SUBTYPE............ '|| l_trans_rec.TRANSACTION_SUBTYPE);
3742: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3743: p_full_path => l_path_name,
3744: p_string => ' +TRANSACTION_KEY................ '|| l_trans_rec.TRANSACTION_KEY);
3745: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3746: p_full_path => l_path_name,
3747: p_string => ' +AMORTIZATION_START_DATE........ '||l_trans_rec.AMORTIZATION_START_DATE);
3748: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3749: p_full_path => l_path_name,
3744: p_string => ' +TRANSACTION_KEY................ '|| l_trans_rec.TRANSACTION_KEY);
3745: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3746: p_full_path => l_path_name,
3747: p_string => ' +AMORTIZATION_START_DATE........ '||l_trans_rec.AMORTIZATION_START_DATE);
3748: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3749: p_full_path => l_path_name,
3750: p_string => ' +CALLING_INTERFACE.............. '||l_trans_rec.CALLING_INTERFACE);
3751: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3752: p_full_path => l_path_name,
3747: p_string => ' +AMORTIZATION_START_DATE........ '||l_trans_rec.AMORTIZATION_START_DATE);
3748: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3749: p_full_path => l_path_name,
3750: p_string => ' +CALLING_INTERFACE.............. '||l_trans_rec.CALLING_INTERFACE);
3751: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3752: p_full_path => l_path_name,
3753: p_string => ' +MASS_TRANSACTION_ID............ '||l_trans_rec.MASS_TRANSACTION_ID);
3754: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3755: p_full_path => l_path_name,
3750: p_string => ' +CALLING_INTERFACE.............. '||l_trans_rec.CALLING_INTERFACE);
3751: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3752: p_full_path => l_path_name,
3753: p_string => ' +MASS_TRANSACTION_ID............ '||l_trans_rec.MASS_TRANSACTION_ID);
3754: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3755: p_full_path => l_path_name,
3756: p_string => ' +ASSET_HDR_REC');
3757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3758: p_full_path => l_path_name,
3753: p_string => ' +MASS_TRANSACTION_ID............ '||l_trans_rec.MASS_TRANSACTION_ID);
3754: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3755: p_full_path => l_path_name,
3756: p_string => ' +ASSET_HDR_REC');
3757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3758: p_full_path => l_path_name,
3759: p_string => ' +ASSET_ID....................... '|| l_asset_hdr_rec.ASSET_ID );
3760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3761: p_full_path => l_path_name,
3756: p_string => ' +ASSET_HDR_REC');
3757: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3758: p_full_path => l_path_name,
3759: p_string => ' +ASSET_ID....................... '|| l_asset_hdr_rec.ASSET_ID );
3760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3761: p_full_path => l_path_name,
3762: p_string => ' +BOOK_TYPE_CODE................. '|| l_asset_hdr_rec.BOOK_TYPE_CODE );
3763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3764: p_full_path => l_path_name,
3759: p_string => ' +ASSET_ID....................... '|| l_asset_hdr_rec.ASSET_ID );
3760: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3761: p_full_path => l_path_name,
3762: p_string => ' +BOOK_TYPE_CODE................. '|| l_asset_hdr_rec.BOOK_TYPE_CODE );
3763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3764: p_full_path => l_path_name,
3765: p_string => ' +SET_OF_BOOKS_ID................ '|| l_asset_hdr_rec.SET_OF_BOOKS_ID);
3766: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3767: p_full_path => l_path_name,
3762: p_string => ' +BOOK_TYPE_CODE................. '|| l_asset_hdr_rec.BOOK_TYPE_CODE );
3763: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3764: p_full_path => l_path_name,
3765: p_string => ' +SET_OF_BOOKS_ID................ '|| l_asset_hdr_rec.SET_OF_BOOKS_ID);
3766: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3767: p_full_path => l_path_name,
3768: p_string => ' +PERIOD_OF_ADDITION............. '||l_asset_hdr_rec.PERIOD_OF_ADDITION);
3769: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3770: p_full_path => l_path_name,
3765: p_string => ' +SET_OF_BOOKS_ID................ '|| l_asset_hdr_rec.SET_OF_BOOKS_ID);
3766: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3767: p_full_path => l_path_name,
3768: p_string => ' +PERIOD_OF_ADDITION............. '||l_asset_hdr_rec.PERIOD_OF_ADDITION);
3769: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3770: p_full_path => l_path_name,
3771: p_string => ' +ASSET_CAT_REC_OLD');
3772: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3773: p_full_path => l_path_name,
3768: p_string => ' +PERIOD_OF_ADDITION............. '||l_asset_hdr_rec.PERIOD_OF_ADDITION);
3769: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3770: p_full_path => l_path_name,
3771: p_string => ' +ASSET_CAT_REC_OLD');
3772: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3773: p_full_path => l_path_name,
3774: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_old.category_id);
3775: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3776: p_full_path => l_path_name,
3771: p_string => ' +ASSET_CAT_REC_OLD');
3772: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3773: p_full_path => l_path_name,
3774: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_old.category_id);
3775: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3776: p_full_path => l_path_name,
3777: p_string => ' +ASSET_CAT_REC_NEW');
3778: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3779: p_full_path => l_path_name,
3774: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_old.category_id);
3775: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3776: p_full_path => l_path_name,
3777: p_string => ' +ASSET_CAT_REC_NEW');
3778: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3779: p_full_path => l_path_name,
3780: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_new.category_id);
3781: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3782: p_full_path => l_path_name,
3777: p_string => ' +ASSET_CAT_REC_NEW');
3778: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3779: p_full_path => l_path_name,
3780: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_new.category_id);
3781: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3782: p_full_path => l_path_name,
3783: p_string => ' +ASSET_TYPE_REC');
3784: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3785: p_full_path => l_path_name,
3780: p_string => ' +CATEGORY_ID.................... '|| l_asset_cat_rec_new.category_id);
3781: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3782: p_full_path => l_path_name,
3783: p_string => ' +ASSET_TYPE_REC');
3784: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3785: p_full_path => l_path_name,
3786: p_string => ' +ASSET_TYPE..................... '|| l_asset_type_rec.asset_type );
3787: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3788: p_full_path => l_path_name,
3783: p_string => ' +ASSET_TYPE_REC');
3784: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3785: p_full_path => l_path_name,
3786: p_string => ' +ASSET_TYPE..................... '|| l_asset_type_rec.asset_type );
3787: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3788: p_full_path => l_path_name,
3789: p_string => ' +CALLING FUNCTION................... ' || l_calling_function);
3790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3791: p_full_path => l_path_name,
3786: p_string => ' +ASSET_TYPE..................... '|| l_asset_type_rec.asset_type );
3787: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3788: p_full_path => l_path_name,
3789: p_string => ' +CALLING FUNCTION................... ' || l_calling_function);
3790: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3791: p_full_path => l_path_name,
3792: p_string => '+PARAMTER VALUES RECEIVED TO Do_RECLASS');
3793: END;
3794:
3842: l_chart_of_accounts_id :=0;
3843: l_precision :=0;
3844: l_path_name := g_path||'do_reclass';
3845:
3846: /* igi_iac_debug_pkg.debug_on('RECLASS');
3847: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3848: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3849: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3850: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3843: l_precision :=0;
3844: l_path_name := g_path||'do_reclass';
3845:
3846: /* igi_iac_debug_pkg.debug_on('RECLASS');
3847: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3848: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3849: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3850: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3851: --
3844: l_path_name := g_path||'do_reclass';
3845:
3846: /* igi_iac_debug_pkg.debug_on('RECLASS');
3847: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3848: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3849: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3850: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3851: --
3852: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3845:
3846: /* igi_iac_debug_pkg.debug_on('RECLASS');
3847: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3848: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3849: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3850: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3851: --
3852: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3853: p_full_path => l_path_name,
3846: /* igi_iac_debug_pkg.debug_on('RECLASS');
3847: igi_iac_debug_pkg.debug(0,'Creating a message log file for RECLASS');
3848: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3849: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3850: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3851: --
3852: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3853: p_full_path => l_path_name,
3854: p_string => 'Creating a message log file for RECLASS');
3848: igi_iac_debug_pkg.debug(0,'Date '||sysdate);
3849: igi_iac_debug_pkg.debug(0,'Calling function '||p_calling_function);
3850: igi_iac_debug_pkg.debug(0,'Entry for IAC reclass');*/
3851: --
3852: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3853: p_full_path => l_path_name,
3854: p_string => 'Creating a message log file for RECLASS');
3855: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3856: p_full_path => l_path_name,
3851: --
3852: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3853: p_full_path => l_path_name,
3854: p_string => 'Creating a message log file for RECLASS');
3855: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3856: p_full_path => l_path_name,
3857: p_string => 'Date '||sysdate);
3858: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3859: p_full_path => l_path_name,
3854: p_string => 'Creating a message log file for RECLASS');
3855: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3856: p_full_path => l_path_name,
3857: p_string => 'Date '||sysdate);
3858: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3859: p_full_path => l_path_name,
3860: p_string => 'Calling function '||p_calling_function);
3861: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3862: p_full_path => l_path_name,
3857: p_string => 'Date '||sysdate);
3858: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3859: p_full_path => l_path_name,
3860: p_string => 'Calling function '||p_calling_function);
3861: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3862: p_full_path => l_path_name,
3863: p_string => 'Entry for IAC reclass');
3864:
3865: --validate the IAC book
3863: p_string => 'Entry for IAC reclass');
3864:
3865: --validate the IAC book
3866: IF Not (igi_iac_common_utils.is_iac_book(p_asset_hdr_rec.book_type_code)) THEN
3867: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3868: p_full_path => l_path_name,
3869: p_string => 'Not an IAC book ..'||p_asset_hdr_rec.book_type_code);
3870:
3871: Return True;
3872: End if;
3873:
3874: IF NOT igi_iac_common_utils.populate_iac_fa_deprn_data(p_asset_hdr_rec.book_type_code,
3875: 'RECLASS') THEN
3876: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3877: p_full_path => l_path_name,
3878: p_string => '*** Error in Synchronizing Depreciation Data ***');
3879:
3880: return FALSE;
3893: Print_Parameter_values;
3894:
3895: /* return ture if the reclass being done in the same period asset added */
3896: IF l_asset_hdr_rec.PERIOD_OF_ADDITION = 'Y' THEN
3897: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3898: p_full_path => l_path_name,
3899: p_string => 'RECLASS in the same period as asset Added');
3900:
3901: Return True;
3908: l_set_of_books_id,
3909: l_chart_of_accounts_id,
3910: l_currency,
3911: l_precision ) THEN
3912: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3913: p_full_path => l_path_name,
3914: p_string => '+Set of books Failed');
3915: FA_SRVR_MSG.Add_Message(
3916: CALLING_FN => p_calling_function,
3919: APPLICATION => 'IGI');
3920: Return False;
3921: END IF;
3922:
3923: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3924: p_full_path => l_path_name,
3925: p_string => '+Set of books value is set to ....'|| l_set_of_books_id);
3926:
3927: l_asset_hdr_rec.set_of_books_id := l_set_of_books_id;
3927: l_asset_hdr_rec.set_of_books_id := l_set_of_books_id;
3928: END IF;
3929:
3930: -- validate the category
3931: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3932: p_full_path => l_path_name,
3933: p_string => '+Validate categories');
3934: IF not do_validate_category THEN
3935: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3931: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3932: p_full_path => l_path_name,
3933: p_string => '+Validate categories');
3934: IF not do_validate_category THEN
3935: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3936: p_full_path => l_path_name,
3937: p_string => '+Failed Validate categories');
3938: FA_SRVR_MSG.Add_Message(
3939: CALLING_FN => p_calling_function,
3942: APPLICATION => 'IGI');
3943: Return False;
3944: END IF;
3945:
3946: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3947: p_full_path => l_path_name,
3948: p_string => '+Validate categories successful');
3949:
3950: -- validate the asset
3947: p_full_path => l_path_name,
3948: p_string => '+Validate categories successful');
3949:
3950: -- validate the asset
3951: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3952: p_full_path => l_path_name,
3953: p_string => '+Validate Asset');
3954:
3955: IF NOT do_validate_asset THEN
3952: p_full_path => l_path_name,
3953: p_string => '+Validate Asset');
3954:
3955: IF NOT do_validate_asset THEN
3956: igi_iac_debug_pkg.debug_other_string(p_level => g_error_level,
3957: p_full_path => l_path_name,
3958: p_string => '+Failed Validate Asset');
3959:
3960: FA_SRVR_MSG.Add_Message(
3964: APPLICATION => 'IGI');
3965: Return TRUE;
3966: END IF;
3967:
3968: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
3969: p_full_path => l_path_name,
3970: p_string => '+Validate Asset successfully');
3971:
3972: -- Check whether adjustments exist in the open period
3999:
4000: IF l_old_price_index = l_new_Price_index THEN
4001:
4002: -- call the same price index
4003: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4004: p_full_path => l_path_name,
4005: p_string => '+SAME PRICE INDEX');
4006:
4007:
4007:
4008: SAME_PRICE_INDEX_FLAG := TRUE;
4009: DIFF_PRICE_INDEX_FLAG:= FALSE;
4010: IF do_same_price_index(p_event_id) THEN
4011: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4012: p_full_path => l_path_name,
4013: p_string => '+SAME PRICE INDEX SUCCESS');
4014: ELSE
4015: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4011: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4012: p_full_path => l_path_name,
4013: p_string => '+SAME PRICE INDEX SUCCESS');
4014: ELSE
4015: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4016: p_full_path => l_path_name,
4017: p_string => 'SAME PRICE INDEX IAC RECLASSIFICATION FAILED');
4018:
4019: FA_SRVR_MSG.Add_Message(
4028: SAME_PRICE_INDEX_FLAG := FALSE;
4029: DIFF_PRICE_INDEX_FLAG:= TRUE;
4030: IF Do_Diff_Price_Index(p_event_id => p_event_id) THEN
4031: -- call the different price index
4032: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4033: p_full_path => l_path_name,
4034: p_string => '+DIFFERENT PRICE INDEX');
4035:
4036: return True;
4034: p_string => '+DIFFERENT PRICE INDEX');
4035:
4036: return True;
4037: ELSE
4038: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
4039: p_full_path => l_path_name,
4040: p_string => '+DIFFERENT PRICE INDEX RETURNED FALSE');
4041: return false;
4042: END IF;