[Home] [Help]
1: PACKAGE BODY xla_balances_pkg AS
2: /* $Header: xlabacom.pkb 120.71.12020000.5 2013/01/17 18:43:53 vdamerla ship $ */
3: /*======================================================================+
4: | Copyright (c) 1995-2002 Oracle Corporation |
5: | Redwood Shores, CA, USA |
5: | Redwood Shores, CA, USA |
6: | All rights reserved. |
7: +=======================================================================+
8: | PACKAGE NAME |
9: | xla_balances_pkg |
10: | |
11: | DESCRIPTION |
12: | XLA Balances Package |
13: | |
190: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
191: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
192:
193: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
194: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_balances_pkg';
195:
196: g_log_level NUMBER;
197: g_log_enabled BOOLEAN;
198:
214: WHEN xla_exceptions_pkg.application_exception THEN
215: RAISE;
216: WHEN OTHERS THEN
217: xla_exceptions_pkg.raise_message
218: (p_location => 'xla_balances_pkg.trace');
219: END trace;
220:
221:
222: FUNCTION get_account_segment_column
281: xla_exceptions_pkg.raise_message
282: (p_appli_s_name => 'XLA'
283: ,p_msg_name => 'XLA_COMMON_ERROR'
284: ,p_token_1 => 'LOCATION'
285: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
286: ,p_token_2 => 'ERROR'
287: ,p_value_2 => 'EXCEPTION: Unable to retrieve segment information for chart of accounts ' ||
288: p_chart_of_accounts_id);
289: END IF;
296: RAISE;
297: WHEN OTHERS
298: THEN
299: xla_exceptions_pkg.raise_message
300: (p_location => 'xla_balances_pkg.get_account_segment_column');
301: END get_account_segment_column;
302:
303:
304: FUNCTION move_balances_forward_COMMIT
435: xla_exceptions_pkg.raise_message
436: (p_appli_s_name => 'XLA'
437: ,p_msg_name => 'XLA_COMMON_ERROR'
438: ,p_token_1 => 'LOCATION'
439: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
440: ,p_token_2 => 'ERROR'
441: ,p_value_2 => 'EXCEPTION:'
442: ||'p_balance_status_code_selected and p_balance_status_code_not_sel '
443: || 'cannot be both NULL');
457: xla_exceptions_pkg.raise_message
458: (p_appli_s_name => 'XLA'
459: ,p_msg_name => 'XLA_COMMON_ERROR'
460: ,p_token_1 => 'LOCATION'
461: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
462: ,p_token_2 => 'ERROR'
463: ,p_value_2 => 'EXCEPTION: ' ||
464: 'p_source_effective_period_num cannot be NULL');
465: END IF;
1047: RAISE;
1048: WHEN OTHERS
1049: THEN
1050: xla_exceptions_pkg.raise_message
1051: (p_location => 'xla_balances_pkg.move_balances_forward_COMMIT');
1052: END move_balances_forward_COMMIT;
1053:
1054:
1055: FUNCTION check_create_period_balances
1201: WHEN xla_exceptions_pkg.application_exception THEN
1202: RAISE;
1203: WHEN OTHERS THEN
1204: xla_exceptions_pkg.raise_message
1205: (p_location => 'xla_balances_pkg.check_create_period_balances');
1206: END check_create_period_balances;
1207:
1208:
1209: FUNCTION AUT_check_create_period_bals
1284: WHEN xla_exceptions_pkg.application_exception THEN
1285: RAISE;
1286: WHEN OTHERS THEN
1287: xla_exceptions_pkg.raise_message
1288: (p_location => 'xla_balances_pkg.AUT_check_create_period_bals');
1289: END AUT_check_create_period_bals;
1290:
1291: FUNCTION lock_create_balance_statuses
1292:
1530: xla_exceptions_pkg.raise_message
1531: (p_appli_s_name => 'XLA'
1532: ,p_msg_name => 'XLA_COMMON_ERROR'
1533: ,p_token_1 => 'LOCATION'
1534: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
1535: ,p_token_2 => 'ERROR'
1536: ,p_value_2 => 'EXCEPTION: ' ||
1537: 'Unable to retrieve segment names for ledger_id '
1538: || i.ledger_id);
1679: WHEN xla_exceptions_pkg.application_exception THEN
1680: RAISE;
1681: WHEN OTHERS THEN
1682: xla_exceptions_pkg.raise_message
1683: (p_location => 'xla_balances_pkg.lock_create_balance_statuses');
1684: END lock_create_balance_statuses;
1685:
1686: FUNCTION calculate_control_balances
1687: ( p_application_id IN INTEGER
2422: WHEN xla_exceptions_pkg.application_exception THEN
2423: RAISE;
2424: WHEN OTHERS THEN
2425: xla_exceptions_pkg.raise_message
2426: (p_location => 'xla_balances_pkg.calculate_control_balances');
2427: END calculate_control_balances;
2428:
2429: FUNCTION calculate_analytical_balances
2430: ( p_application_id IN INTEGER
3157: WHEN xla_exceptions_pkg.application_exception THEN
3158: RAISE;
3159: WHEN OTHERS THEN
3160: xla_exceptions_pkg.raise_message
3161: (p_location => 'xla_balances_pkg.calculate_analytical_balances');
3162: END calculate_analytical_balances;
3163:
3164:
3165:
3298: xla_exceptions_pkg.raise_message
3299: (p_appli_s_name => 'XLA'
3300: ,p_msg_name => 'XLA_COMMON_ERROR'
3301: ,p_token_1 => 'LOCATION'
3302: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
3303: ,p_token_2 => 'ERROR'
3304: ,p_value_2 => 'EXCEPTION: ' ||
3305: 'parameters cannot be NULL');
3306: END IF;
3321: xla_exceptions_pkg.raise_message
3322: (p_appli_s_name => 'XLA'
3323: ,p_msg_name => 'XLA_COMMON_ERROR'
3324: ,p_token_1 => 'LOCATION'
3325: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
3326: ,p_token_2 => 'ERROR'
3327: ,p_value_2 => 'EXCEPTION: ' ||
3328: 'If p_balance_source_code is not ''A'' party parameters cannot be NULL');
3329: END IF;
3349: xla_exceptions_pkg.raise_message
3350: (p_appli_s_name => 'XLA'
3351: ,p_msg_name => 'XLA_COMMON_ERROR'
3352: ,p_token_1 => 'LOCATION'
3353: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
3354: ,p_token_2 => 'ERROR'
3355: ,p_value_2 => 'EXCEPTION: ' ||
3356: 'If p_balance_source_code is not ''C'' analytical detail parameter cannot be NULL');
3357: END IF;
3737: RAISE;
3738: WHEN OTHERS
3739: THEN
3740: xla_exceptions_pkg.raise_message
3741: (p_location => 'xla_balances_pkg.move_identified_bals_forward');
3742: END move_identified_bals_forward;
3743:
3744: PROCEDURE build_line_selection_dyn_stmts
3745: ( p_application_id IN INTEGER
4179: xla_exceptions_pkg.raise_message
4180: (p_appli_s_name => 'XLA'
4181: ,p_msg_name => 'XLA_COMMON_ERROR'
4182: ,p_token_1 => 'LOCATION'
4183: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
4184: ,p_token_2 => 'ERROR'
4185: ,p_value_2 => 'EXCEPTION: ' ||
4186: 'Invalid value for p_commit_flag: ' || p_commit_flag);
4187: END IF;
4261: RAISE;
4262: WHEN OTHERS
4263: THEN
4264: xla_exceptions_pkg.raise_message
4265: (p_location => 'xla_balances_pkg.build_line_selection_dyn_stmts');
4266: END build_line_selection_dyn_stmts;
4267:
4268:
4269: FUNCTION load_balance_temp_tables
5000: RAISE;
5001: WHEN OTHERS
5002: THEN
5003: xla_exceptions_pkg.raise_message
5004: (p_location => 'xla_balances_pkg.load_balance_temp_tables');
5005: END load_balance_temp_tables;
5006:
5007:
5008:
5293: xla_exceptions_pkg.raise_message
5294: (p_appli_s_name => 'XLA'
5295: ,p_msg_name => 'XLA_COMMON_ERROR'
5296: ,p_token_1 => 'LOCATION'
5297: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
5298: ,p_token_2 => 'ERROR'
5299: ,p_value_2 => 'EXCEPTION: ' ||'Invalid value for p_operation_code: '
5300: || p_operation_code);
5301: END IF; --p_operation_code
5325: RAISE;
5326: WHEN OTHERS
5327: THEN
5328: xla_exceptions_pkg.raise_message
5329: (p_location => 'xla_balances_pkg.load_alyt_secondary_temp_tabs');
5330: END load_alyt_secondary_temp_tabs;
5331:
5332:
5333:
5558: xla_exceptions_pkg.raise_message
5559: (p_appli_s_name => 'XLA'
5560: ,p_msg_name => 'XLA_COMMON_ERROR'
5561: ,p_token_1 => 'LOCATION'
5562: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
5563: ,p_token_2 => 'ERROR'
5564: ,p_value_2 => 'EXCEPTION: ' ||
5565: 'Invalid value for p_operation_code: ' || p_operation_code);
5566:
5590: RAISE;
5591: WHEN OTHERS
5592: THEN
5593: xla_exceptions_pkg.raise_message
5594: (p_location => 'xla_balances_pkg.load_ctrl_secondary_temp_tabs');
5595: END load_ctrl_secondary_temp_tabs;
5596:
5597:
5598: PROCEDURE insert_ledger_period_statuses
5828: xla_exceptions_pkg.raise_message
5829: (p_appli_s_name => 'XLA'
5830: ,p_msg_name => 'XLA_COMMON_ERROR'
5831: ,p_token_1 => 'LOCATION'
5832: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
5833: ,p_token_2 => 'ERROR'
5834: ,p_value_2 => 'EXCEPTION:' ||
5835: 'Unsupported combinations of parameters');
5836: END IF;
5857: RAISE;
5858: WHEN OTHERS
5859: THEN
5860: xla_exceptions_pkg.raise_message
5861: (p_location => 'xla_balances_pkg.insert_ledger_period_statuses');
5862: END insert_ledger_period_statuses;
5863:
5864:
5865: PROCEDURE cache_ledger_period_statuses
6156: RAISE;
6157: WHEN OTHERS
6158: THEN
6159: xla_exceptions_pkg.raise_message
6160: (p_location => 'xla_balances_pkg.cache_ledger_period_statuses');
6161: END cache_ledger_period_statuses;
6162:
6163:
6164:
6346: xla_exceptions_pkg.raise_message
6347: (p_appli_s_name => 'XLA'
6348: ,p_msg_name => 'XLA_COMMON_ERROR'
6349: ,p_token_1 => 'LOCATION'
6350: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
6351: ,p_token_2 => 'ERROR'
6352: ,p_value_2 => 'EXCEPTION:' ||
6353: 'Unsupported p_update_mode: ' || p_update_mode || ' with p_commit_flag: ' ||
6354: p_commit_flag);
6380: xla_exceptions_pkg.raise_message
6381: (p_appli_s_name => 'XLA'
6382: ,p_msg_name => 'XLA_COMMON_ERROR'
6383: ,p_token_1 => 'LOCATION'
6384: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
6385: ,p_token_2 => 'ERROR'
6386: ,p_value_2 => 'EXCEPTION:' ||
6387: 'Unkown p_update_mode value: ' || p_update_mode);
6388: END IF;
6401: xla_exceptions_pkg.raise_message
6402: (p_appli_s_name => 'XLA'
6403: ,p_msg_name => 'XLA_COMMON_ERROR'
6404: ,p_token_1 => 'LOCATION'
6405: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
6406: ,p_token_2 => 'ERROR'
6407: ,p_value_2 => 'EXCEPTION:' ||
6408: 'Unsupported p_balance_source_code value: ' || p_balance_source_code);
6409: END IF;
6704: xla_exceptions_pkg.raise_message
6705: (p_appli_s_name => 'XLA'
6706: ,p_msg_name => 'XLA_COMMON_ERROR'
6707: ,p_token_1 => 'LOCATION'
6708: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
6709: ,p_token_2 => 'ERROR'
6710: ,p_value_2 => 'EXCEPTION:' ||
6711: 'Unsupported p_update_mode value: ' || p_update_mode);
6712: END IF;
7017: xla_exceptions_pkg.raise_message
7018: (p_appli_s_name => 'XLA'
7019: ,p_msg_name => 'XLA_COMMON_ERROR'
7020: ,p_token_1 => 'LOCATION'
7021: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7022: ,p_token_2 => 'ERROR'
7023: ,p_value_2 => 'EXCEPTION:' ||
7024: 'Unkown p_commit_flag value: ' || p_commit_flag);
7025: END IF;
7060: WHEN xla_exceptions_pkg.application_exception THEN
7061: RAISE;
7062: WHEN OTHERS THEN
7063: xla_exceptions_pkg.raise_message
7064: (p_location => 'xla_balances_pkg.calculate_balances');
7065:
7066: END calculate_balances;
7067:
7068: FUNCTION event_set_update
7100: xla_exceptions_pkg.raise_message
7101: (p_appli_s_name => 'XLA'
7102: ,p_msg_name => 'XLA_COMMON_ERROR'
7103: ,p_token_1 => 'LOCATION'
7104: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7105: ,p_token_2 => 'ERROR'
7106: ,p_value_2 => 'EXCEPTION:' ||
7107: 'Unsupported value for p_update_mode: ' || p_update_mode);
7108: END IF;
7137: WHEN xla_exceptions_pkg.application_exception THEN
7138: RAISE;
7139: WHEN OTHERS THEN
7140: xla_exceptions_pkg.raise_message
7141: (p_location => 'xla_balances_pkg.event_set_update');
7142: END event_set_update;
7143:
7144:
7145:
7188: xla_exceptions_pkg.raise_message
7189: (p_appli_s_name => 'XLA'
7190: ,p_msg_name => 'XLA_COMMON_ERROR'
7191: ,p_token_1 => 'LOCATION'
7192: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7193: ,p_token_2 => 'ERROR'
7194: ,p_value_2 => 'EXCEPTION:' ||
7195: 'p_application_id cannot be NULL');
7196: END IF;
7208: xla_exceptions_pkg.raise_message
7209: (p_appli_s_name => 'XLA'
7210: ,p_msg_name => 'XLA_COMMON_ERROR'
7211: ,p_token_1 => 'LOCATION'
7212: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7213: ,p_token_2 => 'ERROR'
7214: ,p_value_2 => 'EXCEPTION:' ||
7215: 'p_ae_header_id cannot be NULL');
7216: END IF;
7228: xla_exceptions_pkg.raise_message
7229: (p_appli_s_name => 'XLA'
7230: ,p_msg_name => 'XLA_COMMON_ERROR'
7231: ,p_token_1 => 'LOCATION'
7232: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7233: ,p_token_2 => 'ERROR'
7234: ,p_value_2 => 'EXCEPTION:' ||
7235: 'p_update_mode cannot be NULL');
7236: ELSIF p_update_mode NOT IN ('A', 'D', 'F')
7246: xla_exceptions_pkg.raise_message
7247: (p_appli_s_name => 'XLA'
7248: ,p_msg_name => 'XLA_COMMON_ERROR'
7249: ,p_token_1 => 'LOCATION'
7250: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7251: ,p_token_2 => 'ERROR'
7252: ,p_value_2 => 'EXCEPTION:' ||
7253: 'Unsupported value for p_update_mode: ' || p_update_mode);
7254: END IF;
7268: xla_exceptions_pkg.raise_message
7269: (p_appli_s_name => 'XLA'
7270: , p_msg_name => 'XLA_COMMON_ERROR'
7271: , p_token_1 => 'LOCATION'
7272: , p_value_1 => 'xla_balances_pkg.MASSIVE_UPDATE'
7273: , p_token_2 => 'ERROR'
7274: , p_value_2 => 'EXCEPTION:'
7275: || 'XLA_BAL_CONCURRENCY_CONTROL COULD NOT BE LOCKED. RESOURCE BUSY'
7276: );
7312: DELETE xla_bal_concurrency_control where request_id=-1*p_ae_header_id;
7313: RAISE;
7314: WHEN OTHERS THEN
7315: xla_exceptions_pkg.raise_message
7316: (p_location => 'xla_balances_pkg.single_update');
7317: DELETE xla_bal_concurrency_control where request_id=-1*p_ae_header_id;
7318: RETURN TRUE; -- Bug 14115273
7319: END single_update;
7320:
7402: xla_exceptions_pkg.raise_message
7403: (p_appli_s_name => 'XLA'
7404: , p_msg_name => 'XLA_COMMON_ERROR'
7405: , p_token_1 => 'LOCATION'
7406: , p_value_1 => 'xla_balances_pkg.massive_update_srs'
7407: , p_token_2 => 'ERROR'
7408: , p_value_2 => 'EXCEPTION:'
7409: || 'XLA_BAL_CONCURRENCY_CONTROL COULD NOT BE LOCKED. RESOURCE BUSY'
7410: );
7492: xla_exceptions_pkg.raise_message
7493: (p_appli_s_name => 'XLA'
7494: ,p_msg_name => 'XLA_COMMON_ERROR'
7495: ,p_token_1 => 'LOCATION'
7496: ,p_value_1 => 'xla_balances_pkg.pre_accounting'
7497: ,p_token_2 => 'ERROR'
7498: ,p_value_2 => 'EXCEPTION:' ||
7499: 'p_application_id cannot be NULL'
7500: );
7523: WHEN xla_exceptions_pkg.application_exception THEN
7524: RAISE;
7525: WHEN OTHERS THEN
7526: xla_exceptions_pkg.raise_message
7527: (p_location => 'xla_balances_pkg.massive_update_for_events');
7528: return TRUE; -- Bug 14115273
7529: END massive_update_for_events;
7530:
7531: FUNCTION massive_update
7583: xla_exceptions_pkg.raise_message
7584: (p_appli_s_name => 'XLA'
7585: ,p_msg_name => 'XLA_COMMON_ERROR'
7586: ,p_token_1 => 'LOCATION'
7587: ,p_value_1 => 'xla_balances_pkg.massive_update'
7588: ,p_token_2 => 'ERROR'
7589: ,p_value_2 => 'EXCEPTION: p_application_id cannot be NULL');
7590:
7591: END IF;
7607: xla_exceptions_pkg.raise_message
7608: (p_appli_s_name => 'XLA'
7609: ,p_msg_name => 'XLA_COMMON_ERROR'
7610: ,p_token_1 => 'LOCATION'
7611: ,p_value_1 => 'xla_balances_pkg.massive_update'
7612: ,p_token_2 => 'ERROR'
7613: ,p_value_2 => 'EXCEPTION: IF p_entity_id is not NULL, p_ledger_id must be NULL');
7614:
7615: ELSIF p_event_id IS NOT NULL
7625: xla_exceptions_pkg.raise_message
7626: (p_appli_s_name => 'XLA'
7627: ,p_msg_name => 'XLA_COMMON_ERROR'
7628: ,p_token_1 => 'LOCATION'
7629: ,p_value_1 => 'xla_balances_pkg.massive_update'
7630: ,p_token_2 => 'ERROR'
7631: ,p_value_2 => 'EXCEPTION: IF p_entity_id is not NULL, p_event_id must be NULL');
7632: ELSIF p_request_id IS NOT NULL
7633: THEN
7642: xla_exceptions_pkg.raise_message
7643: (p_appli_s_name => 'XLA'
7644: ,p_msg_name => 'XLA_COMMON_ERROR'
7645: ,p_token_1 => 'LOCATION'
7646: ,p_value_1 => 'xla_balances_pkg.massive_update'
7647: ,p_token_2 => 'ERROR'
7648: ,p_value_2 => 'EXCEPTION: IF p_entity_id is not NULL, p_request_id must be NULL');
7649:
7650: ELSIF p_accounting_batch_id IS NOT NULL
7660: xla_exceptions_pkg.raise_message
7661: (p_appli_s_name => 'XLA'
7662: ,p_msg_name => 'XLA_COMMON_ERROR'
7663: ,p_token_1 => 'LOCATION'
7664: ,p_value_1 => 'xla_balances_pkg.massive_update'
7665: ,p_token_2 => 'ERROR'
7666: ,p_value_2 => 'EXCEPTION: IF p_entity_id is not NULL, p_accounting_batch_id must be NULL');
7667:
7668: END IF;
7685: xla_exceptions_pkg.raise_message
7686: (p_appli_s_name => 'XLA'
7687: ,p_msg_name => 'XLA_COMMON_ERROR'
7688: ,p_token_1 => 'LOCATION'
7689: ,p_value_1 => 'xla_balances_pkg.massive_update'
7690: ,p_token_2 => 'ERROR'
7691: ,p_value_2 => 'EXCEPTION: IF p_request_id is not NULL, p_ledger_id must be NULL');
7692:
7693: ELSIF p_entity_id IS NOT NULL
7703: xla_exceptions_pkg.raise_message
7704: (p_appli_s_name => 'XLA'
7705: ,p_msg_name => 'XLA_COMMON_ERROR'
7706: ,p_token_1 => 'LOCATION'
7707: ,p_value_1 => 'xla_balances_pkg.massive_update'
7708: ,p_token_2 => 'ERROR'
7709: ,p_value_2 => 'EXCEPTION: IF p_request_id is not NULL, p_entity_id must be NULL');
7710:
7711: ELSIF p_event_id IS NOT NULL
7721: xla_exceptions_pkg.raise_message
7722: (p_appli_s_name => 'XLA'
7723: ,p_msg_name => 'XLA_COMMON_ERROR'
7724: ,p_token_1 => 'LOCATION'
7725: ,p_value_1 => 'xla_balances_pkg.massive_update'
7726: ,p_token_2 => 'ERROR'
7727: ,p_value_2 => 'EXCEPTION: IF p_request_id is not NULL, p_event_id must be NULL');
7728:
7729: ELSIF p_accounting_batch_id IS NOT NULL
7739: xla_exceptions_pkg.raise_message
7740: (p_appli_s_name => 'XLA'
7741: ,p_msg_name => 'XLA_COMMON_ERROR'
7742: ,p_token_1 => 'LOCATION'
7743: ,p_value_1 => 'xla_balances_pkg.massive_update'
7744: ,p_token_2 => 'ERROR'
7745: ,p_value_2 => 'EXCEPTION: IF p_request_id is not NULL, p_accounting_batch_id must be NULL');
7746: END IF;
7747: END IF;
7760: xla_exceptions_pkg.raise_message
7761: (p_appli_s_name => 'XLA'
7762: ,p_msg_name => 'XLA_COMMON_ERROR'
7763: ,p_token_1 => 'LOCATION'
7764: ,p_value_1 => 'xla_balances_pkg.massive_update'
7765: ,p_token_2 => 'ERROR'
7766: ,p_value_2 => 'EXCEPTION: Invalid p_update_mode parameter: '|| p_update_mode);
7767: END IF;
7768:
7780: xla_exceptions_pkg.raise_message
7781: (p_appli_s_name => 'XLA'
7782: ,p_msg_name => 'XLA_COMMON_ERROR'
7783: ,p_token_1 => 'LOCATION'
7784: ,p_value_1 => 'xla_balances_pkg.massive_update'
7785: ,p_token_2 => 'ERROR'
7786: ,p_value_2 => 'EXCEPTION: Invalid p_execution_mode parameter: '|| p_execution_mode);
7787:
7788: END IF;
7804: xla_exceptions_pkg.raise_message
7805: (p_appli_s_name => 'XLA'
7806: ,p_msg_name => 'XLA_COMMON_ERROR'
7807: ,p_token_1 => 'LOCATION'
7808: ,p_value_1 => 'xla_balances_pkg.massive_update'
7809: ,p_token_2 => 'ERROR'
7810: ,p_value_2 => 'EXCEPTION: When p_execution_mode is C, p_event_id, must be NULL');
7811:
7812: ELSIF p_request_id IS NOT NULL
7822: xla_exceptions_pkg.raise_message
7823: (p_appli_s_name => 'XLA'
7824: ,p_msg_name => 'XLA_COMMON_ERROR'
7825: ,p_token_1 => 'LOCATION'
7826: ,p_value_1 => 'xla_balances_pkg.massive_update'
7827: ,p_token_2 => 'ERROR'
7828: ,p_value_2 => 'EXCEPTION: When p_execution_mode is C, p_request_id, must be NULL');
7829:
7830: ELSIF p_entity_id IS NOT NULL
7840: xla_exceptions_pkg.raise_message
7841: (p_appli_s_name => 'XLA'
7842: ,p_msg_name => 'XLA_COMMON_ERROR'
7843: ,p_token_1 => 'LOCATION'
7844: ,p_value_1 => 'xla_balances_pkg.massive_update'
7845: ,p_token_2 => 'ERROR'
7846: ,p_value_2 => 'EXCEPTION: When p_execution_mode is C, p_entity_id, must be NULL');
7847:
7848: END IF;
7899: xla_exceptions_pkg.raise_message
7900: (p_appli_s_name => 'XLA'
7901: , p_msg_name => 'XLA_COMMON_ERROR'
7902: , p_token_1 => 'LOCATION'
7903: , p_value_1 => 'xla_balances_pkg.MASSIVE_UPDATE'
7904: , p_token_2 => 'ERROR'
7905: , p_value_2 => 'EXCEPTION:'
7906: || 'COULD NOT insert record into XLA_BAL_CONCURRENCY_CONTROL'
7907: );
7950: xla_exceptions_pkg.raise_message
7951: (p_appli_s_name => 'XLA'
7952: ,p_msg_name => 'XLA_COMMON_ERROR'
7953: ,p_token_1 => 'LOCATION'
7954: ,p_value_1 => 'xla_balances_pkg.massive_update'
7955: ,p_token_2 => 'ERROR'
7956: ,p_value_2 => 'EXCEPTION: Invalid value for parameter p_execution_mode: ' || p_execution_mode);
7957:
7958: END IF;
8007: DELETE xla_bal_concurrency_control WHERE request_id = g_req_id; --bug16073423
8008: end if;
8009:
8010: xla_exceptions_pkg.raise_message
8011: (p_location => 'xla_balances_pkg.massive_update');
8012: END massive_update;
8013:
8014:
8015: FUNCTION recreation_common
8609: WHEN xla_exceptions_pkg.application_exception THEN
8610: RAISE;
8611: WHEN OTHERS THEN
8612: xla_exceptions_pkg.raise_message
8613: (p_location => 'xla_balances_pkg.recreation_common');
8614:
8615: END recreation_common;
8616:
8617:
8958: WHEN xla_exceptions_pkg.application_exception THEN
8959: RAISE;
8960: WHEN OTHERS THEN
8961: xla_exceptions_pkg.raise_message
8962: (p_location => 'xla_balances_pkg.recreation_detailed');
8963:
8964: END recreation_detailed;
8965:
8966:
9177: WHEN xla_exceptions_pkg.application_exception THEN
9178: RAISE;
9179: WHEN OTHERS THEN
9180: xla_exceptions_pkg.raise_message
9181: (p_location => 'xla_balances_pkg.recreation_massive');
9182:
9183: END recreation_massive;
9184:
9185:
9386: ,p_level => C_LEVEL_EXCEPTION
9387: );
9388: END IF;
9389: xla_exceptions_pkg.raise_message
9390: (p_location => 'xla_balances_pkg.recreate');
9391: END IF;
9392:
9393: l_return_value := TRUE;
9394:
9405: WHEN xla_exceptions_pkg.application_exception THEN
9406: RAISE;
9407: WHEN OTHERS THEN
9408: xla_exceptions_pkg.raise_message
9409: (p_location => 'xla_balances_pkg.recreate');
9410:
9411: END recreate;
9412:
9413:
9497: ,p_level => C_LEVEL_EXCEPTION
9498: );
9499: END IF;
9500: xla_exceptions_pkg.raise_message
9501: (p_location => 'xla_balances_pkg.synchronize');
9502: END IF;
9503:
9504: LOOP
9505: EXECUTE IMMEDIATE
9573: ,p_level => C_LEVEL_EXCEPTION
9574: );
9575: END IF;
9576: xla_exceptions_pkg.raise_message
9577: (p_location => 'xla_balances_pkg.synchronize');
9578: END IF;
9579:
9580: IF NVL(l_min_reference3,'N') = 'N'
9581: OR
9957: WHEN xla_exceptions_pkg.application_exception THEN
9958: RAISE;
9959: WHEN OTHERS THEN
9960: xla_exceptions_pkg.raise_message
9961: (p_location => 'xla_balances_pkg.synchronize');
9962: END synchronize;
9963:
9964: PROCEDURE open_period_srs
9965: ( p_errbuf OUT NOCOPY VARCHAR2
10103: ,p_level => C_LEVEL_EXCEPTION
10104: );
10105: END IF;
10106: xla_exceptions_pkg.raise_message
10107: (p_location => 'xla_balances_pkg.open_period');
10108: END IF;
10109:
10110: l_return_value := TRUE;
10111:
10121: WHEN xla_exceptions_pkg.application_exception THEN
10122: RAISE;
10123: WHEN OTHERS THEN
10124: xla_exceptions_pkg.raise_message
10125: (p_location => 'xla_balances_pkg.open_period');
10126: END open_period;
10127:
10128:
10129: PROCEDURE handle_fake_journal_entry
10295: ,p_level => C_LEVEL_EXCEPTION
10296: );
10297: END IF;
10298: xla_exceptions_pkg.raise_message
10299: (p_location => 'xla_balances_pkg.handle_fake_journal_entry');
10300: END IF;
10301:
10302: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
10303: trace
10310: WHEN xla_exceptions_pkg.application_exception THEN
10311: RAISE;
10312: WHEN OTHERS THEN
10313: xla_exceptions_pkg.raise_message
10314: (p_location => 'xla_balances_pkg.handle_fake_journal_entry');
10315: END handle_fake_journal_entry;
10316:
10317:
10318: FUNCTION initialize
10447: ,p_level => C_LEVEL_EXCEPTION
10448: );
10449: END IF;
10450: xla_exceptions_pkg.raise_message
10451: (p_location => 'xla_balances_pkg.initialize');
10452: END IF;
10453:
10454: IF p_new_beginning_balance_dr IS NULL
10455: AND p_new_beginning_balance_cr IS NULL
10462: ,p_level => C_LEVEL_EXCEPTION
10463: );
10464: END IF;
10465: xla_exceptions_pkg.raise_message
10466: (p_location => 'xla_balances_pkg.initialize');
10467: END IF;
10468:
10469: IF xla_control_accounts_pkg.C_IS_CONTROL_ACCOUNT
10470: = xla_control_accounts_pkg.is_control_account
10512: ,p_level => C_LEVEL_EXCEPTION
10513: );
10514: END IF;
10515: xla_exceptions_pkg.raise_message
10516: (p_location => 'xla_balances_pkg.initialize');
10517: END IF;
10518:
10519: BEGIN
10520: SELECT xba.period_name
10562: ,p_level => C_LEVEL_EXCEPTION
10563: );
10564: END IF;
10565: xla_exceptions_pkg.raise_message
10566: (p_location => 'xla_balances_pkg.initialize');
10567: END IF;
10568:
10569: UPDATE xla_control_balances xba
10570: SET xba.initial_balance_flag = 'N'
10644: ,p_level => C_LEVEL_EXCEPTION
10645: );
10646: END IF;
10647: xla_exceptions_pkg.raise_message
10648: (p_location => 'xla_balances_pkg.initialize');
10649: END IF;
10650:
10651: --Delete fake entries
10652: handle_fake_journal_entry
10692: WHEN xla_exceptions_pkg.application_exception THEN
10693: RAISE;
10694: WHEN OTHERS THEN
10695: xla_exceptions_pkg.raise_message
10696: (p_location => 'xla_balances_pkg.initialize');
10697: END initialize;
10698:
10699: FUNCTION open_period_event ( p_subscription_guid IN raw
10700: ,p_event IN OUT NOCOPY WF_EVENT_T)
10783: g_prog_id := xla_environment_pkg.g_prog_id;
10784: g_req_id := NVL(xla_environment_pkg.g_req_id, -1);
10785:
10786: g_cached_single_period := FALSE;
10787: END xla_balances_pkg;