DBA Data[Home] [Help]

APPS.IGI_EFC_UPGRADE dependencies on GL_BUDGET_ASSIGNMENT_RANGES

Line 4: TYPE budget_type IS TABLE OF gl_budget_assignment_ranges.funding_budget_version_id%TYPE;

1: PACKAGE BODY IGI_EFC_UPGRADE AS
2: -- $Header: igiefupb.pls 120.0.12010000.1 2008/07/29 09:03:45 appldev ship $
3: -- Stores the budget id
4: TYPE budget_type IS TABLE OF gl_budget_assignment_ranges.funding_budget_version_id%TYPE;
5:
6: -- Stores the value SEGMENT_LOW and SEGMENT_HIGH of a particular segment
7: TYPE segment_range_rec IS RECORD (segment_low VARCHAR2(25),
8: segment_high VARCHAR2(25),

Line 16: -- Record corresponding to table gl_budget_assignment_ranges

12:
13: -- Array of segment ranges. Array index indicates the Segment number.
14: TYPE segment_range_type IS VARRAY(30) OF segment_range_rec;
15:
16: -- Record corresponding to table gl_budget_assignment_ranges
17: TYPE budget_range_rec IS RECORD (range_id gl_budget_assignment_ranges.range_id%TYPE,
18: ledger_id gl_budget_assignment_ranges.ledger_id%TYPE,
19: segment_range_tab SEGMENT_RANGE_TYPE,
20: budget_tab BUDGET_TYPE);

Line 17: TYPE budget_range_rec IS RECORD (range_id gl_budget_assignment_ranges.range_id%TYPE,

13: -- Array of segment ranges. Array index indicates the Segment number.
14: TYPE segment_range_type IS VARRAY(30) OF segment_range_rec;
15:
16: -- Record corresponding to table gl_budget_assignment_ranges
17: TYPE budget_range_rec IS RECORD (range_id gl_budget_assignment_ranges.range_id%TYPE,
18: ledger_id gl_budget_assignment_ranges.ledger_id%TYPE,
19: segment_range_tab SEGMENT_RANGE_TYPE,
20: budget_tab BUDGET_TYPE);
21:

Line 18: ledger_id gl_budget_assignment_ranges.ledger_id%TYPE,

14: TYPE segment_range_type IS VARRAY(30) OF segment_range_rec;
15:
16: -- Record corresponding to table gl_budget_assignment_ranges
17: TYPE budget_range_rec IS RECORD (range_id gl_budget_assignment_ranges.range_id%TYPE,
18: ledger_id gl_budget_assignment_ranges.ledger_id%TYPE,
19: segment_range_tab SEGMENT_RANGE_TYPE,
20: budget_tab BUDGET_TYPE);
21:
22:

Line 25: -- gl_budget_assignment_ranges

21:
22:
23:
24: -- Table of Budget Assignment Ranges. Corresponds to table
25: -- gl_budget_assignment_ranges
26: TYPE budget_range_type IS TABLE OF budget_range_rec;
27:
28: -- Stores information for a particular segment. Used by Splitting and Merging
29: -- logic

Line 1192: SELECT gl_budget_assignment_ranges_s.NEXTVAL

1188:
1189: l_data_type := p_data_type;
1190: fnd_file.put_line(fnd_file.output,'Ledger - Budget Organization - Currency - Range From - Range To ');
1191: BEGIN
1192: SELECT gl_budget_assignment_ranges_s.NEXTVAL
1193: INTO l_range_id_seq
1194: FROM dual;
1195: l_range_id_seq := l_range_id_seq + 1;
1196: EXCEPTION

Line 1198: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');

1194: FROM dual;
1195: l_range_id_seq := l_range_id_seq + 1;
1196: EXCEPTION
1197: WHEN OTHERS THEN
1198: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');
1199: fnd_file.put_line(fnd_file.log, 'Module: LOOP_AND_PROCESS =>'||'Error fetching sequence value
1200: from gl_budget_assignment_ranges_s');
1201: errbuf := 'Module: LOOP_AND_PROCESS => Error fetching sequence value from gl_budget_assignment_ranges_s';
1202: retcode := -1;

Line 1200: from gl_budget_assignment_ranges_s');

1196: EXCEPTION
1197: WHEN OTHERS THEN
1198: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');
1199: fnd_file.put_line(fnd_file.log, 'Module: LOOP_AND_PROCESS =>'||'Error fetching sequence value
1200: from gl_budget_assignment_ranges_s');
1201: errbuf := 'Module: LOOP_AND_PROCESS => Error fetching sequence value from gl_budget_assignment_ranges_s';
1202: retcode := -1;
1203: RETURN;
1204: END;

Line 1201: errbuf := 'Module: LOOP_AND_PROCESS => Error fetching sequence value from gl_budget_assignment_ranges_s';

1197: WHEN OTHERS THEN
1198: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');
1199: fnd_file.put_line(fnd_file.log, 'Module: LOOP_AND_PROCESS =>'||'Error fetching sequence value
1200: from gl_budget_assignment_ranges_s');
1201: errbuf := 'Module: LOOP_AND_PROCESS => Error fetching sequence value from gl_budget_assignment_ranges_s';
1202: retcode := -1;
1203: RETURN;
1204: END;
1205:

Line 1221: SELECT gl_budget_assignment_ranges_s.NEXTVAL

1217:
1218: FOR i IN 1..lc_non_overlapping_ranges.COUNT LOOP
1219: IF p_mode = 1 THEN
1220: BEGIN
1221: SELECT gl_budget_assignment_ranges_s.NEXTVAL
1222: INTO l_actual_range_id
1223: FROM dual;
1224: EXCEPTION
1225: WHEN OTHERS THEN

Line 1226: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');

1222: INTO l_actual_range_id
1223: FROM dual;
1224: EXCEPTION
1225: WHEN OTHERS THEN
1226: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');
1227: fnd_file.put_line(fnd_file.log, 'Module: LOOP_AND_PROCESS (overlap) =>'
1228: ||'Error fetching sequence value from gl_budget_assignment_ranges_s');
1229: errbuf := 'Module: LOOP_AND_PROCESS (overlap) => Error fetching sequence value from gl_budget_assignment_ranges_s';
1230: retcode := -1;

Line 1228: ||'Error fetching sequence value from gl_budget_assignment_ranges_s');

1224: EXCEPTION
1225: WHEN OTHERS THEN
1226: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');
1227: fnd_file.put_line(fnd_file.log, 'Module: LOOP_AND_PROCESS (overlap) =>'
1228: ||'Error fetching sequence value from gl_budget_assignment_ranges_s');
1229: errbuf := 'Module: LOOP_AND_PROCESS (overlap) => Error fetching sequence value from gl_budget_assignment_ranges_s';
1230: retcode := -1;
1231: RETURN;
1232: END;

Line 1229: errbuf := 'Module: LOOP_AND_PROCESS (overlap) => Error fetching sequence value from gl_budget_assignment_ranges_s';

1225: WHEN OTHERS THEN
1226: fnd_file.put_line(fnd_file.output, 'Error fetching sequence value from gl_budget_assignment_ranges_s');
1227: fnd_file.put_line(fnd_file.log, 'Module: LOOP_AND_PROCESS (overlap) =>'
1228: ||'Error fetching sequence value from gl_budget_assignment_ranges_s');
1229: errbuf := 'Module: LOOP_AND_PROCESS (overlap) => Error fetching sequence value from gl_budget_assignment_ranges_s';
1230: retcode := -1;
1231: RETURN;
1232: END;
1233:

Line 1248: INSERT INTO GL_BUDGET_ASSIGNMENT_RANGES

1244: BEGIN
1245:
1246: INSERT INTO IGI_EFC_UPG_BACKUP_INFO (range_id) VALUES (l_actual_range_id);
1247:
1248: INSERT INTO GL_BUDGET_ASSIGNMENT_RANGES
1249: (
1250: BUDGET_ENTITY_ID,
1251: LEDGER_ID,
1252: CURRENCY_CODE,

Line 1961: FROM GL_BUDGET_ASSIGNMENT_RANGES

1957: budget_entity_id = lc_merge_range2.budget_entity_id;
1958:
1959: SELECT max(sequence_number)+1
1960: INTO l_seq_number2
1961: FROM GL_BUDGET_ASSIGNMENT_RANGES
1962: WHERE
1963: budget_entity_id = lc_merge_range2.budget_entity_id;
1964:
1965: IF l_seq_number1 IS NULL and l_seq_number2 IS NULL THEN

Line 2260: FROM GL_BUDGET_ASSIGNMENT_RANGES

2256: budget_entity_id = lc_merge_range1.budget_entity_id;
2257:
2258: SELECT max(sequence_number)+1
2259: INTO l_seq_number2
2260: FROM GL_BUDGET_ASSIGNMENT_RANGES
2261: WHERE
2262: budget_entity_id = lc_merge_range1.budget_entity_id;
2263:
2264: IF l_seq_number1 IS NULL and l_seq_number2 IS NULL THEN

Line 2630: SELECT 1 FROM GL_BUDGET_ASSIGNMENT_RANGES BA1

2626:
2627: CURSOR C_OVERLAPPING_RANGE_EXISTS IS
2628: SELECT 1 FROM DUAL WHERE EXISTS
2629: (
2630: SELECT 1 FROM GL_BUDGET_ASSIGNMENT_RANGES BA1
2631: WHERE EXISTS
2632: (SELECT 1 FROM
2633: GL_BUDGET_ASSIGNMENT_RANGES BA2
2634: WHERE

Line 2633: GL_BUDGET_ASSIGNMENT_RANGES BA2

2629: (
2630: SELECT 1 FROM GL_BUDGET_ASSIGNMENT_RANGES BA1
2631: WHERE EXISTS
2632: (SELECT 1 FROM
2633: GL_BUDGET_ASSIGNMENT_RANGES BA2
2634: WHERE
2635: BA2.ledger_id = BA1.ledger_id
2636: AND BA2.currency_code = BA1.currency_code
2637: AND BA1.RANGE_ID <> BA2.RANGE_ID

Line 2700: SELECT RANGE_ID FROM GL_BUDGET_ASSIGNMENT_RANGES BA3

2696: AND NVL(BA1.SEGMENT30_LOW,'X') <= NVL(BA2.SEGMENT30_HIGH,'X')
2697: AND NVL(BA1.SEGMENT30_HIGH,'X') >= NVL(BA2.SEGMENT30_LOW,'X')
2698: )
2699: AND BA1.RANGE_ID NOT IN (
2700: SELECT RANGE_ID FROM GL_BUDGET_ASSIGNMENT_RANGES BA3
2701: WHERE
2702: BA3.LEDGER_ID = BA1.LEDGER_ID AND
2703: BA3.CURRENCY_CODE = BA1.CURRENCY_CODE AND
2704: EXISTS

Line 2706: GL_BUDGET_ASSIGNMENT_RANGES BA4

2702: BA3.LEDGER_ID = BA1.LEDGER_ID AND
2703: BA3.CURRENCY_CODE = BA1.CURRENCY_CODE AND
2704: EXISTS
2705: (SELECT 1 FROM
2706: GL_BUDGET_ASSIGNMENT_RANGES BA4
2707: WHERE
2708: BA4.ledger_id = BA3.ledger_id
2709: AND BA4.currency_code = BA3.currency_code
2710: AND BA3.RANGE_ID <> BA4.RANGE_ID

Line 3084: FROM GL_BUDGET_ASSIGNMENT_RANGES gar

3080: ATTRIBUTE12,
3081: ATTRIBUTE13,
3082: ATTRIBUTE14,
3083: ATTRIBUTE15
3084: FROM GL_BUDGET_ASSIGNMENT_RANGES gar
3085: WHERE exists (SELECT 1
3086: FROM gl_budget_entities glent
3087: WHERE
3088: gar.ledger_id = glent.ledger_id AND

Line 3434: FROM GL_BUDGET_ASSIGNMENT_RANGES gar

3430: ATTRIBUTE12,
3431: ATTRIBUTE13,
3432: ATTRIBUTE14,
3433: ATTRIBUTE15
3434: FROM GL_BUDGET_ASSIGNMENT_RANGES gar
3435: WHERE exists (SELECT 1
3436: FROM GL_BUDGET_ENTITIES glent
3437: WHERE
3438: gar.ledger_id = glent.ledger_id AND

Line 3511: DELETE FROM GL_BUDGET_ASSIGNMENT_RANGES

3507: (SELECT range_id
3508: FROM
3509: IGI_EFC_BUDGET_ASSIGNMENT_BCK);
3510:
3511: DELETE FROM GL_BUDGET_ASSIGNMENT_RANGES
3512: WHERE range_id IN
3513: (SELECT range_id
3514: FROM
3515: IGI_EFC_BUDGET_ASSIGNMENT_BCK);