89: THEN
90: fnd_log.STRING (p_level, p_module, p_msg);
91: END IF;
92: EXCEPTION
93: WHEN xla_exceptions_pkg.application_exception
94: THEN
95: RAISE;
96: WHEN OTHERS
97: THEN
94: THEN
95: RAISE;
96: WHEN OTHERS
97: THEN
98: xla_exceptions_pkg.raise_message(p_location => 'xla_balances_calc_pkg.trace');
99: END TRACE;
100:
101: /*===============================================+
102: | |
447: END IF;
448:
449: RAISE;
450:
451: WHEN xla_exceptions_pkg.application_exception
452: THEN
453: RAISE;
454: WHEN OTHERS
455: THEN
452: THEN
453: RAISE;
454: WHEN OTHERS
455: THEN
456: xla_exceptions_pkg.raise_message
457: (p_location => 'xla_balances_calc_pkg.lock_bal_concurrency_control');
458: RAISE; -- Bug 13614923
459: END lock_bal_concurrency_control;
460:
1556: END IF;
1557:
1558: RETURN TRUE;
1559: EXCEPTION
1560: WHEN xla_exceptions_pkg.application_exception
1561: THEN
1562: ROLLBACK TO SAVEPOINT_BAL;
1563:
1564: WHEN OTHERS
1563:
1564: WHEN OTHERS
1565: THEN
1566: ROLLBACK TO SAVEPOINT_BAL;
1567: xla_exceptions_pkg.raise_message
1568: (p_location => 'xla_balances_calc_pkg.calculate_analytical_balances');
1569: --
1570: --
1571: END calculate_analytical_balances;
2529: END IF;
2530:
2531: RETURN TRUE;
2532: EXCEPTION
2533: WHEN xla_exceptions_pkg.application_exception
2534: THEN
2535: ROLLBACK TO SAVEPOINT_BAL;
2536:
2537: WHEN OTHERS
2536:
2537: WHEN OTHERS
2538: THEN
2539: ROLLBACK TO SAVEPOINT_BAL;
2540: xla_exceptions_pkg.raise_message
2541: (p_location => 'xla_balances_calc_pkg.calculate_control_balances');
2542: --
2543: --
2544: END calculate_control_balances;
2734: (fnd_file.LOG
2735: , 'Balances are not initialized for the latest open period.
2736: Before proceeding with balance calculation, run Open Period Balances Program for Ledger ID: '||p_ledger_id||' for the latest open period in General Ledger.'
2737: );
2738: xla_exceptions_pkg.raise_message
2739: (p_appli_s_name => 'XLA'
2740: , p_msg_name => 'XLA_COMMON_ERROR'
2741: , p_token_1 => 'LOCATION'
2742: , p_value_1 => 'xla_balances_calc_pkg.calculate_balances'
2758: , p_level => c_level_exception
2759: );
2760: END IF;
2761:
2762: xla_exceptions_pkg.raise_message
2763: (p_appli_s_name => 'XLA'
2764: , p_msg_name => 'XLA_COMMON_ERROR'
2765: , p_token_1 => 'LOCATION'
2766: , p_value_1 => 'xla_balances_calc_pkg.calculate_balances'
2787: , p_level => c_level_exception
2788: );
2789: END IF;
2790:
2791: xla_exceptions_pkg.raise_message
2792: (p_appli_s_name => 'XLA'
2793: , p_msg_name => 'XLA_COMMON_ERROR'
2794: , p_token_1 => 'LOCATION'
2795: , p_value_1 => 'xla_balances_calc_pkg.calculate_balances'
2859: END IF;
2860:
2861: RETURN l_return_value;
2862: EXCEPTION
2863: WHEN xla_exceptions_pkg.application_exception
2864: THEN
2865: ROLLBACK TO SAVEPOINT_BAL;
2866: RAISE;
2867: WHEN OTHERS
2866: RAISE;
2867: WHEN OTHERS
2868: THEN
2869: ROLLBACK TO SAVEPOINT_BAL;
2870: xla_exceptions_pkg.raise_message
2871: (p_location => 'xla_balances_calc_pkg.calculate_balances');
2872: RAISE;
2873: END calculate_balances;
2874:
3296: END IF;
3297:
3298: RETURN TRUE;
3299: EXCEPTION
3300: WHEN xla_exceptions_pkg.application_exception
3301: THEN
3302: RAISE;
3303: WHEN OTHERS
3304: THEN
3301: THEN
3302: RAISE;
3303: WHEN OTHERS
3304: THEN
3305: xla_exceptions_pkg.raise_message
3306: (p_location => 'xla_balances_calc_pkg.move_balances_forward');
3307: RETURN FALSE;
3308: END move_balances_forward;
3309:
3652: , p_execution_mode => NULL
3653: , p_concurrency_class => 'OPEN_PERIOD_BALANCE'
3654: )
3655: THEN
3656: xla_exceptions_pkg.raise_message
3657: (p_appli_s_name => 'XLA'
3658: , p_msg_name => 'XLA_COMMON_ERROR'
3659: , p_token_1 => 'LOCATION'
3660: , p_value_1 => 'xla_balances_calc_pkg.open_period_srs'
3725: --Added below rollback statement
3726: ROLLBACK TO SAVEPOINT_BAL; -- Bug13614923
3727: delete xla_bal_concurrency_control where request_id = g_req_id; -- Bug13614923
3728:
3729: WHEN xla_exceptions_pkg.application_exception
3730: THEN
3731: p_retcode := 2;
3732: p_errbuf := SQLERRM;
3733: --Added below rollback statement
3882: , p_level => c_level_exception
3883: );
3884: END IF;
3885:
3886: xla_exceptions_pkg.raise_message
3887: (p_appli_s_name => 'XLA'
3888: , p_msg_name => 'XLA_COMMON_ERROR'
3889: , p_token_1 => 'LOCATION'
3890: , p_value_1 => 'xla_balances_calc_pkg.massive_update_srs'
3905: , p_level => c_level_exception
3906: );
3907: END IF;
3908:
3909: xla_exceptions_pkg.raise_message
3910: (p_appli_s_name => 'XLA'
3911: , p_msg_name => 'XLA_COMMON_ERROR'
3912: , p_token_1 => 'LOCATION'
3913: , p_value_1 => 'xla_balances_calc_pkg.massive_update_srs'
3930: , p_execution_mode => l_execution_mode
3931: , p_concurrency_class => 'BALANCES_CALCULATION'
3932: )
3933: THEN
3934: xla_exceptions_pkg.raise_message
3935: (p_appli_s_name => 'XLA'
3936: , p_msg_name => 'XLA_COMMON_ERROR'
3937: , p_token_1 => 'LOCATION'
3938: , p_value_1 => 'xla_balances_calc_pkg.massive_update_srs'
4017: --Added below rollback statement
4018: ROLLBACK TO SAVEPOINT_BAL;
4019: DELETE xla_bal_concurrency_control WHERE request_id = g_req_id;
4020:
4021: WHEN xla_exceptions_pkg.application_exception
4022: THEN
4023: p_retcode := 2; --bug13614923
4024: --Bug 12575468
4025: --Added below rollback statement
4032: --Bug 12575468
4033: --Added below rollback statement
4034: ROLLBACK TO SAVEPOINT_BAL;
4035: DELETE xla_bal_concurrency_control WHERE request_id = g_req_id;
4036: xla_exceptions_pkg.raise_message
4037: (p_location => 'xla_balances_calc_pkg.massive_update_srs');
4038: END massive_update_srs;
4039:
4040: /*===============================================+
4208: , p_level => c_level_exception
4209: );
4210: END IF;
4211:
4212: xla_exceptions_pkg.raise_message
4213: (p_appli_s_name => 'XLA'
4214: , p_msg_name => 'XLA_COMMON_ERROR'
4215: , p_token_1 => 'LOCATION'
4216: , p_value_1 => 'xla_balances_calc_pkg.massive_update'
4269: , p_execution_mode => p_execution_mode
4270: , p_concurrency_class => 'BALANCES_CALCULATION'
4271: )
4272: THEN
4273: xla_exceptions_pkg.raise_message
4274: (p_appli_s_name => 'XLA'
4275: , p_msg_name => 'XLA_COMMON_ERROR'
4276: , p_token_1 => 'LOCATION'
4277: , p_value_1 => 'xla_balances_calc_pkg.MASSIVE_UPDATE'
4368: DELETE FROM xla_bal_concurrency_control where request_id=-1*p_entity_id;
4369: end if;
4370:
4371: RETURN TRUE; -- Bug 13614923
4372: WHEN xla_exceptions_pkg.application_exception
4373: THEN
4374: ROLLBACK TO SAVEPOINT_BAL;
4375: if p_entity_id is null then
4376: DELETE FROM xla_bal_concurrency_control where request_id=g_req_id;
4387: else
4388: DELETE FROM xla_bal_concurrency_control where request_id=-1*p_entity_id;
4389: end if;
4390:
4391: xla_exceptions_pkg.raise_message
4392: (p_location => 'xla_balances_calc_pkg.massive_update');
4393: RETURN TRUE; -- Bug 13614923
4394: END massive_update;
4395:
4486: ,p_msg => 'EXCEPTION:' ||'p_application_id cannot be NULL'
4487: ,p_level => C_LEVEL_EXCEPTION
4488: );
4489: END IF;
4490: xla_exceptions_pkg.raise_message
4491: (p_appli_s_name => 'XLA'
4492: ,p_msg_name => 'XLA_COMMON_ERROR'
4493: ,p_token_1 => 'LOCATION'
4494: ,p_value_1 => 'xla_balances_calc_pkg.pre_accounting'
4504: ,p_msg => 'EXCEPTION:' ||'p_ae_header_id cannot be NULL'
4505: ,p_level => C_LEVEL_EXCEPTION
4506: );
4507: END IF;
4508: xla_exceptions_pkg.raise_message
4509: (p_appli_s_name => 'XLA'
4510: ,p_msg_name => 'XLA_COMMON_ERROR'
4511: ,p_token_1 => 'LOCATION'
4512: ,p_value_1 => 'xla_balances_calc_pkg.pre_accounting'
4522: ,p_msg => 'EXCEPTION:' ||'p_update_mode cannot be NULL'
4523: ,p_level => C_LEVEL_EXCEPTION
4524: );
4525: END IF;
4526: xla_exceptions_pkg.raise_message
4527: (p_appli_s_name => 'XLA'
4528: ,p_msg_name => 'XLA_COMMON_ERROR'
4529: ,p_token_1 => 'LOCATION'
4530: ,p_value_1 => 'xla_balances_calc_pkg.pre_accounting'
4538: ,p_msg => 'EXCEPTION:' || 'Unsupported value for p_update_mode: ' || p_update_mode
4539: ,p_level => C_LEVEL_EXCEPTION
4540: );
4541: END IF;
4542: xla_exceptions_pkg.raise_message
4543: (p_appli_s_name => 'XLA'
4544: ,p_msg_name => 'XLA_COMMON_ERROR'
4545: ,p_token_1 => 'LOCATION'
4546: ,p_value_1 => 'xla_balances_calc_pkg.pre_accounting'
4560: , p_execution_mode => l_execution_mode
4561: , p_concurrency_class => 'BALANCES_CALCULATION'
4562: )
4563: THEN
4564: xla_exceptions_pkg.raise_message
4565: (p_appli_s_name => 'XLA'
4566: , p_msg_name => 'XLA_COMMON_ERROR'
4567: , p_token_1 => 'LOCATION'
4568: , p_value_1 => 'xla_balances_calc_pkg.MASSIVE_UPDATE'
4647:
4648: ROLLBACK TO SAVEPOINT_BAL;
4649: DELETE FROM xla_bal_concurrency_control where request_id=-1*p_ae_header_id;
4650: RETURN TRUE;
4651: WHEN xla_exceptions_pkg.application_exception
4652: THEN
4653: ROLLBACK TO SAVEPOINT_BAL;
4654: DELETE FROM xla_bal_concurrency_control where request_id=-1*p_ae_header_id;
4655: RETURN TRUE;
4656: WHEN OTHERS
4657: THEN
4658: ROLLBACK TO SAVEPOINT_BAL;
4659: DELETE FROM xla_bal_concurrency_control where request_id=-1*p_ae_header_id;
4660: xla_exceptions_pkg.raise_message
4661: (p_location => 'xla_balances_calc_pkg.single_update');
4662: RETURN TRUE;
4663: END single_update;
4664:
4733: );
4734: END IF;
4735: RETURN C_NOT_CONTROL_ACCOUNT;
4736: WHEN OTHERS THEN
4737: xla_exceptions_pkg.raise_message
4738: (p_location => 'xla_balances_calc_pkg.is_control_account');
4739: END;
4740:
4741: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
4775: );
4776: END IF;
4777: RETURN C_NOT_CONTROL_ACCOUNT;
4778: WHEN OTHERS THEN
4779: xla_exceptions_pkg.raise_message
4780: (p_location => 'xla_balances_calc_pkg.is_control_account');
4781: RETURN C_NOT_CONTROL_ACCOUNT;
4782: END;
4783:
4822:
4823: ELSIF p_natural_account IS NOT NULL
4824: AND p_code_combination_id IS NULL
4825: THEN
4826: xla_exceptions_pkg.raise_message
4827: ('XLA'
4828: ,'XLA_COMMON_ERROR'
4829: ,'ERROR'
4830: ,'p_natural_account NOT NULL: functionality not implemented'
4841:
4842: EXCEPTION
4843: WHEN NO_DATA_FOUND THEN
4844: RETURN C_NOT_CONTROL_ACCOUNT;
4845: WHEN xla_exceptions_pkg.application_exception THEN
4846: RAISE;
4847: WHEN OTHERS THEN
4848: xla_exceptions_pkg.raise_message
4849: (p_location => 'xla_balances_calc_pkg.is_control_account');
4844: RETURN C_NOT_CONTROL_ACCOUNT;
4845: WHEN xla_exceptions_pkg.application_exception THEN
4846: RAISE;
4847: WHEN OTHERS THEN
4848: xla_exceptions_pkg.raise_message
4849: (p_location => 'xla_balances_calc_pkg.is_control_account');
4850: END is_control_account;
4851:
4852: /*===============================================+
5100: EXCEPTION
5101: WHEN OTHERS
5102: THEN
5103: RAISE;
5104: xla_exceptions_pkg.raise_message
5105: (p_location => 'xla_balances_calc_pkg.sr_bal_unprocessed');
5106: END sr_bal_unprocessed;
5107:
5108: