DBA Data[Home] [Help]

APPS.JL_CO_FA_ACCOUNTING_PKG dependencies on FND_LOG

Line 5: | FND Logging infrastructure |

1: PACKAGE BODY jl_co_fa_accounting_pkg AS
2: /* $Header: jlcofgab.pls 120.15 2007/11/21 11:44:47 hbalijep ship $ */
3:
4: /* ======================================================================*
5: | FND Logging infrastructure |
6: * ======================================================================*/
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JL_CO_FA_ACCOUNTING_PKG';
8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

Line 8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

4: /* ======================================================================*
5: | FND Logging infrastructure |
6: * ======================================================================*/
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JL_CO_FA_ACCOUNTING_PKG';
8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

Line 9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

5: | FND Logging infrastructure |
6: * ======================================================================*/
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JL_CO_FA_ACCOUNTING_PKG';
8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

6: * ======================================================================*/
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JL_CO_FA_ACCOUNTING_PKG';
8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JL_CO_FA_ACCOUNTING_PKG';
8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
15: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'JL.PLSQL.JL_CO_FA_ACCOUNTING_PKG.';

Line 12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

8: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
15: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'JL.PLSQL.JL_CO_FA_ACCOUNTING_PKG.';
16:

Line 13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
15: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'JL.PLSQL.JL_CO_FA_ACCOUNTING_PKG.';
16:
17: -----------------------------------------------------------------------------

Line 14: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

10: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
11: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
12: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
13: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
14: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
15: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'JL.PLSQL.JL_CO_FA_ACCOUNTING_PKG.';
16:
17: -----------------------------------------------------------------------------
18: -- Variables corresponding to Who columns --

Line 778: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');

774:
775: BEGIN
776:
777: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
778: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.BEGIN',G_PKG_NAME||': '||l_api_name||'(+)');
779: END IF;
780:
781: -----------------------------------------------------------------------------
782: -- Procedure starts and writes the concurrent parameters on log file --

Line 953: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

949:
950: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
951: x_char := 'tr.deprn_to_cost = ' || to_char(tr.deprn_to_cost);
952: fnd_file.put_line (FND_FILE.LOG, x_char);
953: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
954: END IF;
955: -----------------------------------------------------------------------------
956: -- Asset category parameters --
957: -- LER, 18-Jun-99 CCIDs are not more stored in FA_BOOKS_CONTROLS.GDF; --

Line 1093: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1089:
1090: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1091: x_char := 'Initial x_deprn_to_cost = ' || to_char(x_deprn_to_cost);
1092: fnd_file.put_line (FND_FILE.LOG, x_char);
1093: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1094: END IF;
1095:
1096: -----------------------------------------------------------------------------
1097: -- REVALUATION = Inflation Adjustments --

Line 1420: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1416:
1417: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1418: x_char := 'Value 1 = ' || to_char(x_value_1);
1419: fnd_file.put_line (FND_FILE.LOG, x_char);
1420: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1421: x_char := 'Value 2= ' || to_char(x_value_2);
1422: fnd_file.put_line (FND_FILE.LOG, x_char);
1423: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1424: x_char := 'x_adjustment = ' || to_char(x_adjustment_amount);

Line 1423: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1419: fnd_file.put_line (FND_FILE.LOG, x_char);
1420: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1421: x_char := 'Value 2= ' || to_char(x_value_2);
1422: fnd_file.put_line (FND_FILE.LOG, x_char);
1423: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1424: x_char := 'x_adjustment = ' || to_char(x_adjustment_amount);
1425: fnd_file.put_line (FND_FILE.LOG, x_char);
1426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1427: x_char := 'x_reserve_dr = ' || to_char(x_reserve_dr);

Line 1426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1422: fnd_file.put_line (FND_FILE.LOG, x_char);
1423: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1424: x_char := 'x_adjustment = ' || to_char(x_adjustment_amount);
1425: fnd_file.put_line (FND_FILE.LOG, x_char);
1426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1427: x_char := 'x_reserve_dr = ' || to_char(x_reserve_dr);
1428: fnd_file.put_line (FND_FILE.LOG, x_char);
1429: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1430: END IF;

