87: l_select_start varchar2(2500);
88: l_from_stmt varchar2(2000);
89: l_group_by varchar2(500);
90:
91: l_main dbms_sql.varchar2s;
92:
93: l_sub_sql varchar2(3000); -- Bug3896299 Extended.
94: l_asset_id number;
95: l_total_cost number; -- bug#2661575: asset total cost at target date
1039:
1040: -- Open v_SubCursor
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;
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:
1051: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_book',h_book);
1052: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_prior_date',h_prior_date);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1047: END IF;
1048:
1049: DBMS_SQL.PARSE (v_SubCursor,l_sub_sql,DBMS_SQL.V7);
1050:
1051: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_book',h_book);
1052: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_prior_date',h_prior_date);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1048:
1049: DBMS_SQL.PARSE (v_SubCursor,l_sub_sql,DBMS_SQL.V7);
1050:
1051: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_book',h_book);
1052: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_prior_date',h_prior_date);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1049: DBMS_SQL.PARSE (v_SubCursor,l_sub_sql,DBMS_SQL.V7);
1050:
1051: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_book',h_book);
1052: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_prior_date',h_prior_date);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1050:
1051: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_book',h_book);
1052: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_prior_date',h_prior_date);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1052: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_prior_date',h_prior_date);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1059: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_from',h_category_from);
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1053: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_target_date',h_target_date);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1059: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_from',h_category_from);
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1061: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_year',h_year);
1054: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_method_code',h_method_code);
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1059: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_from',h_category_from);
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1061: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_year',h_year);
1062: /* Bug3896299 */
1055: /* Bug3896299 */
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1059: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_from',h_category_from);
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1061: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_year',h_year);
1062: /* Bug3896299 */
1063:
1056: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_corp_book',h_corp_book);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1059: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_from',h_category_from);
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1061: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_year',h_year);
1062: /* Bug3896299 */
1063:
1064: DBMS_SQL.DEFINE_COLUMN(v_SubCursor,1,l_asset_id);
1057: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_from',state_from);
1058: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_state_to',state_to);
1059: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_from',h_category_from);
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1061: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_year',h_year);
1062: /* Bug3896299 */
1063:
1064: DBMS_SQL.DEFINE_COLUMN(v_SubCursor,1,l_asset_id);
1065:
1060: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_category_to',h_category_to);
1061: DBMS_SQL.BIND_VARIABLE(v_SubCursor,':p_year',h_year);
1062: /* Bug3896299 */
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;
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
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 */
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;
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);
1087:
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
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);
1087:
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
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);
1087:
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
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);
1087:
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1086: DBMS_SQL.PARSE (v_MainCursor, l_main,0,k,FALSE,DBMS_SQL.V7);
1087:
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1087:
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1088: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,1,h_asset_id);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1089: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,2,h_asset_number,15);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1090: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,3,h_asset_desc,80);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1091: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,4,h_new_used,4);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1092: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,5,h_book_type_code,15);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1093: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,6,h_minor_category,150);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1094: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,7,h_tax_asset_type,15); -- Treate UTF8
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1095: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,8,h_state,150);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1096: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,9,h_start_units_total);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1097: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,10,h_end_units_total);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1098: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,11,h_start_units_assigned);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1099: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,12,h_end_units_assigned);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
1100: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,13,h_start_cost_total);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
1108: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,21,h_end_life);
1101: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,14,h_end_cost_total);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
1108: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,21,h_end_life);
1109: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,22,h_adjusted_rate);
1102: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,15,h_date_in_service);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
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);
1103: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,16,h_era_name_num,1);
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
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
1104: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,17,h_add_era_year);
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
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 *****');
1105: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,18,h_add_year);
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
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;
1106: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,19,h_add_month);
1107: DBMS_SQL.DEFINE_COLUMN(v_MainCursor,20,h_start_life);
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:
1116: /* Loop For v_SubCursor */
1117:
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;
1126: If v_SubFetch =0 then
1127: Exit;
1128: end if;
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;
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);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
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);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
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);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
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);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1193: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_asset_id',l_asset_id);
1194: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_book',h_book);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1194: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_book',h_book);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1195: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_corp_book',h_corp_book);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1196: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_date',h_target_date);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1197: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_date', h_prior_date);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1198: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_from',h_category_from);
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1199: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_category_to',h_category_to);
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
1200: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_year',h_year);
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
1208: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_thid_in',h_target_bk_thid_in); -- Bug3859151
1201: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_method_code',h_method_code);
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
1208: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_thid_in',h_target_bk_thid_in); -- Bug3859151
1209:
1202: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_date_effective',h_prior_bk_date_effective);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
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);
1203: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_date_effective',h_prior_ah_date_effective);
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
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
1204: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_target_bk_date_effective',h_target_bk_date_effective);
1205: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_sum_nbvs_cost',h_sum_nbvs_cost);
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
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 *****');
1206: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_bk_thid_in',h_prior_bk_thid_in); -- Bug3859151
1207: DBMS_SQL.BIND_VARIABLE(v_MainCursor,':p_prior_ah_thid_in',h_prior_ah_thid_in); -- bug3859151
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;
1223: Loop
1224: -- bug#2448145: Initialized update nbv flag
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;
1233: If v_MainFetch =0 then
1234: Exit;
1235: end if;
1236:
1237: DBMS_SQL.COLUMN_VALUE(v_MainCursor,1,h_asset_id);
1238: DBMS_SQL.COLUMN_VALUE(v_MainCursor,2,h_asset_number);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1234: Exit;
1235: end if;
1236:
1237: DBMS_SQL.COLUMN_VALUE(v_MainCursor,1,h_asset_id);
1238: DBMS_SQL.COLUMN_VALUE(v_MainCursor,2,h_asset_number);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1235: end if;
1236:
1237: DBMS_SQL.COLUMN_VALUE(v_MainCursor,1,h_asset_id);
1238: DBMS_SQL.COLUMN_VALUE(v_MainCursor,2,h_asset_number);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1236:
1237: DBMS_SQL.COLUMN_VALUE(v_MainCursor,1,h_asset_id);
1238: DBMS_SQL.COLUMN_VALUE(v_MainCursor,2,h_asset_number);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1237: DBMS_SQL.COLUMN_VALUE(v_MainCursor,1,h_asset_id);
1238: DBMS_SQL.COLUMN_VALUE(v_MainCursor,2,h_asset_number);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1238: DBMS_SQL.COLUMN_VALUE(v_MainCursor,2,h_asset_number);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1239: DBMS_SQL.COLUMN_VALUE(v_MainCursor,3,h_asset_desc);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1240: DBMS_SQL.COLUMN_VALUE(v_MainCursor,4,h_new_used);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1241: DBMS_SQL.COLUMN_VALUE(v_MainCursor,5,h_book_type_code);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1242: DBMS_SQL.COLUMN_VALUE(v_MainCursor,6,h_minor_category);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1243: DBMS_SQL.COLUMN_VALUE(v_MainCursor,7,h_tax_asset_type);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1244: DBMS_SQL.COLUMN_VALUE(v_MainCursor,8,h_state);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1245: DBMS_SQL.COLUMN_VALUE(v_MainCursor,9,h_start_units_total);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1246: DBMS_SQL.COLUMN_VALUE(v_MainCursor,10,h_end_units_total);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1247: DBMS_SQL.COLUMN_VALUE(v_MainCursor,11,h_start_units_assigned);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1248: DBMS_SQL.COLUMN_VALUE(v_MainCursor,12,h_end_units_assigned);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1249: DBMS_SQL.COLUMN_VALUE(v_MainCursor,13,h_start_cost_total);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1250: DBMS_SQL.COLUMN_VALUE(v_MainCursor,14,h_end_cost_total);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1258: DBMS_SQL.COLUMN_VALUE(v_MainCursor,22,h_adjusted_rate);
1251: DBMS_SQL.COLUMN_VALUE(v_MainCursor,15,h_date_in_service);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1258: DBMS_SQL.COLUMN_VALUE(v_MainCursor,22,h_adjusted_rate);
1259: DBMS_SQL.COLUMN_VALUE(v_MainCursor,23,h_abs_units);
1252: DBMS_SQL.COLUMN_VALUE(v_MainCursor,16,h_era_name_num);
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1258: DBMS_SQL.COLUMN_VALUE(v_MainCursor,22,h_adjusted_rate);
1259: DBMS_SQL.COLUMN_VALUE(v_MainCursor,23,h_abs_units);
1260:
1253: DBMS_SQL.COLUMN_VALUE(v_MainCursor,17,h_add_era_year);
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1258: DBMS_SQL.COLUMN_VALUE(v_MainCursor,22,h_adjusted_rate);
1259: DBMS_SQL.COLUMN_VALUE(v_MainCursor,23,h_abs_units);
1260:
1261: /* Get Minor Category Description */
1254: DBMS_SQL.COLUMN_VALUE(v_MainCursor,18,h_add_year);
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1258: DBMS_SQL.COLUMN_VALUE(v_MainCursor,22,h_adjusted_rate);
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
1255: DBMS_SQL.COLUMN_VALUE(v_MainCursor,19,h_add_month);
1256: DBMS_SQL.COLUMN_VALUE(v_MainCursor,20,h_start_life);
1257: DBMS_SQL.COLUMN_VALUE(v_MainCursor,21,h_end_life);
1258: DBMS_SQL.COLUMN_VALUE(v_MainCursor,22,h_adjusted_rate);
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);
1905: and TRANSACTION_DATE_ENTERED <= '''|| h_target_date ||'''
1906: and TRANSACTION_TYPE_CODE =''TRANSFER'')
1907: and FDH.LOCATION_ID = LOC.LOCATION_ID
1908: and '||l_parm_state||' = '''||h_state ||'''';
1909: v_TransferCursor := DBMS_SQL.OPEN_CURSOR;
1910:
1911: DBMS_SQL.PARSE (v_TransferCursor,l_transfer_sql,DBMS_SQL.V7);
1912: DBMS_SQL.DEFINE_COLUMN(v_TransferCursor,1,h_current_state_flag,1);
1913:
1907: and FDH.LOCATION_ID = LOC.LOCATION_ID
1908: and '||l_parm_state||' = '''||h_state ||'''';
1909: v_TransferCursor := DBMS_SQL.OPEN_CURSOR;
1910:
1911: DBMS_SQL.PARSE (v_TransferCursor,l_transfer_sql,DBMS_SQL.V7);
1912: DBMS_SQL.DEFINE_COLUMN(v_TransferCursor,1,h_current_state_flag,1);
1913:
1914: v_TransferReturn := DBMS_SQL.EXECUTE(v_TransferCursor);
1915: v_TransferFetch := DBMS_SQL.FETCH_ROWS(v_TransferCursor);
1908: and '||l_parm_state||' = '''||h_state ||'''';
1909: v_TransferCursor := DBMS_SQL.OPEN_CURSOR;
1910:
1911: DBMS_SQL.PARSE (v_TransferCursor,l_transfer_sql,DBMS_SQL.V7);
1912: DBMS_SQL.DEFINE_COLUMN(v_TransferCursor,1,h_current_state_flag,1);
1913:
1914: v_TransferReturn := DBMS_SQL.EXECUTE(v_TransferCursor);
1915: v_TransferFetch := DBMS_SQL.FETCH_ROWS(v_TransferCursor);
1916: If v_TransferFetch = 0 then
1910:
1911: DBMS_SQL.PARSE (v_TransferCursor,l_transfer_sql,DBMS_SQL.V7);
1912: DBMS_SQL.DEFINE_COLUMN(v_TransferCursor,1,h_current_state_flag,1);
1913:
1914: v_TransferReturn := DBMS_SQL.EXECUTE(v_TransferCursor);
1915: v_TransferFetch := DBMS_SQL.FETCH_ROWS(v_TransferCursor);
1916: If v_TransferFetch = 0 then
1917: h_current_state_flag:='Y';
1918: end if;
1911: DBMS_SQL.PARSE (v_TransferCursor,l_transfer_sql,DBMS_SQL.V7);
1912: DBMS_SQL.DEFINE_COLUMN(v_TransferCursor,1,h_current_state_flag,1);
1913:
1914: v_TransferReturn := DBMS_SQL.EXECUTE(v_TransferCursor);
1915: v_TransferFetch := DBMS_SQL.FETCH_ROWS(v_TransferCursor);
1916: If v_TransferFetch = 0 then
1917: h_current_state_flag:='Y';
1918: end if;
1919:
1916: If v_TransferFetch = 0 then
1917: h_current_state_flag:='Y';
1918: end if;
1919:
1920: DBMS_SQL.COLUMN_VALUE(v_TransferCursor,1,h_current_state_flag);
1921: DBMS_SQL.CLOSE_CURSOR(v_TransferCursor);
1922:
1923: end;
1924: ----Bug6700047 ends
1917: h_current_state_flag:='Y';
1918: end if;
1919:
1920: DBMS_SQL.COLUMN_VALUE(v_TransferCursor,1,h_current_state_flag);
1921: DBMS_SQL.CLOSE_CURSOR(v_TransferCursor);
1922:
1923: end;
1924: ----Bug6700047 ends
1925: r_transfer_flag :='Y';
2350: END IF;
2351:
2352: END LOOP;
2353:
2354: -- DBMS_SQL.close_cursor(v_state_cursor);
2355:
2356: DBMS_SQL.CLOSE_CURSOR(v_MainCursor);
2357:
2358: IF (p_log_level_rec.statement_level) THEN
2352: END LOOP;
2353:
2354: -- DBMS_SQL.close_cursor(v_state_cursor);
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;
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:
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;
2380: and can insert their date.
2381: ==================================================================== */
2382:
2383: begin
2384: v_ExtCursor := DBMS_SQL.OPEN_CURSOR;
2385:
2386: l_ExtString := '
2387: Begin
2388: FA_DEPRN_TAX_CUSTOM_PKG.FADPCUSTOM_UPDATE(
2405: :errbuf := sqlerrm;
2406:
2407: end;';
2408:
2409: DBMS_SQL.PARSE (v_ExtCursor, l_ExtString, DBMS_SQL.V7);
2410:
2411: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_request_id' ,h_request_id );
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2407: end;';
2408:
2409: DBMS_SQL.PARSE (v_ExtCursor, l_ExtString, DBMS_SQL.V7);
2410:
2411: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_request_id' ,h_request_id );
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2408:
2409: DBMS_SQL.PARSE (v_ExtCursor, l_ExtString, DBMS_SQL.V7);
2410:
2411: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_request_id' ,h_request_id );
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2409: DBMS_SQL.PARSE (v_ExtCursor, l_ExtString, DBMS_SQL.V7);
2410:
2411: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_request_id' ,h_request_id );
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2417:
2410:
2411: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_request_id' ,h_request_id );
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2417:
2418: v_ExtReturn := DBMS_SQL.EXECUTE(v_ExtCursor);
2411: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_request_id' ,h_request_id );
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2417:
2418: v_ExtReturn := DBMS_SQL.EXECUTE(v_ExtCursor);
2419:
2412: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_book_type_code' ,h_book_type_code );
2413: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_year' ,h_year);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2417:
2418: v_ExtReturn := DBMS_SQL.EXECUTE(v_ExtCursor);
2419:
2420: DBMS_SQL.CLOSE_CURSOR(v_ExtCursor);
2414: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':h_state' ,h_state );
2415: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':retcode' ,retcode );
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2417:
2418: v_ExtReturn := DBMS_SQL.EXECUTE(v_ExtCursor);
2419:
2420: DBMS_SQL.CLOSE_CURSOR(v_ExtCursor);
2421:
2422: if retcode = 2 then
2416: DBMS_SQL.BIND_VARIABLE (v_ExtCursor,':errbuf' ,errbuf );
2417:
2418: v_ExtReturn := DBMS_SQL.EXECUTE(v_ExtCursor);
2419:
2420: DBMS_SQL.CLOSE_CURSOR(v_ExtCursor);
2421:
2422: if retcode = 2 then
2423: return;
2424: end if;