632: END IF;
633: --Split API is called for a source line and if any of the details is
634: --in Rel. to warehouse status as described above, the flow needs to
635: --stop
636: FND_MESSAGE.SET_NAME('WSH', 'WSH_SPLIT_NOT_ALLOWED');
637: FND_MESSAGE.SET_TOKEN('ORDER', c.source_header_number);
638: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
639: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
640: ROLLBACK to before_splits;
633: --Split API is called for a source line and if any of the details is
634: --in Rel. to warehouse status as described above, the flow needs to
635: --stop
636: FND_MESSAGE.SET_NAME('WSH', 'WSH_SPLIT_NOT_ALLOWED');
637: FND_MESSAGE.SET_TOKEN('ORDER', c.source_header_number);
638: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
639: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
640: ROLLBACK to before_splits;
641: IF l_debug_on THEN
720: -- muom
721: IF ((l_fulfillment_base = 'P' AND p_changed_attributes(l_counter).ordered_quantity > 0 AND l_quantity_to_split <= 0) OR
722: (l_fulfillment_base = 'S' AND p_changed_attributes(l_counter).ordered_quantity2 > 0 AND l_quantity_to_split2 <= 0)) THEN
723: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;
724: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_CANNOT_SPLIT');
725: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
726: EXIT records_loop;
727: END IF;
728: END IF; -- NOT l_uom_converted --}
3093: END IF;
3094: --
3095: EXCEPTION
3096: WHEN mark_reprice_error then
3097: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
3098: x_return_status := l_return_status;
3099: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3100: --
3101: IF l_debug_on THEN
3103: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
3104: END IF;
3105: --
3106: WHEN Update_Failed THEN
3107: FND_MESSAGE.Set_Name('WSH', 'WSH_INVALID_LOCATION');
3108: --
3109: IF l_debug_on THEN
3110: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3111: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_FAILED');
3546: --
3547:
3548: i := 0;
3549: IF (P_SOURCE_CODE <> 'OE') THEN
3550: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_SOURCE_CODE');
3551: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
3552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3553: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
3554: --
3547:
3548: i := 0;
3549: IF (P_SOURCE_CODE <> 'OE') THEN
3550: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_SOURCE_CODE');
3551: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
3552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3553: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
3554: --
3555: IF l_debug_on THEN
4177: IF l_debug_on THEN
4178: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID_ORG' );
4179: END IF;
4180: --
4181: fnd_message.set_name('WSH', 'WSH_DET_NO_LOCATION_FOR_ORG');
4182: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4183: CLOSE C_OE_LINES_REC_LOCK;
4184: END IF;
4185: WSH_UTIL_CORE.add_message ('E',l_module_name);
4189: IF l_debug_on THEN
4190: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID_CUST_SITE' );
4191: END IF;
4192: --
4193: fnd_message.set_name('WSH', 'WSH_DET_NO_LOCATION_FOR_SITE');
4194: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4195: CLOSE C_OE_LINES_REC_LOCK;
4196: END IF;
4197: WSH_UTIL_CORE.add_message ('E',l_module_name);
4201: IF l_debug_on THEN
4202: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID_QTY_OR_UOM' );
4203: END IF;
4204: --
4205: fnd_message.set_name('WSH','WSH_QTY_OR_UOM_NOT_VALID');
4206: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4207: CLOSE C_OE_LINES_REC_LOCK;
4208: END IF;
4209: WSH_UTIL_CORE.add_message ('E',l_module_name);
4213: IF l_debug_on THEN
4214: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: PROCESS_ORDER_FAILED' );
4215: END IF;
4216: --
4217: fnd_message.set_name('WSH', 'WSH_DET_PROCESS_ORDER_FAILED');
4218: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4219: CLOSE C_OE_LINES_REC_LOCK;
4220: END IF;
4221: WSH_UTIL_CORE.add_message ('E',l_module_name);
4225: IF l_debug_on THEN
4226: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION:CREATE_DETAILS_FAILED' );
4227: END IF;
4228: --
4229: fnd_message.set_name('WSH', 'WSH_DET_CREATE_DET_FAILED');
4230: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4231: CLOSE C_OE_LINES_REC_LOCK;
4232: END IF;
4233: WSH_UTIL_CORE.add_message ('E',l_module_name);
4237: IF l_debug_on THEN
4238: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: CREATE_ASSIGNMENTS_FAILED' );
4239: END IF;
4240: --
4241: fnd_message.set_name('WSH', 'WSH_DET_CREATE_AS_FAILED');
4242: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4243: CLOSE C_OE_LINES_REC_LOCK;
4244: END IF;
4245: WSH_UTIL_CORE.add_message ('E',l_module_name);
4249: IF l_debug_on THEN
4250: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID SHIP SET' );
4251: END IF;
4252: --
4253: fnd_message.set_name('WSH', 'WSH_INVALID_SET');
4254: fnd_message.set_token('SHIP_SET',l_ship_set_name);
4255: fnd_message.set_token('LINE_NUMBER',ln_rec_info.line_number);
4256: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4257: CLOSE C_OE_LINES_REC_LOCK;
4250: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID SHIP SET' );
4251: END IF;
4252: --
4253: fnd_message.set_name('WSH', 'WSH_INVALID_SET');
4254: fnd_message.set_token('SHIP_SET',l_ship_set_name);
4255: fnd_message.set_token('LINE_NUMBER',ln_rec_info.line_number);
4256: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4257: CLOSE C_OE_LINES_REC_LOCK;
4258: END IF;
4251: END IF;
4252: --
4253: fnd_message.set_name('WSH', 'WSH_INVALID_SET');
4254: fnd_message.set_token('SHIP_SET',l_ship_set_name);
4255: fnd_message.set_token('LINE_NUMBER',ln_rec_info.line_number);
4256: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4257: CLOSE C_OE_LINES_REC_LOCK;
4258: END IF;
4259: WSH_UTIL_CORE.add_message ('E',l_module_name);
4290:
4291: IF (l_pull_lines_count = 0 and p_source_line_id IS NOT NULL) THEN
4292: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4293:
4294: fnd_message.set_name('WSH', 'WSH_DET_CREATE_LINE_FAILED');
4295: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4296:
4297:
4298: IF l_debug_on THEN
4312: IF l_debug_on THEN
4313: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION:CREATE_DETAILS_FAILED' );
4314: END IF;
4315: --
4316: fnd_message.set_name('WSH', 'WSH_DET_CREATE_DET_FAILED');
4317: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4318: CLOSE C_OE_LINES_REC_LOCK;
4319: END IF;
4320: IF (C_PULL_DELIVERY_DETAILS%ISOPEN) THEN