440:
441: begin
442:
443: IF (p_log_level_rec.statement_level) THEN
444: fa_rx_util_pkg.debug ('*****START FA_DEPRN_TAX_REP_PKG.FADPTX_INSERT*****');
445: END IF;
446:
447: /*======================================================================
448: SET DEFALUT
474: h_request_id := request_id;
475: h_login_id := login_id;
476:
477: IF (p_log_level_rec.statement_level) THEN
478: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Book: '||h_book);
479: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Year: '||h_year);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
475: h_login_id := login_id;
476:
477: IF (p_log_level_rec.statement_level) THEN
478: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Book: '||h_book);
479: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Year: '||h_year);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
476:
477: IF (p_log_level_rec.statement_level) THEN
478: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Book: '||h_book);
479: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Year: '||h_year);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
477: IF (p_log_level_rec.statement_level) THEN
478: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Book: '||h_book);
479: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Year: '||h_year);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
478: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Book: '||h_book);
479: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Year: '||h_year);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
479: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Year: '||h_year);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
487: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Request id: '||h_request_id);
480: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State from: '||state_from);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
487: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Request id: '||h_request_id);
488: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****login id: '||h_login_id);
481: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****State to :'||state_to);
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
487: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Request id: '||h_request_id);
488: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****login id: '||h_login_id);
489: END IF;
482: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Tax Asset Type Segment: '||h_tax_asset_type_segment);
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
487: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Request id: '||h_request_id);
488: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****login id: '||h_login_id);
489: END IF;
490:
483: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category low: '||h_category_from);
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
487: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Request id: '||h_request_id);
488: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****login id: '||h_login_id);
489: END IF;
490:
491: /* Get Distribution Source CORPORATE BOOK */
484: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Category high: '||h_category_to);
485: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Target date: '||h_target_date);
486: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Prior date: '||h_prior_date);
487: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****Request id: '||h_request_id);
488: fa_rx_util_pkg.debug('fadptx_insert: ' || '*****login id: '||h_login_id);
489: END IF;
490:
491: /* Get Distribution Source CORPORATE BOOK */
492:
495: From FA_BOOK_CONTROLS
496: where BOOK_TYPE_CODE =h_book;
497:
498: IF (p_log_level_rec.statement_level) THEN
499: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Distribution Source Book : '||h_corp_book);
500: END IF;
501:
502: /* Get Category FF and Loacation FF ,Currency information */
503:
515: WHERE BC.BOOK_TYPE_CODE = h_book
516: and SOB.SET_OF_BOOKS_ID = BC.SET_OF_BOOKS_ID;
517:
518: IF (p_log_level_rec.statement_level) THEN
519: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Currency Code: '||h_currency_code);
520: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Category struct id: '||cat_flex_struct);
521: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Location struct id: '||loc_flex_struct);
522: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Company Name: '||h_company_name);
523: END IF;
516: and SOB.SET_OF_BOOKS_ID = BC.SET_OF_BOOKS_ID;
517:
518: IF (p_log_level_rec.statement_level) THEN
519: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Currency Code: '||h_currency_code);
520: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Category struct id: '||cat_flex_struct);
521: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Location struct id: '||loc_flex_struct);
522: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Company Name: '||h_company_name);
523: END IF;
524:
517:
518: IF (p_log_level_rec.statement_level) THEN
519: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Currency Code: '||h_currency_code);
520: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Category struct id: '||cat_flex_struct);
521: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Location struct id: '||loc_flex_struct);
522: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Company Name: '||h_company_name);
523: END IF;
524:
525: /* Get FA_LOOKUP CODE values */
518: IF (p_log_level_rec.statement_level) THEN
519: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Currency Code: '||h_currency_code);
520: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Category struct id: '||cat_flex_struct);
521: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Location struct id: '||loc_flex_struct);
522: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Company Name: '||h_company_name);
523: END IF;
524:
525: /* Get FA_LOOKUP CODE values */
526: select meaning
537: min_acct_unit => h_min_acct_unit
538: );
539:
540: IF (p_log_level_rec.statement_level) THEN
541: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Precision: '||h_currency_code);
542: END IF;
543:
544: /* Get Minor Category Segment */
545: /* Bug#3305764 - Enhancement to make flexfield segment flexible */
547: l_parm_minor := fa_rx_flex_pkg.flex_sql(140,'CAT#', cat_flex_struct,'CAT',
548: 'SELECT', h_tax_asset_type_segment);
549:
550: IF (p_log_level_rec.statement_level) THEN
551: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Tax Asset Type Category Segment: '||l_parm_minor);
552: END IF;
553:
554: /* Get Location Segment */
555: l_parm_state := fa_rx_flex_pkg.flex_sql(140,'LOC#', loc_flex_struct,'LOC',
555: l_parm_state := fa_rx_flex_pkg.flex_sql(140,'LOC#', loc_flex_struct,'LOC',
556: 'SELECT', 'LOC_STATE');
557:
558: IF (p_log_level_rec.statement_level) THEN
559: fa_rx_util_pkg.debug('fadptx_insert: ' || 'State Segment: '||l_parm_state);
560: END IF;
561:
562: /*============================================================================
563: Dynamic SQL valiable set
974: end if;
975: k := k+1;
976: End Loop;
977:
978: fa_rx_util_pkg.debug('debug: ***** Main SQL: *******');
979:
980: /* Bug3896299 - Performance Fix */
981: /* Changed sub_sql to check the state range */
982: l_sub_sql :=
1031: ';
1032: /* Bug3896299 */
1033:
1034: IF (p_log_level_rec.statement_level) THEN
1035: fa_rx_util_pkg.debug('fadptx_insert: SUB SQL: '|| l_sub_sql);
1036: END IF;
1037:
1038:
1039:
1041: /* v_SubCursor is created for performance issue. the cursor fetch asset_id */
1042:
1043: v_SubCursor := DBMS_SQL.OPEN_CURSOR;
1044: IF (p_log_level_rec.statement_level) THEN
1045: fa_rx_util_pkg.debug('fadptx_insert: ***** OPEN CURSOR: v_SubCursor *****');
1046: fa_rx_util_pkg.debug('fadptx_insert: v_SubCursor :'|| v_SubCursor);
1047: END IF;
1048:
1049: DBMS_SQL.PARSE (v_SubCursor,l_sub_sql,DBMS_SQL.V7);
1042:
1043: v_SubCursor := DBMS_SQL.OPEN_CURSOR;
1044: IF (p_log_level_rec.statement_level) THEN
1045: fa_rx_util_pkg.debug('fadptx_insert: ***** OPEN CURSOR: v_SubCursor *****');
1046: fa_rx_util_pkg.debug('fadptx_insert: v_SubCursor :'|| v_SubCursor);
1047: END IF;
1048:
1049: DBMS_SQL.PARSE (v_SubCursor,l_sub_sql,DBMS_SQL.V7);
1050:
1063:
1064: DBMS_SQL.DEFINE_COLUMN(v_SubCursor,1,l_asset_id);
1065:
1066: IF (p_log_level_rec.statement_level) THEN
1067: fa_rx_util_pkg.debug('fadptx_insert: ***** BIND/DEFINE COLUMN: v_SubCursor *****');
1068: END IF;
1069:
1070: v_SubReturn := DBMS_SQL.EXECUTE(v_SubCursor);
1071: IF (p_log_level_rec.statement_level) THEN
1068: END IF;
1069:
1070: v_SubReturn := DBMS_SQL.EXECUTE(v_SubCursor);
1071: IF (p_log_level_rec.statement_level) THEN
1072: fa_rx_util_pkg.debug('fadptx_insert: ***** EXECUTE: v_SubCursor *****');
1073: fa_rx_util_pkg.debug('fadptx_insert: v_SubReturn :'|| v_SubReturn);
1074: END IF;
1075:
1076: --Open v_MainCursor
1069:
1070: v_SubReturn := DBMS_SQL.EXECUTE(v_SubCursor);
1071: IF (p_log_level_rec.statement_level) THEN
1072: fa_rx_util_pkg.debug('fadptx_insert: ***** EXECUTE: v_SubCursor *****');
1073: fa_rx_util_pkg.debug('fadptx_insert: v_SubReturn :'|| v_SubReturn);
1074: END IF;
1075:
1076: --Open v_MainCursor
1077: /* v_MainCursor is for fetch main data */
1077: /* v_MainCursor is for fetch main data */
1078:
1079: v_MainCursor := DBMS_SQL.OPEN_CURSOR;
1080: IF (p_log_level_rec.statement_level) THEN
1081: fa_rx_util_pkg.debug('fadptx_insert: ***** OPEN CURSOR: v_MainCursor *****');
1082: fa_rx_util_pkg.debug('fadptx_insert: v_MainCursor :' || v_MainCursor);
1083: END IF;
1084:
1085: --DBMS_SQL.PARSE (v_MainCursor, main_sql,DBMS_SQL.V7);
1078:
1079: v_MainCursor := DBMS_SQL.OPEN_CURSOR;
1080: IF (p_log_level_rec.statement_level) THEN
1081: fa_rx_util_pkg.debug('fadptx_insert: ***** OPEN CURSOR: v_MainCursor *****');
1082: fa_rx_util_pkg.debug('fadptx_insert: v_MainCursor :' || v_MainCursor);
1083: END IF;
1084:
1085: --DBMS_SQL.PARSE (v_MainCursor, main_sql,DBMS_SQL.V7);
1086: DBMS_SQL.PARSE (v_MainCursor, l_main,0,k,FALSE,DBMS_SQL.V7);
1108: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,21,h_end_life);
1109: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,22,h_adjusted_rate);
1110: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,23,h_abs_units);
1111: IF (p_log_level_rec.statement_level) THEN
1112: fa_rx_util_pkg.debug('fadptx_insert: ***** DEFINE COLUMN: v_MainCursor *****');
1113: END IF;
1114:
1115: --
1116: /* Loop For v_SubCursor */
1118: h_sum_nbvs_asset_id := -1;
1119: Loop
1120: v_SubFetch := DBMS_SQL.FETCH_ROWS(v_SubCursor);
1121: IF (p_log_level_rec.statement_level) THEN
1122: fa_rx_util_pkg.debug('fadptx_insert: ***** FETCH LOW: v_SubCursor *****');
1123: fa_rx_util_pkg.debug('fadptx_insert: v_SubFetch :'||v_SubFetch);
1124: END IF;
1125:
1126: If v_SubFetch =0 then
1119: Loop
1120: v_SubFetch := DBMS_SQL.FETCH_ROWS(v_SubCursor);
1121: IF (p_log_level_rec.statement_level) THEN
1122: fa_rx_util_pkg.debug('fadptx_insert: ***** FETCH LOW: v_SubCursor *****');
1123: fa_rx_util_pkg.debug('fadptx_insert: v_SubFetch :'||v_SubFetch);
1124: END IF;
1125:
1126: If v_SubFetch =0 then
1127: Exit;
1129:
1130: DBMS_SQL.COLUMN_VALUE(v_SubCursor,1,l_asset_id);
1131:
1132: IF (p_log_level_rec.statement_level) THEN
1133: fa_rx_util_pkg.debug('fadptx_insert: l_asset_id : h_sum_nbvs_asset_id'||l_asset_id||':'||h_sum_nbvs_asset_id);
1134: END IF;
1135:
1136: -- Bug#3327616
1137: -- Added max query instead of doing it in main SQL
1180: end if;
1181: end if;
1182:
1183: IF (p_log_level_rec.statement_level) THEN
1184: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_date_effective :'||to_char(h_prior_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1185: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_date_effective :'||to_char(h_prior_ah_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1181: end if;
1182:
1183: IF (p_log_level_rec.statement_level) THEN
1184: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_date_effective :'||to_char(h_prior_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1185: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_date_effective :'||to_char(h_prior_ah_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1189: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_thid_in :'||h_prior_ah_thid_in);
1182:
1183: IF (p_log_level_rec.statement_level) THEN
1184: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_date_effective :'||to_char(h_prior_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1185: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_date_effective :'||to_char(h_prior_ah_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1189: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_thid_in :'||h_prior_ah_thid_in);
1190: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_thid_in :'||h_target_bk_thid_in);
1183: IF (p_log_level_rec.statement_level) THEN
1184: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_date_effective :'||to_char(h_prior_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1185: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_date_effective :'||to_char(h_prior_ah_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1189: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_thid_in :'||h_prior_ah_thid_in);
1190: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_thid_in :'||h_target_bk_thid_in);
1191: END IF;
1184: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_date_effective :'||to_char(h_prior_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1185: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_date_effective :'||to_char(h_prior_ah_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1189: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_thid_in :'||h_prior_ah_thid_in);
1190: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_thid_in :'||h_target_bk_thid_in);
1191: END IF;
1192:
1185: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_date_effective :'||to_char(h_prior_ah_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1189: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_thid_in :'||h_prior_ah_thid_in);
1190: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_thid_in :'||h_target_bk_thid_in);
1191: END IF;
1192:
1193: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_asset_id',l_asset_id);
1186: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_date_effective :'||to_Char(h_target_bk_date_effective,'YYYY-MON-DD HH24:MI:SS'));
1187: fa_rx_util_pkg.debug('fadptx_insert: h_sum_nbvs_cost :'||h_sum_nbvs_cost);
1188: fa_rx_util_pkg.debug('fadptx_insert: h_prior_bk_thid_in :'||h_prior_bk_thid_in);
1189: fa_rx_util_pkg.debug('fadptx_insert: h_prior_ah_thid_in :'||h_prior_ah_thid_in);
1190: fa_rx_util_pkg.debug('fadptx_insert: h_target_bk_thid_in :'||h_target_bk_thid_in);
1191: END IF;
1192:
1193: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_asset_id',l_asset_id);
1194: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_book',h_book);
1208: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_thid_in',h_target_bk_thid_in); -- Bug3859151
1209:
1210: v_MainReturn := DBMS_SQL.EXECUTE(v_MainCursor);
1211: IF (p_log_level_rec.statement_level) THEN
1212: fa_rx_util_pkg.debug('fadptx_insert: ***** EXECUTE: v_MainCursor *****');
1213: fa_rx_util_pkg.debug('fadptx_insert: v_MainReturn :'||v_MainReturn);
1214: END IF;
1215:
1216: /* Loop For v_MainCursor */
1209:
1210: v_MainReturn := DBMS_SQL.EXECUTE(v_MainCursor);
1211: IF (p_log_level_rec.statement_level) THEN
1212: fa_rx_util_pkg.debug('fadptx_insert: ***** EXECUTE: v_MainCursor *****');
1213: fa_rx_util_pkg.debug('fadptx_insert: v_MainReturn :'||v_MainReturn);
1214: END IF;
1215:
1216: /* Loop For v_MainCursor */
1217:
1225: h_up_nbv_flag := 'N'; -- bug#2661575
1226:
1227: v_MainFetch := DBMS_SQL.FETCH_ROWS(v_MainCursor);
1228: IF (p_log_level_rec.statement_level) THEN
1229: fa_rx_util_pkg.debug('fadptx_insert: ***** FETCH LOW: v_MainCursor *****');
1230: fa_rx_util_pkg.debug('fadptx_insert: v_MainFetch :'|| v_MainFetch);
1231: END IF;
1232:
1233: If v_MainFetch =0 then
1226:
1227: v_MainFetch := DBMS_SQL.FETCH_ROWS(v_MainCursor);
1228: IF (p_log_level_rec.statement_level) THEN
1229: fa_rx_util_pkg.debug('fadptx_insert: ***** FETCH LOW: v_MainCursor *****');
1230: fa_rx_util_pkg.debug('fadptx_insert: v_MainFetch :'|| v_MainFetch);
1231: END IF;
1232:
1233: If v_MainFetch =0 then
1234: Exit;
1259: DBMS_SQL.COLUMN_VALUE(v_MainCursor,23,h_abs_units);
1260:
1261: /* Get Minor Category Description */
1262: IF (p_log_level_rec.statement_level) THEN
1263: fa_rx_util_pkg.debug('fadptx_insert: h_minor_category(tax asset type) '|| h_minor_category);
1264: END If;
1265:
1266: if h_minor_category is not null then
1267: h_minor_cat_desc :=
1273: p_qualifier => h_tax_asset_type_segment, -- Bug#3305764 - Enhancement to make Category Flexfield flexible
1274: p_data => h_minor_category);
1275:
1276: IF (p_log_level_rec.statement_level) THEN
1277: fa_rx_util_pkg.debug('fadptx_insert: h_minor_category(after get_description) '|| h_minor_category);
1278: END If;
1279: end if;
1280:
1281: -- IF (p_log_level_rec.statement_level) THEN
1278: END If;
1279: end if;
1280:
1281: -- IF (p_log_level_rec.statement_level) THEN
1282: fa_rx_util_pkg.debug('fadptx_insert: **** Queried values by MainCursor ****');
1283: fa_rx_util_pkg.debug('fadptx_insert: asset id: ' || h_asset_id);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1279: end if;
1280:
1281: -- IF (p_log_level_rec.statement_level) THEN
1282: fa_rx_util_pkg.debug('fadptx_insert: **** Queried values by MainCursor ****');
1283: fa_rx_util_pkg.debug('fadptx_insert: asset id: ' || h_asset_id);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1280:
1281: -- IF (p_log_level_rec.statement_level) THEN
1282: fa_rx_util_pkg.debug('fadptx_insert: **** Queried values by MainCursor ****');
1283: fa_rx_util_pkg.debug('fadptx_insert: asset id: ' || h_asset_id);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1281: -- IF (p_log_level_rec.statement_level) THEN
1282: fa_rx_util_pkg.debug('fadptx_insert: **** Queried values by MainCursor ****');
1283: fa_rx_util_pkg.debug('fadptx_insert: asset id: ' || h_asset_id);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1282: fa_rx_util_pkg.debug('fadptx_insert: **** Queried values by MainCursor ****');
1283: fa_rx_util_pkg.debug('fadptx_insert: asset id: ' || h_asset_id);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1283: fa_rx_util_pkg.debug('fadptx_insert: asset id: ' || h_asset_id);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1284: fa_rx_util_pkg.debug('fadptx_insert: asset number:' || h_asset_number);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1285: fa_rx_util_pkg.debug('fadptx_insert: asset desc:'|| h_asset_desc);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1286: fa_rx_util_pkg.debug('fadptx_insert: new use:'||h_new_used);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1287: fa_rx_util_pkg.debug('fadptx_insert: minor category:'||h_minor_category);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1288: fa_rx_util_pkg.debug('fadptx_insert: tax asset type: '||h_tax_asset_type);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1289: fa_rx_util_pkg.debug('fadptx_insert: state: '||h_state);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1290: fa_rx_util_pkg.debug('fadptx_insert: start total units: '||h_start_units_total);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1291: fa_rx_util_pkg.debug('fadptx_insert: end total units: '||h_end_units_total);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1292: fa_rx_util_pkg.debug('fadptx_insert: start units assigned:'||h_start_units_assigned);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1293: fa_rx_util_pkg.debug('fadptx_insert: end units assigned: '||h_end_units_assigned);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1294: fa_rx_util_pkg.debug('fadptx_insert: start total cost:'||h_start_cost_total);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1295: fa_rx_util_pkg.debug('fadptx_insert: end total cost: '||h_end_cost_total);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1296: fa_rx_util_pkg.debug('fadptx_insert: date in service:' ||h_date_in_service);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1304: fa_rx_util_pkg.debug('fadptx_insert: h_abs_units: '||h_abs_units);
1297: fa_rx_util_pkg.debug('fadptx_insert: era name num: '||h_era_name_num);
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1304: fa_rx_util_pkg.debug('fadptx_insert: h_abs_units: '||h_abs_units);
1305: fa_rx_util_pkg.debug('fadptx_insert: **** End of queried values list for '||h_asset_id||' ****');
1298: fa_rx_util_pkg.debug('fadptx_insert: add era year: '||h_add_era_year);
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1304: fa_rx_util_pkg.debug('fadptx_insert: h_abs_units: '||h_abs_units);
1305: fa_rx_util_pkg.debug('fadptx_insert: **** End of queried values list for '||h_asset_id||' ****');
1306: -- END IF;
1299: fa_rx_util_pkg.debug('fadptx_insert: add year: '||h_add_year);
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1304: fa_rx_util_pkg.debug('fadptx_insert: h_abs_units: '||h_abs_units);
1305: fa_rx_util_pkg.debug('fadptx_insert: **** End of queried values list for '||h_asset_id||' ****');
1306: -- END IF;
1307:
1300: fa_rx_util_pkg.debug('fadptx_insert: add month: '||h_add_month);
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1304: fa_rx_util_pkg.debug('fadptx_insert: h_abs_units: '||h_abs_units);
1305: fa_rx_util_pkg.debug('fadptx_insert: **** End of queried values list for '||h_asset_id||' ****');
1306: -- END IF;
1307:
1308: /* Get theoretical and evaluated nbv,residual rate */
1301: fa_rx_util_pkg.debug('fadptx_insert: start life: '||h_start_life);
1302: fa_rx_util_pkg.debug('fadptx_insert: end life: '||h_end_life);
1303: fa_rx_util_pkg.debug('fadptx_insert: adjusted rate: '||h_adjusted_rate);
1304: fa_rx_util_pkg.debug('fadptx_insert: h_abs_units: '||h_abs_units);
1305: fa_rx_util_pkg.debug('fadptx_insert: **** End of queried values list for '||h_asset_id||' ****');
1306: -- END IF;
1307:
1308: /* Get theoretical and evaluated nbv,residual rate */
1309:
1360: l_total_units := h_total_units;
1361: */
1362:
1363: IF (p_log_level_rec.statement_level) THEN
1364: fa_rx_util_pkg.debug('fadptx_insert: l_asset_id (before c_last_nbv_total):'||l_asset_id);
1365: fa_rx_util_pkg.debug('fadptx_insert: h_book:'||h_book);
1366: fa_rx_util_pkg.debug('fadptx_insert: h_year:'||h_year);
1367: END IF;
1368: --
1361: */
1362:
1363: IF (p_log_level_rec.statement_level) THEN
1364: fa_rx_util_pkg.debug('fadptx_insert: l_asset_id (before c_last_nbv_total):'||l_asset_id);
1365: fa_rx_util_pkg.debug('fadptx_insert: h_book:'||h_book);
1366: fa_rx_util_pkg.debug('fadptx_insert: h_year:'||h_year);
1367: END IF;
1368: --
1369: open c_last_nbv_total(l_asset_id,h_book,h_year);
1362:
1363: IF (p_log_level_rec.statement_level) THEN
1364: fa_rx_util_pkg.debug('fadptx_insert: l_asset_id (before c_last_nbv_total):'||l_asset_id);
1365: fa_rx_util_pkg.debug('fadptx_insert: h_book:'||h_book);
1366: fa_rx_util_pkg.debug('fadptx_insert: h_year:'||h_year);
1367: END IF;
1368: --
1369: open c_last_nbv_total(l_asset_id,h_book,h_year);
1370: fetch c_last_nbv_total into dist_total_cost, -- bug#2661575
1374:
1375: -- Fetch total units at target date
1376: if c_last_nbv_total%FOUND then
1377: if (p_log_level_rec.statement_level) then
1378: fa_rx_util_pkg.debug('fadptx_insert: c_last_nbv_total: return with values');
1379: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_cost(0.0):'||dist_total_cost);
1380: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0.0):'||dist_last_total_units);
1381: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0.0):'||dist_total_evaluated_nbv);
1382: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0.0):'||dist_total_theoretical_nbv);
1375: -- Fetch total units at target date
1376: if c_last_nbv_total%FOUND then
1377: if (p_log_level_rec.statement_level) then
1378: fa_rx_util_pkg.debug('fadptx_insert: c_last_nbv_total: return with values');
1379: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_cost(0.0):'||dist_total_cost);
1380: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0.0):'||dist_last_total_units);
1381: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0.0):'||dist_total_evaluated_nbv);
1382: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0.0):'||dist_total_theoretical_nbv);
1383: fa_rx_util_pkg.debug('fadptx_insert: dist_year(0.0):'||dist_year);
1376: if c_last_nbv_total%FOUND then
1377: if (p_log_level_rec.statement_level) then
1378: fa_rx_util_pkg.debug('fadptx_insert: c_last_nbv_total: return with values');
1379: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_cost(0.0):'||dist_total_cost);
1380: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0.0):'||dist_last_total_units);
1381: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0.0):'||dist_total_evaluated_nbv);
1382: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0.0):'||dist_total_theoretical_nbv);
1383: fa_rx_util_pkg.debug('fadptx_insert: dist_year(0.0):'||dist_year);
1384: end if;
1377: if (p_log_level_rec.statement_level) then
1378: fa_rx_util_pkg.debug('fadptx_insert: c_last_nbv_total: return with values');
1379: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_cost(0.0):'||dist_total_cost);
1380: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0.0):'||dist_last_total_units);
1381: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0.0):'||dist_total_evaluated_nbv);
1382: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0.0):'||dist_total_theoretical_nbv);
1383: fa_rx_util_pkg.debug('fadptx_insert: dist_year(0.0):'||dist_year);
1384: end if;
1385:
1378: fa_rx_util_pkg.debug('fadptx_insert: c_last_nbv_total: return with values');
1379: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_cost(0.0):'||dist_total_cost);
1380: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0.0):'||dist_last_total_units);
1381: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0.0):'||dist_total_evaluated_nbv);
1382: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0.0):'||dist_total_theoretical_nbv);
1383: fa_rx_util_pkg.debug('fadptx_insert: dist_year(0.0):'||dist_year);
1384: end if;
1385:
1386: h_last_nbv_total_flag :='Y';
1379: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_cost(0.0):'||dist_total_cost);
1380: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0.0):'||dist_last_total_units);
1381: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0.0):'||dist_total_evaluated_nbv);
1382: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0.0):'||dist_total_theoretical_nbv);
1383: fa_rx_util_pkg.debug('fadptx_insert: dist_year(0.0):'||dist_year);
1384: end if;
1385:
1386: h_last_nbv_total_flag :='Y';
1387: dist_total_units := l_total_units;
1411:
1412: close c_last_nbv_total;
1413:
1414: IF (p_log_level_rec.statement_level) THEN
1415: fa_rx_util_pkg.debug('fadptx_insert: dist_total_cost(0):'||dist_total_cost);
1416: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0):'||dist_total_units);
1417: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0):'||dist_last_total_units);
1418: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0):'||dist_total_evaluated_nbv);
1419: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0):'||dist_total_theoretical_nbv);
1412: close c_last_nbv_total;
1413:
1414: IF (p_log_level_rec.statement_level) THEN
1415: fa_rx_util_pkg.debug('fadptx_insert: dist_total_cost(0):'||dist_total_cost);
1416: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0):'||dist_total_units);
1417: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0):'||dist_last_total_units);
1418: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0):'||dist_total_evaluated_nbv);
1419: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0):'||dist_total_theoretical_nbv);
1420: fa_rx_util_pkg.debug('fadptx_insert: dist_year:'||dist_year);
1413:
1414: IF (p_log_level_rec.statement_level) THEN
1415: fa_rx_util_pkg.debug('fadptx_insert: dist_total_cost(0):'||dist_total_cost);
1416: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0):'||dist_total_units);
1417: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0):'||dist_last_total_units);
1418: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0):'||dist_total_evaluated_nbv);
1419: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0):'||dist_total_theoretical_nbv);
1420: fa_rx_util_pkg.debug('fadptx_insert: dist_year:'||dist_year);
1421: END IF;
1414: IF (p_log_level_rec.statement_level) THEN
1415: fa_rx_util_pkg.debug('fadptx_insert: dist_total_cost(0):'||dist_total_cost);
1416: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0):'||dist_total_units);
1417: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0):'||dist_last_total_units);
1418: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0):'||dist_total_evaluated_nbv);
1419: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0):'||dist_total_theoretical_nbv);
1420: fa_rx_util_pkg.debug('fadptx_insert: dist_year:'||dist_year);
1421: END IF;
1422:
1415: fa_rx_util_pkg.debug('fadptx_insert: dist_total_cost(0):'||dist_total_cost);
1416: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0):'||dist_total_units);
1417: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0):'||dist_last_total_units);
1418: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0):'||dist_total_evaluated_nbv);
1419: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0):'||dist_total_theoretical_nbv);
1420: fa_rx_util_pkg.debug('fadptx_insert: dist_year:'||dist_year);
1421: END IF;
1422:
1423: end if; -- if dist_asset_id <> h_asset_id
1416: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0):'||dist_total_units);
1417: fa_rx_util_pkg.debug('fadptx_insert: dist_last_total_units(0):'||dist_last_total_units);
1418: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(0):'||dist_total_evaluated_nbv);
1419: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(0):'||dist_total_theoretical_nbv);
1420: fa_rx_util_pkg.debug('fadptx_insert: dist_year:'||dist_year);
1421: END IF;
1422:
1423: end if; -- if dist_asset_id <> h_asset_id
1424: --
1424: --
1425: -- Get the latest data from NBV table.
1426:
1427: IF (p_log_level_rec.statement_level) THEN
1428: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_cost(0):'||l_total_prior_cost);
1429: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_units(0):'||l_total_prior_units);
1430: fa_rx_util_pkg.debug('fadptx_insert: l_total_cost(0):'||l_total_cost);
1431: fa_rx_util_pkg.debug('fadptx_insert: l_total_units(0):'||l_total_units);
1432: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0.5):'||dist_total_units);
1425: -- Get the latest data from NBV table.
1426:
1427: IF (p_log_level_rec.statement_level) THEN
1428: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_cost(0):'||l_total_prior_cost);
1429: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_units(0):'||l_total_prior_units);
1430: fa_rx_util_pkg.debug('fadptx_insert: l_total_cost(0):'||l_total_cost);
1431: fa_rx_util_pkg.debug('fadptx_insert: l_total_units(0):'||l_total_units);
1432: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0.5):'||dist_total_units);
1433: END IF;
1426:
1427: IF (p_log_level_rec.statement_level) THEN
1428: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_cost(0):'||l_total_prior_cost);
1429: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_units(0):'||l_total_prior_units);
1430: fa_rx_util_pkg.debug('fadptx_insert: l_total_cost(0):'||l_total_cost);
1431: fa_rx_util_pkg.debug('fadptx_insert: l_total_units(0):'||l_total_units);
1432: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0.5):'||dist_total_units);
1433: END IF;
1434:
1427: IF (p_log_level_rec.statement_level) THEN
1428: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_cost(0):'||l_total_prior_cost);
1429: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_units(0):'||l_total_prior_units);
1430: fa_rx_util_pkg.debug('fadptx_insert: l_total_cost(0):'||l_total_cost);
1431: fa_rx_util_pkg.debug('fadptx_insert: l_total_units(0):'||l_total_units);
1432: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0.5):'||dist_total_units);
1433: END IF;
1434:
1435: -- Initializations
1428: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_cost(0):'||l_total_prior_cost);
1429: fa_rx_util_pkg.debug('fadptx_insert: l_total_prior_units(0):'||l_total_prior_units);
1430: fa_rx_util_pkg.debug('fadptx_insert: l_total_cost(0):'||l_total_cost);
1431: fa_rx_util_pkg.debug('fadptx_insert: l_total_units(0):'||l_total_units);
1432: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(0.5):'||dist_total_units);
1433: END IF;
1434:
1435: -- Initializations
1436: h_up_cost := NULL;
1448: FETCH c_nbv_update INTO h_up_cost,h_up_theoretical_nbv,
1449: h_up_evaluated_nbv,h_up_year, h_tmp_units_assigned;
1450:
1451: IF (p_log_level_rec.statement_level) THEN
1452: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_theoretical_nbv(0):'||h_up_theoretical_nbv);
1453: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1454: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_year(0):'||h_up_year);
1455: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1456: END IF;
1449: h_up_evaluated_nbv,h_up_year, h_tmp_units_assigned;
1450:
1451: IF (p_log_level_rec.statement_level) THEN
1452: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_theoretical_nbv(0):'||h_up_theoretical_nbv);
1453: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1454: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_year(0):'||h_up_year);
1455: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1456: END IF;
1457:
1450:
1451: IF (p_log_level_rec.statement_level) THEN
1452: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_theoretical_nbv(0):'||h_up_theoretical_nbv);
1453: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1454: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_year(0):'||h_up_year);
1455: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1456: END IF;
1457:
1458: -- bug#2661575: Remove flag logic
1451: IF (p_log_level_rec.statement_level) THEN
1452: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_theoretical_nbv(0):'||h_up_theoretical_nbv);
1453: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1454: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_up_year(0):'||h_up_year);
1455: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1456: END IF;
1457:
1458: -- bug#2661575: Remove flag logic
1459:
1462: dist_total_units := h_end_units_total;
1463: end if;
1464:
1465: IF (p_log_level_rec.statement_level) THEN
1466: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1467: fa_rx_util_pkg.debug('fadptx_insert: h_up_year(0):'||h_up_year);
1468: fa_rx_util_pkg.debug('fadptx_insert: h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1469: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(1):'||dist_total_units);
1470: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(1):'||dist_total_theoretical_nbv);
1463: end if;
1464:
1465: IF (p_log_level_rec.statement_level) THEN
1466: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1467: fa_rx_util_pkg.debug('fadptx_insert: h_up_year(0):'||h_up_year);
1468: fa_rx_util_pkg.debug('fadptx_insert: h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1469: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(1):'||dist_total_units);
1470: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(1):'||dist_total_theoretical_nbv);
1471: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(1):'||dist_total_evaluated_nbv);
1464:
1465: IF (p_log_level_rec.statement_level) THEN
1466: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1467: fa_rx_util_pkg.debug('fadptx_insert: h_up_year(0):'||h_up_year);
1468: fa_rx_util_pkg.debug('fadptx_insert: h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1469: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(1):'||dist_total_units);
1470: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(1):'||dist_total_theoretical_nbv);
1471: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(1):'||dist_total_evaluated_nbv);
1472: END IF;
1465: IF (p_log_level_rec.statement_level) THEN
1466: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1467: fa_rx_util_pkg.debug('fadptx_insert: h_up_year(0):'||h_up_year);
1468: fa_rx_util_pkg.debug('fadptx_insert: h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1469: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(1):'||dist_total_units);
1470: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(1):'||dist_total_theoretical_nbv);
1471: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(1):'||dist_total_evaluated_nbv);
1472: END IF;
1473:
1466: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv(0):'||h_up_evaluated_nbv);
1467: fa_rx_util_pkg.debug('fadptx_insert: h_up_year(0):'||h_up_year);
1468: fa_rx_util_pkg.debug('fadptx_insert: h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1469: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(1):'||dist_total_units);
1470: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(1):'||dist_total_theoretical_nbv);
1471: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(1):'||dist_total_evaluated_nbv);
1472: END IF;
1473:
1474:
1467: fa_rx_util_pkg.debug('fadptx_insert: h_up_year(0):'||h_up_year);
1468: fa_rx_util_pkg.debug('fadptx_insert: h_tmp_units_assigned(0):'||h_tmp_units_assigned);
1469: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units(1):'||dist_total_units);
1470: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv(1):'||dist_total_theoretical_nbv);
1471: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv(1):'||dist_total_evaluated_nbv);
1472: END IF;
1473:
1474:
1475: IF dist_total_theoretical_nbv is not null and dist_total_evaluated_nbv is not null then
1515:
1516: CLOSE c_last_update;
1517:
1518: IF (p_log_level_rec.statement_level) THEN
1519: fa_rx_util_pkg.debug('fadptx_insert: h_up_nbv_flag:'||h_up_nbv_flag);
1520: fa_rx_util_pkg.debug('fadptx_insert: h_last_up_flag:'||h_last_up_flag);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1516: CLOSE c_last_update;
1517:
1518: IF (p_log_level_rec.statement_level) THEN
1519: fa_rx_util_pkg.debug('fadptx_insert: h_up_nbv_flag:'||h_up_nbv_flag);
1520: fa_rx_util_pkg.debug('fadptx_insert: h_last_up_flag:'||h_last_up_flag);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1517:
1518: IF (p_log_level_rec.statement_level) THEN
1519: fa_rx_util_pkg.debug('fadptx_insert: h_up_nbv_flag:'||h_up_nbv_flag);
1520: fa_rx_util_pkg.debug('fadptx_insert: h_last_up_flag:'||h_last_up_flag);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1518: IF (p_log_level_rec.statement_level) THEN
1519: fa_rx_util_pkg.debug('fadptx_insert: h_up_nbv_flag:'||h_up_nbv_flag);
1520: fa_rx_util_pkg.debug('fadptx_insert: h_last_up_flag:'||h_last_up_flag);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1519: fa_rx_util_pkg.debug('fadptx_insert: h_up_nbv_flag:'||h_up_nbv_flag);
1520: fa_rx_util_pkg.debug('fadptx_insert: h_last_up_flag:'||h_last_up_flag);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1520: fa_rx_util_pkg.debug('fadptx_insert: h_last_up_flag:'||h_last_up_flag);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1521: fa_rx_util_pkg.debug('fadptx_insert: h_up_cost:'||h_up_cost);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1522: fa_rx_util_pkg.debug('fadptx_insert: h_up_theoretical_nbv:'||h_up_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1530: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv:'||dist_total_theoretical_nbv);
1523: fa_rx_util_pkg.debug('fadptx_insert: h_up_evaluated_nbv:'||h_up_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1530: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv:'||dist_total_theoretical_nbv);
1531: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv:'||dist_total_evaluated_nbv);
1524: fa_rx_util_pkg.debug('fadptx_insert: h_up_year:'||h_up_year);
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1530: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv:'||dist_total_theoretical_nbv);
1531: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv:'||dist_total_evaluated_nbv);
1532: END IF;
1525: fa_rx_util_pkg.debug('fadptx_insert: h_up_last_cost:'||h_up_last_cost);
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1530: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv:'||dist_total_theoretical_nbv);
1531: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv:'||dist_total_evaluated_nbv);
1532: END IF;
1533:
1526: fa_rx_util_pkg.debug('fadptx_insert: h_up_tax_asset_type:'||h_up_tax_asset_type);
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1530: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv:'||dist_total_theoretical_nbv);
1531: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv:'||dist_total_evaluated_nbv);
1532: END IF;
1533:
1534:
1527: fa_rx_util_pkg.debug('fadptx_insert: h_up_units_assigned:'||h_up_units_assigned);
1528: fa_rx_util_pkg.debug('fadptx_insert: h_up_life:'||h_up_life);
1529: fa_rx_util_pkg.debug('fadptx_insert: dist_total_units:'||dist_total_units);
1530: fa_rx_util_pkg.debug('fadptx_insert: dist_total_theoretical_nbv:'||dist_total_theoretical_nbv);
1531: fa_rx_util_pkg.debug('fadptx_insert: dist_total_evaluated_nbv:'||dist_total_evaluated_nbv);
1532: END IF;
1533:
1534:
1535: -- check h_up_theoretical_nbv and h_up_evaluated_nbv
1551: h_start_asset_id := h_asset_id;
1552: end if;
1553:
1554: IF (p_log_level_rec.statement_level) THEN
1555: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_start_asset_id:'||h_start_asset_id);
1556: END IF;
1557:
1558: if h_min_acct_unit is not null then
1559:
1571: h_start_cost_accm := h_start_cost_accm + h_start_cost;
1572: end if;
1573:
1574: IF (p_log_level_rec.statement_level) THEN
1575: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start units accm :'||h_start_units_accm);
1576: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start cost accm :'||h_start_cost_accm);
1577: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start cost: '||h_start_cost);
1578: END IF;
1579:
1572: end if;
1573:
1574: IF (p_log_level_rec.statement_level) THEN
1575: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start units accm :'||h_start_units_accm);
1576: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start cost accm :'||h_start_cost_accm);
1577: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start cost: '||h_start_cost);
1578: END IF;
1579:
1580: if h_end_cost_total = 0 then
1573:
1574: IF (p_log_level_rec.statement_level) THEN
1575: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start units accm :'||h_start_units_accm);
1576: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start cost accm :'||h_start_cost_accm);
1577: fa_rx_util_pkg.debug('fadptx_insert: ' || 'start cost: '||h_start_cost);
1578: END IF;
1579:
1580: if h_end_cost_total = 0 then
1581: h_end_cost :=0;
1596: h_end_asset_id := h_asset_id;
1597: end if;
1598:
1599: IF (p_log_level_rec.statement_level) THEN
1600: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_end_asset_id:'||h_end_asset_id);
1601: END IF;
1602:
1603: if h_min_acct_unit is not null then
1604:
1629: h_end_units_accm := h_end_units_accm + h_end_units_assigned;
1630: h_end_cost_accm := h_end_cost_accm + h_end_cost;
1631:
1632: IF (p_log_level_rec.statement_level) THEN
1633: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end units accm:'||h_end_units_accm);
1634: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end cost accm:'||h_end_cost_accm);
1635: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end cost:'||h_end_cost);
1636: END IF;
1637:
1630: h_end_cost_accm := h_end_cost_accm + h_end_cost;
1631:
1632: IF (p_log_level_rec.statement_level) THEN
1633: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end units accm:'||h_end_units_accm);
1634: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end cost accm:'||h_end_cost_accm);
1635: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end cost:'||h_end_cost);
1636: END IF;
1637:
1638: /*==========================================================================
1631:
1632: IF (p_log_level_rec.statement_level) THEN
1633: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end units accm:'||h_end_units_accm);
1634: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end cost accm:'||h_end_cost_accm);
1635: fa_rx_util_pkg.debug('fadptx_insert: ' || 'end cost:'||h_end_cost);
1636: END IF;
1637:
1638: /*==========================================================================
1639: NBV and Residual Rate Calculation: After half_rate and full_rate,
1653: /* Set parameter for calculation */
1654: h_diff_year := to_number(to_char(h_target_date,'YYYY')) - h_add_year;
1655:
1656: IF (p_log_level_rec.statement_level) THEN
1657: fa_rx_util_pkg.debug('fadptx_insert: ' || 'h_diff_year:'||h_diff_year);
1658: END IF;
1659:
1660: -- Set the variable for starting loop counter
1661: IF h_up_nbv_flag ='Y'
1666: l_start_loop := 1;
1667: END IF;
1668:
1669: IF (p_log_level_rec.statement_level) THEN
1670: fa_rx_util_pkg.debug('fadptx_insert: ' || 'l_start_loop:'||l_start_loop);
1671: END IF;
1672:
1673: /* Evaluated and Theoretical NBV calculation */
1674: For i in l_start_loop..h_diff_year LOOP
1704:
1705: /* Mimimun NBV limitation -- bug#1797751 */
1706:
1707: if (p_log_level_rec.statement_level) then
1708: fa_rx_util_pkg.debug('Test:asset_id:'||h_asset_id);
1709: fa_rx_util_pkg.debug('Test:state:'||h_state);
1710: fa_rx_util_pkg.debug('Test:tax_asset_type:'||h_tax_asset_type);
1711: fa_rx_util_pkg.debug('Test:h_theoretical_nbv:'||h_theoretical_nbv);
1712: fa_rx_util_pkg.debug('Test:h_evaluated_nbv:'||h_evaluated_nbv);
1705: /* Mimimun NBV limitation -- bug#1797751 */
1706:
1707: if (p_log_level_rec.statement_level) then
1708: fa_rx_util_pkg.debug('Test:asset_id:'||h_asset_id);
1709: fa_rx_util_pkg.debug('Test:state:'||h_state);
1710: fa_rx_util_pkg.debug('Test:tax_asset_type:'||h_tax_asset_type);
1711: fa_rx_util_pkg.debug('Test:h_theoretical_nbv:'||h_theoretical_nbv);
1712: fa_rx_util_pkg.debug('Test:h_evaluated_nbv:'||h_evaluated_nbv);
1713: end if;
1706:
1707: if (p_log_level_rec.statement_level) then
1708: fa_rx_util_pkg.debug('Test:asset_id:'||h_asset_id);
1709: fa_rx_util_pkg.debug('Test:state:'||h_state);
1710: fa_rx_util_pkg.debug('Test:tax_asset_type:'||h_tax_asset_type);
1711: fa_rx_util_pkg.debug('Test:h_theoretical_nbv:'||h_theoretical_nbv);
1712: fa_rx_util_pkg.debug('Test:h_evaluated_nbv:'||h_evaluated_nbv);
1713: end if;
1714:
1707: if (p_log_level_rec.statement_level) then
1708: fa_rx_util_pkg.debug('Test:asset_id:'||h_asset_id);
1709: fa_rx_util_pkg.debug('Test:state:'||h_state);
1710: fa_rx_util_pkg.debug('Test:tax_asset_type:'||h_tax_asset_type);
1711: fa_rx_util_pkg.debug('Test:h_theoretical_nbv:'||h_theoretical_nbv);
1712: fa_rx_util_pkg.debug('Test:h_evaluated_nbv:'||h_evaluated_nbv);
1713: end if;
1714:
1715: if h_theoretical_nbv < round(h_end_cost*0.05, h_precision) then
1708: fa_rx_util_pkg.debug('Test:asset_id:'||h_asset_id);
1709: fa_rx_util_pkg.debug('Test:state:'||h_state);
1710: fa_rx_util_pkg.debug('Test:tax_asset_type:'||h_tax_asset_type);
1711: fa_rx_util_pkg.debug('Test:h_theoretical_nbv:'||h_theoretical_nbv);
1712: fa_rx_util_pkg.debug('Test:h_evaluated_nbv:'||h_evaluated_nbv);
1713: end if;
1714:
1715: if h_theoretical_nbv < round(h_end_cost*0.05, h_precision) then
1716: h_theoretical_nbv := round(h_end_cost*0.05, h_precision);
1747: h_evaluated_residual_rate := h_full_rate;
1748: end if;
1749:
1750: IF (p_log_level_rec.statement_level) THEN
1751: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical nbv: '||h_theoretical_nbv);
1752: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated nbv: '||h_evaluated_nbv);
1753: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical residual rate: '||h_theoretical_residual_rate);
1754: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated residual rate: '||h_evaluated_residual_rate);
1755: END IF;
1748: end if;
1749:
1750: IF (p_log_level_rec.statement_level) THEN
1751: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical nbv: '||h_theoretical_nbv);
1752: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated nbv: '||h_evaluated_nbv);
1753: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical residual rate: '||h_theoretical_residual_rate);
1754: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated residual rate: '||h_evaluated_residual_rate);
1755: END IF;
1756:
1749:
1750: IF (p_log_level_rec.statement_level) THEN
1751: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical nbv: '||h_theoretical_nbv);
1752: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated nbv: '||h_evaluated_nbv);
1753: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical residual rate: '||h_theoretical_residual_rate);
1754: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated residual rate: '||h_evaluated_residual_rate);
1755: END IF;
1756:
1757:
1750: IF (p_log_level_rec.statement_level) THEN
1751: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical nbv: '||h_theoretical_nbv);
1752: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated nbv: '||h_evaluated_nbv);
1753: fa_rx_util_pkg.debug('fadptx_insert: ' || 'theoretical residual rate: '||h_theoretical_residual_rate);
1754: fa_rx_util_pkg.debug('fadptx_insert: ' || 'evaluated residual rate: '||h_evaluated_residual_rate);
1755: END IF;
1756:
1757:
1758: /* Set Taxable Cost */
1772: end if;
1773: END IF;
1774:
1775: IF (p_log_level_rec.statement_level) THEN
1776: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start cost: '||h_start_cost);
1777: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start asset type :'||h_start_asset_type);
1778: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start units assigned :'||h_start_units_assigned);
1779: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start life :'||h_start_life);
1780: END IF;
1773: END IF;
1774:
1775: IF (p_log_level_rec.statement_level) THEN
1776: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start cost: '||h_start_cost);
1777: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start asset type :'||h_start_asset_type);
1778: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start units assigned :'||h_start_units_assigned);
1779: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start life :'||h_start_life);
1780: END IF;
1781:
1774:
1775: IF (p_log_level_rec.statement_level) THEN
1776: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start cost: '||h_start_cost);
1777: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start asset type :'||h_start_asset_type);
1778: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start units assigned :'||h_start_units_assigned);
1779: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start life :'||h_start_life);
1780: END IF;
1781:
1782: /*==========================================================================
1775: IF (p_log_level_rec.statement_level) THEN
1776: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start cost: '||h_start_cost);
1777: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start asset type :'||h_start_asset_type);
1778: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start units assigned :'||h_start_units_assigned);
1779: fa_rx_util_pkg.debug('fadptx_insert: ' || 'overwritten start life :'||h_start_life);
1780: END IF;
1781:
1782: /*==========================================================================
1783: Check if current processed state is necessary state or not.
1783: Check if current processed state is necessary state or not.
1784: Only if it is Yes, reason code process will be run
1785: ===========================================================================*/
1786: IF (p_log_level_rec.statement_level) THEN
1787: fa_rx_util_pkg.debug('fadptx_insert: ' || 'State check h_state:'||h_state);
1788: END IF;
1789:
1790: IF h_state >= nvl(state_from,h_state) and h_state <= nvl(state_to,h_state) THEN
1791: h_state_flag := 'Y';
1932: h_current_state_flag:='Y';
1933: end;
1934:
1935: IF (p_log_level_rec.statement_level) THEN
1936: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - addition flag:'||r_addition_flag);
1937: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - retirement flag:'||r_ret_flag);
1938: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - transfer flag:'||r_transfer_flag);
1939: END IF;
1940:
1933: end;
1934:
1935: IF (p_log_level_rec.statement_level) THEN
1936: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - addition flag:'||r_addition_flag);
1937: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - retirement flag:'||r_ret_flag);
1938: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - transfer flag:'||r_transfer_flag);
1939: END IF;
1940:
1941: /* Reset Reason and taxable cost information */
1934:
1935: IF (p_log_level_rec.statement_level) THEN
1936: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - addition flag:'||r_addition_flag);
1937: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - retirement flag:'||r_ret_flag);
1938: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - transfer flag:'||r_transfer_flag);
1939: END IF;
1940:
1941: /* Reset Reason and taxable cost information */
1942:
1963: Where TRANSACTION_HEADER_ID_IN = r_ret_id;
1964:
1965:
1966: IF (p_log_level_rec.statement_level) THEN
1967: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - Retirement type code:'||r_ret_type_code);
1968: END IF;
1969:
1970: end if;
1971:
2084:
2085: /* Set ALL_REASON_CODE, ALL_REASON_TYPE, ALL_DESCRIPTION */
2086:
2087: IF (p_log_level_rec.statement_level) THEN
2088: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - Addition/Decrease Flag:'||h_add_dec_flag);
2089: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - ADD/DEC reason type:'||h_adddec_reason_type);
2090: END IF;
2091:
2092: if h_add_dec_flag ='A' and h_adddec_reason_code ='3' then
2085: /* Set ALL_REASON_CODE, ALL_REASON_TYPE, ALL_DESCRIPTION */
2086:
2087: IF (p_log_level_rec.statement_level) THEN
2088: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - Addition/Decrease Flag:'||h_add_dec_flag);
2089: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason - ADD/DEC reason type:'||h_adddec_reason_type);
2090: END IF;
2091:
2092: if h_add_dec_flag ='A' and h_adddec_reason_code ='3' then
2093:
2129: h_all_description := to_char(null);
2130: end if;
2131:
2132: IF (p_log_level_rec.statement_level) THEN
2133: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- increase_cost:'||h_increase_cost);
2134: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- decrease_cost:'||h_decrease_cost);
2135: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason type:'||h_all_reason_type);
2136: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason code:'||h_all_reason_code);
2137: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all description:'||h_all_description);
2130: end if;
2131:
2132: IF (p_log_level_rec.statement_level) THEN
2133: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- increase_cost:'||h_increase_cost);
2134: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- decrease_cost:'||h_decrease_cost);
2135: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason type:'||h_all_reason_type);
2136: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason code:'||h_all_reason_code);
2137: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all description:'||h_all_description);
2138: END IF;
2131:
2132: IF (p_log_level_rec.statement_level) THEN
2133: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- increase_cost:'||h_increase_cost);
2134: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- decrease_cost:'||h_decrease_cost);
2135: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason type:'||h_all_reason_type);
2136: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason code:'||h_all_reason_code);
2137: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all description:'||h_all_description);
2138: END IF;
2139:
2132: IF (p_log_level_rec.statement_level) THEN
2133: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- increase_cost:'||h_increase_cost);
2134: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- decrease_cost:'||h_decrease_cost);
2135: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason type:'||h_all_reason_type);
2136: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason code:'||h_all_reason_code);
2137: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all description:'||h_all_description);
2138: END IF;
2139:
2140: /* bug 2082460 */
2133: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- increase_cost:'||h_increase_cost);
2134: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- decrease_cost:'||h_decrease_cost);
2135: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason type:'||h_all_reason_type);
2136: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all reason code:'||h_all_reason_code);
2137: fa_rx_util_pkg.debug('fadptx_insert: ' || 'Reason- all description:'||h_all_description);
2138: END IF;
2139:
2140: /* bug 2082460 */
2141: h_adddec_description := substrb(h_adddec_description,1,30);
2143:
2144: /* Insert end date's data to FA_DEPRN_TAX_REP_ITF */
2145:
2146: IF (p_log_level_rec.statement_level) THEN
2147: fa_rx_util_pkg.debug ('fadptx_insert: ' || 'h_state_flag :'||h_state_flag);
2148: END IF;
2149:
2150: -- bug#2629893
2151: -- For FA_DEPRN_TAX_REP_ITF, insert and update date for state ranages.
2245: h_currency_code,
2246: h_company_name);
2247:
2248: -- IF (p_log_level_rec.statement_level) THEN
2249: fa_rx_util_pkg.debug ('fadptx_insert: ' || 'Inserted - asset id:'||h_asset_id||', state: '||h_state||', asset type:'||h_tax_asset_type);
2250: -- END IF;
2251:
2252: else
2253: -- IF (p_log_level_rec.statement_level) THEN
2250: -- END IF;
2251:
2252: else
2253: -- IF (p_log_level_rec.statement_level) THEN
2254: fa_rx_util_pkg.debug ('fadptx_insert: ' || 'Reject - asset id:'||h_asset_id||', state: '||h_state||', asset type:'||h_tax_asset_type);
2255: -- END IF;
2256:
2257: end if; -- End of h_state_flag = 'Y' condition
2258:
2287: -- AND book_type_code = h_book_type_code
2288: -- AND state= h_state
2289: -- AND year = h_year
2290: -- ;
2291: -- fa_rx_util_pkg.debug ('Updated - asset id:'||h_asset_id||', state: '||h_state||' to NBV table.');
2292: -- ELSE
2293: SELECT FA.FA_DEPRN_TAX_REP_NBVS_S.NEXTVAL
2294: INTO h_deprn_tax_rep_nbv_id
2295: FROM dual;
2332: sysdate,
2333: h_login_id,
2334: h_minor_category);
2335: -- IF (p_log_level_rec.statement_level) THEN
2336: fa_rx_util_pkg.debug ('fadptx_insert: ' || 'Inserted - asset id:'||h_asset_id||', state: '||h_state||' to NBV table.');
2337: -- END IF;
2338:
2339: END IF; -- ENd of h_end_cost>0 condition
2340: -- END IF; -- End of c_chk_nbv condition
2345:
2346:
2347:
2348: IF (p_log_level_rec.statement_level) THEN
2349: fa_rx_util_pkg.debug('fadptx_insert: ' || '***** End Loop for v_MainCursor *****');
2350: END IF;
2351:
2352: END LOOP;
2353:
2355:
2356: DBMS_SQL.CLOSE_CURSOR(v_MainCursor);
2357:
2358: IF (p_log_level_rec.statement_level) THEN
2359: fa_rx_util_pkg.debug('fadptx_insert: ' || '***** Close Cursor v_MainCursor *****');
2360: END IF;
2361:
2362: DBMS_SQL.CLOSE_CURSOR(v_SubCursor);
2363:
2361:
2362: DBMS_SQL.CLOSE_CURSOR(v_SubCursor);
2363:
2364: IF (p_log_level_rec.statement_level) THEN
2365: fa_rx_util_pkg.debug('fadptx_insert: ' || '***** End Loop and Close Cursor v_SubCursor *****');
2366: END IF;
2367:
2368: ------------------------------------------------------
2369: -- Upgrade logic for Migration
2390: c_year => :h_year,
2391: c_book_type_code => :h_book_type_code,
2392: c_state => :h_state);
2393:
2394: fa_rx_util_pkg.debug(''fadptx_insert: '' ||
2395: ''There is FA_DEPRN_TAX_CUSTOM_PKG.FADPCUSTOM_UPDATE''
2396: ,p_log_level_rec => p_log_level_rec);
2397:
2398: Exception
2425:
2426: Exception
2427: when no_package then
2428: -- IF (p_log_level_rec.statement_level) THEN
2429: fa_rx_util_pkg.debug('fadptx_insert: ' || 'There is no FA_DEPRN_TAX_CUSTOM_PKG.FADPCUSTOM_UPDATE');
2430: -- END IF;
2431:
2432: end;
2433:
2430: -- END IF;
2431:
2432: end;
2433:
2434: fa_rx_util_pkg.debug ('*****END FA_DEPRN_TAX_REP_PKG.FADPTX_INSERT*****');
2435:
2436: commit;
2437:
2438: EXCEPTION
2473:
2474: begin
2475: if k =0 then
2476: -- IF (p_log_level_rec.statement_level) THEN
2477: fa_rx_util_pkg.debug('debug: ***** Main SQL: ******');
2478: -- END IF;
2479: -- fa_rx_util_pkg.debug(p_print); -- bug#2434220 Commented out
2480: end if;
2481: -- IF (p_log_level_rec.statement_level) THEN
2475: if k =0 then
2476: -- IF (p_log_level_rec.statement_level) THEN
2477: fa_rx_util_pkg.debug('debug: ***** Main SQL: ******');
2478: -- END IF;
2479: -- fa_rx_util_pkg.debug(p_print); -- bug#2434220 Commented out
2480: end if;
2481: -- IF (p_log_level_rec.statement_level) THEN
2482: fa_rx_util_pkg.debug(p_print);
2483: -- END IF; -- bug#2434220
2478: -- END IF;
2479: -- fa_rx_util_pkg.debug(p_print); -- bug#2434220 Commented out
2480: end if;
2481: -- IF (p_log_level_rec.statement_level) THEN
2482: fa_rx_util_pkg.debug(p_print);
2483: -- END IF; -- bug#2434220
2484:
2485: -- fa_rx_util_pkg.debug('fadpxtb.pls','debug: ', p_print);
2486:
2481: -- IF (p_log_level_rec.statement_level) THEN
2482: fa_rx_util_pkg.debug(p_print);
2483: -- END IF; -- bug#2434220
2484:
2485: -- fa_rx_util_pkg.debug('fadpxtb.pls','debug: ', p_print);
2486:
2487: return p_print;
2488: exception
2489: when others then