APPS.WSH_PACKED_CONTAINERS_PKG dependencies on WSH_PACKED_CONTAINERS

Line 1: PACKAGE BODY WSH_PACKED_CONTAINERS_PKG as

1: PACKAGE BODY WSH_PACKED_CONTAINERS_PKG as
2: /* $Header: WSHPCKHB.pls 115.1 99/07/16 08:19:23 porting s $ */
3:
4: PROCEDURE Insert_Row(X_Rowid IN OUT VARCHAR2,
5: X_Container_Id IN OUT NUMBER,

Line 50: CURSOR C IS SELECT rowid FROM wsh_packed_containers

46: X_Last_Update_Date DATE,
47: X_Last_Updated_By NUMBER,
48: X_Last_Update_Login NUMBER
49: ) IS
50: CURSOR C IS SELECT rowid FROM wsh_packed_containers
51: WHERE container_id = X_Container_Id;
52: CURSOR C2 IS SELECT wsh_packed_containers_s.nextval FROM sys.dual;
53: BEGIN
54: IF (X_Container_Id IS NULL) THEN

Line 52: CURSOR C2 IS SELECT wsh_packed_containers_s.nextval FROM sys.dual;

48: X_Last_Update_Login NUMBER
49: ) IS
50: CURSOR C IS SELECT rowid FROM wsh_packed_containers
51: WHERE container_id = X_Container_Id;
52: CURSOR C2 IS SELECT wsh_packed_containers_s.nextval FROM sys.dual;
53: BEGIN
54: IF (X_Container_Id IS NULL) THEN
55: OPEN C2;
56: FETCH C2 INTO X_Container_Id;

Line 60: INSERT INTO wsh_packed_containers(

56: FETCH C2 INTO X_Container_Id;
57: CLOSE C2;
58: END IF;
59:
60: INSERT INTO wsh_packed_containers(
61:
62: container_id,
63: delivery_id,
64: container_inventory_item_id,

Line 206: FROM wsh_packed_containers

202: X_Attribute15 VARCHAR2
203: ) IS
204: CURSOR C IS
205: SELECT *
206: FROM wsh_packed_containers
207: WHERE rowid = X_Rowid
208: FOR UPDATE of Container_Id NOWAIT;
209: Recinfo C%ROWTYPE;
210:

Line 387: UPDATE wsh_packed_containers

383: X_Last_Updated_By NUMBER,
384: X_Last_Update_Login NUMBER
385: ) IS
386: BEGIN
387: UPDATE wsh_packed_containers
388: SET
389: container_id = X_Container_Id,
390: delivery_id = X_Delivery_Id,
391: container_inventory_item_id = X_Container_Inventory_Item_Id,

Line 439: DELETE FROM wsh_packed_containers

435: END IF;
436: END Update_Row;
437: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
438: BEGIN
439: DELETE FROM wsh_packed_containers
440: WHERE rowid = X_Rowid;
441:
442: IF (SQL%NOTFOUND) THEN
443: RAISE NO_DATA_FOUND;

Line 448: END WSH_PACKED_CONTAINERS_PKG;

444: END IF;
445: END Delete_Row;
446:
447:
448: END WSH_PACKED_CONTAINERS_PKG;