244: -- ----------------------------------------------------------------------------------
245: -- ----------------------------------------------------------------------------------
246:
247: PROCEDURE To_LPNBulkRecType (
248: p_lpn_table IN WMS_Data_Type_Definitions_PUB.LPNTableType
249: , p_table_first IN NUMBER
250: , p_table_last IN NUMBER
251: , p_record_last IN NUMBER
252: , x_lpn_bulk_rec IN OUT NOCOPY LPNBulkRecType
320: -- ----------------------------------------------------------------------------------
321: -- ----------------------------------------------------------------------------------
322:
323: FUNCTION To_LPNBulkRecType (
324: p_lpn_table IN WMS_Data_Type_Definitions_PUB.LPNTableType
325: )
326: RETURN LPNBulkRecType
327: IS
328: l_lpn_bulk_rec LPNBulkRecType;
338: RETURN l_lpn_bulk_rec;
339: END To_LPNBulkRecType;
340:
341: FUNCTION To_DeliveryDetailsRecType (
342: p_lpn_record IN WMS_Data_Type_Definitions_PUB.LPNRecordType
343: )
344: RETURN WSH_Glbl_Var_Strct_GRP.Delivery_Details_Rec_Type IS
345:
346: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
438: -- ----------------------------------------------------------------------------------
439:
440: PROCEDURE Calc_Vol_Change (
441: p_debug IN NUMBER
442: , p_old_lpn IN WMS_Data_Type_Definitions_PUB.LPNRecordType
443: , p_new_lpn IN WMS_Data_Type_Definitions_PUB.LPNRecordType
444: , p_volume_change OUT NOCOPY NUMBER
445: , p_volume_uom_change OUT NOCOPY VARCHAR2
446: ) IS
439:
440: PROCEDURE Calc_Vol_Change (
441: p_debug IN NUMBER
442: , p_old_lpn IN WMS_Data_Type_Definitions_PUB.LPNRecordType
443: , p_new_lpn IN WMS_Data_Type_Definitions_PUB.LPNRecordType
444: , p_volume_change OUT NOCOPY NUMBER
445: , p_volume_uom_change OUT NOCOPY VARCHAR2
446: ) IS
447: l_api_name CONSTANT VARCHAR2(30) := 'Calc_Vol_Change';
711: , x_return_status OUT NOCOPY VARCHAR2
712: , x_msg_count OUT NOCOPY NUMBER
713: , x_msg_data OUT NOCOPY VARCHAR2
714: , p_caller IN VARCHAR2
715: , p_lpn_table IN OUT NOCOPY WMS_Data_Type_Definitions_PUB.LPNTableType
716: ) IS
717: l_api_name CONSTANT VARCHAR2(30) := 'Create_LPNs';
718: l_api_version CONSTANT NUMBER := 1.0;
719: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1127: , p_lpn_suffix IN VARCHAR2
1128: , p_starting_number IN NUMBER
1129: , p_total_lpn_length IN NUMBER
1130: , p_ucc_128_suffix_flag IN VARCHAR2
1131: , p_lpn_attributes IN WMS_Data_Type_Definitions_PUB.LPNRecordType
1132: , p_serial_ranges IN WMS_Data_Type_Definitions_PUB.SerialRangeTableType
1133: , x_created_lpns OUT NOCOPY WMS_Data_Type_Definitions_PUB.LPNTableType
1134: ) IS
1135: l_api_name CONSTANT VARCHAR2(30) := 'Auto_Create_LPNs';
1128: , p_starting_number IN NUMBER
1129: , p_total_lpn_length IN NUMBER
1130: , p_ucc_128_suffix_flag IN VARCHAR2
1131: , p_lpn_attributes IN WMS_Data_Type_Definitions_PUB.LPNRecordType
1132: , p_serial_ranges IN WMS_Data_Type_Definitions_PUB.SerialRangeTableType
1133: , x_created_lpns OUT NOCOPY WMS_Data_Type_Definitions_PUB.LPNTableType
1134: ) IS
1135: l_api_name CONSTANT VARCHAR2(30) := 'Auto_Create_LPNs';
1136: l_api_version CONSTANT NUMBER := 1.0;
1129: , p_total_lpn_length IN NUMBER
1130: , p_ucc_128_suffix_flag IN VARCHAR2
1131: , p_lpn_attributes IN WMS_Data_Type_Definitions_PUB.LPNRecordType
1132: , p_serial_ranges IN WMS_Data_Type_Definitions_PUB.SerialRangeTableType
1133: , x_created_lpns OUT NOCOPY WMS_Data_Type_Definitions_PUB.LPNTableType
1134: ) IS
1135: l_api_name CONSTANT VARCHAR2(30) := 'Auto_Create_LPNs';
1136: l_api_version CONSTANT NUMBER := 1.0;
1137: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1142: l_from_user CONSTANT NUMBER := 1;
1143: l_from_db_seq CONSTANT NUMBER := 2;
1144: l_from_org CONSTANT NUMBER := 3;
1145:
1146: l_lpn_tab WMS_Data_Type_Definitions_PUB.LPNTableType;
1147: l_serial_rec WMS_Data_Type_Definitions_PUB.SerialRangeRecordType;
1148:
1149: -- Local copies of input params that may need update from defaults
1150: l_quantity NUMBER := p_quantity ;
1143: l_from_db_seq CONSTANT NUMBER := 2;
1144: l_from_org CONSTANT NUMBER := 3;
1145:
1146: l_lpn_tab WMS_Data_Type_Definitions_PUB.LPNTableType;
1147: l_serial_rec WMS_Data_Type_Definitions_PUB.SerialRangeRecordType;
1148:
1149: -- Local copies of input params that may need update from defaults
1150: l_quantity NUMBER := p_quantity ;
1151: l_lpn_prefix VARCHAR2(50) := p_lpn_prefix;
1576: , x_return_status OUT NOCOPY VARCHAR2
1577: , x_msg_count OUT NOCOPY NUMBER
1578: , x_msg_data OUT NOCOPY VARCHAR2
1579: , p_caller IN VARCHAR2
1580: , p_lpn_table IN WMS_Data_Type_Definitions_PUB.LPNTableType
1581: ) IS
1582: l_api_name CONSTANT VARCHAR2(30) := 'Modify_LPNs';
1583: l_api_version CONSTANT NUMBER := 1.0;
1584: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1731: l_wsh_unpack_lpn_id_tbl wsh_util_core.id_tab_type;
1732: l_wsh_delete_lpn_id_tbl wsh_util_core.id_tab_type;
1733:
1734: -- Variables used to store LPN information
1735: l_lpn_ids WMS_Data_Type_Definitions_PUB.NumberTableType;
1736: l_outer_lpn_ids WMS_Data_Type_Definitions_PUB.NumberTableType;
1737:
1738: l_lpn_tab_i NUMBER;
1739: l_tmp_i NUMBER;
1732: l_wsh_delete_lpn_id_tbl wsh_util_core.id_tab_type;
1733:
1734: -- Variables used to store LPN information
1735: l_lpn_ids WMS_Data_Type_Definitions_PUB.NumberTableType;
1736: l_outer_lpn_ids WMS_Data_Type_Definitions_PUB.NumberTableType;
1737:
1738: l_lpn_tab_i NUMBER;
1739: l_tmp_i NUMBER;
1740: l_dummy_num NUMBER;
1738: l_lpn_tab_i NUMBER;
1739: l_tmp_i NUMBER;
1740: l_dummy_num NUMBER;
1741:
1742: l_tmp_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1743: l_tmp_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1744: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1745: l_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1746: l_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1739: l_tmp_i NUMBER;
1740: l_dummy_num NUMBER;
1741:
1742: l_tmp_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1743: l_tmp_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1744: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1745: l_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1746: l_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1747: l_outer_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1740: l_dummy_num NUMBER;
1741:
1742: l_tmp_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1743: l_tmp_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1744: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1745: l_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1746: l_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1747: l_outer_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1748: l_lpn_bulk_rec LPNBulkRecType;
1741:
1742: l_tmp_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1743: l_tmp_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1744: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1745: l_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1746: l_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1747: l_outer_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1748: l_lpn_bulk_rec LPNBulkRecType;
1749:
1742: l_tmp_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1743: l_tmp_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1744: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1745: l_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1746: l_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1747: l_outer_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1748: l_lpn_bulk_rec LPNBulkRecType;
1749:
1750: -- Temp variables needed for wt/vol calculation
1743: l_tmp_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1744: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
1745: l_old WMS_Data_Type_Definitions_PUB.LPNRecordType;
1746: l_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1747: l_outer_lpns WMS_Data_Type_Definitions_PUB.LPNTableType;
1748: l_lpn_bulk_rec LPNBulkRecType;
1749:
1750: -- Temp variables needed for wt/vol calculation
1751: l_change_in_gross_weight NUMBER;
3607: l_lpn_prefix VARCHAR2(50);
3608: l_lpn_suffix VARCHAR2(50);
3609: l_wms_org_flag BOOLEAN;
3610:
3611: l_lpn_att_rec WMS_Data_Type_Definitions_PUB.LPNRecordType;
3612: l_serial_tbl WMS_Data_Type_Definitions_PUB.SerialRangeTableType;
3613: l_gen_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3614:
3615: BEGIN
3608: l_lpn_suffix VARCHAR2(50);
3609: l_wms_org_flag BOOLEAN;
3610:
3611: l_lpn_att_rec WMS_Data_Type_Definitions_PUB.LPNRecordType;
3612: l_serial_tbl WMS_Data_Type_Definitions_PUB.SerialRangeTableType;
3613: l_gen_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3614:
3615: BEGIN
3616: IF (l_debug = 1) THEN
3609: l_wms_org_flag BOOLEAN;
3610:
3611: l_lpn_att_rec WMS_Data_Type_Definitions_PUB.LPNRecordType;
3612: l_serial_tbl WMS_Data_Type_Definitions_PUB.SerialRangeTableType;
3613: l_gen_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3614:
3615: BEGIN
3616: IF (l_debug = 1) THEN
3617: mdebug('Generate_LPN_CP Entered '|| g_pkg_version, 1);
3749: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3750: l_progress VARCHAR2(10) := '0';
3751:
3752: l_ucc_128_suffix_flag VARCHAR2(1);
3753: l_lpn_att_rec WMS_Data_Type_Definitions_PUB.LPNRecordType;
3754: l_serial_tbl WMS_Data_Type_Definitions_PUB.SerialRangeTableType;
3755: l_gen_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3756: l_lpn_bulk_rec LPNBulkRecType;
3757:
3750: l_progress VARCHAR2(10) := '0';
3751:
3752: l_ucc_128_suffix_flag VARCHAR2(1);
3753: l_lpn_att_rec WMS_Data_Type_Definitions_PUB.LPNRecordType;
3754: l_serial_tbl WMS_Data_Type_Definitions_PUB.SerialRangeTableType;
3755: l_gen_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3756: l_lpn_bulk_rec LPNBulkRecType;
3757:
3758: BEGIN
3751:
3752: l_ucc_128_suffix_flag VARCHAR2(1);
3753: l_lpn_att_rec WMS_Data_Type_Definitions_PUB.LPNRecordType;
3754: l_serial_tbl WMS_Data_Type_Definitions_PUB.SerialRangeTableType;
3755: l_gen_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3756: l_lpn_bulk_rec LPNBulkRecType;
3757:
3758: BEGIN
3759: SAVEPOINT GENERATE_LPN_PVT;
3910: l_api_name CONSTANT VARCHAR2(30) := 'Associate_LPN';
3911: l_api_version CONSTANT NUMBER := 1.0;
3912: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3913:
3914: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
3915: BEGIN
3916: -- Standard Start of API savepoint
3917: SAVEPOINT ASSOCIATE_LPN_PVT;
3918:
4037: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
4038: l_progress VARCHAR2(10) := '0';
4039: l_msgdata VARCHAR2(1000);
4040:
4041: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
4042:
4043: BEGIN
4044: -- Standard Start of API savepoint
4045: SAVEPOINT CREATE_LPN_PVT;
4189: l_wsh_action_prms WSH_GLBL_VAR_STRCT_GRP.dd_action_parameters_rec_type;
4190: l_wsh_defaults WSH_GLBL_VAR_STRCT_GRP.dd_default_parameters_rec_type;
4191: l_wsh_action_out_rec WSH_GLBL_VAR_STRCT_GRP.dd_action_out_rec_type;
4192:
4193: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
4194: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
4195: l_cont_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
4196:
4197: l_tmp_bulk_lpns LPNBulkRecType;
4190: l_wsh_defaults WSH_GLBL_VAR_STRCT_GRP.dd_default_parameters_rec_type;
4191: l_wsh_action_out_rec WSH_GLBL_VAR_STRCT_GRP.dd_action_out_rec_type;
4192:
4193: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
4194: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
4195: l_cont_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
4196:
4197: l_tmp_bulk_lpns LPNBulkRecType;
4198: l_tmp_i NUMBER;
4191: l_wsh_action_out_rec WSH_GLBL_VAR_STRCT_GRP.dd_action_out_rec_type;
4192:
4193: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
4194: l_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
4195: l_cont_new WMS_Data_Type_Definitions_PUB.LPNRecordType;
4196:
4197: l_tmp_bulk_lpns LPNBulkRecType;
4198: l_tmp_i NUMBER;
4199:
5870: ) IS
5871: l_api_name CONSTANT VARCHAR2(30) := 'Modify_LPN';
5872: l_api_version CONSTANT NUMBER := 1.0;
5873:
5874: l_lpn_table WMS_Data_Type_Definitions_PUB.LPNTableType;
5875:
5876: BEGIN
5877:
5878: l_lpn_table(1).lpn_id := p_lpn.lpn_id;
5971: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
5972: l_progress VARCHAR2(10) := '0';
5973: l_msgdata VARCHAR2(1000);
5974:
5975: l_lpn WMS_Data_Type_Definitions_PUB.LPNTableType;
5976:
5977: BEGIN
5978: -- Standard Start of API savepoint
5979: SAVEPOINT MODIFY_LPN_WRAPPER_PVT;