[Home] [Help]
75: l_linkRecString VARCHAR2(500);
76: --}
77: BEGIN
78: --{
79: wsh_util_core.get_cached_value
80: (
81: p_cache_tbl => p_linkTbl,
82: p_cache_ext_tbl => p_linkExtTbl,
83: p_key => p_poShipmentLineId,
86: x_return_status => l_return_status
87: );
88: --
89: --
90: wsh_util_core.api_post_call
91: (
92: p_return_status => l_return_status,
93: x_num_warnings => l_num_warnings,
94: x_num_errors => l_num_errors
94: x_num_errors => l_num_errors
95: );
96: --
97: --
98: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
99: THEN
100: error
101: END IF;
102: --
107: || C_SEPARATOR
108: || TO_CHAR(p_max_date,C_DATE_FORMAT_MASK);
109: --
110: --
111: wsh_util_core.get_cached_value
112: (
113: p_cache_tbl => p_linkTbl,
114: p_cache_ext_tbl => p_linkExtTbl,
115: p_key => p_poShipmentLineId,
118: x_return_status => l_return_status
119: );
120: --
121: --
122: wsh_util_core.api_post_call
123: (
124: p_return_status => l_return_status,
125: x_num_warnings => l_num_warnings,
126: x_num_errors => l_num_errors
229: -- Debug Statements
230: --
231: IF l_debug_on THEN
232: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
233: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
234: END IF;
235: --
236: wsh_util_core.api_post_call
237: (
232: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
233: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
234: END IF;
235: --
236: wsh_util_core.api_post_call
237: (
238: p_return_status => l_return_status,
239: x_num_warnings => l_num_warnings,
240: x_num_errors => l_num_errors
280: THEN
281: --{
282: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
283: FND_MESSAGE.SET_TOKEN('FIELD_NAME',l_fieldName);
284: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
285: RAISE FND_API.G_EXC_ERROR;
286: --}
287: END IF;
288: --
295: END IF;
296: --
297: IF l_num_errors > 0
298: THEN
299: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
300: ELSIF l_num_warnings > 0
301: THEN
302: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
303: ELSE
298: THEN
299: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
300: ELSIF l_num_warnings > 0
301: THEN
302: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
303: ELSE
304: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
305: END IF;
306: --
300: ELSIF l_num_warnings > 0
301: THEN
302: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
303: ELSE
304: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
305: END IF;
306: --
307: -- Debug Statements
308: --
313: --}
314: EXCEPTION
315: --{
316: WHEN FND_API.G_EXC_ERROR THEN
317: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
318: --
319: -- Debug Statements
320: --
321: IF l_debug_on THEN
323: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
324: END IF;
325: --
326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
327: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
328: --
329: -- Debug Statements
330: --
331: IF l_debug_on THEN
332: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
333: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
334: END IF;
335: --
336: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
337: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
338: --
339: -- Debug Statements
340: --
333: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
334: END IF;
335: --
336: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
337: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
338: --
339: -- Debug Statements
340: --
341: IF l_debug_on THEN
338: --
339: -- Debug Statements
340: --
341: IF l_debug_on THEN
342: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
344: END IF;
345: --
346: WHEN OTHERS THEN
339: -- Debug Statements
340: --
341: IF l_debug_on THEN
342: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
344: END IF;
345: --
346: WHEN OTHERS THEN
347: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
344: END IF;
345: --
346: WHEN OTHERS THEN
347: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
348: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.validateMandatoryInfo');
349: --
350: -- Debug Statements
351: --
344: END IF;
345: --
346: WHEN OTHERS THEN
347: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
348: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.validateMandatoryInfo');
349: --
350: -- Debug Statements
351: --
352: IF l_debug_on THEN
488: END IF;
489: --
490: IF l_num_errors > 0
491: THEN
492: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
493: ELSIF l_num_warnings > 0
494: THEN
495: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
496: ELSE
491: THEN
492: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
493: ELSIF l_num_warnings > 0
494: THEN
495: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
496: ELSE
497: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
498: END IF;
499: --
493: ELSIF l_num_warnings > 0
494: THEN
495: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
496: ELSE
497: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
498: END IF;
499: --
500: -- Debug Statements
501: --
506: --}
507: EXCEPTION
508: --{
509: WHEN FND_API.G_EXC_ERROR THEN
510: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
511: --
512: -- Debug Statements
513: --
514: IF l_debug_on THEN
516: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
517: END IF;
518: --
519: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
520: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
521: --
522: -- Debug Statements
523: --
524: IF l_debug_on THEN
525: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
526: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
527: END IF;
528: --
529: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
530: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
531: --
532: -- Debug Statements
533: --
526: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
527: END IF;
528: --
529: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
530: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
531: --
532: -- Debug Statements
533: --
534: IF l_debug_on THEN
531: --
532: -- Debug Statements
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
536: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
537: END IF;
538: --
539: WHEN OTHERS THEN
532: -- Debug Statements
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
536: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
537: END IF;
538: --
539: WHEN OTHERS THEN
540: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
536: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
537: END IF;
538: --
539: WHEN OTHERS THEN
540: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
541: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.retrieveMessages');
542: --
543: -- Debug Statements
544: --
537: END IF;
538: --
539: WHEN OTHERS THEN
540: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
541: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.retrieveMessages');
542: --
543: -- Debug Statements
544: --
545: IF l_debug_on THEN
698: IF SQL%ROWCOUNT = 0
699: THEN
700: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_UPDATE_ERROR');
701: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',p_headerTransactionId);
702: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
703: RAISE FND_API.G_EXC_ERROR;
704: END IF;
705: --
706: --
723: -- Debug Statements
724: --
725: IF l_debug_on THEN
726: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
727: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
728: END IF;
729: --
730: wsh_util_core.api_post_call
731: (
726: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
727: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
728: END IF;
729: --
730: wsh_util_core.api_post_call
731: (
732: p_return_status => l_return_status,
733: x_num_warnings => l_num_warnings,
734: x_num_errors => l_num_errors
741: --
742: IF l_eventKey IS NULL
743: THEN
744: FND_MESSAGE.SET_NAME('WSH','WSH_IB_EVENT_KEY_ERROR');
745: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
746: RAISE FND_API.G_EXC_ERROR;
747: END IF;
748: --
749: --
873: END IF;
874: --
875: IF l_num_errors > 0
876: THEN
877: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
878: ELSIF l_num_warnings > 0
879: THEN
880: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
881: ELSE
876: THEN
877: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
878: ELSIF l_num_warnings > 0
879: THEN
880: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
881: ELSE
882: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
883: END IF;
884: --
878: ELSIF l_num_warnings > 0
879: THEN
880: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
881: ELSE
882: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
883: END IF;
884: --
885: -- Debug Statements
886: --
891: --}
892: EXCEPTION
893: --{
894: WHEN FND_API.G_EXC_ERROR THEN
895: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
896: --
897: -- Debug Statements
898: --
899: IF l_debug_on THEN
901: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
902: END IF;
903: --
904: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
905: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
906: --
907: -- Debug Statements
908: --
909: IF l_debug_on THEN
910: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
912: END IF;
913: --
914: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
915: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
916: --
917: -- Debug Statements
918: --
911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
912: END IF;
913: --
914: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
915: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
916: --
917: -- Debug Statements
918: --
919: IF l_debug_on THEN
916: --
917: -- Debug Statements
918: --
919: IF l_debug_on THEN
920: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
921: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
922: END IF;
923: --
924: WHEN OTHERS THEN
917: -- Debug Statements
918: --
919: IF l_debug_on THEN
920: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
921: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
922: END IF;
923: --
924: WHEN OTHERS THEN
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
921: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
922: END IF;
923: --
924: WHEN OTHERS THEN
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
926: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.handleMatchFailure');
927: --
928: -- Debug Statements
929: --
922: END IF;
923: --
924: WHEN OTHERS THEN
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
926: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.handleMatchFailure');
927: --
928: -- Debug Statements
929: --
930: IF l_debug_on THEN
1039: ELSE
1040: --{
1041: FND_MESSAGE.SET_NAME('WSH','WSH_IB_INVALID_TXN_TYPE');
1042: FND_MESSAGE.SET_TOKEN('TXN_TYPE',p_transactionType);
1043: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1044: RAISE FND_API.G_EXC_ERROR;
1045: --}
1046: END IF;
1047: --
1052: END IF;
1053: --
1054: IF l_num_errors > 0
1055: THEN
1056: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1057: ELSIF l_num_warnings > 0
1058: THEN
1059: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1060: ELSE
1055: THEN
1056: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1057: ELSIF l_num_warnings > 0
1058: THEN
1059: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1060: ELSE
1061: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1062: END IF;
1063: --
1057: ELSIF l_num_warnings > 0
1058: THEN
1059: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1060: ELSE
1061: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1062: END IF;
1063: --
1064: -- Debug Statements
1065: --
1070: --}
1071: EXCEPTION
1072: --{
1073: WHEN FND_API.G_EXC_ERROR THEN
1074: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1075: --
1076: -- Debug Statements
1077: --
1078: IF l_debug_on THEN
1080: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1081: END IF;
1082: --
1083: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1085: --
1086: -- Debug Statements
1087: --
1088: IF l_debug_on THEN
1089: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1090: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1091: END IF;
1092: --
1093: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1094: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1095: --
1096: -- Debug Statements
1097: --
1090: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1091: END IF;
1092: --
1093: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1094: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1095: --
1096: -- Debug Statements
1097: --
1098: IF l_debug_on THEN
1095: --
1096: -- Debug Statements
1097: --
1098: IF l_debug_on THEN
1099: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1101: END IF;
1102: --
1103: WHEN OTHERS THEN
1096: -- Debug Statements
1097: --
1098: IF l_debug_on THEN
1099: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1101: END IF;
1102: --
1103: WHEN OTHERS THEN
1104: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1101: END IF;
1102: --
1103: WHEN OTHERS THEN
1104: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1105: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.getTransactionKey');
1106: --
1107: -- Debug Statements
1108: --
1101: END IF;
1102: --
1103: WHEN OTHERS THEN
1104: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1105: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.getTransactionKey');
1106: --
1107: -- Debug Statements
1108: --
1109: IF l_debug_on THEN
1223: END IF;
1224: --
1225: IF l_num_errors > 0
1226: THEN
1227: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1228: ELSIF l_num_warnings > 0
1229: THEN
1230: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1231: ELSE
1226: THEN
1227: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1228: ELSIF l_num_warnings > 0
1229: THEN
1230: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1231: ELSE
1232: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1233: END IF;
1234: --
1228: ELSIF l_num_warnings > 0
1229: THEN
1230: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1231: ELSE
1232: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1233: END IF;
1234: --
1235: -- Debug Statements
1236: --
1241: --}
1242: EXCEPTION
1243: --{
1244: WHEN FND_API.G_EXC_ERROR THEN
1245: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1246: --
1247: -- Debug Statements
1248: --
1249: IF l_debug_on THEN
1251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1252: END IF;
1253: --
1254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1255: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1256: --
1257: -- Debug Statements
1258: --
1259: IF l_debug_on THEN
1260: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1261: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1262: END IF;
1263: --
1264: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1265: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1266: --
1267: -- Debug Statements
1268: --
1261: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1262: END IF;
1263: --
1264: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1265: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1266: --
1267: -- Debug Statements
1268: --
1269: IF l_debug_on THEN
1266: --
1267: -- Debug Statements
1268: --
1269: IF l_debug_on THEN
1270: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1272: END IF;
1273: --
1274: WHEN OTHERS THEN
1267: -- Debug Statements
1268: --
1269: IF l_debug_on THEN
1270: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1272: END IF;
1273: --
1274: WHEN OTHERS THEN
1275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1272: END IF;
1273: --
1274: WHEN OTHERS THEN
1275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1276: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord');
1277: --
1278: -- Debug Statements
1279: --
1272: END IF;
1273: --
1274: WHEN OTHERS THEN
1275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1276: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord');
1277: --
1278: -- Debug Statements
1279: --
1280: IF l_debug_on THEN
1420: -- Debug Statements
1421: --
1422: IF l_debug_on THEN
1423: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1424: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1425: END IF;
1426: --
1427: wsh_util_core.api_post_call
1428: (
1423: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1424: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1425: END IF;
1426: --
1427: wsh_util_core.api_post_call
1428: (
1429: p_return_status => l_return_status,
1430: x_num_warnings => l_num_warnings,
1431: x_num_errors => l_num_errors
1440: END IF;
1441: --
1442: IF l_num_errors > 0
1443: THEN
1444: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1445: ELSIF l_num_warnings > 0
1446: THEN
1447: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1448: ELSE
1443: THEN
1444: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1445: ELSIF l_num_warnings > 0
1446: THEN
1447: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1448: ELSE
1449: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1450: END IF;
1451: --
1445: ELSIF l_num_warnings > 0
1446: THEN
1447: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1448: ELSE
1449: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1450: END IF;
1451: --
1452: -- Debug Statements
1453: --
1458: --}
1459: EXCEPTION
1460: --{
1461: WHEN FND_API.G_EXC_ERROR THEN
1462: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1463: --
1464: -- Debug Statements
1465: --
1466: IF l_debug_on THEN
1468: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1469: END IF;
1470: --
1471: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1472: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1473: --
1474: -- Debug Statements
1475: --
1476: IF l_debug_on THEN
1477: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1478: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1479: END IF;
1480: --
1481: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1482: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1483: --
1484: -- Debug Statements
1485: --
1478: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1479: END IF;
1480: --
1481: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1482: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1483: --
1484: -- Debug Statements
1485: --
1486: IF l_debug_on THEN
1483: --
1484: -- Debug Statements
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1489: END IF;
1490: --
1491: WHEN OTHERS THEN
1484: -- Debug Statements
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1489: END IF;
1490: --
1491: WHEN OTHERS THEN
1492: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1489: END IF;
1490: --
1491: WHEN OTHERS THEN
1492: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1493: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.insertTransactionHistory');
1494: --
1495: -- Debug Statements
1496: --
1489: END IF;
1490: --
1491: WHEN OTHERS THEN
1492: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1493: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.insertTransactionHistory');
1494: --
1495: -- Debug Statements
1496: --
1497: IF l_debug_on THEN
1603: -- Debug Statements
1604: --
1605: IF l_debug_on THEN
1606: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1607: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1608: END IF;
1609: --
1610: wsh_util_core.api_post_call
1611: (
1606: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1607: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1608: END IF;
1609: --
1610: wsh_util_core.api_post_call
1611: (
1612: p_return_status => l_return_status,
1613: x_num_warnings => l_num_warnings,
1614: x_num_errors => l_num_errors
1632: FND_MESSAGE.SET_NAME('WSH','WSH_IB_DUP_RECPT_ERROR');
1633: FND_MESSAGE.SET_TOKEN('RECEIPT_NUMBER',l_txnHistoryRec.RECEIPT_NUMBER);
1634: END IF;
1635: --
1636: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1637: RAISE FND_API.G_EXC_ERROR;
1638: --}
1639: ELSE
1640: --{
1669: -- Debug Statements
1670: --
1671: IF l_debug_on THEN
1672: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1673: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1674: END IF;
1675: --
1676: wsh_util_core.api_post_call
1677: (
1672: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1673: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1674: END IF;
1675: --
1676: wsh_util_core.api_post_call
1677: (
1678: p_return_status => l_return_status,
1679: x_num_warnings => l_num_warnings,
1680: x_num_errors => l_num_errors
1692: (
1693: p_shipment_header_id => p_shipmentHeaderId,
1694: p_transaction_type => p_transactionType,
1695: p_on_error => 'RETRY',
1696: p_on_noDataFound => WSH_UTIL_CORE.G_RET_STS_ERROR,
1697: x_txn_history_rec => l_txnHistoryRec,
1698: x_return_status => l_return_status,
1699: x_locked => l_locked
1700: );
1704: -- Debug Statements
1705: --
1706: IF l_debug_on THEN
1707: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1708: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1709: END IF;
1710: --
1711: wsh_util_core.api_post_call
1712: (
1707: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1708: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1709: END IF;
1710: --
1711: wsh_util_core.api_post_call
1712: (
1713: p_return_status => l_return_status,
1714: x_num_warnings => l_num_warnings,
1715: x_num_errors => l_num_errors
1721: --
1722: --
1723: l_parentShipmentHeaderId := NULL;
1724: l_parentTransactionType := NULL;
1725: l_on_noDataFound := WSH_UTIL_CORE.G_RET_STS_ERROR;
1726: --
1727: IF p_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_ASN
1728: THEN
1729: x_transactionGroup := WSH_INBOUND_TXN_HISTORY_PKG.C_ASN;
1732: --{
1733: l_parentShipmentHeaderId := p_shipmentHeaderId;
1734: l_parentTransactionType := WSH_INBOUND_TXN_HISTORY_PKG.C_ASN;
1735: x_transactionGroup := WSH_INBOUND_TXN_HISTORY_PKG.C_ASN;
1736: l_on_noDataFound := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1737: --}
1738: ELSIF p_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT
1739: THEN
1740: --{
1764: l_parentTransactionType := WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT;
1765: --
1766: IF p_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_HEADER_UPD
1767: THEN
1768: l_on_noDataFound := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1769: END IF;
1770: --}
1771: ELSE
1772: --{
1771: ELSE
1772: --{
1773: FND_MESSAGE.SET_NAME('WSH','WSH_IB_INVALID_TXN_TYPE');
1774: FND_MESSAGE.SET_TOKEN('TXN_TYPE',p_transactionType);
1775: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1776: RAISE FND_API.G_EXC_ERROR;
1777: --}
1778: END IF;
1779: --
1811: -- Debug Statements
1812: --
1813: IF l_debug_on THEN
1814: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1815: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1816: END IF;
1817: --
1818: wsh_util_core.api_post_call
1819: (
1814: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1815: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1816: END IF;
1817: --
1818: wsh_util_core.api_post_call
1819: (
1820: p_return_status => l_return_status,
1821: x_num_warnings => l_num_warnings,
1822: x_num_errors => l_num_errors
1835: END IF;
1836: --
1837: IF l_num_errors > 0
1838: THEN
1839: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1840: ELSIF l_num_warnings > 0
1841: THEN
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1843: ELSE
1838: THEN
1839: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1840: ELSIF l_num_warnings > 0
1841: THEN
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1843: ELSE
1844: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1845: END IF;
1846: --
1840: ELSIF l_num_warnings > 0
1841: THEN
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1843: ELSE
1844: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1845: END IF;
1846: --
1847: -- Debug Statements
1848: --
1853: --}
1854: EXCEPTION
1855: --{
1856: WHEN FND_API.G_EXC_ERROR THEN
1857: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1858: --
1859: -- Debug Statements
1860: --
1861: IF l_debug_on THEN
1863: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1864: END IF;
1865: --
1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1867: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1868: --
1869: -- Debug Statements
1870: --
1871: IF l_debug_on THEN
1872: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1873: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1874: END IF;
1875: --
1876: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1877: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1878: --
1879: -- Debug Statements
1880: --
1873: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1874: END IF;
1875: --
1876: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1877: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1878: --
1879: -- Debug Statements
1880: --
1881: IF l_debug_on THEN
1878: --
1879: -- Debug Statements
1880: --
1881: IF l_debug_on THEN
1882: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1884: END IF;
1885: --
1886: WHEN OTHERS THEN
1879: -- Debug Statements
1880: --
1881: IF l_debug_on THEN
1882: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1884: END IF;
1885: --
1886: WHEN OTHERS THEN
1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1884: END IF;
1885: --
1886: WHEN OTHERS THEN
1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1888: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.checkShipmentHistory');
1889: --
1890: -- Debug Statements
1891: --
1884: END IF;
1885: --
1886: WHEN OTHERS THEN
1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1888: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.checkShipmentHistory');
1889: --
1890: -- Debug Statements
1891: --
1892: IF l_debug_on THEN
1962: THEN
1963: --{
1964: FND_MESSAGE.SET_NAME('WSH','WSH_IB_DUP_CANCEL_ASN_ERROR');
1965: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUMBER',x_parentTxnHistoryRec.SHIPMENT_NUMBER);
1966: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1967: RAISE FND_API.G_EXC_ERROR;
1968: --}
1969: END IF;
1970: --
1993: -- Debug Statements
1994: --
1995: IF l_debug_on THEN
1996: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1997: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1998: END IF;
1999: --
2000: wsh_util_core.api_post_call
2001: (
1996: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1997: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1998: END IF;
1999: --
2000: wsh_util_core.api_post_call
2001: (
2002: p_return_status => l_return_status,
2003: x_num_warnings => l_num_warnings,
2004: x_num_errors => l_num_errors
2031: -- Debug Statements
2032: --
2033: IF l_debug_on THEN
2034: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2035: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2036: END IF;
2037: --
2038: wsh_util_core.api_post_call
2039: (
2034: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2035: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2036: END IF;
2037: --
2038: wsh_util_core.api_post_call
2039: (
2040: p_return_status => l_return_status,
2041: x_num_warnings => l_num_warnings,
2042: x_num_errors => l_num_errors
2063: -- Debug Statements
2064: --
2065: IF l_debug_on THEN
2066: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2068: END IF;
2069: --
2070: wsh_util_core.api_post_call
2071: (
2066: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2068: END IF;
2069: --
2070: wsh_util_core.api_post_call
2071: (
2072: p_return_status => l_return_status,
2073: x_num_warnings => l_num_warnings,
2074: x_num_errors => l_num_errors
2079: FND_MESSAGE.SET_TOKEN('STATUS_CODE',x_parentTxnHistoryRec.status);
2080: FND_MESSAGE.SET_TOKEN('TRANSACTION_TYPE',l_transactionMeaning);
2081: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',x_parentTxnHistoryRec.RECEIPT_NUMBER);
2082: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',x_parentTxnHistoryRec.SHIPMENT_NUMBER);
2083: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2084: RAISE FND_API.G_EXC_ERROR;
2085: --}
2086: END IF;
2087: --}
2096: END IF;
2097: --
2098: IF l_num_errors > 0
2099: THEN
2100: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2101: ELSIF l_num_warnings > 0
2102: THEN
2103: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2104: ELSE
2099: THEN
2100: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2101: ELSIF l_num_warnings > 0
2102: THEN
2103: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2104: ELSE
2105: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2106: END IF;
2107: --
2101: ELSIF l_num_warnings > 0
2102: THEN
2103: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2104: ELSE
2105: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2106: END IF;
2107: --
2108: -- Debug Statements
2109: --
2114: --}
2115: EXCEPTION
2116: --{
2117: WHEN FND_API.G_EXC_ERROR THEN
2118: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2119: --
2120: -- Debug Statements
2121: --
2122: IF l_debug_on THEN
2124: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2125: END IF;
2126: --
2127: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2128: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2129: --
2130: -- Debug Statements
2131: --
2132: IF l_debug_on THEN
2133: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2134: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2135: END IF;
2136: --
2137: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2138: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2139: --
2140: -- Debug Statements
2141: --
2134: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2135: END IF;
2136: --
2137: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2138: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2139: --
2140: -- Debug Statements
2141: --
2142: IF l_debug_on THEN
2139: --
2140: -- Debug Statements
2141: --
2142: IF l_debug_on THEN
2143: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2144: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2145: END IF;
2146: --
2147: WHEN OTHERS THEN
2140: -- Debug Statements
2141: --
2142: IF l_debug_on THEN
2143: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2144: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2145: END IF;
2146: --
2147: WHEN OTHERS THEN
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2144: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2145: END IF;
2146: --
2147: WHEN OTHERS THEN
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2149: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processCancelASN');
2150: --
2151: -- Debug Statements
2152: --
2145: END IF;
2146: --
2147: WHEN OTHERS THEN
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2149: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processCancelASN');
2150: --
2151: -- Debug Statements
2152: --
2153: IF l_debug_on THEN
2203: END IF;
2204: --
2205: IF l_num_errors > 0
2206: THEN
2207: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2208: ELSIF l_num_warnings > 0
2209: THEN
2210: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2211: ELSE
2206: THEN
2207: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2208: ELSIF l_num_warnings > 0
2209: THEN
2210: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2211: ELSE
2212: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2213: END IF;
2214: --
2208: ELSIF l_num_warnings > 0
2209: THEN
2210: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2211: ELSE
2212: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2213: END IF;
2214: --
2215: -- Debug Statements
2216: --
2221: --}
2222: EXCEPTION
2223: --{
2224: WHEN FND_API.G_EXC_ERROR THEN
2225: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2226: --
2227: -- Debug Statements
2228: --
2229: IF l_debug_on THEN
2231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2232: END IF;
2233: --
2234: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2235: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2236: --
2237: -- Debug Statements
2238: --
2239: IF l_debug_on THEN
2240: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2242: END IF;
2243: --
2244: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2245: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2246: --
2247: -- Debug Statements
2248: --
2241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2242: END IF;
2243: --
2244: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2245: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2246: --
2247: -- Debug Statements
2248: --
2249: IF l_debug_on THEN
2246: --
2247: -- Debug Statements
2248: --
2249: IF l_debug_on THEN
2250: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2252: END IF;
2253: --
2254: WHEN OTHERS THEN
2247: -- Debug Statements
2248: --
2249: IF l_debug_on THEN
2250: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2252: END IF;
2253: --
2254: WHEN OTHERS THEN
2255: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2252: END IF;
2253: --
2254: WHEN OTHERS THEN
2255: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2256: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processReceiptHeaderUpdate');
2257: --
2258: -- Debug Statements
2259: --
2252: END IF;
2253: --
2254: WHEN OTHERS THEN
2255: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2256: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processReceiptHeaderUpdate');
2257: --
2258: -- Debug Statements
2259: --
2260: IF l_debug_on THEN
2332: END IF;
2333: --
2334: IF l_num_errors > 0
2335: THEN
2336: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2337: ELSIF l_num_warnings > 0
2338: THEN
2339: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2340: ELSE
2335: THEN
2336: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2337: ELSIF l_num_warnings > 0
2338: THEN
2339: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2340: ELSE
2341: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2342: END IF;
2343: --
2337: ELSIF l_num_warnings > 0
2338: THEN
2339: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2340: ELSE
2341: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2342: END IF;
2343: --
2344: -- Debug Statements
2345: --
2350: --}
2351: EXCEPTION
2352: --{
2353: WHEN FND_API.G_EXC_ERROR THEN
2354: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2355: --
2356: -- Debug Statements
2357: --
2358: IF l_debug_on THEN
2360: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2361: END IF;
2362: --
2363: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2364: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2365: --
2366: -- Debug Statements
2367: --
2368: IF l_debug_on THEN
2369: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2370: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2371: END IF;
2372: --
2373: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2374: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2375: --
2376: -- Debug Statements
2377: --
2370: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2371: END IF;
2372: --
2373: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2374: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2375: --
2376: -- Debug Statements
2377: --
2378: IF l_debug_on THEN
2375: --
2376: -- Debug Statements
2377: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2380: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2381: END IF;
2382: --
2383: WHEN OTHERS THEN
2376: -- Debug Statements
2377: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2380: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2381: END IF;
2382: --
2383: WHEN OTHERS THEN
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2380: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2381: END IF;
2382: --
2383: WHEN OTHERS THEN
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2385: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.extendLineRecTbl');
2386: --
2387: -- Debug Statements
2388: --
2381: END IF;
2382: --
2383: WHEN OTHERS THEN
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2385: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.extendLineRecTbl');
2386: --
2387: -- Debug Statements
2388: --
2389: IF l_debug_on THEN
2458: -- Debug Statements
2459: --
2460: IF l_debug_on THEN
2461: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2462: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2463: END IF;
2464: --
2465: wsh_util_core.api_post_call
2466: (
2461: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2462: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2463: END IF;
2464: --
2465: wsh_util_core.api_post_call
2466: (
2467: p_return_status => l_return_status,
2468: x_num_warnings => l_num_warnings,
2469: x_num_errors => l_num_errors
2481: x_lineRectbl.picked_quantity2_tbl(l_index) := NULL;
2482: x_lineRectbl.shipped_quantity2_tbl(l_index) := NULL;
2483: x_lineRectbl.received_quantity2_tbl(l_index) := NULL;
2484: x_lineRectbl.returned_quantity2_tbl(l_index) := NULL;
2485: x_lineRectbl.ship_from_location_id_tbl(l_index) := WSH_UTIL_CORE.C_NULL_SF_LOCN_ID;
2486: x_lineRectbl.earliest_dropoff_date_tbl(l_index) := p_lineDate;
2487: x_lineRectbl.delivery_id_tbl(l_index) := NULL;
2488: x_lineRectbl.rcv_shipment_line_id_tbl(l_index) := NULL;
2489: x_lineRectbl.requested_quantity_uom_tbl(l_index) := p_primaryUomCode;
2500: END IF;
2501: --
2502: IF l_num_errors > 0
2503: THEN
2504: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2505: ELSIF l_num_warnings > 0
2506: THEN
2507: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2508: ELSE
2503: THEN
2504: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2505: ELSIF l_num_warnings > 0
2506: THEN
2507: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2508: ELSE
2509: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2510: END IF;
2511: --
2505: ELSIF l_num_warnings > 0
2506: THEN
2507: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2508: ELSE
2509: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2510: END IF;
2511: --
2512: -- Debug Statements
2513: --
2518: --}
2519: EXCEPTION
2520: --{
2521: WHEN FND_API.G_EXC_ERROR THEN
2522: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2523: --
2524: -- Debug Statements
2525: --
2526: IF l_debug_on THEN
2528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2529: END IF;
2530: --
2531: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2532: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2533: --
2534: -- Debug Statements
2535: --
2536: IF l_debug_on THEN
2537: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2538: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2539: END IF;
2540: --
2541: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2542: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2543: --
2544: -- Debug Statements
2545: --
2538: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2539: END IF;
2540: --
2541: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2542: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2543: --
2544: -- Debug Statements
2545: --
2546: IF l_debug_on THEN
2543: --
2544: -- Debug Statements
2545: --
2546: IF l_debug_on THEN
2547: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2549: END IF;
2550: --
2551: WHEN OTHERS THEN
2544: -- Debug Statements
2545: --
2546: IF l_debug_on THEN
2547: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2549: END IF;
2550: --
2551: WHEN OTHERS THEN
2552: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2549: END IF;
2550: --
2551: WHEN OTHERS THEN
2552: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2553: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addNewLine');
2554: --
2555: -- Debug Statements
2556: --
2549: END IF;
2550: --
2551: WHEN OTHERS THEN
2552: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2553: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addNewLine');
2554: --
2555: -- Debug Statements
2556: --
2557: IF l_debug_on THEN
2658: END IF;
2659: --
2660: IF l_num_errors > 0
2661: THEN
2662: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2663: ELSIF l_num_warnings > 0
2664: THEN
2665: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2666: ELSE
2661: THEN
2662: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2663: ELSIF l_num_warnings > 0
2664: THEN
2665: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2666: ELSE
2667: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2668: END IF;
2669: --
2663: ELSIF l_num_warnings > 0
2664: THEN
2665: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2666: ELSE
2667: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2668: END IF;
2669: --
2670: -- Debug Statements
2671: --
2676: --}
2677: EXCEPTION
2678: --{
2679: WHEN FND_API.G_EXC_ERROR THEN
2680: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2681: --
2682: -- Debug Statements
2683: --
2684: IF l_debug_on THEN
2686: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2687: END IF;
2688: --
2689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2690: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2691: --
2692: -- Debug Statements
2693: --
2694: IF l_debug_on THEN
2695: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2696: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2697: END IF;
2698: --
2699: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2700: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2701: --
2702: -- Debug Statements
2703: --
2696: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2697: END IF;
2698: --
2699: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2700: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2701: --
2702: -- Debug Statements
2703: --
2704: IF l_debug_on THEN
2701: --
2702: -- Debug Statements
2703: --
2704: IF l_debug_on THEN
2705: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2707: END IF;
2708: --
2709: WHEN OTHERS THEN
2702: -- Debug Statements
2703: --
2704: IF l_debug_on THEN
2705: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2707: END IF;
2708: --
2709: WHEN OTHERS THEN
2710: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2707: END IF;
2708: --
2709: WHEN OTHERS THEN
2710: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2711: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl');
2712: --
2713: -- Debug Statements
2714: --
2707: END IF;
2708: --
2709: WHEN OTHERS THEN
2710: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2711: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl');
2712: --
2713: -- Debug Statements
2714: --
2715: IF l_debug_on THEN
2804: -- Debug Statements
2805: --
2806: IF l_debug_on THEN
2807: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2809: END IF;
2810: --
2811: wsh_util_core.api_post_call
2812: (
2807: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2809: END IF;
2810: --
2811: wsh_util_core.api_post_call
2812: (
2813: p_return_status => l_return_status,
2814: x_num_warnings => l_num_warnings,
2815: x_num_errors => l_num_errors
2877: END IF;
2878: --
2879: IF l_num_errors > 0
2880: THEN
2881: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2882: ELSIF l_num_warnings > 0
2883: THEN
2884: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2885: ELSE
2880: THEN
2881: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2882: ELSIF l_num_warnings > 0
2883: THEN
2884: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2885: ELSE
2886: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2887: END IF;
2888: --
2882: ELSIF l_num_warnings > 0
2883: THEN
2884: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2885: ELSE
2886: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2887: END IF;
2888: --
2889: --
2890: -- Debug Statements
2896: --}
2897: EXCEPTION
2898: --{
2899: WHEN FND_API.G_EXC_ERROR THEN
2900: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2901: --
2902: -- Debug Statements
2903: --
2904: IF l_debug_on THEN
2906: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2907: END IF;
2908: --
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2910: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2911: --
2912: -- Debug Statements
2913: --
2914: IF l_debug_on THEN
2915: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2916: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2917: END IF;
2918: --
2919: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2920: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2921: --
2922: -- Debug Statements
2923: --
2916: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2917: END IF;
2918: --
2919: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2920: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2921: --
2922: -- Debug Statements
2923: --
2924: IF l_debug_on THEN
2921: --
2922: -- Debug Statements
2923: --
2924: IF l_debug_on THEN
2925: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2926: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2927: END IF;
2928: --
2929: WHEN OTHERS THEN
2922: -- Debug Statements
2923: --
2924: IF l_debug_on THEN
2925: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2926: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2927: END IF;
2928: --
2929: WHEN OTHERS THEN
2930: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2926: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2927: END IF;
2928: --
2929: WHEN OTHERS THEN
2930: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2931: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.copyMatchedLine');
2932: --
2933: -- Debug Statements
2934: --
2927: END IF;
2928: --
2929: WHEN OTHERS THEN
2930: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2931: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.copyMatchedLine');
2932: --
2933: -- Debug Statements
2934: --
2935: IF l_debug_on THEN
3018: -- Debug Statements
3019: --
3020: IF l_debug_on THEN
3021: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3022: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3023: END IF;
3024: --
3025: wsh_util_core.api_post_call
3026: (
3021: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3022: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3023: END IF;
3024: --
3025: wsh_util_core.api_post_call
3026: (
3027: p_return_status => l_return_status,
3028: x_num_warnings => l_num_warnings,
3029: x_num_errors => l_num_errors
3088: END IF;
3089: --
3090: IF l_num_errors > 0
3091: THEN
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3093: ELSIF l_num_warnings > 0
3094: THEN
3095: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3096: ELSE
3091: THEN
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3093: ELSIF l_num_warnings > 0
3094: THEN
3095: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3096: ELSE
3097: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3098: END IF;
3099: --
3093: ELSIF l_num_warnings > 0
3094: THEN
3095: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3096: ELSE
3097: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3098: END IF;
3099: --
3100: -- Debug Statements
3101: --
3106: --}
3107: EXCEPTION
3108: --{
3109: WHEN FND_API.G_EXC_ERROR THEN
3110: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3111: --
3112: -- Debug Statements
3113: --
3114: IF l_debug_on THEN
3116: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3117: END IF;
3118: --
3119: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3120: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3121: --
3122: -- Debug Statements
3123: --
3124: IF l_debug_on THEN
3125: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3126: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3127: END IF;
3128: --
3129: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3130: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3131: --
3132: -- Debug Statements
3133: --
3126: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3127: END IF;
3128: --
3129: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3130: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3131: --
3132: -- Debug Statements
3133: --
3134: IF l_debug_on THEN
3131: --
3132: -- Debug Statements
3133: --
3134: IF l_debug_on THEN
3135: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3136: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3137: END IF;
3138: --
3139: WHEN OTHERS THEN
3132: -- Debug Statements
3133: --
3134: IF l_debug_on THEN
3135: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3136: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3137: END IF;
3138: --
3139: WHEN OTHERS THEN
3140: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3136: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3137: END IF;
3138: --
3139: WHEN OTHERS THEN
3140: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3141: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addNewMatchedLine');
3142: --
3143: -- Debug Statements
3144: --
3137: END IF;
3138: --
3139: WHEN OTHERS THEN
3140: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3141: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addNewMatchedLine');
3142: --
3143: -- Debug Statements
3144: --
3145: IF l_debug_on THEN
3374: -- Debug Statements
3375: --
3376: IF l_debug_on THEN
3377: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3378: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3379: END IF;
3380: --
3381: wsh_util_core.api_post_call
3382: (
3377: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3378: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3379: END IF;
3380: --
3381: wsh_util_core.api_post_call
3382: (
3383: p_return_status => l_return_status,
3384: x_num_warnings => l_num_warnings,
3385: x_num_errors => l_num_errors
3449: -- Debug Statements
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3453: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3454: END IF;
3455: --
3456: wsh_util_core.api_post_call
3457: (
3452: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3453: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3454: END IF;
3455: --
3456: wsh_util_core.api_post_call
3457: (
3458: p_return_status => l_return_status,
3459: x_num_warnings => l_num_warnings,
3460: x_num_errors => l_num_errors
3505: -- Debug Statements
3506: --
3507: IF l_debug_on THEN
3508: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3509: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3510: END IF;
3511: --
3512: wsh_util_core.api_post_call
3513: (
3508: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3509: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3510: END IF;
3511: --
3512: wsh_util_core.api_post_call
3513: (
3514: p_return_status => l_return_status,
3515: x_num_warnings => l_num_warnings,
3516: x_num_errors => l_num_errors
3527: END IF;
3528: --
3529: IF l_num_errors > 0
3530: THEN
3531: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3532: ELSIF l_num_warnings > 0
3533: THEN
3534: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3535: ELSE
3530: THEN
3531: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3532: ELSIF l_num_warnings > 0
3533: THEN
3534: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3535: ELSE
3536: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3537: END IF;
3538: --
3532: ELSIF l_num_warnings > 0
3533: THEN
3534: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3535: ELSE
3536: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3537: END IF;
3538: --
3539: -- Debug Statements
3540: --
3545: --}
3546: EXCEPTION
3547: --{
3548: WHEN FND_API.G_EXC_ERROR THEN
3549: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3550: --
3551: -- Debug Statements
3552: --
3553: IF l_debug_on THEN
3555: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3556: END IF;
3557: --
3558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3559: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3560: --
3561: -- Debug Statements
3562: --
3563: IF l_debug_on THEN
3564: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3565: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3566: END IF;
3567: --
3568: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3569: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3570: --
3571: -- Debug Statements
3572: --
3565: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3566: END IF;
3567: --
3568: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3569: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3570: --
3571: -- Debug Statements
3572: --
3573: IF l_debug_on THEN
3570: --
3571: -- Debug Statements
3572: --
3573: IF l_debug_on THEN
3574: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3575: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3576: END IF;
3577: --
3578: WHEN OTHERS THEN
3571: -- Debug Statements
3572: --
3573: IF l_debug_on THEN
3574: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3575: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3576: END IF;
3577: --
3578: WHEN OTHERS THEN
3579: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3575: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3576: END IF;
3577: --
3578: WHEN OTHERS THEN
3579: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3580: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.splitLines');
3581: --
3582: -- Debug Statements
3583: --
3576: END IF;
3577: --
3578: WHEN OTHERS THEN
3579: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3580: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.splitLines');
3581: --
3582: -- Debug Statements
3583: --
3584: IF l_debug_on THEN
3788: END IF;
3789: --
3790: IF l_num_errors > 0
3791: THEN
3792: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3793: ELSIF l_num_warnings > 0
3794: THEN
3795: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3796: ELSE
3791: THEN
3792: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3793: ELSIF l_num_warnings > 0
3794: THEN
3795: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3796: ELSE
3797: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3798: END IF;
3799: --
3793: ELSIF l_num_warnings > 0
3794: THEN
3795: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3796: ELSE
3797: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3798: END IF;
3799: --
3800: --
3801: -- Debug Statements
3807: --}
3808: EXCEPTION
3809: --{
3810: WHEN FND_API.G_EXC_ERROR THEN
3811: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3812: --
3813: -- Debug Statements
3814: --
3815: IF l_debug_on THEN
3817: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3818: END IF;
3819: --
3820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3821: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3822: --
3823: -- Debug Statements
3824: --
3825: IF l_debug_on THEN
3826: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3827: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3828: END IF;
3829: --
3830: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3831: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3832: --
3833: -- Debug Statements
3834: --
3827: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3828: END IF;
3829: --
3830: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3831: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3832: --
3833: -- Debug Statements
3834: --
3835: IF l_debug_on THEN
3832: --
3833: -- Debug Statements
3834: --
3835: IF l_debug_on THEN
3836: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3837: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3838: END IF;
3839: --
3840: WHEN OTHERS THEN
3833: -- Debug Statements
3834: --
3835: IF l_debug_on THEN
3836: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3837: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3838: END IF;
3839: --
3840: WHEN OTHERS THEN
3841: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3837: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3838: END IF;
3839: --
3840: WHEN OTHERS THEN
3841: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3842: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.applyDelta');
3843: --
3844: -- Debug Statements
3845: --
3838: END IF;
3839: --
3840: WHEN OTHERS THEN
3841: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3842: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.applyDelta');
3843: --
3844: -- Debug Statements
3845: --
3846: IF l_debug_on THEN
4032: END IF;
4033: --
4034: IF l_num_errors > 0
4035: THEN
4036: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4037: ELSIF l_num_warnings > 0
4038: THEN
4039: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4040: ELSE
4035: THEN
4036: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4037: ELSIF l_num_warnings > 0
4038: THEN
4039: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4040: ELSE
4041: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4042: END IF;
4043: --
4037: ELSIF l_num_warnings > 0
4038: THEN
4039: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4040: ELSE
4041: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4042: END IF;
4043: --
4044: --
4045: -- Debug Statements
4051: --}
4052: EXCEPTION
4053: --{
4054: WHEN FND_API.G_EXC_ERROR THEN
4055: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4056: --
4057: -- Debug Statements
4058: --
4059: IF l_debug_on THEN
4061: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4062: END IF;
4063: --
4064: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4065: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4066: --
4067: -- Debug Statements
4068: --
4069: IF l_debug_on THEN
4070: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4071: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4072: END IF;
4073: --
4074: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4076: --
4077: -- Debug Statements
4078: --
4071: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4072: END IF;
4073: --
4074: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4076: --
4077: -- Debug Statements
4078: --
4079: IF l_debug_on THEN
4076: --
4077: -- Debug Statements
4078: --
4079: IF l_debug_on THEN
4080: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4082: END IF;
4083: --
4084: WHEN OTHERS THEN
4077: -- Debug Statements
4078: --
4079: IF l_debug_on THEN
4080: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4082: END IF;
4083: --
4084: WHEN OTHERS THEN
4085: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4082: END IF;
4083: --
4084: WHEN OTHERS THEN
4085: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4086: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.applyQuantity');
4087: --
4088: -- Debug Statements
4089: --
4082: END IF;
4083: --
4084: WHEN OTHERS THEN
4085: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4086: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.applyQuantity');
4087: --
4088: -- Debug Statements
4089: --
4090: IF l_debug_on THEN
4139: p_end_index IN NUMBER,
4140: p_min_date IN DATE,
4141: p_max_date IN DATE,
4142: x_matchedLineRecTbl IN OUT NOCOPY WSH_IB_UI_RECON_GRP.asn_rcv_del_det_rec_type,
4143: x_linktbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
4144: x_linkExttbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
4145: x_return_status OUT NOCOPY VARCHAR2
4146: )
4147: IS
4140: p_min_date IN DATE,
4141: p_max_date IN DATE,
4142: x_matchedLineRecTbl IN OUT NOCOPY WSH_IB_UI_RECON_GRP.asn_rcv_del_det_rec_type,
4143: x_linktbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
4144: x_linkExttbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
4145: x_return_status OUT NOCOPY VARCHAR2
4146: )
4147: IS
4148: --{
4271: IF l_debug_on THEN
4272: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4273: WSH_DEBUG_SV.log(l_module_name,'l_key',l_key);
4274: WSH_DEBUG_SV.log(l_module_name,'l_transactionSubType',l_transactionSubType);
4275: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4276: END IF;
4277: --
4278: wsh_util_core.api_post_call
4279: (
4274: WSH_DEBUG_SV.log(l_module_name,'l_transactionSubType',l_transactionSubType);
4275: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4276: END IF;
4277: --
4278: wsh_util_core.api_post_call
4279: (
4280: p_return_status => l_return_status,
4281: x_num_warnings => l_num_warnings,
4282: x_num_errors => l_num_errors
4286: --
4287: -- Debug Statements
4288: --
4289: IF l_debug_on THEN
4290: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
4291: END IF;
4292: --
4293: wsh_util_core.get_cached_value
4294: (
4289: IF l_debug_on THEN
4290: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
4291: END IF;
4292: --
4293: wsh_util_core.get_cached_value
4294: (
4295: p_cache_tbl => x_linkTbl,
4296: p_cache_ext_tbl => x_linkExtTbl,
4297: p_key => l_key, --??--l_poShipmentLineId,
4306: --
4307: IF l_debug_on THEN
4308: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4309: WSH_DEBUG_SV.log(l_module_name,'l_linkRecString',l_linkRecString);
4310: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4311: END IF;
4312: --
4313: wsh_util_core.api_post_call
4314: (
4309: WSH_DEBUG_SV.log(l_module_name,'l_linkRecString',l_linkRecString);
4310: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4311: END IF;
4312: --
4313: wsh_util_core.api_post_call
4314: (
4315: p_return_status => l_return_status,
4316: x_num_warnings => l_num_warnings,
4317: x_num_errors => l_num_errors
4317: x_num_errors => l_num_errors
4318: );
4319: --
4320: --
4321: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
4322: THEN
4323: FND_MESSAGE.SET_NAME('WSH','WSH_IB_PO_WDD_LINK_ERROR');
4324: FND_MESSAGE.SET_TOKEN('KEY',l_key);
4325: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
4321: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
4322: THEN
4323: FND_MESSAGE.SET_NAME('WSH','WSH_IB_PO_WDD_LINK_ERROR');
4324: FND_MESSAGE.SET_TOKEN('KEY',l_key);
4325: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
4326: RAISE FND_API.G_EXC_ERROR;
4327: --Should we raise some error insteaD?
4328: -- This may fail parent txn.....check again
4329: END IF;
4380: -- Debug Statements
4381: --
4382: IF l_debug_on THEN
4383: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4384: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4385: END IF;
4386: --
4387: wsh_util_core.api_post_call
4388: (
4383: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4384: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4385: END IF;
4386: --
4387: wsh_util_core.api_post_call
4388: (
4389: p_return_status => l_return_status,
4390: x_num_warnings => l_num_warnings,
4391: x_num_errors => l_num_errors
4428: --
4429: IF l_debug_on THEN
4430: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4431: WSH_DEBUG_SV.log(l_module_name,'Converted Qty',l_totalTxnLineQty);
4432: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4433: END IF;
4434: --
4435: wsh_util_core.api_post_call
4436: (
4431: WSH_DEBUG_SV.log(l_module_name,'Converted Qty',l_totalTxnLineQty);
4432: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4433: END IF;
4434: --
4435: wsh_util_core.api_post_call
4436: (
4437: p_return_status => l_return_status,
4438: x_num_warnings => l_num_warnings,
4439: x_num_errors => l_num_errors
4521: --{
4522: IF l_debug_on THEN
4523: WSH_DEBUG_SV.logmsg(l_module_name,'Line SF <> Txn SF');
4524: END IF;
4525: IF x_matchedLineRecTbl.ship_from_location_id_tab(l_lineIndex) = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
4526: THEN
4527: IF l_debug_on THEN
4528: WSH_DEBUG_SV.logmsg(l_module_name,'Line SF is -1');
4529: END IF;
4647: (
4648: (
4649: (l_lineQty * l_totalTxnLineQty2) / l_totalTxnLineQty
4650: ),
4651: WSH_UTIL_CORE.C_MAX_DECIMAL_DIGITS_INV
4652: );
4653: --}
4654: ELSIF l_transactionSubType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_CORRECTION_POSITIVE
4655: THEN
4725: -- Debug Statements
4726: --
4727: IF l_debug_on THEN
4728: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4729: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4730: END IF;
4731: --
4732: wsh_util_core.api_post_call
4733: (
4728: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4729: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4730: END IF;
4731: --
4732: wsh_util_core.api_post_call
4733: (
4734: p_return_status => l_return_status,
4735: x_num_warnings => l_num_warnings,
4736: x_num_errors => l_num_errors
4754: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_poHeaderNumber);
4755: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
4756: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
4757: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
4758: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
4759: --
4760: RAISE FND_API.G_EXC_ERROR;
4761: --}
4762: END IF;
4917: -- Debug Statements
4918: --
4919: IF l_debug_on THEN
4920: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4921: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4922: END IF;
4923: --
4924: wsh_util_core.api_post_call
4925: (
4920: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4921: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4922: END IF;
4923: --
4924: wsh_util_core.api_post_call
4925: (
4926: p_return_status => l_return_status,
4927: x_num_warnings => l_num_warnings,
4928: x_num_errors => l_num_errors
4946: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_poHeaderNumber);
4947: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
4948: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
4949: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
4950: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
4951: --
4952: RAISE FND_API.G_EXC_ERROR;
4953: --}
4954: END IF;
4955: --}
4956: ELSE
4957: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_NO_MATCH_ERROR');
4958: FND_MESSAGE.SET_TOKEN('KEY',l_key);
4959: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
4960: RAISE FND_API.G_EXC_ERROR;
4961: END IF;
4962: --}
4963: END IF;
4973: --
4974: -- Debug Statements
4975: --
4976: IF l_debug_on THEN
4977: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
4978: END IF;
4979: --
4980: wsh_util_core.get_cached_value
4981: (
4976: IF l_debug_on THEN
4977: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
4978: END IF;
4979: --
4980: wsh_util_core.get_cached_value
4981: (
4982: p_cache_tbl => x_linkTbl,
4983: p_cache_ext_tbl => x_linkExtTbl,
4984: p_key => l_key, --??--l_poShipmentLineId,
4992: -- Debug Statements
4993: --
4994: IF l_debug_on THEN
4995: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4996: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4997: END IF;
4998: --
4999: wsh_util_core.api_post_call
5000: (
4995: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4996: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4997: END IF;
4998: --
4999: wsh_util_core.api_post_call
5000: (
5001: p_return_status => l_return_status,
5002: x_num_warnings => l_num_warnings,
5003: x_num_errors => l_num_errors
5020: END IF;
5021: --
5022: IF l_num_errors > 0
5023: THEN
5024: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5025: ELSIF l_num_warnings > 0
5026: THEN
5027: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5028: ELSE
5023: THEN
5024: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5025: ELSIF l_num_warnings > 0
5026: THEN
5027: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5028: ELSE
5029: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5030: END IF;
5031: --
5025: ELSIF l_num_warnings > 0
5026: THEN
5027: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5028: ELSE
5029: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5030: END IF;
5031: --
5032: -- Debug Statements
5033: --
5040: --{
5041: --WHEN e_notMatched THEN
5042: --RAISE e_notMatched;
5043: WHEN FND_API.G_EXC_ERROR THEN
5044: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5045: --
5046: -- Debug Statements
5047: --
5048: IF l_debug_on THEN
5050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5051: END IF;
5052: --
5053: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5055: --
5056: -- Debug Statements
5057: --
5058: IF l_debug_on THEN
5059: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5060: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5061: END IF;
5062: --
5063: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5064: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5065: --
5066: -- Debug Statements
5067: --
5060: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5061: END IF;
5062: --
5063: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5064: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5065: --
5066: -- Debug Statements
5067: --
5068: IF l_debug_on THEN
5065: --
5066: -- Debug Statements
5067: --
5068: IF l_debug_on THEN
5069: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5070: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5071: END IF;
5072: --
5073: WHEN OTHERS THEN
5066: -- Debug Statements
5067: --
5068: IF l_debug_on THEN
5069: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5070: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5071: END IF;
5072: --
5073: WHEN OTHERS THEN
5074: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5070: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5071: END IF;
5072: --
5073: WHEN OTHERS THEN
5074: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5075: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchQuantity');
5076: --
5077: -- Debug Statements
5078: --
5071: END IF;
5072: --
5073: WHEN OTHERS THEN
5074: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5075: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchQuantity');
5076: --
5077: -- Debug Statements
5078: --
5079: IF l_debug_on THEN
5096: p_end_index IN NUMBER,
5097: p_putMessages IN BOOLEAN,
5098: p_txnUniqueSFLocnId IN NUMBER,
5099: x_matchedLineRecTbl IN OUT NOCOPY WSH_IB_UI_RECON_GRP.asn_rcv_del_det_rec_type,
5100: x_dlvytbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
5101: x_dlvyExttbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
5102: x_min_date IN OUT NOCOPY DATE,
5103: x_max_date IN OUT NOCOPY DATE,
5104: x_return_status OUT NOCOPY VARCHAR2
5097: p_putMessages IN BOOLEAN,
5098: p_txnUniqueSFLocnId IN NUMBER,
5099: x_matchedLineRecTbl IN OUT NOCOPY WSH_IB_UI_RECON_GRP.asn_rcv_del_det_rec_type,
5100: x_dlvytbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
5101: x_dlvyExttbl IN OUT NOCOPY WSH_UTIL_CORE.char500_tab_type,
5102: x_min_date IN OUT NOCOPY DATE,
5103: x_max_date IN OUT NOCOPY DATE,
5104: x_return_status OUT NOCOPY VARCHAR2
5105: )
5329: p_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT
5330: AND p_ReceiptAgainstASN <> 'Y'
5331: )
5332: )
5333: AND p_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5334: AND l_shipFromLocationId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5335: THEN
5336: --{
5337: IF p_putMessages
5330: AND p_ReceiptAgainstASN <> 'Y'
5331: )
5332: )
5333: AND p_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5334: AND l_shipFromLocationId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5335: THEN
5336: --{
5337: IF p_putMessages
5338: THEN
5339: FND_MESSAGE.SET_NAME('WSH','WSH_IB_NOT_UNIQUE_SF_LOCN');
5340: FND_MESSAGE.SET_TOKEN('TRANSACTION_TYPE',p_transactionMeaning); --p_action_prms.action_code);
5341: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
5342: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
5343: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
5344: END IF;
5345: --
5346: RAISE e_notMatched;
5347: --}
5348: END IF;
5349: --
5350: --
5351: IF l_shipFromLocationId = p_txnUniqueSFLocnId
5352: OR ( l_shipFromLocationId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5353: AND l_shipFromLocationId = l_firstShipFromLocationId
5354: )
5355: --OR ( l_shipFromLocationId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID AND l_index = l_start_index )
5356: /*
5351: IF l_shipFromLocationId = p_txnUniqueSFLocnId
5352: OR ( l_shipFromLocationId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5353: AND l_shipFromLocationId = l_firstShipFromLocationId
5354: )
5355: --OR ( l_shipFromLocationId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID AND l_index = l_start_index )
5356: /*
5357: OR (
5358: p_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT
5359: AND p_receiptAgainstASN = 'Y'
5378: --
5379: -- Debug Statements
5380: --
5381: IF l_debug_on THEN
5382: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_dlvyTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
5383: END IF;
5384: --
5385: wsh_util_core.get_cached_value
5386: (
5381: IF l_debug_on THEN
5382: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_dlvyTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
5383: END IF;
5384: --
5385: wsh_util_core.get_cached_value
5386: (
5387: p_cache_tbl => x_dlvyTbl,
5388: p_cache_ext_tbl => x_dlvyExtTbl,
5389: p_key => l_deliveryId,
5397: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
5398: END IF;
5399: --
5400: --
5401: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
5402: THEN
5403: RAISE FND_API.G_EXC_ERROR;
5404: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
5405: THEN
5400: --
5401: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
5402: THEN
5403: RAISE FND_API.G_EXC_ERROR;
5404: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
5405: THEN
5406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5407: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5408: THEN
5403: RAISE FND_API.G_EXC_ERROR;
5404: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
5405: THEN
5406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5407: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5408: THEN
5409: l_deliveryRecString := NULL;
5410: END IF;
5411: --}
5437: THEN
5438: --{
5439: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
5440: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_deliveryId);
5441: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
5442: RAISE FND_API.G_EXC_ERROR;
5443: --}
5444: END IF;
5445: --
5524: --
5525: -- Debug Statements
5526: --
5527: IF l_debug_on THEN
5528: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_dlvyTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
5529: END IF;
5530: --
5531: wsh_util_core.get_cached_value
5532: (
5527: IF l_debug_on THEN
5528: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_dlvyTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
5529: END IF;
5530: --
5531: wsh_util_core.get_cached_value
5532: (
5533: p_cache_tbl => x_dlvyTbl,
5534: p_cache_ext_tbl => x_dlvyExtTbl,
5535: p_key => l_deliveryId,
5543: -- Debug Statements
5544: --
5545: IF l_debug_on THEN
5546: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
5547: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5548: END IF;
5549: --
5550: wsh_util_core.api_post_call
5551: (
5546: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
5547: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5548: END IF;
5549: --
5550: wsh_util_core.api_post_call
5551: (
5552: p_return_status => l_return_status,
5553: x_num_warnings => l_num_warnings,
5554: x_num_errors => l_num_errors
5578: --
5579: l_matchedCount := l_matchedCount + 1;
5580: --
5581: /*
5582: IF l_shipFromLocationId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5583: THEN
5584: x_matchedLineRecTbl.ship_from_location_id_tab(l_index) := p_txnUniqueSFLocnId;
5585: END IF;
5586: */
5627: END IF;
5628: --
5629: IF l_num_errors > 0
5630: THEN
5631: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5632: ELSIF l_num_warnings > 0
5633: THEN
5634: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5635: ELSE
5630: THEN
5631: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5632: ELSIF l_num_warnings > 0
5633: THEN
5634: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5635: ELSE
5636: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5637: END IF;
5638: --
5632: ELSIF l_num_warnings > 0
5633: THEN
5634: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5635: ELSE
5636: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5637: END IF;
5638: --
5639: -- Debug Statements
5640: --
5677: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_poHeaderNumber);
5678: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
5679: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
5680: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
5681: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
5682: --}
5683: END IF;
5684: --
5685: --
5694: --
5695: RAISE e_notMatched;
5696: --}
5697: WHEN FND_API.G_EXC_ERROR THEN
5698: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5699: --
5700: -- Debug Statements
5701: --
5702: IF l_debug_on THEN
5704: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5705: END IF;
5706: --
5707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5708: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5709: --
5710: -- Debug Statements
5711: --
5712: IF l_debug_on THEN
5713: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5715: END IF;
5716: --
5717: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5718: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5719: --
5720: -- Debug Statements
5721: --
5714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5715: END IF;
5716: --
5717: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5718: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5719: --
5720: -- Debug Statements
5721: --
5722: IF l_debug_on THEN
5719: --
5720: -- Debug Statements
5721: --
5722: IF l_debug_on THEN
5723: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5724: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5725: END IF;
5726: --
5727: WHEN OTHERS THEN
5720: -- Debug Statements
5721: --
5722: IF l_debug_on THEN
5723: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5724: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5725: END IF;
5726: --
5727: WHEN OTHERS THEN
5728: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5724: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5725: END IF;
5726: --
5727: WHEN OTHERS THEN
5728: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5729: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchLines');
5730: --
5731: -- Debug Statements
5732: --
5725: END IF;
5726: --
5727: WHEN OTHERS THEN
5728: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5729: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchLines');
5730: --
5731: -- Debug Statements
5732: --
5733: IF l_debug_on THEN
5884: AND ( p_ship_from_location_id IS NULL
5885: OR
5886: ( wdd.ship_from_location_id = p_ship_from_location_id
5887: OR
5888: wdd.ship_from_location_id = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
5889: )
5890: )
5891: -- } IB-Phase-2
5892: ORDER BY DECODE
5892: ORDER BY DECODE
5893: (
5894: wdd.ship_from_location_id,
5895: p_ship_from_location_id, -999,
5896: WSH_UTIL_CORE.C_NULL_SF_LOCN_ID, 1E38,
5897: wdd.ship_from_location_id
5898: ),
5899: DECODE
5900: (
6168: --
6169: l_lineRecTbl line_recTbl_type;
6170: l_matchedLineRecTbl WSH_IB_UI_RECON_GRP.asn_rcv_del_det_rec_type;
6171: --
6172: l_linkTbl WSH_UTIL_CORE.char500_tab_type;
6173: l_linkExtTbl WSH_UTIL_CORE.char500_tab_type;
6174: l_linkRecString VARCHAR2(500);
6175: --
6176: l_dlvyTbl WSH_UTIL_CORE.char500_tab_type;
6169: l_lineRecTbl line_recTbl_type;
6170: l_matchedLineRecTbl WSH_IB_UI_RECON_GRP.asn_rcv_del_det_rec_type;
6171: --
6172: l_linkTbl WSH_UTIL_CORE.char500_tab_type;
6173: l_linkExtTbl WSH_UTIL_CORE.char500_tab_type;
6174: l_linkRecString VARCHAR2(500);
6175: --
6176: l_dlvyTbl WSH_UTIL_CORE.char500_tab_type;
6177: l_dlvyExtTbl WSH_UTIL_CORE.char500_tab_type;
6172: l_linkTbl WSH_UTIL_CORE.char500_tab_type;
6173: l_linkExtTbl WSH_UTIL_CORE.char500_tab_type;
6174: l_linkRecString VARCHAR2(500);
6175: --
6176: l_dlvyTbl WSH_UTIL_CORE.char500_tab_type;
6177: l_dlvyExtTbl WSH_UTIL_CORE.char500_tab_type;
6178: --
6179: --
6180: l_FailedTxnHistory_recTbl WSH_INBOUND_TXN_HISTORY_PKG.inboundTxnHistory_recTbl_type;
6173: l_linkExtTbl WSH_UTIL_CORE.char500_tab_type;
6174: l_linkRecString VARCHAR2(500);
6175: --
6176: l_dlvyTbl WSH_UTIL_CORE.char500_tab_type;
6177: l_dlvyExtTbl WSH_UTIL_CORE.char500_tab_type;
6178: --
6179: --
6180: l_FailedTxnHistory_recTbl WSH_INBOUND_TXN_HISTORY_PKG.inboundTxnHistory_recTbl_type;
6181: l_MatchedTxnHistory_recTbl WSH_INBOUND_TXN_HISTORY_PKG.inboundTxnHistory_recTbl_type;
6180: l_FailedTxnHistory_recTbl WSH_INBOUND_TXN_HISTORY_PKG.inboundTxnHistory_recTbl_type;
6181: l_MatchedTxnHistory_recTbl WSH_INBOUND_TXN_HISTORY_PKG.inboundTxnHistory_recTbl_type;
6182: --
6183: --
6184: l_uniqueShipFromLocationIdTbl WSH_UTIL_CORE.id_tab_type;
6185: --
6186: --
6187: l_min_date DATE;
6188: l_max_date DATE;
6189: l_dummy_min_date DATE;
6190: l_dummy_max_date DATE;
6191: --
6192: --
6193: l_shipFromLocationIdTbl WSH_UTIL_CORE.key_value_tab_type;
6194: l_shipFromLocationIdExtTbl WSH_UTIL_CORE.key_value_tab_type;
6195: l_shipFromLocationIdLineCount NUMBER;
6196: --
6197: --
6190: l_dummy_max_date DATE;
6191: --
6192: --
6193: l_shipFromLocationIdTbl WSH_UTIL_CORE.key_value_tab_type;
6194: l_shipFromLocationIdExtTbl WSH_UTIL_CORE.key_value_tab_type;
6195: l_shipFromLocationIdLineCount NUMBER;
6196: --
6197: --
6198: l_parentTxnHistoryRec WSH_INBOUND_TXN_HISTORY_PKG.ib_txn_history_rec_type;
6290:
6291: IF l_trx_wsh_location_id IS NULL
6292: THEN
6293: FND_MESSAGE.SET_NAME('WSH','WSH_IB_INVALID_WSH_LOC');
6294: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
6295: RAISE FND_API.G_EXC_ERROR;
6296: END IF;
6297: END IF;
6298: -- } IB-Phase-2
6326: -- Debug Statements
6327: --
6328: IF l_debug_on THEN
6329: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6330: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6331: END IF;
6332: --
6333: wsh_util_core.api_post_call
6334: (
6329: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6330: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6331: END IF;
6332: --
6333: wsh_util_core.api_post_call
6334: (
6335: p_return_status => l_return_status,
6336: x_num_warnings => l_num_warnings,
6337: x_num_errors => l_num_errors
6357: );
6358: --
6359: IF l_debug_on THEN
6360: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6361: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6362: END IF;
6363: --
6364: wsh_util_core.api_post_call
6365: (
6360: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6361: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6362: END IF;
6363: --
6364: wsh_util_core.api_post_call
6365: (
6366: p_return_status => l_return_status,
6367: x_num_warnings => l_num_warnings,
6368: x_num_errors => l_num_errors
6415: -- Debug Statements
6416: --
6417: IF l_debug_on THEN
6418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6420: END IF;
6421: --
6422: wsh_util_core.api_post_call
6423: (
6418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6420: END IF;
6421: --
6422: wsh_util_core.api_post_call
6423: (
6424: p_return_status => l_return_status,
6425: x_num_warnings => l_num_warnings,
6426: x_num_errors => l_num_errors
6448: IF l_debug_on THEN
6449: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6450: WSH_DEBUG_SV.log(l_module_name,'l_transactionType-Final',l_transactionType);
6451: WSH_DEBUG_SV.log(l_module_name,'l_transactionMeaning',l_transactionMeaning);
6452: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6453: END IF;
6454: --
6455: wsh_util_core.api_post_call
6456: (
6451: WSH_DEBUG_SV.log(l_module_name,'l_transactionMeaning',l_transactionMeaning);
6452: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6453: END IF;
6454: --
6455: wsh_util_core.api_post_call
6456: (
6457: p_return_status => l_return_status,
6458: x_num_warnings => l_num_warnings,
6459: x_num_errors => l_num_errors
6490: -- Debug Statements
6491: --
6492: IF l_debug_on THEN
6493: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6494: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6495: END IF;
6496: --
6497: wsh_util_core.api_post_call
6498: (
6493: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6494: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6495: END IF;
6496: --
6497: wsh_util_core.api_post_call
6498: (
6499: p_return_status => l_return_status,
6500: x_num_warnings => l_num_warnings,
6501: x_num_errors => l_num_errors
6553: -- Debug Statements
6554: --
6555: IF l_debug_on THEN
6556: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6557: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6558: END IF;
6559: --
6560: wsh_util_core.api_post_call
6561: (
6556: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6557: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6558: END IF;
6559: --
6560: wsh_util_core.api_post_call
6561: (
6562: p_return_status => l_return_status,
6563: x_num_warnings => l_num_warnings,
6564: x_num_errors => l_num_errors
6600: -- Debug Statements
6601: --
6602: IF l_debug_on THEN
6603: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6605: END IF;
6606: --
6607: wsh_util_core.api_post_call
6608: (
6603: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6605: END IF;
6606: --
6607: wsh_util_core.api_post_call
6608: (
6609: p_return_status => l_return_status,
6610: x_num_warnings => l_num_warnings,
6611: x_num_errors => l_num_errors
6635: -- Debug Statements
6636: --
6637: IF l_debug_on THEN
6638: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6639: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6640: END IF;
6641: --
6642: wsh_util_core.api_post_call
6643: (
6638: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6639: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6640: END IF;
6641: --
6642: wsh_util_core.api_post_call
6643: (
6644: p_return_status => l_return_status,
6645: x_num_warnings => l_num_warnings,
6646: x_num_errors => l_num_errors
6670: IF SQL%ROWCOUNT = 0
6671: THEN
6672: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_HDR_UPD_ERROR');
6673: FND_MESSAGE.SET_TOKEN('SHIPMENT_HEADER_ID',l_RCVShipmentHeaderId);
6674: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
6675: RAISE FND_API.G_EXC_ERROR;
6676: END IF;
6677: --
6678: --
6696: --
6697: FND_MESSAGE.SET_NAME('WSH','WSH_IB_PENDING_ASN_MATCH');
6698: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
6699: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
6700: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
6701: --
6702: RAISE e_notMatched;
6703: --}
6704: END IF;
6757: -- Debug Statements
6758: --
6759: IF l_debug_on THEN
6760: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6761: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6762: END IF;
6763: --
6764: wsh_util_core.api_post_call
6765: (
6760: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6761: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6762: END IF;
6763: --
6764: wsh_util_core.api_post_call
6765: (
6766: p_return_status => l_return_status,
6767: x_num_warnings => l_num_warnings,
6768: x_num_errors => l_num_errors
6827: THEN
6828: --{
6829: FND_MESSAGE.SET_NAME('WSH','WSH_IB_RSL_NOT_FOUND');
6830: FND_MESSAGE.SET_TOKEN('RCV_SHIPMENT_LINE_ID',p_line_rec.shipment_line_id(l_index));
6831: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
6832: RAISE FND_API.G_EXC_ERROR;
6833: --}
6834: END IF;
6835: --
6865: -- Debug Statements
6866: --
6867: IF l_debug_on THEN
6868: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6869: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6870: END IF;
6871: --
6872: wsh_util_core.api_post_call
6873: (
6868: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6869: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6870: END IF;
6871: --
6872: wsh_util_core.api_post_call
6873: (
6874: p_return_status => l_return_status,
6875: x_num_warnings => l_num_warnings,
6876: x_num_errors => l_num_errors
6929: IF l_debug_on THEN
6930: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6931: WSH_DEBUG_SV.log(l_module_name,'l_key',l_key);
6932: WSH_DEBUG_SV.log(l_module_name,'l_transactionSubType',l_transactionSubType);
6933: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6934: END IF;
6935: --
6936: wsh_util_core.api_post_call
6937: (
6932: WSH_DEBUG_SV.log(l_module_name,'l_transactionSubType',l_transactionSubType);
6933: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6934: END IF;
6935: --
6936: wsh_util_core.api_post_call
6937: (
6938: p_return_status => l_return_status,
6939: x_num_warnings => l_num_warnings,
6940: x_num_errors => l_num_errors
6956: --
6957: -- Debug Statements
6958: --
6959: IF l_debug_on THEN
6960: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
6961: END IF;
6962: --
6963: -- Check if key is already processed in the current call(execution)
6964: --
6961: END IF;
6962: --
6963: -- Check if key is already processed in the current call(execution)
6964: --
6965: wsh_util_core.get_cached_value
6966: (
6967: p_cache_tbl => l_linkTbl,
6968: p_cache_ext_tbl => l_linkExtTbl,
6969: p_key => l_key, --l_poShipmentLineId,
6975: IF l_debug_on THEN
6976: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6977: END IF;
6978: --
6979: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
6980: THEN
6981: RAISE FND_API.G_EXC_ERROR;
6982: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
6983: THEN
6978: --
6979: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
6980: THEN
6981: RAISE FND_API.G_EXC_ERROR;
6982: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
6983: THEN
6984: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6985: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6986: THEN
6981: RAISE FND_API.G_EXC_ERROR;
6982: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
6983: THEN
6984: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6985: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6986: THEN
6987: --{
6988: -- Since key is not already processed in the current call(execution),
6989: -- let's set the query conditions(depending on transaction type)
7022: --IB-PHASE-2
7023: --
7024: --
7025: --l_txnUniqueSFLocnFound := TRUE;
7026: --l_txnUniqueSFLocnId := WSH_UTIL_CORE.C_NULL_SF_LOCN_ID;
7027: ELSE
7028: l_released_status := 'X';
7029: l_shipmentHeaderId := NULL;
7030: l_rcvShipmentLineId := NULL;
7130: FND_MESSAGE.SET_NAME('WSH','WSH_IB_PARENT_MULTI_SF_MATCH');
7131: FND_MESSAGE.SET_TOKEN('TRANSACTION_TYPE',p_action_prms.action_code);
7132: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
7133: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
7134: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
7135: --
7136: RAISE e_lineNotMatched;
7137: --}
7138: END IF;
7276: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
7277: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
7278: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
7279: --
7280: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
7281: --
7282: RAISE e_NotMatched;
7283: --}
7284: END IF;
7394: -- Debug Statements
7395: --
7396: IF l_debug_on THEN
7397: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7398: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7399: END IF;
7400: --
7401: wsh_util_core.api_post_call
7402: (
7397: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7398: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7399: END IF;
7400: --
7401: wsh_util_core.api_post_call
7402: (
7403: p_return_status => l_return_status,
7404: x_num_warnings => l_num_warnings,
7405: x_num_errors => l_num_errors
7439: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_poHeaderNumber);
7440: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
7441: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
7442: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
7443: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
7444: RAISE FND_API.G_EXC_ERROR;
7445: --}
7446: END IF;
7447: --
7482: := ROUND
7483: (
7484: l_src_requested_quantity2 * p_line_rec.received_quantity(l_index)
7485: / l_src_requested_quantity,
7486: WSH_UTIL_CORE.C_MAX_DECIMAL_DIGITS_INV
7487: );
7488: --}
7489: END IF;
7490: --
7531: -- For child transactions(indicated by l_resetTxnUniqueSFLocn=TRUE), even when
7532: -- line's ship-from location is null,it is a change.
7533: --
7534: --
7535: IF l_lineSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7536: THEN
7537: l_lineUniqueSFLocnFound := FALSE;
7538: ELSE
7539: --IF (l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
7586: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
7587: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
7588: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
7589: --
7590: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
7591: --
7592: RAISE e_NotMatched;
7593: --}
7594: ELSE
7606: )
7607: --AND ( i = 1 OR l_lineSFLocnId <> l_lineUniqueSFLocnId )
7608: -- replaced with the following line
7609: AND ( l_lineSFLocnId <> l_linePreviousSFLocnId )
7610: AND l_lineSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7611: THEN
7612: --{
7613: --
7614: -- Debug Statements
7613: --
7614: -- Debug Statements
7615: --
7616: IF l_debug_on THEN
7617: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_shipFromLocationIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7618: END IF;
7619: --
7620: wsh_util_core.get_cached_value
7621: (
7616: IF l_debug_on THEN
7617: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_shipFromLocationIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7618: END IF;
7619: --
7620: wsh_util_core.get_cached_value
7621: (
7622: p_cache_tbl => l_shipFromLocationIdTbl,
7623: p_cache_ext_tbl => l_shipFromLocationIdExtTbl,
7624: p_key => l_lineSFLocnId,
7631: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7632: END IF;
7633: --
7634: --
7635: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
7636: THEN
7637: RAISE FND_API.G_EXC_ERROR;
7638: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
7639: THEN
7634: --
7635: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
7636: THEN
7637: RAISE FND_API.G_EXC_ERROR;
7638: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
7639: THEN
7640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7641: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
7642: THEN
7637: RAISE FND_API.G_EXC_ERROR;
7638: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
7639: THEN
7640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7641: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
7642: THEN
7643: l_shipFromLocationIdLineCount := 1;
7644: ELSE
7645: l_shipFromLocationIdLineCount := NVL(l_shipFromLocationIdLineCount,0) + 1;
7649: --
7650: -- Debug Statements
7651: --
7652: IF l_debug_on THEN
7653: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_shipFromLocationIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7654: END IF;
7655: --
7656: wsh_util_core.get_cached_value
7657: (
7652: IF l_debug_on THEN
7653: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_shipFromLocationIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7654: END IF;
7655: --
7656: wsh_util_core.get_cached_value
7657: (
7658: p_cache_tbl => l_shipFromLocationIdTbl,
7659: p_cache_ext_tbl => l_shipFromLocationIdExtTbl,
7660: p_key => l_lineSFLocnId,
7668: -- Debug Statements
7669: --
7670: IF l_debug_on THEN
7671: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7672: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7673: END IF;
7674: --
7675: wsh_util_core.api_post_call
7676: (
7671: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7672: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7673: END IF;
7674: --
7675: wsh_util_core.api_post_call
7676: (
7677: p_return_status => l_return_status,
7678: x_num_warnings => l_num_warnings,
7679: x_num_errors => l_num_errors
7688: WSH_DEBUG_SV.log(l_module_name,'LineRecTbl-WND ID',l_lineRecTbl.delivery_id_tbl(i));
7689: END IF;
7690: --
7691: IF NOT(l_txnUniqueSFLocnFound)
7692: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7693: OR l_lineSFLocnId = l_txnUniqueSFLocnId
7694: OR ( l_lineSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7695: AND l_lineUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7696: )
7690: --
7691: IF NOT(l_txnUniqueSFLocnFound)
7692: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7693: OR l_lineSFLocnId = l_txnUniqueSFLocnId
7694: OR ( l_lineSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7695: AND l_lineUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7696: )
7697: THEN
7698: --{
7691: IF NOT(l_txnUniqueSFLocnFound)
7692: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7693: OR l_lineSFLocnId = l_txnUniqueSFLocnId
7694: OR ( l_lineSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7695: AND l_lineUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7696: )
7697: THEN
7698: --{
7699: l_end_Index := l_end_Index + 1;
7731: -- Debug Statements
7732: --
7733: IF l_debug_on THEN
7734: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7735: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7736: END IF;
7737: --
7738: wsh_util_core.api_post_call
7739: (
7734: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7735: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7736: END IF;
7737: --
7738: wsh_util_core.api_post_call
7739: (
7740: p_return_status => l_return_status,
7741: x_num_warnings => l_num_warnings,
7742: x_num_errors => l_num_errors
7848: END IF;
7849: --}
7850: END IF;
7851: --
7852: --EXIT WHEN l_lineSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID;
7853: --
7854: --
7855: IF l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
7856: AND l_receiptShipFromLocationCount = 1
7853: --
7854: --
7855: IF l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
7856: AND l_receiptShipFromLocationCount = 1
7857: AND l_txnUniqueSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7858: THEN
7859: l_lineUniqueSFLocnId := NULL;
7860: END IF;
7861: --}
7886: --
7887: -- Debug Statements
7888: --
7889: IF l_debug_on THEN
7890: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7891: END IF;
7892: --
7893: wsh_util_core.get_cached_value
7894: (
7889: IF l_debug_on THEN
7890: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7891: END IF;
7892: --
7893: wsh_util_core.get_cached_value
7894: (
7895: p_cache_tbl => l_linkTbl,
7896: p_cache_ext_tbl => l_linkExtTbl,
7897: p_key => l_key, --l_poShipmentLineId,
7905: -- Debug Statements
7906: --
7907: IF l_debug_on THEN
7908: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7909: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7910: END IF;
7911: --
7912: wsh_util_core.api_post_call
7913: (
7908: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7909: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7910: END IF;
7911: --
7912: wsh_util_core.api_post_call
7913: (
7914: p_return_status => l_return_status,
7915: x_num_warnings => l_num_warnings,
7916: x_num_errors => l_num_errors
7923: THEN
7924: --{
7925: IF l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
7926: AND l_receiptShipFromLocationCount = 1
7927: AND l_lineUniqueSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7928: AND l_lineUniqueSFLocnId <> l_txnUniqueSFLocnId
7929: THEN
7930: l_messageName := 'WSH_IB_NOT_MATCH_NULL_SF_LOCN';
7931: RAISE e_lineNotMatched;
7932: END IF;
7933: --
7934: --
7935: IF NOT(l_txnUniqueSFLocnFound)
7936: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7937: THEN
7938: --{
7939: l_txnUniqueSFLocnFound := TRUE;
7940: -- { IB-Phase-2
7943: l_txnUniqueSFLocnId := l_lineUniqueSFLocnId;
7944: END IF;
7945: -- } IB-Phase-2
7946: --
7947: IF l_txnUniqueSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7948: THEN
7949: --{
7950: IF NOT(l_resetTxnUniqueSFLocn)
7951: THEN
7955: --
7956: -- Debug Statements
7957: --
7958: IF l_debug_on THEN
7959: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_LOCATION_DESCRIPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
7960: END IF;
7961: --
7962: l_txnUniqueSFLocnCode := SUBSTRB
7963: (
7960: END IF;
7961: --
7962: l_txnUniqueSFLocnCode := SUBSTRB
7963: (
7964: WSH_UTIL_CORE.get_location_description
7965: (
7966: l_txnUniqueSFLocnId,
7967: 'NEW UI CODE'
7968: ),
7971: );
7972: --}
7973: END IF;
7974: --}
7975: ELSIF l_lineUniqueSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
7976: AND l_lineUniqueSFLocnId <> l_txnUniqueSFLocnId
7977: THEN
7978: --{
7979: FND_MESSAGE.SET_NAME('WSH','WSH_IB_NOT_UNIQUE_SF_LOCN');
7979: FND_MESSAGE.SET_NAME('WSH','WSH_IB_NOT_UNIQUE_SF_LOCN');
7980: FND_MESSAGE.SET_TOKEN('TRANSACTION_TYPE',l_transactionMeaning); --p_action_prms.action_code);
7981: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
7982: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
7983: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
7984: RAISE e_notMatched;
7985: --}
7986: END IF;
7987: --}
7995: END IF;
7996: --
7997: --
7998: IF l_txnUniqueSFLocnFound
7999: --AND l_txnUniqueSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
8000: THEN
8001: --{
8002: IF l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
8003: OR l_resetTxnUniqueSFLocn
8000: THEN
8001: --{
8002: IF l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
8003: OR l_resetTxnUniqueSFLocn
8004: OR l_txnUniqueSFLocnId <> WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
8005: THEN
8006: --{
8007: IF l_end_index >= l_start_index
8008: THEN
8041: -- Debug Statements
8042: --
8043: IF l_debug_on THEN
8044: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8045: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8046: END IF;
8047: --
8048: wsh_util_core.api_post_call
8049: (
8044: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8045: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8046: END IF;
8047: --
8048: wsh_util_core.api_post_call
8049: (
8050: p_return_status => l_return_status,
8051: x_num_warnings => l_num_warnings,
8052: x_num_errors => l_num_errors
8083: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_poHeaderNumber);
8084: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM',l_poLineNumber);
8085: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM',l_poShipmentLineNumber);
8086: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_poReleaseNumber);
8087: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8088: --
8089: RAISE e_notMatched;
8090: --}
8091: END IF;
8095: END IF;
8096: --}
8097: END IF;
8098: --}
8099: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS
8100: THEN
8101: --{
8102: IF l_transactionType = WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT_ADD
8103: AND SUBSTRB(l_linkRecString,1,1) = C_ERROR_FLAG
8147: -- Debug Statements
8148: --
8149: IF l_debug_on THEN
8150: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8152: END IF;
8153: --
8154: wsh_util_core.api_post_call
8155: (
8150: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8152: END IF;
8153: --
8154: wsh_util_core.api_post_call
8155: (
8156: p_return_status => l_return_status,
8157: x_num_warnings => l_num_warnings,
8158: x_num_errors => l_num_errors
8200: -- Debug Statements
8201: --
8202: IF l_debug_on THEN
8203: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8204: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8205: END IF;
8206: --
8207: wsh_util_core.api_post_call
8208: (
8203: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8204: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8205: END IF;
8206: --
8207: wsh_util_core.api_post_call
8208: (
8209: p_return_status => l_return_status,
8210: x_num_warnings => l_num_warnings,
8211: x_num_errors => l_num_errors
8225: --
8226: -- Debug Statements
8227: --
8228: IF l_debug_on THEN
8229: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
8230: END IF;
8231: --
8232: wsh_util_core.get_cached_value
8233: (
8228: IF l_debug_on THEN
8229: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_linkTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
8230: END IF;
8231: --
8232: wsh_util_core.get_cached_value
8233: (
8234: p_cache_tbl => l_linkTbl,
8235: p_cache_ext_tbl => l_linkExtTbl,
8236: p_key => l_key, --l_poShipmentLineId,
8244: -- Debug Statements
8245: --
8246: IF l_debug_on THEN
8247: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8248: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8249: END IF;
8250: --
8251: wsh_util_core.api_post_call
8252: (
8247: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8248: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8249: END IF;
8250: --
8251: wsh_util_core.api_post_call
8252: (
8253: p_return_status => l_return_status,
8254: x_num_warnings => l_num_warnings,
8255: x_num_errors => l_num_errors
8298: FND_MESSAGE.SET_TOKEN('SHIP_FROM_LOCATION',l_txnUniqueSFLocnCode);
8299: END IF;
8300: --
8301: --
8302: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8303: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8304: --}
8305: END IF;
8306: --}
8299: END IF;
8300: --
8301: --
8302: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8303: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8304: --}
8305: END IF;
8306: --}
8307: END IF;
8348: )
8349: THEN
8350: --{
8351: IF NOT(l_txnUniqueSFLocnFound)
8352: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
8353: THEN
8354: --{
8355: l_count := l_linkTbl.COUNT + l_linkExtTbl.COUNT;
8356: --
8383: END IF;
8384: --
8385: --
8386: IF l_shipFromLocationIdTbl(l_index).value = l_count
8387: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
8388: THEN
8389: --{
8390: l_dummy_min_date := NULL;
8391: l_dummy_max_date := NULL;
8421: -- Debug Statements
8422: --
8423: IF l_debug_on THEN
8424: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8425: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8426: END IF;
8427: --
8428: wsh_util_core.api_post_call
8429: (
8424: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8425: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8426: END IF;
8427: --
8428: wsh_util_core.api_post_call
8429: (
8430: p_return_status => l_return_status,
8431: x_num_warnings => l_num_warnings,
8432: x_num_errors => l_num_errors
8482: END IF;
8483: --
8484: --
8485: IF l_shipFromLocationIdExtTbl(l_index).value = l_count
8486: OR l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
8487: THEN
8488: --{
8489: l_dummy_min_date := NULL;
8490: l_dummy_max_date := NULL;
8520: -- Debug Statements
8521: --
8522: IF l_debug_on THEN
8523: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8524: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8525: END IF;
8526: --
8527: wsh_util_core.api_post_call
8528: (
8523: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8524: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8525: END IF;
8526: --
8527: wsh_util_core.api_post_call
8528: (
8529: p_return_status => l_return_status,
8530: x_num_warnings => l_num_warnings,
8531: x_num_errors => l_num_errors
8586: FND_MESSAGE.SET_NAME('WSH','WSH_IB_NOT_UNIQUE_SF_LOCN');
8587: FND_MESSAGE.SET_TOKEN('TRANSACTION_TYPE',l_transactionMeaning); --p_action_prms.action_code);
8588: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
8589: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
8590: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
8591: RAISE e_notMatched;
8592: --}
8593: END IF;
8594: --}
8601: END IF;
8602: --
8603: --
8604: IF l_txnUniqueSFLocnFound
8605: AND l_txnUniqueSFLocnId = WSH_UTIL_CORE.C_NULL_SF_LOCN_ID
8606: THEN
8607: --{
8608: l_min_date := NULL;
8609: l_max_date := NULL;
8639: -- Debug Statements
8640: --
8641: IF l_debug_on THEN
8642: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8643: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8644: END IF;
8645: --
8646: wsh_util_core.api_post_call
8647: (
8642: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8643: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8644: END IF;
8645: --
8646: wsh_util_core.api_post_call
8647: (
8648: p_return_status => l_return_status,
8649: x_num_warnings => l_num_warnings,
8650: x_num_errors => l_num_errors
8659: FND_MESSAGE.SET_NAME('WSH','WSH_IB_NOT_UNIQUE_SF_LOCN');
8660: FND_MESSAGE.SET_TOKEN('TRANSACTION_TYPE',l_transactionMeaning); --p_action_prms.action_code);
8661: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
8662: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
8663: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
8664: RAISE e_notMatched;
8665: --}
8666: END IF;
8667: --}
8696: -- Debug Statements
8697: --
8698: IF l_debug_on THEN
8699: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8700: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8701: END IF;
8702: --
8703: wsh_util_core.api_post_call
8704: (
8699: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8700: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8701: END IF;
8702: --
8703: wsh_util_core.api_post_call
8704: (
8705: p_return_status => l_return_status,
8706: x_num_warnings => l_num_warnings,
8707: x_num_errors => l_num_errors
8750: -- Debug Statements
8751: --
8752: IF l_debug_on THEN
8753: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8754: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8755: END IF;
8756: --
8757: wsh_util_core.api_post_call
8758: (
8753: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8754: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8755: END IF;
8756: --
8757: wsh_util_core.api_post_call
8758: (
8759: p_return_status => l_return_status,
8760: x_num_warnings => l_num_warnings,
8761: x_num_errors => l_num_errors
8815: -- Debug Statements
8816: --
8817: IF l_debug_on THEN
8818: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8819: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8820: END IF;
8821: --
8822: wsh_util_core.api_post_call
8823: (
8818: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8819: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8820: END IF;
8821: --
8822: wsh_util_core.api_post_call
8823: (
8824: p_return_status => l_return_status,
8825: x_num_warnings => l_num_warnings,
8826: x_num_errors => l_num_errors
8859: -- Debug Statements
8860: --
8861: IF l_debug_on THEN
8862: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8863: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8864: END IF;
8865: --
8866: wsh_util_core.api_post_call
8867: (
8862: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8863: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8864: END IF;
8865: --
8866: wsh_util_core.api_post_call
8867: (
8868: p_return_status => l_return_status,
8869: x_num_warnings => l_num_warnings,
8870: x_num_errors => l_num_errors,
8896: IF SQL%ROWCOUNT = 0
8897: THEN
8898: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_UPDATE_ERROR');
8899: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',l_headerTransactionId);
8900: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8901: RAISE FND_API.G_EXC_ERROR;
8902: END IF;
8903: --
8904: --
8924: IF SQL%ROWCOUNT = 0
8925: THEN
8926: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_UPDATE_ERROR');
8927: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',l_parentTxnHistoryRec.transaction_id);
8928: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8929: RAISE FND_API.G_EXC_ERROR;
8930: END IF;
8931: --}
8932: END IF;
8952: --
8953: --
8954: IF l_debug_on THEN
8955: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8956: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8957: END IF;
8958: --
8959: wsh_util_core.api_post_call
8960: (
8955: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
8956: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8957: END IF;
8958: --
8959: wsh_util_core.api_post_call
8960: (
8961: p_return_status => l_return_status,
8962: x_num_warnings => l_num_warnings,
8963: x_num_errors => l_num_errors
9010: -- Debug Statements
9011: --
9012: IF l_debug_on THEN
9013: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9014: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9015: END IF;
9016: --
9017: wsh_util_core.api_post_call
9018: (
9013: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9014: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9015: END IF;
9016: --
9017: wsh_util_core.api_post_call
9018: (
9019: p_return_status => l_return_status,
9020: x_num_warnings => l_num_warnings,
9021: x_num_errors => l_num_errors
9057: END IF;
9058: --
9059: IF l_num_errors > 0
9060: THEN
9061: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9062: ELSIF l_num_warnings > 0
9063: THEN
9064: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9065: ELSE
9060: THEN
9061: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9062: ELSIF l_num_warnings > 0
9063: THEN
9064: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9065: ELSE
9066: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9067: END IF;
9068: --}
9062: ELSIF l_num_warnings > 0
9063: THEN
9064: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9065: ELSE
9066: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9067: END IF;
9068: --}
9069: --
9070: -- Debug Statements
9116: FND_MESSAGE.SET_NAME('WSH','WSH_IB_MATCH_FATAL_ERROR');
9117: FND_MESSAGE.SET_TOKEN('TRANSACTION_CODE',p_action_prms.action_code);
9118: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
9119: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
9120: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9121: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9122: */
9123: --
9124: -- Debug Statements
9117: FND_MESSAGE.SET_TOKEN('TRANSACTION_CODE',p_action_prms.action_code);
9118: FND_MESSAGE.SET_TOKEN('SHIPMENT_NUM',l_shipmentNumber);
9119: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',l_receiptNumber);
9120: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9121: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9122: */
9123: --
9124: -- Debug Statements
9125: --
9130: END IF;
9131: --
9132: WHEN FND_API.G_EXC_ERROR THEN
9133: ROLLBACK TO matchTransaction_sp;
9134: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9135: --
9136: -- Debug Statements
9137: --
9138: IF l_debug_on THEN
9141: END IF;
9142: --
9143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9144: ROLLBACK TO matchTransaction_sp;
9145: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9146: --
9147: -- Debug Statements
9148: --
9149: IF l_debug_on THEN
9150: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9151: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9152: END IF;
9153: --
9154: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9155: --ROLLBACK TO matchTransaction_sp;
9156: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9157: --
9158: -- Debug Statements
9152: END IF;
9153: --
9154: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9155: --ROLLBACK TO matchTransaction_sp;
9156: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9157: --
9158: -- Debug Statements
9159: --
9160: IF l_debug_on THEN
9157: --
9158: -- Debug Statements
9159: --
9160: IF l_debug_on THEN
9161: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9162: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9163: END IF;
9164: --
9165: WHEN OTHERS THEN
9158: -- Debug Statements
9159: --
9160: IF l_debug_on THEN
9161: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9162: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9163: END IF;
9164: --
9165: WHEN OTHERS THEN
9166: ROLLBACK TO matchTransaction_sp;
9163: END IF;
9164: --
9165: WHEN OTHERS THEN
9166: ROLLBACK TO matchTransaction_sp;
9167: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9168: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchTransaction');
9169: --
9170: -- Debug Statements
9171: --
9164: --
9165: WHEN OTHERS THEN
9166: ROLLBACK TO matchTransaction_sp;
9167: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9168: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchTransaction');
9169: --
9170: -- Debug Statements
9171: --
9172: IF l_debug_on THEN
9192: --{
9193: l_shpmt_lines_out_rec WSH_IB_SHPMT_LINE_REC_TYPE;
9194: l_line_rec OE_WSH_BULK_GRP.Line_rec_type;
9195: l_action_prms WSH_BULK_TYPES_GRP.action_parameters_rectype;
9196: l_rslId_cache_tbl WSH_UTIL_CORE.key_value_tab_type;
9197: l_rslId_cache_ext_tbl WSH_UTIL_CORE.key_value_tab_type;
9198: --
9199: l_poHeaderId NUMBER;
9200: l_poShipmentLineId NUMBER;
9193: l_shpmt_lines_out_rec WSH_IB_SHPMT_LINE_REC_TYPE;
9194: l_line_rec OE_WSH_BULK_GRP.Line_rec_type;
9195: l_action_prms WSH_BULK_TYPES_GRP.action_parameters_rectype;
9196: l_rslId_cache_tbl WSH_UTIL_CORE.key_value_tab_type;
9197: l_rslId_cache_ext_tbl WSH_UTIL_CORE.key_value_tab_type;
9198: --
9199: l_poHeaderId NUMBER;
9200: l_poShipmentLineId NUMBER;
9201: l_rcvShipmentLineId NUMBER;
9259: -- Debug Statements
9260: --
9261: IF l_debug_on THEN
9262: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9263: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9264: END IF;
9265: --
9266: wsh_util_core.api_post_call
9267: (
9262: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9263: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9264: END IF;
9265: --
9266: wsh_util_core.api_post_call
9267: (
9268: p_return_status => l_return_status,
9269: x_num_warnings => l_num_warnings,
9270: x_num_errors => l_num_errors,
9310: --
9311: --
9312: IF l_debug_on THEN
9313: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9314: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9315: END IF;
9316: --
9317: wsh_util_core.api_post_call
9318: (
9313: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9314: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9315: END IF;
9316: --
9317: wsh_util_core.api_post_call
9318: (
9319: p_return_status => l_return_status,
9320: x_num_warnings => l_num_warnings,
9321: x_num_errors => l_num_errors
9334: l_line_rec.rcv_transaction_id.EXTEND;
9335: --
9336: --
9337: IF l_debug_on THEN
9338: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_cached_value-l_rslId_cache_tbl',WSH_DEBUG_SV.C_PROC_LEVEL);
9339: END IF;
9340: --
9341: WSH_UTIL_CORE.get_cached_value
9342: (
9337: IF l_debug_on THEN
9338: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_cached_value-l_rslId_cache_tbl',WSH_DEBUG_SV.C_PROC_LEVEL);
9339: END IF;
9340: --
9341: WSH_UTIL_CORE.get_cached_value
9342: (
9343: p_cache_tbl => l_rslId_cache_tbl,
9344: p_cache_ext_tbl => l_rslId_cache_ext_tbl,
9345: p_action => 'PUT',
9350: --
9351: --
9352: IF l_debug_on THEN
9353: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9354: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9355: END IF;
9356: --
9357: wsh_util_core.api_post_call
9358: (
9353: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9354: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9355: END IF;
9356: --
9357: wsh_util_core.api_post_call
9358: (
9359: p_return_status => l_return_status,
9360: x_num_warnings => l_num_warnings,
9361: x_num_errors => l_num_errors
9416: --
9417: --
9418: IF l_debug_on THEN
9419: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9420: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9421: END IF;
9422: --
9423: wsh_util_core.api_post_call
9424: (
9419: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9420: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9421: END IF;
9422: --
9423: wsh_util_core.api_post_call
9424: (
9425: p_return_status => l_return_status,
9426: x_num_warnings => l_num_warnings,
9427: x_num_errors => l_num_errors
9454: IF l_poHeaderId = p_poHeaderId
9455: THEN
9456: --{
9457: IF l_debug_on THEN
9458: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_cached_value-l_rslId_cache_tbl',WSH_DEBUG_SV.C_PROC_LEVEL);
9459: END IF;
9460: --
9461: WSH_UTIL_CORE.get_cached_value
9462: (
9457: IF l_debug_on THEN
9458: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_cached_value-l_rslId_cache_tbl',WSH_DEBUG_SV.C_PROC_LEVEL);
9459: END IF;
9460: --
9461: WSH_UTIL_CORE.get_cached_value
9462: (
9463: p_cache_tbl => l_rslId_cache_tbl,
9464: p_cache_ext_tbl => l_rslId_cache_ext_tbl,
9465: p_action => 'GET',
9470: --
9471: --
9472: IF l_debug_on THEN
9473: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9474: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9475: END IF;
9476: --
9477: wsh_util_core.api_post_call
9478: (
9473: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9474: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9475: END IF;
9476: --
9477: wsh_util_core.api_post_call
9478: (
9479: p_return_status => l_return_status,
9480: x_num_warnings => l_num_warnings,
9481: x_num_errors => l_num_errors
9481: x_num_errors => l_num_errors
9482: );
9483: --
9484: --
9485: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
9486: THEN
9487: IF l_debug_on THEN
9488: WSH_DEBUG_SV.logmsg(l_module_name,'Entry not found in l_rslId_cache');
9489: END IF;
9536: --
9537: --
9538: IF l_debug_on THEN
9539: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9541: END IF;
9542: --
9543: wsh_util_core.api_post_call
9544: (
9539: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9541: END IF;
9542: --
9543: wsh_util_core.api_post_call
9544: (
9545: p_return_status => l_return_status,
9546: x_num_warnings => l_num_warnings,
9547: x_num_errors => l_num_errors
9555: END IF;
9556: --
9557: IF l_num_errors > 0
9558: THEN
9559: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9560: ELSIF l_num_warnings > 0
9561: THEN
9562: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9563: ELSE
9558: THEN
9559: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9560: ELSIF l_num_warnings > 0
9561: THEN
9562: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9563: ELSE
9564: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9565: END IF;
9566: --
9560: ELSIF l_num_warnings > 0
9561: THEN
9562: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9563: ELSE
9564: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9565: END IF;
9566: --
9567: -- Debug Statements
9568: --
9573: EXCEPTION
9574: --{
9575: WHEN FND_API.G_EXC_ERROR THEN
9576: --ROLLBACK TO matchTransaction_sp;
9577: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9578: --
9579: -- Debug Statements
9580: --
9581: IF l_debug_on THEN
9584: END IF;
9585: --
9586: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9587: --ROLLBACK TO matchTransaction_sp;
9588: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9589: --
9590: -- Debug Statements
9591: --
9592: IF l_debug_on THEN
9593: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9594: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9595: END IF;
9596: --
9597: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9598: --ROLLBACK TO matchTransaction_sp;
9599: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9600: --
9601: -- Debug Statements
9595: END IF;
9596: --
9597: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9598: --ROLLBACK TO matchTransaction_sp;
9599: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9600: --
9601: -- Debug Statements
9602: --
9603: IF l_debug_on THEN
9600: --
9601: -- Debug Statements
9602: --
9603: IF l_debug_on THEN
9604: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9606: END IF;
9607: --
9608: WHEN OTHERS THEN
9601: -- Debug Statements
9602: --
9603: IF l_debug_on THEN
9604: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9606: END IF;
9607: --
9608: WHEN OTHERS THEN
9609: --ROLLBACK TO matchTransaction_sp;
9606: END IF;
9607: --
9608: WHEN OTHERS THEN
9609: --ROLLBACK TO matchTransaction_sp;
9610: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9611: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processPriorReceipts');
9612: --
9613: -- Debug Statements
9614: --
9607: --
9608: WHEN OTHERS THEN
9609: --ROLLBACK TO matchTransaction_sp;
9610: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9611: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processPriorReceipts');
9612: --
9613: -- Debug Statements
9614: --
9615: IF l_debug_on THEN
9792: (
9793: p_shipment_header_id => rcv_headers_rec.shipment_header_id,
9794: p_transaction_type => rcv_headers_rec.txn_type,
9795: p_on_error => 'RETRY',
9796: p_on_noDataFound => WSH_UTIL_CORE.G_RET_STS_SUCCESS,
9797: x_txn_history_rec => l_txnHistoryRec,
9798: x_return_status => l_return_status,
9799: x_locked => l_locked
9800: );
9804: -- Debug Statements
9805: --
9806: IF l_debug_on THEN
9807: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9809: END IF;
9810: --
9811: wsh_util_core.api_post_call
9812: (
9807: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9809: END IF;
9810: --
9811: wsh_util_core.api_post_call
9812: (
9813: p_return_status => l_return_status,
9814: x_num_warnings => l_num_warnings,
9815: x_num_errors => l_num_errors
9895: --
9896: IF l_debug_on THEN
9897: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9898: WSH_DEBUG_SV.log(l_module_name,'l_transactionId',l_transactionId);
9899: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9900: END IF;
9901: --
9902: wsh_util_core.api_post_call
9903: (
9898: WSH_DEBUG_SV.log(l_module_name,'l_transactionId',l_transactionId);
9899: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9900: END IF;
9901: --
9902: wsh_util_core.api_post_call
9903: (
9904: p_return_status => l_return_status,
9905: x_num_warnings => l_num_warnings,
9906: x_num_errors => l_num_errors
9981: -- Debug Statements
9982: --
9983: IF l_debug_on THEN
9984: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9985: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9986: END IF;
9987: --
9988: wsh_util_core.api_post_call
9989: (
9984: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
9985: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
9986: END IF;
9987: --
9988: wsh_util_core.api_post_call
9989: (
9990: p_return_status => l_return_status,
9991: x_num_warnings => l_num_warnings,
9992: x_num_errors => l_num_errors
10013: IF SQL%ROWCOUNT = 0
10014: THEN
10015: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_UPDATE_ERROR');
10016: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',l_txnHistoryRec.transaction_id);
10017: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
10018: RAISE FND_API.G_EXC_ERROR;
10019: END IF;
10020: --}
10021: END IF;
10101: --
10102: --
10103: IF l_debug_on THEN
10104: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10105: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
10106: END IF;
10107: --
10108: wsh_util_core.api_post_call
10109: (
10104: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10105: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
10106: END IF;
10107: --
10108: wsh_util_core.api_post_call
10109: (
10110: p_return_status => l_return_status,
10111: x_num_warnings => l_num_warnings,
10112: x_num_errors => l_num_errors
10121: END IF;
10122: --
10123: IF l_num_errors > 0
10124: THEN
10125: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10126: ELSIF l_num_warnings > 0
10127: THEN
10128: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10129: ELSE
10124: THEN
10125: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10126: ELSIF l_num_warnings > 0
10127: THEN
10128: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10129: ELSE
10130: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10131: END IF;
10132: --
10126: ELSIF l_num_warnings > 0
10127: THEN
10128: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10129: ELSE
10130: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10131: END IF;
10132: --
10133: -- Debug Statements
10134: --
10139: EXCEPTION
10140: --{
10141: WHEN FND_API.G_EXC_ERROR THEN
10142: --ROLLBACK TO matchTransaction_sp;
10143: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10144: --
10145: -- Debug Statements
10146: --
10147: IF l_debug_on THEN
10150: END IF;
10151: --
10152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10153: --ROLLBACK TO matchTransaction_sp;
10154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10155: --
10156: -- Debug Statements
10157: --
10158: IF l_debug_on THEN
10159: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10161: END IF;
10162: --
10163: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10164: --ROLLBACK TO matchTransaction_sp;
10165: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10166: --
10167: -- Debug Statements
10161: END IF;
10162: --
10163: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10164: --ROLLBACK TO matchTransaction_sp;
10165: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10166: --
10167: -- Debug Statements
10168: --
10169: IF l_debug_on THEN
10166: --
10167: -- Debug Statements
10168: --
10169: IF l_debug_on THEN
10170: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10171: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10172: END IF;
10173: --
10174: WHEN OTHERS THEN
10167: -- Debug Statements
10168: --
10169: IF l_debug_on THEN
10170: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10171: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10172: END IF;
10173: --
10174: WHEN OTHERS THEN
10175: --ROLLBACK TO matchTransaction_sp;
10172: END IF;
10173: --
10174: WHEN OTHERS THEN
10175: --ROLLBACK TO matchTransaction_sp;
10176: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10177: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.handlePriorReceipts');
10178: --
10179: -- Debug Statements
10180: --
10173: --
10174: WHEN OTHERS THEN
10175: --ROLLBACK TO matchTransaction_sp;
10176: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10177: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.handlePriorReceipts');
10178: --
10179: -- Debug Statements
10180: --
10181: IF l_debug_on THEN