[Home] [Help]
2: /* $Header: INVPWSHB.pls 120.16.12020000.9 2013/05/02 05:53:05 raminoch ship $ */
3:
4: G_Debug BOOLEAN := TRUE;
5:
6: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.g_ret_sts_success;
7: G_RET_STS_ERROR VARCHAR2(1) := FND_API.g_ret_sts_error;
8: G_RET_STS_UNEXP_ERROR VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
9: G_FALSE VARCHAR2(1) := FND_API.G_FALSE;
10: G_TRUE VARCHAR2(1) := FND_API.G_TRUE;
3:
4: G_Debug BOOLEAN := TRUE;
5:
6: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.g_ret_sts_success;
7: G_RET_STS_ERROR VARCHAR2(1) := FND_API.g_ret_sts_error;
8: G_RET_STS_UNEXP_ERROR VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
9: G_FALSE VARCHAR2(1) := FND_API.G_FALSE;
10: G_TRUE VARCHAR2(1) := FND_API.G_TRUE;
11:
4: G_Debug BOOLEAN := TRUE;
5:
6: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.g_ret_sts_success;
7: G_RET_STS_ERROR VARCHAR2(1) := FND_API.g_ret_sts_error;
8: G_RET_STS_UNEXP_ERROR VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
9: G_FALSE VARCHAR2(1) := FND_API.G_FALSE;
10: G_TRUE VARCHAR2(1) := FND_API.G_TRUE;
11:
12: --Inline branching
5:
6: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.g_ret_sts_success;
7: G_RET_STS_ERROR VARCHAR2(1) := FND_API.g_ret_sts_error;
8: G_RET_STS_UNEXP_ERROR VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
9: G_FALSE VARCHAR2(1) := FND_API.G_FALSE;
10: G_TRUE VARCHAR2(1) := FND_API.G_TRUE;
11:
12: --Inline branching
13: g_wms_current_release_level NUMBER := wms_control.g_current_release_level;
6: G_RET_STS_SUCCESS VARCHAR2(1) := FND_API.g_ret_sts_success;
7: G_RET_STS_ERROR VARCHAR2(1) := FND_API.g_ret_sts_error;
8: G_RET_STS_UNEXP_ERROR VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
9: G_FALSE VARCHAR2(1) := FND_API.G_FALSE;
10: G_TRUE VARCHAR2(1) := FND_API.G_TRUE;
11:
12: --Inline branching
13: g_wms_current_release_level NUMBER := wms_control.g_current_release_level;
14: g_inv_current_release_level NUMBER := inv_control.g_current_release_level;
52:
53: l_details VARCHAR2(4000);
54:
55: BEGIN
56: x_return_status := FND_API.g_ret_sts_success;
57:
58: IF l_debug = 1 THEN
59: debug('Start of validate_ship_method','VALIDATE_SHIP_METHOD');
60: END IF;
98: l_entity_table(1).p_entity_id := p_delivery_id;
99: l_entity_table(1).p_shipmethod_code := p_shipmethod_code;
100:
101: wsh_fte_comp_constraint_grp.validate_constraint(p_api_version_number => 1.0,
102: p_init_msg_list => FND_API.G_TRUE,
103: p_entity_tab => l_entity_table,
104: x_msg_count => l_msg_count,
105: x_msg_data => l_msg_data,
106: x_return_status => l_return_status);
111: END IF;
112:
113: --treating warnings as errors also
114: IF l_return_status <> WSH_UTIL_CORE.g_ret_sts_success THEN
115: l_return_status := FND_API.g_ret_sts_error;
116: wsh_util_core.get_messages(
117: p_init_msg_list => 'Y',
118: x_summary => l_msg_data,
119: x_details => l_details,
134: WHEN OTHERS THEN
135: IF l_debug=1 THEN
136: debug('Unexpected error!', 'VALIDATE_SHIP_METHOD');
137: END IF;
138: x_return_status := FND_API.g_ret_sts_unexp_error;
139: END VALIDATE_SHIP_METHOD;
140: --
141:
142: FUNCTION GET_SHIPMETHOD_MEANING(p_ship_method_code IN VARCHAR2)
500: IF l_return_status IN (G_RET_STS_ERROR, G_RET_STS_UNEXP_ERROR) THEN
501: debug('wsh_integration.set_inv_pc_attributes failed'
502: || ' with status: ' || l_return_status,'GET_DELIVERY_LINE_SERIAL_INFO');
503: --check where to handle this error
504: RAISE fnd_api.g_exc_unexpected_error;
505: END IF;
506:
507: l_detail_attributes(1).action_flag := 'U';
508: l_detail_attributes(1).delivery_detail_id :=
523: IF l_return_status IN (G_RET_STS_ERROR, G_RET_STS_UNEXP_ERROR) THEN
524: debug('wsh_interface.update_shipping_attributes failed'
525: || ' with status: ' || l_return_status,'GET_DELIVERY_LINE_SERIAL_INFO');
526: --check where to handle this error
527: RAISE fnd_api.g_exc_unexpected_error;
528: END IF;
529: ELSE
530: select count(*)
531: into l_num_serial_record
666: WHERE wda.delivery_detail_id = wdd.delivery_detail_id
667: AND wdd.lpn_id IS NOT NULL;
668:
669: BEGIN
670: x_return_status := FND_API.G_RET_STS_SUCCESS;
671: IF (l_debug = 1) THEN
672: debug('Entering the new return_to_stock ','wshtxn');
673: END IF;
674:
770: x_out_rows => l_out_rows,
771: x_return_status => l_return_status
772: );
773:
774: IF (l_return_status = fnd_api.g_ret_sts_error) THEN
775: IF (l_debug = 1) THEN
776: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
777: END IF;
778: RAISE fnd_api.g_exc_error;
774: IF (l_return_status = fnd_api.g_ret_sts_error) THEN
775: IF (l_debug = 1) THEN
776: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
777: END IF;
778: RAISE fnd_api.g_exc_error;
779: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
780: IF (l_debug = 1) THEN
781: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
782: END IF;
775: IF (l_debug = 1) THEN
776: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
777: END IF;
778: RAISE fnd_api.g_exc_error;
779: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
780: IF (l_debug = 1) THEN
781: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
782: END IF;
783: RAISE fnd_api.g_exc_unexpected_error;
779: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
780: IF (l_debug = 1) THEN
781: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
782: END IF;
783: RAISE fnd_api.g_exc_unexpected_error;
784: ELSIF l_return_status = fnd_api.g_ret_sts_success THEN
785: COMMIT;
786: END IF;
787:
780: IF (l_debug = 1) THEN
781: DEBUG('return error from shipping Backorder', 'INV_RETURN_TO_STOCK');
782: END IF;
783: RAISE fnd_api.g_exc_unexpected_error;
784: ELSIF l_return_status = fnd_api.g_ret_sts_success THEN
785: COMMIT;
786: END IF;
787:
788:
795: END IF;
796:
797: WMS_CONTAINER_PVT.Modify_LPNs(
798: p_api_version => 1.0
799: , p_init_msg_list => fnd_api.g_true
800: , p_commit => fnd_api.g_false
801: , x_return_status => l_return_status
802: , x_msg_count => x_msg_count
803: , x_msg_data => x_msg_data
796:
797: WMS_CONTAINER_PVT.Modify_LPNs(
798: p_api_version => 1.0
799: , p_init_msg_list => fnd_api.g_true
800: , p_commit => fnd_api.g_false
801: , x_return_status => l_return_status
802: , x_msg_count => x_msg_count
803: , x_msg_data => x_msg_data
804: , p_caller => 'WMS_SHIPPING'
803: , x_msg_data => x_msg_data
804: , p_caller => 'WMS_SHIPPING'
805: , p_lpn_table => l_lpn_tbl
806: );
807: IF (l_return_status = fnd_api.g_ret_sts_error) THEN
808: IF (l_debug = 1) THEN
809: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
810: END IF;
811: RAISE fnd_api.g_exc_error;
807: IF (l_return_status = fnd_api.g_ret_sts_error) THEN
808: IF (l_debug = 1) THEN
809: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
810: END IF;
811: RAISE fnd_api.g_exc_error;
812: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
813: IF (l_debug = 1) THEN
814: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
815: END IF;
808: IF (l_debug = 1) THEN
809: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
810: END IF;
811: RAISE fnd_api.g_exc_error;
812: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
813: IF (l_debug = 1) THEN
814: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
815: END IF;
816: RAISE fnd_api.g_exc_unexpected_error;
812: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
813: IF (l_debug = 1) THEN
814: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
815: END IF;
816: RAISE fnd_api.g_exc_unexpected_error;
817: ELSIF l_return_status = fnd_api.g_ret_sts_success THEN
818: null;
819: END IF;
820: EXCEPTION
813: IF (l_debug = 1) THEN
814: DEBUG('return error from WMS_CONTAINER_PVT.Modify_LPNs', 'INV_RETURN_TO_STOCK');
815: END IF;
816: RAISE fnd_api.g_exc_unexpected_error;
817: ELSIF l_return_status = fnd_api.g_ret_sts_success THEN
818: null;
819: END IF;
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
817: ELSIF l_return_status = fnd_api.g_ret_sts_success THEN
818: null;
819: END IF;
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
824: , p_data => x_msg_data);
825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
818: null;
819: END IF;
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
824: , p_data => x_msg_data);
825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
824: , p_data => x_msg_data);
825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
828: , p_data => x_msg_data);
829: WHEN OTHERS THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
824: , p_data => x_msg_data);
825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
828: , p_data => x_msg_data);
829: WHEN OTHERS THEN
830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
828: , p_data => x_msg_data);
829: WHEN OTHERS THEN
830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
831: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
832: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, 'INV_RETURN_TO_STOCK');
833: END IF;
834: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
875: IF l_debug = 1 THEN
876: debug('wsh_delivery_details_pub.update_shipping_attributes failed'
877: || ' with status: ' || x_return_status, 'INV_DELAY_SHIPMENT');
878: END IF;
879: RAISE fnd_api.g_exc_unexpected_error;
880: END IF;
881:
882: EXCEPTION
883: WHEN fnd_api.g_exc_unexpected_error THEN
879: RAISE fnd_api.g_exc_unexpected_error;
880: END IF;
881:
882: EXCEPTION
883: WHEN fnd_api.g_exc_unexpected_error THEN
884: wsh_util_core.get_messages
885: (p_init_msg_list => 'Y',
886: x_summary => x_msg_data,
887: x_details => l_details,
897: p_shipped_quantity IN NUMBER,
898: x_return_status OUT NOCOPY VARCHAR2,
899: x_msg_data OUT NOCOPY VARCHAR2,
900: x_msg_count OUT NOCOPY NUMBER,
901: p_commit_flag IN VARCHAR2 DEFAULT FND_API.g_true,
902: p_relieve_rsv IN VARCHAR2 DEFAULT 'Y')
903: IS
904: cursor delivery_line(p_delivery_detail_id NUMBER) is
905: select dd.delivery_detail_id, dd.requested_quantity, dd.picked_quantity
949: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
950: l_global_param_rec WSH_SHIPPING_PARAMS_PVT.Global_Parameters_Rec_Typ; --6607967 --FP6922321
951: l_return_shipping_status VARCHAR2(30); --6607967--FP6922321
952: BEGIN
953: x_return_status := fnd_api.g_ret_sts_success;
954:
955: --this cursor only returns 1 record because delivery_line_id is an
956: --unique key
957:
1088: END IF;
1089:
1090: WSH_DELIVERY_DETAILS_PUB.split_line
1091: (p_api_version => 1.0,
1092: p_init_msg_list => fnd_api.g_false,
1093: p_commit => p_commit_flag,
1094: x_return_status => l_return_status,
1095: x_msg_count => l_msg_count,
1096: x_msg_data => l_msg_data,
1098: x_new_detail_id => l_bo_delivery_detail_id,
1099: x_split_quantity => l_backorder_quantities_table(1),
1100: x_split_quantity2 => l_dummy_num_var);
1101:
1102: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1103: IF l_debug = 1 THEN
1104: debug('WSH_DELIVERY_DETAILS_PUB.split_line failed',
1105: 'INV_LINE_RETURN_TO_STOCK');
1106: END IF;
1104: debug('WSH_DELIVERY_DETAILS_PUB.split_line failed',
1105: 'INV_LINE_RETURN_TO_STOCK');
1106: END IF;
1107:
1108: RAISE fnd_api.g_exc_unexpected_error;
1109: END IF;
1110:
1111: l_detail_attributes(1).delivery_detail_id :=
1112: l_delivery_details_id_table(1);
1113: l_detail_attributes(1).shipped_quantity := p_shipped_quantity;
1114:
1115: wsh_delivery_details_pub.update_shipping_attributes
1116: (p_api_version_number => 1.0,
1117: p_init_msg_list => fnd_api.g_false,
1118: p_commit => p_commit_flag,
1119: x_return_status => l_return_status,
1120: x_msg_count => l_msg_count,
1121: x_msg_data => l_msg_data,
1121: x_msg_data => l_msg_data,
1122: p_changed_attributes => l_detail_attributes,
1123: p_source_code => 'OE');
1124:
1125: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1126: IF l_debug = 1 THEN
1127: debug('wsh_delivery_details_pub.update_shipping_attributesfailed',
1128: 'INV_LINE_RETURN_TO_STOCK');
1129: END IF;
1127: debug('wsh_delivery_details_pub.update_shipping_attributesfailed',
1128: 'INV_LINE_RETURN_TO_STOCK');
1129: END IF;
1130:
1131: RAISE fnd_api.g_exc_unexpected_error;
1132: END IF;
1133:
1134: l_delivery_details_id_table(1) := l_bo_delivery_detail_id;
1135: END IF;
1168: x_out_rows => l_out_rows,
1169: x_return_status => l_return_status);
1170:
1171:
1172: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1173: IF l_debug = 1 THEN
1174: debug('wsh_ship_confirm_actions2.backorder failed',
1175: 'INV_LINE_RETURN_TO_STOCK');
1176: END IF;
1174: debug('wsh_ship_confirm_actions2.backorder failed',
1175: 'INV_LINE_RETURN_TO_STOCK');
1176: END IF;
1177:
1178: RAISE fnd_api.g_exc_unexpected_error;
1179: END IF;
1180:
1181: IF p_commit_flag = fnd_api.g_true THEN
1182: IF l_debug = 1 THEN
1177:
1178: RAISE fnd_api.g_exc_unexpected_error;
1179: END IF;
1180:
1181: IF p_commit_flag = fnd_api.g_true THEN
1182: IF l_debug = 1 THEN
1183: debug('Successful, so commit everything','INV_LINE_RETURN_TO_STOCK');
1184: END IF;
1185: commit;
1184: END IF;
1185: commit;
1186: END IF;
1187: EXCEPTION
1188: WHEN FND_API.G_EXC_ERROR THEN
1189: x_return_status := FND_API.G_RET_STS_ERROR;
1190: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1191: , p_data => x_msg_data);
1192: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1185: commit;
1186: END IF;
1187: EXCEPTION
1188: WHEN FND_API.G_EXC_ERROR THEN
1189: x_return_status := FND_API.G_RET_STS_ERROR;
1190: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1191: , p_data => x_msg_data);
1192: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1188: WHEN FND_API.G_EXC_ERROR THEN
1189: x_return_status := FND_API.G_RET_STS_ERROR;
1190: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1191: , p_data => x_msg_data);
1192: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1194: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1195: , p_data => x_msg_data);
1196: WHEN OTHERS THEN
1189: x_return_status := FND_API.G_RET_STS_ERROR;
1190: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1191: , p_data => x_msg_data);
1192: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1194: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1195: , p_data => x_msg_data);
1196: WHEN OTHERS THEN
1197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1194: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1195: , p_data => x_msg_data);
1196: WHEN OTHERS THEN
1197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1198: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1199: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, 'INV_LINE_RETURN_TO_STOCK');
1200: END IF;
1201: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1213: p_sec_shipped_quantity IN NUMBER,
1214: x_return_status OUT NOCOPY VARCHAR2,
1215: x_msg_data OUT NOCOPY VARCHAR2,
1216: x_msg_count OUT NOCOPY NUMBER,
1217: p_commit_flag IN VARCHAR2 DEFAULT FND_API.g_true,
1218: p_relieve_rsv IN VARCHAR2 DEFAULT 'Y')
1219: IS
1220:
1221: /* Change the cursor to pick up secondary picked and requested quantities */
1268: l_msg_data VARCHAR2(2000);
1269:
1270: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1271: BEGIN
1272: x_return_status := fnd_api.g_ret_sts_success;
1273:
1274: --this cursor only returns 1 record because delivery_line_id is an
1275: --unique key
1276: OPEN delivery_line(p_delivery_line_id);
1363: END IF;
1364:
1365: WSH_DELIVERY_DETAILS_PUB.split_line
1366: (p_api_version => 1.0,
1367: p_init_msg_list => fnd_api.g_false,
1368: p_commit => p_commit_flag,
1369: x_return_status => l_return_status,
1370: x_msg_count => l_msg_count,
1371: x_msg_data => l_msg_data,
1373: x_new_detail_id => l_bo_delivery_detail_id,
1374: x_split_quantity => l_backorder_quantities_table(1),
1375: x_split_quantity2 => l_sec_bck_qtys_table(1));
1376:
1377: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1378: IF l_debug = 1 THEN
1379: debug('WSH_DELIVERY_DETAILS_PUB.split_line failed',
1380: 'INV_LINE_RETURN_TO_STOCK');
1381: END IF;
1379: debug('WSH_DELIVERY_DETAILS_PUB.split_line failed',
1380: 'INV_LINE_RETURN_TO_STOCK');
1381: END IF;
1382:
1383: RAISE fnd_api.g_exc_unexpected_error;
1384: END IF;
1385:
1386: l_detail_attributes(1).delivery_detail_id :=
1387: l_delivery_details_id_table(1);
1391: l_detail_attributes(1).shipped_quantity2 := p_sec_shipped_quantity;
1392:
1393: wsh_delivery_details_pub.update_shipping_attributes
1394: (p_api_version_number => 1.0,
1395: p_init_msg_list => fnd_api.g_false,
1396: p_commit => p_commit_flag,
1397: x_return_status => l_return_status,
1398: x_msg_count => l_msg_count,
1399: x_msg_data => l_msg_data,
1399: x_msg_data => l_msg_data,
1400: p_changed_attributes => l_detail_attributes,
1401: p_source_code => 'OE');
1402:
1403: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1404: IF l_debug = 1 THEN
1405: debug('wsh_delivery_details_pub.update_shipping_attributesfailed',
1406: 'INV_LINE_RETURN_TO_STOCK');
1407: END IF;
1405: debug('wsh_delivery_details_pub.update_shipping_attributesfailed',
1406: 'INV_LINE_RETURN_TO_STOCK');
1407: END IF;
1408:
1409: RAISE fnd_api.g_exc_unexpected_error;
1410: END IF;
1411:
1412: l_delivery_details_id_table(1) := l_bo_delivery_detail_id;
1413: END IF;
1435: x_out_rows => l_out_rows,
1436: x_return_status => l_return_status);
1437:
1438:
1439: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1440: IF l_debug = 1 THEN
1441: debug('wsh_ship_confirm_actions2.backorder failed',
1442: 'INV_LINE_RETURN_TO_STOCK');
1443: END IF;
1441: debug('wsh_ship_confirm_actions2.backorder failed',
1442: 'INV_LINE_RETURN_TO_STOCK');
1443: END IF;
1444:
1445: RAISE fnd_api.g_exc_unexpected_error;
1446: END IF;
1447:
1448: IF p_commit_flag = fnd_api.g_true THEN
1449: IF l_debug = 1 THEN
1444:
1445: RAISE fnd_api.g_exc_unexpected_error;
1446: END IF;
1447:
1448: IF p_commit_flag = fnd_api.g_true THEN
1449: IF l_debug = 1 THEN
1450: debug('Successful, so commit everything','INV_LINE_RETURN_TO_STOCK');
1451: END IF;
1452: commit;
1451: END IF;
1452: commit;
1453: END IF;
1454: EXCEPTION
1455: WHEN FND_API.G_EXC_ERROR THEN
1456: x_return_status := FND_API.G_RET_STS_ERROR;
1457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1458: , p_data => x_msg_data);
1459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1452: commit;
1453: END IF;
1454: EXCEPTION
1455: WHEN FND_API.G_EXC_ERROR THEN
1456: x_return_status := FND_API.G_RET_STS_ERROR;
1457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1458: , p_data => x_msg_data);
1459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1455: WHEN FND_API.G_EXC_ERROR THEN
1456: x_return_status := FND_API.G_RET_STS_ERROR;
1457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1458: , p_data => x_msg_data);
1459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1461: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1462: , p_data => x_msg_data);
1463: WHEN OTHERS THEN
1456: x_return_status := FND_API.G_RET_STS_ERROR;
1457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1458: , p_data => x_msg_data);
1459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1461: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1462: , p_data => x_msg_data);
1463: WHEN OTHERS THEN
1464: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1461: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1462: , p_data => x_msg_data);
1463: WHEN OTHERS THEN
1464: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1465: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1466: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, 'INV_LINE_RETURN_TO_STOCK');
1467: END IF;
1468: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1501: IF l_debug = 1 THEN
1502: debug('wsh_delivery_details_pub.update_shipping_attributes failed'
1503: || ' with status: ' || x_return_status, 'INV_REPORT_MISSING_QTY');
1504: END IF;
1505: RAISE fnd_api.g_exc_unexpected_error;
1506: END IF;
1507:
1508: EXCEPTION
1509: WHEN fnd_api.g_exc_unexpected_error THEN
1505: RAISE fnd_api.g_exc_unexpected_error;
1506: END IF;
1507:
1508: EXCEPTION
1509: WHEN fnd_api.g_exc_unexpected_error THEN
1510: wsh_util_core.get_messages
1511: (p_init_msg_list => 'Y',
1512: x_summary => x_msg_data,
1513: x_details => l_details,
1564: IF l_debug = 1 THEN
1565: debug('wsh_delivery_details_pub.update_shipping_attributes failed'
1566: || ' with status: ' || x_return_status, 'INV_REPORT_MISSING_QTY');
1567: END IF;
1568: RAISE fnd_api.g_exc_unexpected_error;
1569: END IF;
1570:
1571: EXCEPTION
1572: WHEN fnd_api.g_exc_unexpected_error THEN
1568: RAISE fnd_api.g_exc_unexpected_error;
1569: END IF;
1570:
1571: EXCEPTION
1572: WHEN fnd_api.g_exc_unexpected_error THEN
1573: wsh_util_core.get_messages
1574: (p_init_msg_list => 'Y',
1575: x_summary => x_msg_data,
1576: x_details => l_details,
1682: IF l_debug = 1 THEN
1683: debug('wsh_delivery_details_pub.update_shipping_attributes failed'
1684: || ' with status: ' || x_return_status, 'SUBMIT_DELIVERY_LINE');
1685: END IF;
1686: RAISE fnd_api.g_exc_unexpected_error;
1687: END IF;
1688: EXCEPTION
1689: WHEN fnd_api.g_exc_unexpected_error THEN
1690: wsh_util_core.get_messages
1685: END IF;
1686: RAISE fnd_api.g_exc_unexpected_error;
1687: END IF;
1688: EXCEPTION
1689: WHEN fnd_api.g_exc_unexpected_error THEN
1690: wsh_util_core.get_messages
1691: (p_init_msg_list => 'Y',
1692: x_summary => x_msg_data,
1693: x_details => l_details,
1816: IF l_debug = 1 THEN
1817: debug('wsh_delivery_details_pub.update_shipping_attributes failed'
1818: || ' with status: ' || x_return_status, 'SUBMIT_DELIVERY_LINE');
1819: END IF;
1820: RAISE fnd_api.g_exc_unexpected_error;
1821: END IF;
1822: EXCEPTION
1823: WHEN fnd_api.g_exc_unexpected_error THEN
1824: wsh_util_core.get_messages
1819: END IF;
1820: RAISE fnd_api.g_exc_unexpected_error;
1821: END IF;
1822: EXCEPTION
1823: WHEN fnd_api.g_exc_unexpected_error THEN
1824: wsh_util_core.get_messages
1825: (p_init_msg_list => 'Y',
1826: x_summary => x_msg_data,
1827: x_details => l_details,
2234: loop
2235: WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Detail_from_Delivery(
2236: l_delivery_detail_id.delivery_detail_id,
2237: l_return_status);
2238: exit when l_return_status<>FND_API.G_RET_STS_SUCCESS;
2239: end loop;
2240: x_return_Status := l_return_status;
2241: END UNASSIGN_DELIVERY_LINES;
2242:
2476: x_return_status => x_return_status,
2477: x_msg_count => l_msg_count,
2478: x_msg_data => x_error_msg);
2479:
2480: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2481: RAISE fnd_api.g_exc_error;
2482: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
2483: RAISE fnd_api.g_exc_unexpected_error;
2484: END IF;
2477: x_msg_count => l_msg_count,
2478: x_msg_data => x_error_msg);
2479:
2480: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2481: RAISE fnd_api.g_exc_error;
2482: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
2483: RAISE fnd_api.g_exc_unexpected_error;
2484: END IF;
2485:
2478: x_msg_data => x_error_msg);
2479:
2480: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2481: RAISE fnd_api.g_exc_error;
2482: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
2483: RAISE fnd_api.g_exc_unexpected_error;
2484: END IF;
2485:
2486: IF l_allow_shipping <> 'Y' THEN
2479:
2480: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
2481: RAISE fnd_api.g_exc_error;
2482: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
2483: RAISE fnd_api.g_exc_unexpected_error;
2484: END IF;
2485:
2486: IF l_allow_shipping <> 'Y' THEN
2487: x_error_code := 6; -- Delivery is a part of consol delivery
2494: x_msg_count => l_msg_count,
2495: x_msg_data => x_error_msg,
2496: p_organization_id => l_organization_id);
2497:
2498: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2499: RAISE FND_API.G_EXC_ERROR;
2500: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2502: END IF;
2495: x_msg_data => x_error_msg,
2496: p_organization_id => l_organization_id);
2497:
2498: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2499: RAISE FND_API.G_EXC_ERROR;
2500: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2502: END IF;
2503:
2496: p_organization_id => l_organization_id);
2497:
2498: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2499: RAISE FND_API.G_EXC_ERROR;
2500: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2502: END IF;
2503:
2504: IF (NOT l_wms_org_flag AND g_inv_current_release_level >= g_j_release_level)
2497:
2498: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2499: RAISE FND_API.G_EXC_ERROR;
2500: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2502: END IF;
2503:
2504: IF (NOT l_wms_org_flag AND g_inv_current_release_level >= g_j_release_level)
2505: OR (l_wms_org_flag AND g_wms_current_release_level >= g_j_release_level) THEN
2510: l_delivery_id_tab(1) := p_delivery_id;
2511:
2512: wsh_interface_ext_grp.Delivery_Action
2513: (p_api_version_number => 1.0,
2514: p_init_msg_list => fnd_api.g_false,
2515: p_commit => fnd_api.g_false,
2516: p_action_prms => l_action_prms,
2517: p_delivery_id_tab => l_delivery_id_tab,
2518: x_delivery_out_rec => l_delivery_out_rec,
2511:
2512: wsh_interface_ext_grp.Delivery_Action
2513: (p_api_version_number => 1.0,
2514: p_init_msg_list => fnd_api.g_false,
2515: p_commit => fnd_api.g_false,
2516: p_action_prms => l_action_prms,
2517: p_delivery_id_tab => l_delivery_id_tab,
2518: x_delivery_out_rec => l_delivery_out_rec,
2519: x_return_status => l_return_status,
2556: incomplete_delivery EXCEPTION;
2557:
2558: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2559: BEGIN
2560: x_return_status := FND_API.G_RET_STS_SUCCESS;
2561: x_ret_code := 0;
2562: fnd_msg_pub.initialize;
2563:
2564: IF l_debug=1 THEN
2576: FND_MESSAGE.SET_TOKEN('SHIP_SET_NAME', l_ship_set);
2577: FND_MSG_PUB.ADD;
2578: RAISE unspec_ship_set_exists;
2579: ELSIF x_return_status = 'U' THEN
2580: RAISE fnd_api.g_exc_unexpected_error;
2581: END IF;
2582:
2583: INV_SHIPPING_TRANSACTION_PUB.CHECK_COMPLETE_DELVIERY(
2584: p_delivery_id => p_delivery_id,
2594: ELSIF x_return_status = 'U' THEN
2595: IF l_debug = 1 THEN
2596: debug('check_complete_deliery failed with status U','CONFIRM_DELIVERY');
2597: END IF;
2598: RAISE fnd_api.g_exc_unexpected_error;
2599: END IF;
2600:
2601: WMS_SHIPPING_TRANSACTION_PUB.SHIP_CONFIRM_ALL(
2602: p_delivery_id => p_delivery_id,
2630: x_msg_count => x_msg_count);
2631: END IF;
2632:
2633: IF x_return_status not in ('S','W') THEN
2634: RAISE fnd_api.g_exc_unexpected_error;
2635: END IF;
2636:
2637: EXCEPTION
2638: WHEN unspec_ship_set_exists THEN
2635: END IF;
2636:
2637: EXCEPTION
2638: WHEN unspec_ship_set_exists THEN
2639: x_return_status := fnd_api.g_ret_sts_error;
2640: x_ret_code := 1;
2641:
2642: -- Get message count and data
2643: fnd_msg_pub.count_and_get
2645: , p_data => x_msg_data
2646: );
2647:
2648: WHEN incomplete_delivery THEN
2649: x_return_status := fnd_api.g_ret_sts_error;
2650: x_ret_code := 2;
2651:
2652: -- Get message count and data
2653: fnd_msg_pub.count_and_get
2655: , p_data => x_msg_data
2656: );
2657:
2658: WHEN OTHERS THEN
2659: x_return_status := fnd_api.g_ret_sts_unexp_error;
2660:
2661: END CONFIRM_DELIVERY;
2662:
2663:
2684: INV_SHIPPING_TRANSACTION_PUB.UNASSIGN_DELIVERY_LINES(
2685: p_delivery_id => p_delivery_id,
2686: x_return_Status => x_return_status,
2687: x_error_msg => l_error_msg);
2688: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2689: RAISE unassign_lines_exc;
2690: END IF;
2691:
2692: WMS_SHIPPING_TRANSACTION_PUB.SHIP_CONFIRM_ALL(
2708: debug('Return status after SHIP_CONFIRM_ALL :' || x_return_status ,'UNASSIGN_LINES_AND_CONFIRM ');
2709: END IF;
2710:
2711: IF x_return_status not in ('S','W') THEN
2712: RAISE fnd_api.g_exc_unexpected_error;
2713: END IF;
2714:
2715: EXCEPTION
2716: WHEN unassign_lines_exc THEN
2713: END IF;
2714:
2715: EXCEPTION
2716: WHEN unassign_lines_exc THEN
2717: x_return_status := fnd_api.g_ret_sts_error;
2718:
2719: WHEN OTHERS THEN
2720: x_return_status := fnd_api.g_ret_sts_unexp_error;
2721:
2716: WHEN unassign_lines_exc THEN
2717: x_return_status := fnd_api.g_ret_sts_error;
2718:
2719: WHEN OTHERS THEN
2720: x_return_status := fnd_api.g_ret_sts_unexp_error;
2721:
2722: -- Get message count and data
2723: fnd_msg_pub.count_and_get
2724: ( p_count => x_msg_count
2782: p_req_quantity => l_delay_quantity,
2783: x_new_detail_id => l_new_delivery_line_id,
2784: x_return_status => l_return_status
2785: );
2786: if l_return_status <> fnd_api.g_ret_sts_success THEN
2787: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2788: end if;
2789:
2790: select transaction_temp_id
2783: x_new_detail_id => l_new_delivery_line_id,
2784: x_return_status => l_return_status
2785: );
2786: if l_return_status <> fnd_api.g_ret_sts_success THEN
2787: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2788: end if;
2789:
2790: select transaction_temp_id
2791: into l_new_transaction_temp_id
2828: debug('wsh_integration.set_inv_pc_attributes failed'
2829: || ' with status: ' || l_return_status,'INV_SPLIT_DELIVERY_LINE');
2830: END IF;
2831: --check where to handle this error
2832: RAISE fnd_api.g_exc_unexpected_error;
2833: END IF;
2834:
2835: l_detail_attributes(1).shipped_quantity := 0;
2836: l_detail_attributes(1).delivery_detail_id := l_new_delivery_line_id;
2846: debug('wsh_interface.update_shipping_attributes failed'
2847: || ' with status: ' || l_return_status,'INV_SPLIT_DELIVERY_LINE');
2848: END IF;
2849: --check where to handle this error
2850: RAISE fnd_api.g_exc_unexpected_error;
2851: END IF;
2852:
2853: x_return_status := FND_API.G_RET_STS_SUCCESS;
2854: x_new_delivery_detail_id := l_new_delivery_line_id;
2849: --check where to handle this error
2850: RAISE fnd_api.g_exc_unexpected_error;
2851: END IF;
2852:
2853: x_return_status := FND_API.G_RET_STS_SUCCESS;
2854: x_new_delivery_detail_id := l_new_delivery_line_id;
2855: x_new_transaction_temp_id := l_new_transaction_temp_id;
2856: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2857: EXCEPTION
2854: x_new_delivery_detail_id := l_new_delivery_line_id;
2855: x_new_transaction_temp_id := l_new_transaction_temp_id;
2856: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2857: EXCEPTION
2858: WHEN FND_API.G_EXC_ERROR THEN
2859: x_return_status := FND_API.G_RET_STS_ERROR;
2860: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2861: END INV_SPLIT_DELIVERY_LINE;
2862:
2855: x_new_transaction_temp_id := l_new_transaction_temp_id;
2856: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2857: EXCEPTION
2858: WHEN FND_API.G_EXC_ERROR THEN
2859: x_return_status := FND_API.G_RET_STS_ERROR;
2860: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2861: END INV_SPLIT_DELIVERY_LINE;
2862:
2863:
2950: );
2951: END IF;
2952:
2953:
2954: if l_return_status <> fnd_api.g_ret_sts_success THEN
2955: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2956: end if;
2957:
2958: select transaction_temp_id
2951: END IF;
2952:
2953:
2954: if l_return_status <> fnd_api.g_ret_sts_success THEN
2955: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2956: end if;
2957:
2958: select transaction_temp_id
2959: into l_new_transaction_temp_id
2996: debug('wsh_integration.set_inv_pc_attributes failed'
2997: || ' with status: ' || l_return_status,'INV_SPLIT_DELIVERY_LINE');
2998: END IF;
2999: --check where to handle this error
3000: RAISE fnd_api.g_exc_unexpected_error;
3001: END IF;
3002:
3003: l_detail_attributes(1).shipped_quantity := 0;
3004: l_detail_attributes(1).delivery_detail_id := l_new_delivery_line_id;
3014: debug('wsh_interface.update_shipping_attributes failed'
3015: || ' with status: ' || l_return_status,'INV_SPLIT_DELIVERY_LINE');
3016: END IF;
3017: --check where to handle this error
3018: RAISE fnd_api.g_exc_unexpected_error;
3019: END IF;
3020:
3021: x_return_status := FND_API.G_RET_STS_SUCCESS;
3022: x_new_delivery_detail_id := l_new_delivery_line_id;
3017: --check where to handle this error
3018: RAISE fnd_api.g_exc_unexpected_error;
3019: END IF;
3020:
3021: x_return_status := FND_API.G_RET_STS_SUCCESS;
3022: x_new_delivery_detail_id := l_new_delivery_line_id;
3023: x_new_transaction_temp_id := l_new_transaction_temp_id;
3024: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3025: EXCEPTION
3022: x_new_delivery_detail_id := l_new_delivery_line_id;
3023: x_new_transaction_temp_id := l_new_transaction_temp_id;
3024: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3025: EXCEPTION
3026: WHEN FND_API.G_EXC_ERROR THEN
3027: x_return_status := FND_API.G_RET_STS_ERROR;
3028: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3029: END INV_SPLIT_DELIVERY_LINE;
3030:
3023: x_new_transaction_temp_id := l_new_transaction_temp_id;
3024: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3025: EXCEPTION
3026: WHEN FND_API.G_EXC_ERROR THEN
3027: x_return_status := FND_API.G_RET_STS_ERROR;
3028: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3029: END INV_SPLIT_DELIVERY_LINE;
3030:
3031: PROCEDURE INV_PROCESS_SERIALS(
3052: From wsh_delivery_details_ob_grp_v
3053: where transaction_temp_id = l_transaction_temp_id
3054: And delivery_detail_id = l_delivery_detail_id);
3055: end if;
3056: x_return_status := FND_API.G_RET_STS_SUCCESS;
3057: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3058:
3059: EXCEPTION
3060: when FND_API.G_EXC_ERROR THEN
3056: x_return_status := FND_API.G_RET_STS_SUCCESS;
3057: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3058:
3059: EXCEPTION
3060: when FND_API.G_EXC_ERROR THEN
3061: x_return_status := FND_API.G_RET_STS_ERROR;
3062: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3063: when others then
3064: x_return_status := FND_API.G_RET_STS_ERROR;
3057: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3058:
3059: EXCEPTION
3060: when FND_API.G_EXC_ERROR THEN
3061: x_return_status := FND_API.G_RET_STS_ERROR;
3062: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3063: when others then
3064: x_return_status := FND_API.G_RET_STS_ERROR;
3065: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3060: when FND_API.G_EXC_ERROR THEN
3061: x_return_status := FND_API.G_RET_STS_ERROR;
3062: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3063: when others then
3064: x_return_status := FND_API.G_RET_STS_ERROR;
3065: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3066: END INV_PROCESS_SERIALS;
3067:
3068:
3073: x_msg_count OUT nocopy NUMBER) IS
3074: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3075: l_shipping_params WSH_SHIPPING_PARAMS_GRP.Global_Params_Rec;
3076: BEGIN
3077: x_return_status := FND_API.G_RET_STS_SUCCESS;
3078:
3079: --Changed to call Shipping's API because they
3080: --moved a few columns from wsh_shipping_parameters
3081: --to a new table called wsh_global_parameters in patchset J.
3094: debug('Enforce ship Y/N : ' || x_enforce_ship, 'get_enforce_ship');
3095: END IF;
3096: EXCEPTION
3097: WHEN others THEN
3098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3099: x_enforce_ship := 'N';
3100: END get_enforce_ship;
3101:
3102: /** This procedure gets the enforce_ship_method parameter from shipping
3120: debug('p_enforce_shipmethod : ' || p_enforce_shipmethod, 'get_shipmethod_details');
3121: debug('p_trip_id : ' || p_trip_id, 'get_shipmethod_details');
3122: END IF;
3123:
3124: x_return_status := FND_API.G_RET_STS_SUCCESS;
3125:
3126: IF p_enforce_shipmethod is NULL THEN
3127: SELECT enforce_ship_method
3128: INTO p_enforce_shipmethod