DBA Data[Home] [Help]

APPS.WSH_XC_UTIL dependencies on WSH_XC_UTIL

Line 1: PACKAGE BODY WSH_XC_UTIL as

1: PACKAGE BODY WSH_XC_UTIL as
2: /* $Header: WSHXCUTB.pls 120.15 2010/11/03 12:05:18 shtadepa noship $ */
3:
4: -- standard global constants
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'WSH_XC_UTIL';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'WSH_XC_UTIL';

1: PACKAGE BODY WSH_XC_UTIL as
2: /* $Header: WSHXCUTB.pls 120.15 2010/11/03 12:05:18 shtadepa noship $ */
3:
4: -- standard global constants
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'WSH_XC_UTIL';
6: p_message_type CONSTANT VARCHAR2(1) := 'E';
7:
8:
9: C_ACTION_SEMICLOSED CONSTANT VARCHAR2(11) := 'SEMI-CLOSED'; -- FP bug 4370532

Line 133: FND_MESSAGE.Set_Token('PACKAGE','WSH_XC_UTIL.GET_EXCEPTION_DEF');

129: END IF;
130: -- end of NO_DATA_FOUND exception handling
131: WHEN OTHERS THEN
132: FND_MESSAGE.Set_Name('WSH','WSH_UNEXP_ERROR');
133: FND_MESSAGE.Set_Token('PACKAGE','WSH_XC_UTIL.GET_EXCEPTION_DEF');
134: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
135: FND_MESSAGE.Set_Token('ORA_TEXT','');
136: IF c_exc_def%ISOPEN THEN
137: CLOSE c_exc_def;

Line 3384: SAVEPOINT WSH_XC_UTIL;

3380: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3381: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
3382: END IF;
3383: --
3384: SAVEPOINT WSH_XC_UTIL;
3385: -- Standard call to check for call compatibility.
3386: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
3387: p_api_version ,
3388: l_api_name ,

Line 3811: ROLLBACK TO WSH_XC_UTIL;

3807: END IF;
3808: --
3809: EXCEPTION
3810: WHEN WSH_PURGE_FAILED THEN
3811: ROLLBACK TO WSH_XC_UTIL;
3812: x_return_status := FND_API.G_RET_STS_ERROR;
3813: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
3814: if x_msg_count > 1 then
3815: x_msg_data := l_msg_summary || l_msg_details;

Line 3829: ROLLBACK TO WSH_XC_UTIL;

3825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_PURGE_FAILED');
3826: END IF;
3827: --
3828: WHEN FND_API.G_EXC_ERROR THEN
3829: ROLLBACK TO WSH_XC_UTIL;
3830: x_return_status := FND_API.G_RET_STS_ERROR;
3831: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
3832: if x_msg_count > 1 then
3833: x_msg_data := l_msg_summary || l_msg_details;

Line 3847: ROLLBACK TO WSH_XC_UTIL;

3843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3844: END IF;
3845: --
3846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3847: ROLLBACK TO WSH_XC_UTIL;
3848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3849: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
3850: if x_msg_count > 1 then
3851: x_msg_data := l_msg_summary || l_msg_details;

Line 3865: ROLLBACK TO WSH_XC_UTIL;

3861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3862: END IF;
3863: --
3864: WHEN OTHERS THEN
3865: ROLLBACK TO WSH_XC_UTIL;
3866: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3867: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
3868: if x_msg_count > 1 then
3869: x_msg_data := l_msg_summary || l_msg_details;

Line 4383: wsh_util_core.default_handler('WSH_XC_UTIL.CHECK_EXCEPTIONS');

4379: IF Get_Stops_Trip%ISOPEN THEN
4380: CLOSE Get_Stops_Trip;
4381: END IF;
4382:
4383: wsh_util_core.default_handler('WSH_XC_UTIL.CHECK_EXCEPTIONS');
4384: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4385:
4386: --
4387: -- Debug Statements

