DBA Data[Home] [Help]

APPS.PER_BUDGET_VALUES_PKG dependencies on PER_BUDGET_VALUES

Line 1: PACKAGE BODY PER_BUDGET_VALUES_PKG as

1: PACKAGE BODY PER_BUDGET_VALUES_PKG as
2: /* $Header: pebgv01t.pkb 115.9 2004/02/16 10:20:27 nsanghal ship $ */
3: -- ----------------------------------------------------------------------------
4: -- | Private Global Definitions |
5: -- ----------------------------------------------------------------------------

Line 6: g_package varchar2(33) := ' per_budget_values_pkg.'; -- Global package name

2: /* $Header: pebgv01t.pkb 115.9 2004/02/16 10:20:27 nsanghal ship $ */
3: -- ----------------------------------------------------------------------------
4: -- | Private Global Definitions |
5: -- ----------------------------------------------------------------------------
6: g_package varchar2(33) := ' per_budget_values_pkg.'; -- Global package name
7:
8: -- ----------------------------------------------------------------------------
9: -- |---------------------------< Chk_Unique >---------------------------------|
10: -- ----------------------------------------------------------------------------

Line 23: FROM per_budget_values bv

19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: SELECT NULL
22: INTO l_result
23: FROM per_budget_values bv
24: WHERE X_Budget_Element_Id = bv.budget_element_id
25: AND X_Time_Period_Id = bv.time_period_id
26: AND X_Business_group_Id = bv.Business_Group_Id + 0
27: AND (bv.Rowid <> X_Rowid or X_Rowid is null);

Line 80: FROM per_budget_values pbv

76: hr_utility.set_location('Entering:'||l_proc, 5);
77: --
78: SELECT NULL
79: INTO l_result
80: FROM per_budget_values pbv
81: WHERE pbv.budget_value_id = x_budget_value_id
82: AND (pbv.rowid <> X_rowid OR X_rowid IS NULL);
83: --
84: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 214: ,p_descflex_name => 'PER_BUDGET_VALUES'

210: hr_utility.set_location('Entering:'||l_proc, 5);
211: --
212: hr_dflex_utility.ins_or_upd_descflex_attribs
213: (p_appl_short_name => 'PER'
214: ,p_descflex_name => 'PER_BUDGET_VALUES'
215: ,p_attribute_category => x_attribute_category
216: ,p_attribute1_name => 'ATTRIBUTE1'
217: ,p_attribute1_value => x_attribute1
218: ,p_attribute2_name => 'ATTRIBUTE2'

Line 464: CURSOR C1 IS SELECT rowid FROM per_budget_values

460: x_information28 IN VARCHAR2,
461: x_information29 IN VARCHAR2,
462: x_information30 IN VARCHAR2
463: ) IS
464: CURSOR C1 IS SELECT rowid FROM per_budget_values
465: WHERE budget_value_id = X_Budget_Value_Id;
466:
467: CURSOR C2 IS SELECT per_budget_values_s.nextval FROM dual;
468:

Line 467: CURSOR C2 IS SELECT per_budget_values_s.nextval FROM dual;

463: ) IS
464: CURSOR C1 IS SELECT rowid FROM per_budget_values
465: WHERE budget_value_id = X_Budget_Value_Id;
466:
467: CURSOR C2 IS SELECT per_budget_values_s.nextval FROM dual;
468:
469: CURSOR C3 IS
470: SELECT null
471: from per_budget_values pb

Line 471: from per_budget_values pb

467: CURSOR C2 IS SELECT per_budget_values_s.nextval FROM dual;
468:
469: CURSOR C3 IS
470: SELECT null
471: from per_budget_values pb
472: where pb.budget_element_id = x_budget_element_id;
473:
474: l_proc VARCHAR2(72) := g_package||'Insert_Row';
475: l_budget_version_id NUMBER(15);

Line 498: -- If so, does a per_budget_values rec already exist for the budget_element_id

494: p_argument => 'time_period_id',
495: p_argument_value => x_time_period_id);
496: --
497: -- Is the parent per_budgets rec 'OTA_BUDGET'
498: -- If so, does a per_budget_values rec already exist for the budget_element_id
499: -- If so, check many_budget_values flag to see if another per_budget_values record
500: -- should be created otherwise raise error.
501: IF per_budgets_pkg.chk_OTA_budget_type(NULL,l_budget_version_id,NULL) THEN
502: OPEN C3;

Line 499: -- If so, check many_budget_values flag to see if another per_budget_values record

495: p_argument_value => x_time_period_id);
496: --
497: -- Is the parent per_budgets rec 'OTA_BUDGET'
498: -- If so, does a per_budget_values rec already exist for the budget_element_id
499: -- If so, check many_budget_values flag to see if another per_budget_values record
500: -- should be created otherwise raise error.
501: IF per_budgets_pkg.chk_OTA_budget_type(NULL,l_budget_version_id,NULL) THEN
502: OPEN C3;
503: FETCH C3 into l_result;

