[Home] [Help]
9: -- PROCEDURE : validate_constraint To be called by external module
10: -- Currently called by WMS only
11: --
12: -- PARAMETERS: p_api_version_number Application standard : known API version number
13: -- p_init_msg_list FND_API.G_TRUE to reset list
14: -- p_commit Application standard : to commit work
15: -- p_entity_tab Table of entity records to validate
16: -- Currently supports Delivery and Trip
17: -- x_msg_count Number of messages in the list
24:
25: PROCEDURE validate_constraint(
26: p_api_version_number IN NUMBER,
27: p_init_msg_list IN VARCHAR2,
28: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
29: p_entity_tab IN OUT NOCOPY wshfte_ccin_tab_type,
30: x_msg_count OUT NOCOPY NUMBER,
31: x_msg_data OUT NOCOPY VARCHAR2,
32: x_return_status OUT NOCOPY VARCHAR2)
75: END IF;
76:
77: ---------------------------------------
78:
79: IF NOT FND_API.Compatible_API_Call
80: ( l_api_version_number,
81: p_api_version_number,
82: l_api_name,
83: g_package_name
82: l_api_name,
83: g_package_name
84: )
85: THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: END IF;
88:
89: IF FND_API.to_Boolean( p_init_msg_list ) THEN
90: FND_MSG_PUB.initialize;
85: THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: END IF;
88:
89: IF FND_API.to_Boolean( p_init_msg_list ) THEN
90: FND_MSG_PUB.initialize;
91: END IF;
92:
93: -----------------------------------------
174: x_return_status => l_return_status);
175:
176:
177: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: ELSE
180: x_return_status := l_return_status;
181: IF l_debug_on THEN
182: wsh_debug_sv.logmsg(l_module_name,'failed line count : '||l_fail_trips.COUNT);
240: x_return_status => l_return_status);
241:
242:
243: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
245: ELSE
246: x_return_status := l_return_status;
247:
248: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
289: WSH_DEBUG_SV.pop(l_module_name);
290: END IF;
291: --
292: EXCEPTION
293: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
294: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
295: --
296: IF l_debug_on THEN
297: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
294: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
295: --
296: IF l_debug_on THEN
297: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
298: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
299: END IF;
300: --
301: WHEN others THEN
302: WSH_UTIL_CORE.default_handler('WSH_FTE_COMP_CONSTRAINT_GRP.validate_constraint');
303: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
304: --
305: IF l_debug_on THEN
306: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
307: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
308: END IF;
309: --
310:
311: END validate_constraint;
313: --***************************************************************************--
314: --========================================================================
315: -- PROCEDURE : is_valid_consol
316: --
317: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
318: -- p_input_delivery_id_tab Table of delivery records to process
319: --
320: -- p_target_consol_delivery_id target consol delivery
321: -- x_deconsolidation_location deconsolidation location
325: -- COMMENT : This procedure is to find if a set of deliveries can be assigned to a consol delivery.
326: -- This procedure is called from WMS.
327: --
328: --========================================================================
329: PROCEDURE is_valid_consol( p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
330: p_input_delivery_id_tab IN WSH_UTIL_CORE.id_tab_type,
331: p_target_consol_delivery_id IN NUMBER,
332: p_caller IN VARCHAR2 DEFAULT NULL,
333: x_deconsolidation_location OUT NOCOPY NUMBER,
654:
655: FND_MSG_PUB.Count_And_Get (
656: p_count => x_msg_count,
657: p_data => x_msg_data ,
658: p_encoded => FND_API.G_FALSE );
659:
660: IF l_debug_on THEN
661: wsh_debug_sv.log (l_module_name,'No. of messages stacked : ',to_char(x_msg_count));
662: wsh_debug_sv.pop (l_module_name);
663: END IF;
664:
665: EXCEPTION
666:
667: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
668: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
669: --
670: IF l_debug_on THEN
671: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
668: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
669: --
670: IF l_debug_on THEN
671: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
672: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
673: END IF;
674:
675: WHEN OTHERS THEN
676: IF c_get_dlvy_drop_off_location%ISOPEN THEN
683: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
684: --
685: IF l_debug_on THEN
686: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
687: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
688: END IF;
689: --}
690: END is_valid_consol;
691: