DBA Data[Home] [Help]

APPS.PA_PROJECT_CUSTOMERS_PKG dependencies on PA_PROJECT_CUSTOMERS

Line 1: PACKAGE BODY PA_PROJECT_CUSTOMERS_PKG as

1: PACKAGE BODY PA_PROJECT_CUSTOMERS_PKG as
2: /* $Header: PAXPRCUB.pls 120.1 2005/08/19 17:17:20 mwasowic noship $ */
3:
4: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
5: X_Project_Id NUMBER,

Line 28: CURSOR C IS SELECT rowid FROM pa_project_customers

24: X_Receiver_Task_Id NUMBER,
25: X_Record_Version_Number NUMBER,
26: X_Default_Top_Task_Cust_Flag VARCHAR2
27: ) IS
28: CURSOR C IS SELECT rowid FROM pa_project_customers
29: WHERE project_id = X_Project_Id
30: AND customer_id = X_Customer_Id;
31:
32: BEGIN

Line 35: INSERT INTO pa_project_customers(

31:
32: BEGIN
33:
34:
35: INSERT INTO pa_project_customers(
36:
37: project_id,
38: customer_id,
39: last_update_date,

Line 117: FROM pa_project_customers

113:
114: ) IS
115: CURSOR C IS
116: SELECT *
117: FROM pa_project_customers
118: WHERE rowid = X_Rowid
119: FOR UPDATE of Project_Id NOWAIT;
120: Recinfo C%ROWTYPE;
121:

Line 215: FROM pa_project_customers

211:
212: ) IS
213: CURSOR C IS
214: SELECT *
215: FROM pa_project_customers
216: WHERE rowid = X_Rowid;
217: Recinfo C%ROWTYPE;
218:
219:

Line 235: UPDATE pa_project_customers

231: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
232: APP_EXCEPTION.Raise_Exception;
233: end if;
234:
235: UPDATE pa_project_customers
236: SET
237: project_id = X_Project_Id,
238: customer_id = X_Customer_Id,
239: last_update_date = X_Last_Update_Date,

Line 269: FROM pa_project_customers

265: PROCEDURE Delete_Row(X_Rowid VARCHAR2,
266: x_record_version_number NUMBER) IS
267: CURSOR C IS
268: SELECT *
269: FROM pa_project_customers
270: WHERE rowid = X_Rowid;
271: Recinfo C%ROWTYPE;
272:
273:

Line 289: DELETE FROM pa_project_customers

285: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
286: APP_EXCEPTION.Raise_Exception;
287: end if;
288:
289: DELETE FROM pa_project_customers
290: WHERE rowid = X_Rowid;
291:
292: if (SQL%NOTFOUND) then
293: FND_MESSAGE.Set_Name('FND', x_rowid);

Line 299: END PA_PROJECT_CUSTOMERS_PKG;

295: end if;
296: END Delete_Row;
297:
298:
299: END PA_PROJECT_CUSTOMERS_PKG;