DBA Data[Home] [Help]

APPS.WMS_CONTAINER2_PUB dependencies on WMS_CONTAINER_PUB

Line 46: l_lpn WMS_CONTAINER_PUB.LPN;

42: )
43: IS
44: l_api_name CONSTANT VARCHAR2(30) := 'Purge_LPN';
45: l_api_version CONSTANT NUMBER := 1.0;
46: l_lpn WMS_CONTAINER_PUB.LPN;
47: l_result NUMBER;
48: l_lpn_exist VARCHAR2(20);
49: l_lpn_contents_exist VARCHAR2(20);
50: l_lpn_serial_contents_exist VARCHAR2(20);

Line 100: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);

96:
97: /* Validate LPN */
98: l_lpn.lpn_id := p_lpn_id;
99: l_lpn.license_plate_number := NULL;
100: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
101: IF (l_result = INV_Validate.F) THEN
102: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
103: FND_MSG_PUB.ADD;
104: RAISE FND_API.G_EXC_ERROR;

Line 219: x_content_tbl OUT WMS_CONTAINER_PUB.WMS_Container_Tbl_Type

215: x_msg_count OUT NUMBER ,
216: x_msg_data OUT VARCHAR2 ,
217: p_lpn_id IN NUMBER ,
218: p_explosion_level IN NUMBER := 0 ,
219: x_content_tbl OUT WMS_CONTAINER_PUB.WMS_Container_Tbl_Type
220: )
221: IS
222: l_api_name CONSTANT VARCHAR2(30) := 'Explode_LPN';
223: l_api_version CONSTANT NUMBER := 1.0;

Line 224: l_lpn WMS_CONTAINER_PUB.LPN;

220: )
221: IS
222: l_api_name CONSTANT VARCHAR2(30) := 'Explode_LPN';
223: l_api_version CONSTANT NUMBER := 1.0;
224: l_lpn WMS_CONTAINER_PUB.LPN;
225: l_result NUMBER;
226: l_counter NUMBER := 1; -- Counter variable initialized to 1
227: l_current_lpn NUMBER;
228: CURSOR nested_lpn_cursor IS

Line 261: l_container_content_rec WMS_CONTAINER_PUB.WMS_Container_Content_Rec_Type;

257: SELECT inventory_item_id, current_organization_id, lpn_id,
258: revision, lot_number, serial_number, cost_group_id
259: FROM MTL_SERIAL_NUMBERS
260: WHERE lpn_id = l_current_lpn;
261: l_container_content_rec WMS_CONTAINER_PUB.WMS_Container_Content_Rec_Type;
262: l_temp_uom_code VARCHAR2(3);
263:
264: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
265: BEGIN

Line 291: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);

287:
288: /* Validate LPN */
289: l_lpn.lpn_id := p_lpn_id;
290: l_lpn.license_plate_number := NULL;
291: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
292: IF (l_result = INV_Validate.F) THEN
293: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
294: FND_MSG_PUB.ADD;
295: RAISE FND_API.G_EXC_ERROR;

Line 515: l_lpn_source WMS_CONTAINER_PUB.LPN;

511: )
512: IS
513: l_api_name CONSTANT VARCHAR2(30) := 'Transfer_LPN_Contents';
514: l_api_version CONSTANT NUMBER := 1.0;
515: l_lpn_source WMS_CONTAINER_PUB.LPN;
516: l_lpn_dest WMS_CONTAINER_PUB.LPN;
517: l_result NUMBER;
518:
519: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);

Line 516: l_lpn_dest WMS_CONTAINER_PUB.LPN;

512: IS
513: l_api_name CONSTANT VARCHAR2(30) := 'Transfer_LPN_Contents';
514: l_api_version CONSTANT NUMBER := 1.0;
515: l_lpn_source WMS_CONTAINER_PUB.LPN;
516: l_lpn_dest WMS_CONTAINER_PUB.LPN;
517: l_result NUMBER;
518:
519: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
520: BEGIN

Line 546: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn_source);

542:
543: /* Validate source LPN */
544: l_lpn_source.lpn_id := p_lpn_id_source;
545: l_lpn_source.license_plate_number := NULL;
546: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn_source);
547: IF (l_result = INV_Validate.F) THEN
548: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
549: FND_MSG_PUB.ADD;
550: RAISE FND_API.G_EXC_ERROR;

Line 556: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn_dest);

552:
553: /* Validate destination LPN */
554: l_lpn_dest.lpn_id := p_lpn_id_dest;
555: l_lpn_dest.license_plate_number := NULL;
556: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn_dest);
557: IF (l_result = INV_Validate.F) THEN
558: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
559: FND_MSG_PUB.ADD;
560: RAISE FND_API.G_EXC_ERROR;

Line 1004: x_lpn_list OUT WMS_CONTAINER_PUB.LPN_Table_Type

1000: p_inventory_item_id IN NUMBER := NULL ,
1001: p_revision IN VARCHAR2 := NULL ,
1002: p_lot_number IN VARCHAR2 := NULL ,
1003: p_serial_number IN VARCHAR2 := NULL ,
1004: x_lpn_list OUT WMS_CONTAINER_PUB.LPN_Table_Type
1005: )
1006: IS
1007: l_api_name CONSTANT VARCHAR2(30) := 'Get_Outermost_LPN';
1008: l_api_version CONSTANT NUMBER := 1.0;

Line 1024: l_lpn WMS_CONTAINER_PUB.LPN;