Line 592: INSERT INTO per_budget_values(

588: OPEN C2;
589: FETCH C2 INTO X_Budget_Value_Id;
590: CLOSE C2;
591:
592: INSERT INTO per_budget_values(
593: budget_value_id,
594: business_group_id,
595: budget_element_id,
596: time_period_id,

Line 818: FROM per_budget_values

814: X_information30 IN VARCHAR2
815: ) IS
816: CURSOR C IS
817: SELECT *
818: FROM per_budget_values
819: WHERE rowid = X_Rowid
820: FOR UPDATE of Budget_Element_Id NOWAIT;
821: Recinfo C%ROWTYPE;
822: l_proc VARCHAR2(72) := g_package||'Lock_Row';

Line 1125: from per_budget_values pb

1121: ) IS
1122:
1123: CURSOR C3 IS
1124: SELECT null
1125: from per_budget_values pb
1126: where pb.budget_element_id = x_budget_element_id;
1127:
1128: l_proc VARCHAR2(72) := g_package||'Update_Row';
1129: l_result VARCHAR2(255);

Line 1166: -- If so, does a per_budget_values rec already exist for the budget_element_id

1162: p_argument => 'time_period_id',
1163: p_argument_value => x_time_period_id);
1164: --
1165: -- Is the parent per_budgets rec 'OTA_BUDGET'
1166: -- If so, does a per_budget_values rec already exist for the budget_element_id
1167: -- If so, check many_budget_values flag to see if another per_budget_values record
1168: -- should be created otherwise raise error.
1169: IF per_budgets_pkg.chk_OTA_budget_type(NULL,l_budget_version_id,NULL) THEN
1170: OPEN C3;

Line 1167: -- If so, check many_budget_values flag to see if another per_budget_values record

1163: p_argument_value => x_time_period_id);
1164: --
1165: -- Is the parent per_budgets rec 'OTA_BUDGET'
1166: -- If so, does a per_budget_values rec already exist for the budget_element_id
1167: -- If so, check many_budget_values flag to see if another per_budget_values record
1168: -- should be created otherwise raise error.
1169: IF per_budgets_pkg.chk_OTA_budget_type(NULL,l_budget_version_id,NULL) THEN
1170: OPEN C3;
1171: FETCH C3 into l_result;

Line 1254: UPDATE per_budget_values

1250: x_Attribute29,
1251: x_Attribute30);
1252:
1253:
1254: UPDATE per_budget_values
1255: SET
1256: budget_value_id = X_Budget_Value_Id,
1257: business_group_id = X_Business_Group_Id,
1258: budget_element_id = X_Budget_Element_Id,

Line 1354: FROM per_budget_values

1350: SELECT budget_version_id
1351: INTO l_budget_version_id
1352: FROM per_budget_elements
1353: WHERE budget_element_id = (SELECT budget_element_id
1354: FROM per_budget_values
1355: WHERE rowid = X_Rowid);
1356: --
1357: -- As this is an OTA_BUDGET record, determine how many value
1358: -- records exist for a parent budget element

Line 1364: FROM per_budget_values

1360: IF per_budgets_pkg.chk_OTA_Budget_Type(NULL, l_budget_version_id, NULL) = TRUE THEN
1361: BEGIN
1362: SELECT count(rowid)
1363: INTO l_count
1364: FROM per_budget_values
1365: WHERE budget_element_id = (SELECT budget_element_id
1366: FROM per_budget_values
1367: WHERE rowid = X_Rowid);
1368: --

Line 1366: FROM per_budget_values

1362: SELECT count(rowid)
1363: INTO l_count
1364: FROM per_budget_values
1365: WHERE budget_element_id = (SELECT budget_element_id
1366: FROM per_budget_values
1367: WHERE rowid = X_Rowid);
1368: --
1369: IF l_count = 1 THEN
1370: SELECT rowid

Line 1374: FROM per_budget_values

1370: SELECT rowid
1371: INTO l_ele_rowid
1372: FROM per_budget_elements
1373: WHERE budget_element_id = (SELECT budget_element_id
1374: FROM per_budget_values
1375: WHERE rowid = X_Rowid);
1376: END IF;
1377: --
1378: EXCEPTION

Line 1388: DELETE FROM per_budget_values

1384: END;
1385: END IF;
1386: --
1387: -- delete the value record
1388: DELETE FROM per_budget_values
1389: WHERE rowid = X_Rowid;
1390: --
1391: if (SQL%NOTFOUND) then
1392: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

Line 1416: END PER_BUDGET_VALUES_PKG;

1412: hr_utility.set_location(' Leaving:'||l_proc, 10);
1413: --
1414: END Delete_Row;
1415:
1416: END PER_BUDGET_VALUES_PKG;