[Home] [Help]
1: PACKAGE BODY xla_conditions_pkg AS
2: /* $Header: xlaamcon.pkb 120.26 2011/12/27 06:35:51 sgullape 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_conditions_pkg |
10: | |
11: | DESCRIPTION |
12: | XLA Conditions Package |
13: | |
24: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
25: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
26: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
27: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
28: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_conditions_pkg';
29:
30:
31: -- Global variables for debugging
32: g_log_level PLS_INTEGER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
138: WHEN xla_exceptions_pkg.application_exception THEN
139: RAISE;
140: WHEN OTHERS THEN
141: xla_exceptions_pkg.raise_message
142: (p_location => 'xla_conditions_pkg.delete_condition');
143:
144: END delete_condition;
145:
146: /*======================================================================+
543: xla_exceptions_pkg.raise_message
544: ('XLA'
545: ,'XLA_AB_COND_TOO_LONG'
546: ,'PROCEDURE'
547: ,'xla_conditions_pkg.display_condition'
548: ,'ERROR'
549: ,sqlerrm
550: );
551: END;
579: IF c_value_source_name%ISOPEN THEN
580: CLOSE c_value_source_name;
581: END IF;
582: xla_exceptions_pkg.raise_message
583: (p_location => 'xla_conditions_pkg.display_condition');
584:
585: END display_condition;
586:
587: /*======================================================================+
665:
666: EXCEPTION
667: WHEN OTHERS THEN
668: xla_exceptions_pkg.raise_message
669: (p_location => 'xla_conditions_pkg.display_condition_substr');
670: END display_condition_substr;
671:
672: /*======================================================================+
673: | |
1168: CLOSE c_desc_min_right_seq;
1169: END IF;
1170:
1171: xla_exceptions_pkg.raise_message
1172: (p_location => 'xla_conditions_pkg.desc_condition_is_invalid');
1173:
1174: END desc_condition_is_invalid;
1175:
1176: /*======================================================================+
1379: AND c.bracket_right_code is not null
1380: AND c.user_sequence = l_log_op_not_null.user_sequence + 1;
1381:
1382: BEGIN
1383: trace('> xla_conditions_pkg.seg_condition_is_invalid' , C_LEVEL_PROCEDURE,l_log_module);
1384:
1385: trace('application_id = '||p_application_id , C_LEVEL_STATEMENT,l_log_module);
1386: trace('segment_rule_type_code = '||p_segment_rule_type_code , C_LEVEL_STATEMENT,l_log_module);
1387: trace('segment_rule_code = '||p_segment_rule_code , C_LEVEL_STATEMENT,l_log_module);
1621: CLOSE c_segment_rule_detail_id;
1622: END IF;
1623:
1624: trace('p_message_name = '||p_message_name , C_LEVEL_STATEMENT,l_log_module);
1625: trace('< xla_conditions_pkg.seg_condition_is_invalid' , C_LEVEL_PROCEDURE,l_log_module);
1626:
1627: RETURN l_return;
1628:
1629: EXCEPTION
1677: CLOSE c_seg_min_right_seq;
1678: END IF;
1679:
1680: xla_exceptions_pkg.raise_message
1681: (p_location => 'xla_conditions_pkg.seg_condition_is_invalid');
1682:
1683: END seg_condition_is_invalid;
1684:
1685: /*======================================================================+
2311: CLOSE c_acct_min_right_seq;
2312: END IF;
2313:
2314: xla_exceptions_pkg.raise_message
2315: (p_location => 'xla_conditions_pkg.acct_condition_is_invalid');
2316:
2317: END acct_condition_is_invalid;
2318:
2319: BEGIN
2325:
2326: IF NOT g_log_enabled THEN
2327: g_log_level := C_LEVEL_LOG_DISABLED;
2328: END IF;
2329: END xla_conditions_pkg;