APPS.BOM_DEPARTMENT_RESOURCES_PKG dependencies on BOM_DEPARTMENT_RESOURCES

Line 1: PACKAGE BODY BOM_DEPARTMENT_RESOURCES_PKG as

1: PACKAGE BODY BOM_DEPARTMENT_RESOURCES_PKG as
2: /* $Header: bompbdrb.pls 120.1.12010000.2 2009/12/10 11:33:06 ybabulal ship $ */
3:
4: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
5: X_Department_Id NUMBER,

Line 42: CURSOR C IS SELECT rowid FROM BOM_DEPARTMENT_RESOURCES

38: X_Schedule_To_Instance NUMBER,
39: X_Sequencing_Window NUMBER DEFAULT NULL, --APS Enhancement for Routings
40: X_Idle_Time_Tolerance NUMBER DEFAULT NULL --APS Enhancement for Routings
41: ) IS
42: CURSOR C IS SELECT rowid FROM BOM_DEPARTMENT_RESOURCES
43: WHERE department_id = X_Department_Id
44: AND resource_id = X_Resource_Id;
45: BEGIN
46: INSERT INTO BOM_DEPARTMENT_RESOURCES(

Line 46: INSERT INTO BOM_DEPARTMENT_RESOURCES(

42: CURSOR C IS SELECT rowid FROM BOM_DEPARTMENT_RESOURCES
43: WHERE department_id = X_Department_Id
44: AND resource_id = X_Resource_Id;
45: BEGIN
46: INSERT INTO BOM_DEPARTMENT_RESOURCES(
47: department_id,
48: resource_id,
49: last_update_date,
50: last_updated_by,

Line 167: FROM BOM_DEPARTMENT_RESOURCES

163:
164: ) IS
165: CURSOR C IS
166: SELECT *
167: FROM BOM_DEPARTMENT_RESOURCES
168: WHERE rowid = X_Rowid
169: FOR UPDATE of Department_Id NOWAIT;
170: Recinfo C%ROWTYPE;
171: BEGIN

Line 313: Cursor C is SELECT rowid FROM BOM_DEPARTMENT_RESOURCES

309: X_Sequencing_Window NUMBER DEFAULT NULL, --APS Enhancement for Routings
310: X_Idle_Time_Tolerance NUMBER DEFAULT NULL --APS Enhancement for Routings
311: ) IS
312:
313: Cursor C is SELECT rowid FROM BOM_DEPARTMENT_RESOURCES
314: WHERE share_from_dept_id = X_Department_Id
315: AND resource_id = X_Resource_Id ;
316: BEGIN
317: UPDATE BOM_DEPARTMENT_RESOURCES

Line 317: UPDATE BOM_DEPARTMENT_RESOURCES

313: Cursor C is SELECT rowid FROM BOM_DEPARTMENT_RESOURCES
314: WHERE share_from_dept_id = X_Department_Id
315: AND resource_id = X_Resource_Id ;
316: BEGIN
317: UPDATE BOM_DEPARTMENT_RESOURCES
318: SET
319: department_id = X_Department_Id,
320: resource_id = X_Resource_Id,
321: last_update_date = X_Last_Update_Date,

Line 356: UPDATE BOM_DEPARTMENT_RESOURCES

352: idle_time_tolerance = X_Idle_Time_Tolerance --APS Enhancement for Routings
353: WHERE rowid = X_rowid;
354:
355: FOR c_row_id in C LOOP
356: UPDATE BOM_DEPARTMENT_RESOURCES
357: SET
358: last_update_date = X_Last_Update_Date,
359: last_updated_by = X_Last_Updated_By,
360: last_update_login = X_Last_Update_Login,

Line 403: DELETE FROM BOM_DEPARTMENT_RESOURCES

399:
400:
401: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
402: BEGIN
403: DELETE FROM BOM_DEPARTMENT_RESOURCES
404: WHERE rowid = X_Rowid;
405:
406: if (SQL%NOTFOUND) then
407: Raise NO_DATA_FOUND;

Line 422: (SELECT 1 FROM BOM_DEPARTMENT_RESOURCES

418: BEGIN
419: SELECT RESOURCE_CODE INTO res_code FROM BOM_RESOURCES
420: WHERE RESOURCE_ID = X_Resource_Id;
421: SELECT 1 INTO dummy FROM DUAL WHERE NOT EXISTS
422: (SELECT 1 FROM BOM_DEPARTMENT_RESOURCES
423: WHERE DEPARTMENT_ID = X_Department_Id
424: AND RESOURCE_ID = X_Resource_Id
425: AND ((X_Rowid IS NULL) OR (ROWID <> X_Rowid))
426: );

Line 458: (SELECT 1 FROM BOM_DEPARTMENT_RESOURCES

454:
455: err_code := 2;
456: message_name := 'BOM_CANNOT_DELETE_SHARED_RES';
457: SELECT 1 INTO dummy FROM DUAL WHERE NOT EXISTS
458: (SELECT 1 FROM BOM_DEPARTMENT_RESOURCES
459: WHERE SHARE_FROM_DEPT_ID = X_Department_Id
460: AND RESOURCE_ID = X_Resource_Id);
461:
462: err_code := 3;

Line 513: END BOM_DEPARTMENT_RESOURCES_PKG;

509: END Check_References;
510:
511:
512:
513: END BOM_DEPARTMENT_RESOURCES_PKG;