1020: SELECT *
1021: FROM WMS_LICENSE_PLATE_NUMBERS
1022: START WITH lpn_id = l_current_lpn
1023: CONNECT BY lpn_id = PRIOR parent_lpn_id;
1024: l_lpn WMS_CONTAINER_PUB.LPN;
1025: l_temp_table WMS_CONTAINER_PUB.LPN_Table_Type;
1026: l_index BINARY_INTEGER := 1;
1027: l_index_2 BINARY_INTEGER := 1;
1028: l_duplicate_index BINARY_INTEGER := 1;

Line 1025: l_temp_table WMS_CONTAINER_PUB.LPN_Table_Type;

1021: FROM WMS_LICENSE_PLATE_NUMBERS
1022: START WITH lpn_id = l_current_lpn
1023: CONNECT BY lpn_id = PRIOR parent_lpn_id;
1024: l_lpn WMS_CONTAINER_PUB.LPN;
1025: l_temp_table WMS_CONTAINER_PUB.LPN_Table_Type;
1026: l_index BINARY_INTEGER := 1;
1027: l_index_2 BINARY_INTEGER := 1;
1028: l_duplicate_index BINARY_INTEGER := 1;
1029: l_result NUMBER;

Line 1066: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);

1062: /* Validate LPN */
1063: IF (p_lpn_id IS NOT NULL) THEN
1064: l_lpn.lpn_id := p_lpn_id;
1065: l_lpn.license_plate_number := NULL;
1066: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
1067: IF (l_result = INV_Validate.F) THEN
1068: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
1069: FND_MSG_PUB.ADD;
1070: RAISE FND_API.G_EXC_ERROR;

Line 1259: x_lpn_list OUT WMS_CONTAINER_PUB.LPN_Table_Type

1255: p_revision IN VARCHAR2 := NULL ,
1256: p_lot_number IN VARCHAR2 := NULL ,
1257: p_serial_number IN VARCHAR2 := NULL ,
1258: p_container_item_id IN NUMBER := NULL ,
1259: x_lpn_list OUT WMS_CONTAINER_PUB.LPN_Table_Type
1260: )
1261: IS
1262: l_api_name CONSTANT VARCHAR2(30) := 'Get_LPN_List';
1263: l_api_version CONSTANT NUMBER := 1.0;

Line 1599: WMS_Container_PUB.LPN_CONTEXT_PREGENERATED THEN

1595: -- If the drop lpn was pre-generated, no validations required
1596: --
1597:
1598: IF drop_lpn_rec.lpn_context =
1599: WMS_Container_PUB.LPN_CONTEXT_PREGENERATED THEN
1600: --
1601: -- Update the context to "Resides in Inventory" (1)
1602: --
1603: /* UPDATE wms_license_plate_numbers

Line 1604: SET lpn_context = WMS_Container_PUB.LPN_CONTEXT_INV

1600: --
1601: -- Update the context to "Resides in Inventory" (1)
1602: --
1603: /* UPDATE wms_license_plate_numbers
1604: SET lpn_context = WMS_Container_PUB.LPN_CONTEXT_INV
1605: WHERE lpn_id = drop_lpn_rec.lpn_id;*/
1606:
1607: IF (l_debug = 1) THEN
1608: mdebug ('Drop LPN is pre-generated, no checking required.');

Line 1612: ELSIF drop_lpn_rec.lpn_context = WMS_Container_PUB.lpn_context_picked THEN

1608: mdebug ('Drop LPN is pre-generated, no checking required.');
1609: END IF;
1610: RETURN 1;
1611:
1612: ELSIF drop_lpn_rec.lpn_context = WMS_Container_PUB.lpn_context_picked THEN
1613: IF drop_lpn_rec.subinventory_code <> p_drop_sub or
1614: drop_lpn_rec.locator_id <> p_drop_loc THEN
1615: IF (l_debug = 1) THEN
1616: mdebug ('Drop LPN does not belong to the same sub and loc.');

Line 1623: WMS_Container_PUB.LPN_LOADED_FOR_SHIPMENT THEN

1619: END IF;
1620: END IF;
1621:
1622: IF drop_lpn_rec.lpn_context =
1623: WMS_Container_PUB.LPN_LOADED_FOR_SHIPMENT THEN
1624: IF (l_debug = 1) THEN
1625: mdebug ('Drop LPN is loaded to dock door already');
1626: END IF;
1627: RETURN 4; -- Drop LPN is loaded to dock door already

Line 1853: WMS_Container_PUB.LPN_CONTEXT_PREGENERATED THEN

1849: --
1850: -- If the drop lpn was pre-generated, no validations required
1851: --
1852: IF drop_lpn_rec.lpn_context =
1853: WMS_Container_PUB.LPN_CONTEXT_PREGENERATED THEN
1854: --
1855: -- Update the context to "Resides in Inventory" (1)
1856: --
1857: UPDATE wms_license_plate_numbers

Line 1858: SET lpn_context = WMS_Container_PUB.LPN_CONTEXT_INV

1854: --
1855: -- Update the context to "Resides in Inventory" (1)
1856: --
1857: UPDATE wms_license_plate_numbers
1858: SET lpn_context = WMS_Container_PUB.LPN_CONTEXT_INV
1859: WHERE lpn_id = drop_lpn_rec.lpn_id;
1860: IF (l_debug = 1) THEN
1861: mdebug ('Drop LPN is pre-generated, no checking required.');
1862: END IF;