39: FUNCTION Correction
40: (P_asset_id IN igi_iac_asset_balances.asset_id%TYPE,
41: P_book_type_code IN igi_iac_asset_balances.book_type_code%TYPE,
42: P_value IN OUT NOCOPY Number,
43: P_cost IN Fa_books.cost%TYPE,
44: P_salvage_value IN fa_books.salvage_value%TYPE,
45: p_calling_program VARCHAR2)
46: RETURN Boolean IS
47:
40: (P_asset_id IN igi_iac_asset_balances.asset_id%TYPE,
41: P_book_type_code IN igi_iac_asset_balances.book_type_code%TYPE,
42: P_value IN OUT NOCOPY Number,
43: P_cost IN Fa_books.cost%TYPE,
44: P_salvage_value IN fa_books.salvage_value%TYPE,
45: p_calling_program VARCHAR2)
46: RETURN Boolean IS
47:
48: -- to get latest cost and salvage value for an asset
47:
48: -- to get latest cost and salvage value for an asset
49: CURSOR C_get_asset_info IS
50: SELECT cost, salvage_value
51: FROM FA_BOOKS
52: WHERE Asset_id=P_Asset_id
53: AND book_type_Code =p_book_type_code
54: AND transaction_header_id_out IS NULL;
55:
52: WHERE Asset_id=P_Asset_id
53: AND book_type_Code =p_book_type_code
54: AND transaction_header_id_out IS NULL;
55:
56: l_cost fa_books.cost%TYPE;
57: l_salvage_value fa_books.salvage_value%TYPE;
58: err_asset_info EXCEPTION;
59: l_path_name VARCHAR2(150) := g_path||'correction';
60:
53: AND book_type_Code =p_book_type_code
54: AND transaction_header_id_out IS NULL;
55:
56: l_cost fa_books.cost%TYPE;
57: l_salvage_value fa_books.salvage_value%TYPE;
58: err_asset_info EXCEPTION;
59: l_path_name VARCHAR2(150) := g_path||'correction';
60:
61: BEGIN