1: PACKAGE BODY mtl_secondary_inventories_pkg AS
2: /* $Header: INVSDSUB.pls 120.4 2011/12/21 06:32:36 skommine ship $ */
3: FUNCTION check_unique(x_rowid IN OUT nocopy VARCHAR2, x_secondary_inventory_name VARCHAR2, x_organization_id NUMBER)
4: RETURN NUMBER IS
5: dummy NUMBER;
5: dummy NUMBER;
6: BEGIN
7: SELECT COUNT(1)
8: INTO dummy
9: FROM mtl_secondary_inventories
10: WHERE organization_id = x_organization_id
11: AND secondary_inventory_name = x_secondary_inventory_name
12: AND((x_rowid IS NULL)
13: OR(ROWID <> x_rowid));
109:
110: ) IS
111: CURSOR c IS
112: SELECT ROWID
113: FROM mtl_secondary_inventories
114: WHERE organization_id = x_organization_id
115: AND secondary_inventory_name = x_secondary_inventory_name;
116: BEGIN
117: INSERT INTO mtl_secondary_inventories
113: FROM mtl_secondary_inventories
114: WHERE organization_id = x_organization_id
115: AND secondary_inventory_name = x_secondary_inventory_name;
116: BEGIN
117: INSERT INTO mtl_secondary_inventories
118: (
119: secondary_inventory_name
120: , organization_id
121: , last_update_date
375: , x_opp_cyc_count_days NUMBER DEFAULT NULL -- Added for Opp Cyc Counting bug#9248808
376: ) IS
377: CURSOR c IS
378: SELECT *
379: FROM mtl_secondary_inventories
380: WHERE ROWID = x_rowid
381: FOR UPDATE OF organization_id NOWAIT;
382:
383: recinfo c%ROWTYPE;
708: l_status_id NUMBER;
709: BEGIN
710: SELECT status_id
711: INTO l_status_id
712: FROM mtl_secondary_inventories
713: WHERE ROWID = x_rowid;
714:
715: UPDATE mtl_secondary_inventories
716: SET secondary_inventory_name = x_secondary_inventory_name
711: INTO l_status_id
712: FROM mtl_secondary_inventories
713: WHERE ROWID = x_rowid;
714:
715: UPDATE mtl_secondary_inventories
716: SET secondary_inventory_name = x_secondary_inventory_name
717: , organization_id = x_organization_id
718: , last_update_date = x_last_update_date
719: , last_updated_by = x_last_updated_by
819: END update_row;
820:
821: PROCEDURE delete_row(x_rowid VARCHAR2) IS
822: BEGIN
823: DELETE FROM mtl_secondary_inventories
824: WHERE ROWID = x_rowid;
825:
826: IF (SQL%NOTFOUND) THEN
827: RAISE NO_DATA_FOUND;
875: RETURN NUMBER IS
876: BEGIN
877: RETURN fnd_api.g_miss_num;
878: END;
879: END mtl_secondary_inventories_pkg;