DBA Data[Home] [Help]

APPS.WMS_CONTAINER_PVT dependencies on WMS_CONTAINER_PVT

Line 1: PACKAGE BODY WMS_CONTAINER_PVT AS

1: PACKAGE BODY WMS_CONTAINER_PVT AS
2: /* $Header: WMSVCNTB.pls 120.55.12010000.6 2008/12/19 20:59:09 mchemban ship $ */
3:
4: -- Global constant holding the package name
5: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_CONTAINER_PVT';

Line 5: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_CONTAINER_PVT';

1: PACKAGE BODY WMS_CONTAINER_PVT AS
2: /* $Header: WMSVCNTB.pls 120.55.12010000.6 2008/12/19 20:59:09 mchemban ship $ */
3:
4: -- Global constant holding the package name
5: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_CONTAINER_PVT';
6: g_pkg_version CONSTANT VARCHAR2(100) := '$Header: WMSVCNTB.pls 120.55.12010000.6 2008/12/19 20:59:09 mchemban ship $';
7:
8: -- Various debug levels
9: G_ERROR CONSTANT NUMBER := 1;

Line 2619: mdebug('Call to WMS_CONTAINER_PVT.Update_Locator_capacity failed !!!');

2615: );
2616:
2617: IF ( x_return_status <> fnd_api.g_ret_sts_success) THEN
2618: IF (l_debug = 1) THEN
2619: mdebug('Call to WMS_CONTAINER_PVT.Update_Locator_capacity failed !!!');
2620: END IF;
2621: END IF;
2622: END IF;
2623: /*ELSE

Line 4372: l_result := WMS_CONTAINER_PVT.validate_lpn(l_lpn, 1);

4368: l_progress := 'Retrieve valuse for parent LPN';
4369:
4370: l_lpn.lpn_id := p_lpn_id;
4371: l_lpn.license_plate_number := NULL;
4372: l_result := WMS_CONTAINER_PVT.validate_lpn(l_lpn, 1);
4373:
4374: IF (l_result = inv_validate.f) THEN
4375: IF (l_debug = 1) THEN
4376: mdebug(p_lpn_id || 'is an invalid lpn_id', G_ERROR);

Line 4411: l_result := WMS_CONTAINER_PVT.validate_lpn(l_content_lpn);

4407:
4408: IF ( p_content_lpn_id IS NOT NULL ) THEN
4409: l_progress := 'Validate Content LPN';
4410: l_content_lpn.lpn_id := p_content_lpn_id;
4411: l_result := WMS_CONTAINER_PVT.validate_lpn(l_content_lpn);
4412:
4413: IF (l_result = inv_validate.f) THEN
4414: IF (l_debug = 1) THEN
4415: mdebug(p_lpn_id || 'is an invalid lpn_id', G_ERROR);

Line 7976: l_lpn_is_valid NUMBER := WMS_CONTAINER_PVT.F;

7972: FROM wms_license_plate_numbers
7973: WHERE outermost_lpn_id = p_lpn_id;
7974:
7975: lpn_rec Nested_LPN_Cursor%ROWTYPE;
7976: l_lpn_is_valid NUMBER := WMS_CONTAINER_PVT.F;
7977: l_parent_lpn_id NUMBER;
7978: BEGIN
7979: IF (l_debug = 1) THEN
7980: mdebug(l_api_name || ' Entered ' || g_pkg_version, 1);

Line 7984: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN OR

7980: mdebug(l_api_name || ' Entered ' || g_pkg_version, 1);
7981: mdebug('orgid=' ||p_organization_id||' lpnid='||p_lpn_id||' type='||p_validation_type, G_MESSAGE);
7982: END IF;
7983:
7984: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN OR
7985: p_validation_type = WMS_CONTAINER_PVT.G_NO_ONHAND_EXISTS ) THEN
7986: l_progress := '100';
7987: -- Check if the lpn_id entered is the outermost
7988: BEGIN

Line 7985: p_validation_type = WMS_CONTAINER_PVT.G_NO_ONHAND_EXISTS ) THEN

7981: mdebug('orgid=' ||p_organization_id||' lpnid='||p_lpn_id||' type='||p_validation_type, G_MESSAGE);
7982: END IF;
7983:
7984: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN OR
7985: p_validation_type = WMS_CONTAINER_PVT.G_NO_ONHAND_EXISTS ) THEN
7986: l_progress := '100';
7987: -- Check if the lpn_id entered is the outermost
7988: BEGIN
7989: SELECT parent_lpn_id INTO l_parent_lpn_id

Line 8000: RETURN WMS_CONTAINER_PVT.F;

7996: mdebug('lpnid='||p_lpn_id|| ' does not exist', G_ERROR);
7997: END IF;
7998: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
7999: fnd_msg_pub.ADD;
8000: RETURN WMS_CONTAINER_PVT.F;
8001: END;
8002:
8003: l_progress := '110';
8004: IF ( l_parent_lpn_id IS NOT NULL ) THEN

Line 8010: RETURN WMS_CONTAINER_PVT.F;

8006: mdebug('lpnid='||p_lpn_id|| ' is not the outermost LPN', G_ERROR);
8007: END IF;
8008: fnd_message.set_name('WMS', 'WMS_LPN_NOT_OUTERMOST');
8009: fnd_msg_pub.ADD;
8010: RETURN WMS_CONTAINER_PVT.F;
8011: END IF;
8012: END IF;
8013:
8014: l_progress := '200';

Line 8020: l_lpn_is_valid := WMS_CONTAINER_PVT.T;

8016: FETCH Nested_LPN_Cursor INTO lpn_rec;
8017:
8018: l_progress := '210';
8019: IF ( Nested_LPN_Cursor%FOUND ) THEN
8020: l_lpn_is_valid := WMS_CONTAINER_PVT.T;
8021: l_progress := '220';
8022: WHILE ( l_lpn_is_valid = WMS_CONTAINER_PVT.T AND Nested_LPN_Cursor%FOUND ) LOOP
8023: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN ) THEN
8024: -- Check if the lpn is on a reservation

Line 8022: WHILE ( l_lpn_is_valid = WMS_CONTAINER_PVT.T AND Nested_LPN_Cursor%FOUND ) LOOP

8018: l_progress := '210';
8019: IF ( Nested_LPN_Cursor%FOUND ) THEN
8020: l_lpn_is_valid := WMS_CONTAINER_PVT.T;
8021: l_progress := '220';
8022: WHILE ( l_lpn_is_valid = WMS_CONTAINER_PVT.T AND Nested_LPN_Cursor%FOUND ) LOOP
8023: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN ) THEN
8024: -- Check if the lpn is on a reservation
8025: BEGIN
8026: SELECT WMS_CONTAINER_PVT.F

Line 8023: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN ) THEN

8019: IF ( Nested_LPN_Cursor%FOUND ) THEN
8020: l_lpn_is_valid := WMS_CONTAINER_PVT.T;
8021: l_progress := '220';
8022: WHILE ( l_lpn_is_valid = WMS_CONTAINER_PVT.T AND Nested_LPN_Cursor%FOUND ) LOOP
8023: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN ) THEN
8024: -- Check if the lpn is on a reservation
8025: BEGIN
8026: SELECT WMS_CONTAINER_PVT.F
8027: INTO l_lpn_is_valid

Line 8026: SELECT WMS_CONTAINER_PVT.F

8022: WHILE ( l_lpn_is_valid = WMS_CONTAINER_PVT.T AND Nested_LPN_Cursor%FOUND ) LOOP
8023: IF ( p_validation_type = WMS_CONTAINER_PVT.G_RECONFIGURE_LPN ) THEN
8024: -- Check if the lpn is on a reservation
8025: BEGIN
8026: SELECT WMS_CONTAINER_PVT.F
8027: INTO l_lpn_is_valid
8028: FROM mtl_reservations
8029: WHERE organization_id = p_organization_id
8030: AND lpn_id = lpn_rec.lpn_id

Line 8046: SELECT WMS_CONTAINER_PVT.F

8042:
8043: -- check to see if there are pending transactions or the
8044: -- lpn has been allocatied
8045: BEGIN
8046: SELECT WMS_CONTAINER_PVT.F
8047: INTO l_lpn_is_valid
8048: FROM mtl_material_transactions_temp
8049: WHERE organization_id = p_organization_id
8050: AND ( ALLOCATED_LPN_ID = lpn_rec.lpn_id OR

Line 8068: IF ( p_validation_type = WMS_CONTAINER_PVT.G_NO_ONHAND_EXISTS ) THEN

8064: NULL; --no rows fround everything is okay
8065: END;
8066: END IF;
8067:
8068: IF ( p_validation_type = WMS_CONTAINER_PVT.G_NO_ONHAND_EXISTS ) THEN
8069: -- check to see if there is any onhand quantity associated with lpn
8070: BEGIN
8071: SELECT WMS_CONTAINER_PVT.F
8072: INTO l_lpn_is_valid

Line 8071: SELECT WMS_CONTAINER_PVT.F

8067:
8068: IF ( p_validation_type = WMS_CONTAINER_PVT.G_NO_ONHAND_EXISTS ) THEN
8069: -- check to see if there is any onhand quantity associated with lpn
8070: BEGIN
8071: SELECT WMS_CONTAINER_PVT.F
8072: INTO l_lpn_is_valid
8073: FROM mtl_onhand_quantities_detail
8074: WHERE organization_id = p_organization_id
8075: AND lpn_id = lpn_rec.lpn_id

Line 8090: SELECT WMS_CONTAINER_PVT.F

8086: END;
8087:
8088: --check to see if there are any serial numbers associated with lpn
8089: BEGIN
8090: SELECT WMS_CONTAINER_PVT.F
8091: INTO l_lpn_is_valid
8092: FROM mtl_serial_numbers
8093: WHERE current_organization_id = p_organization_id
8094: AND lpn_id = lpn_rec.lpn_id

Line 8122: RETURN WMS_CONTAINER_PVT.F;

8118: WHEN OTHERS THEN
8119: IF (l_debug = 1) THEN
8120: mdebug(l_api_name ||' Error progress= '||l_progress||'SQL error: '|| SQLERRM(SQLCODE), G_ERROR);
8121: END IF;
8122: RETURN WMS_CONTAINER_PVT.F;
8123: END Validate_LPN;
8124:
8125: -- ----------------------------------------------------------------------------------
8126: -- ----------------------------------------------------------------------------------

Line 8876: END WMS_CONTAINER_PVT;

8872: END IF;
8873: END plan_delivery;
8874:
8875: -- End of package
8876: END WMS_CONTAINER_PVT;