42: BEGIN
43:
44: SELECT COUNT(*)
45: INTO l_count
46: FROM igi_imp_iac_interface_ctrl
47: WHERE book_type_code = n_book_code
48: AND category_id = (SELECT category_id
49: FROM fa_categories_b_kfv
50: WHERE concatenated_segments = n_category_desc);
62: -- ===================================================================
63: FUNCTION Validate_Transfer(n_book_code IN VARCHAR2,
64: n_category_desc IN VARCHAR2)
65: RETURN VARCHAR2 IS
66: l_tfr_stat igi_imp_iac_interface_ctrl.transfer_status%TYPE;
67: BEGIN
68: SELECT transfer_status
69: INTO l_tfr_stat
70: FROM igi_imp_iac_interface_ctrl
66: l_tfr_stat igi_imp_iac_interface_ctrl.transfer_status%TYPE;
67: BEGIN
68: SELECT transfer_status
69: INTO l_tfr_stat
70: FROM igi_imp_iac_interface_ctrl
71: WHERE book_type_code = n_book_code
72: AND category_id = (SELECT category_id
73: FROM fa_categories_b_kfv
74: WHERE concatenated_segments = n_category_desc);
92: BEGIN
93:
94: SELECT COUNT(*)
95: INTO l_count
96: FROM igi_imp_iac_interface
97: WHERE asset_id = (SELECT asset_id
98: FROM fa_additions
99: WHERE asset_number = n_asset_number)
100: AND book_type_code = n_book_code
122: BEGIN
123:
124: SELECT COUNT(*)
125: INTO l_count
126: FROM igi_imp_iac_interface
127: WHERE asset_id = (SELECT asset_id
128: FROM fa_additions
129: WHERE asset_number = n_asset_number)
130: AND book_type_code = n_book_code
164: IS
165: CURSOR c_asset_exists
166: IS
167: SELECT COUNT(*)
168: FROM igi_imp_iac_interface
169: WHERE asset_id = (SELECT asset_id
170: FROM fa_additions
171: WHERE asset_number = p_asset_number)
172: AND book_type_code = p_book_code
173: AND category_id = (SELECT category_id
174: FROM fa_categories_b_kfv
175: WHERE concatenated_segments = p_category_desc);
176:
177: Cursor C_book_class( cp_book_type_code igi_imp_iac_interface.book_type_code%TYPE) is
178: Select book_class
179: from fa_booK_controls
180: where book_type_code = cp_book_type_code;
181:
178: Select book_class
179: from fa_booK_controls
180: where book_type_code = cp_book_type_code;
181:
182: cursor c_deprn_flag(cp_book_type_code igi_imp_iac_interface.book_type_code%TYPE,
183: cp_asset_num igi_imp_iac_interface.asset_number%TYPE ) is
184: select depreciate_flag
185: from fa_books fb,fa_additions fa
186: where book_type_code =cp_book_type_code
179: from fa_booK_controls
180: where book_type_code = cp_book_type_code;
181:
182: cursor c_deprn_flag(cp_book_type_code igi_imp_iac_interface.book_type_code%TYPE,
183: cp_asset_num igi_imp_iac_interface.asset_number%TYPE ) is
184: select depreciate_flag
185: from fa_books fb,fa_additions fa
186: where book_type_code =cp_book_type_code
187: and fa.asset_number = cp_asset_num
192: l_exists VARCHAR2(1);
193: l_count NUMBER;
194: l_adi_enabled VARCHAR2(3);
195: l_request_status igi_imp_iac_controls.request_status%TYPE;
196: l_transfer_status igi_imp_iac_interface_ctrl.transfer_status%TYPE;
197:
198: l_valid BOOLEAN := TRUE;
199:
200: l_deprn_flag fa_books.depreciate_flag%type;
306: --END IF;
307:
308:
309: If l_deprn_flag = 'YES' Then
310: UPDATE igi_imp_iac_interface
311: SET
312: cost_mhca = p_cost_mhca,
313: ytd_mhca = p_ytd_mhca,
314: accum_deprn_mhca = p_accum_deprn_mhca,
324: WHERE group_id = p_group_id
325: AND asset_number = p_asset_number
326: AND book_type_code = p_book_code;
327: Else
328: UPDATE igi_imp_iac_interface
329: SET
330: cost_mhca = p_cost_mhca,
331: reval_reserve_mhca = p_reval_reserve_mhca,
332: operating_account_cost = nvl(p_operating_account_cost,0) * -1,