Line 1429: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1425: fnd_file.put_line (FND_FILE.LOG, x_char);
1426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1427: x_char := 'x_reserve_dr = ' || to_char(x_reserve_dr);
1428: fnd_file.put_line (FND_FILE.LOG, x_char);
1429: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1430: END IF;
1431:
1432: OPEN c_sum_all_adjustments (tr.asset_id,
1433: p_tax_book,

Line 1668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1664:
1665: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1666: x_char := 'Adjustment for Line = ' || to_char(ra.distribution_id) || ' ' || ra.adjustment_type;
1667: fnd_file.put_line (FND_FILE.LOG, x_char);
1668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1669: END IF;
1670:
1671: IF (tr.source_transaction_header_id IS NULL) THEN
1672: IF (ra.adjustment_type IN (x_cost_name,

Line 1822: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

1818:
1819: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1820: x_char := 'x_deprn_to_cost A = ' || to_char(x_deprn_to_cost);
1821: fnd_file.put_line (FND_FILE.LOG, x_char);
1822: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
1823: END IF;
1824:
1825: insert_adjustment (tr.transaction_header_id,
1826: 'DEPRECIATION',

Line 2099: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2095:
2096: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2097: x_char := 'Corp Reserve = ' || to_char(x_corp_deprn_reserve);
2098: fnd_file.put_line (FND_FILE.LOG, x_char);
2099: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2100: x_char := 'Adj Reserve = ' || to_char(x_adj_deprn_reserve);
2101: fnd_file.put_line (FND_FILE.LOG, x_char);
2102: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2103: END IF;

Line 2102: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2098: fnd_file.put_line (FND_FILE.LOG, x_char);
2099: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2100: x_char := 'Adj Reserve = ' || to_char(x_adj_deprn_reserve);
2101: fnd_file.put_line (FND_FILE.LOG, x_char);
2102: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2103: END IF;
2104:
2105: OPEN c_sum_adjustments (tr.asset_id,
2106: x_corporate_book,

Line 2126: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2122:
2123: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2124: x_char := 'Sum Corp Reserve = ' || to_char(x_adjustment_amount);
2125: fnd_file.put_line (FND_FILE.LOG, x_char);
2126: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2127: x_char := 'Sum Adj Reserve = ' || to_char(x_adj_cost);
2128: fnd_file.put_line (FND_FILE.LOG, x_char);
2129: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2130: END IF;

Line 2129: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2125: fnd_file.put_line (FND_FILE.LOG, x_char);
2126: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2127: x_char := 'Sum Adj Reserve = ' || to_char(x_adj_cost);
2128: fnd_file.put_line (FND_FILE.LOG, x_char);
2129: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2130: END IF;
2131:
2132: x_adjustment_amount := x_adj_cost - x_adjustment_amount;
2133:

Line 2153: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2149:
2150: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2151: x_char := 'x_adjustment_amount = ' || to_char(x_adjustment_amount);
2152: fnd_file.put_line (FND_FILE.LOG, x_char);
2153: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2154: x_char := 'Factor_1 = ' || to_char(x_factor_1);
2155: fnd_file.put_line (FND_FILE.LOG, x_char);
2156: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2157: END IF;

Line 2156: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2152: fnd_file.put_line (FND_FILE.LOG, x_char);
2153: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2154: x_char := 'Factor_1 = ' || to_char(x_factor_1);
2155: fnd_file.put_line (FND_FILE.LOG, x_char);
2156: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2157: END IF;
2158:
2159: IF ((x_adj_cost <> 0) AND (x_adjustment_amount <> 0)) THEN
2160: x_factor_12 := x_deprn_to_cost * x_factor_1;

Line 2165: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2161:
2162: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2163: x_char := 'Factor_12 = ' || to_char(x_factor_12);
2164: fnd_file.put_line (FND_FILE.LOG, x_char);
2165: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2166: END IF;
2167:
2168: x_factor_11 := x_factor_12 / x_adjustment_amount;
2169: x_factor_12 := (x_adjustment_amount - x_factor_12) / x_adjustment_amount;

Line 2178: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2174:
2175: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2176: x_char := 'Factor_11 = ' || to_char(x_factor_11);
2177: fnd_file.put_line (FND_FILE.LOG, x_char);
2178: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2179: x_char := 'Factor_12 = ' || to_char(x_factor_12);
2180: fnd_file.put_line (FND_FILE.LOG, x_char);
2181: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2182: END IF;

Line 2181: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2177: fnd_file.put_line (FND_FILE.LOG, x_char);
2178: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2179: x_char := 'Factor_12 = ' || to_char(x_factor_12);
2180: fnd_file.put_line (FND_FILE.LOG, x_char);
2181: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2182: END IF;
2183:
2184: --x_ta_factor := abs (tr.appraisal_balance) / tr.adj_cost;
2185:

Line 2333: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2329:
2330: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2331: x_char := ra.adjustment_type || ' ' || ra.debit_credit_flag || ' ' || to_char(x_adjustment_amount);
2332: fnd_file.put_line (FND_FILE.LOG, x_char);
2333: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2334: END IF;
2335:
2336: IF (ra.debit_credit_flag = 'DR') THEN
2337: x_debit_credit_flag := 'CR';

Line 2398: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2394:
2395: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2396: x_char := 'x_value_1 = ' || to_char(x_value_1);
2397: fnd_file.put_line (FND_FILE.LOG, x_char);
2398: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2399: x_char := 'x_value_2 = ' || to_char(x_value_2);
2400: fnd_file.put_line (FND_FILE.LOG, x_char);
2401: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2402: END IF;

Line 2401: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2397: fnd_file.put_line (FND_FILE.LOG, x_char);
2398: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2399: x_char := 'x_value_2 = ' || to_char(x_value_2);
2400: fnd_file.put_line (FND_FILE.LOG, x_char);
2401: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2402: END IF;
2403:
2404: insert_adjustment (tr.transaction_header_id,
2405: x_global_source,

Line 2590: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2586:
2587: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2588: x_char := 'Appraisal Line Amount = ' || to_char (x_ta_line_amount);
2589: fnd_file.put_line (FND_FILE.LOG, x_char);
2590: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2591: END IF;
2592:
2593: IF (tr.appraisal_balance > 0) THEN
2594: IF (tr.transaction_type_code IN ('RECLASS', 'CIP RECLASS')

Line 2748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2744:
2745: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2746: x_char := 'Source Transaction ID = ' || to_char(x_source_transaction_header_id);
2747: fnd_file.put_line (FND_FILE.LOG, x_char);
2748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2749: END IF;
2750:
2751: -----------------------------------------------------------------------------
2752: -- Get historical and adjusted values of the cost inflation adjustments --

Line 2776: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2772:
2773: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2774: x_char := 'Sum Corp Cost = ' || to_char(x_adjustment_amount);
2775: fnd_file.put_line (FND_FILE.LOG, x_char);
2776: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2777: x_char := 'Sum Adj Cost = ' || to_char(x_adj_cost);
2778: fnd_file.put_line (FND_FILE.LOG, x_char);
2779: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2780: END IF;

Line 2779: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2775: fnd_file.put_line (FND_FILE.LOG, x_char);
2776: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2777: x_char := 'Sum Adj Cost = ' || to_char(x_adj_cost);
2778: fnd_file.put_line (FND_FILE.LOG, x_char);
2779: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2780: END IF;
2781:
2782: IF (x_adj_cost <> 0) THEN
2783: x_factor := (x_adj_cost - x_adjustment_amount) / x_adj_cost;

Line 2813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2809:
2810: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2811: x_char := 'Sum Corp Reserve = ' || to_char(x_adjustment_amount);
2812: fnd_file.put_line (FND_FILE.LOG, x_char);
2813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2814: x_char := 'Sum Adj Reserve = ' || to_char(x_adj_cost);
2815: fnd_file.put_line (FND_FILE.LOG, x_char);
2816: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2817: END IF;

Line 2816: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2812: fnd_file.put_line (FND_FILE.LOG, x_char);
2813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2814: x_char := 'Sum Adj Reserve = ' || to_char(x_adj_cost);
2815: fnd_file.put_line (FND_FILE.LOG, x_char);
2816: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2817: END IF;
2818:
2819: -----------------------------------------------------------------------------------
2820: -- LER, 18-Jun-99 It's enough with the depreciation reserve amounts --

Line 2876: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2872:
2873: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2874: x_char := 'Factor_11 = ' || to_char(x_factor_11);
2875: fnd_file.put_line (FND_FILE.LOG, x_char);
2876: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2877: x_char := 'Factor_12 = ' || to_char(x_factor_12);
2878: fnd_file.put_line (FND_FILE.LOG, x_char);
2879: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2880: END IF;

Line 2879: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2875: fnd_file.put_line (FND_FILE.LOG, x_char);
2876: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2877: x_char := 'Factor_12 = ' || to_char(x_factor_12);
2878: fnd_file.put_line (FND_FILE.LOG, x_char);
2879: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2880: END IF;
2881:
2882: -----------------------------------------------------------------------------
2883: -- Get historical and adjusted values of the expense inflation adjustments --

Line 2907: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2903:
2904: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2905: x_char := 'Sum Corp Expense = ' || to_char(x_adjustment_amount);
2906: fnd_file.put_line (FND_FILE.LOG, x_char);
2907: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2908: x_char := 'Sum Adj Expense = ' || to_char(x_adj_cost);
2909: fnd_file.put_line (FND_FILE.LOG, x_char);
2910: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2911: END IF;

Line 2910: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2906: fnd_file.put_line (FND_FILE.LOG, x_char);
2907: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2908: x_char := 'Sum Adj Expense = ' || to_char(x_adj_cost);
2909: fnd_file.put_line (FND_FILE.LOG, x_char);
2910: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2911: END IF;
2912:
2913: IF (x_adj_cost <> 0) THEN
2914: x_factor_2 := (x_adj_cost - x_adjustment_amount) / x_adj_cost;

Line 2938: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2934:
2935: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2936: x_char := 'Distribution Id = ' || to_char(ra.distribution_id);
2937: fnd_file.put_line (FND_FILE.LOG, x_char);
2938: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2939: END IF;
2940:
2941: IF (ra.debit_credit_flag = 'DR') THEN
2942: x_debit_credit_flag := 'CR';

Line 2958: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2954:
2955: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2956: x_char := 'Cost Adjustment Amount = ' || to_char(x_adjustment_amount);
2957: fnd_file.put_line (FND_FILE.LOG, x_char);
2958: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
2959: END IF;
2960:
2961: change_account (x_chart_of_accounts_id,
2962: x_apps_short_name,

Line 3003: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

2999:
3000: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3001: x_char := 'Std Reserve Adjustment Amount = ' || to_char(x_adjustment_amount);
3002: fnd_file.put_line (FND_FILE.LOG, x_char);
3003: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3004: END IF;
3005:
3006: insert_adjustment (tr.transaction_header_id,
3007: x_global_source,

Line 3031: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3027:
3028: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3029: x_char := 'IA Reserve Adjustment Amount = ' || to_char(x_adjustment_amount);
3030: fnd_file.put_line (FND_FILE.LOG, x_char);
3031: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3032: END IF;
3033:
3034: change_account (x_chart_of_accounts_id,
3035: x_apps_short_name,

Line 3191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3187:
3188: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3189: x_char := 'Appraisal Line Amount =' || to_char (x_ta_line_amount);
3190: fnd_file.put_line (FND_FILE.LOG, x_char);
3191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3192: END IF;
3193:
3194: IF (tr.appraisal_balance > 0) THEN
3195:

Line 3377: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3373:
3374: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3375: x_char := 'tr.transaction_header_id_in = ' || to_char (tr.transaction_header_id);
3376: fnd_file.put_line (FND_FILE.LOG, x_char);
3377: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3378: x_char := 'x_period_1 = ' || to_char(x_period_1);
3379: fnd_file.put_line (FND_FILE.LOG, x_char);
3380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3381: END IF;

Line 3380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3376: fnd_file.put_line (FND_FILE.LOG, x_char);
3377: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3378: x_char := 'x_period_1 = ' || to_char(x_period_1);
3379: fnd_file.put_line (FND_FILE.LOG, x_char);
3380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3381: END IF;
3382:
3383: -----------------------------------------------------------------------------------
3384: -- LER, 18-Jun-99 Lines commented were moved outside of the IF section --

Line 3399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3395:
3396: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3397: x_char := 'x_transaction_header_id_in = ' || to_char(x_transaction_header_id_in);
3398: fnd_file.put_line (FND_FILE.LOG, x_char);
3399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3400: x_char := 'x_value_1 = ' || to_char(x_value_2);
3401: fnd_file.put_line (FND_FILE.LOG, x_char);
3402: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3403: END IF;

Line 3402: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3398: fnd_file.put_line (FND_FILE.LOG, x_char);
3399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3400: x_char := 'x_value_1 = ' || to_char(x_value_2);
3401: fnd_file.put_line (FND_FILE.LOG, x_char);
3402: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3403: END IF;
3404:
3405: OPEN c_prior_retirement (x_transaction_header_id_in);
3406: FETCH c_prior_retirement INTO x_transaction_header_id_out,

Line 3415: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3411:
3412: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3413: x_char := 'x_transaction_header_id_out = ' || to_char(x_transaction_header_id_out);
3414: fnd_file.put_line (FND_FILE.LOG, x_char);
3415: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3416: x_char := 'x_value_2 = ' || to_char(x_value_1);
3417: fnd_file.put_line (FND_FILE.LOG, x_char);
3418: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3419: x_char := 'x_ia_reserve = ' || to_char(x_ia_reserve);

Line 3418: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3414: fnd_file.put_line (FND_FILE.LOG, x_char);
3415: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3416: x_char := 'x_value_2 = ' || to_char(x_value_1);
3417: fnd_file.put_line (FND_FILE.LOG, x_char);
3418: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3419: x_char := 'x_ia_reserve = ' || to_char(x_ia_reserve);
3420: fnd_file.put_line (FND_FILE.LOG, x_char);
3421: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3422: x_char := 'x_ia_reserve_retired ' || to_char(x_ia_reserve_retired);

Line 3421: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3417: fnd_file.put_line (FND_FILE.LOG, x_char);
3418: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3419: x_char := 'x_ia_reserve = ' || to_char(x_ia_reserve);
3420: fnd_file.put_line (FND_FILE.LOG, x_char);
3421: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3422: x_char := 'x_ia_reserve_retired ' || to_char(x_ia_reserve_retired);
3423: fnd_file.put_line (FND_FILE.LOG, x_char);
3424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3425: x_char := 'x_deprn_to_cost = ' || to_char(x_deprn_to_cost);

Line 3424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3420: fnd_file.put_line (FND_FILE.LOG, x_char);
3421: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3422: x_char := 'x_ia_reserve_retired ' || to_char(x_ia_reserve_retired);
3423: fnd_file.put_line (FND_FILE.LOG, x_char);
3424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3425: x_char := 'x_deprn_to_cost = ' || to_char(x_deprn_to_cost);
3426: fnd_file.put_line (FND_FILE.LOG, x_char);
3427: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3428: END IF;

Line 3427: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3423: fnd_file.put_line (FND_FILE.LOG, x_char);
3424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3425: x_char := 'x_deprn_to_cost = ' || to_char(x_deprn_to_cost);
3426: fnd_file.put_line (FND_FILE.LOG, x_char);
3427: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3428: END IF;
3429:
3430: ELSE
3431:

Line 3502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3498:
3499: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3500: x_char := 'x_adjustment = ' || to_char(x_adjustment_amount);
3501: fnd_file.put_line (FND_FILE.LOG, x_char);
3502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3503: x_char := 'x_ia_reserve = ' || to_char(x_ia_reserve);
3504: fnd_file.put_line (FND_FILE.LOG, x_char);
3505: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3506: x_char := 'x_ia_reserve_retired ' || to_char(x_ia_reserve_retired);

Line 3505: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3501: fnd_file.put_line (FND_FILE.LOG, x_char);
3502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3503: x_char := 'x_ia_reserve = ' || to_char(x_ia_reserve);
3504: fnd_file.put_line (FND_FILE.LOG, x_char);
3505: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3506: x_char := 'x_ia_reserve_retired ' || to_char(x_ia_reserve_retired);
3507: fnd_file.put_line (FND_FILE.LOG, x_char);
3508: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3509: x_char := 'x_value_3 ' || to_char(x_value_3);

Line 3508: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3504: fnd_file.put_line (FND_FILE.LOG, x_char);
3505: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3506: x_char := 'x_ia_reserve_retired ' || to_char(x_ia_reserve_retired);
3507: fnd_file.put_line (FND_FILE.LOG, x_char);
3508: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3509: x_char := 'x_value_3 ' || to_char(x_value_3);
3510: fnd_file.put_line (FND_FILE.LOG, x_char);
3511: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3512: x_char := 'adj_deprn_reserve = ' || to_char(x_adj_deprn_reserve);

Line 3511: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3507: fnd_file.put_line (FND_FILE.LOG, x_char);
3508: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3509: x_char := 'x_value_3 ' || to_char(x_value_3);
3510: fnd_file.put_line (FND_FILE.LOG, x_char);
3511: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3512: x_char := 'adj_deprn_reserve = ' || to_char(x_adj_deprn_reserve);
3513: fnd_file.put_line (FND_FILE.LOG, x_char);
3514: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3515: x_char := 'corp_deprn_reserve = ' || to_char(x_corp_deprn_reserve);

Line 3514: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3510: fnd_file.put_line (FND_FILE.LOG, x_char);
3511: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3512: x_char := 'adj_deprn_reserve = ' || to_char(x_adj_deprn_reserve);
3513: fnd_file.put_line (FND_FILE.LOG, x_char);
3514: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3515: x_char := 'corp_deprn_reserve = ' || to_char(x_corp_deprn_reserve);
3516: fnd_file.put_line (FND_FILE.LOG, x_char);
3517: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3518: END IF;

Line 3517: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3513: fnd_file.put_line (FND_FILE.LOG, x_char);
3514: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3515: x_char := 'corp_deprn_reserve = ' || to_char(x_corp_deprn_reserve);
3516: fnd_file.put_line (FND_FILE.LOG, x_char);
3517: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3518: END IF;
3519:
3520: -----------------------------------------------------------------------------
3521: -- Identify if retirement Gain/Loss is different in Corporate and Tax --

Line 3537: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3533:
3534: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3535: x_char := 'Gain/Loss Corp = ' || to_char(x_corp_gain_loss_amount);
3536: fnd_file.put_line (FND_FILE.LOG, x_char);
3537: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3538: x_char := 'Gain/Loss Adj = ' || to_char(x_adj_gain_loss_amount);
3539: fnd_file.put_line (FND_FILE.LOG, x_char);
3540: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3541: END IF;

Line 3540: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3536: fnd_file.put_line (FND_FILE.LOG, x_char);
3537: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3538: x_char := 'Gain/Loss Adj = ' || to_char(x_adj_gain_loss_amount);
3539: fnd_file.put_line (FND_FILE.LOG, x_char);
3540: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3541: END IF;
3542:
3543: -----------------------------------------------------------------------------
3544: -- Define values used in retire of Technical Appraisal balances --

Line 3571: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3567:
3568: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3569: x_char := 'Asset cost = ' || to_char(tr.adj_cost);
3570: fnd_file.put_line (FND_FILE.LOG, x_char);
3571: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3572: x_char := 'Appraisal = ' || to_char(tr.appraisal_balance);
3573: fnd_file.put_line (FND_FILE.LOG, x_char);
3574: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3575: END IF;

Line 3574: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3570: fnd_file.put_line (FND_FILE.LOG, x_char);
3571: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3572: x_char := 'Appraisal = ' || to_char(tr.appraisal_balance);
3573: fnd_file.put_line (FND_FILE.LOG, x_char);
3574: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3575: END IF;
3576:
3577: -----------------------------------------------------------------------------
3578: -- Identify retirement type --

Line 3620: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3616:
3617: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3618: x_char := 'adj_deprn_reserve = ' || to_char(x_adj_deprn_reserve);
3619: fnd_file.put_line (FND_FILE.LOG, x_char);
3620: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3621: x_char := 'corp_deprn_reserve = ' || to_char(x_corp_deprn_reserve);
3622: fnd_file.put_line (FND_FILE.LOG, x_char);
3623: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3624: END IF;

Line 3623: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3619: fnd_file.put_line (FND_FILE.LOG, x_char);
3620: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3621: x_char := 'corp_deprn_reserve = ' || to_char(x_corp_deprn_reserve);
3622: fnd_file.put_line (FND_FILE.LOG, x_char);
3623: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3624: END IF;
3625:
3626: -----------------------------------------------------------------------------
3627: -- Calculate Deprn. To Cost Inflation Adjusts. and Adjustments to Deprn. --

Line 3676: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3672:
3673: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3674: x_char := 'Expense - Corp -Dr = ' || to_char(x_adjustment_amount);
3675: fnd_file.put_line (FND_FILE.LOG, x_char);
3676: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3677: x_char := 'Expense - Corp - Cr = ' || to_char(x_adj_cost);
3678: fnd_file.put_line (FND_FILE.LOG, x_char);
3679: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3680: x_char := 'Expense - Adj - Dr = ' || to_char(x_adj_cost_retired);

Line 3679: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3675: fnd_file.put_line (FND_FILE.LOG, x_char);
3676: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3677: x_char := 'Expense - Corp - Cr = ' || to_char(x_adj_cost);
3678: fnd_file.put_line (FND_FILE.LOG, x_char);
3679: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3680: x_char := 'Expense - Adj - Dr = ' || to_char(x_adj_cost_retired);
3681: fnd_file.put_line (FND_FILE.LOG, x_char);
3682: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3683: END IF;

Line 3682: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3678: fnd_file.put_line (FND_FILE.LOG, x_char);
3679: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3680: x_char := 'Expense - Adj - Dr = ' || to_char(x_adj_cost_retired);
3681: fnd_file.put_line (FND_FILE.LOG, x_char);
3682: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3683: END IF;
3684: END IF;
3685:
3686: --------------------------------------------------------------------------------

Line 3706: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3702:
3703: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3704: x_char := 'Adjustment for Line = ' || to_char(ra.distribution_id) || ' ' || ra.adjustment_type;
3705: fnd_file.put_line (FND_FILE.LOG, x_char);
3706: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3707: END IF;
3708:
3709: IF (x_retirement_type = 'O') THEN
3710: OPEN c_tr_rel_adjustments (tr.source_transaction_header_id,

Line 3741: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3737:
3738: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3739: x_char := 'X_value_3 ' || to_char(x_value_3);
3740: fnd_file.put_line (FND_FILE.LOG, x_char);
3741: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3742: END IF;
3743: END IF;
3744:
3745: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 3748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3744:
3745: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3746: x_char := 'x_deprn_to_cost A = ' || to_char(x_deprn_to_cost);
3747: fnd_file.put_line (FND_FILE.LOG, x_char);
3748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3749: END IF;
3750:
3751: IF (ra.debit_credit_flag = 'DR') THEN
3752: x_debit_credit_flag := 'CR';

Line 3832: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3828:
3829: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3830: x_char := 'Retirement ID for Tax book = ' || to_char(x_adj_retirement_id);
3831: fnd_file.put_line (FND_FILE.LOG, x_char);
3832: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3833: x_char := 'Retirement ID for Corp book = ' || to_char(x_corp_retirement_id);
3834: fnd_file.put_line (FND_FILE.LOG, x_char);
3835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3836: x_char := 'Factor 1 = ' || to_char(x_factor_1);

Line 3835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3831: fnd_file.put_line (FND_FILE.LOG, x_char);
3832: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3833: x_char := 'Retirement ID for Corp book = ' || to_char(x_corp_retirement_id);
3834: fnd_file.put_line (FND_FILE.LOG, x_char);
3835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3836: x_char := 'Factor 1 = ' || to_char(x_factor_1);
3837: fnd_file.put_line (FND_FILE.LOG, x_char);
3838: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3839: x_char := 'x_deprn_to cost B = ' || to_char(x_deprn_to_cost);

Line 3838: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3834: fnd_file.put_line (FND_FILE.LOG, x_char);
3835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3836: x_char := 'Factor 1 = ' || to_char(x_factor_1);
3837: fnd_file.put_line (FND_FILE.LOG, x_char);
3838: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3839: x_char := 'x_deprn_to cost B = ' || to_char(x_deprn_to_cost);
3840: fnd_file.put_line (FND_FILE.LOG, x_char);
3841: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3842: END IF;

Line 3841: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3837: fnd_file.put_line (FND_FILE.LOG, x_char);
3838: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3839: x_char := 'x_deprn_to cost B = ' || to_char(x_deprn_to_cost);
3840: fnd_file.put_line (FND_FILE.LOG, x_char);
3841: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3842: END IF;
3843:
3844: IF (x_ia_reserve_retired <> 0) THEN
3845: x_factor_12 := x_value_3 * x_factor_1;

Line 3850: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3846:
3847: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3848: x_char := 'Factor_12 = ' || to_char(x_factor_12);
3849: fnd_file.put_line (FND_FILE.LOG, x_char);
3850: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3851: END IF;
3852:
3853: x_factor_11 := x_factor_12 / x_ia_reserve_retired;
3854: x_factor_12 := (x_ia_reserve_retired - x_factor_12) / x_ia_reserve_retired;

Line 3863: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3859:
3860: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3861: x_char := 'Factor_11 = ' || to_char(x_factor_11);
3862: fnd_file.put_line (FND_FILE.LOG, x_char);
3863: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3864: x_char := 'Factor_12 = ' || to_char(x_factor_12);
3865: fnd_file.put_line (FND_FILE.LOG, x_char);
3866: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3867: END IF;

Line 3866: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3862: fnd_file.put_line (FND_FILE.LOG, x_char);
3863: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3864: x_char := 'Factor_12 = ' || to_char(x_factor_12);
3865: fnd_file.put_line (FND_FILE.LOG, x_char);
3866: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3867: END IF;
3868:
3869: ELSE
3870: -------------------------------------------------------------------------------------

Line 3877: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3873:
3874: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3875: x_char := 'Units Retired = ' || to_char(x_corp_units_retired);
3876: fnd_file.put_line (FND_FILE.LOG, x_char);
3877: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3878: END IF;
3879:
3880: IF (x_retirement_type = 'U') THEN
3881: -- x_adj_cost_retired := 0;

Line 3929: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3925:
3926: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3927: x_char := 'Sum Corp Cost Retired = ' || to_char(x_adjustment_amount - x_adj_cost);
3928: fnd_file.put_line (FND_FILE.LOG, x_char);
3929: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3930: x_char := 'Sum Adj Cost = ' || to_char(x_adj_cost_retired);
3931: fnd_file.put_line (FND_FILE.LOG, x_char);
3932: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3933: END IF;

Line 3932: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3928: fnd_file.put_line (FND_FILE.LOG, x_char);
3929: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3930: x_char := 'Sum Adj Cost = ' || to_char(x_adj_cost_retired);
3931: fnd_file.put_line (FND_FILE.LOG, x_char);
3932: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3933: END IF;
3934:
3935: OPEN c_sum_adjustments (tr.asset_id,
3936: p_tax_book,

Line 3982: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3978:
3979: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3980: x_char := 'Sum Corp Reserve Retired = ' || to_char(x_adjustment_amount - x_adj_cost);
3981: fnd_file.put_line (FND_FILE.LOG, x_char);
3982: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3983: x_char := 'Sum Adj Reserve = ' || to_char(x_adj_cost_retired);
3984: fnd_file.put_line (FND_FILE.LOG, x_char);
3985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3986: x_char := 'x_value_4 = ' || to_char(x_value_4);

Line 3985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3981: fnd_file.put_line (FND_FILE.LOG, x_char);
3982: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3983: x_char := 'Sum Adj Reserve = ' || to_char(x_adj_cost_retired);
3984: fnd_file.put_line (FND_FILE.LOG, x_char);
3985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3986: x_char := 'x_value_4 = ' || to_char(x_value_4);
3987: fnd_file.put_line (FND_FILE.LOG, x_char);
3988: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3989: x_char := 'x_value_5 = ' || to_char(x_value_5);

Line 3988: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3984: fnd_file.put_line (FND_FILE.LOG, x_char);
3985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3986: x_char := 'x_value_4 = ' || to_char(x_value_4);
3987: fnd_file.put_line (FND_FILE.LOG, x_char);
3988: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3989: x_char := 'x_value_5 = ' || to_char(x_value_5);
3990: fnd_file.put_line (FND_FILE.LOG, x_char);
3991: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3992: END IF;

Line 3991: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

3987: fnd_file.put_line (FND_FILE.LOG, x_char);
3988: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3989: x_char := 'x_value_5 = ' || to_char(x_value_5);
3990: fnd_file.put_line (FND_FILE.LOG, x_char);
3991: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
3992: END IF;
3993:
3994: ----------------------------------------------------------------------------------
3995: -- LER, 18-Jun-99 New code to calculate factors_11/12 used in --

Line 4022: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4018:
4019: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4020: x_char := 'x_factor_11 = ' || to_char(x_factor_11);
4021: fnd_file.put_line (FND_FILE.LOG, x_char);
4022: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4023: x_char := 'x_factor_12 = ' || to_char(x_factor_12);
4024: fnd_file.put_line (FND_FILE.LOG, x_char);
4025: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4026: END IF;

Line 4025: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4021: fnd_file.put_line (FND_FILE.LOG, x_char);
4022: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4023: x_char := 'x_factor_12 = ' || to_char(x_factor_12);
4024: fnd_file.put_line (FND_FILE.LOG, x_char);
4025: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4026: END IF;
4027: END IF;
4028: END IF;
4029:

Line 4049: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4045:
4046: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4047: x_char := 'Adjustment for Line = ' || to_char(ra.distribution_id) || ' ' || ra.adjustment_type;
4048: fnd_file.put_line (FND_FILE.LOG, x_char);
4049: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4050: END IF;
4051:
4052: IF (ra.distribution_id <> x_distribution_id) THEN
4053:

Line 4064: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4060:
4061: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4062: x_char := 'IANBV = ' || to_char(x_adjustment_amount);
4063: fnd_file.put_line (FND_FILE.LOG, x_char);
4064: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4065: END IF;
4066:
4067: insert_adjustment (tr.transaction_header_id,
4068: x_global_source,

Line 4176: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4172:
4173: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4174: x_char := 'COST = ' || to_char(x_adjustment_amount);
4175: fnd_file.put_line (FND_FILE.LOG, x_char);
4176: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4177: END IF;
4178:
4179: change_account (x_chart_of_accounts_id,
4180: x_apps_short_name,

Line 4304: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4300:
4301: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4302: x_char := ra.adjustment_type;
4303: fnd_file.put_line (FND_FILE.LOG, x_char);
4304: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4305: END IF;
4306:
4307: IF (x_gain_loss_changed = TRUE) THEN
4308:

Line 4408: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4404:
4405: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4406: x_char := 'TA adjustment line = ' || to_char(x_ta_line_amount);
4407: fnd_file.put_line (FND_FILE.LOG, x_char);
4408: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4409: END IF;
4410:
4411: IF (ra.debit_credit_flag = 'DR') THEN
4412: x_debit_credit_flag := 'CR';

Line 4585: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4581:
4582: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4583: x_char := 'Update Deprn_to_cost = ' || to_char(x_deprn_to_cost);
4584: fnd_file.put_line (FND_FILE.LOG, x_char);
4585: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4586: END IF;
4587:
4588: UPDATE fa_books
4589: SET global_attribute7 = fnd_number.number_to_canonical(x_deprn_to_cost)

Line 4623: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4619:
4620: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4621: x_char := 'Transaction Header Id In = ' || to_char(ad.transaction_header_id_in);
4622: fnd_file.put_line (FND_FILE.LOG, x_char);
4623: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4624: END IF;
4625:
4626: -----------------------------------------------------------------------------
4627: -- Asset category parameters --

Line 4646: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4642:
4643: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4644: x_char := 'Deprn_to_Cost Inicial = ' || to_char(x_deprn_to_cost);
4645: fnd_file.put_line (FND_FILE.LOG, x_char);
4646: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4647: END IF;
4648:
4649: -----------------------------------------------------------------------------
4650: -- Get distribution lines depreciated for the asset --

Line 4668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4664:
4665: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4666: x_char := 'adj_deprn_amount = ' || to_char(ld.adj_deprn_amount);
4667: fnd_file.put_line (FND_FILE.LOG, x_char);
4668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4669: x_char := 'adj_deprn_adjust_amount = ' || to_char(ld.adj_deprn_adjustment_amount);
4670: fnd_file.put_line (FND_FILE.LOG, x_char);
4671: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4672: x_char := 'corp_deprn_amount = ' || to_char(ld.corp_deprn_amount);

Line 4671: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4667: fnd_file.put_line (FND_FILE.LOG, x_char);
4668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4669: x_char := 'adj_deprn_adjust_amount = ' || to_char(ld.adj_deprn_adjustment_amount);
4670: fnd_file.put_line (FND_FILE.LOG, x_char);
4671: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4672: x_char := 'corp_deprn_amount = ' || to_char(ld.corp_deprn_amount);
4673: fnd_file.put_line (FND_FILE.LOG, x_char);
4674: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4675: x_char := 'corp_deprn_adjust_amount = ' || to_char(ld.corp_deprn_adjustment_amount);

Line 4674: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4670: fnd_file.put_line (FND_FILE.LOG, x_char);
4671: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4672: x_char := 'corp_deprn_amount = ' || to_char(ld.corp_deprn_amount);
4673: fnd_file.put_line (FND_FILE.LOG, x_char);
4674: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4675: x_char := 'corp_deprn_adjust_amount = ' || to_char(ld.corp_deprn_adjustment_amount);
4676: fnd_file.put_line (FND_FILE.LOG, x_char);
4677: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4678: END IF;

Line 4677: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4673: fnd_file.put_line (FND_FILE.LOG, x_char);
4674: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4675: x_char := 'corp_deprn_adjust_amount = ' || to_char(ld.corp_deprn_adjustment_amount);
4676: fnd_file.put_line (FND_FILE.LOG, x_char);
4677: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4678: END IF;
4679:
4680: x_adjustment_amount := round (x_adjustment_amount, x_precision);
4681: x_deprn_to_cost := x_deprn_to_cost + x_adjustment_amount;

Line 4686: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4682:
4683: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4684: x_char := 'x_adjustment_amount = ' || to_char(x_adjustment_amount);
4685: fnd_file.put_line (FND_FILE.LOG, x_char);
4686: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4687: x_char := 'x_deprn_to_cost = ' || to_char(x_deprn_to_cost);
4688: fnd_file.put_line (FND_FILE.LOG, x_char);
4689: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4690: END IF;

Line 4689: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4685: fnd_file.put_line (FND_FILE.LOG, x_char);
4686: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4687: x_char := 'x_deprn_to_cost = ' || to_char(x_deprn_to_cost);
4688: fnd_file.put_line (FND_FILE.LOG, x_char);
4689: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4690: END IF;
4691:
4692: insert_adjustment (NULL,
4693: x_global_source,

Line 4761: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);

4757:
4758: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4759: x_char := 'Update Deprn_to_cost = ' || to_char(x_deprn_to_cost);
4760: fnd_file.put_line (FND_FILE.LOG, x_char);
4761: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, x_char);
4762: END IF;
4763:
4764: UPDATE fa_books
4765: SET global_attribute7 = fnd_number.number_to_canonical(x_deprn_to_cost)

Line 4790: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');

4786: COMMIT WORK;
4787: END IF;
4788:
4789: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4790: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name||'.END',G_PKG_NAME||': '||l_api_name||'(-)');
4791: END IF;
4792:
4793: EXCEPTION
4794: