APPS.PA_BUDGET_VERSIONS_PKG dependencies on PA_BUDGET_VERSIONS

Line 1: PACKAGE BODY PA_BUDGET_VERSIONS_PKG as

1: PACKAGE BODY PA_BUDGET_VERSIONS_PKG as
2: /* $Header: PAXBUBVB.pls 120.1 2005/08/19 17:10:30 mwasowic noship $ */
3:
4:
5: --Name: Insert_Row

Line 88: CURSOR C IS SELECT rowid FROM pa_budget_versions

84:
85: IS
86:
87:
88: CURSOR C IS SELECT rowid FROM pa_budget_versions
89: WHERE budget_version_id = X_Budget_Version_Id;
90:
91: CURSOR C2 IS SELECT pa_budget_versions_s.nextval FROM sys.dual;
92:

Line 91: CURSOR C2 IS SELECT pa_budget_versions_s.nextval FROM sys.dual;

87:
88: CURSOR C IS SELECT rowid FROM pa_budget_versions
89: WHERE budget_version_id = X_Budget_Version_Id;
90:
91: CURSOR C2 IS SELECT pa_budget_versions_s.nextval FROM sys.dual;
92:
93:
94: BEGIN
95: if (X_Budget_Version_Id is NULL) then

Line 101: INSERT INTO pa_budget_versions(

97: FETCH C2 INTO X_Budget_Version_Id;
98: CLOSE C2;
99: end if;
100:
101: INSERT INTO pa_budget_versions(
102: budget_version_id,
103: project_id,
104: budget_type_code,
105: version_number,

Line 262: FROM pa_budget_versions

258: X_First_Budget_Period VARCHAR2
259: ) IS
260: CURSOR C IS
261: SELECT *
262: FROM pa_budget_versions
263: WHERE rowid = X_Rowid
264: FOR UPDATE of Budget_Version_Id NOWAIT;
265: Recinfo C%ROWTYPE;
266:

Line 461: UPDATE pa_budget_versions

457: x_plan_run_date DATE DEFAULT NULL,
458: x_plan_processing_code VARCHAR2 DEFAULT NULL
459: ) IS
460: BEGIN
461: UPDATE pa_budget_versions
462: SET
463: budget_version_id = X_Budget_Version_Id,
464: project_id = X_Project_Id,
465: budget_type_code = X_Budget_Type_Code,

Line 520: DELETE FROM pa_budget_versions

516: END Update_Row;
517:
518: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
519: BEGIN
520: DELETE FROM pa_budget_versions
521: WHERE rowid = X_Rowid;
522:
523: if (SQL%NOTFOUND) then
524: Raise NO_DATA_FOUND;

Line 529: END PA_BUDGET_VERSIONS_PKG;

525: end if;
526: END Delete_Row;
527:
528:
529: END PA_BUDGET_VERSIONS_PKG;