APPS.PER_BUDGET_ELEMENTS_PKG dependencies on PER_BUDGET_ELEMENTS

Line 1: PACKAGE BODY PER_BUDGET_ELEMENTS_PKG as

1: PACKAGE BODY PER_BUDGET_ELEMENTS_PKG as
2: /* $Header: pebge01t.pkb 115.10 2004/02/16 10:19:58 nsanghal ship $ */
3:
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

Line 7: g_package varchar2(33) := ' per_budget_elements_pkg.'; -- Global package name

3:
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: g_package varchar2(33) := ' per_budget_elements_pkg.'; -- Global package name
8:
9: -- ----------------------------------------------------------------------------
10: -- |---------------------------< Chk_Unique >---------------------------------|
11: -- ----------------------------------------------------------------------------

Line 31: FROM PER_BUDGET_ELEMENTS E

27: hr_utility.set_location('Entering:'||l_proc, 5);
28: --
29: SELECT NULL
30: INTO l_result
31: FROM PER_BUDGET_ELEMENTS E
32: WHERE E.BUDGET_VERSION_ID = X_Budget_Version_Id
33: AND (E.ROWID <> X_Rowid OR X_Rowid IS NULL)
34: AND NVL(E.ORGANIZATION_ID,-1) = NVL(X_Organization_Id,-1)
35: AND NVL(E.JOB_ID,-1) = NVL(X_Job_Id,-1)

Line 219: FROM per_budget_elements pge

215: hr_utility.set_location('Entering:'||l_proc, 5);
216: --
217: SELECT NULL
218: INTO l_result
219: FROM per_budget_elements pge
220: WHERE pge.budget_element_id = x_budget_element_id
221: AND (pge.rowid <> X_rowid OR X_rowid IS NULL);
222: --
223: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 403: CURSOR C1 IS SELECT rowid FROM per_budget_elements

399: X_Training_Plan_Member_Id NUMBER,
400: X_Event_Id NUMBER
401: ) IS
402:
403: CURSOR C1 IS SELECT rowid FROM per_budget_elements
404: WHERE X_budget_element_id = X_Budget_Element_Id;
405:
406: CURSOR C2 IS SELECT per_budget_elements_s.nextval
407: FROM dual;

Line 406: CURSOR C2 IS SELECT per_budget_elements_s.nextval

402:
403: CURSOR C1 IS SELECT rowid FROM per_budget_elements
404: WHERE X_budget_element_id = X_Budget_Element_Id;
405:
406: CURSOR C2 IS SELECT per_budget_elements_s.nextval
407: FROM dual;
408:
409: l_proc VARCHAR2(72) := g_package||'Insert_Row';
410:

Line 506: INSERT INTO per_budget_elements(

502: OPEN C2;
503: FETCH C2 INTO X_Budget_Element_Id;
504: CLOSE C2;
505:
506: INSERT INTO per_budget_elements(
507: budget_element_id,
508: business_group_id,
509: grade_id,
510: job_id,

Line 561: FROM per_budget_elements

557: X_Event_Id NUMBER
558: ) IS
559: CURSOR C IS
560: SELECT *
561: FROM per_budget_elements
562: WHERE rowid = X_Rowid
563: FOR UPDATE of Budget_Element_Id NOWAIT;
564: Recinfo C%ROWTYPE;
565: l_proc VARCHAR2(72) := g_package||'Lock_Row';

Line 744: UPDATE per_budget_elements

740: X_Training_Plan_Member_Id,
741: X_Event_Id);
742:
743:
744: UPDATE per_budget_elements
745: SET
746: budget_element_id = X_Budget_Element_Id,
747: business_group_id = X_Business_Group_Id,
748: grade_id = X_Grade_Id,

Line 778: FROM per_budget_elements pbe

774: CURSOR C_Values is
775: SELECT pbv.Rowid
776: FROM per_budget_values pbv
777: WHERE pbv.budget_element_id = (SELECT pbe.budget_element_id
778: FROM per_budget_elements pbe
779: WHERE pbe.rowid = X_Rowid);
780:
781: l_val_rowid VARCHAR2(30);
782: l_proc VARCHAR2(72) := g_package||'Delete_Row';

Line 790: FROM per_budget_elements pbe

786: --
787: hr_utility.set_location('Entering:'||l_proc, 5);
788: --
789: SELECT budget_version_id into l_budget_version_id
790: FROM per_budget_elements pbe
791: WHERE pbe.rowid = x_rowid;
792: --
793: OPEN C_Values;
794: -- Cascade delete the appropriate child budget_elements recs if

Line 814: DELETE FROM PER_BUDGET_ELEMENTS

810: END IF;
811: CLOSE C_Values;
812: --
813: --now delete the parent element
814: DELETE FROM PER_BUDGET_ELEMENTS
815: WHERE rowid = X_Rowid;
816: --
817: hr_utility.set_location(' Leaving:'||l_proc, 10);
818: --

Line 825: END PER_BUDGET_ELEMENTS_PKG;

821: hr_utility.set_message(800,'PER_52881_BUD_VER_NOT_EXISTS');
822: hr_utility.raise_error;
823: END Delete_Row;
824:
825: END PER_BUDGET_ELEMENTS_PKG;