Line 4533: WSH_XC_UTIL.Purge (

4529:
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4531:
4532: IF (p_logging_entity_name = 'TRIP') THEN
4533: WSH_XC_UTIL.Purge (
4534: p_api_version => p_api_version,
4535: x_return_status => l_return_status,
4536: x_msg_count => l_msg_count,
4537: x_msg_data => l_msg_data,

Line 4552: WSH_XC_UTIL.Close_Exceptions (

4548:
4549: IF p_consider_content = 'Y' THEN
4550: -- Close all stop level exceptions
4551: FOR stop_rec IN Get_Stops_Trip(p_logging_entity_id) LOOP
4552: WSH_XC_UTIL.Close_Exceptions (
4553: p_api_version => p_api_version,
4554: x_return_status => l_return_status,
4555: x_msg_count => l_msg_count,
4556: x_msg_data => l_msg_data,

Line 4576: WSH_XC_UTIL.Purge (

4572:
4573: IF l_debug_on THEN
4574: WSH_DEBUG_SV.logmsg('Calling Purge for Stop '||p_logging_entity_id ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
4575: END IF;
4576: WSH_XC_UTIL.Purge (
4577: p_api_version => p_api_version,
4578: x_return_status => x_return_status,
4579: x_msg_count => x_msg_count,
4580: x_msg_data => x_msg_data,

Line 4595: WSH_XC_UTIL.Close_Exceptions (

4591:
4592: IF p_consider_content = 'Y' THEN
4593: -- go for the deliveries, lines and containers
4594: FOR del_rec IN Get_Deliveries_Stop(p_logging_entity_id) LOOP
4595: WSH_XC_UTIL.Close_Exceptions (
4596: p_api_version => p_api_version,
4597: x_return_status => l_return_status,
4598: x_msg_count => l_msg_count,
4599: x_msg_data => l_msg_data,

Line 4620: WSH_XC_UTIL.Close_Exceptions (

4616: OR nvl(p_caller,'@@@') like 'WSH_IB%'
4617: OR nvl(p_caller,'@@@') like 'WSH_TP_RELEASE%'
4618: ) AND NOT ( nvl(p_caller,'@@@') like '%TRIP%') THEN
4619: FOR stop_rec IN c_dummy_stop(p_logging_entity_id) LOOP
4620: WSH_XC_UTIL.Close_Exceptions (
4621: p_api_version => p_api_version,
4622: x_return_status => l_return_status,
4623: x_msg_count => l_msg_count,
4624: x_msg_data => l_msg_data,

Line 4639: WSH_XC_UTIL.Purge (

4635: END IF;
4636: END LOOP;
4637: END IF;
4638: ELSIF (p_logging_entity_name = 'DELIVERY') THEN
4639: WSH_XC_UTIL.Purge (
4640: p_api_version => p_api_version,
4641: x_return_status => x_return_status,
4642: x_msg_count => x_msg_count,
4643: x_msg_data => x_msg_data,

Line 4657: WSH_XC_UTIL.Purge (

4653: RAISE WSH_PURGE_FAILED;
4654: END IF;
4655:
4656: ELSIF (p_logging_entity_name IN ('LINE','CONTAINER')) THEN
4657: WSH_XC_UTIL.Purge (
4658: p_api_version => p_api_version,
4659: x_return_status => x_return_status,
4660: x_msg_count => x_msg_count,
4661: x_msg_data => x_msg_data,

Line 4744: wsh_util_core.default_handler('WSH_XC_UTIL.CLOSE_EXCEPTIONS');

4740: END IF;
4741: --
4742:
4743: WHEN others THEN
4744: wsh_util_core.default_handler('WSH_XC_UTIL.CLOSE_EXCEPTIONS');
4745: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4746:
4747: --
4748: -- Debug Statements

Line 4818: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.PURGE',WSH_DEBUG_SV.C_PROC_LEVEL);

4814: l_exception_name := p_exceptions_to_close_tab(i);
4815:
4816: -- call purge with action 'CLOSED'
4817: IF l_debug_on THEN
4818: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.PURGE',WSH_DEBUG_SV.C_PROC_LEVEL);
4819: END IF;
4820:
4821: WSH_XC_UTIL.purge (
4822: p_api_version => 1.0,

Line 4821: WSH_XC_UTIL.purge (

4817: IF l_debug_on THEN
4818: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.PURGE',WSH_DEBUG_SV.C_PROC_LEVEL);
4819: END IF;
4820:
4821: WSH_XC_UTIL.purge (
4822: p_api_version => 1.0,
4823: x_return_status => l_return_status,
4824: x_msg_count => l_msg_count,
4825: x_msg_data => l_msg_data,

Line 4834: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.purge: ' || l_return_status);

4830: p_action => 'CLOSED'
4831: );
4832:
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.purge: ' || l_return_status);
4835: WSH_DEBUG_SV.log(l_module_name, 'number of exceptions purged', l_count);
4836: END IF;
4837:
4838: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

Line 4864: wsh_util_core.default_handler('WSH_XC_UTIL.CLOSE_OTM_EXCEPTION', l_module_name);

4860:
4861: EXCEPTION
4862: --
4863: WHEN OTHERS THEN
4864: wsh_util_core.default_handler('WSH_XC_UTIL.CLOSE_OTM_EXCEPTION', l_module_name);
4865: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4866: IF l_debug_on THEN
4867: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. '|| SQLERRM, WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4868: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 5005: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.CLOSE_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);

5001:
5002: IF l_exceptions_to_close_tab.COUNT > 0 THEN
5003:
5004: IF l_debug_on THEN
5005: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.CLOSE_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
5006: END IF;
5007:
5008: WSH_XC_UTIL.close_otm_exception(
5009: p_delivery_id => p_delivery_info_tab(i).delivery_id,

Line 5008: WSH_XC_UTIL.close_otm_exception(

5004: IF l_debug_on THEN
5005: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.CLOSE_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
5006: END IF;
5007:
5008: WSH_XC_UTIL.close_otm_exception(
5009: p_delivery_id => p_delivery_info_tab(i).delivery_id,
5010: p_exceptions_to_close_tab => l_exceptions_to_close_tab,
5011: x_return_status => l_return_status
5012: );

Line 5015: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.close_otm_exception: ' || l_return_status);

5011: x_return_status => l_return_status
5012: );
5013:
5014: IF l_debug_on THEN
5015: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.close_otm_exception: ' || l_return_status);
5016: END IF;
5017:
5018: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5019: l_num_error := l_num_error + 1;

Line 5041: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);

5037: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', p_delivery_info_tab(i).name);
5038: l_exception_message := FND_MESSAGE.GET;
5039:
5040: IF l_debug_on THEN
5041: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
5042: END IF;
5043:
5044: WSH_XC_UTIL.log_exception(
5045: p_api_version => 1.0,

Line 5044: WSH_XC_UTIL.log_exception(

5040: IF l_debug_on THEN
5041: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
5042: END IF;
5043:
5044: WSH_XC_UTIL.log_exception(
5045: p_api_version => 1.0,
5046: x_return_status => l_return_status,
5047: x_msg_count => l_msg_count,
5048: x_msg_data => l_msg_data,

Line 5060: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.log_exception: ' || l_return_status);

5056: p_message => l_exception_message);
5057:
5058:
5059: IF l_debug_on THEN
5060: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.log_exception: ' || l_return_status);
5061: END IF;
5062:
5063: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5064: l_num_error := l_num_error + 1;

Line 5114: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);

5110:
5111: l_exception_message := FND_MESSAGE.GET;
5112:
5113: IF l_debug_on THEN
5114: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
5115: END IF;
5116:
5117: WSH_XC_UTIL.log_exception(
5118: p_api_version => 1.0,

Line 5117: WSH_XC_UTIL.log_exception(

5113: IF l_debug_on THEN
5114: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
5115: END IF;
5116:
5117: WSH_XC_UTIL.log_exception(
5118: p_api_version => 1.0,
5119: x_return_status => l_return_status,
5120: x_msg_count => l_msg_count,
5121: x_msg_data => l_msg_data,

Line 5132: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.log_exception: ' || l_return_status);

5128: p_delivery_id => p_delivery_info_tab(i).delivery_id,
5129: p_message => l_exception_message);
5130:
5131: IF l_debug_on THEN
5132: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_XC_UTIL.log_exception: ' || l_return_status);
5133: END IF;
5134:
5135: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5136: l_num_error := l_num_error + 1;

Line 5168: wsh_util_core.default_handler('WSH_XC_UTIL.LOG_OTM_EXCEPTION', l_module_name);

5164: --
5165:
5166: EXCEPTION
5167: WHEN others THEN
5168: wsh_util_core.default_handler('WSH_XC_UTIL.LOG_OTM_EXCEPTION', l_module_name);
5169: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5170:
5171: IF l_debug_on THEN
5172: WSH_DEBUG_SV.logmsg(l_module_name,

Line 5279: wsh_util_core.default_handler('WSH_XC_UTIL.GET_OTM_DELIVERY_EXCEPTION', l_module_name);

5275:
5276: EXCEPTION
5277: WHEN OTHERS THEN
5278: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5279: wsh_util_core.default_handler('WSH_XC_UTIL.GET_OTM_DELIVERY_EXCEPTION', l_module_name);
5280:
5281: IF c_get_delivery_otm_exceptions%ISOPEN THEN
5282: CLOSE c_get_delivery_otm_exceptions;
5283: END IF;

Line 5292: END WSH_XC_UTIL;

5288:
5289: END GET_OTM_DELIVERY_EXCEPTION;
5290: --END OTM R12
5291:
5292: END WSH_XC_UTIL;